libffcall-2.5/0000775000000000000000000000000014665334232010257 500000000000000libffcall-2.5/common/0000775000000000000000000000000014665334231011546 500000000000000libffcall-2.5/common/asm-powerpc.sh0000775000000000000000000000264514340441434014263 00000000000000#!/bin/sh # Translate the assembler syntax of powerpc assembler programs # Usage: asm-powerpc.sh < powerpclinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove #APP/#NO_APP lines and gcc self-identification /^#APP$/d /^#NO_APP$/d /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.section\([ ]\+\).*GNU-stack/d EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-m68k.h0000664000000000000000000000517013347755311013207 00000000000000// Assembly language support for m68k CPU. // Bruno Haible 1999-05-29 // Copyright (C) 1999-2017 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name) // End the assembly language code for the C function 'name'. #ifdef ASM_UNDERSCORE // SunOS, NetBSD, OpenBSD, Linux/a.out #define C(entrypoint) _##entrypoint #define L(label) L##label #else // SVR4, A/UX, AMIX, Atari, Linux/ELF #define C(entrypoint) entrypoint #define L(label) .L##label #endif // When assembly language code is compiled into a shared library, ELF linkers // need to know which symbols are functions. #if defined(__NetBSD__) || defined(__OpenBSD__) || defined(__ELF__) || defined(__svr4__) #define DECLARE_FUNCTION(name) .type C(name),@function #define FUNEND(name) .size C(name),.-C(name) #else #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif #define FUNBEGIN(name) C(name): libffcall-2.5/common/asm-x86_64.h0000664000000000000000000002773114065650755013373 00000000000000// Assembly language support for x86_64 CPU. // Bruno Haible 2016-12-28 // Copyright (C) 1997-2021 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // R(reg) // This expands to a reference to register `reg'. On Unix, this // prepends a % charater. // NUM(value) // This expands to an immediate value. On Unix, this prepends a $ // character. // ADDR(variable) // This expands to an immediate value, the address of some variable // or function. On Unix, this prepends a $ character. With MSVC, // this prepends the keyword "OFFSET". // ADDR_PCRELATIVE(variable) // This expands to the address of symbol `variable', with program // counter (%rip) relative addressing. // About operand sizes: On Unix, a suffix to the instruction specifies the // size of the operands (for example "movb", "movw", "movl"). With // MSVC, there is no such suffix. Instead, the assembler infers the // operand size from the names of the registers ("al" vs. "ax" vs. // "eax"). This works well in most cases, but in instructions like // "mul [esi]" the assembler guesses the operand size: "byte" by // default. So it is better to explicitly specify the operand size // of memory operands (prefix X1, X2, X4, X8). // (Side note about Unix assemblers: Some Unix assemblers allow you // to write "testb %eax,%eax" but silently treat this as // "testb %al,%al".) // X1 // This prefixes a memory reference of 1 byte. // X2 // This prefixes a memory reference of 2 bytes. // X4 // This prefixes a memory reference of 4 bytes. // X8 // This prefixes a memory reference of 8 bytes. // MEM(base) // This expands to a memory reference at address `base'. // MEM_DISP(base,displacement) // This expands to a memory reference at address `base+displacement'. // MEM_INDEX(base,index) // This expands to a memory reference at address `base+index'. // MEM_SHINDEX(base,index,size) // This expands to a memory reference at address // `base+index*size', where `size' is 1, 2, 4, or 8. // MEM_DISP_SHINDEX0(displacement,index,size) // This expands to a memory reference at address // `displacement+index*size', where `size' is 1, 2, 4, or 8. // MEM_DISP_SHINDEX(base,displacement,index,size) // This expands to a memory reference at address // `base+displacement+index*size', where `size' is 1, 2, 4, or 8. // MEM_PCRELATIVE(variable) // This expands to a memory reference at symbol `variable', with // program counter (%rip) relative addressing. // INDIR(value) // This expands to an implicit indirection. On Unix, this prepends // a * character. // INSN1(mnemonic,size_suffix,dst) // This expands to an instruction with one operand. // INSN2(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands. In our notation, // `src' comes first and `dst' second, but they are reversed when // expanding to Intel syntax. In Intel syntax, size_suffix is omitted. // INSN2S(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands. In our notation, // `src' comes first and `dst' second, but they are reversed when // expanding to Intel syntax. In Intel syntax, size_suffix is // preserved. // INSN2MOVXL(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands, of type // movsbl/movzbl, which in some syntaxes requires a second suffix. // INSN2MOVXQ(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands, of type // movsbq/movzbq, which in some syntaxes requires a second suffix. // INSN2MOVXLQ(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands, of type // movslq/movzlq, which in some syntaxes requires a second suffix. // _ // For instructions which don't have a size suffix, like jump // instructions. Expands to nothing. Needed for MSVC, which has // problems with empty macro arguments. // TEXT() // Switch to the code section. // P2ALIGN(log,max) // Align to 2^log bytes, but insert at most max bytes. // GLOBL(name) // Declare `name' to be a global symbol. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name,size_expression) // End the assembly language code for the C function 'name'. // EH_FRAME_SECTION // The arguments to the .section statement that introduces the // exception handler section (on ELF platforms). #ifdef _MSC_VER // MSVC #define C(entrypoint) entrypoint #define L(label) $L##label #else #ifdef ASM_UNDERSCORE // Mac OS X #define C(entrypoint) _##entrypoint #define L(label) L##label #else // Linux/ELF, Solaris/ELF, Windows with GNU as #define C(entrypoint) entrypoint #define L(label) .L##label #endif #endif // The two syntaxes: // - ATT_SYNTAX for GNU assembler version 2. // - INTEL_SYNTAX for MS assembler. // Note: INTEL_SYNTAX is not the same syntax as produced by "gcc masm=intel" // as there are syntactic differences between that syntax and the one accepted // by the MS assembler (for MEM_DISP, INDIR, P2ALIGN, FUNBEGIN, FUNEND etc.). #ifdef _MSC_VER // MS assembler #define R(r) r #define NUM(n) n #define ADDR(a) OFFSET a #define ADDR_PCRELATIVE(a) OFFSET a #define X1 BYTE PTR #define X2 WORD PTR #define X4 DWORD PTR #define X8 QWORD PTR #define MEM(base) [base] #define MEM_DISP(base,displacement) [base+(displacement)] #define MEM_INDEX(base,index) [base+index] #define MEM_SHINDEX(base,index,size) [base+index*size] #define MEM_DISP_SHINDEX0(displacement,index,size) [(displacement)+index*size] #define MEM_DISP_SHINDEX(base,displacement,index,size) [base+(displacement)+index*size] #define MEM_PCRELATIVE(variable) variable #define INDIR(value)value #define INSNCONC(mnemonic,suffix)mnemonic##suffix #define INSN1(mnemonic,size_suffix,dst)mnemonic dst #define INSN2(mnemonic,size_suffix,src,dst)mnemonic dst,src #define INSN2S(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) dst,src #define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,x) dst,src #define INSN2MOVXQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,x) dst,src #define INSN2MOVXLQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,xd) dst,src #else // GNU assembler version 2 #define R(r) %r #define NUM(n) $ n #define ADDR(a) $##a #define ADDR_PCRELATIVE(a) a(%rip) #define X1 #define X2 #define X4 #define X8 #define MEM(base)(R(base)) #define MEM_DISP(base,displacement)displacement(R(base)) #define MEM_INDEX(base,index)(R(base),R(index)) #define MEM_SHINDEX(base,index,size)(R(base),R(index),size) #define MEM_DISP_SHINDEX0(displacement,index,size)displacement(,R(index),size) #define MEM_DISP_SHINDEX(base,displacement,index,size)displacement(R(base),R(index),size) #define MEM_PCRELATIVE(variable) variable(%rip) #define INDIR(value)*value #define INSNCONC(mnemonic,size_suffix)mnemonic##size_suffix #define INSN1(mnemonic,size_suffix,dst)INSNCONC(mnemonic,size_suffix) dst #define INSN2(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst #define INSN2S(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst #define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##l) src,dst #define INSN2MOVXQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##q) src,dst #define INSN2MOVXLQ(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##q) src,dst #endif #define _ #ifdef _MSC_VER // MS assembler #define TEXT() _TEXT SEGMENT #else #define TEXT() .text #endif #ifdef _MSC_VER // MS assembler // There is no equivalent for "p2align 4,,7". This comes closest: #define P2ALIGN(log,max) ALIGN 8 #else #if defined __sun // Solaris #define P2ALIGN(log,max) .align 1<= 4.4) // or // gcc -S hello.c (GCC < 4.4) // The result is that all modern systems (at least Ubuntu >= 16.04, // Red Hat Enterprise Linux >= 5, Fedora >= 13, Alpine Linux >= 3.7, // FreeBSD >= 11, DragonFly BSD >= 6, NetBSD >= 7, OpenBSD >= 6) // use a read-only eh_frame section. #if 1 // all modern systems #define EH_FRAME_SECTION .eh_frame,"a",@progbits #else // only very old systems #define EH_FRAME_SECTION .eh_frame,"aw",@progbits #endif #endif #endif libffcall-2.5/common/asm-hppa64.h0000664000000000000000000000474713347755307013542 00000000000000// Assembly language support for hppa64 CPU. // Bruno Haible 2017-01-23, 2017-08-05 // Copyright (C) 2017-2018 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // IMPORT_DATA(symbol) // This expands to an import from the DATA segment, if needed. // TEXT1(), TEXT2() // These expand to two lines that switch to the TEXT section/segment. // GLOBL(symbol) // This expands to a declaration that the given symbol, defined // in this file, shall have global visibility. // DEF(symbol) // This expands to the declaration of a symbol or label. // L(label) // This expands to the name of a local label, having the name `label'. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNEND(name) // End the assembly language code for the C function 'name'. #if defined(__ELF__) /* Linux */ #define IMPORT_DATA(symbol) #define TEXT1() .text #define TEXT2() #define GLOBL(symbol) .globl symbol #define DEF(symbol) symbol: #define L(label) .L##label #define DECLARE_FUNCTION(name) .type name,%function #define FUNEND(name) .size name,.-name #else /* HP-UX */ #define IMPORT_DATA(symbol) .IMPORT symbol,DATA #if 1 #define TEXT1() .SPACE $TEXT$,SORT=8 #define TEXT2() .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY,SORT=24 #else #define TEXT1() .code #define TEXT2() #endif #define GLOBL(symbol) .EXPORT symbol,ENTRY,PRIV_LEV=3 #if 1 #define DEF(symbol) symbol #else #define DEF(symbol) .label symbol #endif #define L(label) L$##label #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif libffcall-2.5/common/asm-arm.h0000664000000000000000000000500214060640146013163 00000000000000// Assembly language support for arm CPU. // Bruno Haible 1999-05-29 // Copyright (C) 1999-2017 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name) // End the assembly language code for the C function 'name'. #ifdef ASM_UNDERSCORE #define C(entrypoint) _##entrypoint #define L(label) L##label #else #define C(entrypoint) entrypoint #define L(label) .L##label #endif // When assembly language code is compiled into a shared library, ELF linkers // need to know which symbols are functions. #if defined(__ELF__) || !defined(ASM_UNDERSCORE) #define DECLARE_FUNCTION(name) .type C(name),%function #define FUNEND(name) .size C(name),.-C(name) #else #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif #define FUNBEGIN(name) C(name): libffcall-2.5/common/asm-riscv.sh0000775000000000000000000000256214340441445013732 00000000000000#!/bin/sh # Translate the assembler syntax of RISC-V assembler programs # Usage: asm-riscv.sh < riscvlinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.section\([ ]\+\).*GNU-stack/d EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/noexecstack.h0000664000000000000000000000022213136760230014134 00000000000000#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/common/asm-hppa.sh0000775000000000000000000000376714340441454013544 00000000000000#!/bin/sh # Translate the assembler syntax of hppa assembler programs # Usage: asm-hppa.sh < hppalinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e "s,!,',g" # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove #APP/#NO_APP lines and gcc self-identification /^#APP$/d /^#NO_APP$/d /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Turn ' into !, to avoid trouble in preprocessing s,',!,g # ----------- Add some imports /\.LEVEL/{ s/$/\ IMPORT_MILLICODE($$dyncall)/ } # ----------- Section switching s/\.text/TEXT1()\ TEXT2()/ # ----------- Declaration of symbols and labels is different s/^\([A-Za-z0-9_.]\+\):$/DEF(\1)/ # ----------- Label syntax is different /\.LEVEL/!{ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ } # ----------- Introduce macro syntax for assembler pseudo-ops s/\.globl[ ]\([A-Za-z0-9_]\+\)/GLOBL(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/noexecstack-arm.h0000664000000000000000000000022213136760230014711 00000000000000#if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/common/asm-arm64.sh0000775000000000000000000000473714340441463013543 00000000000000#!/bin/sh # Translate the assembler syntax of arm64 assembler programs # Usage: asm-arm64.sh < linux-arm64-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$,#,g' # Copyright (C) 1999-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpscript3=sed$$tmp3 tmpremove='rm -f $tmpscript1 $tmpscript2 $tmpscript3' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Hide comments, to avoid trouble in preprocessing s,@,//,g # ----------- Turn # into $, to avoid trouble in preprocessing s,#,\$,g # ----------- Global symbols depends on ASM_UNDERSCORE s/^\([A-Za-z0-9_]\+\)/C(\1)/ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ s/\.global[ ]\([A-Za-z0-9_]*\)/.global C(\1)/ # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d /\.section\([ ]\+\).*GNU-stack/d s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\([A-Za-z0-9_]*\), *%function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ EOF cat > $tmpscript3 << \EOF # ----------- Introduce macro syntax for PIC addressing of functions s/^ adrp \([a-z0-9]*\), *\([A-Za-z0-9_]*\)/ adrp \1, PAGE(C(\2))/ s/[$]:lo12:\([A-Za-z0-9_]*\)/PAGEOFF(C(\1))/ s/:lo12:\([A-Za-z0-9_]*\)/PAGEOFF(C(\1))/ # ----------- Introduce macro syntax for PIC addressing of variables s/PAGE(C(\(vacall_function\)))/GOTPAGE(C(\1))/ s/ ldr \([a-z0-9]*\), \[\(.*\)PAGEOFF(C(\(vacall_function\)))\].*/ ldr \1, [\2GOTPAGEOFF(C(\3))]\n GOTINDIR(\1)/ EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 | \ sed -f $tmpscript3 eval "$tmpremove" libffcall-2.5/common/asm-hppa.h0000664000000000000000000000522113347755310013346 00000000000000// Assembly language support for hppa CPU. // Bruno Haible 2017-01-23 // Copyright (C) 2017-2018 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // IMPORT_MILLICODE(symbol) // This expands to an import from the MILLICODE segment, if needed. // IMPORT_DATA(symbol) // This expands to an import from the DATA segment, if needed. // TEXT1(), TEXT2() // These expand to two lines that switch to the TEXT section/segment. // GLOBL(symbol) // This expands to a declaration that the given symbol, defined // in this file, shall have global visibility. // DEF(symbol) // This expands to the declaration of a symbol or label. // L(label) // This expands to the name of a local label, having the name `label'. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNEND(name) // End the assembly language code for the C function 'name'. #if defined(__ELF__) /* Linux */ #define IMPORT_MILLICODE(symbol) #define IMPORT_DATA(symbol) #define TEXT1() .text #define TEXT2() #define GLOBL(symbol) .globl symbol #define DEF(symbol) symbol: #define L(label) .L##label #define DECLARE_FUNCTION(name) .type name,%function #define FUNEND(name) .size name,.-name #else /* HP-UX */ #define IMPORT_MILLICODE(symbol) .IMPORT symbol,MILLICODE #define IMPORT_DATA(symbol) .IMPORT symbol,DATA #if 1 #define TEXT1() .SPACE $TEXT$ #define TEXT2() .SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY #else #define TEXT1() .code #define TEXT2() #endif #define GLOBL(symbol) .EXPORT symbol,ENTRY,PRIV_LEV=3 #if 1 #define DEF(symbol) symbol #else #define DEF(symbol) .label symbol #endif #define L(label) L$##label #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif libffcall-2.5/common/asm-arm64.h0000664000000000000000000000702114061241502013332 00000000000000// Assembly language support for arm64 CPU. // Bruno Haible 1999-05-29 // Copyright (C) 1999-2021 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // GOTPAGE(variable) // This expands to a second argument for the 'adrp' instruction. // GOTPAGEOFF(variable) // This expands to an offset, to be used with GOTPAGE(variable). // GOTINDIR(register) // This expands to an indirect load instruction, on platforms which // use a "large" memory model. // PAGE(function) // This expands to a second argument for the 'adrp' instruction. // PAGEOFF(function) // This expands to an offset, to be used with PAGE(function). // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name) // End the assembly language code for the C function 'name'. #ifdef ASM_UNDERSCORE #define C(entrypoint) _##entrypoint #define L(label) L##label #else #define C(entrypoint) entrypoint #define L(label) .L##label #endif #if defined __APPLE__ && defined __MACH__ #define GOTPAGE(variable) variable@GOTPAGE #define GOTPAGEOFF(variable) variable@GOTPAGEOFF #define GOTINDIR(register) ldr register,[register] #define PAGE(function) function@PAGE #define PAGEOFF(function) function@PAGEOFF #else #define GOTPAGE(variable) variable #define GOTPAGEOFF(variable) $:lo12:variable #define GOTINDIR(register) #define PAGE(function) function #define PAGEOFF(function) $:lo12:function #endif // When assembly language code is compiled into a shared library, ELF linkers // need to know which symbols are functions. #if defined(__ELF__) || !(defined(ASM_UNDERSCORE) || (defined __APPLE__ && defined __MACH__)) #define DECLARE_FUNCTION(name) .type C(name),%function #define FUNEND(name) .size C(name),.-C(name) #else #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif #define FUNBEGIN(name) C(name): libffcall-2.5/common/asm-mips.h0000664000000000000000000000202313347755312013365 00000000000000// Assembly language support for mips CPU. // Bruno Haible 1999-05-29 // Copyright (C) 1999-2017 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // When assembly language code is compiled into a shared library, ELF linkers // need to know which symbols are functions. #if defined(__ELF__) || defined(__NetBSD__) #define DECLARE_FUNCTION(name) .type name,@function #else #define DECLARE_FUNCTION(name) #endif libffcall-2.5/common/asm-m68k.sh0000775000000000000000000000530414340441472013366 00000000000000#!/bin/sh # Translate the assembler syntax of m68k assembler programs # Usage: asm-m68k.sh < sunos-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 1999-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . syntax="$1" case "$syntax" in "") echo "missing syntax" 1>&2; exit 1;; mit | motorola) ;; *) echo "invalid syntax: $syntax" 1>&2; exit 1;; esac tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove #APP/#NO_APP lines /^#APP$/d /^#NO_APP$/d # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF if test $syntax = mit; then cat > $tmpscript2 << \EOF # ----------- Global symbols depends on ASM_UNDERSCORE s/^L\([A-Za-z0-9_]\+\)/L(\1)/ s/ L\([A-Za-z0-9_]\+\)/ L(\1)/ # ----------- Prefix register names with $, to be turned into % later s/,/, /g s/\([^A-Za-z0-9_]\)\([ad][0-7]\|sp\|fp[0-7]\|pc\)\([^A-Za-z0-9_]\)/\1$\2\3/g s/\([^A-Za-z0-9_]\)\([ad][0-7]\|sp\|fp[0-7]\|pc\)$/\1$\2/g s/, /,/g # ----------- Declare global symbols as functions (we have no variables) s/\.globl[ ]_\([A-Za-z0-9_]*\)$/.globl _\1\ DECLARE_FUNCTION(\1)/ # ----------- Global symbols depends on ASM_UNDERSCORE s/_\([A-Za-z0-9_]*\)/C(\1)/ s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ /FUNBEGIN(/{ h } ${ p s/.*// x s/FUNBEGIN/FUNEND/ } EOF fi if test $syntax = motorola; then cat > $tmpscript2 << \EOF # ----------- Global symbols depends on ASM_UNDERSCORE s/^\([A-Za-z0-9_]\+\)/C(\1)/ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ s/\.globl[ ]\([A-Za-z0-9_]*\)/.globl C(\1)/ # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ EOF fi sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-hppa64.sh0000775000000000000000000000365314340441501013701 00000000000000#!/bin/sh # Translate the assembler syntax of hppa64 assembler programs # Usage: asm-hppa64.sh < hppalinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e "s,!,',g" # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove #APP/#NO_APP lines and gcc self-identification /^#APP$/d /^#NO_APP$/d /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Turn ' into !, to avoid trouble in preprocessing s,',!,g # ----------- Section switching s/\.text/TEXT1()\ TEXT2()/ # ----------- Declaration of symbols and labels is different s/^\([A-Za-z0-9_.]\+\):$/DEF(\1)/ # ----------- Label syntax is different /\.LEVEL/!{ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ } # ----------- Introduce macro syntax for assembler pseudo-ops s/\.globl[ ]\([A-Za-z0-9_]\+\)/GLOBL(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/uniq-u.c0000664000000000000000000001441013347755315013056 00000000000000/* uniq -- remove duplicate lines from a sorted file Copyright (C) 1986-2016 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* Written by Richard Stallman and David MacKenzie. */ /* 2000-03-22 Trimmed down to the case of "uniq -u" by Bruno Haible. */ #include #include #include #include /* The name this program was run with. */ static char *program_name; static void xalloc_fail (void) { fprintf (stderr, "%s: virtual memory exhausted\n", program_name); exit (1); } /* Allocate N bytes of memory dynamically, with error checking. */ void * xmalloc (size_t n) { void *p; p = malloc (n); if (p == 0) xalloc_fail (); return p; } /* Change the size of an allocated block of memory P to N bytes, with error checking. If P is NULL, run xmalloc. */ void * xrealloc (void *p, size_t n) { p = realloc (p, n); if (p == 0) xalloc_fail (); return p; } /* A ‘struct linebuffer’ holds a line of text. */ struct linebuffer { size_t size; /* Allocated. */ size_t length; /* Used. */ char *buffer; }; /* Initialize linebuffer LINEBUFFER for use. */ static void initbuffer (struct linebuffer *linebuffer) { linebuffer->length = 0; linebuffer->size = 200; linebuffer->buffer = (char *) xmalloc (linebuffer->size); } /* Read an arbitrarily long line of text from STREAM into LINEBUFFER. Keep the newline; append a newline if it's the last line of a file that ends in a non-newline character. Do not null terminate. Return LINEBUFFER, except at end of file return 0. */ static struct linebuffer * readline (struct linebuffer *linebuffer, FILE *stream) { int c; char *buffer = linebuffer->buffer; char *p = linebuffer->buffer; char *end = buffer + linebuffer->size - 1; /* Sentinel. */ if (feof (stream) || ferror (stream)) return 0; do { c = getc (stream); if (c == EOF) { if (p == buffer) return 0; if (p[-1] == '\n') break; c = '\n'; } if (p == end) { linebuffer->size *= 2; buffer = (char *) xrealloc (buffer, linebuffer->size); p = p - linebuffer->buffer + buffer; linebuffer->buffer = buffer; end = buffer + linebuffer->size - 1; } *p++ = c; } while (c != '\n'); linebuffer->length = p - buffer; return linebuffer; } /* Free linebuffer LINEBUFFER's data. */ static void freebuffer (struct linebuffer *linebuffer) { free (linebuffer->buffer); } /* Undefine, to avoid warning about redefinition on some systems. */ #undef min #define min(x, y) ((x) < (y) ? (x) : (y)) /* Return zero if two strings OLD and NEW match, nonzero if not. OLD and NEW point not to the beginnings of the lines but rather to the beginnings of the fields to compare. OLDLEN and NEWLEN are their lengths. */ static int different (const char *old, const char *new, size_t oldlen, size_t newlen) { int order; order = memcmp (old, new, min (oldlen, newlen)); if (order == 0) return oldlen - newlen; return order; } /* Output the line in linebuffer LINE to stream STREAM provided that the switches say it should be output. If requested, print the number of times it occurred, as well; LINECOUNT + 1 is the number of times that the line occurred. */ static void writeline (const struct linebuffer *line, FILE *stream, int linecount) { if (linecount == 0) fwrite (line->buffer, 1, line->length, stream); } /* Process input file INFILE with output to OUTFILE. If either is "-", use the standard I/O stream for it instead. */ static void check_file (const char *infile, const char *outfile) { FILE *istream; FILE *ostream; struct linebuffer lb1, lb2; struct linebuffer *thisline, *prevline, *exch; char *prevfield, *thisfield; size_t prevlen, thislen; int match_count = 0; if (!strcmp (infile, "-")) istream = stdin; else istream = fopen (infile, "r"); if (istream == NULL) { fprintf (stderr, "%s: error opening %s\n", program_name, infile); exit (1); } if (!strcmp (outfile, "-")) ostream = stdout; else ostream = fopen (outfile, "w"); if (ostream == NULL) { fprintf (stderr, "%s: error opening %s\n", program_name, outfile); exit (1); } thisline = &lb1; prevline = &lb2; initbuffer (thisline); initbuffer (prevline); if (readline (prevline, istream) == 0) goto closefiles; prevfield = prevline->buffer; prevlen = prevline->length; while (!feof (istream)) { int match; if (readline (thisline, istream) == 0) break; thisfield = thisline->buffer; thislen = thisline->length; match = !different (thisfield, prevfield, thislen, prevlen); if (match) ++match_count; if (!match) { writeline (prevline, ostream, match_count); exch = prevline; prevline = thisline; thisline = exch; prevfield = thisfield; prevlen = thislen; if (!match) match_count = 0; } } writeline (prevline, ostream, match_count); closefiles: if (ferror (istream) || fclose (istream) == EOF) { fprintf (stderr, "%s: error reading %s\n", program_name, infile); exit (1); } if (ferror (ostream) || fclose (ostream) == EOF) { fprintf (stderr, "%s: error writing %s\n", program_name, outfile); exit (1); } freebuffer (&lb1); freebuffer (&lb2); } int main (int argc, char **argv) { const char *infile = "-"; const char *outfile = "-"; int optind = 1; program_name = argv[0]; if (optind < argc) infile = argv[optind++]; if (optind < argc) outfile = argv[optind++]; if (optind < argc) { fprintf (stderr, "%s: too many arguments\n", program_name); exit (1); } check_file (infile, outfile); exit (0); } libffcall-2.5/common/asm-s390.sh0000775000000000000000000000256414340441510013275 00000000000000#!/bin/sh # Translate the assembler syntax of s390/s390x assembler programs # Usage: asm-s390.sh < s390linux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.section\([ ]\+\).*GNU-stack/d EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/structcpy.c0000664000000000000000000000226413347755315013704 00000000000000/* copy structs */ /* * Copyright 1995-2005 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment) { if (alignment % sizeof(long)) { char* d = (char*)dest; const char* s = (const char*)src; do { *d++ = *s++; } while (--size > 0); } else /* If the alignment is a multiple of sizeof(long), the size is as well. */ { long* d = (long*)dest; const long* s = (const long*)src; do { *d++ = *s++; } while ((size -= sizeof(long)) > 0); } } libffcall-2.5/common/asm-i386.sh0000775000000000000000000001345114340441520013266 00000000000000#!/bin/sh # Translate the assembler syntax of i386 assembler programs # Usage: asm-i386.sh [-no-C] < gas-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$,,' -e 's/##//g' # Warning! All comments are stripped. # Copyright (C) 1997-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript01=sed$$tmp01 tmpscript02=sed$$tmp02 tmpscript03=sed$$tmp03 tmpscript04=sed$$tmp04 tmpscript05=sed$$tmp05 tmpscript06=sed$$tmp06 tmpscript07=sed$$tmp07 tmpscript08=sed$$tmp08 tmpscript09=sed$$tmp09 tmpscript10=sed$$tmp10 tmpremove='rm -f $tmpscript01 $tmpscript02 $tmpscript03 $tmpscript04 $tmpscript05 $tmpscript06 $tmpscript07 $tmpscript08 $tmpscript09 $tmpscript10' trap "$tmpremove" HUP INT TERM cat > $tmpscript01 << \EOF # ----------- Strip comments s,# .*,, s,[ ][ ]*$,, EOF cat > $tmpscript02 << \EOF # ----------- Remove #APP/#NO_APP lines and gcc self-identification, add a blank line at the end /^#APP$/d /^#NO_APP$/d /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript03 << \EOF # ----------- Global symbols depends on ASM_UNDERSCORE s/^\([A-Za-z0-9_]\+\)/C(\1)/ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1,\2)/ # ----------- Introduce conditionals for function references in PIC code # Note: This is hairy. It assumes that the register clobbered with # the 'addl $_GLOBAL_OFFSET_TABLE_ ...' instruction is the same as # the register that the @GOTOFF instructions reference. /^ addl \$_GLOBAL_OFFSET_TABLE_,/{ x s/.*/.LgotGOT/ x s/^ addl \$_GLOBAL_OFFSET_TABLE_, *\(%.*\)/#ifdef __ELF__\ addl $_GLOBAL_OFFSET_TABLE_,\1\ #else\ .LgotGOT:\ #endif/ } /^ addl \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\],/{ h s/^ addl \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\],.*/\1/ x s/^ addl \$_GLOBAL_OFFSET_TABLE_+\[\.-\(.*\)\], *\(%.*\)/#ifdef __ELF__\ addl \$_GLOBAL_OFFSET_TABLE_+[.-\1],\2\ #endif/ } /@GOTOFF(/{ G s/^ leal \([A-Za-z0-9_]\+\)@GOTOFF\(.*\)\ \(.*\)/#ifdef __ELF__\ leal \1@GOTOFF\2\ #else\ leal C(\1)-\3\2\ #endif/ } EOF cat > $tmpscript04 << \EOF # ----------- Introduce macro syntax for operands s/\([-+0-9A-Z_]\+\)[(]%\(e..\)[)]/MEM_DISP(\2,\1)/g s/[(]%\(e..\)[)]/MEM(\1)/g s/\([-+0-9A-Z_]\+\)[(],%\(e..\),\([0-9]*\)[)]/MEM_DISP_SHINDEX0(\1,\2,\3)/g s/\([-+0-9A-Z_]\+\)[(]%\(e..\),%\(e..\),\([0-9]*\)[)]/MEM_DISP_SHINDEX(\2,\1,\3,\4)/g s/[(]%\(e..\),%\(e..\),\([0-9]*\)[)]/MEM_SHINDEX(\1,\2,\3)/g s/[(]%\(e..\),%\(e..\)[)]/MEM_INDEX(\1,\2)/g EOF cat > $tmpscript05 << \EOF # ----------- Introduce macro syntax for instructions s/\(push\|pop\|mul\|div\|not\|neg\|inc\|dec\|fld\|fstp\)\(.\)\([ ]\+\)\(.*\)$/INSN1(\1,\2 ,\4)/ s/\(call\|jmp\|jc\|jnc\|je\|jne\|jz\|jnz\|ja\|jae\|jb\|jbe\|jl\|jge\|js\|jns\)\([ ]\+\)\(.*\)$/INSN1(\1,_ ,\3)/ s/\(movs\|movz\)\(.\)l\([ ]\+\)\(.*\)$/INSN2MOVXL(\1,\2,\4)/ s/\(mov\|add\|sub\|adc\|sbb\|xor\|test\|cmp\|rcl\|rcr\|and\|or\|sar\|shr\|shl\|lea\)\(.\)\([ ]\+\)\(.*\)$/INSN2(\1,\2 ,\4)/ s/\(shld\|shrd\)\(.\)\([ ]\+\)%cl,[ ]*\(.*\)$/INSN2SHCL(\1,\2 ,\4)/ s/rep[ ];/REP/ s/repz[ ];/REPZ/ EOF cat > $tmpscript06 << \EOF # ----------- Add size prefixes to memory references s/\([(]f[^(,]*,s.*\), *MEM/\1,X4 MEM/g s/\([(]f[^(,]*,l.*\), *MEM/\1,X8 MEM/g s/\([(][^(,]*,b.*\), *MEM/\1,X1 MEM/g s/\([(][^(,]*,w.*\), *MEM/\1,X2 MEM/g s/\([(][^(,]*,l.*\), *MEM/\1,X4 MEM/g EOF cat > $tmpscript07 << \EOF # ----------- Introduce macro syntax for register names s/%\(e..\)/R(\1)/g s/%\(..\)/R(\1)/g s/\$\([-0-9]*\)/NUM(\1)/g EOF cat > $tmpscript08 << \EOF # ----------- Treat table jumps (hairy) # (Needed because the MSVC inline assembler does not have pseudo-ops. # Note that we transform a table of absolute addresses with 4 bytes # per entry into a table of absolute addresses with 8 bytes per entry.) s/^ \.long \(.*\)$/#ifdef _MSC_VER\ nop\ nop\ push \1\ #else\ .long \1\ #endif/ s/^ \(INSN1[(]jmp,_[^,]*,\)\*MEM_DISP_SHINDEX0[(]\([^,)]*\),\([^,)]*\),4[)][)]$/#ifdef _MSC_VER\ INSN2(lea,l ,MEM_DISP_SHINDEX0(\2+8,\3,8),R(\3))\ INSN2(mov,l ,X4 MEM_DISP(\3,-4),R(\3))\ INSN1(jmp,_ ,INDIR(R(\3)))\ #else\ \1INDIR(MEM_DISP_SHINDEX0(\2,\3,4)))\ #endif/ EOF cat > $tmpscript09 << \EOF # ----------- Treat indirect calls s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(R\)[(][^)]*[)]\)[)]$/\1INDIR(\3))/ s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(MEM\|MEM_DISP\|C\)[(][^)]*[)]\)[)]$/\1INDIR(X4 \3))/ EOF cat > $tmpscript10 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d s/\.text/TEXT()/ s/^\([^#]*\)\.align \(.*\)/\1ALIGN(\2)/ s/\.p2align \([^,]*\),,\(.*\)/P2ALIGN(\1,\2)/ s/\.globl\( \+\)\(.*\)$/GLOBL(C(\2))/ # ----------- Declare global symbols as functions (we have no variables) s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ EOF sed -f $tmpscript01 | \ sed -f $tmpscript02 | \ (cat - ; echo) | \ (if [ $# = 1 -a "x$1" = "x-no-C" ] ; then cat - ; else sed -f $tmpscript03 ; fi) | \ sed -f $tmpscript04 | \ sed -f $tmpscript05 | \ sed -f $tmpscript06 | \ sed -f $tmpscript07 | \ sed -f $tmpscript08 | \ sed -f $tmpscript09 | \ sed -f $tmpscript10 eval "$tmpremove" libffcall-2.5/common/asm-alpha.sh0000775000000000000000000000256114340441527013671 00000000000000#!/bin/sh # Translate the assembler syntax of alpha assembler programs # Usage: asm-alpha.sh < alphalinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.section\([ ]\+\).*GNU-stack/d EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-mips.sh0000775000000000000000000000315614340441535013554 00000000000000#!/bin/sh # Translate the assembler syntax of mips assembler programs # Usage: asm-mips.sh < irix-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 1999-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Remove comments, they would cause trouble in preprocessing s,#.*$,, # ----------- Remove assembler pseudo-ops that the IRIX assembler does not understand /\.section/d /\.previous/d /\.abicalls/d /\.nan/d /\.module/d # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\+\([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-loongarch.sh0000775000000000000000000000257514340441334014561 00000000000000#!/bin/sh # Translate the assembler syntax of LoongArch assembler programs # Usage: asm-loongarch.sh < loongarchlinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' # Copyright (C) 2017-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.section\([ ]\+\).*GNU-stack/d EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-sparc.sh0000775000000000000000000000361614340441546013717 00000000000000#!/bin/sh # Translate the assembler syntax of sparc64 assembler programs # Usage: asm-sparc.sh < sparclinux-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//.*$,,' -e 's,\$,#,g' -e 's,# ,#,g' # Copyright (C) 1999-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Global symbols depends on ASM_UNDERSCORE s/^\([A-Za-z0-9_]\+\)/C(\1)/ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ s/\.global[ ]\([A-Za-z0-9_]*\)$/.global C(\1)/ # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d /\.section\([ ]\+\).*GNU-stack/d s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\([A-Za-z0-9_]*\), *#function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ # ----------- Turn # into $, to avoid trouble in preprocessing s,#,\$,g EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-x86_64.sh0000775000000000000000000001333714340441555013546 00000000000000#!/bin/sh # Translate the assembler syntax of x86_64 assembler programs # Usage: asm-x86_64.sh < linux-x86_64-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$,,' -e 's/##//g' # Copyright (C) 1997-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpscript3=sed$$tmp3 tmpscript4=sed$$tmp4 tmpscript5=sed$$tmp5 tmpscript6=sed$$tmp6 tmpscript7=sed$$tmp7 tmpscript8=sed$$tmp8 tmpscript9=sed$$tmp9 tmpremove='rm -f $tmpscript1 $tmpscript2 $tmpscript3 $tmpscript4 $tmpscript5 $tmpscript6 $tmpscript7 $tmpscript8 $tmpscript9' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove #APP/#NO_APP lines and gcc self-identification /^#APP$/d /^#NO_APP$/d /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Global symbols depends on ASM_UNDERSCORE s/^\([A-Za-z0-9_]\+\)/C(\1)/ s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ s/\([A-Za-z0-9_]\+\)(%rip)/C(\1)(%rip)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type \([A-Za-z0-9_]*\), *@function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size \([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1,\2)/ # ----------- Section of frame info for exception handlers s/\.section \.eh_frame,"a[w]*",@progbits/.section EH_FRAME_SECTION/ # ----------- Disable the frame info for exception handlers on Solaris # (as the Solaris linker expects a different format, see # https://illumos.org/issues/3210) # Likewise this section does not assemble on Mac OS X 10.5 and on Windows. /EH_FRAME_SECTION/{ s/^/#if !(defined __sun || (defined __APPLE__ \&\& defined __MACH__) || (defined _WIN32 || defined __CYGWIN__))\ / } ${ s/$/\ #endif/ } EOF cat > $tmpscript3 << \EOF # ----------- Introduce macro syntax for operands s/\([-+0-9A-Z_]\+\)[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM_DISP(\2,\1)/g s/\(C[(][A-Za-z0-9_]\+[)]\)[(]%rip[)]/MEM_PCRELATIVE(\1)/g s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM(\1)/g s/\([-+0-9A-Z_]\+\)[(],%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_DISP_SHINDEX0(\1,\2,\3)/g s/\([-+0-9A-Z_]\+\)[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_DISP_SHINDEX(\2,\1,\3,\4)/g s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),\([0-9]*\)[)]/MEM_SHINDEX(\1,\2,\3)/g s/[(]%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\),%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)[)]/MEM_INDEX(\1,\2)/g EOF cat > $tmpscript4 << \EOF # ----------- Add size suffix to 'mov' instructions s/mov\([ ]\+.*, *%\(e[abcd]x\|e[sd]i\|e[bs]p\|r[89]d\|r1[012345]d\)\)$/movl\1/ # ----------- Introduce macro syntax for instructions s/\(push\|pop\|mul\|div\|not\|neg\|inc\|dec\)\(.\)\([ ]\+\)\(.*\)$/INSN1(\1,\2 ,\4)/ s/\(call\|jmp\|jc\|jnc\|je\|jne\|jz\|jnz\|ja\|jae\|jb\|jbe\|jl\|jle\|jg\|jge\|js\|jns\)\([ ]\+\)\(.*\)$/INSN1(\1,_ ,\3)/ s/\(movs\|movz\)\(.\)l\([ ]\+\)\(.*\)$/INSN2MOVXL(\1,\2,\4)/ s/\(movs\|movz\)\([bw]\)q\([ ]\+\)\(.*\)$/INSN2MOVXQ(\1,\2,\4)/ s/\(movs\|movz\)\(l\)q\([ ]\+\)\(.*\)$/INSN2MOVXLQ(\1,\2,\4)/ s/\(mov\|movlp\|add\|sub\|adc\|sbb\|xor\|xorp\|test\|cmp\|rcl\|rcr\|and\|or\|sar\|sal\|shr\|shl\|lea\)\(.\)\([ ]\+\)\(.*\)$/INSN2(\1,\2 ,\4)/ s/\(movs\)\([sd]\)\([ ]\+\)\(.*\)$/INSN2S(\1,\2 ,\4)/ EOF cat > $tmpscript5 << \EOF # ----------- Rewrite lea operand s/INSN2[(]lea,\([^,]*\), *MEM_PCRELATIVE[(]/INSN2(lea,\1,ADDR_PCRELATIVE(/g EOF cat > $tmpscript6 << \EOF # ----------- Add size prefixes to memory references s/\([(][^(,]*,b.*\), *MEM/\1,X1 MEM/g s/\([(][^(,]*,w.*\), *MEM/\1,X2 MEM/g s/\([(][^(,]*,[ls].*\), *MEM/\1,X4 MEM/g s/\([(][^(,]*,[qd].*\), *MEM/\1,X8 MEM/g EOF cat > $tmpscript7 << \EOF # ----------- Introduce macro syntax for register names # Cf. https://stackoverflow.com/questions/1753602/ s/%\([abcd]l\|[sd]il\|[bs]pl\|r[89]b\|r1[012345]b\)/R(\1)/g s/%\([abcd]x\|[sd]i\|[bs]p\|r[89]w\|r1[012345]w\)/R(\1)/g s/%\(e[abcd]x\|e[sd]i\|e[bs]p\|r[89]d\|r1[012345]d\)/R(\1)/g s/%\(r[abcd]x\|r[sd]i\|r[bs]p\|r[89]\|r1[012345]\)/R(\1)/g s/%\(xmm[0-9]\+\)/R(\1)/g s/\$\([-0-9]*\)/NUM(\1)/g EOF cat > $tmpscript8 << \EOF # ----------- Treat indirect calls s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(R\)[(][^)]*[)]\)[)]$/\1INDIR(\3))/ s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(\(MEM\|MEM_DISP\|C\)[(][^)]*[)]\)[)]$/\1INDIR(X8 \3))/ s/\(INSN1[(]\(call\|jmp\),_[^,]*,\)\*\(MEM_PCRELATIVE[(].*[)]\)[)]$/\1INDIR(X8 \3))/ EOF cat > $tmpscript9 << \EOF # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d s/\.text/TEXT()/ s/\.p2align \([^,]*\),,\(.*\)/P2ALIGN(\1,\2)/ s/\.p2align 3$/P2ALIGN(3,7)/ s/\.globl\([ ]\+\)\(.*\)$/GLOBL(C(\2))/ /\.section\([ ]\+\).*GNU-stack/d # ----------- Declare global symbols as functions (we have no variables) s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 | \ sed -f $tmpscript3 | \ sed -f $tmpscript4 | \ sed -f $tmpscript5 | \ sed -f $tmpscript6 | \ sed -f $tmpscript7 | \ sed -f $tmpscript8 | \ sed -f $tmpscript9 eval "$tmpremove" libffcall-2.5/common/asm-sparc.h0000664000000000000000000000566413347755313013544 00000000000000// Assembly language support for sparc CPU. // Bruno Haible 1999-05-29 // Copyright (C) 1999-2017 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // In order not to have to maintain several copies of the assembly language // code, we use some macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name) // End the assembly language code for the C function 'name'. #ifdef ASM_UNDERSCORE // SunOS4, Linux/a.out #define C(entrypoint) _##entrypoint #define L(label) L##label #else // Solaris, Linux/ELF #define C(entrypoint) entrypoint #define L(label) .L##label #endif // When assembly language code is compiled into a shared library, ELF linkers // need to know which symbols are functions. #if defined(__NetBSD__) || defined(__OpenBSD__) #define DECLARE_FUNCTION(name) .type C(name),@function #define FUNEND(name) .size C(name),.-C(name) #elif defined(__SVR4) || defined(__ELF__) // Solaris, Linux/ELF // Some preprocessors keep the backslash in place, some don't. // Some complain about the # being not in front of an ANSI C macro. // Therefore we use a dollar, which will be sed-converted to # later. #define DECLARE_FUNCTION(name) .type C(name),$function #define FUNEND(name) .size C(name),.-C(name) #else // SunOS4, Linux/a.out #define DECLARE_FUNCTION(name) #define FUNEND(name) #endif #define FUNBEGIN(name) C(name): libffcall-2.5/common/asm-arm.sh0000775000000000000000000000417314340441564013365 00000000000000#!/bin/sh # Translate the assembler syntax of arm assembler programs # Usage: asm-arm.sh < riscix-asm-file > portable-asm-file # The portable-asm-file has to be # 1. preprocessed, # 2. grep -v '^ *#line' | grep -v '^#' # 3. sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$,#,g' # Copyright (C) 1999-2022 Bruno Haible # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . tmpscript1=sed$$tmp1 tmpscript2=sed$$tmp2 tmpremove='rm -f $tmpscript1 $tmpscript2' trap "$tmpremove" HUP INT TERM cat > $tmpscript1 << \EOF # ----------- Remove gcc self-identification /gcc2_compiled/d /gnu_compiled_c/d /\.ident/d EOF cat > $tmpscript2 << \EOF # ----------- Hide comments, to avoid trouble in preprocessing s,@,//,g # ----------- Turn # into $, to avoid trouble in preprocessing s,#,\$,g # ----------- Global symbols depends on ASM_UNDERSCORE /[ ]\.req[ ]/!{ s/^\([A-Za-z0-9_]\+\)/C(\1)/ } s/\.L\([A-Za-z0-9_]\+\)/L(\1)/ s/\.global[ ]\([A-Za-z0-9_]*\)/.global C(\1)/ # ----------- Eliminate assembler pseudo-ops that allowed old syntax for inline # asms but that are not understood by the FreeBSD assembler /\.syntax divided/d # ----------- Introduce macro syntax for assembler pseudo-ops /\.file\([ ]\+\)/d /\.section\([ ]\+\).*GNU-stack/d s/^C(\([A-Za-z0-9_]*\)):/FUNBEGIN(\1)/ # ----------- Massage the beginning of functions /\.type/{ s/\.type[ ]\([A-Za-z0-9_]*\), *function/DECLARE_FUNCTION(\1)/ } # ----------- Massage the end of functions s/\.size[ ]\([A-Za-z0-9_]*\),\(.*\)/FUNEND(\1)/ EOF sed -f $tmpscript1 | \ sed -f $tmpscript2 eval "$tmpremove" libffcall-2.5/common/asm-i386.h0000664000000000000000000002735713347755310013125 00000000000000// Assembly language support for i386 CPU. // Bruno Haible 1997-06-21 // Copyright (C) 1997-2018 Bruno Haible // // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // An assembly language file for the i386/i486/i586/i686/786 CPUs: // On Unix, it is preprocessed and then assembled. NB: This file requires // an ANSI C or C++ preprocessor which understands C++ comments. // On Windows, with MSVC, it is preprocessed and then compiled with // optimization. (The MSVC development environment does not have a separate // assembler, we must use the C compiler's inline asm extension. Compiling // without optimization pushes the registers %ebx,%esi,%edi onto the stack // at function entry and pops them at function exit, which is not what we // want because it affects the %esp offsets of the function arguments.) // The assembly language file should // 1. include a configuration file which defines ASM_UNDERSCORE if appropriate. // #ifndef _MSC_VER // #include "config.h" // #endif // 2. include this file. // #include "asm-i386.h" // 3. define all assembly language code. // The three different assembler syntaxes for this CPU are a MAJOR annoyance. // In order not to have to maintain several copies of the assembly language // code, we use lots of macros which expand into the correct syntax. // These macros are: // C(name) // This expands to the name of the C variable or function `name'. // On Unix BSD systems, this prepends an underscore. // L(label) // This expands to the name of a local label, having the name `label'. // On Unix ELF systems, where there is no underscore, names beginning // with an alphabetic character are automatically exported, so this // prepends a dot. Note that when defining a label, the `:' must // be inside the parentheses, not outside, because otherwise some // ANSI C preprocessor inserts a space between the label and the `:', // and some assemblers don't like this. // R(reg) // This expands to a reference to register `reg'. On Unix, this // prepends a % charater. // NUM(value) // This expands to an immediate value. On Unix, this prepends a $ // character. // ADDR(variable) // This expands to an immediate value, the address of some variable // or function. On Unix, this prepends a $ character. With MSVC, // this prepends the keyword "OFFSET". // About operand sizes: On Unix, a suffix to the instruction specifies the // size of the operands (for example "movb", "movw", "movl"). With // MSVC, there is no such suffix. Instead, the assembler infers the // operand size from the names of the registers ("al" vs. "ax" vs. // "eax"). This works well in most cases, but in instructions like // "mul [esi]" the assembler guesses the operand size: "byte" by // default. So it is better to explicitly specify the operand size // of memory operands (prefix X1, X2, X4, X8). // (Side note about Unix assemblers: Some Unix assemblers allow you // to write "testb %eax,%eax" but silently treat this as // "testb %al,%al".) // X1 // This prefixes a memory reference of 1 byte. // X2 // This prefixes a memory reference of 2 bytes. // X4 // This prefixes a memory reference of 4 bytes. // X8 // This prefixes a memory reference of 8 bytes. // MEM(base) // This expands to a memory reference at address `base'. // MEM_DISP(base,displacement) // This expands to a memory reference at address `base+displacement'. // MEM_INDEX(base,index) // This expands to a memory reference at address `base+index'. // MEM_SHINDEX(base,index,size) // This expands to a memory reference at address // `base+index*size', where `size' is 1, 2, 4, or 8. // MEM_DISP_SHINDEX0(displacement,index,size) // This expands to a memory reference at address // `displacement+index*size', where `size' is 1, 2, 4, or 8. // MEM_DISP_SHINDEX(base,displacement,index,size) // This expands to a memory reference at address // `base+displacement+index*size', where `size' is 1, 2, 4, or 8. // INDIR(value) // This expands to an implicit indirection. On Unix, this prepends // a * character. // INSN1(mnemonic,size_suffix,dst) // This expands to an instruction with one operand. // INSN2(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands. In our notation, // `src' comes first and `dst' second, but they are reversed when // expanding to Intel syntax. // INSN2MOVXL(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands, of type // movsbl/movzbl, which in some syntaxes requires a second suffix. // INSN2SHCL(mnemonic,size_suffix,src,dst) // This expands to an instruction with two operands, of type // shrd/shld, which in some syntaxes requires an additional operand // %cl. // REP, REPZ // This expands to a prefix for string instructions. // _ // For instructions which don't have a size suffix, like jump // instructions. Expands to nothing. Needed for MSVC, which has // problems with empty macro arguments. // TEXT() // Switch to the code section. // ALIGN(log) // Align to 2^log bytes. // P2ALIGN(log,max) // Align to 2^log bytes, but insert at most max bytes. // GLOBL(name) // Declare `name' to be a global symbol. // DECLARE_FUNCTION(name) // Declare `name' to be a global function. When assembly language // code is compiled into a shared library, ELF linkers need to know // which symbols are functions. // FUNBEGIN(name) // Start the assembly language code for the C function `name'. // FUNEND(name,size_expression) // End the assembly language code for the C function 'name'. // Define the C(name) and L(label) macros. #ifdef _MSC_VER #define C(entrypoint) entrypoint #define L(label) L##label #else #ifdef ASM_UNDERSCORE #define C(entrypoint) _##entrypoint #define L(label) L##label #else #define C(entrypoint) entrypoint #define L(label) .L##label #endif #endif // Define one of these. // BSD_SYNTAX for GNU assembler version 2. // ELF_SYNTAX for SVR4 and Solaris assemblers. // INTEL_SYNTAX for MS assembler. // Note: INTEL_SYNTAX is not the same syntax as produced by "gcc masm=intel" // as there are syntactic differences between that syntax and the one accepted // by the MS assembler (for R, MEM_DISP, P2ALIGN, FUNBEGIN, FUNEND etc.). #ifdef _MSC_VER #define INTEL_SYNTAX #else // On Unix, it happens that the ELF systems (ASM_UNDERSCORE not defined) use // the ELF syntax, while the BSD systems (ASM_UNDERSCORE defined) use the // BSD syntax. Neat to know, this saves us from enumerating all the systems. #ifdef ASM_UNDERSCORE #define BSD_SYNTAX #else #define ELF_SYNTAX #endif #endif #if defined (BSD_SYNTAX) || defined (ELF_SYNTAX) #define R(r) %r #define NUM(n) $ n #define ADDR(a) $##a #define X1 #define X2 #define X4 #define X8 #define MEM(base)(R(base)) #define MEM_DISP(base,displacement)displacement(R(base)) #define MEM_INDEX(base,index)(R(base),R(index)) #define MEM_SHINDEX(base,index,size)(R(base),R(index),size) #define MEM_DISP_SHINDEX0(displacement,index,size)displacement(,R(index),size) #define MEM_DISP_SHINDEX(base,displacement,index,size)displacement(R(base),R(index),size) #define INDIR(value)*value #define INSNCONC(mnemonic,size_suffix)mnemonic##size_suffix #define INSN1(mnemonic,size_suffix,dst)INSNCONC(mnemonic,size_suffix) dst #define INSN2(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst #define INSN2MOVXL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix##l) src,dst #if defined(__SVR4) /* Solaris */ #define INSN2SHCL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) src,dst #else #define INSN2SHCL(mnemonic,size_suffix,src,dst)INSNCONC(mnemonic,size_suffix) R(cl),src,dst #endif #if defined(BSD_SYNTAX) || defined(COHERENT) #define REPZ repe ; #else #define REPZ repz ; #endif #define REP rep ; #if defined(BSD_SYNTAX) && !(defined(__CYGWIN__) || defined(__MINGW32__)) #define ALIGN(log) .align log,0x90 #endif #if defined(ELF_SYNTAX) || defined(__CYGWIN__) || defined(__MINGW32__) #define ALIGN(log) .align 1< * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Replacement for a subset of . We cannot use gnulib's portable replacement, because when cross-compiling the various avcall-$(CPU).c and vacall-$(CPU).c files, gnulib-generated files are not available. And the cross-compilers of GCC version < 4.5 don't provide . */ /* Define integer types that are as large as a pointer, */ #if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__) /* An LLP64 platform. */ typedef long long ff_intptr_t; typedef unsigned long long ff_uintptr_t; #else /* An ILP32 or LP64 platform. */ typedef long ff_intptr_t; typedef unsigned long ff_uintptr_t; #endif #define intptr_t ff_intptr_t #define uintptr_t ff_uintptr_t /* Verify at compile time that sizeof([u]intptr_t) == sizeof(void*). */ typedef int intptr_verify[2*(sizeof(intptr_t) == sizeof(void*))-1]; typedef int uintptr_verify[2*(sizeof(uintptr_t) == sizeof(void*))-1]; libffcall-2.5/avcall/0000775000000000000000000000000014665334232011521 500000000000000libffcall-2.5/avcall/avcall-compat.c0000664000000000000000000000155714662613003014331 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include /* A dummy symbol, so that GNU clisp's autoconfiguration recognizes this library. */ void __builtin_avcall (void) { abort(); } libffcall-2.5/avcall/avcall-loongarch64-linux.s0000664000000000000000000001407714662622067016364 00000000000000 .file "avcall-loongarch64.c" .text .align 2 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-48 .cfi_def_cfa_offset 48 st.d $r22,$r3,32 st.d $r23,$r3,24 st.d $r24,$r3,16 st.d $r25,$r3,8 stptr.d $r26,$r3,0 st.d $r1,$r3,40 .cfi_offset 22, -16 .cfi_offset 23, -24 .cfi_offset 24, -32 .cfi_offset 25, -40 .cfi_offset 26, -48 .cfi_offset 1, -8 addi.d $r22,$r3,48 .cfi_def_cfa 22, 0 ld.d $r24,$r4,48 ld.d $r12,$r4,40 addi.w $r13,$r0,8 # 0x8 ldptr.w $r26,$r4,64 sub.d $r12,$r12,$r24 srai.d $r12,$r12,3 slli.w $r25,$r12,0 or $r23,$r4,$r0 addi.d $r3,$r3,-2048 ble $r25,$r13,.L72 addi.w $r6,$r12,-9 or $r14,$r3,$r0 bstrpick.d $r6,$r6,31,0 alsl.d $r6,$r6,$r0,3 addi.d $r6,$r6,8 addi.d $r5,$r24,64 or $r4,$r14,$r0 bl %plt(memcpy) ldptr.d $r4,$r24,0 .L5: addi.w $r12,$r0,2 # 0x2 ld.d $r5,$r24,8 beq $r25,$r12,.L6 addi.w $r12,$r0,3 # 0x3 ld.d $r6,$r24,16 beq $r25,$r12,.L6 addi.w $r12,$r0,4 # 0x4 ld.d $r7,$r24,24 beq $r25,$r12,.L6 addi.w $r12,$r0,5 # 0x5 ld.d $r8,$r24,32 beq $r25,$r12,.L6 addi.w $r12,$r0,6 # 0x6 ld.d $r9,$r24,40 beq $r25,$r12,.L6 addi.w $r12,$r0,7 # 0x7 ld.d $r10,$r24,48 beq $r25,$r12,.L6 ld.d $r11,$r24,56 .L6: beqz $r26,.L8 ldptr.w $r12,$r23,72 andi $r13,$r12,1 beqz $r13,.L9 fld.d $f0,$r23,112 .L10: addi.w $r13,$r0,1 # 0x1 beq $r26,$r13,.L8 andi $r13,$r12,2 bnez $r13,.L73 ldptr.w $r13,$r23,68 andi $r13,$r13,2 beqz $r13,.L13 fld.s $f1,$r23,80 .L13: addi.w $r13,$r0,2 # 0x2 beq $r26,$r13,.L8 andi $r13,$r12,4 beqz $r13,.L14 fld.d $f2,$r23,128 .L15: addi.w $r13,$r0,3 # 0x3 beq $r26,$r13,.L8 andi $r13,$r12,8 beqz $r13,.L16 fld.d $f3,$r23,136 .L17: addi.w $r13,$r0,4 # 0x4 beq $r26,$r13,.L8 andi $r13,$r12,16 bnez $r13,.L74 ldptr.w $r13,$r23,68 andi $r13,$r13,16 beqz $r13,.L19 fld.s $f4,$r23,92 .L19: addi.w $r13,$r0,5 # 0x5 beq $r26,$r13,.L8 andi $r13,$r12,32 beqz $r13,.L20 fld.d $f5,$r23,152 .L21: addi.w $r13,$r0,6 # 0x6 beq $r26,$r13,.L8 andi $r13,$r12,64 beqz $r13,.L22 fld.d $f6,$r23,160 .L23: addi.w $r13,$r0,7 # 0x7 beq $r26,$r13,.L8 andi $r12,$r12,128 beqz $r12,.L24 fld.d $f7,$r23,168 .L8: ldptr.w $r12,$r23,24 addi.w $r13,$r0,13 # 0xd ld.d $r14,$r23,8 beq $r12,$r13,.L75 addi.w $r13,$r0,14 # 0xe beq $r12,$r13,.L76 jirl $r1,$r14,0 ldptr.w $r12,$r23,24 addi.w $r13,$r0,1 # 0x1 beq $r12,$r13,.L26 addi.w $r13,$r0,16 # 0x10 bgtu $r12,$r13,.L26 la.local $r13,.L29 slli.d $r12,$r12,3 ldx.d $r12,$r13,$r12 add.d $r13,$r13,$r12 jr $r13 .section .rodata .align 3 .align 2 .L29: .dword .L26-.L29 .dword .L26-.L29 .dword .L37-.L29 .dword .L37-.L29 .dword .L37-.L29 .dword .L35-.L29 .dword .L35-.L29 .dword .L33-.L29 .dword .L33-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L26-.L29 .dword .L26-.L29 .dword .L30-.L29 .dword .L28-.L29 .text .L9: ldptr.w $r13,$r23,68 andi $r13,$r13,1 beqz $r13,.L10 fld.s $f0,$r23,76 b .L10 .L76: ld.d $r23,$r23,16 jirl $r1,$r14,0 fst.d $f0,$r23,0 .L26: addi.d $r3,$r22,-48 .cfi_remember_state .cfi_def_cfa 3, 48 ld.d $r1,$r3,40 .cfi_restore 1 ld.d $r22,$r3,32 .cfi_restore 22 ld.d $r23,$r3,24 .cfi_restore 23 ld.d $r24,$r3,16 .cfi_restore 24 ld.d $r25,$r3,8 .cfi_restore 25 ldptr.d $r26,$r3,0 .cfi_restore 26 or $r4,$r0,$r0 addi.d $r3,$r3,48 .cfi_def_cfa_offset 0 jr $r1 .L72: .cfi_restore_state ble $r25,$r0,.L6 addi.w $r12,$r0,1 # 0x1 ldptr.d $r4,$r24,0 bne $r25,$r12,.L5 b .L6 .L75: ld.d $r23,$r23,16 jirl $r1,$r14,0 fst.s $f0,$r23,0 b .L26 .L73: fld.d $f1,$r23,120 b .L13 .L30: ld.d $r12,$r23,16 stptr.d $r4,$r12,0 b .L26 .L37: ld.d $r12,$r23,16 st.b $r4,$r12,0 b .L26 .L14: ldptr.w $r13,$r23,68 andi $r13,$r13,4 beqz $r13,.L15 fld.s $f2,$r23,84 b .L15 .L16: ldptr.w $r13,$r23,68 andi $r13,$r13,8 beqz $r13,.L17 fld.s $f3,$r23,88 b .L17 .L74: fld.d $f4,$r23,144 b .L19 .L35: ld.d $r12,$r23,16 st.h $r4,$r12,0 b .L26 .L33: ld.d $r12,$r23,16 stptr.w $r4,$r12,0 b .L26 .L28: ldptr.w $r12,$r23,0 andi $r12,$r12,512 beqz $r12,.L26 ld.d $r24,$r23,32 addi.w $r12,$r0,15 # 0xf addi.d $r13,$r24,-1 bgtu $r13,$r12,.L26 ld.d $r12,$r23,16 addi.w $r16,$r0,-8 # 0xfffffffffffffff8 addi.w $r13,$r0,1 # 0x1 and $r16,$r12,$r16 ldptr.d $r17,$r16,0 andi $r12,$r12,7 slli.w $r20,$r12,3 add.d $r25,$r24,$r12 sll.d $r19,$r4,$r20 addi.w $r23,$r0,8 # 0x8 sll.d $r13,$r13,$r20 xor $r19,$r19,$r17 slli.w $r18,$r25,3 bgtu $r24,$r23,.L40 bgtu $r25,$r23,.L41 addi.w $r18,$r18,-1 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r18 sub.d $r12,$r12,$r13 and $r12,$r12,$r19 xor $r12,$r12,$r17 stptr.d $r12,$r16,0 b .L26 .L20: ldptr.w $r13,$r23,68 andi $r13,$r13,32 beqz $r13,.L21 fld.s $f5,$r23,96 b .L21 .L22: ldptr.w $r13,$r23,68 andi $r13,$r13,64 beqz $r13,.L23 fld.s $f6,$r23,100 b .L23 .L24: ldptr.w $r12,$r23,68 andi $r12,$r12,128 beqz $r12,.L8 fld.s $f7,$r23,104 b .L8 .L40: sub.d $r13,$r0,$r13 and $r13,$r13,$r19 xor $r13,$r13,$r17 stptr.d $r13,$r16,0 addi.w $r13,$r0,16 # 0x10 sub.d $r12,$r23,$r12 sll.d $r20,$r5,$r20 bgtu $r25,$r13,.L42 slli.w $r12,$r12,2 ld.d $r15,$r16,8 sra.d $r14,$r4,$r12 sra.d $r12,$r14,$r12 addi.w $r18,$r18,-65 addi.w $r13,$r0,2 # 0x2 or $r12,$r12,$r20 sll.d $r13,$r13,$r18 xor $r12,$r12,$r15 addi.d $r13,$r13,-1 and $r12,$r12,$r13 xor $r12,$r12,$r15 st.d $r12,$r16,8 b .L26 .L41: ld.d $r15,$r16,8 sub.d $r12,$r23,$r12 slli.w $r12,$r12,3 addi.w $r18,$r18,-65 addi.w $r14,$r0,2 # 0x2 sra.d $r12,$r4,$r12 sll.d $r14,$r14,$r18 sub.d $r13,$r0,$r13 xor $r12,$r12,$r15 addi.d $r14,$r14,-1 and $r13,$r13,$r19 and $r12,$r12,$r14 xor $r13,$r13,$r17 xor $r12,$r12,$r15 stptr.d $r13,$r16,0 st.d $r12,$r16,8 b .L26 .L42: ld.d $r19,$r16,16 slli.w $r12,$r12,3 addi.w $r13,$r18,-129 addi.w $r17,$r0,2 # 0x2 sll.d $r17,$r17,$r13 sra.d $r13,$r5,$r12 addi.d $r15,$r17,-1 xor $r13,$r13,$r19 sra.d $r12,$r4,$r12 and $r13,$r15,$r13 or $r12,$r12,$r20 xor $r13,$r13,$r19 st.d $r12,$r16,8 st.d $r13,$r16,16 b .L26 .cfi_endproc .LFE0: .size avcall_call, .-avcall_call .ident "GCC: (GNU) 12.1.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/avcall-riscv64-lp64d-linux.s0000664000000000000000000001011214662622067016447 00000000000000 .file "avcall-riscv64.c" .option pic .text .align 1 .globl avcall_call .type avcall_call, @function avcall_call: add sp,sp,-64 sd s0,48(sp) sd s1,40(sp) sd ra,56(sp) sd s2,32(sp) sd s3,24(sp) sd s4,16(sp) sd s5,8(sp) sd s6,0(sp) add s0,sp,64 ld t6,48(a0) ld t3,40(a0) li t1,-4096 add t1,t1,2032 sub t3,t3,t6 sra t3,t3,3 sext.w t0,t3 li t4,8 mv s1,a0 add sp,sp,t1 lw t2,64(a0) ble t0,t4,.L2 addw t3,t3,-9 sll t3,t3,32 srl t3,t3,29 mv t1,sp add t3,t3,8 add t4,t6,64 add t3,t1,t3 .L3: ld t5,0(t4) add t1,t1,8 add t4,t4,8 sd t5,-8(t1) bne t3,t1,.L3 .L4: li t1,1 ld a0,0(t6) beq t0,t1,.L5 li t1,2 ld a1,8(t6) beq t0,t1,.L5 li t1,3 ld a2,16(t6) beq t0,t1,.L5 li t1,4 ld a3,24(t6) beq t0,t1,.L5 li t1,5 ld a4,32(t6) beq t0,t1,.L5 li t1,6 ld a5,40(t6) beq t0,t1,.L5 li t1,7 ld a6,48(t6) beq t0,t1,.L5 ld a7,56(t6) .L5: beqz t2,.L8 lw t1,72(s1) and t3,t1,1 beqz t3,.L9 fld fa0,112(s1) .L10: li t3,1 bleu t2,t3,.L8 and t3,t1,2 bnez t3,.L77 lw t3,68(s1) and t3,t3,2 beqz t3,.L13 flw fa1,80(s1) .L13: li t3,2 beq t2,t3,.L8 and t3,t1,4 beqz t3,.L14 fld fa2,128(s1) .L15: li t3,3 beq t2,t3,.L8 and t3,t1,8 bnez t3,.L78 lw t3,68(s1) and t3,t3,8 beqz t3,.L17 flw fa3,88(s1) .L17: li t3,4 beq t2,t3,.L8 and t3,t1,16 beqz t3,.L18 fld fa4,144(s1) .L19: li t3,5 beq t2,t3,.L8 and t3,t1,32 beqz t3,.L20 fld fa5,152(s1) .L21: li t3,6 beq t2,t3,.L8 and t3,t1,64 beqz t3,.L22 fld fa6,160(s1) .L23: li t3,7 beq t2,t3,.L8 and t1,t1,128 beqz t1,.L24 fld fa7,168(s1) .L8: lw t1,24(s1) li t3,13 ld t4,8(s1) bne t1,t3,.L25 ld s1,16(s1) jalr t4 fsw fa0,0(s1) .L26: add sp,s0,-64 ld ra,56(sp) li a0,0 ld s0,48(sp) ld s1,40(sp) ld s2,32(sp) ld s3,24(sp) ld s4,16(sp) ld s5,8(sp) ld s6,0(sp) add sp,sp,64 jr ra .L9: lw t3,68(s1) and t3,t3,1 beqz t3,.L10 flw fa0,76(s1) j .L10 .L25: li t3,14 beq t1,t3,.L79 jalr t4 lw t1,24(s1) li t4,1 mv t3,a0 beq t1,t4,.L26 li t4,2 beq t1,t4,.L71 li t4,3 beq t1,t4,.L71 li t4,4 beq t1,t4,.L71 li t4,5 beq t1,t4,.L72 li t4,6 beq t1,t4,.L72 li t4,7 beq t1,t4,.L73 li t4,8 beq t1,t4,.L73 and t4,t1,-3 li t6,9 beq t4,t6,.L75 addw t4,t1,-10 and t4,t4,-3 sext.w t4,t4 beqz t4,.L75 li t6,15 beq t1,t6,.L75 li t4,16 bne t1,t4,.L26 lw t4,0(s1) and t4,t4,512 beqz t4,.L26 ld s6,32(s1) add t4,s6,-1 bgtu t4,t6,.L26 ld t6,16(s1) li t4,1 li s4,8 and s1,t6,7 and t6,t6,-8 sext.w s3,s1 ld t0,0(t6) sll s5,s3,3 add s1,s6,s1 sll t2,a0,s5 sll t4,t4,s5 xor t2,t2,t0 sllw s2,s1,3 bgtu s6,s4,.L38 bgtu s1,s4,.L39 addw s2,s2,-1 li t1,2 sll t1,t1,s2 sub t1,t1,t4 and t1,t1,t2 xor t1,t1,t0 sd t1,0(t6) j .L26 .L77: fld fa1,120(s1) j .L13 .L79: ld s1,16(s1) jalr t4 fsd fa0,0(s1) j .L26 .L71: ld t1,16(s1) sb t3,0(t1) j .L26 .L2: blez t0,.L5 j .L4 .L14: lw t3,68(s1) and t3,t3,4 beqz t3,.L15 flw fa2,84(s1) j .L15 .L78: fld fa3,136(s1) j .L17 .L72: ld t1,16(s1) sh t3,0(t1) j .L26 .L18: lw t3,68(s1) and t3,t3,16 beqz t3,.L19 flw fa4,92(s1) j .L19 .L73: ld t1,16(s1) sw t3,0(t1) j .L26 .L20: lw t3,68(s1) and t3,t3,32 beqz t3,.L21 flw fa5,96(s1) j .L21 .L75: ld t1,16(s1) sd t3,0(t1) j .L26 .L22: lw t3,68(s1) and t3,t3,64 beqz t3,.L23 flw fa6,100(s1) j .L23 .L24: lw t1,68(s1) and t1,t1,128 beqz t1,.L8 flw fa7,104(s1) j .L8 .L39: li t1,-8 mulw t1,t1,s3 ld s1,8(t6) addw s2,s2,-65 li t5,2 sll t5,t5,s2 sub t4,zero,t4 add t5,t5,-1 and t4,t4,t2 xor t4,t4,t0 sd t4,0(t6) sra t1,a0,t1 xor t1,t1,s1 and t1,t1,t5 xor t1,t1,s1 sd t1,8(t6) j .L26 .L38: sub t4,zero,t4 and t4,t4,t2 xor t4,t4,t0 sd t4,0(t6) sll t2,a1,s5 bleu s1,t1,.L80 li t1,-8 mulw t1,t1,s3 ld s1,16(t6) addw t4,s2,-129 li t0,2 sll t0,t0,t4 add t0,t0,-1 addw t1,t1,64 sra t4,a1,t1 xor t4,t4,s1 sra t1,a0,t1 and t3,t0,t4 or t1,t1,t2 xor t3,t3,s1 sd t1,8(t6) sd t3,16(t6) j .L26 .L80: li t1,-4 mulw t1,t1,s3 addw t4,s2,-65 li t5,2 sll t5,t5,t4 ld t0,8(t6) add t5,t5,-1 addw t4,t1,32 sra t1,a0,t4 sra t1,t1,t4 or t1,t1,t2 xor t1,t1,t0 and t1,t1,t5 xor t1,t1,t0 sd t1,8(t6) j .L26 .size avcall_call, .-avcall_call .ident "GCC: (GNU) 7.3.0" libffcall-2.5/avcall/avcall-x86_64-windows.s0000664000000000000000000001222114662622067015514 00000000000000 .file "avcall-x86_64-windows.c" .text .p2align 4,,15 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: pushq %rsi pushq %rbx .LCFI2: movq %rcx, %rbx subq $32, %rsp movq 48(%rcx), %rcx movq 40(%rbx), %rax subq $2064, %rsp subq %rcx, %rax sarq $3, %rax cmpl $4, %eax jle .L6 leal -5(%rax), %r8d leaq 32(%rsp), %r9 xorl %eax, %eax addq $1, %r8 .p2align 4,,10 .p2align 3 .L5: movq 32(%rcx,%rax,8), %rdx movq %rdx, (%r9,%rax,8) addq $1, %rax cmpq %r8, %rax jne .L5 .L6: movl 68(%rbx), %eax testl %eax, %eax je .L7 testb $1, %al je .L8 movss 76(%rbx), %xmm0 .L8: testb $2, %al je .L9 movss 80(%rbx), %xmm1 .L9: testb $4, %al je .L10 movss 84(%rbx), %xmm2 .L10: testb $8, %al jne .L76 .L7: movl 72(%rbx), %eax testl %eax, %eax je .L12 testb $1, %al je .L13 movsd 96(%rbx), %xmm0 .L13: testb $2, %al je .L14 movsd 104(%rbx), %xmm1 .L14: testb $4, %al je .L15 movsd 112(%rbx), %xmm2 .L15: testb $8, %al jne .L77 .L12: movl 24(%rbx), %eax cmpl $13, %eax je .L78 cmpl $14, %eax je .L79 movq 8(%rcx), %rdx movq 24(%rcx), %r9 movq 16(%rcx), %r8 movq (%rcx), %rcx call *8(%rbx) movl 24(%rbx), %edx cmpl $1, %edx je .L18 cmpl $2, %edx je .L71 cmpl $3, %edx je .L71 cmpl $4, %edx je .L71 cmpl $5, %edx je .L72 cmpl $6, %edx je .L72 cmpl $7, %edx je .L73 cmpl $8, %edx je .L73 cmpl $9, %edx je .L74 cmpl $10, %edx je .L74 cmpl $11, %edx je .L74 cmpl $12, %edx je .L74 cmpl $15, %edx je .L74 cmpl $16, %edx jne .L18 testl $512, (%rbx) je .L18 movq 32(%rbx), %r8 leaq -4(%r8), %rdx testq $-5, %rdx je .L34 leaq -1(%r8), %rdx cmpq $1, %rdx ja .L18 .L34: movq 16(%rbx), %rdx movq %rdx, %r9 andl $7, %edx addq %rdx, %r8 andq $-8, %r9 cmpq $8, %r8 jbe .L80 leal 0(,%rdx,8), %ecx movq (%r9), %r10 movq %rax, %rsi movq $-1, %r11 negl %edx salq %cl, %rsi salq %cl, %r11 movq %rsi, %rcx xorq %r10, %rcx andq %r11, %rcx xorq %r10, %rcx movq 8(%r9), %r10 movq %rcx, (%r9) leal -65(,%r8,8), %ecx movl $2, %r8d salq %cl, %r8 leal 64(,%rdx,8), %ecx subq $1, %r8 sarq %cl, %rax xorq %r10, %rax andq %r8, %rax xorq %r10, %rax movq %rax, 8(%r9) .L18: leaq -16(%rbp), %rsp xorl %eax, %eax popq %rbx .LCFI3: popq %rsi .LCFI4: popq %rbp .LCFI5: ret .p2align 4,,10 .p2align 3 .L77: .LCFI6: movsd 120(%rbx), %xmm3 jmp .L12 .p2align 4,,10 .p2align 3 .L76: movss 88(%rbx), %xmm3 jmp .L7 .p2align 4,,10 .p2align 3 .L71: movq 16(%rbx), %rdx movb %al, (%rdx) leaq -16(%rbp), %rsp xorl %eax, %eax popq %rbx .LCFI7: popq %rsi .LCFI8: popq %rbp .LCFI9: ret .p2align 4,,10 .p2align 3 .L72: .LCFI10: movq 16(%rbx), %rdx movw %ax, (%rdx) leaq -16(%rbp), %rsp xorl %eax, %eax popq %rbx .LCFI11: popq %rsi .LCFI12: popq %rbp .LCFI13: ret .L74: .LCFI14: movq 16(%rbx), %rdx movq %rax, (%rdx) jmp .L18 .p2align 4,,10 .p2align 3 .L79: movq 16(%rbx), %rsi movq 8(%rcx), %rdx movq 24(%rcx), %r9 movq 16(%rcx), %r8 movq (%rcx), %rcx call *8(%rbx) movsd %xmm0, (%rsi) leaq -16(%rbp), %rsp xorl %eax, %eax popq %rbx .LCFI15: popq %rsi .LCFI16: popq %rbp .LCFI17: ret .L78: .LCFI18: movq 16(%rbx), %rsi movq 8(%rcx), %rdx movq 24(%rcx), %r9 movq 16(%rcx), %r8 movq (%rcx), %rcx call *8(%rbx) movss %xmm0, (%rsi) jmp .L18 .L73: movq 16(%rbx), %rdx movl %eax, (%rdx) jmp .L18 .L80: leal -1(,%r8,8), %ecx movq (%r9), %r10 sall $3, %edx movl $2, %r8d movl $1, %r11d salq %cl, %r8 movl %edx, %ecx salq %cl, %r11 salq %cl, %rax subq %r11, %r8 xorq %r10, %rax andq %r8, %rax xorq %r10, %rax movq %rax, (%r9) jmp .L18 .LFE0: .size avcall_call, .-avcall_call .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0-. .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0x84 .uleb128 0x3 .byte 0x83 .uleb128 0x4 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xa .byte 0xc3 .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xc4 .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xb .byte 0x4 .long .LCFI7-.LCFI6 .byte 0xa .byte 0xc3 .byte 0x4 .long .LCFI8-.LCFI7 .byte 0xc4 .byte 0x4 .long .LCFI9-.LCFI8 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI10-.LCFI9 .byte 0xb .byte 0x4 .long .LCFI11-.LCFI10 .byte 0xa .byte 0xc3 .byte 0x4 .long .LCFI12-.LCFI11 .byte 0xc4 .byte 0x4 .long .LCFI13-.LCFI12 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI14-.LCFI13 .byte 0xb .byte 0x4 .long .LCFI15-.LCFI14 .byte 0xa .byte 0xc3 .byte 0x4 .long .LCFI16-.LCFI15 .byte 0xc4 .byte 0x4 .long .LCFI17-.LCFI16 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI18-.LCFI17 .byte 0xb .align 8 .LEFDE1: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/avcall-mips64.c0000664000000000000000000006033514662613003014167 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an SGI 64-bit MIPS with sgi-cc. This calls a C function with an argument list built up using macros defined in avcall.h. SGI MIPS 64-bit Argument Passing Conventions - The entire argument list forms a structure with all the appropriate holes & alignments, and space for this is allocated in the stack frame. - Shorter integers are promoted to longword length (sizeof(long)=8). - Doubles are 1 longword. - Structure arguments are copies embedded in the arglist structure. - The first 8 longwords of the structure are passed in registers $4...$11, except that float arguments are passed in registers $f12...$f19, and that double arguments and structure elements of type double are passed in registers $f12...$f19. (But varargs functions may expect them in the integer registers and we can't tell whether the function is varargs so we pass them both ways.) Remaining longwords are passed on the stack. No stack space is allocated for the first 8 longwords of the structure. - Structure returns of structures > 16 bytes: pointers to caller-allocated space are passed in as the first argument of the list. - Structure returns of structures <= 16 bytes: in the registers $2 (for the first 8 bytes) and $3 (for the next 8 bytes). A structure of 1 or 2 floats or doubles is returned in $f0 and $f2: the first float or double in $f0, the second float or double in $f2. - Integer/pointer returns are in $2, float/double returns in $f0. - The called function expects to see its own address in $25. This file needs to be compiled with gcc for the asm extensions, but the assembly version of it and the header file seem to work with SGI cc. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) #define OFFSETOF(struct,member) ((int)&(((struct*)0)->member)) int avcall_call(av_alist* list) { register __avword* sp __asm__("$sp"); /* C names for registers */ register float fret __asm__("$f0"); register double dret __asm__("$f0"); /*register __avrword iret1 __asm__("$2"); */ register __avrword iret2 __asm__("$3"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; __avrword iret; int i; if (l->farg_mask) { /* push leading float args */ if (l->farg_mask & (1<<0)) __asm__("lwc1 $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0])); if (l->farg_mask & (1<<1)) __asm__("lwc1 $f13,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1])); if (l->farg_mask & (1<<2)) __asm__("lwc1 $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[2])); if (l->farg_mask & (1<<3)) __asm__("lwc1 $f15,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[3])); if (l->farg_mask & (1<<4)) __asm__("lwc1 $f16,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[4])); if (l->farg_mask & (1<<5)) __asm__("lwc1 $f17,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[5])); if (l->farg_mask & (1<<6)) __asm__("lwc1 $f18,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[6])); if (l->farg_mask & (1<<7)) __asm__("lwc1 $f19,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[7])); } if (l->darg_mask) { /* push leading double args */ __avword* a = l->args; if (l->darg_mask & (1<<0)) __asm__("ldc1 $f12,%1(%0)" : : "p" (a), "i" (0 * sizeof (__avword))); if (l->darg_mask & (1<<1)) __asm__("ldc1 $f13,%1(%0)" : : "p" (a), "i" (1 * sizeof (__avword))); if (l->darg_mask & (1<<2)) __asm__("ldc1 $f14,%1(%0)" : : "p" (a), "i" (2 * sizeof (__avword))); if (l->darg_mask & (1<<3)) __asm__("ldc1 $f15,%1(%0)" : : "p" (a), "i" (3 * sizeof (__avword))); if (l->darg_mask & (1<<4)) __asm__("ldc1 $f16,%1(%0)" : : "p" (a), "i" (4 * sizeof (__avword))); if (l->darg_mask & (1<<5)) __asm__("ldc1 $f17,%1(%0)" : : "p" (a), "i" (5 * sizeof (__avword))); if (l->darg_mask & (1<<6)) __asm__("ldc1 $f18,%1(%0)" : : "p" (a), "i" (6 * sizeof (__avword))); if (l->darg_mask & (1<<7)) __asm__("ldc1 $f19,%1(%0)" : : "p" (a), "i" (7 * sizeof (__avword))); } for (i = 8; i < arglen; i++) /* push excess function args */ argframe[i-8] = l->args[i]; /* call function with 1st 8 args */ __asm__ __volatile__ ("ld $4,%0" : : "m" (l->args[0]) : "$4"); /* arg1 = l->args[0]; */ __asm__ __volatile__ ("ld $5,%0" : : "m" (l->args[1]) : "$5"); /* arg1 = l->args[1]; */ __asm__ __volatile__ ("ld $6,%0" : : "m" (l->args[2]) : "$6"); /* arg1 = l->args[2]; */ __asm__ __volatile__ ("ld $7,%0" : : "m" (l->args[3]) : "$7"); /* arg1 = l->args[3]; */ __asm__ __volatile__ ("ld $8,%0" : : "m" (l->args[4]) : "$8"); /* arg1 = l->args[4]; */ __asm__ __volatile__ ("ld $9,%0" : : "m" (l->args[5]) : "$9"); /* arg1 = l->args[5]; */ __asm__ __volatile__ ("ld $10,%0" : : "m" (l->args[6]) : "$10"); /* arg1 = l->args[6]; */ __asm__ __volatile__ ("ld $11,%0" : : "m" (l->args[7]) : "$11"); /* arg1 = l->args[7]; */ /* Note: The code of this call ought to put the address of the called function in register $25 before the call. */ iret = (*l->func)(); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->flags & __AV_GCC_STRUCT_RETURN) { /* gcc returns structs of size 1,2,4,8 in registers. */ if (l->rsize == sizeof(char)) { RETURN(char, iret); } else if (l->rsize == sizeof(short)) { RETURN(short, iret); } else if (l->rsize == sizeof(int)) { RETURN(int, iret); } else if (l->rsize == sizeof(long)) { RETURN(long, iret); } } else { /* cc returns structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); #endif } else if (l->rsize == 2) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); #endif } else if (l->rsize == 3) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); #endif } else if (l->rsize == 4) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); #endif } else if (l->rsize == 5) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); #endif } else if (l->rsize == 6) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); #endif } else if (l->rsize == 7) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); #endif } else if (l->rsize >= 8 && l->rsize <= 16) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret); #endif if (l->rsize == 8) { } else if (l->rsize == 9) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); #endif } else if (l->rsize == 10) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); #endif } else if (l->rsize == 11) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); #endif } else if (l->rsize == 12) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); #endif } else if (l->rsize == 13) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); #endif } else if (l->rsize == 14) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); #endif } else if (l->rsize == 15) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); #endif } else if (l->rsize == 16) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2); #endif } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ #if defined(_MIPSEL) if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #else if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif #endif } } } } return 0; } libffcall-2.5/avcall/avcall-x86_64-windows-macro.S0000664000000000000000000002055114662622067016560 00000000000000#include "asm-x86_64.h" TEXT() P2ALIGN(4,15) GLOBL(C(avcall_call)) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) L(FB0): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN1(push,q ,R(rsi)) INSN1(push,q ,R(rbx)) L(CFI2): INSN2(mov,q ,R(rcx), R(rbx)) INSN2(sub,q ,NUM(32), R(rsp)) INSN2(mov,q ,X8 MEM_DISP(rcx,48), R(rcx)) INSN2(mov,q ,X8 MEM_DISP(rbx,40), R(rax)) INSN2(sub,q ,NUM(2064), R(rsp)) INSN2(sub,q ,R(rcx), R(rax)) INSN2(sar,q ,NUM(3), R(rax)) INSN2(cmp,l ,NUM(4), R(eax)) INSN1(jle,_ ,L(6)) INSN2(lea,l ,X4 MEM_DISP(rax,-5), R(r8d)) INSN2(lea,q ,X8 MEM_DISP(rsp,32), R(r9)) INSN2(xor,l ,R(eax), R(eax)) INSN2(add,q ,NUM(1), R(r8)) P2ALIGN(4,10) P2ALIGN(3,7) L(5): INSN2(mov,q ,X8 MEM_DISP_SHINDEX(rcx,32,rax,8), R(rdx)) INSN2(mov,q ,R(rdx),X8 MEM_SHINDEX(r9,rax,8)) INSN2(add,q ,NUM(1), R(rax)) INSN2(cmp,q ,R(r8), R(rax)) INSN1(jne,_ ,L(5)) L(6): INSN2(mov,l ,X4 MEM_DISP(rbx,68), R(eax)) INSN2(test,l ,R(eax), R(eax)) INSN1(je,_ ,L(7)) INSN2(test,b ,NUM(1), R(al)) INSN1(je,_ ,L(8)) INSN2S(movs,s ,X4 MEM_DISP(rbx,76), R(xmm0)) L(8): INSN2(test,b ,NUM(2), R(al)) INSN1(je,_ ,L(9)) INSN2S(movs,s ,X4 MEM_DISP(rbx,80), R(xmm1)) L(9): INSN2(test,b ,NUM(4), R(al)) INSN1(je,_ ,L(10)) INSN2S(movs,s ,X4 MEM_DISP(rbx,84), R(xmm2)) L(10): INSN2(test,b ,NUM(8), R(al)) INSN1(jne,_ ,L(76)) L(7): INSN2(mov,l ,X4 MEM_DISP(rbx,72), R(eax)) INSN2(test,l ,R(eax), R(eax)) INSN1(je,_ ,L(12)) INSN2(test,b ,NUM(1), R(al)) INSN1(je,_ ,L(13)) INSN2S(movs,d ,X8 MEM_DISP(rbx,96), R(xmm0)) L(13): INSN2(test,b ,NUM(2), R(al)) INSN1(je,_ ,L(14)) INSN2S(movs,d ,X8 MEM_DISP(rbx,104), R(xmm1)) L(14): INSN2(test,b ,NUM(4), R(al)) INSN1(je,_ ,L(15)) INSN2S(movs,d ,X8 MEM_DISP(rbx,112), R(xmm2)) L(15): INSN2(test,b ,NUM(8), R(al)) INSN1(jne,_ ,L(77)) L(12): INSN2(mov,l ,X4 MEM_DISP(rbx,24), R(eax)) INSN2(cmp,l ,NUM(13), R(eax)) INSN1(je,_ ,L(78)) INSN2(cmp,l ,NUM(14), R(eax)) INSN1(je,_ ,L(79)) INSN2(mov,q ,X8 MEM_DISP(rcx,8), R(rdx)) INSN2(mov,q ,X8 MEM_DISP(rcx,24), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rcx,16), R(r8)) INSN2(mov,q ,X8 MEM(rcx), R(rcx)) INSN1(call,_ ,INDIR(X8 MEM_DISP(rbx,8))) INSN2(mov,l ,X4 MEM_DISP(rbx,24), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(18)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(71)) INSN2(cmp,l ,NUM(3), R(edx)) INSN1(je,_ ,L(71)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(71)) INSN2(cmp,l ,NUM(5), R(edx)) INSN1(je,_ ,L(72)) INSN2(cmp,l ,NUM(6), R(edx)) INSN1(je,_ ,L(72)) INSN2(cmp,l ,NUM(7), R(edx)) INSN1(je,_ ,L(73)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(73)) INSN2(cmp,l ,NUM(9), R(edx)) INSN1(je,_ ,L(74)) INSN2(cmp,l ,NUM(10), R(edx)) INSN1(je,_ ,L(74)) INSN2(cmp,l ,NUM(11), R(edx)) INSN1(je,_ ,L(74)) INSN2(cmp,l ,NUM(12), R(edx)) INSN1(je,_ ,L(74)) INSN2(cmp,l ,NUM(15), R(edx)) INSN1(je,_ ,L(74)) INSN2(cmp,l ,NUM(16), R(edx)) INSN1(jne,_ ,L(18)) INSN2(test,l ,NUM(512),X4 MEM(rbx)) INSN1(je,_ ,L(18)) INSN2(mov,q ,X8 MEM_DISP(rbx,32), R(r8)) INSN2(lea,q ,X8 MEM_DISP(r8,-4), R(rdx)) INSN2(test,q ,NUM(-5), R(rdx)) INSN1(je,_ ,L(34)) INSN2(lea,q ,X8 MEM_DISP(r8,-1), R(rdx)) INSN2(cmp,q ,NUM(1), R(rdx)) INSN1(ja,_ ,L(18)) L(34): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rdx)) INSN2(mov,q ,R(rdx), R(r9)) INSN2(and,l ,NUM(7), R(edx)) INSN2(add,q ,R(rdx), R(r8)) INSN2(and,q ,NUM(-8), R(r9)) INSN2(cmp,q ,NUM(8), R(r8)) INSN1(jbe,_ ,L(80)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,rdx,8), R(ecx)) INSN2(mov,q ,X8 MEM(r9), R(r10)) INSN2(mov,q ,R(rax), R(rsi)) INSN2(mov,q ,NUM(-1), R(r11)) INSN1(neg,l ,R(edx)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(sal,q ,R(cl), R(r11)) INSN2(mov,q ,R(rsi), R(rcx)) INSN2(xor,q ,R(r10), R(rcx)) INSN2(and,q ,R(r11), R(rcx)) INSN2(xor,q ,R(r10), R(rcx)) INSN2(mov,q ,X8 MEM_DISP(r9,8), R(r10)) INSN2(mov,q ,R(rcx),X8 MEM(r9)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r8,8), R(ecx)) INSN2(mov,l ,NUM(2), R(r8d)) INSN2(sal,q ,R(cl), R(r8)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(64,rdx,8), R(ecx)) INSN2(sub,q ,NUM(1), R(r8)) INSN2(sar,q ,R(cl), R(rax)) INSN2(xor,q ,R(r10), R(rax)) INSN2(and,q ,R(r8), R(rax)) INSN2(xor,q ,R(r10), R(rax)) INSN2(mov,q ,R(rax),X8 MEM_DISP(r9,8)) L(18): INSN2(lea,q ,X8 MEM_DISP(rbp,-16), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) L(CFI3): INSN1(pop,q ,R(rsi)) L(CFI4): INSN1(pop,q ,R(rbp)) L(CFI5): ret P2ALIGN(4,10) P2ALIGN(3,7) L(77): L(CFI6): INSN2S(movs,d ,X8 MEM_DISP(rbx,120), R(xmm3)) INSN1(jmp,_ ,L(12)) P2ALIGN(4,10) P2ALIGN(3,7) L(76): INSN2S(movs,s ,X4 MEM_DISP(rbx,88), R(xmm3)) INSN1(jmp,_ ,L(7)) P2ALIGN(4,10) P2ALIGN(3,7) L(71): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rdx)) INSN2(mov,b ,R(al),X1 MEM(rdx)) INSN2(lea,q ,X8 MEM_DISP(rbp,-16), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) L(CFI7): INSN1(pop,q ,R(rsi)) L(CFI8): INSN1(pop,q ,R(rbp)) L(CFI9): ret P2ALIGN(4,10) P2ALIGN(3,7) L(72): L(CFI10): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rdx)) INSN2(mov,w ,R(ax),X2 MEM(rdx)) INSN2(lea,q ,X8 MEM_DISP(rbp,-16), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) L(CFI11): INSN1(pop,q ,R(rsi)) L(CFI12): INSN1(pop,q ,R(rbp)) L(CFI13): ret L(74): L(CFI14): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rdx)) INSN2(mov,q ,R(rax),X8 MEM(rdx)) INSN1(jmp,_ ,L(18)) P2ALIGN(4,10) P2ALIGN(3,7) L(79): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rsi)) INSN2(mov,q ,X8 MEM_DISP(rcx,8), R(rdx)) INSN2(mov,q ,X8 MEM_DISP(rcx,24), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rcx,16), R(r8)) INSN2(mov,q ,X8 MEM(rcx), R(rcx)) INSN1(call,_ ,INDIR(X8 MEM_DISP(rbx,8))) INSN2S(movs,d ,R(xmm0),X8 MEM(rsi)) INSN2(lea,q ,X8 MEM_DISP(rbp,-16), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) L(CFI15): INSN1(pop,q ,R(rsi)) L(CFI16): INSN1(pop,q ,R(rbp)) L(CFI17): ret L(78): L(CFI18): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rsi)) INSN2(mov,q ,X8 MEM_DISP(rcx,8), R(rdx)) INSN2(mov,q ,X8 MEM_DISP(rcx,24), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rcx,16), R(r8)) INSN2(mov,q ,X8 MEM(rcx), R(rcx)) INSN1(call,_ ,INDIR(X8 MEM_DISP(rbx,8))) INSN2S(movs,s ,R(xmm0),X4 MEM(rsi)) INSN1(jmp,_ ,L(18)) L(73): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rdx)) INSN2(mov,l ,R(eax),X4 MEM(rdx)) INSN1(jmp,_ ,L(18)) L(80): INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,r8,8), R(ecx)) INSN2(mov,q ,X8 MEM(r9), R(r10)) INSN2(sal,l ,NUM(3), R(edx)) INSN2(mov,l ,NUM(2), R(r8d)) INSN2(mov,l ,NUM(1), R(r11d)) INSN2(sal,q ,R(cl), R(r8)) INSN2(mov,l ,R(edx), R(ecx)) INSN2(sal,q ,R(cl), R(r11)) INSN2(sal,q ,R(cl), R(rax)) INSN2(sub,q ,R(r11), R(r8)) INSN2(xor,q ,R(r10), R(rax)) INSN2(and,q ,R(r8), R(rax)) INSN2(xor,q ,R(r10), R(rax)) INSN2(mov,q ,R(rax),X8 MEM(r9)) INSN1(jmp,_ ,L(18)) L(FE0): FUNEND(avcall_call, .-avcall_call) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB0)-. .long L(FE0)-.LFB0 .uleb128 0 .byte 0x4 .long L(CFI0)-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI2)-.LCFI1 .byte 0x84 .uleb128 0x3 .byte 0x83 .uleb128 0x4 .byte 0x4 .long L(CFI3)-.LCFI2 .byte 0xa .byte 0xc3 .byte 0x4 .long L(CFI4)-.LCFI3 .byte 0xc4 .byte 0x4 .long L(CFI5)-.LCFI4 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI6)-.LCFI5 .byte 0xb .byte 0x4 .long L(CFI7)-.LCFI6 .byte 0xa .byte 0xc3 .byte 0x4 .long L(CFI8)-.LCFI7 .byte 0xc4 .byte 0x4 .long L(CFI9)-.LCFI8 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI10)-.LCFI9 .byte 0xb .byte 0x4 .long L(CFI11)-.LCFI10 .byte 0xa .byte 0xc3 .byte 0x4 .long L(CFI12)-.LCFI11 .byte 0xc4 .byte 0x4 .long L(CFI13)-.LCFI12 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI14)-.LCFI13 .byte 0xb .byte 0x4 .long L(CFI15)-.LCFI14 .byte 0xa .byte 0xc3 .byte 0x4 .long L(CFI16)-.LCFI15 .byte 0xc4 .byte 0x4 .long L(CFI17)-.LCFI16 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI18)-.LCFI17 .byte 0xb .align 8 L(EFDE1): #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-sparc64-macro.S0000664000000000000000000002172614662622066015420 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) .proc 04 FUNBEGIN(avcall_call) .register %g2, $scratch .register %g3, $scratch save %sp, -192, %sp ldx [%i0+48], %g2 ldx [%i0+40], %g1 lduw [%i0+68], %g3 sub %g1, %g2, %g1 cmp %g3, 0 be,pt %icc, L(L2) srlx %g1, 3, %o7 andcc %g3, 1, %g0 bne,pt %xcc, L(L97) andcc %g3, 2, %g0 bne,pt %xcc, L(L98) andcc %g3, 4, %g0 L(L133): bne,pt %xcc, L(L99) andcc %g3, 8, %g0 L(L132): bne,pt %xcc, L(L100) andcc %g3, 16, %g0 L(L131): bne,pt %xcc, L(L101) andcc %g3, 32, %g0 L(L130): bne,pt %xcc, L(L102) andcc %g3, 64, %g0 L(L129): bne,pt %xcc, L(L103) andcc %g3, 128, %g0 L(L128): bne,pt %xcc, L(L104) andcc %g3, 256, %g0 L(L127): bne,pt %xcc, L(L105) andcc %g3, 512, %g0 L(L126): bne,pt %xcc, L(L106) andcc %g3, 1024, %g0 L(L125): bne,pt %xcc, L(L107) andcc %g3, 2048, %g0 L(L124): bne,pt %xcc, L(L108) sethi %hi(4096), %g1 L(L123): andcc %g3, %g1, %g0 bne,pt %icc, L(L109) sethi %hi(8192), %g1 L(L122): andcc %g3, %g1, %g0 bne,pt %icc, L(L110) sethi %hi(16384), %g1 L(L121): andcc %g3, %g1, %g0 bne,pt %icc, L(L111) sethi %hi(32768), %g1 L(L120): andcc %g3, %g1, %g0 bne,pt %icc, L(L112) nop L(L2): cmp %o7, 6 L(L119): bg,pn %icc, L(L117) add %o7, -6, %g1 ldx [%i0+48], %g3 L(L118): ldx [%g3+40], %o5 L(L116): ldx [%i0+8], %g1 ldx [%g3], %o0 ldx [%g3+8], %o1 ldx [%g3+16], %o2 ldx [%g3+24], %o3 call %g1, 0 ldx [%g3+32], %o4 mov %o0, %l3 nop lduw [%i0+24], %g1 cmp %g1, 1 be,pn %icc, L(L38) cmp %g1, 2 be,pn %icc, L(L89) cmp %g1, 3 be,pn %icc, L(L89) cmp %g1, 4 be,pn %icc, L(L89) cmp %g1, 5 be,pn %icc, L(L90) cmp %g1, 6 be,pn %icc, L(L90) cmp %g1, 7 be,pn %icc, L(L91) cmp %g1, 8 be,pn %icc, L(L91) cmp %g1, 9 be,pn %icc, L(L95) cmp %g1, 10 be,pn %icc, L(L95) cmp %g1, 11 be,pn %icc, L(L95) cmp %g1, 12 be,pn %icc, L(L95) cmp %g1, 13 be,pn %icc, L(L114) cmp %g1, 14 be,pn %icc, L(L115) cmp %g1, 15 be,pn %icc, L(L95) cmp %g1, 16 bne,pt %icc, L(L38) nop lduw [%i0], %g1 andcc %g1, 512, %g0 be,pn %xcc, L(L38) nop ldx [%i0+32], %g2 add %g2, -1, %g1 cmp %g1, 31 bgu,pn %xcc, L(L38) cmp %g2, 8 ldx [%i0+16], %g1 and %g1, 7, %g5 and %g1, -8, %i0 bgu,pt %xcc, L(L71) add %g2, %g5, %g4 cmp %g4, 8 bgu,pt %xcc, L(L73) sllx %g5, 3, %g2 sllx %g5, 3, %g3 sllx %g4, 3, %g4 ldx [%i0], %g5 srax %o0, %g3, %o7 sub %g0, %g4, %g4 xor %g5, %o7, %o7 xnor %g0, %g3, %g3 mov 2, %g1 mov 1, %g2 sllx %g1, %g3, %g1 sllx %g2, %g4, %g2 sub %g1, %g2, %g1 and %g1, %o7, %g1 xor %g5, %g1, %g5 ba,pt %xcc, L(L38) stx %g5, [%i0] L(L89): ldx [%i0+16], %g1 stb %l3, [%g1] L(L38): return %i7+8 mov 0, %o0 L(L112): ldd [%g2+120],%f30 cmp %o7, 6 ble,a,pt %icc, L(L118) ldx [%i0+48], %g3 add %o7, -6, %g1 L(L117): sra %g1, 0, %g1 sllx %g1, 3, %g1 add %g1, 15, %g1 and %g1, -16, %g1 mov 6, %g4 sub %sp, %g1, %sp ldx [%i0+48], %g3 add %sp, 2238, %g1 and %g1, -16, %g1 add %g1, -48, %g5 L(L37): sra %g4, 0, %g1 add %g4, 1, %g4 sllx %g1, 3, %g1 cmp %o7, %g4 ldx [%g1+%g3], %g2 bne,pt %icc, L(L37) stx %g2, [%g5+%g1] ba,pt %xcc, L(L116) ldx [%g3+40], %o5 L(L111): ldd [%g2+112],%f28 sethi %hi(32768), %g1 andcc %g3, %g1, %g0 be,pt %icc, L(L119) cmp %o7, 6 ba,pt %xcc, L(L112) nop L(L110): ldd [%g2+104],%f26 sethi %hi(16384), %g1 andcc %g3, %g1, %g0 be,pt %icc, L(L120) sethi %hi(32768), %g1 ba,pt %xcc, L(L111) nop L(L109): ldd [%g2+96],%f24 sethi %hi(8192), %g1 andcc %g3, %g1, %g0 be,pt %icc, L(L121) sethi %hi(16384), %g1 ba,pt %xcc, L(L110) nop L(L108): ldd [%g2+88],%f22 sethi %hi(4096), %g1 andcc %g3, %g1, %g0 be,pt %icc, L(L122) sethi %hi(8192), %g1 ba,pt %xcc, L(L109) nop L(L107): ldd [%g2+80],%f20 andcc %g3, 2048, %g0 be,pt %xcc, L(L123) sethi %hi(4096), %g1 ba,pt %xcc, L(L108) nop L(L106): ldd [%g2+72],%f18 andcc %g3, 1024, %g0 be,pt %xcc, L(L124) andcc %g3, 2048, %g0 ba,pt %xcc, L(L107) nop L(L105): ldd [%g2+64],%f16 andcc %g3, 512, %g0 be,pt %xcc, L(L125) andcc %g3, 1024, %g0 ba,pt %xcc, L(L106) nop L(L104): ldd [%g2+56],%f14 andcc %g3, 256, %g0 be,pt %xcc, L(L126) andcc %g3, 512, %g0 ba,pt %xcc, L(L105) nop L(L103): ldd [%g2+48],%f12 andcc %g3, 128, %g0 be,pt %xcc, L(L127) andcc %g3, 256, %g0 ba,pt %xcc, L(L104) nop L(L102): ldd [%g2+40],%f10 andcc %g3, 64, %g0 be,pt %xcc, L(L128) andcc %g3, 128, %g0 ba,pt %xcc, L(L103) nop L(L101): ldd [%g2+32],%f8 andcc %g3, 32, %g0 be,pt %xcc, L(L129) andcc %g3, 64, %g0 ba,pt %xcc, L(L102) nop L(L100): ldd [%g2+24],%f6 andcc %g3, 16, %g0 be,pt %xcc, L(L130) andcc %g3, 32, %g0 ba,pt %xcc, L(L101) nop L(L99): ldd [%g2+16],%f4 andcc %g3, 8, %g0 be,pt %xcc, L(L131) andcc %g3, 16, %g0 ba,pt %xcc, L(L100) nop L(L98): ldd [%g2+8],%f2 andcc %g3, 4, %g0 be,pt %xcc, L(L132) andcc %g3, 8, %g0 ba,pt %xcc, L(L99) nop L(L97): ldd [%g2+0],%f0 andcc %g3, 2, %g0 be,pt %xcc, L(L133) andcc %g3, 4, %g0 ba,pt %xcc, L(L98) nop L(L90): ldx [%i0+16], %g1 sth %l3, [%g1] return %i7+8 mov 0, %o0 L(L95): ldx [%i0+16], %g1 ba,pt %xcc, L(L38) stx %l3, [%g1] L(L91): ldx [%i0+16], %g1 ba,pt %xcc, L(L38) st %l3, [%g1] L(L114): ldx [%i0+16], %g1 ba,pt %xcc, L(L38) st %f0, [%g1] L(L115): ldx [%i0+16], %g1 ba,pt %xcc, L(L38) std %f0, [%g1] L(L71): cmp %g2, 16 bgu,pt %xcc, L(L75) cmp %g2, 24 sll %g5, 3, %l2 xnor %g0, %l2, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 16 sllx %g1, %g2, %g1 srax %o0, %l2, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, L(L77) stx %g3, [%i0] sllx %g5, 2, %g5 mov 32, %g2 sub %g2, %g5, %g2 ldx [%i0+8], %g3 sllx %o0, %g2, %g1 sllx %g4, 3, %g4 sllx %g1, %g2, %g1 srax %o1, %l2, %o7 sub %g0, %g4, %g4 or %g1, %o7, %g1 mov -1, %g2 xor %g3, %g1, %g1 sllx %g2, %g4, %g2 and %g2, %g1, %g2 xor %g3, %g2, %g3 ba,pt %xcc, L(L38) stx %g3, [%i0+8] L(L73): sllx %g4, 3, %l0 ldx [%i0], %g5 srax %o0, %g2, %g4 sub %g0, %g2, %g3 xor %g5, %g4, %g4 xnor %g0, %g2, %g2 mov 2, %g1 sllx %g1, %g2, %g1 add %g1, -1, %g1 and %g1, %g4, %g1 ldx [%i0+8], %o7 xor %g5, %g1, %g5 sub %g0, %l0, %l0 sllx %o0, %g3, %g3 mov -1, %g1 xor %o7, %g3, %g3 sllx %g1, %l0, %g1 stx %g5, [%i0] and %g1, %g3, %g1 xor %o7, %g1, %o7 ba,pt %xcc, L(L38) stx %o7, [%i0+8] L(L77): srax %o1, %l2, %g5 mov 64, %g1 sub %g1, %l2, %g1 sllx %o1, %g1, %g2 sllx %o0, %g1, %g1 or %g1, %g5, %g1 sllx %g4, 3, %g3 stx %g1, [%i0+8] ldx [%i0+16], %g4 sub %g0, %g3, %g3 xor %g4, %g2, %g2 mov -1, %g1 sllx %g1, %g3, %g1 and %g1, %g2, %g1 xor %g4, %g1, %g4 ba,pt %xcc, L(L38) stx %g4, [%i0+16] L(L75): bgu,pt %xcc, L(L79) sll %g5, 3, %l4 sll %g5, 3, %l2 xnor %g0, %l2, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 24 sllx %g1, %g2, %g1 srax %o0, %l2, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, L(L81) stx %g3, [%i0] sllx %g5, 2, %g2 mov 32, %g1 sub %g1, %g2, %g1 ldx [%i0+16], %o7 sllx %g4, 3, %g5 sllx %o0, %g1, %g3 sllx %o1, %g1, %g2 sllx %g3, %g1, %g3 sllx %g2, %g1, %g2 srax %o2, %l2, %l0 sub %g0, %g5, %g5 or %g2, %l0, %g2 srax %o1, %l2, %g4 xor %o7, %g2, %g2 or %g3, %g4, %g3 mov -1, %g1 stx %g3, [%i0+8] sllx %g1, %g5, %g1 and %g1, %g2, %g1 xor %o7, %g1, %o7 ba,pt %xcc, L(L38) stx %o7, [%i0+16] L(L79): xnor %g0, %l4, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 32 sllx %g1, %g2, %g1 srax %o0, %l4, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, L(L83) stx %g3, [%i0] sllx %g5, 2, %g2 mov 32, %g1 sub %g1, %g2, %g1 ldx [%i0+24], %l0 sllx %g4, 3, %l1 sllx %o0, %g1, %g3 sllx %o1, %g1, %g4 sllx %g3, %g1, %g3 sllx %g4, %g1, %g4 sllx %o2, %g1, %g2 srax %o3, %l4, %l2 sllx %g2, %g1, %g2 sub %g0, %l1, %l1 or %g2, %l2, %g2 srax %o1, %l4, %g5 xor %l0, %g2, %g2 or %g3, %g5, %g3 srax %o2, %l4, %o7 mov -1, %g1 or %g4, %o7, %g4 sllx %g1, %l1, %g1 stx %g3, [%i0+8] and %g1, %g2, %g1 stx %g4, [%i0+16] xor %l0, %g1, %l0 ba,pt %xcc, L(L38) stx %l0, [%i0+24] L(L81): sllx %g4, 3, %g5 srax %o2, %l2, %l0 mov 64, %g1 sub %g1, %l2, %g1 sllx %o2, %g1, %g4 sllx %o0, %g1, %g2 sllx %o1, %g1, %g1 or %g1, %l0, %g1 ldx [%i0+24], %o7 sub %g0, %g5, %g5 xor %o7, %g4, %g4 stx %g1, [%i0+16] srax %o1, %l2, %g3 mov -1, %g1 or %g2, %g3, %g2 sllx %g1, %g5, %g1 stx %g2, [%i0+8] and %g1, %g4, %g1 xor %o7, %g1, %o7 ba,pt %xcc, L(L38) stx %o7, [%i0+24] L(L83): srax %o3, %l4, %l2 mov 64, %g1 sub %g1, %l4, %g1 sllx %o3, %g1, %o7 sllx %o0, %g1, %g2 sllx %o1, %g1, %g3 sllx %o2, %g1, %g1 or %g1, %l2, %g1 ldx [%i0+32], %l0 sllx %g4, 3, %l1 xor %l0, %o7, %o7 sub %g0, %l1, %l1 stx %g1, [%i0+24] srax %o1, %l4, %g4 srax %o2, %l4, %g5 or %g2, %g4, %g2 or %g3, %g5, %g3 mov -1, %g1 stx %g2, [%i0+8] sllx %g1, %l1, %g1 stx %g3, [%i0+16] and %g1, %o7, %g1 xor %l0, %g1, %l0 ba,pt %xcc, L(L38) stx %l0, [%i0+32] FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-alpha-macro.S0000664000000000000000000000534514662622066015222 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl avcall_call .ent avcall_call avcall_call: .frame $15,32,$26,0 .mask 0x4008200,-32 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $avcall_call..ng: lda $30,-32($30) ldq $1,40($16) ldq $3,48($16) stq $9,8($30) mov $16,$9 stq $15,16($30) mov $30,$15 subq $1,$3,$1 stq $26,0($30) .prologue 1 srl $1,3,$1 lda $30,-2064($30) addl $31,$1,$7 cmple $7,6,$2 bne $2,$L2 mov $30,$5 lda $6,6($31) lda $4,48($3) .align 4 $L4: lda $6,1($6) ldq $1,0($4) cmpeq $7,$6,$2 lda $4,8($4) stq $1,0($5) lda $5,8($5) beq $2,$L4 $L2: .set macro ldq $16,0($3) ldt $f16,0($3) .set nomacro lda $1,8($3) .set macro ldq $17,0($1) ldt $f17,0($1) .set nomacro lda $2,16($3) .set macro ldq $18,0($2) ldt $f18,0($2) .set nomacro lda $1,24($3) .set macro ldq $19,0($1) ldt $f19,0($1) .set nomacro lda $2,32($3) .set macro ldq $20,0($2) ldt $f20,0($2) .set nomacro lda $3,40($3) .set macro ldq $21,0($3) ldt $f21,0($3) .set nomacro ldq $27,8($9) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 mov $1,$4 ldl $1,24($9) zapnot $1,15,$3 cmpeq $3,1,$2 bne $2,$L5 cmpeq $3,2,$1 bne $1,$L50 cmpeq $3,3,$1 bne $1,$L50 cmpeq $3,4,$1 bne $1,$L50 cmpeq $3,5,$1 bne $1,$L52 cmpeq $3,6,$1 bne $1,$L52 cmpeq $3,7,$1 bne $1,$L53 cmpeq $3,8,$1 bne $1,$L53 cmpeq $3,9,$1 bne $1,$L54 cmpeq $3,10,$1 bne $1,$L54 cmpeq $3,11,$1 bne $1,$L54 cmpeq $3,12,$1 bne $1,$L54 cmpeq $3,13,$1 bne $1,$L56 cmpeq $3,14,$1 bne $1,$L57 cmpeq $3,15,$1 bne $1,$L54 cmpeq $3,16,$1 beq $1,$L5 .align 3 #realign lda $1,512($31) ldl $2,0($9) and $1,$2,$1 beq $1,$L5 ldq $2,32($9) cmpeq $2,1,$1 bne $1,$L50 cmpeq $2,2,$1 bne $1,$L52 cmpeq $2,4,$1 bne $1,$L53 cmpeq $2,8,$1 bne $1,$L54 cmpeq $2,16,$1 beq $1,$L5 ldq $1,16($9) stq $4,8($1) cpys $f31,$f31,$f31 stq $0,0($1) br $31,$L5 .align 4 $L50: ldq $1,16($9) bis $31,$31,$31 insbl $0,$1,$3 ldq_u $2,0($1) mskbl $2,$1,$2 bis $3,$2,$3 stq_u $3,0($1) $L5: mov $15,$30 mov $31,$0 ldq $26,0($30) ldq $9,8($30) ldq $15,16($30) lda $30,32($30) ret $31,($26),1 $L52: mov $15,$30 ldq $1,16($9) inswl $0,$1,$3 ldq_u $2,0($1) mov $31,$0 mskwl $2,$1,$2 bis $3,$2,$3 stq_u $3,0($1) ldq $26,0($30) ldq $9,8($30) ldq $15,16($30) lda $30,32($30) ret $31,($26),1 $L54: ldq $1,16($9) stq $0,0($1) br $31,$L5 $L53: ldq $1,16($9) bis $31,$31,$31 stl $0,0($1) br $31,$L5 $L56: cvtts $f0,$f0 ldq $1,16($9) sts $f0,0($1) br $31,$L5 $L57: ldq $1,16($9) bis $31,$31,$31 stt $f0,0($1) br $31,$L5 .end avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-hppa-linux.s0000664000000000000000000001050614662622066015156 00000000000000 .LEVEL 1.1 .text .align 4 .globl avcall_call .type avcall_call,@function avcall_call: .PROC .CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,128(%r30) stw %r5,8(%r3) ldo -48(%r30),%r24 ldo 15(%r24),%r21 copy %r19,%r5 stw %r4,12(%r3) copy %r21,%r24 depi 0,31,4,%r24 copy %r26,%r4 stw %r19,-32(%r30) ldo 1104(%r24),%r24 ldw 28(%r26),%r22 ldw 20(%r26),%r20 sub %r22,%r20,%r20 extrs %r20,29,30,%r25 sub %r0,%r25,%r23 comib,<= -4,%r23,.L57 ldo 1088(%r30),%r30 copy %r22,%r29 .L6: zdep %r23,29,30,%r20 ldo 1(%r23),%r23 addl %r20,%r29,%r22 addl %r20,%r24,%r20 ldw 0(%r22),%r21 comib,> -4,%r23,.L6 stw %r21,0(%r20) .L56: ldw 12(%r4),%r21 ldi 16,%r20 comb,=,n %r20,%r21,.L62 .L7: comib,>=,n 0,%r25,.L8 ldw 48(%r4),%r21 extrs,>= %r21,31,1,%r0 fldws -4(%r29),%fr4L .L9: comib,>=,n 1,%r25,.L8 extrs,>= %r21,30,1,%r0 fldws -8(%r29),%fr5L .L11: ldw 52(%r4),%r22 ldi 2,%r20 and %r22,%r20,%r20 comiclr,= 0,%r20,%r0 fldds -8(%r29),%fr5 .L12: comib,>=,n 2,%r25,.L8 extrs,>= %r21,29,1,%r0 fldws -12(%r29),%fr6L .L14: comib,>=,n 3,%r25,.L8 extrs,>= %r21,28,1,%r0 fldws -16(%r29),%fr7L .L16: ldi 8,%r20 and %r22,%r20,%r20 comiclr,= 0,%r20,%r0 fldds -16(%r29),%fr7 .L8: ldw -16(%r29),%r23 ldw -4(%r29),%r26 ldw -8(%r29),%r25 ldw -12(%r29),%r24 ldw 4(%r4),%r22 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 12(%r4),%r21 copy %r5,%r19 comib,= 1,%r21,.L19 copy %r28,%r2 comib,=,n 2,%r21,.L60 comib,=,n 3,%r21,.L60 comib,=,n 4,%r21,.L60 comib,=,n 5,%r21,.L59 comib,=,n 6,%r21,.L59 comib,=,n 7,%r21,.L61 comib,=,n 8,%r21,.L61 comib,=,n 9,%r21,.L61 comib,=,n 10,%r21,.L61 ldo -11(%r21),%r20 comib,<<,n 1,%r20,.L38 ldw 8(%r4),%r20 stw %r29,4(%r20) .L58: stw %r2,0(%r20) .L19: ldw -20(%r3),%r2 .L65: ldi 0,%r28 ldw 8(%r3),%r5 ldw 12(%r3),%r4 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 .L38: comib,=,n 13,%r21,.L63 comib,=,n 14,%r21,.L64 comib,=,n 15,%r21,.L61 ldi 16,%r20 comb,<>,n %r20,%r21,.L65 ldw -20(%r3),%r2 ldw 0(%r4),%r20 bb,>=,n %r20,30,.L65 ldw -20(%r3),%r2 ldw 16(%r4),%r22 ldo -1(%r22),%r20 comib,<<,n 7,%r20,.L65 ldw -20(%r3),%r2 ldw 8(%r4),%r20 extru %r20,31,2,%r26 copy %r20,%r4 depi 0,31,2,%r4 comib,<< 4,%r22,.L49 addl %r26,%r22,%r21 comib,<< 4,%r21,.L50 zdep %r21,28,29,%r20 ldo -1(%r20),%r25 zdep %r26,28,29,%r21 mtsar %r25 ldw 0(%r4),%r23 zvdep %r28,32,%r20 mtsar %r21 zvdepi 2,32,%r21 xor %r23,%r20,%r20 mtsar %r25 zvdepi 1,32,%r22 sub %r21,%r22,%r21 and %r20,%r21,%r20 xor %r23,%r20,%r23 b .L19 stw %r23,0(%r4) .L50: subi 63,%r20,%r31 zdep %r26,28,29,%r26 ldo -33(%r20),%r20 ldw 0(%r4),%r25 mtsar %r20 ldw 4(%r4),%r24 zvdep %r28,32,%r23 mtsar %r26 zvdepi 2,32,%r22 xor %r24,%r23,%r23 mtsar %r31 ldo -1(%r22),%r22 vextrs %r28,32,%r21 mtsar %r20 zvdepi 1,32,%r20 xor %r25,%r21,%r21 sub %r0,%r20,%r20 and %r21,%r22,%r21 and %r23,%r20,%r23 xor %r25,%r21,%r25 xor %r24,%r23,%r24 stw %r25,0(%r4) b .L19 stw %r24,4(%r4) .L49: zdep %r26,28,29,%r26 mtsar %r26 zvdepi 2,32,%r20 comib,<< 8,%r21,.L53 ldo -1(%r20),%r25 zdep %r21,29,30,%r20 subi 47,%r20,%r24 zdep %r21,28,29,%r21 mtsar %r24 ldo -33(%r21),%r26 vextrs %r29,32,%r22 vextrs %r22,32,%r22 mtsar %r26 ldw 0(%r4),%r24 ldw 4(%r4),%r23 zvdep %r28,32,%r20 or %r20,%r22,%r20 zvdep %r29,32,%r29 zvdepi 1,32,%r21 xor %r24,%r20,%r20 xor %r23,%r29,%r29 sub %r0,%r21,%r21 and %r20,%r25,%r20 and %r29,%r21,%r29 xor %r24,%r20,%r24 xor %r23,%r29,%r23 stw %r24,0(%r4) b .L19 stw %r23,4(%r4) .L53: zdep %r21,28,29,%r20 ldo -65(%r20),%r31 subi 95,%r20,%r26 ldw 8(%r4),%r23 mtsar %r31 ldw 0(%r4),%r24 zvdep %r29,32,%r22 zvdepi 1,32,%r21 xor %r23,%r22,%r22 mtsar %r26 sub %r0,%r21,%r21 vextrs %r28,32,%r20 and %r22,%r21,%r22 mtsar %r31 xor %r24,%r20,%r20 zvdep %r28,32,%r21 and %r20,%r25,%r20 mtsar %r26 xor %r24,%r20,%r24 vextrs %r29,32,%r29 xor %r23,%r22,%r23 or %r21,%r29,%r21 stw %r23,8(%r4) stw %r24,0(%r4) b .L19 stw %r21,4(%r4) .L61: b .L58 ldw 8(%r4),%r20 .L64: ldw 8(%r4),%r20 b .L19 fstds %fr4,0(%r20) .L63: ldw 8(%r4),%r20 b .L19 fstws %fr4L,0(%r20) .L59: ldw 8(%r4),%r20 b .L19 sth %r2,0(%r20) .L60: ldw 8(%r4),%r20 b .L19 stb %r2,0(%r20) .L62: b .L7 ldw 8(%r4),%r28 .L57: b .L56 ldw 28(%r26),%r29 .EXIT .PROCEND .Lfe1: .size avcall_call,.Lfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/minitests-c++.cc0000664000000000000000000000133213347755263014343 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "minitests.c" libffcall-2.5/avcall/avcall-arm64.c0000664000000000000000000003637014662613003014000 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!! Foreign function interface for a Linux arm64 (a.k.a. aarch64) with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. ARM64 Argument Passing Conventions are documented in http://infocenter.arm.com/help/topic/com.arm.doc.ihi0055b/IHI0055B_aapcs64.pdf. Up to 8 words are passed in integer registers (x0, ..., x7). Up to 8 float/double arguments are passed in floating point / SIMD registers (v0/q0/d0/s0, ..., v7/q7/d7/s7). Arguments passed on the stack have 8-bytes alignment (but on macOS only 4-bytes alignment). Structure args larger than 16 bytes are passed as pointers to caller-made local copies. (§ 5.4.2 rule B.3) Structure args <= 16 bytes are passed as up to two words in registers (§ 5.4.2 rule C.10) or otherwise on the stack (§ 5.4.2 rule C.13). Integers are returned in x0, x1. Float/double values are returned in d0/s0, d1/s1. Structures <= 16 bytes are returned in registers. To return a structure larger than 16 bytes, the called function copies the value to space pointed to by x8. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avword* sret __asm__("x8"); /* structure return pointer */ register __avrword iarg1 __asm__("x0"); register __avrword iarg2 __asm__("x1"); register __avrword iarg3 __asm__("x2"); register __avrword iarg4 __asm__("x3"); register __avrword iarg5 __asm__("x4"); register __avrword iarg6 __asm__("x5"); register __avrword iarg7 __asm__("x6"); register __avrword iarg8 __asm__("x7"); register float farg1 __asm__("s0"); register float farg2 __asm__("s1"); register float farg3 __asm__("s2"); register float farg4 __asm__("s3"); register float farg5 __asm__("s4"); register float farg6 __asm__("s5"); register float farg7 __asm__("s6"); register float farg8 __asm__("s7"); register double darg1 __asm__("d0"); register double darg2 __asm__("d1"); register double darg3 __asm__("d2"); register double darg4 __asm__("d3"); register double darg5 __asm__("d4"); register double darg6 __asm__("d5"); register double darg7 __asm__("d6"); register double darg8 __asm__("d7"); int avcall_call(av_alist* list) { register __avword* sp __asm__("sp"); /* C names for registers */ register __avrword iretreg __asm__("x0"); register __avrword iret2reg __asm__("x1"); register double dret __asm__("d0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int ianum = l->ianum; unsigned int fanum = l->fanum; __avrword iret, iret2; { int i; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; } /* Put up to 8 integer args into registers. */ if (ianum >= 1) { iarg1 = l->iargs[0]; if (ianum >= 2) { iarg2 = l->iargs[1]; if (ianum >= 3) { iarg3 = l->iargs[2]; if (ianum >= 4) { iarg4 = l->iargs[3]; if (ianum >= 5) { iarg5 = l->iargs[4]; if (ianum >= 6) { iarg6 = l->iargs[5]; if (ianum >= 7) { iarg7 = l->iargs[6]; if (ianum >= 8) { iarg8 = l->iargs[7]; } } } } } } } } /* Put upto 8 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; if (fanum >= 3) { if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2]; else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2]; if (fanum >= 4) { if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3]; else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3]; if (fanum >= 5) { if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4]; else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4]; if (fanum >= 6) { if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5]; else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5]; if (fanum >= 7) { if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6]; else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6]; if (fanum >= 8) { if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7]; else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7]; } } } } } } } } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { iret = (*l->func)(); iret2 = iret2reg; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-riscv32-ilp32d-macro.S0000664000000000000000000001012514662622067016514 00000000000000 .file "avcall-riscv32.c" .option pic .text .align 1 .globl avcall_call .type avcall_call, @function avcall_call: add sp,sp,-32 sw ra,28(sp) sw s0,24(sp) sw s1,20(sp) sw s2,16(sp) sw s3,12(sp) sw s4,8(sp) add s0,sp,32 lw t2,24(a0) lw t0,20(a0) li t3,32 mv s1,a0 sub t0,t0,t2 add sp,sp,-1040 lw ra,40(a0) ble t0,t3,.L2 mv t1,sp sra t6,t0,2 add t4,t2,32 li t3,8 .L3: lw t5,0(t4) add t3,t3,1 add t4,t4,4 sw t5,0(t1) add t1,t1,4 bgt t6,t3,.L3 .L4: li t1,4 lw a0,0(t2) bgt t0,t1,.L79 .L5: beqz ra,.L8 lw t1,48(s1) and t3,t1,1 beqz t3,.L9 fld fa0,88(s1) .L10: li t3,1 bleu ra,t3,.L8 and t3,t1,2 bnez t3,.L80 lw t3,44(s1) and t3,t3,2 beqz t3,.L13 flw fa1,56(s1) .L13: li t3,2 beq ra,t3,.L8 and t3,t1,4 beqz t3,.L14 fld fa2,104(s1) .L15: li t3,3 beq ra,t3,.L8 and t3,t1,8 bnez t3,.L81 lw t3,44(s1) and t3,t3,8 beqz t3,.L17 flw fa3,64(s1) .L17: li t3,4 beq ra,t3,.L8 and t3,t1,16 beqz t3,.L18 fld fa4,120(s1) .L19: li t3,5 beq ra,t3,.L8 and t3,t1,32 beqz t3,.L20 fld fa5,128(s1) .L21: li t3,6 beq ra,t3,.L8 and t3,t1,64 beqz t3,.L22 fld fa6,136(s1) .L23: li t3,7 beq ra,t3,.L8 and t1,t1,128 beqz t1,.L24 fld fa7,144(s1) .L8: lw t1,12(s1) li t3,13 lw t4,4(s1) bne t1,t3,.L25 lw s1,8(s1) jalr t4 fsw fa0,0(s1) .L26: add sp,s0,-32 lw ra,28(sp) li a0,0 lw s0,24(sp) lw s1,20(sp) lw s2,16(sp) lw s3,12(sp) lw s4,8(sp) add sp,sp,32 jr ra .L79: li t1,8 lw a1,4(t2) ble t0,t1,.L5 li t1,12 lw a2,8(t2) ble t0,t1,.L5 li t1,16 lw a3,12(t2) ble t0,t1,.L5 li t1,20 lw a4,16(t2) ble t0,t1,.L5 li t1,24 lw a5,20(t2) ble t0,t1,.L5 li t1,28 lw a6,24(t2) ble t0,t1,.L5 lw a7,28(t2) j .L5 .L9: lw t3,44(s1) and t3,t3,1 beqz t3,.L10 flw fa0,52(s1) j .L10 .L25: li t3,14 beq t1,t3,.L82 jalr t4 lw t1,12(s1) li t4,1 mv t3,a0 beq t1,t4,.L26 li t4,2 beq t1,t4,.L72 li t4,3 beq t1,t4,.L72 li t4,4 beq t1,t4,.L72 li t4,5 beq t1,t4,.L73 li t4,6 beq t1,t4,.L73 li t4,7 beq t1,t4,.L77 li t4,8 beq t1,t4,.L77 li t4,9 beq t1,t4,.L77 li t4,10 beq t1,t4,.L77 add t6,t1,-11 li t4,1 bleu t6,t4,.L83 li t6,15 beq t1,t6,.L77 li t6,16 bne t1,t6,.L26 lw t1,0(s1) and t1,t1,2 beqz t1,.L26 lw s3,16(s1) li t1,7 add t6,s3,-1 bgtu t6,t1,.L26 lw t6,8(s1) li s4,4 and t0,t6,-4 lw t2,0(t0) and t6,t6,3 sll s2,t6,3 sll s1,a0,s2 add t1,s3,t6 sll t4,t4,s2 xor s1,s1,t2 bgtu s3,s4,.L39 bgtu t1,s4,.L40 sll t1,t1,3 add t3,t1,-1 li t1,2 sll t1,t1,t3 sub t1,t1,t4 and t1,t1,s1 xor t1,t1,t2 sw t1,0(t0) j .L26 .L80: fld fa1,96(s1) j .L13 .L82: lw s1,8(s1) jalr t4 fsd fa0,0(s1) j .L26 .L72: lw t1,8(s1) sb t3,0(t1) j .L26 .L2: blez t0,.L5 j .L4 .L14: lw t3,44(s1) and t3,t3,4 beqz t3,.L15 flw fa2,60(s1) j .L15 .L81: fld fa3,112(s1) j .L17 .L73: lw t1,8(s1) sh t3,0(t1) j .L26 .L18: lw t3,44(s1) and t3,t3,16 beqz t3,.L19 flw fa4,68(s1) j .L19 .L77: lw t1,8(s1) sw t3,0(t1) j .L26 .L20: lw t3,44(s1) and t3,t3,32 beqz t3,.L21 flw fa5,72(s1) j .L21 .L22: lw t3,44(s1) and t3,t3,64 beqz t3,.L23 flw fa6,76(s1) j .L23 .L24: lw t1,44(s1) and t1,t1,128 beqz t1,.L8 flw fa7,80(s1) j .L8 .L83: lw t1,8(s1) sw a0,0(t1) sw a1,4(t1) j .L26 .L40: li t5,-8 mul t6,t6,t5 lw s2,4(t0) sll t1,t1,3 add t5,t1,-33 li t1,2 sll t1,t1,t5 sub t4,zero,t4 add t1,t1,-1 and t4,t4,s1 xor t4,t4,t2 sra t3,a0,t6 xor t3,t3,s2 and t1,t1,t3 xor t1,t1,s2 sw t4,0(t0) sw t1,4(t0) j .L26 .L39: sub t4,zero,t4 and t4,t4,s1 xor t4,t4,t2 sw t4,0(t0) li t4,8 sll s1,a1,s2 bleu t1,t4,.L84 li t4,-8 mul t6,t6,t4 sll t1,t1,3 li t2,2 add t1,t1,-65 lw s2,8(t0) sll t1,t2,t1 add t2,t1,-1 add t1,t6,32 sra t4,a1,t1 xor t4,t4,s2 sra t1,a0,t1 and t3,t2,t4 or t1,t1,s1 xor t3,t3,s2 sw t1,4(t0) sw t3,8(t0) j .L26 .L84: li t4,-4 mul t4,t6,t4 sll t1,t1,3 lw t6,4(t0) add t5,t1,-33 li t1,2 sll t1,t1,t5 add t1,t1,-1 add t4,t4,16 sra t3,a0,t4 sra t3,t3,t4 or t3,t3,s1 xor t3,t3,t6 and t1,t1,t3 xor t1,t1,t6 sw t1,4(t0) j .L26 .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-s390x.c0000664000000000000000000001426014662613003013727 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!! Foreign function interface for an s390x 64-bit CPU. This calls a C function with an argument list built up using macros defined in avcall.h. s390x 64-bit Argument Passing Conventions * Arguments: - The first 5 integer or pointer arguments get passed in r2, r3, r4, r5, r6; the remaining ones (as an entire word each) on the stack. - The first 4 float or double arguments get passed in f0, f2, f4, f6; the remaining ones on the stack (as an entire word each, floats in the upper half of a word). - Structures of sizes 1, 2, 4, 8 are passed as follows: - Structures consisting only of a float or double are passed like an immediate float or double, that is, in f0, f2, f4, f6 and on the stack (floats in the upper half of their respective word). But we don't support this kind of structure. - Other structures get passed as an entire word, like integers and pointers. When in r2, ..., r6: as the 8*sizeof(S) low bits of the register (a.k.a. "right-adjusted"). When on the stack: they occupy an entire word and are adjusted on the high end of the word: - sizeof(S) == 1: at an address == 7 mod 8, - sizeof(S) == 2: at an address == 6 mod 8, - sizeof(S) == 4: at an address == 4 mod 8, - Structures of other sizes are passed as references. * Return value: - An integer or pointer is returned in r2. - A float or double is returned in f0. - Structure return convention: The caller passes a pointer to the destination area (quasi as an additional first pointer argument) in r2. The callee fills it and returns the same pointer in r2. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avrword iarg1 __asm__("r2"); register __avrword iarg2 __asm__("r3"); register __avrword iarg3 __asm__("r4"); register __avrword iarg4 __asm__("r5"); register __avrword iarg5 __asm__("r6"); register float farg1 __asm__("f0"); register float farg2 __asm__("f2"); register float farg3 __asm__("f4"); register float farg4 __asm__("f6"); register double darg1 __asm__("f0"); register double darg2 __asm__("f2"); register double darg3 __asm__("f4"); register double darg4 __asm__("f6"); int avcall_call(av_alist* list) { register __avword* sp __asm__("r15"); /* C names for registers */ register __avrword iretreg __asm__("r2"); register double dret __asm__("f0"); /* We need to put a value in r6, but it's a call-saved register. */ __avrword saved_iarg5 = iarg5; __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int ianum = l->ianum; unsigned int fanum = l->fanum; { int i; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; } /* Put up to 5 integer args into registers. */ if (ianum >= 1) { iarg1 = l->iargs[0]; if (ianum >= 2) { iarg2 = l->iargs[1]; if (ianum >= 3) { iarg3 = l->iargs[2]; if (ianum >= 4) { iarg4 = l->iargs[3]; if (ianum >= 5) { iarg5 = l->iargs[4]; } } } } } /* Put upto 4 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; if (fanum >= 3) { if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2]; else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2]; if (fanum >= 4) { if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3]; else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3]; } } } } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { __avrword iret = (*l->func)(); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { /* normal struct return convention */ } } iarg5 = saved_iarg5; return 0; } libffcall-2.5/avcall/avcall-powerpc64-elfv2-linux.S0000664000000000000000000001740314662622066017036 00000000000000#ifdef __LITTLE_ENDIAN__ .file "avcall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl avcall_call .type avcall_call, @function avcall_call: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry avcall_call,.-avcall_call mflr 0 std 30,-16(1) std 31,-8(1) mr 30,3 std 0,16(1) stdu 1,-112(1) ld 3,48(3) ld 9,40(30) mr 31,1 ld 10,0(1) subf 9,3,9 stdu 10,-2064(1) sradi 9,9,3 cmpwi 7,9,8 ble 7,.L6 addi 10,9,-9 addi 8,1,96 addi 9,3,56 rldicl 10,10,0,32 addi 8,8,-8 addi 10,10,8 sldi 10,10,3 add 10,3,10 .p2align 4,,15 .L5: ldu 7,8(9) cmpld 7,10,9 stdu 7,8(8) bne 7,.L5 .L6: ld 10,64(30) addi 9,30,72 subf 9,9,10 sradi 9,9,3 extsw 9,9 cmpwi 7,9,0 ble 7,.L4 cmpwi 7,9,1 beq 7,.L7 cmpwi 7,9,2 beq 7,.L8 cmpwi 7,9,3 beq 7,.L9 cmpwi 7,9,4 beq 7,.L10 cmpwi 7,9,5 beq 7,.L11 cmpwi 7,9,6 beq 7,.L12 cmpwi 7,9,7 beq 7,.L13 cmpwi 7,9,8 beq 7,.L14 cmpwi 7,9,9 beq 7,.L15 cmpwi 7,9,10 beq 7,.L16 cmpwi 7,9,11 beq 7,.L17 cmpwi 7,9,12 beq 7,.L18 lfd 13,168(30) .L18: lfd 12,160(30) .L17: lfd 11,152(30) .L16: lfd 10,144(30) .L15: lfd 9,136(30) .L14: lfd 8,128(30) .L13: lfd 7,120(30) .L12: lfd 6,112(30) .L11: lfd 5,104(30) .L10: lfd 4,96(30) .L9: lfd 3,88(30) .L8: lfd 2,80(30) .L7: lfd 1,72(30) .L4: ld 11,8(30) ld 9,48(3) ld 10,56(3) ld 8,40(3) ld 7,32(3) ld 6,24(3) ld 5,16(3) ld 4,8(3) mtctr 11 ld 3,0(3) mr 12,11 std 2,24(1) bctrl ld 2,24(1) lwz 9,24(30) cmplwi 7,9,1 beq 7,.L19 cmplwi 7,9,2 beq 7,.L43 cmplwi 7,9,3 beq 7,.L43 cmplwi 7,9,4 beq 7,.L43 cmplwi 7,9,5 beq 7,.L44 cmplwi 7,9,6 beq 7,.L44 cmplwi 7,9,7 beq 7,.L45 cmplwi 7,9,8 beq 7,.L45 cmplwi 7,9,9 beq 7,.L49 cmplwi 7,9,10 beq 7,.L49 cmplwi 7,9,11 beq 7,.L49 cmplwi 7,9,12 beq 7,.L49 cmplwi 7,9,13 beq 7,.L51 cmplwi 7,9,14 beq 7,.L52 cmplwi 7,9,15 beq 7,.L49 cmplwi 7,9,16 bne 7,.L19 lwz 9,0(30) rldicl. 10,9,55,63 beq 0,.L19 ld 10,32(30) addi 9,10,-1 cmpldi 7,9,15 bgt 7,.L19 ld 8,16(30) cmpldi 7,10,8 rldicl 9,8,0,61 rldicr 8,8,0,60 add 10,10,9 bgt 7,.L34 cmpldi 7,10,8 bgt 7,.L35 slwi 10,10,3 li 7,2 ld 6,0(8) slwi 9,9,3 addi 10,10,-1 sld 10,7,10 li 7,1 sld 7,7,9 sld 9,3,9 subf 10,7,10 xor 9,9,6 and 9,10,9 xor 9,9,6 std 9,0(8) .L19: addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L43: ld 9,16(30) stb 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L45: ld 9,16(30) stw 3,0(9) b .L19 .p2align 4,,15 .L44: ld 9,16(30) sth 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L49: ld 9,16(30) std 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L52: ld 9,16(30) stfd 1,0(9) b .L19 .L51: ld 9,16(30) stfs 1,0(9) b .L19 .L34: rldicl 9,9,0,32 ld 11,0(8) li 6,-1 cmpldi 7,10,16 slwi 5,9,3 sld 7,3,5 sld 6,6,5 xor 7,7,11 and 7,6,7 xor 7,7,11 std 7,0(8) ble 7,.L53 mulli 9,9,-8 ld 11,16(8) slwi 10,10,3 li 7,2 addi 10,10,-129 addi 9,9,64 sld 7,7,10 srad 6,4,9 srad 3,3,9 addi 7,7,-1 sld 9,4,5 xor 10,6,11 or 9,3,9 and 10,7,10 std 9,8(8) xor 10,10,11 std 10,16(8) b .L19 .L35: rldicl 9,9,0,32 slwi 10,10,3 ld 11,0(8) ld 4,8(8) li 7,2 mulli 6,9,-8 addi 10,10,-65 slwi 9,9,3 sld 10,7,10 sld 5,3,9 li 7,-1 addi 6,6,64 addi 10,10,-1 sld 7,7,9 srad 3,3,6 xor 6,5,11 xor 9,3,4 and 7,7,6 and 9,10,9 xor 10,7,11 xor 9,9,4 std 10,0(8) std 9,8(8) b .L19 .L53: mulli 9,9,-4 slwi 10,10,3 ld 11,8(8) sld 4,4,5 addi 10,10,-65 li 6,2 addi 9,9,32 sld 10,6,10 srad 3,3,9 srad 9,3,9 or 7,9,4 addi 9,10,-1 xor 10,7,11 and 9,10,9 xor 9,9,11 std 9,8(8) b .L19 .long 0 .byte 0,0,0,1,128,2,0,0 .size avcall_call,.-avcall_call #else .file "avcall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl avcall_call .type avcall_call, @function avcall_call: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry avcall_call,.-avcall_call mflr 0 std 30,-16(1) std 31,-8(1) mr 30,3 std 0,16(1) stdu 1,-112(1) ld 3,48(3) ld 9,40(30) mr 31,1 ld 10,0(1) subf 9,3,9 stdu 10,-2064(1) sradi 9,9,3 cmpwi 7,9,8 ble 7,.L6 addi 10,9,-9 addi 8,1,96 addi 9,3,56 rldicl 10,10,0,32 addi 8,8,-8 addi 10,10,8 sldi 10,10,3 add 10,3,10 .p2align 4,,15 .L5: ldu 7,8(9) cmpld 7,10,9 stdu 7,8(8) bne 7,.L5 .L6: ld 10,64(30) addi 9,30,72 subf 9,9,10 sradi 9,9,3 extsw 9,9 cmpwi 7,9,0 ble 7,.L4 cmpwi 7,9,1 beq 7,.L7 cmpwi 7,9,2 beq 7,.L8 cmpwi 7,9,3 beq 7,.L9 cmpwi 7,9,4 beq 7,.L10 cmpwi 7,9,5 beq 7,.L11 cmpwi 7,9,6 beq 7,.L12 cmpwi 7,9,7 beq 7,.L13 cmpwi 7,9,8 beq 7,.L14 cmpwi 7,9,9 beq 7,.L15 cmpwi 7,9,10 beq 7,.L16 cmpwi 7,9,11 beq 7,.L17 cmpwi 7,9,12 beq 7,.L18 lfd 13,168(30) .L18: lfd 12,160(30) .L17: lfd 11,152(30) .L16: lfd 10,144(30) .L15: lfd 9,136(30) .L14: lfd 8,128(30) .L13: lfd 7,120(30) .L12: lfd 6,112(30) .L11: lfd 5,104(30) .L10: lfd 4,96(30) .L9: lfd 3,88(30) .L8: lfd 2,80(30) .L7: lfd 1,72(30) .L4: ld 11,8(30) ld 9,48(3) ld 10,56(3) ld 8,40(3) ld 7,32(3) ld 6,24(3) ld 5,16(3) ld 4,8(3) mtctr 11 ld 3,0(3) mr 12,11 std 2,24(1) bctrl ld 2,24(1) lwz 9,24(30) cmplwi 7,9,1 beq 7,.L19 cmplwi 7,9,2 beq 7,.L43 cmplwi 7,9,3 beq 7,.L43 cmplwi 7,9,4 beq 7,.L43 cmplwi 7,9,5 beq 7,.L44 cmplwi 7,9,6 beq 7,.L44 cmplwi 7,9,7 beq 7,.L45 cmplwi 7,9,8 beq 7,.L45 cmplwi 7,9,9 beq 7,.L49 cmplwi 7,9,10 beq 7,.L49 cmplwi 7,9,11 beq 7,.L49 cmplwi 7,9,12 beq 7,.L49 cmplwi 7,9,13 beq 7,.L51 cmplwi 7,9,14 beq 7,.L52 cmplwi 7,9,15 beq 7,.L49 cmplwi 7,9,16 bne 7,.L19 lwz 9,0(30) rldicl. 10,9,55,63 beq 0,.L19 ld 9,32(30) addi 10,9,-1 cmpldi 7,10,15 bgt 7,.L19 ld 7,16(30) cmpldi 7,9,8 rldicl 8,7,0,61 rldicr 7,7,0,60 add 9,9,8 bgt 7,.L34 cmpldi 7,9,8 bgt 7,.L35 mulli 8,8,-8 mulli 9,9,-8 ld 6,0(7) addi 10,8,63 li 8,2 addi 9,9,64 sld 10,8,10 li 8,1 sld 8,8,9 sld 9,3,9 subf 10,8,10 xor 9,9,6 and 9,10,9 xor 9,9,6 std 9,0(7) .L19: addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L43: ld 9,16(30) stb 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L45: ld 9,16(30) stw 3,0(9) b .L19 .p2align 4,,15 .L44: ld 9,16(30) sth 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L49: ld 9,16(30) std 3,0(9) addi 1,31,112 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L52: ld 9,16(30) stfd 1,0(9) b .L19 .L51: ld 9,16(30) stfs 1,0(9) b .L19 .L34: rldicl 8,8,0,32 cmpldi 7,9,16 mulli 10,8,-8 addi 0,10,63 li 10,2 sld 10,10,0 addi 0,10,-1 ble 7,.L53 mulli 11,8,-4 mulli 10,9,-8 ld 12,0(7) ld 30,16(7) slwi 8,8,3 li 6,-1 addi 9,11,32 addi 10,10,192 srad 5,3,8 srad 8,4,8 sld 11,4,9 sld 6,6,10 xor 5,5,12 sld 3,3,9 sld 11,11,9 and 5,5,0 sld 9,3,9 xor 10,11,30 or 9,9,8 and 10,6,10 xor 6,5,12 std 9,8(7) xor 10,10,30 std 6,0(7) std 10,16(7) b .L19 .L35: rldicl 9,9,0,32 mulli 8,8,-8 ld 4,0(7) ld 5,8(7) mulli 6,9,-8 slwi 9,9,3 addi 10,8,63 addi 9,9,-64 li 8,2 addi 6,6,128 sld 10,8,10 srad 9,3,9 li 8,-1 sld 3,3,6 addi 10,10,-1 xor 9,9,4 sld 8,8,6 xor 6,3,5 and 9,10,9 and 10,8,6 xor 9,9,4 xor 10,10,5 std 9,0(7) std 10,8(7) b .L19 .L53: mulli 6,8,-4 slwi 8,8,3 ld 30,0(7) ld 11,8(7) mulli 9,9,-8 srad 4,4,8 addi 5,6,32 srad 8,3,8 addi 9,9,128 sld 6,3,5 xor 10,8,30 sld 6,6,5 and 10,10,0 or 6,6,4 xor 8,6,11 li 6,-1 sld 9,6,9 and 8,8,9 xor 9,10,30 xor 10,8,11 std 9,0(7) std 10,8(7) b .L19 .long 0 .byte 0,0,0,1,128,2,0,0 .size avcall_call,.-avcall_call #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-hppa.c0000664000000000000000000002767514662613003014007 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a HP Precision Architecture 1.0 with gcc This calls a C function with an argument list built up using macros defined in avcall.h. HPPA Argument Passing Conventions: All arguments, except the first 4 words, are passed on the stack - growing down! - with word alignment. Doubles take two words and force double alignment. Small structures args are passed as true structures embedded in the argument stack. They force double alignment and - if they don't fit entirely in the 4 register words - are passed in memory. The first 2 words are passed like this: %r26 = first integer arg, %r25 = second integer arg, or %r26 = high word of double arg, %r25 = low word of double arg. Similarly for the next 2 words, passed in %r24 and %r23. Note that other calling conventions would be in effect if we would call an explicitly named function! Structures larger than 8 bytes are passed as a pointer. In GCC >= 8 it's a caller-made copy; with GCC < 8 and with HP cc it's the callee's responsibility to make a copy of the structure, so that side effects made by the callee are not visible to the caller. To return a structure of more than 8 bytes, the called function copies the return value to the address supplied in register "%r28". Smaller structures are returned in the registers %r28 (first 4 bytes) and %r29 (next 4 bytes, if present). It is forbidden to modify the stack pointer. Compile this routine with gcc -O2 -fomit-frame-pointer to get the right register variables. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) /* This declaration tells gcc not to modify %r28. */ register __avword* sret __asm__("%r28"); /* structure return pointer */ register float farg1 __asm__("%fr4"); /* fr4L */ register float farg2 __asm__("%fr5"); /* fr5L */ register float farg3 __asm__("%fr6"); /* fr6L */ register float farg4 __asm__("%fr7"); /* fr7L */ register double darg1 __asm__("%fr5"); register double darg2 __asm__("%fr7"); int avcall_call(av_alist* list) { register __avword* sp __asm__("%r30"); /* C names for registers */ register float fret __asm__("%fr4"); register double dret __asm__("%fr4"); /*register __avrword iret1 __asm__("%r28"); */ register __avrword iret2 __asm__("%r29"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ argframe += __AV_ALIST_WORDS + 20; int arglen = l->args_end - l->aptr; __avrword iret; { int i; for (i = -arglen; i < -4; i++) /* push function args onto stack */ argframe[i] = l->args_end[i]; } if (l->rtype == __AVstruct) /* push struct return address */ sret = l->raddr; /* The floats and doubles among the first 4 argument words are passed * - in both general registers and floating-point registers when the * function call is a variadic one, which means: * - for HP cc: the call is done through a function pointer or * directly to a function declared with a varargs prototype, * - for GCC: the function's type is a varargs function. * - in floating-point registers otherwise. * To cover both cases, put these floating-point values into the general * registers and the floating-point registers always. */ if (arglen >= 1) { if (l->farg_mask & (1 << 0)) /*__asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (*(float*)&l->args_end[-1]));*/ farg1 = *((float*)&l->args_end[-1]); if (arglen >= 2) { if (l->farg_mask & (1 << 1)) /* __asm__ __volatile__ ("fldw %0,%%fr5R" : : "m" (*(float*)&l->args_end[-2])); */ farg2 = *((float*)&l->args_end[-2]); if (l->darg_mask & (1 << 1)) darg1 = *((double*)&l->args_end[-2]); if (arglen >= 3) { if (l->farg_mask & (1 << 2)) /* __asm__ __volatile__ ("fldw %0,%%fr6R" : : "m" (*(float*)&l->args_end[-3])); */ farg3 = *((float*)&l->args_end[-3]); if (arglen >= 4) { if (l->farg_mask & (1 << 3)) /* __asm__ __volatile__ ("fldw %0,%%fr7R" : : "m" (*(float*)&l->args_end[-4])); */ farg4 = *((float*)&l->args_end[-4]); if (l->darg_mask & (1 << 3)) darg2 = *((double*)&l->args_end[-4]); } } } } /* call function, pass first 4 arg words in general registers */ iret = (*l->func)(l->args_end[-1], l->args_end[-2], l->args_end[-3], l->args_end[-4]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = iret; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_SMALL_STRUCT_RETURN) { /* cc, c89 and gcc >= 2.7 return structs of size <= 8 in registers. */ if (l->rsize > 0 && l->rsize <= 8) { /* This is really weird code, unlike all other big-endian platforms. */ void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[1] = (unsigned char)(iret); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[3] = (unsigned char)(iret); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[4] = (unsigned char)(iret2); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[1] = (unsigned char)(iret); ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[5] = (unsigned char)(iret2); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[6] = (unsigned char)(iret2); } else if (l->rsize == 8) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[3] = (unsigned char)(iret); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret2); } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (sizeof(__avrword)*8-end_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-sizeof(__avrword)*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (2*sizeof(__avrword)*8-end_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ ((iret << (2*sizeof(__avrword)*8-end_offset*8)) | (iret2 >> (end_offset*4-sizeof(__avrword)*4) >> (end_offset*4-sizeof(__avrword)*4)))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret2 << (2*sizeof(__avrword)*8-end_offset*8))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-2*sizeof(__avrword)*8))) & mask0; wordaddr[1] = (iret << (3*sizeof(__avrword)*8-end_offset*8)) | (iret2 >> (end_offset*8-2*sizeof(__avrword)*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (3*sizeof(__avrword)*8-end_offset*8))) & mask2; } } #endif } } } return 0; } libffcall-2.5/avcall/avcall-mipsn32eb-macro.S0000664000000000000000000002027314662622065015733 00000000000000#include "asm-mips.h" .file 1 "avcall-mipsn32.c" .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,32,$31 .mask 0xd0010000,-8 .fmask 0x00000000,0 lw $5,20($4) lw $12,24($4) lw $2,36($4) addiu $sp,$sp,-32 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp move $16,$4 addiu $sp,$sp,-2064 subu $4,$5,$12 move $3,$sp .set noreorder .set nomacro beq $2,$0,.L2 sra $4,$4,3 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L124 andi $6,$2,0x2 .set macro .set reorder lwc1 $f12,44($16) andi $6,$2,0x2 .L124: .set noreorder .set nomacro beq $6,$0,.L125 andi $6,$2,0x4 .set macro .set reorder lwc1 $f13,48($16) andi $6,$2,0x4 .L125: .set noreorder .set nomacro beq $6,$0,.L126 andi $6,$2,0x8 .set macro .set reorder lwc1 $f14,52($16) andi $6,$2,0x8 .L126: .set noreorder .set nomacro beq $6,$0,.L127 andi $6,$2,0x10 .set macro .set reorder lwc1 $f15,56($16) andi $6,$2,0x10 .L127: .set noreorder .set nomacro beq $6,$0,.L128 andi $6,$2,0x20 .set macro .set reorder lwc1 $f16,60($16) andi $6,$2,0x20 .L128: .set noreorder .set nomacro beq $6,$0,.L129 andi $6,$2,0x40 .set macro .set reorder lwc1 $f17,64($16) andi $6,$2,0x40 .L129: .set noreorder .set nomacro beql $6,$0,.L130 andi $2,$2,0x80 .set macro .set reorder lwc1 $f18,68($16) andi $2,$2,0x80 .L130: bne $2,$0,.L117 .L2: lw $2,40($16) .L123: .set noreorder .set nomacro beql $2,$0,.L122 slt $4,$4,9 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L131 andi $6,$2,0x2 .set macro .set reorder ldc1 $f12,0($12) andi $6,$2,0x2 .L131: .set noreorder .set nomacro beq $6,$0,.L132 andi $6,$2,0x4 .set macro .set reorder ldc1 $f13,8($12) andi $6,$2,0x4 .L132: .set noreorder .set nomacro beq $6,$0,.L133 andi $6,$2,0x8 .set macro .set reorder ldc1 $f14,16($12) andi $6,$2,0x8 .L133: .set noreorder .set nomacro beq $6,$0,.L134 andi $6,$2,0x10 .set macro .set reorder ldc1 $f15,24($12) andi $6,$2,0x10 .L134: .set noreorder .set nomacro beq $6,$0,.L135 andi $6,$2,0x20 .set macro .set reorder ldc1 $f16,32($12) andi $6,$2,0x20 .L135: .set noreorder .set nomacro beq $6,$0,.L136 andi $6,$2,0x40 .set macro .set reorder ldc1 $f17,40($12) andi $6,$2,0x40 .L136: .set noreorder .set nomacro beql $6,$0,.L137 andi $2,$2,0x80 .set macro .set reorder ldc1 $f18,48($12) andi $2,$2,0x80 .L137: bne $2,$0,.L118 slt $4,$4,9 .L122: .set noreorder .set nomacro bne $4,$0,.L22 addiu $2,$12,64 .set macro .set reorder .align 3 .L82: ld $4,0($2) addiu $3,$3,8 addiu $2,$2,8 .set noreorder .set nomacro bne $5,$2,.L82 sd $4,-8($3) .set macro .set reorder .L22: ld $4,0($12) ld $5,8($12) ld $6,16($12) ld $7,24($12) ld $8,32($12) ld $9,40($12) ld $10,48($12) ld $11,56($12) lw $25,4($16) jalr $25 lw $4,12($16) li $5,1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,11 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L120 li $5,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L138 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 lw $4,16($16) .set macro .set reorder lw $3,16($16) li $4,1 .set noreorder .set nomacro beq $3,$4,.L107 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L109 li $4,4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L110 li $4,8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L139 lw $3,8($16) .set macro .set reorder .L19: move $sp,$fp .L138: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L118: ldc1 $f19,56($12) .set noreorder .set nomacro b .L122 slt $4,$4,9 .set macro .set reorder .align 3 .L117: lwc1 $f19,72($16) .set noreorder .set nomacro b .L123 lw $2,40($16) .set macro .set reorder .align 3 .L107: lw $3,8($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L110: lw $3,8($16) sw $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: lw $3,8($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .L120: lw $2,8($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L115: lw $3,8($16) .L139: .set noreorder .set nomacro b .L19 sd $2,0($3) .set macro .set reorder .L119: lw $2,8($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: addiu $5,$4,-1 sltu $5,$5,16 .set noreorder .set nomacro beq $5,$0,.L19 sltu $8,$4,9 .set macro .set reorder lw $6,8($16) li $7,-8 andi $5,$6,0x7 and $7,$6,$7 .set noreorder .set nomacro beq $8,$0,.L41 addu $4,$4,$5 .set macro .set reorder sltu $3,$4,9 .set noreorder .set nomacro beq $3,$0,.L42 subu $6,$0,$5 .set macro .set reorder subu $3,$0,$5 sll $3,$3,3 ld $8,0($7) addiu $3,$3,63 subu $4,$0,$4 li $6,2 dsll $6,$6,$3 sll $4,$4,3 sll $5,$5,3 li $3,1 dsll $3,$3,$4 dsra $2,$2,$5 dsubu $3,$6,$3 xor $2,$2,$8 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,0($7) .set macro .set reorder .L41: subu $9,$0,$5 ld $11,0($7) sll $10,$9,3 addiu $6,$10,63 sll $5,$5,3 li $8,2 dsll $8,$8,$6 dsra $6,$2,$5 daddiu $8,$8,-1 xor $6,$6,$11 and $6,$8,$6 xor $6,$6,$11 sltu $8,$4,17 .set noreorder .set nomacro bne $8,$0,.L121 sd $6,0($7) .set macro .set reorder ld $11,16($7) addiu $6,$10,64 subu $4,$0,$4 move $8,$3 dsll $9,$3,$6 sll $4,$4,3 li $3,-1 dsll $4,$3,$4 xor $3,$9,$11 dsll $2,$2,$6 dsra $5,$8,$5 and $3,$4,$3 or $2,$2,$5 xor $3,$3,$11 sd $2,8($7) .set noreorder .set nomacro b .L19 sd $3,16($7) .set macro .set reorder .L42: ld $9,0($7) ld $8,8($7) sll $6,$6,3 addiu $10,$6,63 sll $3,$5,3 subu $4,$0,$4 li $5,2 dsra $3,$2,$3 dsll $5,$5,$10 dsll $2,$2,$6 sll $4,$4,3 li $6,-1 daddiu $5,$5,-1 xor $3,$3,$9 dsll $4,$6,$4 xor $2,$2,$8 and $3,$5,$3 and $2,$4,$2 xor $3,$3,$9 xor $2,$2,$8 sd $3,0($7) .set noreorder .set nomacro b .L19 sd $2,8($7) .set macro .set reorder .L121: sll $6,$9,2 addiu $6,$6,32 ld $8,8($7) dsll $2,$2,$6 dsll $6,$2,$6 dsra $3,$3,$5 subu $2,$0,$4 or $3,$6,$3 sll $2,$2,3 li $5,-1 xor $3,$3,$8 dsll $2,$5,$2 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,8($7) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-sparc-macro.S0000664000000000000000000000342614662622066015243 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) .proc 04 FUNBEGIN(avcall_call) !$PROLOGUE$ 0 save %sp, -1128, %sp ld [%i0+20], %g3 add %sp, 68, %l1 ld [%i0+24], %o7 ld [%i0+12], %l0 sub %g3, %o7, %g3 cmp %l0, 16 be L(L51) sra %g3, 2, %g4 L(L2): mov 6, %g1 cmp %g1, %g4 bge L(L46) ld [%i0+24], %l0 L(L7): sll %g1, 2, %g3 ld [%l0+%g3], %o7 add %g1, 1, %g1 cmp %g1, %g4 bl L(L7) st %o7, [%l1+%g3] L(L46): ld [%l0+20], %o5 ld [%i0+4], %g3 ld [%l0], %o0 ld [%l0+4], %o1 ld [%l0+8], %o2 ld [%l0+12], %o3 call %g3, 0 ld [%l0+16], %o4 nop ld [%i0+12], %o7 cmp %o7, 1 be L(L9) mov %o0, %l0 cmp %o7, 2 be L(L50) cmp %o7, 3 be L(L50) cmp %o7, 4 be L(L50) cmp %o7, 5 be L(L49) cmp %o7, 6 be L(L49) cmp %o7, 7 be L(L48) cmp %o7, 8 be L(L48) cmp %o7, 9 be L(L48) cmp %o7, 10 be L(L48) add %o7, -11, %g3 cmp %g3, 1 bgu L(L28) cmp %o7, 13 ld [%i0+8], %g3 st %o0, [%g3] b L(L9) st %o1, [%g3+4] L(L28): be L(L52) cmp %o7, 14 be L(L53) cmp %o7, 15 be L(L48) cmp %o7, 16 bne L(L9) nop ld [%i0], %g3 andcc %g3, 2, %g0 be L(L9) nop ld [%i0+16], %g3 cmp %g3, 1 be L(L50) cmp %g3, 2 be L(L49) cmp %g3, 4 bne L(L9) nop L(L48): ld [%i0+8], %g3 b L(L9) st %l0, [%g3] L(L49): ld [%i0+8], %g3 b L(L9) sth %l0, [%g3] L(L50): ld [%i0+8], %g3 b L(L9) stb %l0, [%g3] L(L53): ld [%i0+8], %g3 b L(L9) std %f0, [%g3] L(L52): ld [%i0], %g3 andcc %g3, 32, %g0 bne,a L(L31) fdtos %f0, %f0 L(L31): ld [%i0+8], %g3 b L(L9) st %f0, [%g3] L(L51): ld [%i0+8], %g3 b L(L2) st %g3, [%sp+64] L(L9): ret restore %g0, 0, %o0 L(Lfe1): FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-powerpc64.c0000664000000000000000000005407414662613003014701 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2024 Bruno Haible Copyright 2000 Adam Fedor Copyright 2004 Paul Guyot This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a 64-bit PowerPC with gcc This calls a C function with an argument list built up using macros defined in avcall.h. PowerPC64 Argument Passing Conventions: All arguments, except the first 8 words, are passed on the stack with word alignment. The first 13 doubles and floats are also passed in floating-point-registers. To return a structure, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. The AIX argument passing conventions are used: - the first 13 doubles and floats are passed in FP registers, and when they do, there is still room allocated for them in the argument sequence (integer regs or stack). - Structures are passed in the argument sequence. But structures containing floats or doubles are passed in FP registers?! Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O) to get the right register variables. For other compilers use the pre-compiled assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register double farg1 __asm__("fr1"); register double farg2 __asm__("fr2"); register double farg3 __asm__("fr3"); register double farg4 __asm__("fr4"); register double farg5 __asm__("fr5"); register double farg6 __asm__("fr6"); register double farg7 __asm__("fr7"); register double farg8 __asm__("fr8"); register double farg9 __asm__("fr9"); register double farg10 __asm__("fr10"); register double farg11 __asm__("fr11"); register double farg12 __asm__("fr12"); register double farg13 __asm__("fr13"); int avcall_call(av_alist* list) { register __avword* sp __asm__("r1"); /* C names for registers */ /*register __avrword iret __asm__("r3"); */ register __avrword iret2 __asm__("r4"); register float fret __asm__("fr1"); register double dret __asm__("fr1"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; __avrword iret; int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i-8] = l->args[i]; /* pass first 13 floating-point args in registers */ arglen = l->faptr - l->fargs; if (arglen > 0) { if (arglen > 1) { if (arglen > 2) { if (arglen > 3) { if (arglen > 4) { if (arglen > 5) { if (arglen > 6) { if (arglen > 7) { if (arglen > 8) { if (arglen > 9) { if (arglen > 10) { if (arglen > 11) { if (arglen > 12) { farg13 = l->fargs[12]; } farg12 = l->fargs[11]; } farg11 = l->fargs[10]; } farg10 = l->fargs[9]; } farg9 = l->fargs[8]; } farg8 = l->fargs[7]; } farg7 = l->fargs[6]; } farg6 = l->fargs[5]; } farg5 = l->fargs[4]; } farg4 = l->fargs[3]; } farg3 = l->fargs[2]; } farg2 = l->fargs[1]; } farg1 = l->fargs[0]; } /* call function, pass 8 args in registers */ iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5], l->args[6], l->args[7]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { #ifdef __powerpc64_elfv2__ if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* In the ELFv2 ABI, gcc returns structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if defined(__LITTLE_ENDIAN__) #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif #endif #if defined(__BIG_ENDIAN__) #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[1] = (unsigned char)(iret); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[3] = (unsigned char)(iret); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[4] = (unsigned char)(iret); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[5] = (unsigned char)(iret); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[6] = (unsigned char)(iret); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (sizeof(__avrword)*8-end_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-sizeof(__avrword)*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (2*sizeof(__avrword)*8-end_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] = (iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4))) & mask2; } } #endif #endif } } #endif } return 0; } libffcall-2.5/avcall/avcall-structcpy.c0000664000000000000000000000142414662613003015077 00000000000000/* copy structs */ /* * Copyright 2016 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define __structcpy avcall_structcpy #include "structcpy.c" libffcall-2.5/avcall/avcall-powerpc64-linux.S0000664000000000000000000000517614662622066016026 00000000000000 .file "avcall-powerpc64.c" .machine power4 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl avcall_call .section ".opd","aw" .align 3 avcall_call: .quad .L.avcall_call,.TOC.@tocbase,0 .previous .type avcall_call, @function .L.avcall_call: mflr 0 std 30,-16(1) std 31,-8(1) mr 30,3 std 0,16(1) stdu 1,-128(1) ld 3,48(3) ld 9,40(30) mr 31,1 ld 10,0(1) subf 9,3,9 stdu 10,-2064(1) sradi 9,9,3 cmpwi 7,9,8 ble 7,.L6 addi 10,9,-9 addi 8,1,112 addi 9,3,56 rldicl 10,10,0,32 addi 8,8,-8 addi 10,10,8 sldi 10,10,3 add 10,3,10 .p2align 4,,15 .L5: ldu 7,8(9) cmpld 7,10,9 stdu 7,8(8) bne 7,.L5 .L6: ld 10,64(30) addi 9,30,72 subf 9,9,10 sradi 9,9,3 extsw 9,9 cmpwi 7,9,0 ble 7,.L4 cmpwi 7,9,1 beq 7,.L7 cmpwi 7,9,2 beq 7,.L8 cmpwi 7,9,3 beq 7,.L9 cmpwi 7,9,4 beq 7,.L10 cmpwi 7,9,5 beq 7,.L11 cmpwi 7,9,6 beq 7,.L12 cmpwi 7,9,7 beq 7,.L13 cmpwi 7,9,8 beq 7,.L14 cmpwi 7,9,9 beq 7,.L15 cmpwi 7,9,10 beq 7,.L16 cmpwi 7,9,11 beq 7,.L17 cmpwi 7,9,12 beq 7,.L18 lfd 13,168(30) .L18: lfd 12,160(30) .L17: lfd 11,152(30) .L16: lfd 10,144(30) .L15: lfd 9,136(30) .L14: lfd 8,128(30) .L13: lfd 7,120(30) .L12: lfd 6,112(30) .L11: lfd 5,104(30) .L10: lfd 4,96(30) .L9: lfd 3,88(30) .L8: lfd 2,80(30) .L7: lfd 1,72(30) .L4: ld 9,48(3) ld 10,56(3) ld 8,40(3) ld 7,32(3) ld 6,24(3) ld 5,16(3) ld 4,8(3) ld 3,0(3) std 2,40(1) ld 12,8(30) ld 0,0(12) ld 11,16(12) mtctr 0 ld 2,8(12) bctrl ld 2,40(1) lwz 9,24(30) cmplwi 7,9,1 beq 7,.L19 cmplwi 7,9,2 beq 7,.L36 cmplwi 7,9,3 beq 7,.L36 cmplwi 7,9,4 beq 7,.L36 cmplwi 7,9,5 beq 7,.L37 cmplwi 7,9,6 beq 7,.L37 cmplwi 7,9,7 beq 7,.L38 cmplwi 7,9,8 beq 7,.L38 cmplwi 7,9,9 beq 7,.L39 cmplwi 7,9,10 beq 7,.L39 cmplwi 7,9,11 beq 7,.L39 cmplwi 7,9,12 beq 7,.L39 cmplwi 7,9,13 beq 7,.L41 cmplwi 7,9,14 beq 7,.L42 cmplwi 7,9,15 beq 7,.L39 .L19: addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L36: ld 9,16(30) stb 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L38: ld 9,16(30) stw 3,0(9) b .L19 .p2align 4,,15 .L37: ld 9,16(30) sth 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L39: ld 9,16(30) std 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .L42: ld 9,16(30) stfd 1,0(9) b .L19 .L41: ld 9,16(30) stfs 1,0(9) b .L19 .long 0 .byte 0,0,0,1,128,2,0,0 .size avcall_call,.-.L.avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-m68k.c0000664000000000000000000001102314662613003013620 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a m68k Sun3 with gcc/sun-cc. This calls a C function with an argument list built up using macros defined in avcall.h. M68k Argument Passing Conventions: All arguments are passed on the stack with word alignment. Doubles take two words. Structure args are passed as true structures embedded in the argument stack. To return a structure, the called function copies the return value to the address supplied in register "a1". Gcc without -fpcc-struct-return returns <= 4 byte structures as integers. Compile this routine with gcc -O (or -O2 or -g -O) to get the right register variables, or use the assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) int avcall_call(av_alist* list) { register __avword* sp __asm__("sp"); /* C names for registers */ register __avword* sret __asm__("a1"); /* structure return pointer */ /*register __avrword iret __asm__("d0"); */ register __avrword iret2 __asm__("d1"); register float fret __asm__("d0"); /* d0 */ register double dret __asm__("d0"); /* d0,d1 */ register float fp_fret __asm__("fp0"); register double fp_dret __asm__("fp0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; __avrword i; __avrword i2; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; if (l->rtype == __AVstruct) /* push struct return address */ __asm__("move%.l %0,%/a1" : : "g" (l->raddr)); i = (*l->func)(); /* call function */ i2 = iret2; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = i2; } else if (l->rtype == __AVfloat) { if (l->flags & __AV_FREG_FLOAT_RETURN) { RETURN(float, fp_fret); } else { if (l->flags & __AV_SUNCC_FLOAT_RETURN) { RETURN(float, (float)dret); } else { RETURN(float, fret); } } } else if (l->rtype == __AVdouble) { if (l->flags & __AV_FREG_FLOAT_RETURN) { RETURN(double, fp_dret); } else { RETURN(double, dret); } } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { /* NB: On m68k, all structure sizes are divisible by 2. */ if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { /* can't occur */ RETURN(char, i); } else if (l->rsize == sizeof(short)) { RETURN(short, i); } else if (l->rsize == sizeof(int)) { RETURN(int, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = i2; } } } return 0; } libffcall-2.5/avcall/avcall-hppa64.c0000664000000000000000000004345214662613003014150 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a HP-PA 2.0w in 64-bit mode with cc (NB: gcc-7.1.0/gcc/config/pa/pa64-regs.h is quite incorrect. Ignore it.) This calls a C function with an argument list built up using macros defined in avcall.h. hppa64 Argument Passing Conventions: Up to 8 words are passed in registers: integer/pointer float double 1. %r26 %fr4R %fr4 2. %r25 %fr5R %fr5 3. %r24 %fr6R %fr6 4. %r23 %fr7R %fr7 5. %r22 %fr8R %fr8 6. %r21 %fr9R %fr9 7. %r20 %fr10R %fr10 8. %r19 %fr11R %fr11 The remaining arguments are passed on the stack - growing up, unlike in 32-bit mode! -, and %r29 is the base address of this stack area. Room is preallocated for 8 words, i.e. from address %r29-64 to %r29-1. Among these stack arguments: - integer/pointer occupies 1 word (right-adjusted, since big-endian), - float occupies 1 word and is stored in the upper 4 bytes of the word, - double occupies 1 word. Structs of any size are passed in the argument sequence, e.g. in integer registers (first byte being at bits 63..56). Note that a {long,long} struct has 2*(8 bytes) alignment. The return value is returned in register %r28. Float return values are also returned in %fr4R. Double return values are also returned in %fr4. (How silly! Who designed this ABI?!) To return a structure of more than 16 bytes, the called function copies the return value to the address supplied in register %r28. The function also returns the pointer. Smaller structures are returned in the registers %r28 (first 8 bytes) and %r29 (next 8 bytes, if present). ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) /* This declaration tells gcc not to modify %r28. */ register __avword* sret __asm__("%r28"); /* structure return pointer */ register __avrword arg1 __asm__("r26"); register __avrword arg2 __asm__("r25"); register __avrword arg3 __asm__("r24"); register __avrword arg4 __asm__("r23"); register __avrword arg5 __asm__("r22"); register __avrword arg6 __asm__("r21"); register __avrword arg7 __asm__("r20"); register __avrword arg8 __asm__("r19"); /*register float farg1 __asm__("fr4R");*/ /*register float farg2 __asm__("fr5R");*/ /*register float farg3 __asm__("fr6R");*/ /*register float farg4 __asm__("fr7R");*/ /*register float farg5 __asm__("fr8R");*/ /*register float farg6 __asm__("fr9R");*/ /*register float farg7 __asm__("fr10R");*/ /*register float farg8 __asm__("fr11R");*/ register double darg1 __asm__("fr4"); register double darg2 __asm__("fr5"); register double darg3 __asm__("fr6"); register double darg4 __asm__("fr7"); register double darg5 __asm__("fr8"); register double darg6 __asm__("fr9"); register double darg7 __asm__("fr10"); register double darg8 __asm__("fr11"); int avcall_call(av_alist* list) { register __avword* sp __asm__("%r30"); /* C names for registers */ /*register __avrword iret1 __asm__("%r28"); */ register __avrword iret2 __asm__("%r29"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ __avword* memargptr; int arglen = l->aptr - l->args; __avrword iret; { int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; } if (l->rtype == __AVstruct) /* push struct return address */ sret = l->raddr; /* Put args in registers */ if (arglen >= 1) { if (l->darg_mask & (1 << 0)) darg1 = ((double*)&l->args[1])[-1]; else if (l->farg_mask & (1 << 0)) __asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (((float*)&l->args[1])[-1])); /* farg1 = ((float*)&l->args[1])[-1]; */ else arg1 = l->args[0]; if (arglen >= 2) { if (l->darg_mask & (1 << 1)) darg2 = ((double*)&l->args[2])[-1]; else if (l->farg_mask & (1 << 1)) __asm__ __volatile__ ("fldw %0,%%fr5R" : : "m" (((float*)&l->args[2])[-1])); /* farg2 = ((float*)&l->args[2])[-1]; */ else arg2 = l->args[1]; if (arglen >= 3) { if (l->darg_mask & (1 << 2)) darg3 = ((double*)&l->args[3])[-1]; else if (l->farg_mask & (1 << 2)) __asm__ __volatile__ ("fldw %0,%%fr6R" : : "m" (((float*)&l->args[3])[-1])); /* farg3 = ((float*)&l->args[3])[-1]; */ else arg3 = l->args[2]; if (arglen >= 4) { if (l->darg_mask & (1 << 3)) darg4 = ((double*)&l->args[4])[-1]; else if (l->farg_mask & (1 << 3)) __asm__ __volatile__ ("fldw %0,%%fr7R" : : "m" (((float*)&l->args[4])[-1])); /* farg4 = ((float*)&l->args[4])[-1]; */ else arg4 = l->args[3]; if (arglen >= 5) { if (l->darg_mask & (1 << 4)) darg5 = ((double*)&l->args[5])[-1]; else if (l->farg_mask & (1 << 4)) __asm__ __volatile__ ("fldw %0,%%fr8R" : : "m" (((float*)&l->args[5])[-1])); /* farg5 = ((float*)&l->args[5])[-1]; */ else arg5 = l->args[4]; if (arglen >= 6) { if (l->darg_mask & (1 << 5)) darg6 = ((double*)&l->args[6])[-1]; else if (l->farg_mask & (1 << 5)) __asm__ __volatile__ ("fldw %0,%%fr9R" : : "m" (((float*)&l->args[6])[-1])); /* farg6 = ((float*)&l->args[6])[-1]; */ else arg6 = l->args[5]; if (arglen >= 7) { if (l->darg_mask & (1 << 6)) darg7 = ((double*)&l->args[7])[-1]; else if (l->farg_mask & (1 << 6)) __asm__ __volatile__ ("fldw %0,%%fr10R" : : "m" (((float*)&l->args[7])[-1])); /* farg7 = ((float*)&l->args[7])[-1]; */ else arg7 = l->args[6]; if (arglen >= 8) { if (l->darg_mask & (1 << 7)) darg8 = ((double*)&l->args[8])[-1]; else if (l->farg_mask & (1 << 7)) __asm__ __volatile__ ("fldw %0,%%fr11R" : : "m" (((float*)&l->args[8])[-1])); /* farg8 = ((float*)&l->args[8])[-1]; */ else arg8 = l->args[7]; if (arglen > 8) { memargptr = &argframe[8]; } } } } } } } } } if (l->rtype == __AVfloat) { __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr)); /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this function call. We eliminate it through post-processing. */ *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr)); /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this function call. We eliminate it through post-processing. */ *(double*)l->raddr = (*(double(*)())l->func)(); } else { __asm__ __volatile__ ("copy %0,%%r29" : : "r" (memargptr)); /* GCC generates an 'ldo -16(%r30),%r29' instruction as part of this function call. We eliminate it through post-processing. */ iret = (*l->func)(); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* cc returns structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { #if 0 void* raddr = l->raddr; #else #define raddr l->raddr #endif #if 1 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-powerpc-sysv4-macro.S0000664000000000000000000000636714662622066016707 00000000000000 .file "avcall-powerpc.c" .section ".text" .align 2 .globl avcall_call .type avcall_call, @function avcall_call: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-1056(1) mflr 0 li 11,0 stw 0,1060(1) addi 8,1,8 stw 30,1048(1) mr 30,3 lwz 0,20(3) lwz 10,24(3) stw 31,1052(1) mr 31,1 subfc 0,10,0 srawi 0,0,2 cmpw 0,11,0 bge- 0,.L71 mtctr 0 .L72: slwi 9,11,2 addi 11,11,1 lwzx 0,9,10 stwx 0,9,8 bdnz .L72 .L71: lwz 9,76(30) subfc 9,30,9 addi 9,9,-80 srawi. 9,9,3 beq- 0,.L8 cmpwi 0,9,1 beq- 0,.L11 cmpwi 0,9,2 beq- 0,.L14 cmpwi 0,9,3 beq- 0,.L17 cmpwi 0,9,4 beq- 0,.L20 cmpwi 0,9,5 beq- 0,.L23 cmpwi 0,9,6 beq- 0,.L26 cmpwi 0,9,7 beq- 0,.L29 .L32: lfd 8,136(30) .L29: lfd 7,128(30) .L26: lfd 6,120(30) .L23: lfd 5,112(30) .L20: lfd 4,104(30) .L17: lfd 3,96(30) .L14: lfd 2,88(30) .L11: lfd 1,80(30) .L8: lwz 0,4(30) lwz 9,68(30) lwz 3,44(30) mtctr 0 lwz 4,48(30) lwz 5,52(30) lwz 6,56(30) lwz 7,60(30) lwz 8,64(30) lwz 10,72(30) crxor 6,6,6 bctrl lwz 9,12(30) cmpwi 0,9,1 beq- 0,.L34 cmpwi 0,9,2 beq- 0,.L75 cmpwi 0,9,3 beq- 0,.L75 cmpwi 0,9,4 beq- 0,.L75 cmpwi 0,9,5 beq- 0,.L74 cmpwi 0,9,6 beq- 0,.L74 cmpwi 0,9,7 beq- 0,.L76 cmpwi 0,9,8 beq- 0,.L76 cmpwi 0,9,9 beq- 0,.L76 cmpwi 0,9,10 beq- 0,.L76 addi 0,9,-11 cmplwi 0,0,1 bgt- 0,.L53 lwz 9,8(30) stw 4,4(9) .L73: stw 3,0(9) .L34: lwz 11,0(1) li 3,0 lwz 0,4(11) lwz 30,-8(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L53: cmpwi 0,9,13 beq- 0,.L77 cmpwi 0,9,14 beq- 0,.L78 cmpwi 0,9,15 beq- 0,.L76 cmpwi 0,9,16 bne+ 0,.L34 lwz 0,0(30) andi. 9,0,512 beq- 0,.L34 lwz 8,16(30) addi 0,8,-1 cmplwi 0,0,7 bgt- 0,.L34 lwz 0,8(30) cmplwi 0,8,4 rlwinm 9,0,0,30,31 rlwinm 5,0,0,0,29 add 8,9,8 bgt- 0,.L64 cmplwi 0,8,4 bgt- 0,.L65 slwi 0,9,3 slwi 10,8,3 subfic 0,0,31 li 11,2 lwz 8,0(5) subfic 10,10,32 slw 11,11,0 slw 9,3,10 li 0,1 xor 9,8,9 slw 0,0,10 subfc 11,0,11 and 9,9,11 xor 8,8,9 stw 8,0(5) b .L34 .L65: slwi 8,8,3 slwi 9,9,3 lwz 6,0(5) subfic 9,9,31 lwz 7,4(5) addi 0,8,-32 li 11,2 subfic 8,8,64 slw 11,11,9 slw 10,3,8 sraw 0,3,0 li 9,-1 xor 0,6,0 xor 10,7,10 addi 11,11,-1 slw 9,9,8 and 0,0,11 and 10,10,9 xor 6,6,0 xor 7,7,10 stw 7,4(5) stw 6,0(5) b .L34 .L64: slwi 0,9,3 cmplwi 0,8,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 12,9,-1 bgt- 0,.L68 slwi 9,8,2 slwi 10,8,3 addi 9,9,-16 subfic 10,10,64 sraw 11,4,9 lwz 8,0(5) lwz 7,4(5) sraw 11,11,9 slw 0,3,10 slw 4,4,10 or 0,0,11 li 9,-1 xor 0,8,0 xor 4,7,4 slw 9,9,10 and 0,0,12 and 4,4,9 xor 8,8,0 xor 7,7,4 stw 8,0(5) stw 7,4(5) b .L34 .L68: slwi 9,8,3 lwz 7,0(5) addi 6,9,-64 lwz 8,8(5) subfic 9,9,96 sraw 11,3,6 slw 10,4,9 li 0,-1 slw 0,0,9 xor 11,7,11 xor 10,8,10 and 11,11,12 and 10,10,0 slw 9,3,9 sraw 4,4,6 xor 7,7,11 or 9,9,4 xor 8,8,10 stw 8,8(5) stw 7,0(5) stw 9,4(5) b .L34 .L76: lwz 9,8(30) b .L73 .L78: lwz 9,8(30) stfd 1,0(9) b .L34 .L77: frsp 0,1 lwz 9,8(30) stfs 0,0(9) b .L34 .L74: lwz 9,8(30) sth 3,0(9) b .L34 .L75: lwz 9,8(30) stb 3,0(9) b .L34 .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-alpha-linux.s0000664000000000000000000000522514662622066015315 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl avcall_call .ent avcall_call avcall_call: .frame $15,32,$26,0 .mask 0x4008200,-32 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $avcall_call..ng: lda $30,-32($30) ldq $1,40($16) ldq $3,48($16) stq $9,8($30) mov $16,$9 stq $15,16($30) mov $30,$15 subq $1,$3,$1 stq $26,0($30) .prologue 1 srl $1,3,$1 lda $30,-2064($30) addl $31,$1,$7 cmple $7,6,$2 bne $2,$L2 mov $30,$5 lda $6,6($31) lda $4,48($3) .align 4 $L4: lda $6,1($6) ldq $1,0($4) cmpeq $7,$6,$2 lda $4,8($4) stq $1,0($5) lda $5,8($5) beq $2,$L4 $L2: .set macro ldq $16,0($3) ldt $f16,0($3) .set nomacro lda $1,8($3) .set macro ldq $17,0($1) ldt $f17,0($1) .set nomacro lda $2,16($3) .set macro ldq $18,0($2) ldt $f18,0($2) .set nomacro lda $1,24($3) .set macro ldq $19,0($1) ldt $f19,0($1) .set nomacro lda $2,32($3) .set macro ldq $20,0($2) ldt $f20,0($2) .set nomacro lda $3,40($3) .set macro ldq $21,0($3) ldt $f21,0($3) .set nomacro ldq $27,8($9) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 mov $1,$4 ldl $1,24($9) zapnot $1,15,$3 cmpeq $3,1,$2 bne $2,$L5 cmpeq $3,2,$1 bne $1,$L50 cmpeq $3,3,$1 bne $1,$L50 cmpeq $3,4,$1 bne $1,$L50 cmpeq $3,5,$1 bne $1,$L52 cmpeq $3,6,$1 bne $1,$L52 cmpeq $3,7,$1 bne $1,$L53 cmpeq $3,8,$1 bne $1,$L53 cmpeq $3,9,$1 bne $1,$L54 cmpeq $3,10,$1 bne $1,$L54 cmpeq $3,11,$1 bne $1,$L54 cmpeq $3,12,$1 bne $1,$L54 cmpeq $3,13,$1 bne $1,$L56 cmpeq $3,14,$1 bne $1,$L57 cmpeq $3,15,$1 bne $1,$L54 cmpeq $3,16,$1 beq $1,$L5 .align 3 #realign lda $1,512($31) ldl $2,0($9) and $1,$2,$1 beq $1,$L5 ldq $2,32($9) cmpeq $2,1,$1 bne $1,$L50 cmpeq $2,2,$1 bne $1,$L52 cmpeq $2,4,$1 bne $1,$L53 cmpeq $2,8,$1 bne $1,$L54 cmpeq $2,16,$1 beq $1,$L5 ldq $1,16($9) stq $4,8($1) cpys $f31,$f31,$f31 stq $0,0($1) br $31,$L5 .align 4 $L50: ldq $1,16($9) bis $31,$31,$31 insbl $0,$1,$3 ldq_u $2,0($1) mskbl $2,$1,$2 bis $3,$2,$3 stq_u $3,0($1) $L5: mov $15,$30 mov $31,$0 ldq $26,0($30) ldq $9,8($30) ldq $15,16($30) lda $30,32($30) ret $31,($26),1 $L52: mov $15,$30 ldq $1,16($9) inswl $0,$1,$3 ldq_u $2,0($1) mov $31,$0 mskwl $2,$1,$2 bis $3,$2,$3 stq_u $3,0($1) ldq $26,0($30) ldq $9,8($30) ldq $15,16($30) lda $30,32($30) ret $31,($26),1 $L54: ldq $1,16($9) stq $0,0($1) br $31,$L5 $L53: ldq $1,16($9) bis $31,$31,$31 stl $0,0($1) br $31,$L5 $L56: cvtts $f0,$f0 ldq $1,16($9) sts $f0,0($1) br $31,$L5 $L57: ldq $1,16($9) bis $31,$31,$31 stt $f0,0($1) br $31,$L5 .end avcall_call .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/DOC0000664000000000000000000001411713146127475011777 00000000000000---------------------------------------------------------------------- AVCALL --- a foreign function interface to ANSI-C ---------------------------------------------------------------------- This library allows arbitrary C functions to be called from embedded interpreters, debuggers, RPC calls, etc, by building up a C argument list incrementally from explicitly typed arguments. This considerably reduces the amount of boilerplate glue code required for such applications. The interface is like stdargs/varargs in reverse and is intended to be as portable as possible, however the details of function calling are highly machine-dependent so your mileage may vary. At the very least there are typically built-in limits on the size of the argument-list. The argument-pushing macros all return 0 for success, < 0 for error (eg, arg-list overflow). Installation instructions are in the Makefile. ---------------------------------------------------------------------- DECLARE ALIST -> OPEN ALIST -> SET FLAGS -> PUSH ARGS -> CALL FUNCTION ---------------------------------------------------------------------- 1) Declare the argument list structure: #include "avcall.h" { av_alist alist; 2) Set any special flags. This is architecture and compiler dependent. Sometimes, compiler options must be flagged by #defines before the #include . Usually, however, the ‘configure’ script should have determined which #defines are needed and put them at the head of avcall.h. 3) Initialise the alist with the function address and return type. There is a separate macro for each built-in C type (char, int, float, etc). Eg, av_start_int(alist,&func,&return_addr); or av_start_double(alist,&func,&return_addr); etc. Functions returning a structure or pointer take an extra type argument: Eg, av_start_struct(alist,&func,STRUCT_OR_UNION_TYPE,SPLITTABLE,&return_addr); or av_start_ptr(alist,&func,POINTER_TYPE,&return_addr); 4) Push the arguments one by one in order. There is a macro for each built-in C type, eg: av_int(alist,value); or av_double(alist,value); Structure and pointer arguments require an extra type argument: av_struct(alist,STRUCT_TYPE,value); or av_ptr(alist,POINTER_TYPE,value); 5) Call the function, set the return value, and tidy up: av_call(alist); ---------------------------------------------------------------------- NOTES 1) Functions declared in K&R style (ie, without a typed arglist) must use default K&R expression promotions (char,short-->int; float-->double) whether they are compiled by a K&R or an ANSI compiler, because the true arg types may not be known at the call point. Such functions back-convert their arguments to the declared types on function entry. The only way to pass a true char, short or float (eg, from K&R C to an ANSI or varargs function) is by an explicit cast: foo((char)c,(float)f). !! Hence, for args of functions declared in K&R style you should use !! av_int() and av_double() instead of av_{char,short}() and av_float(). If you use a K&R compiler, the avcall header files may detect this and define av_float, etc, appropriately, but with an ANSI compiler there's no way avcall can know how a function was declared, so you have to correct the argument types yourself. Similarly, some K&R compilers (such as Sun cc on the sparc) actually return a float as a double. 2) There are too many possible structure and pointer types to have a separate macro for each, so the pointer and structure macros take an explicit type argument which may be used (eg) to calculate the size of the structure. On most architectures this provides enough information for the compiler to make the proper call, but there will always be machines with odd alignment requirements or argument passing conventions, unusual reprentations for function, char, or void pointers, etc, for which this scheme will not suffice. These machines may define additional av_start_TYPE and av_TYPE macros. 3) The current implementations are pretty flakey in places. I'm happy to accept new ports and (properly tested) fixes and enhancements. In particular, many of the routines waste a lot of stack space and generally do hairy things with stack frames - a bit more assembly code would probably help things along quite a bit, but I don't speak assembler at all well. 4) The macros required for all this are pretty grungy, but it does seem to be possible to port avcall to many machines. Some of the grunge is usually handled by a C or assembly level glue routine that actually pushes the arguments, calls the function and unpacks any return value. This is called avcall_call(). A precompiled assembler version for people without gcc is also made available. The routine should ideally have flags for the passing conventions of other compilers. ---------------------------------------------------------------------- ACKNOWLEDGEMENTS I was aware of two similar but rather more restricted foreign function interfaces when the initial version of this library was written, although (I believe) all of the present code is my own: the C interface in the zelk extensions to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC C&C Research, (for Sun4 and SGI); and Roy Featherstone's personal C interface library for Sun3,4 and SGI. I also looked at the comments and some of the code in the machine-dependent parts of the GCC and GDB distributions, and put the GCC __asm__ extensions to good use. Thanks guys! This work was partly supported by EC-ESPRIT Basic Research Action SECOND. ---------------------------------------------------------------------- ================================================================================ Copyright 1993 Bill Triggs Copyright 1995-2017 Bruno Haible This manual is covered by the GNU GPL. You can redistribute it and/or modify it under the terms of the GNU General Public License (GPL), either version 2 of the License, or (at your option) any later version published by the Free Software Foundation (FSF). A copy of the license is at . libffcall-2.5/avcall/avcall-mips64el-macro.S0000664000000000000000000002037214662622066015575 00000000000000#include "asm-mips.h" .file 1 "avcall-mips64.c" .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,32,$31 .mask 0xd0010000,-8 .fmask 0x00000000,0 ld $2,40($4) ld $12,48($4) lw $3,68($4) daddiu $sp,$sp,-32 dsubu $6,$2,$12 dsra $6,$6,3 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp daddiu $sp,$sp,-2064 move $16,$4 sll $6,$6,0 .set noreorder .set nomacro beq $3,$0,.L2 move $2,$sp .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L123 andi $4,$3,0x2 .set macro .set reorder lwc1 $f12,76($16) andi $4,$3,0x2 .L123: .set noreorder .set nomacro beq $4,$0,.L124 andi $4,$3,0x4 .set macro .set reorder lwc1 $f13,80($16) andi $4,$3,0x4 .L124: .set noreorder .set nomacro beq $4,$0,.L125 andi $4,$3,0x8 .set macro .set reorder lwc1 $f14,84($16) andi $4,$3,0x8 .L125: .set noreorder .set nomacro beq $4,$0,.L126 andi $4,$3,0x10 .set macro .set reorder lwc1 $f15,88($16) andi $4,$3,0x10 .L126: .set noreorder .set nomacro beq $4,$0,.L127 andi $4,$3,0x20 .set macro .set reorder lwc1 $f16,92($16) andi $4,$3,0x20 .L127: .set noreorder .set nomacro beq $4,$0,.L128 andi $4,$3,0x40 .set macro .set reorder lwc1 $f17,96($16) andi $4,$3,0x40 .L128: .set noreorder .set nomacro beql $4,$0,.L129 andi $3,$3,0x80 .set macro .set reorder lwc1 $f18,100($16) andi $3,$3,0x80 .L129: bne $3,$0,.L116 .L2: lw $3,72($16) .L122: .set noreorder .set nomacro beql $3,$0,.L121 slt $3,$6,9 .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L130 andi $4,$3,0x2 .set macro .set reorder ldc1 $f12,0($12) andi $4,$3,0x2 .L130: .set noreorder .set nomacro beq $4,$0,.L131 andi $4,$3,0x4 .set macro .set reorder ldc1 $f13,8($12) andi $4,$3,0x4 .L131: .set noreorder .set nomacro beq $4,$0,.L132 andi $4,$3,0x8 .set macro .set reorder ldc1 $f14,16($12) andi $4,$3,0x8 .L132: .set noreorder .set nomacro beq $4,$0,.L133 andi $4,$3,0x10 .set macro .set reorder ldc1 $f15,24($12) andi $4,$3,0x10 .L133: .set noreorder .set nomacro beq $4,$0,.L134 andi $4,$3,0x20 .set macro .set reorder ldc1 $f16,32($12) andi $4,$3,0x20 .L134: .set noreorder .set nomacro beq $4,$0,.L135 andi $4,$3,0x40 .set macro .set reorder ldc1 $f17,40($12) andi $4,$3,0x40 .L135: .set noreorder .set nomacro beql $4,$0,.L136 andi $3,$3,0x80 .set macro .set reorder ldc1 $f18,48($12) andi $3,$3,0x80 .L136: bne $3,$0,.L117 slt $3,$6,9 .L121: .set noreorder .set nomacro bne $3,$0,.L22 daddiu $4,$12,64 .set macro .set reorder li $3,8 .align 3 .L21: ld $5,0($4) addiu $3,$3,1 daddiu $4,$4,8 sd $5,0($2) .set noreorder .set nomacro bne $6,$3,.L21 daddiu $2,$2,8 .set macro .set reorder .L22: ld $4,0($12) ld $5,8($12) ld $6,16($12) ld $7,24($12) ld $8,32($12) ld $9,40($12) ld $10,48($12) ld $11,56($12) ld $25,8($16) jalr $25 lw $4,24($16) li $5,1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,11 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L118 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L137 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 ld $5,32($16) .set macro .set reorder ld $3,32($16) li $4,1 .set noreorder .set nomacro beq $3,$4,.L106 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L108 li $4,4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L111 li $4,8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L138 ld $3,16($16) .set macro .set reorder .L19: move $sp,$fp .L137: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L117: ldc1 $f19,56($12) .set noreorder .set nomacro b .L121 slt $3,$6,9 .set macro .set reorder .align 3 .L116: lwc1 $f19,104($16) .set noreorder .set nomacro b .L122 lw $3,72($16) .set macro .set reorder .align 3 .L106: ld $3,16($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L111: ld $3,16($16) .set noreorder .set nomacro b .L19 sw $2,0($3) .set macro .set reorder .align 3 .L108: ld $3,16($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: ld $3,16($16) .align 3 .L138: sd $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L119: ld $2,16($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L118: ld $2,16($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: daddiu $4,$5,-1 sltu $4,$4,16 .set noreorder .set nomacro beq $4,$0,.L19 sltu $7,$5,9 .set macro .set reorder ld $6,16($16) li $8,-8 andi $4,$6,0x7 daddu $5,$5,$4 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$5,9 .set noreorder .set nomacro beq $3,$0,.L42 dsll $3,$5,3 .set macro .set reorder daddiu $3,$3,-1 ld $7,0($6) li $5,2 sll $3,$3,0 sll $4,$4,3 dsll $3,$5,$3 li $5,1 dsll $5,$5,$4 dsll $4,$2,$4 dsubu $3,$3,$5 xor $4,$4,$7 and $4,$3,$4 xor $4,$4,$7 .set noreorder .set nomacro b .L19 sd $4,0($6) .set macro .set reorder .L41: ld $10,0($6) sll $8,$4,3 dsll $7,$2,$8 li $9,-1 dsll $9,$9,$8 xor $7,$7,$10 and $7,$9,$7 xor $7,$7,$10 sltu $9,$5,17 subu $4,$0,$4 .set noreorder .set nomacro bne $9,$0,.L120 sd $7,0($6) .set macro .set reorder dsll $5,$5,3 ld $10,16($6) sll $4,$4,3 daddiu $5,$5,-129 addiu $4,$4,64 sll $5,$5,0 li $7,2 move $9,$3 dsll $5,$7,$5 dsra $3,$3,$4 daddiu $5,$5,-1 xor $3,$3,$10 dsra $2,$2,$4 dsll $8,$9,$8 and $3,$5,$3 or $2,$2,$8 xor $3,$3,$10 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $10,0($6) ld $9,8($6) subu $7,$0,$4 daddiu $3,$3,-65 sll $4,$4,3 li $5,2 sll $3,$3,0 sll $7,$7,3 dsll $8,$2,$4 dsll $3,$5,$3 dsra $2,$2,$7 li $5,-1 dsll $4,$5,$4 daddiu $3,$3,-1 xor $5,$8,$10 xor $2,$2,$9 and $2,$3,$2 and $4,$4,$5 xor $3,$4,$10 xor $2,$2,$9 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L120: sll $4,$4,2 addiu $4,$4,32 dsll $5,$5,3 ld $7,8($6) dsra $2,$2,$4 daddiu $5,$5,-65 dsra $4,$2,$4 dsll $3,$3,$8 sll $5,$5,0 li $2,2 or $3,$4,$3 dsll $2,$2,$5 xor $3,$3,$7 daddiu $2,$2,-1 and $2,$3,$2 xor $2,$2,$7 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-sparc64.c0000664000000000000000000006462414662613003014334 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a Sparc v9 in 64-bit mode with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. Sparc 64-bit Argument Passing Conventions The argument registers are laid out as an array of 16 elements and arguments are added sequentially. The first 6 int args and up to the first 16 fp args (depending on size) are passed in regs. Slot Stack Integral Float Float in structure Double Long Double ---- ----- -------- ----- ------------------ ------ ----------- 15 [SP+248] %f31 %f30,%f31 %d30 14 [SP+240] %f29 %f28,%f29 %d28 %q28 13 [SP+232] %f27 %f26,%f27 %d26 12 [SP+224] %f25 %f24,%f25 %d24 %q24 11 [SP+216] %f23 %f22,%f23 %d22 10 [SP+208] %f21 %f20,%f21 %d20 %q20 9 [SP+200] %f19 %f18,%f19 %d18 8 [SP+192] %f17 %f16,%f17 %d16 %q16 7 [SP+184] %f15 %f14,%f15 %d14 6 [SP+176] %f13 %f12,%f13 %d12 %q12 5 [SP+168] %o5 %f11 %f10,%f11 %d10 4 [SP+160] %o4 %f9 %f8,%f9 %d8 %q8 3 [SP+152] %o3 %f7 %f6,%f7 %d6 2 [SP+144] %o2 %f5 %f4,%f5 %d4 %q4 1 [SP+136] %o1 %f3 %f2,%f3 %d2 0 [SP+128] %o0 %f1 %f0,%f1 %d0 %q0 Here SP = %sp if -mno-stack-bias or %sp+stack_bias otherwise. Integral arguments are always passed as 64 bit quantities appropriately extended. Passing of floating point values is handled as follows. If a prototype is in scope: If the value is in a named argument (i.e. not a stdarg function or a value not part of the ‘...’) then the value is passed in the appropriate fp reg. If the value is part of the ‘...’ and is passed in one of the first 6 slots then the value is passed in the appropriate int reg. If the value is part of the ‘...’ and is not passed in one of the first 6 slots then the value is passed in memory. If a prototype is not in scope: If the value is one of the first 6 arguments the value is passed in the appropriate integer reg and the appropriate fp reg. If the value is not one of the first 6 arguments the value is passed in the appropriate fp reg and in memory. Remaining arguments are pushed onto the stack starting at a fixed offset Space is left on the stack frame for temporary storage of the register arguments as well. Integers shorter than ‘long’ are always promoted to word-length (zero-extended or sign-extended, according to their type). Structures <= 16 bytes are passed embedded in the argument sequence; bigger structures are passed by reference. Integers and pointers are returned in o0, floats in f0, doubles in f0/f1. If the function returns a structure a pointer to space allocated by the caller is pushed onto the stack immediately before the function arguments. Structures <= 32 bytes are returned in registers (integer/float/double registers, as appropriate). Long doubles are 16-byte aligned, but we don't deal with this here, so we assume 8-byte alignment for everything. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) #define OFFSETOF(struct,member) ((int)&(((struct*)0)->member)) register __avrword o0 __asm__("%o0"); register __avrword o1 __asm__("%o1"); register __avrword o2 __asm__("%o2"); register __avrword o3 __asm__("%o3"); register __avrword o4 __asm__("%o4"); register __avrword o5 __asm__("%o5"); int avcall_call(av_alist* list) { register __avword* sp __asm__("%sp"); /* C names for registers */ register float fret __asm__("%f0"); /* %f0 */ register double dret __asm__("%f0"); /* %f0,%f1 */ __av_alist* l = &AV_LIST_INNER(list); __avword trampoline[6]; /* room for a trampoline */ int arglen = l->aptr - l->args; __avrword iret; if (l->darg_mask) { /* push leading float/double args */ __avword* a = l->args; if (l->darg_mask & (1<<0)) __asm__("ldd [%0+%1],%%f0" : : "p" (a), "i" (0 * sizeof (__avword))); if (l->darg_mask & (1<<1)) __asm__("ldd [%0+%1],%%f2" : : "p" (a), "i" (1 * sizeof (__avword))); if (l->darg_mask & (1<<2)) __asm__("ldd [%0+%1],%%f4" : : "p" (a), "i" (2 * sizeof (__avword))); if (l->darg_mask & (1<<3)) __asm__("ldd [%0+%1],%%f6" : : "p" (a), "i" (3 * sizeof (__avword))); if (l->darg_mask & (1<<4)) __asm__("ldd [%0+%1],%%f8" : : "p" (a), "i" (4 * sizeof (__avword))); if (l->darg_mask & (1<<5)) __asm__("ldd [%0+%1],%%f10" : : "p" (a), "i" (5 * sizeof (__avword))); if (l->darg_mask & (1<<6)) __asm__("ldd [%0+%1],%%f12" : : "p" (a), "i" (6 * sizeof (__avword))); if (l->darg_mask & (1<<7)) __asm__("ldd [%0+%1],%%f14" : : "p" (a), "i" (7 * sizeof (__avword))); if (l->darg_mask & (1<<8)) __asm__("ldd [%0+%1],%%f16" : : "p" (a), "i" (8 * sizeof (__avword))); if (l->darg_mask & (1<<9)) __asm__("ldd [%0+%1],%%f18" : : "p" (a), "i" (9 * sizeof (__avword))); if (l->darg_mask & (1<<10)) __asm__("ldd [%0+%1],%%f20" : : "p" (a), "i" (10 * sizeof (__avword))); if (l->darg_mask & (1<<11)) __asm__("ldd [%0+%1],%%f22" : : "p" (a), "i" (11 * sizeof (__avword))); if (l->darg_mask & (1<<12)) __asm__("ldd [%0+%1],%%f24" : : "p" (a), "i" (12 * sizeof (__avword))); if (l->darg_mask & (1<<13)) __asm__("ldd [%0+%1],%%f26" : : "p" (a), "i" (13 * sizeof (__avword))); if (l->darg_mask & (1<<14)) __asm__("ldd [%0+%1],%%f28" : : "p" (a), "i" (14 * sizeof (__avword))); if (l->darg_mask & (1<<15)) __asm__("ldd [%0+%1],%%f30" : : "p" (a), "i" (15 * sizeof (__avword))); } if (arglen > 6) { /* alloca space is separated from the extra outgoing args area by * the area for compiler temps (addressable with postive offsets from sp) * but they shouldn't be needed for this function, so, effectively, * space returned by alloca is safe to use as the area for extra args. */ void *extra_args_area = __builtin_alloca(sizeof(__avword) * (arglen - 6)); __avword *argframe = (__avword *)extra_args_area - 6; #if 0 /* "by construction" */ assert(argframe == (void *)((unsigned long)(sp + 16)+2047)); #endif int i; for (i = 6; i < arglen; i++) /* push excess function args */ argframe[i] = l->args[i]; } /* call function with 1st 6 args */ iret = ({ register __avrword iretreg __asm__ ("%o0"); iretreg = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5]); asm __volatile__("nop"); /* struct returning functions skip this instruction */ iretreg; }); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 32 in registers. */ #define iret2 o1 #define iret3 o2 #define iret4 o3 if (l->rsize > 0 && l->rsize <= 32) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); } else if (l->rsize >= 8 && l->rsize <= 32) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); } else if (l->rsize >= 16 && l->rsize <= 32) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2); if (l->rsize == 16) { } else if (l->rsize == 17) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); } else if (l->rsize == 18) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); } else if (l->rsize == 19) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); } else if (l->rsize == 20) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32); } else if (l->rsize == 21) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32); ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24); } else if (l->rsize == 22) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32); ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24); ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16); } else if (l->rsize == 23) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32); ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24); ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16); ((unsigned char *)raddr)[16+6] = (unsigned char)(iret3>>8); } else if (l->rsize >= 24 && l->rsize <= 32) { ((unsigned char *)raddr)[16+0] = (unsigned char)(iret3>>56); ((unsigned char *)raddr)[16+1] = (unsigned char)(iret3>>48); ((unsigned char *)raddr)[16+2] = (unsigned char)(iret3>>40); ((unsigned char *)raddr)[16+3] = (unsigned char)(iret3>>32); ((unsigned char *)raddr)[16+4] = (unsigned char)(iret3>>24); ((unsigned char *)raddr)[16+5] = (unsigned char)(iret3>>16); ((unsigned char *)raddr)[16+6] = (unsigned char)(iret3>>8); ((unsigned char *)raddr)[16+7] = (unsigned char)(iret3); if (l->rsize == 24) { } else if (l->rsize == 25) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); } else if (l->rsize == 26) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); } else if (l->rsize == 27) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); } else if (l->rsize == 28) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32); } else if (l->rsize == 29) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32); ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24); } else if (l->rsize == 30) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32); ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24); ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16); } else if (l->rsize == 31) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32); ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24); ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16); ((unsigned char *)raddr)[24+6] = (unsigned char)(iret4>>8); } else if (l->rsize == 32) { ((unsigned char *)raddr)[24+0] = (unsigned char)(iret4>>56); ((unsigned char *)raddr)[24+1] = (unsigned char)(iret4>>48); ((unsigned char *)raddr)[24+2] = (unsigned char)(iret4>>40); ((unsigned char *)raddr)[24+3] = (unsigned char)(iret4>>32); ((unsigned char *)raddr)[24+4] = (unsigned char)(iret4>>24); ((unsigned char *)raddr)[24+5] = (unsigned char)(iret4>>16); ((unsigned char *)raddr)[24+6] = (unsigned char)(iret4>>8); ((unsigned char *)raddr)[24+7] = (unsigned char)(iret4); } } } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 4*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else if (count <= 2*sizeof(__avrword)) { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avrword)*8-start_offset*8))) & mask2; } } else if (count <= 3*sizeof(__avrword)) { /* Use iret, iret2, iret3. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 3*sizeof(__avrword)) { /* 2*sizeof(__avrword) < end_offset ≤ 3*sizeof(__avrword) */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ ((iret2 << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret3 >> (start_offset*8)))) & mask2; } else { /* 3*sizeof(__avrword) < end_offset < 4*sizeof(__avrword), start_offset > 0 */ __avrword mask3 = - ((__avrword)1 << (4*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] = (iret2 << (sizeof(__avrword)*8-start_offset*8)) | (iret3 >> (start_offset*8)); wordaddr[3] ^= (wordaddr[3] ^ (iret3 << (sizeof(__avrword)*8-start_offset*8))) & mask3; } } else { /* Use iret, iret2, iret3, iret4. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 4*sizeof(__avrword)) { /* 3*sizeof(__avrword) < end_offset ≤ 4*sizeof(__avrword) */ __avrword mask3 = - ((__avrword)1 << (4*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)); wordaddr[2] = (iret2 << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret3 >> (start_offset*8)); wordaddr[3] ^= (wordaddr[3] ^ ((iret3 << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret4 >> (start_offset*8)))) & mask3; } else { /* 4*sizeof(__avrword) < end_offset < 5*sizeof(__avrword), start_offset > 0 */ __avrword mask4 = - ((__avrword)1 << (5*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] = (iret2 << (sizeof(__avrword)*8-start_offset*8)) | (iret3 >> (start_offset*8)); wordaddr[3] = (iret3 << (sizeof(__avrword)*8-start_offset*8)) | (iret4 >> (start_offset*8)); wordaddr[4] ^= (wordaddr[4] ^ (iret4 << (sizeof(__avrword)*8-start_offset*8))) & mask4; } } #endif } } } return 0; } libffcall-2.5/avcall/avcall-s390x-linux.s0000664000000000000000000000743014662622067015117 00000000000000 .file "avcall-s390x.c" .text .align 8 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0: .cfi_startproc stmg %r7,%r15,56(%r15) .cfi_offset 7, -104 .cfi_offset 8, -96 .cfi_offset 9, -88 .cfi_offset 10, -80 .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 larl %r13,.L77 aghi %r15,-176 .cfi_def_cfa_offset 336 lgr %r11,%r15 .cfi_def_cfa_register 11 aghi %r15,-2056 lg %r9,48(%r2) lg %r1,40(%r2) sgr %r1,%r9 srag %r1,%r1,3 stg %r2,168(%r11) stg %r6,160(%r11) ltr %r1,%r1 la %r8,160(%r15) l %r0,64(%r2) l %r7,112(%r2) jle .L6 ahi %r1,-1 llgfr %r1,%r1 aghi %r1,1 lghi %r14,0 .L5: lg %r10,0(%r14,%r9) stg %r10,0(%r14,%r8) aghi %r14,8 brctg %r1,.L5 .L6: ltr %r0,%r0 je .L7 lg %r1,168(%r11) cl %r0,.L78-.L77(%r13) lg %r2,72(%r1) jle .L7 chi %r0,2 lg %r3,80(%r1) je .L7 chi %r0,3 lg %r4,88(%r1) je .L7 chi %r0,4 lg %r5,96(%r1) jne .L72 .L7: ltr %r7,%r7 je .L9 lg %r10,168(%r11) l %r1,120(%r10) tmll %r1,1 je .L10 ld %f0,144(%r10) .L11: cl %r7,.L78-.L77(%r13) jle .L9 tmll %r1,2 lg %r10,168(%r11) jne .L73 tm 119(%r10),2 je .L14 le %f2,128(%r10) .L14: chi %r7,2 je .L9 tmll %r1,4 lg %r10,168(%r11) je .L15 ld %f4,160(%r10) .L16: chi %r7,3 je .L9 tmll %r1,8 lg %r1,168(%r11) jne .L74 tm 119(%r1),8 je .L9 le %f6,136(%r1) .L9: lg %r1,168(%r11) l %r1,24(%r1) chi %r1,13 je .L75 chi %r1,14 je .L76 lg %r10,168(%r11) lg %r1,8(%r10) basr %r14,%r1 l %r1,24(%r10) chi %r1,1 lgr %r0,%r2 je .L19 chi %r1,2 je .L68 chi %r1,3 je .L68 chi %r1,4 je .L68 chi %r1,5 je .L69 chi %r1,6 je .L69 chi %r1,7 je .L70 chi %r1,8 je .L70 lr %r9,%r1 nill %r9,65533 chi %r9,9 je .L67 chi %r1,10 je .L67 chi %r1,12 je .L67 chi %r1,15 je .L67 .L19: lg %r4,288(%r11) lg %r6,160(%r11) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_restore 10 .cfi_restore 9 .cfi_restore 8 .cfi_restore 7 .cfi_def_cfa 15, 160 br %r4 .L10: .cfi_restore_state lg %r10,168(%r11) tm 119(%r10),1 je .L11 le %f0,124(%r10) j .L11 .L68: lg %r1,168(%r11) lghi %r2,0 lg %r1,16(%r1) stc %r0,0(%r1) lg %r4,288(%r11) lg %r6,160(%r11) lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L73: .cfi_restore_state ld %f2,152(%r10) j .L14 .L69: lg %r1,168(%r11) lg %r4,288(%r11) lg %r6,160(%r11) lg %r1,16(%r1) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 sth %r0,0(%r1) br %r4 .L67: .cfi_restore_state lg %r1,168(%r11) lg %r1,16(%r1) stg %r0,0(%r1) j .L19 .L76: lg %r0,168(%r11) lgr %r1,%r0 lgr %r10,%r0 lg %r1,8(%r1) lg %r10,16(%r10) basr %r14,%r1 lg %r4,288(%r11) std %f0,0(%r10) lg %r6,160(%r11) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L75: .cfi_restore_state lg %r0,168(%r11) lgr %r1,%r0 lgr %r10,%r0 lg %r1,8(%r1) lg %r10,16(%r10) basr %r14,%r1 ste %f0,0(%r10) j .L19 .L15: tm 119(%r10),4 je .L16 le %f4,132(%r10) j .L16 .L70: lg %r1,168(%r11) lg %r1,16(%r1) st %r0,0(%r1) j .L19 .L72: lg %r6,104(%r1) j .L7 .L74: ld %f6,168(%r1) j .L9 .section .rodata .align 8 .L77: .L78: .long 1 .align 2 .previous .cfi_endproc .LFE0: .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/Makefile.devel0000664000000000000000000004651114662622056014207 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! THISFILE = Makefile.devel LN = ln -s RM = rm -f # ============ Rules that require cross-compilation tools ============ GCC = gcc GCCFLAGS = -I.. -I../dummy -O2 -fno-omit-frame-pointer -fPIC SED = sed CROSS_TOOL = cross precompiled : \ avcall-i386-macro.S \ avcall-m68k.mit.S avcall-m68k.motorola.S \ avcall-mipseb-macro.S avcall-mipsel-macro.S avcall-mipsn32eb-macro.S avcall-mipsn32el-macro.S avcall-mips64eb-macro.S avcall-mips64el-macro.S \ avcall-sparc-macro.S avcall-sparc-solaris-macro.S avcall-sparc64-macro.S \ avcall-alpha-macro.S \ avcall-hppa-macro.S avcall-hppa64-macro.S \ avcall-arm-old-macro.S avcall-arm-eabi-macro.S avcall-armhf-eabi-macro.S \ avcall-arm64-macro.S avcall-arm64-macos-macro.S \ avcall-powerpc-aix.s avcall-powerpc-linux-macro.S avcall-powerpc-sysv4-macro.S avcall-powerpc-macos.s avcall-powerpc64-aix.s avcall-powerpc64-linux.S avcall-powerpc64-elfv2-linux.S \ avcall-ia64-macro.S \ avcall-x86_64-macro.S avcall-x86_64-x32-linux.s avcall-x86_64-windows-macro.S \ avcall-s390-macro.S avcall-s390x-macro.S \ avcall-riscv32-ilp32d-macro.S avcall-riscv64-lp64d-macro.S \ avcall-loongarch64-macro.S avcall-i386-linux.s : avcall-i386.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -fno-omit-frame-pointer -S avcall-i386.c -o avcall-i386-linux.s avcall-i386-macro.S : avcall-i386-linux.s ../common/asm-i386.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-i386.h"' ; sed -e '/\.align.*,0x90$$/d' < avcall-i386-linux.s | ../common/asm-i386.sh ; cat ../common/noexecstack.h) > avcall-i386-macro.S avcall-m68k-linux.s : avcall-m68k.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S avcall-m68k.c -o avcall-m68k-linux.s avcall-m68k-sun.s : avcall-m68k.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S avcall-m68k.c -o avcall-m68k-sun.s avcall-m68k.mit.S : avcall-m68k-sun.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh mit < avcall-m68k-sun.s ; cat ../common/noexecstack.h) > avcall-m68k.mit.S avcall-m68k.motorola.S : avcall-m68k-linux.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh motorola < avcall-m68k-linux.s ; cat ../common/noexecstack.h) > avcall-m68k.motorola.S avcall-mipseb-linux.s : avcall-mips.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb $(GCCFLAGS) -D__mips__ -fno-tree-dce -S avcall-mips.c -o avcall-mipseb-linux.s avcall-mipseb-macro.S : avcall-mipseb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipseb-linux.s) > avcall-mipseb-macro.S avcall-mipsel-linux.s : avcall-mips.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel $(GCCFLAGS) -D__mips__ -fno-tree-dce -S avcall-mips.c -o avcall-mipsel-linux.s avcall-mipsel-macro.S : avcall-mipsel-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsel-linux.s) > avcall-mipsel-macro.S avcall-mipsn32eb-linux.s : avcall-mipsn32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S avcall-mipsn32.c -o avcall-mipsn32eb-linux.s avcall-mipsn32eb-macro.S : avcall-mipsn32eb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsn32eb-linux.s) > avcall-mipsn32eb-macro.S avcall-mipsn32el-linux.s : avcall-mipsn32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S avcall-mipsn32.c -o avcall-mipsn32el-linux.s avcall-mipsn32el-macro.S : avcall-mipsn32el-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mipsn32el-linux.s) > avcall-mipsn32el-macro.S avcall-mips64eb-linux.s : avcall-mips64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S avcall-mips64.c -o avcall-mips64eb-linux.s avcall-mips64eb-macro.S : avcall-mips64eb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mips64eb-linux.s) > avcall-mips64eb-macro.S avcall-mips64el-linux.s : avcall-mips64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S avcall-mips64.c -o avcall-mips64el-linux.s avcall-mips64el-macro.S : avcall-mips64el-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < avcall-mips64el-linux.s) > avcall-mips64el-macro.S avcall-sparc-linux.s : avcall-sparc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S avcall-sparc.c -o avcall-sparc-linux.s avcall-sparc-macro.S : avcall-sparc-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < avcall-sparc-linux.s ; cat ../common/noexecstack.h) > avcall-sparc-macro.S avcall-sparc-solaris.s : avcall-sparc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -O1 -D__sparc__ -D__sun -S avcall-sparc.c -o avcall-sparc-solaris.s avcall-sparc-solaris-macro.S : avcall-sparc-solaris.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < avcall-sparc-solaris.s ; cat ../common/noexecstack.h) > avcall-sparc-solaris-macro.S avcall-sparc64-linux.s : avcall-sparc64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) # This compiler produces useless instructions with -fPIC. The result is PIC even without -fPIC. $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -fno-PIC -D__sparc64__ -S avcall-sparc64.c -o avcall-sparc64-linux.s avcall-sparc64-macro.S : avcall-sparc64-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < avcall-sparc64-linux.s ; cat ../common/noexecstack.h) > avcall-sparc64-macro.S avcall-alpha-linux.s : avcall-alpha.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S avcall-alpha.c -o avcall-alpha-linux.s avcall-alpha-macro.S : avcall-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE) (../common/asm-alpha.sh < avcall-alpha-linux.s ; cat ../common/noexecstack.h) > avcall-alpha-macro.S avcall-hppa-linux.s : avcall-hppa.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S avcall-hppa.c -o avcall-hppa-linux.s avcall-hppa-macro.S : avcall-hppa-linux.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa.h"' ; ../common/asm-hppa.sh < avcall-hppa-linux.s ; cat ../common/noexecstack.h) > avcall-hppa-macro.S avcall-hppa64-linux.s : avcall-hppa64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S avcall-hppa64.c -o avcall-hppa64-linux.s avcall-hppa64-macro.S : avcall-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE) # Need to remove the gcc-generated instructions that clobber %r29 right before each of the calls. (echo '#include "asm-hppa64.h"' ; grep -v 'ldo -16(%r30),%r29' < avcall-hppa64-linux.s | ../common/asm-hppa64.sh ; cat ../common/noexecstack.h) > avcall-hppa64-macro.S avcall-arm-old-macro.S : avcall-arm.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S avcall-arm.c -o avcall-armel.s $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S avcall-arm.c -o avcall-armeb.s cmp avcall-armel.s avcall-armeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-armel.s ; cat ../common/noexecstack-arm.h) > avcall-arm-old-macro.S $(RM) avcall-armel.s avcall-armeb.s avcall-arm-eabi-macro.S : avcall-arm.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -S avcall-arm.c -o avcall-armel.s $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mbig-endian $(GCCFLAGS) -S avcall-arm.c -o avcall-armeb.s cmp avcall-armel.s avcall-armeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-armel.s ; cat ../common/noexecstack-arm.h) > avcall-arm-eabi-macro.S $(RM) avcall-armel.s avcall-armeb.s avcall-armhf-eabi-macro.S : avcall-armhf.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -D__armhf__ -S avcall-armhf.c -o avcall-armhfel.s $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mbig-endian $(GCCFLAGS) -D__armhf__ -S avcall-armhf.c -o avcall-armhfeb.s cmp avcall-armhfel.s avcall-armhfeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../common/asm-arm.sh < avcall-armhfel.s ; cat ../common/noexecstack-arm.h) > avcall-armhf-eabi-macro.S $(RM) avcall-armhfel.s avcall-armhfeb.s avcall-arm64-macro.S : avcall-arm64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm64.sh ../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S avcall-arm64.c -o avcall-arm64el.s $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S avcall-arm64.c -o avcall-arm64eb.s cmp avcall-arm64el.s avcall-arm64eb.s > /dev/null (echo '#include "asm-arm64.h"' ; ../common/asm-arm64.sh < avcall-arm64el.s ; cat ../common/noexecstack-arm.h) > avcall-arm64-macro.S $(RM) avcall-arm64el.s avcall-arm64eb.s avcall-arm64-macos-macro.S : avcall-arm64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-arm64.sh ../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -D__APPLE__ -D__MACH__ -S avcall-arm64.c -o avcall-arm64-macos.s (echo '#include "asm-arm64.h"' ; ../common/asm-arm64.sh < avcall-arm64-macos.s ; cat ../common/noexecstack-arm.h) > avcall-arm64-macos-macro.S $(RM) avcall-arm64-macos.s avcall-powerpc-aix.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-aix.s avcall-powerpc-linux.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-linux.s avcall-powerpc-linux-macro.S : avcall-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) (../common/asm-powerpc.sh < avcall-powerpc-linux.s ; cat ../common/noexecstack.h) > avcall-powerpc-linux-macro.S avcall-powerpc-sysv4-macro.S : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-sysv4.s (../common/asm-powerpc.sh < avcall-powerpc-sysv4.s ; cat ../common/noexecstack.h) > avcall-powerpc-sysv4-macro.S $(RM) avcall-powerpc-sysv4.s avcall-powerpc-macos.s : avcall-powerpc.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S avcall-powerpc.c -o avcall-powerpc-macos.s avcall-powerpc64-aix.s : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-aix.s avcall-powerpc64-linux.S : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S avcall-powerpc64.c -o avcall-powerpc64-linux-be.s cmp avcall-powerpc64-linux-le.s avcall-powerpc64-linux-be.s > /dev/null (../common/asm-powerpc.sh < avcall-powerpc64-linux-be.s ; cat ../common/noexecstack.h) > avcall-powerpc64-linux.S $(RM) avcall-powerpc64-linux-le.s avcall-powerpc64-linux-be.s avcall-powerpc64-elfv2-linux.S : avcall-powerpc64.c avcall-internal.h avcall.h avcall-alist.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S avcall-powerpc64.c -o avcall-powerpc64-elfv2-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S avcall-powerpc64.c -o avcall-powerpc64-elfv2-linux-be.s (echo '#ifdef __LITTLE_ENDIAN__' ; ../common/asm-powerpc.sh < avcall-powerpc64-elfv2-linux-le.s ; echo '#else' ; ../common/asm-powerpc.sh < avcall-powerpc64-elfv2-linux-be.s ; echo '#endif' ; cat ../common/noexecstack.h) > avcall-powerpc64-elfv2-linux.S $(RM) avcall-powerpc64-elfv2-linux-le.s avcall-powerpc64-elfv2-linux-be.s avcall-ia64-linux.s : avcall-ia64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S avcall-ia64.c -o avcall-ia64-linux.s avcall-ia64-macro.S : avcall-ia64-linux.s ../common/noexecstack.h $(THISFILE) cat avcall-ia64-linux.s ../common/noexecstack.h > avcall-ia64-macro.S avcall-x86_64-linux.s : avcall-x86_64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S avcall-x86_64.c -o avcall-x86_64-linux.s avcall-x86_64-macro.S : avcall-x86_64-linux.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < avcall-x86_64-linux.s ; cat ../common/noexecstack.h) > avcall-x86_64-macro.S avcall-x86_64-x32-linux.s : avcall-x86_64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S avcall-x86_64.c -o avcall-x86_64-x32-linux.s avcall-x86_64-windows.s : avcall-x86_64-windows.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S avcall-x86_64-windows.c -o avcall-x86_64-windows.s avcall-x86_64-windows-macro.S : avcall-x86_64-windows.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < avcall-x86_64-windows.s ; cat ../common/noexecstack.h) > avcall-x86_64-windows-macro.S avcall-s390-linux.s : avcall-s390.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S avcall-s390.c -o avcall-s390-linux.s avcall-s390-macro.S : avcall-s390-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE) (../common/asm-s390.sh < avcall-s390-linux.s ; cat ../common/noexecstack.h) > avcall-s390-macro.S avcall-s390x-linux.s : avcall-s390x.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S avcall-s390x.c -o avcall-s390x-linux.s avcall-s390x-macro.S : avcall-s390x-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE) (../common/asm-s390.sh < avcall-s390x-linux.s ; cat ../common/noexecstack.h) > avcall-s390x-macro.S avcall-riscv32-ilp32d-linux.s : avcall-riscv32.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S avcall-riscv32.c -o avcall-riscv32-ilp32d-linux.s avcall-riscv32-ilp32d-macro.S : avcall-riscv32-ilp32d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE) (../common/asm-riscv.sh < avcall-riscv32-ilp32d-linux.s ; cat ../common/noexecstack.h) > avcall-riscv32-ilp32d-macro.S avcall-riscv64-lp64d-linux.s : avcall-riscv64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S avcall-riscv64.c -o avcall-riscv64-lp64d-linux.s avcall-riscv64-lp64d-macro.S : avcall-riscv64-lp64d-linux.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE) (../common/asm-riscv.sh < avcall-riscv64-lp64d-linux.s ; cat ../common/noexecstack.h) > avcall-riscv64-lp64d-macro.S avcall-loongarch64-linux.s : avcall-loongarch64.c avcall-internal.h avcall.h avcall-alist.h $(THISFILE) $(CROSS_TOOL) loongarch64-linux gcc-12.1.0 $(GCCFLAGS) -D__loongarch64__ -S avcall-loongarch64.c -o avcall-loongarch64-linux.s avcall-loongarch64-macro.S : avcall-loongarch64-linux.s ../common/asm-loongarch.sh ../common/noexecstack.h $(THISFILE) (../common/asm-loongarch.sh < avcall-loongarch64-linux.s ; cat ../common/noexecstack.h) > avcall-loongarch64-macro.S # --------------- Rules for debugging test failures --------------- tests : tests-i386.s tests-m68k.s tests-mips.s tests-sparc.s tests-alpha.s tests-hppa.s tests-arm.s tests-powerpc.s tests-ia64.s tests-x86_64.s true tests-i386.s : tests.c avcall.h $(GCC) -V 2.7.2 -b i486-linuxaout $(GCCFLAGS) -I/usr/include -D__i386__ -S tests.c -o tests-i386.s tests-m68k.s : tests.c avcall.h $(GCC) -V 2.95.2 -b m68k-sun $(GCCFLAGS) -I/usr/include -D__m68k__ -S tests.c -o tests-m68k.s tests-mips.s : tests.c avcall.h $(GCC) -V 2.95.2 -b mips-sgi $(GCCFLAGS) -I/usr/include -D__mips__ -S tests.c -o tests-mips.s tests-sparc.s : tests.c avcall.h $(GCC) -V 2.95.2 -b sparc-sun $(GCCFLAGS) -I/usr/include -D__sparc__ -S tests.c -o tests-sparc.s tests-alpha.s : tests.c avcall.h $(GCC) -V 2.7.2 -b alpha-dec-osf $(GCCFLAGS) -I/usr/include -D__alpha__ -S tests.c -o tests-alpha.s tests-hppa.s : tests.c avcall.h $(GCC) -V 2.6.3 -b hppa1.0-hpux $(GCCFLAGS) -I/usr/include -D__hppa__ -S tests.c -o tests-hppa.s tests-arm.s : tests.c avcall.h $(GCC) -V 2.6.3 -b arm-acorn-riscix $(GCCFLAGS) -I/usr/include -D__arm__ -S tests.c -o tests-arm.s tests-powerpc.s : tests.c avcall.h $(GCC) -V 2.95.2 -b rs6000 $(GCCFLAGS) -I/usr/include -D__powerpc__ -S tests.c -o tests-powerpc.s tests-ia64.s : tests.c avcall.h $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(GCCFLAGS) -I/usr/include -D__ia64__ -S tests.c -o tests-ia64.s tests-x86_64.s : tests.c avcall.h $(GCC) -V 3.2.2 -b x86_64-suse-linux $(GCCFLAGS) -I/usr/include -D__x86_64__ -S tests.c -o tests-x86_64.s libffcall-2.5/avcall/avcall-hppa64-linux.s0000664000000000000000000002161214662622066015330 00000000000000 .LEVEL 2.0w .text .align 8 .globl avcall_call .type avcall_call,@function avcall_call: .PROC .CALLINFO FRAME=256,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,256(%r30) ldi 8,%r31 std %r9,16(%r3) copy %r27,%r9 std %r8,24(%r3) copy %r26,%r8 std %r7,32(%r3) ldo -80(%r30),%r7 std %r6,40(%r3) std %r5,48(%r3) std %r4,56(%r3) ldd 40(%r26),%r29 ldd 48(%r26),%r5 sub %r29,%r5,%r29 extrd,s %r29,29+32-1,32,%r6 cmpb,<= %r6,%r31,.L113 ldo 2112(%r30),%r30 .L6: depd,z %r31,60,61,%r29 ldo 1(%r31),%r31 add,l %r29,%r5,%r2 extrd,s %r31,63,32,%r31 ldd 0(%r2),%r4 add,l %r29,%r7,%r29 cmpb,> %r6,%r31,.L6 std %r4,0(%r29) .L113: ldw 24(%r8),%r31 ldi 16,%r29 cmpb,= %r29,%r31,.L118 copy %r31,%r4 .L7: cmpib,>=,n 0,%r6,.L8 ldw 68(%r8),%r2 extrw,u %r2,31,1,%r29 cmpib,=,n 0,%r29,.L9 fldd 0(%r5),%fr4 .L10: cmpib,>=,n 1,%r6,.L8 ldi 2,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L14 fldd 8(%r5),%fr5 .L15: cmpib,>=,n 2,%r6,.L8 ldi 4,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L19 fldd 16(%r5),%fr6 .L20: cmpib,>=,n 3,%r6,.L8 ldi 8,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L24 fldd 24(%r5),%fr7 .L25: cmpib,>=,n 4,%r6,.L8 ldi 16,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L29 fldd 32(%r5),%fr8 .L30: cmpib,>=,n 5,%r6,.L8 ldi 32,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L34 fldd 40(%r5),%fr9 .L35: cmpib,>=,n 6,%r6,.L8 ldi 64,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L39 fldd 48(%r5),%fr10 .L40: cmpib,>=,n 7,%r6,.L8 ldi 128,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,.L44 fldd 56(%r5),%fr11 .L45: cmpiclr,>= 8,%r6,%r0 ldo 64(%r7),%r1 .L8: cmpib,=,n 13,%r4,.L119 cmpib,=,n 14,%r4,.L120 #APP copy %r1,%r29 #NO_APP ldd 8(%r8),%r31 ldo -16(%r30),%r29 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldw 24(%r8),%r2 copy %r9,%r27 cmpib,= 1,%r2,.L50 copy %r28,%r1 cmpib,=,n 2,%r2,.L117 cmpib,=,n 3,%r2,.L117 cmpib,=,n 4,%r2,.L117 cmpib,=,n 5,%r2,.L116 cmpib,=,n 6,%r2,.L116 cmpib,=,n 7,%r2,.L115 cmpib,=,n 8,%r2,.L115 cmpib,=,n 9,%r2,.L114 cmpib,=,n 11,%r2,.L114 cmpib,=,n 10,%r2,.L114 cmpib,=,n 12,%r2,.L114 cmpib,= 15,%r2,.L114 ldi 16,%r31 cmpb,=,n %r31,%r2,.L121 .L50: ldd -16(%r3),%r2 .L136: ldi 0,%r28 ldd 16(%r3),%r9 ldd 24(%r3),%r8 ldd 32(%r3),%r7 ldd 40(%r3),%r6 ldd 48(%r3),%r5 ldd 56(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 .L121: ldw 0(%r8),%r31 extrd,u %r31,54+1-1,1,%r31 cmpib,= 0,%r31,.L136 ldd -16(%r3),%r2 ldd 32(%r8),%r2 ldo -1(%r2),%r31 cmpib,*<<,n 15,%r31,.L136 ldd -16(%r3),%r2 cmpib,*=,n 1,%r2,.L122 cmpib,*=,n 2,%r2,.L123 cmpib,*= 3,%r2,.L124 extrd,s %r28,23,24,%r4 cmpib,*= 4,%r2,.L125 extrd,s %r28,31,32,%r5 cmpib,*=,n 5,%r2,.L126 cmpib,*=,n 6,%r2,.L127 cmpib,*= 7,%r2,.L128 ldo -8(%r2),%r31 cmpib,*<< 8,%r31,.L50 extrd,s %r28,7,8,%r31 ldd 16(%r8),%r2 stb %r31,0(%r2) extrd,s %r28,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r28,23,24,%r2 stb %r4,1(%r31) extrd,s %r28,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r28,39,40,%r4 stb %r2,2(%r31) extrd,s %r28,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r28,55,56,%r7 stb %r5,3(%r2) ldd 16(%r8),%r31 stb %r4,4(%r31) ldd 16(%r8),%r2 stb %r6,5(%r2) ldd 16(%r8),%r31 stb %r7,6(%r31) ldd 16(%r8),%r2 stb %r28,7(%r2) ldd 32(%r8),%r2 cmpib,*=,n 8,%r2,.L136 ldd -16(%r3),%r2 cmpib,*=,n 9,%r2,.L129 cmpib,*=,n 10,%r2,.L130 cmpib,*=,n 11,%r2,.L131 cmpib,*=,n 12,%r2,.L132 cmpib,*= 13,%r2,.L133 extrd,s %r29,7,8,%r31 cmpib,*=,n 14,%r2,.L134 cmpib,*= 15,%r2,.L135 ldi 16,%r31 cmpb,*<> %r31,%r2,.L136 ldd -16(%r3),%r2 ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r29,55,56,%r7 stb %r5,11(%r2) ldd 16(%r8),%r31 stb %r4,12(%r31) ldd 16(%r8),%r2 stb %r6,13(%r2) ldd 16(%r8),%r31 stb %r7,14(%r31) ldd 16(%r8),%r2 b .L50 stb %r29,15(%r2) .L135: ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r29,55,56,%r29 stb %r5,11(%r2) ldd 16(%r8),%r31 stb %r4,12(%r31) ldd 16(%r8),%r2 stb %r6,13(%r2) ldd 16(%r8),%r31 b .L50 stb %r29,14(%r31) .L134: ldd 16(%r8),%r2 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r29 ldd 16(%r8),%r31 stb %r5,11(%r31) ldd 16(%r8),%r2 stb %r4,12(%r2) ldd 16(%r8),%r31 b .L50 stb %r29,13(%r31) .L133: ldd 16(%r8),%r2 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r5 stb %r4,9(%r31) extrd,s %r29,31,32,%r6 ldd 16(%r8),%r2 extrd,s %r29,39,40,%r29 stb %r5,10(%r2) ldd 16(%r8),%r31 stb %r6,11(%r31) ldd 16(%r8),%r2 b .L50 stb %r29,12(%r2) .L132: ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r5 stb %r4,9(%r31) extrd,s %r29,31,32,%r29 ldd 16(%r8),%r31 stb %r5,10(%r31) ldd 16(%r8),%r2 b .L50 stb %r29,11(%r2) .L131: ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r2 extrd,s %r29,23,24,%r29 stb %r4,9(%r2) ldd 16(%r8),%r31 b .L50 stb %r29,10(%r31) .L130: ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r29 ldd 16(%r8),%r31 b .L50 stb %r29,9(%r31) .L129: ldd 16(%r8),%r31 extrd,s %r29,7,8,%r29 b .L50 stb %r29,8(%r31) .L128: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 extrd,s %r28,23,24,%r31 stb %r2,1(%r29) extrd,s %r28,31,32,%r4 ldd 16(%r8),%r29 extrd,s %r28,39,40,%r2 stb %r31,2(%r29) extrd,s %r28,47,48,%r5 ldd 16(%r8),%r31 extrd,s %r28,55,56,%r6 stb %r4,3(%r31) ldd 16(%r8),%r29 stb %r2,4(%r29) ldd 16(%r8),%r31 stb %r5,5(%r31) ldd 16(%r8),%r29 b .L50 stb %r6,6(%r29) .L127: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 extrd,s %r28,23,24,%r31 stb %r2,1(%r29) extrd,s %r28,31,32,%r4 ldd 16(%r8),%r29 extrd,s %r28,39,40,%r2 stb %r31,2(%r29) extrd,s %r28,47,48,%r5 ldd 16(%r8),%r29 stb %r4,3(%r29) ldd 16(%r8),%r31 stb %r2,4(%r31) ldd 16(%r8),%r29 b .L50 stb %r5,5(%r29) .L126: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 stb %r2,1(%r29) ldd 16(%r8),%r31 extrd,s %r28,39,40,%r2 stb %r4,2(%r31) ldd 16(%r8),%r29 stb %r5,3(%r29) ldd 16(%r8),%r31 b .L50 stb %r2,4(%r31) .L125: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 stb %r2,1(%r29) ldd 16(%r8),%r29 stb %r4,2(%r29) ldd 16(%r8),%r31 b .L50 stb %r5,3(%r31) .L124: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r31 stb %r2,1(%r31) ldd 16(%r8),%r29 b .L50 stb %r4,2(%r29) .L123: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 b .L50 stb %r2,1(%r29) .L122: ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 b .L50 stb %r29,0(%r31) .L114: ldd 16(%r8),%r29 b .L50 std %r1,0(%r29) .L115: ldd 16(%r8),%r29 b .L50 stw %r1,0(%r29) .L116: ldd 16(%r8),%r29 b .L50 sth %r1,0(%r29) .L117: ldd 16(%r8),%r29 b .L50 stb %r1,0(%r29) .L120: #APP copy %r1,%r29 #NO_APP ldd 8(%r8),%r31 ldo -16(%r30),%r29 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldd 16(%r8),%r29 copy %r9,%r27 b .L50 fstd %fr4,0(%r29) .L119: #APP copy %r1,%r29 #NO_APP ldd 8(%r8),%r31 ldo -16(%r30),%r29 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldd 16(%r8),%r29 copy %r9,%r27 b .L50 fstw %fr4R,0(%r29) .L44: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L45 ldd 56(%r5),%r19 #APP fldw 60(%r5),%fr11R #NO_APP b,n .L45 .L39: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L40 ldd 48(%r5),%r20 #APP fldw 52(%r5),%fr10R #NO_APP b,n .L40 .L34: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L35 ldd 40(%r5),%r21 #APP fldw 44(%r5),%fr9R #NO_APP b,n .L35 .L29: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L30 ldd 32(%r5),%r22 #APP fldw 36(%r5),%fr8R #NO_APP b,n .L30 .L24: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L25 ldd 24(%r5),%r23 #APP fldw 28(%r5),%fr7R #NO_APP b,n .L25 .L19: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L20 ldd 16(%r5),%r24 #APP fldw 20(%r5),%fr6R #NO_APP b,n .L20 .L14: ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,.L15 ldd 8(%r5),%r25 #APP fldw 12(%r5),%fr5R #NO_APP b,n .L15 .L9: ldw 64(%r8),%r29 extrw,u %r29,31,1,%r29 cmpib,=,n 0,%r29,.L10 ldd 0(%r5),%r26 #APP fldw 4(%r5),%fr4R #NO_APP b,n .L10 .L118: b .L7 ldd 16(%r8),%r28 .EXIT .PROCEND .Lfe1: .size avcall_call,.Lfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/avcall-loongarch64-macro.S0000664000000000000000000001421614662622067016261 00000000000000 .file "avcall-loongarch64.c" .text .align 2 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-48 .cfi_def_cfa_offset 48 st.d $r22,$r3,32 st.d $r23,$r3,24 st.d $r24,$r3,16 st.d $r25,$r3,8 stptr.d $r26,$r3,0 st.d $r1,$r3,40 .cfi_offset 22, -16 .cfi_offset 23, -24 .cfi_offset 24, -32 .cfi_offset 25, -40 .cfi_offset 26, -48 .cfi_offset 1, -8 addi.d $r22,$r3,48 .cfi_def_cfa 22, 0 ld.d $r24,$r4,48 ld.d $r12,$r4,40 addi.w $r13,$r0,8 # 0x8 ldptr.w $r26,$r4,64 sub.d $r12,$r12,$r24 srai.d $r12,$r12,3 slli.w $r25,$r12,0 or $r23,$r4,$r0 addi.d $r3,$r3,-2048 ble $r25,$r13,.L72 addi.w $r6,$r12,-9 or $r14,$r3,$r0 bstrpick.d $r6,$r6,31,0 alsl.d $r6,$r6,$r0,3 addi.d $r6,$r6,8 addi.d $r5,$r24,64 or $r4,$r14,$r0 bl %plt(memcpy) ldptr.d $r4,$r24,0 .L5: addi.w $r12,$r0,2 # 0x2 ld.d $r5,$r24,8 beq $r25,$r12,.L6 addi.w $r12,$r0,3 # 0x3 ld.d $r6,$r24,16 beq $r25,$r12,.L6 addi.w $r12,$r0,4 # 0x4 ld.d $r7,$r24,24 beq $r25,$r12,.L6 addi.w $r12,$r0,5 # 0x5 ld.d $r8,$r24,32 beq $r25,$r12,.L6 addi.w $r12,$r0,6 # 0x6 ld.d $r9,$r24,40 beq $r25,$r12,.L6 addi.w $r12,$r0,7 # 0x7 ld.d $r10,$r24,48 beq $r25,$r12,.L6 ld.d $r11,$r24,56 .L6: beqz $r26,.L8 ldptr.w $r12,$r23,72 andi $r13,$r12,1 beqz $r13,.L9 fld.d $f0,$r23,112 .L10: addi.w $r13,$r0,1 # 0x1 beq $r26,$r13,.L8 andi $r13,$r12,2 bnez $r13,.L73 ldptr.w $r13,$r23,68 andi $r13,$r13,2 beqz $r13,.L13 fld.s $f1,$r23,80 .L13: addi.w $r13,$r0,2 # 0x2 beq $r26,$r13,.L8 andi $r13,$r12,4 beqz $r13,.L14 fld.d $f2,$r23,128 .L15: addi.w $r13,$r0,3 # 0x3 beq $r26,$r13,.L8 andi $r13,$r12,8 beqz $r13,.L16 fld.d $f3,$r23,136 .L17: addi.w $r13,$r0,4 # 0x4 beq $r26,$r13,.L8 andi $r13,$r12,16 bnez $r13,.L74 ldptr.w $r13,$r23,68 andi $r13,$r13,16 beqz $r13,.L19 fld.s $f4,$r23,92 .L19: addi.w $r13,$r0,5 # 0x5 beq $r26,$r13,.L8 andi $r13,$r12,32 beqz $r13,.L20 fld.d $f5,$r23,152 .L21: addi.w $r13,$r0,6 # 0x6 beq $r26,$r13,.L8 andi $r13,$r12,64 beqz $r13,.L22 fld.d $f6,$r23,160 .L23: addi.w $r13,$r0,7 # 0x7 beq $r26,$r13,.L8 andi $r12,$r12,128 beqz $r12,.L24 fld.d $f7,$r23,168 .L8: ldptr.w $r12,$r23,24 addi.w $r13,$r0,13 # 0xd ld.d $r14,$r23,8 beq $r12,$r13,.L75 addi.w $r13,$r0,14 # 0xe beq $r12,$r13,.L76 jirl $r1,$r14,0 ldptr.w $r12,$r23,24 addi.w $r13,$r0,1 # 0x1 beq $r12,$r13,.L26 addi.w $r13,$r0,16 # 0x10 bgtu $r12,$r13,.L26 la.local $r13,.L29 slli.d $r12,$r12,3 ldx.d $r12,$r13,$r12 add.d $r13,$r13,$r12 jr $r13 .section .rodata .align 3 .align 2 .L29: .dword .L26-.L29 .dword .L26-.L29 .dword .L37-.L29 .dword .L37-.L29 .dword .L37-.L29 .dword .L35-.L29 .dword .L35-.L29 .dword .L33-.L29 .dword .L33-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L30-.L29 .dword .L26-.L29 .dword .L26-.L29 .dword .L30-.L29 .dword .L28-.L29 .text .L9: ldptr.w $r13,$r23,68 andi $r13,$r13,1 beqz $r13,.L10 fld.s $f0,$r23,76 b .L10 .L76: ld.d $r23,$r23,16 jirl $r1,$r14,0 fst.d $f0,$r23,0 .L26: addi.d $r3,$r22,-48 .cfi_remember_state .cfi_def_cfa 3, 48 ld.d $r1,$r3,40 .cfi_restore 1 ld.d $r22,$r3,32 .cfi_restore 22 ld.d $r23,$r3,24 .cfi_restore 23 ld.d $r24,$r3,16 .cfi_restore 24 ld.d $r25,$r3,8 .cfi_restore 25 ldptr.d $r26,$r3,0 .cfi_restore 26 or $r4,$r0,$r0 addi.d $r3,$r3,48 .cfi_def_cfa_offset 0 jr $r1 .L72: .cfi_restore_state ble $r25,$r0,.L6 addi.w $r12,$r0,1 # 0x1 ldptr.d $r4,$r24,0 bne $r25,$r12,.L5 b .L6 .L75: ld.d $r23,$r23,16 jirl $r1,$r14,0 fst.s $f0,$r23,0 b .L26 .L73: fld.d $f1,$r23,120 b .L13 .L30: ld.d $r12,$r23,16 stptr.d $r4,$r12,0 b .L26 .L37: ld.d $r12,$r23,16 st.b $r4,$r12,0 b .L26 .L14: ldptr.w $r13,$r23,68 andi $r13,$r13,4 beqz $r13,.L15 fld.s $f2,$r23,84 b .L15 .L16: ldptr.w $r13,$r23,68 andi $r13,$r13,8 beqz $r13,.L17 fld.s $f3,$r23,88 b .L17 .L74: fld.d $f4,$r23,144 b .L19 .L35: ld.d $r12,$r23,16 st.h $r4,$r12,0 b .L26 .L33: ld.d $r12,$r23,16 stptr.w $r4,$r12,0 b .L26 .L28: ldptr.w $r12,$r23,0 andi $r12,$r12,512 beqz $r12,.L26 ld.d $r24,$r23,32 addi.w $r12,$r0,15 # 0xf addi.d $r13,$r24,-1 bgtu $r13,$r12,.L26 ld.d $r12,$r23,16 addi.w $r16,$r0,-8 # 0xfffffffffffffff8 addi.w $r13,$r0,1 # 0x1 and $r16,$r12,$r16 ldptr.d $r17,$r16,0 andi $r12,$r12,7 slli.w $r20,$r12,3 add.d $r25,$r24,$r12 sll.d $r19,$r4,$r20 addi.w $r23,$r0,8 # 0x8 sll.d $r13,$r13,$r20 xor $r19,$r19,$r17 slli.w $r18,$r25,3 bgtu $r24,$r23,.L40 bgtu $r25,$r23,.L41 addi.w $r18,$r18,-1 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r18 sub.d $r12,$r12,$r13 and $r12,$r12,$r19 xor $r12,$r12,$r17 stptr.d $r12,$r16,0 b .L26 .L20: ldptr.w $r13,$r23,68 andi $r13,$r13,32 beqz $r13,.L21 fld.s $f5,$r23,96 b .L21 .L22: ldptr.w $r13,$r23,68 andi $r13,$r13,64 beqz $r13,.L23 fld.s $f6,$r23,100 b .L23 .L24: ldptr.w $r12,$r23,68 andi $r12,$r12,128 beqz $r12,.L8 fld.s $f7,$r23,104 b .L8 .L40: sub.d $r13,$r0,$r13 and $r13,$r13,$r19 xor $r13,$r13,$r17 stptr.d $r13,$r16,0 addi.w $r13,$r0,16 # 0x10 sub.d $r12,$r23,$r12 sll.d $r20,$r5,$r20 bgtu $r25,$r13,.L42 slli.w $r12,$r12,2 ld.d $r15,$r16,8 sra.d $r14,$r4,$r12 sra.d $r12,$r14,$r12 addi.w $r18,$r18,-65 addi.w $r13,$r0,2 # 0x2 or $r12,$r12,$r20 sll.d $r13,$r13,$r18 xor $r12,$r12,$r15 addi.d $r13,$r13,-1 and $r12,$r12,$r13 xor $r12,$r12,$r15 st.d $r12,$r16,8 b .L26 .L41: ld.d $r15,$r16,8 sub.d $r12,$r23,$r12 slli.w $r12,$r12,3 addi.w $r18,$r18,-65 addi.w $r14,$r0,2 # 0x2 sra.d $r12,$r4,$r12 sll.d $r14,$r14,$r18 sub.d $r13,$r0,$r13 xor $r12,$r12,$r15 addi.d $r14,$r14,-1 and $r13,$r13,$r19 and $r12,$r12,$r14 xor $r13,$r13,$r17 xor $r12,$r12,$r15 stptr.d $r13,$r16,0 st.d $r12,$r16,8 b .L26 .L42: ld.d $r19,$r16,16 slli.w $r12,$r12,3 addi.w $r13,$r18,-129 addi.w $r17,$r0,2 # 0x2 sll.d $r17,$r17,$r13 sra.d $r13,$r5,$r12 addi.d $r15,$r17,-1 xor $r13,$r13,$r19 sra.d $r12,$r4,$r12 and $r13,$r15,$r13 or $r12,$r12,$r20 xor $r13,$r13,$r19 st.d $r12,$r16,8 st.d $r13,$r16,16 b .L26 .cfi_endproc .LFE0: .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/Makefile.in0000664000000000000000000004604114665326236013520 00000000000000# Makefile for avcall #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ OS = @host_os@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": # C compiler CC = @CC@ CFLAGS = @CFLAGS@ CPP = @CPP@ # C++ compiler CXX = @CXX@ CXXFLAGS = @CXXFLAGS@ # Both C and C++ compiler CPPFLAGS = @CPPFLAGS@ INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi` LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ MV = mv LN = @LN@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ #### End of system configuration section. #### SHELL = /bin/sh # Needed by $(LIBTOOL). top_builddir = .. OBJECTS = avcall.lo avcall-libapi.lo avcall-structcpy.lo avcall-compat.lo # Limit the set of exported symbols, on those platforms where libtool supports it. # Currently this does not exclude any symbol; maybe sometime in the future... LIBAVCALL_EXPORTED_SYMBOLS_REGEX = '^avcall_|^__builtin_avcall$$' # Before making a release, change this according to the libtool documentation, # section "Library interface versions". LIBAVCALL_VERSION_INFO = 2:1:1 all : $(OBJECTS) libavcall.la $(srcdir)/avcall.3 $(srcdir)/avcall.html avcall.lo : avcall-$(CPU).lo $(RM) avcall.lo avcall.@OBJEXT@ $(LN) avcall-$(CPU).lo avcall.lo if test -f avcall-$(CPU).@OBJEXT@; then $(LN) avcall-$(CPU).@OBJEXT@ avcall.@OBJEXT@; fi @IFNOT_MSVC@avcall-i386.lo : avcall-i386.s @IFNOT_MSVC@ $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-i386.s @IFNOT_MSVC@avcall-i386.s : $(srcdir)/avcall-i386-macro.S @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > avcall-i386.s @IF_MSVC@avcall-i386.lo : $(srcdir)/avcall-i386-msvc.c @IF_MSVC@ $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-i386-msvc.c -o avcall-i386.lo avcall-sparc.lo : avcall-sparc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-sparc.s avcall-sparc.s : $(srcdir)/avcall-sparc-macro.S $(srcdir)/avcall-sparc-solaris-macro.S case "$(OS)" in \ solaris*) input=avcall-sparc-solaris-macro.S ;; \ *) input=avcall-sparc-macro.S ;; \ esac; \ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/$${input} | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > avcall-sparc.s avcall-sparc64.lo : avcall-sparc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-sparc64.s avcall-sparc64.s : $(srcdir)/avcall-sparc64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > avcall-sparc64.s avcall-m68k.lo : avcall-m68k.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-m68k.s avcall-m68k.s : $(srcdir)/avcall-m68k.mit.S $(srcdir)/avcall-m68k.motorola.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > avcall-m68k.s avcall-mips.lo : avcall-mips.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mips.s avcall-mips.s : $(srcdir)/avcall-mips@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mips.s avcall-mipsn32.lo : avcall-mipsn32.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mipsn32.s avcall-mipsn32.s : $(srcdir)/avcall-mipsn32@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mipsn32.s avcall-mips64.lo : avcall-mips64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-mips64.s avcall-mips64.s : $(srcdir)/avcall-mips64@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-mips64.s avcall-alpha.lo : avcall-alpha.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-alpha.s avcall-alpha.s : $(srcdir)/avcall-alpha-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-alpha.s avcall-hppa.lo : avcall-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-hppa.s avcall-hppa.s : $(srcdir)/avcall-hppa-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > avcall-hppa.s avcall-hppa64.lo : avcall-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-hppa64.s avcall-hppa64.s : $(srcdir)/avcall-hppa64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > avcall-hppa64.s avcall-arm-old.lo : avcall-arm-old.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-arm-old.s avcall-arm-old.s : $(srcdir)/avcall-arm-old-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-arm-old-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-arm-old.s avcall-arm-eabi.lo : avcall-arm-eabi.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-arm-eabi.s avcall-arm-eabi.s : $(srcdir)/avcall-arm-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-arm-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-arm-eabi.s avcall-armhf-eabi.lo : avcall-armhf-eabi.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-armhf-eabi.s avcall-armhf-eabi.s : $(srcdir)/avcall-armhf-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-armhf-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-armhf-eabi.s avcall-arm64.lo : avcall-arm64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-arm64.s avcall-arm64.s : $(srcdir)/avcall-arm64-macro.S $(srcdir)/avcall-arm64-macos-macro.S case "$(OS)" in \ macos* | darwin*) input=avcall-arm64-macos-macro.S ;; \ *) input=avcall-arm64-macro.S ;; \ esac; \ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/$${input} | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > avcall-arm64.s avcall-powerpc.lo : avcall-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc.s avcall-powerpc.s : $(srcdir)/avcall-powerpc-aix.s $(srcdir)/avcall-powerpc-linux-macro.S $(srcdir)/avcall-powerpc-macos.s $(srcdir)/avcall-powerpc-sysv4-macro.S case "$(OS)" in \ aix*) syntax=aix;; \ linux* | netbsd* | openbsd*) syntax=linux;; \ macos* | darwin*) syntax=macos;; \ *) syntax=sysv4;; \ esac; \ case $${syntax} in \ macos) \ grep -v '\.machine' $(srcdir)/avcall-powerpc-$${syntax}.s > avcall-powerpc.s || exit 1 ;; \ linux | sysv4) \ $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc.s || exit 1 ;; \ *) \ cp $(srcdir)/avcall-powerpc-$${syntax}.s avcall-powerpc.s || exit 1 ;; \ esac avcall-powerpc64.lo : avcall-powerpc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc64.s avcall-powerpc64.s : $(srcdir)/avcall-powerpc64-aix.s $(srcdir)/avcall-powerpc64-linux.S case "$(OS)" in \ aix*) syntax=aix;; \ *) syntax=linux;; \ esac; \ case $${syntax} in \ linux) \ $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc64.s || exit 1 ;; \ *) \ cp $(srcdir)/avcall-powerpc64-$${syntax}.s avcall-powerpc64.s || exit 1 ;; \ esac avcall-powerpc64-elfv2.lo : avcall-powerpc64-elfv2.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-powerpc64-elfv2.s avcall-powerpc64-elfv2.s : $(srcdir)/avcall-powerpc64-elfv2-linux.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-powerpc64-elfv2.s avcall-ia64.lo : avcall-ia64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-ia64.s avcall-ia64.s : $(srcdir)/avcall-ia64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-ia64.s @IFNOT_MSVC@avcall-x86_64.lo : avcall-x86_64.s @IFNOT_MSVC@ $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-x86_64.s @IFNOT_MSVC@avcall-x86_64.s : $(srcdir)/avcall-x86_64-macro.S $(srcdir)/avcall-x86_64-windows-macro.S @IFNOT_MSVC@ case "$(OS)" in \ @IFNOT_MSVC@ cygwin* | mingw*) variant='-windows';; \ @IFNOT_MSVC@ *) variant='';; \ @IFNOT_MSVC@ esac; \ @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/avcall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > avcall-x86_64.s @IF_MSVC@avcall-x86_64.lo : avcall-x86_64.asm avcall-libapi.lo @IF_MSVC@ ml64 -c -nologo avcall-x86_64.asm @IF_MSVC@ mkdir -p .libs; cp avcall-x86_64.@OBJEXT@ .libs/avcall-x86_64.@OBJEXT@ @IF_MSVC@ sed -e 's/avcall-libapi/avcall-x86_64/g' < avcall-libapi.lo > avcall-x86_64.lo @IF_MSVC@avcall-x86_64.asm : $(srcdir)/avcall-x86_64-windows-macro.S @IF_MSVC@ { $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/avcall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > avcall-x86_64.asm avcall-x86_64-x32.lo : avcall-x86_64-x32.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-x86_64-x32.s avcall-x86_64-x32.s : $(srcdir)/avcall-x86_64-x32-linux.s cp $(srcdir)/avcall-x86_64-x32-linux.s avcall-x86_64-x32.s avcall-s390.lo : avcall-s390.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-s390.s avcall-s390.s : $(srcdir)/avcall-s390-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-s390.s avcall-s390x.lo : avcall-s390x.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-s390x.s avcall-s390x.s : $(srcdir)/avcall-s390x-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-s390x.s avcall-riscv32-ilp32d.lo : avcall-riscv32-ilp32d.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-riscv32-ilp32d.s avcall-riscv32-ilp32d.s : $(srcdir)/avcall-riscv32-ilp32d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-riscv32-ilp32d.s avcall-riscv64-lp64d.lo : avcall-riscv64-lp64d.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-riscv64-lp64d.s avcall-riscv64-lp64d.s : $(srcdir)/avcall-riscv64-lp64d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-riscv64-lp64d.s avcall-loongarch64.lo : avcall-loongarch64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c avcall-loongarch64.s avcall-loongarch64.s : $(srcdir)/avcall-loongarch64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/avcall-loongarch64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > avcall-loongarch64.s avcall-libapi.lo : $(srcdir)/avcall-libapi.c ../config.h $(srcdir)/avcall-internal.h $(srcdir)/avcall.h $(srcdir)/avcall-alist.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -c $(srcdir)/avcall-libapi.c avcall-structcpy.lo : $(srcdir)/avcall-structcpy.c $(srcdir)/../common/structcpy.c $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-structcpy.c avcall-compat.lo : $(srcdir)/avcall-compat.c ../config.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/avcall-compat.c libavcall.la : $(OBJECTS) $(LIBTOOL_LINK) $(CC) -o libavcall.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBAVCALL_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBAVCALL_VERSION_INFO) $(OBJECTS) $(LDFLAGS) # Installs the library and include files only. Typically called with only # $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here. install-lib : all force mkdir -p $(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libavcall.la $(libdir)/libavcall.la mkdir -p $(includedir) $(INSTALL_DATA) $(srcdir)/avcall.h $(includedir)/avcall.h install : all force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libavcall.la $(DESTDIR)$(libdir)/libavcall.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/avcall.h $(DESTDIR)$(includedir)/avcall.h mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 $(INSTALL_DATA) $(srcdir)/avcall.3 $(DESTDIR)$(mandir)/man3/avcall.3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) $(INSTALL_DATA) $(srcdir)/avcall.html $(DESTDIR)$(htmldir)/avcall.html installdirs : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) uninstall : force $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libavcall.la $(RM) $(DESTDIR)$(includedir)/avcall.h $(RM) $(DESTDIR)$(mandir)/man3/avcall.3 $(RM) $(DESTDIR)$(htmldir)/avcall.html minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c minitests : minitests.@OBJEXT@ libavcall.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libavcall.la $(LDFLAGS) -o minitests minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/avcall.h $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc minitests-c++ : minitests-c++.@OBJEXT@ libavcall.la $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libavcall.la $(LDFLAGS) -o minitests-c++ check : all minitests ./minitests > minitests.out LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST) test '!' -s minitests.output.$(HOST) @IF_CXX@# minitests-c++ crashes on HP-UX HPPA 32-bit with aCC, even without "-O". @IF_CXX@ test $(CPU) = 'hppa' || { \ @IF_CXX@ ./minitests-c++ > minitests-c++.out \ @IF_CXX@ && LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST) \ @IF_CXX@ && test '!' -s minitests-c++.output.$(HOST); \ @IF_CXX@ } @IF_CXX@check : minitests-c++ tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/avcall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c tests.s : $(srcdir)/tests.c $(srcdir)/avcall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c tests : tests.@OBJEXT@ libavcall.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libavcall.la $(LDFLAGS) -o tests extracheck : all tests ./tests > tests.out LC_ALL=C uniq -u < tests.out > tests.output.$(HOST) test '!' -s tests.output.$(HOST) mostlyclean : clean clean : force $(RM) *.@OBJEXT@ *.lo *.a libavcall.* core $(RM) avcall-i386.s avcall-sparc.s avcall-sparc64.s avcall-m68k.s avcall-mips.s avcall-mipsn32.s avcall-mips64.s avcall-alpha.s avcall-hppa.s avcall-hppa64.s avcall-arm-old.s avcall-arm-eabi.s avcall-armhf-eabi.s avcall-arm64.s avcall-powerpc.s avcall-powerpc64.s avcall-powerpc64-elfv2.s avcall-ia64.s avcall-x86_64.s avcall-x86_64.asm avcall-x86_64-x32.s avcall-s390.s avcall-s390x.s avcall-riscv32-ilp32d.s avcall-riscv64-lp64d.s avcall-loongarch64.s $(RM) -r .libs _libs $(RM) minitests.@OBJEXT@ minitests.s minitests minitests.out $(RM) minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out $(RM) tests.@OBJEXT@ tests.s tests tests.out distclean : clean $(RM) Makefile minitests.output.* minitests-c++.output.* tests.output.* maintainer-clean : distclean # List of source files (committed in version control or generated by Makefile.devel). SOURCE_FILES = \ COPYING \ DOC PLATFORMS README avcall.3 avcall.html \ Makefile.devel \ Makefile.maint \ Makefile.in \ avcall.h avcall-internal.h avcall-alist.h \ avcall-alpha.c avcall-alpha-linux.s avcall-alpha-macro.S \ avcall-arm.c avcall-arm-old-macro.S avcall-arm-eabi-macro.S \ avcall-armhf.c avcall-armhf-eabi-macro.S \ avcall-arm64.c avcall-arm64-macro.S avcall-arm64-macos-macro.S \ avcall-hppa.c avcall-hppa-linux.s avcall-hppa-macro.S \ avcall-hppa64.c avcall-hppa64-linux.s avcall-hppa64-macro.S \ avcall-i386.c avcall-i386-linux.s avcall-i386-macro.S \ avcall-ia64.c avcall-ia64-linux.s avcall-ia64-macro.S \ avcall-loongarch64.c avcall-loongarch64-linux.s avcall-loongarch64-macro.S \ avcall-m68k.c avcall-m68k-linux.s avcall-m68k-sun.s avcall-m68k.mit.S avcall-m68k.motorola.S \ avcall-mips.c avcall-mipseb-linux.s avcall-mipsel-linux.s avcall-mipseb-macro.S avcall-mipsel-macro.S \ avcall-mipsn32.c avcall-mipsn32eb-linux.s avcall-mipsn32el-linux.s avcall-mipsn32eb-macro.S avcall-mipsn32el-macro.S \ avcall-mips64.c avcall-mips64eb-linux.s avcall-mips64el-linux.s avcall-mips64eb-macro.S avcall-mips64el-macro.S \ avcall-powerpc.c \ avcall-powerpc-aix.s \ avcall-powerpc-linux.s avcall-powerpc-linux-macro.S avcall-powerpc-macos.s avcall-powerpc-sysv4-macro.S \ avcall-powerpc64.c avcall-powerpc64-aix.s avcall-powerpc64-linux.S avcall-powerpc64-elfv2-linux.S \ avcall-riscv32.c avcall-riscv32-ilp32d-linux.s avcall-riscv32-ilp32d-macro.S \ avcall-riscv64.c avcall-riscv64-lp64d-linux.s avcall-riscv64-lp64d-macro.S \ avcall-s390.c avcall-s390-linux.s avcall-s390-macro.S \ avcall-s390x.c avcall-s390x-linux.s avcall-s390x-macro.S \ avcall-sparc.c avcall-sparc-linux.s avcall-sparc-macro.S avcall-sparc-solaris.s avcall-sparc-solaris-macro.S \ avcall-sparc64.c avcall-sparc64-linux.s avcall-sparc64-macro.S \ avcall-x86_64.c avcall-x86_64-linux.s avcall-x86_64-macro.S avcall-x86_64-x32-linux.s \ avcall-x86_64-windows.c avcall-x86_64-windows.s avcall-x86_64-windows-macro.S \ avcall-libapi.c \ avcall-structcpy.c \ avcall-compat.c \ minitests.c minitests-c++.cc \ tests.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ avcall.man \ avcall-i386-msvc.c # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done force : libffcall-2.5/avcall/avcall-internal.h0000664000000000000000000026716514662613237014711 00000000000000/* * Copyright 1993-1995 Bill Triggs * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _AVCALL_INTERNAL_H #define _AVCALL_INTERNAL_H /* Get intptr_t, uintptr_t. */ #include "ffcall-stdint.h" /* Include the public definitions and "avcall-alist.h", */ #include "avcall.h" /* Verify at compile time that sizeof(__av_alist) <= __AV_ALIST_SIZE_BOUND. */ typedef int __av_alist_verify[2*(__AV_ALIST_SIZE_BOUND - (int)sizeof(__av_alist))+1]; /* Conversion from the public, mostly opaque, 'av_alist*' to '__av_alist*'. */ #define AV_LIST_INNER(list) ((list)->_av_alist_head._av_m_alist) /* Delayed overflow detection */ #if defined(__hppa__) && !defined(__hppa64__) #define _av_overflown(LIST) ((LIST).aptr < (LIST).eptr) #else #define _av_overflown(LIST) ((LIST).aptr > (LIST).eptr) #endif /* * Initialization of an __av_alist */ #define __av_start(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,RADDR,RETTYPE,FLAGS) \ ((LIST).func = (FUNC), \ (LIST).raddr = (RADDR), \ (LIST).rtype = (RETTYPE), \ (LIST).args = (LIST_ARGS), \ __av_start1(LIST,LIST_ARGS_END) \ __av_start_init_eptr(LIST,LIST_ARGS_END) \ (LIST).flags = (FLAGS)) #if defined(__i386__) || defined(__m68k__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).anum = 0, \ (LIST).fanum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__mipsn32__) || defined(__mips64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).anum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__sparc__) && !defined(__sparc64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__sparc64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).anum = 0, \ (LIST).darg_mask = 0, \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__hppa__) && !defined(__hppa64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, \ (LIST).aptr = (LIST).args_end = (LIST_ARGS_END), #endif #if defined(__hppa64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, \ (LIST).aptr = &(LIST).args[0], #endif #if defined(__armhf__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[__AV_IARG_NUM], \ (LIST).ianum = 0, \ (LIST).fanum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, #endif #if defined(__arm64__) || defined(__s390__) || defined(__s390x__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).ianum = 0, \ (LIST).fanum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).fanum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, #endif #if defined(__powerpc_aix__) || defined(__powerpc64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).faptr = &(LIST).fargs[0], #endif #if defined(__powerpc_sysv4__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).ianum = 0, \ (LIST).faptr = &(LIST).fargs[0], #endif #if defined(__ia64__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).faptr = &(LIST).fargs[0], #endif #if defined(__x86_64_sysv__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).ianum = 0, \ (LIST).faptr = &(LIST).fargs[0], #endif #if defined(__x86_64_ms__) #define __av_start1(LIST,LIST_ARGS_END) \ (LIST).aptr = &(LIST).args[0], \ (LIST).anum = 0, \ (LIST).farg_mask = 0, \ (LIST).darg_mask = 0, #endif #if defined(__hppa__) && !defined(__hppa64__) #define __av_start_init_eptr(LIST,LIST_ARGS_END) \ (LIST).eptr = &(LIST).args[0], #else #define __av_start_init_eptr(LIST,LIST_ARGS_END) \ (LIST).eptr = (LIST_ARGS_END), #endif #define __av_start_struct(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,TYPE_SIZE,TYPE_SPLITTABLE,RADDR,FLAGS) \ (__av_start(LIST,LIST_ARGS,LIST_ARGS_END,FUNC,RADDR,__AVstruct,FLAGS), \ (LIST).rsize = (TYPE_SIZE), \ __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE), \ 0) #if (defined(__sparc__) && !defined(__sparc64__)) /* Return structure pointer is passed in a special register. */ #define __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE) 0 #else #define __av_start_struct2(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ (((LIST).flags & __AV_SMALL_STRUCT_RETURN) \ && __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ? /* <= Word-sized structures are returned in a register. */ \ __av_start_struct3(LIST) \ : __av_start_struct4(LIST,TYPE_SIZE) \ ) /* Determines whether a structure is returned in registers, * depending on its size and its word-splittable flag. */ #if (defined(__i386__) && defined(_WIN32)) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 \ || ((TYPE_SIZE) == 8 \ && (((LIST).flags & __AV_MSVC_STRUCT_RETURN) \ || ((TYPE_SPLITTABLE) \ && ((LIST).flags & __AV_GCC_STRUCT_RETURN) \ ) ) ) ) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if (defined(__i386__) && !defined(_WIN32)) || defined(__m68k__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__)) #if (defined(__powerpc__) && !defined(__powerpc64__) && (defined(__FreeBSD__) || defined(__DragonFly__) || defined(__NetBSD__))) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 8) #else #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 \ || ((TYPE_SIZE) == 8 && (TYPE_SPLITTABLE) \ && ((LIST).flags & __AV_GCC_STRUCT_RETURN) \ ) ) #endif /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__arm__) || defined(__armhf__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 4) #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__alpha__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \ || ((TYPE_SIZE) == 16 && (TYPE_SPLITTABLE) \ && ((LIST).flags & __AV_GCC_STRUCT_RETURN) \ ) ) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if (defined(__hppa__) && !defined(__hppa64__)) || defined(__riscv32__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 8) /* Test __AV_SMALL_STRUCT_RETURN at run time. */ #define __av_start_struct3(LIST) \ 0 #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4) /* Test __AV_SMALL_STRUCT_RETURN instead of __AV_REGISTER_STRUCT_RETURN. */ #define __av_start_struct3(LIST) \ 0 #endif #if defined(__mipsn32__) || defined(__mips64__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((LIST).flags & __AV_GCC_STRUCT_RETURN \ ? ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) \ : ((TYPE_SIZE) <= 16) \ ) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if (defined(__powerpc64__) && !defined(__powerpc64_elfv2__)) || defined(__s390x__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ 0 #define __av_start_struct3(LIST) \ 0 #endif #if defined(__sparc64__) || defined(__ia64__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 32) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__hppa64__) || defined(__arm64__) || (defined(__powerpc64__) && defined(__powerpc64_elfv2__)) || defined(__x86_64_sysv__) || defined(__riscv64__) || defined(__loongarch64__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 16) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__x86_64_ms__) #define __av_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) /* Turn on __AV_REGISTER_STRUCT_RETURN if __AV_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __av_start_struct3(LIST) \ ((LIST).flags |= __AV_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__m68k__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__) /* Return structure pointer is passed in a special register. */ #define __av_start_struct4(LIST,TYPE_SIZE) 0 #endif /* Return structure pointer is passed as first arg. */ #if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) #define __av_start_struct4(LIST,TYPE_SIZE) \ (*(LIST).aptr++ = (__avword)((LIST).raddr), 0) #endif #if defined(__armhf__) #define __av_start_struct4(LIST,TYPE_SIZE) \ ((LIST).args[(LIST).ianum++] = (__avword)((LIST).raddr), 0) #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__) #define __av_start_struct4(LIST,TYPE_SIZE) \ (*(LIST).aptr++ = (__avword)((LIST).raddr), \ (LIST).anum++, \ 0 \ ) #endif #if defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) #if defined(__x86_64_x32__) /* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended from 32 bits to 64 bits. */ #define __av_start_struct4(LIST,TYPE_SIZE) \ ((LIST).iargs[(LIST).ianum++] = (unsigned long long)(unsigned long)((LIST).raddr), 0) #else #define __av_start_struct4(LIST,TYPE_SIZE) \ ((LIST).iargs[(LIST).ianum++] = (__avrword)((LIST).raddr), 0) #endif #endif #endif /* * av_ macros which specify the argument and its type * In these macro definitions, * 1. check the new value of (LIST).aptr against (LIST).eptr, then * 2. modify (LIST).aptr (considering the alignment needed for the argument * type), then store the argument. On little-endian machines and when * there are no alignment considerations, it's also OK to store the * argument and then modify (LIST).aptr. */ /* * scalar argument types */ #if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__alpha__) || defined(__hppa64__) || (defined(__arm__) && !defined(__armhf__)) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* Floats and all integer types are passed as words, * doubles as two words (on 32-bit platforms) or one word (on 64-bit platforms). */ #define __av_word(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).aptr)[-1] = (__avword)(VAL), \ 0)) #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__) /* Most things are passed as integers: */ #define __av_word(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).aptr)[-1] = (__avword)(VAL), \ (LIST).anum++, \ 0)) #endif #if defined(__hppa__) && !defined(__hppa64__) /* Floats and all integer types are passed as words, * doubles as two words. */ #define __av_word(LIST,VAL) \ ((LIST).aptr <= (LIST).eptr \ ? -1 : \ ((LIST).aptr--, \ *(LIST).aptr = (__avword)(VAL), \ 0)) #endif #if defined(__armhf__) #define __av_word(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).args[(LIST).ianum++] = (__avword)(VAL), 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).aptr)[-1] = (__avword)(VAL), \ 0))) #endif /* integer argument types */ #if defined(__arm64__) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) /* The first __AV_IARG_NUM integer arguments are passed in registers. */ #define __av_int(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (int)(VAL), 0) \ : __av_word(LIST,(int)(VAL))) #else #define __av_int(LIST,VAL) __av_word(LIST,(int)(VAL)) #endif #if defined(__arm64__) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) /* The first __AV_IARG_NUM integer arguments are passed in registers. */ #define __av_uint(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (unsigned int)(VAL), 0) \ : __av_word(LIST,(unsigned int)(VAL))) #else #define __av_uint(LIST,VAL) __av_word(LIST,(unsigned int)(VAL)) #endif #if (defined(__arm64__) && !(defined(__APPLE__) && defined(__MACH__))) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) /* The first __AV_IARG_NUM integer arguments are passed in registers. */ #define __av_long(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (long)(VAL), 0) \ : __av_word(LIST,(long)(VAL))) #elif defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) #define __av_long(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (long)(VAL), 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ ((LIST).aptr)[-2] = (unsigned int)(unsigned long)(long)(VAL), \ ((LIST).aptr)[-1] = (unsigned int)((unsigned long)(long)(VAL) >> 32), \ 0))) #else #define __av_long(LIST,VAL) __av_word(LIST,(long)(VAL)) #endif #if (defined(__arm64__) && !(defined(__APPLE__) && defined(__MACH__))) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) /* The first __AV_IARG_NUM integer arguments are passed in registers. */ #define __av_ulong(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (unsigned long)(VAL), 0) \ : __av_word(LIST,(unsigned long)(VAL))) #elif defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) #define __av_ulong(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (unsigned long)(VAL), 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ ((LIST).aptr)[-2] = (unsigned int)(unsigned long)(VAL), \ ((LIST).aptr)[-1] = (unsigned int)((unsigned long)(VAL) >> 32), \ 0))) #else #define __av_ulong(LIST,VAL) __av_word(LIST,(unsigned long)(VAL)) #endif #if (defined(__arm64__) && !(defined(__APPLE__) && defined(__MACH__))) || defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) /* The first __AV_IARG_NUM integer arguments are passed in registers. */ #if defined(__x86_64_x32__) /* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended from 32 bits to 64 bits. */ #define __av_ptr(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (unsigned long long)(unsigned long)(VAL), 0) \ : __av_word(LIST,(unsigned long long)(unsigned long)(VAL))) #else #define __av_ptr(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (__avrword)(VAL), 0) \ : __av_word(LIST,VAL)) #endif #elif defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) #define __av_ptr(LIST,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (unsigned long)(VAL), 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ ((LIST).aptr)[-2] = (unsigned int)(unsigned long)(VAL), \ ((LIST).aptr)[-1] = (unsigned int)((unsigned long)(VAL) >> 32), \ 0))) #else #define __av_ptr(LIST,VAL) __av_word(LIST,VAL) #endif #if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__AV_LLP64)) || defined(__s390x__) || defined(__riscv64__) || defined(__loongarch64__) /* ‘long long’ and ‘long’ are identical. */ #define __av_longlong __av_long #define __av_ulonglong __av_ulong #elif defined(__mipsn32__) || (defined(__x86_64__) && defined(__AV_LLP64)) /* ‘long long’ fits in __avword. */ #define __av_longlong __av_word #define __av_ulonglong(LIST,VAL) __av_word(LIST,(unsigned long long)(VAL)) #elif defined(__i386__) || defined(__m68k__) || (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc__) || defined(__x86_64_x32__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__) /* ‘long long’s are passed embedded on the arg stack. */ #define __av_longlong(LIST,VAL) __av_arg_longlong(LIST,long long,VAL) #define __av_ulonglong(LIST,VAL) __av_arg_longlong(LIST,unsigned long long,VAL) #if defined(__i386__) || defined(__m68k__) || defined(__powerpc_aix__) /* ‘long long’s are (at most) word-aligned. */ #define __av_arg_longlong(LIST,TYPE,VAL) \ ((LIST).aptr + sizeof(TYPE)/sizeof(__avword) > (LIST).eptr \ ? -1 : \ ((LIST).aptr += sizeof(TYPE)/sizeof(__avword), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ 0)) #endif #if defined(__mips__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc_sysv4__) || defined(__x86_64_x32__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__) /* ‘long long’s have alignment 4 or 8. */ #if defined(__mips__) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \ ? -1 : \ (((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE))), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ (LIST).anum++, \ 0)) #endif #if defined(__sparc__) && !defined(__sparc64__) /* Within the arg stack, the alignment is only 4, not 8. */ /* This assumes sizeof(long long) == 2*sizeof(__avword). */ #define __av_arg_longlong(LIST,TYPE,VAL) \ ((LIST).aptr + sizeof(TYPE)/sizeof(__avword) > (LIST).eptr \ ? -1 : \ ((LIST).aptr += sizeof(TYPE)/sizeof(__avword), \ (LIST).tmp._longlong = (TYPE)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0)) #endif #if (defined(__hppa__) && !defined(__hppa64__)) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr & -(intptr_t)__AV_alignof(TYPE)) - sizeof(TYPE)) < (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr & -(intptr_t)__AV_alignof(TYPE)) - sizeof(TYPE)), \ *(TYPE*)(LIST).aptr = (TYPE)(VAL), \ 0)) #endif #if defined(__arm__) && !defined(__armhf__) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ 0)) #endif #if defined(__armhf__) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))) <= __AV_IARG_NUM \ ? ((LIST).ianum = (((LIST).ianum + sizeof(TYPE)/sizeof(__avword)+__AV_alignof(TYPE)/sizeof(__avword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avword))), \ ((TYPE*)&(LIST).args[(LIST).ianum])[-1] = (TYPE)(VAL), \ 0) \ : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM] \ ? /* split case */ \ ((__avword*)(((uintptr_t)&(LIST).args[(LIST).ianum]+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)&(LIST).args[(LIST).ianum]+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ (LIST).ianum = __AV_IARG_NUM, \ 0)) \ : ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ (LIST).ianum = __AV_IARG_NUM, \ 0)))) #endif #if defined(__powerpc_sysv4__) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((((LIST).ianum + sizeof(TYPE)/sizeof(__avrword)+__AV_alignof(TYPE)/sizeof(__avrword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avrword))) <= __AV_IARG_NUM \ ? ((LIST).ianum = (((LIST).ianum + sizeof(TYPE)/sizeof(__avrword)+__AV_alignof(TYPE)/sizeof(__avrword)-1) & -(intptr_t)(__AV_alignof(TYPE)/sizeof(__avrword))), \ ((TYPE*)&(LIST).iargs[(LIST).ianum])[-1] = (TYPE)(VAL), \ 0) \ : ((LIST).ianum = __AV_IARG_NUM, \ ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+__AV_alignof(TYPE)-1) & -(intptr_t)__AV_alignof(TYPE)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ 0)))) #endif #if defined(__x86_64_x32__) #define __av_arg_longlong(LIST,TYPE,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).iargs[(LIST).ianum++] = (__avrword)(TYPE)(VAL), 0) \ : __av_word(LIST,(TYPE)(VAL))) #endif #if (defined(__s390__) && !defined(__s390x__)) /* Within the arg stack, the alignment is only 4, not 8. */ #define __av_arg_longlong(LIST,TYPE,VAL) \ ((LIST).ianum + (sizeof(TYPE)+sizeof(__avrword)-1)/sizeof(__avrword) <= __AV_IARG_NUM \ ? ((LIST).ianum += (sizeof(TYPE)+sizeof(__avrword)-1)/sizeof(__avrword), \ ((TYPE*)&(LIST).iargs[(LIST).ianum])[-1] = (TYPE)(VAL), \ 0) \ : ((LIST).ianum = __AV_IARG_NUM, \ ((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ 0)))) #endif #if defined(__riscv32__) /* Within the arg stack, the alignment is only 4, not 8. Also, the argument may be put into one word in registers and one word on the stack. */ #define __av_arg_longlong(LIST,TYPE,VAL) \ (((__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(TYPE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ ((TYPE*)(LIST).aptr)[-1] = (TYPE)(VAL), \ 0))) #endif #endif #endif /* floating-point argument types */ #if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0)) /* This assumes sizeof(double) == 2*sizeof(__avword). */ #define _av_double(LIST,VAL) \ ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0)) #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) /* Up to 2 leading float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. For doubles we need to align the aptr * to an even boundary. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).anum == (LIST).fanum && (LIST).fanum < __AV_FARG_NUM \ ? /* only floating-point arguments so far */ \ ((LIST).farg_mask |= (unsigned int) 1 << (LIST).fanum, \ (LIST).fargs[(LIST).fanum] = ((float*)(LIST).aptr)[-1] = (float)(VAL), \ (LIST).fanum++, \ 0) \ : (((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0)), \ (LIST).anum++, \ 0)) #define _av_double(LIST,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+15)&-8) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+15)&-8), \ ((LIST).anum == (LIST).fanum && (LIST).fanum < __AV_FARG_NUM \ ? /* only floating-point arguments so far */ \ ((LIST).darg_mask |= (unsigned int) 1 << (LIST).fanum, \ (LIST).dargs[(LIST).fanum] = ((double*)(LIST).aptr)[-1] = (double)(VAL), \ (LIST).fanum++, \ 0) \ : (((double*)(LIST).aptr)[-1] = (double)(VAL), \ 0)), \ (LIST).anum++, \ 0)) #endif #if defined(__mipsn32__) || defined(__mips64__) /* Up to 8 leading float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).anum < 8 \ ? ((LIST).farg_mask |= (1 << (LIST).anum), \ (LIST).fargs[(LIST).anum] = *(float*)(LIST).aptr = (float)(VAL)) \ : (*(float*)(LIST).aptr = (float)(VAL))), \ (LIST).anum++, \ (LIST).aptr++, \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).anum < 8 && ((LIST).darg_mask |= (1 << (LIST).anum))), \ *(double*)(LIST).aptr = (double)(VAL), \ (LIST).anum++, \ (LIST).aptr++, \ 0)) #endif #if defined(__sparc64__) /* Up to 16 leading float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).anum < 16 && ((LIST).darg_mask |= (1 << (LIST).anum))), \ (((float*)(LIST).aptr)[-1] = (float)(VAL)), \ (LIST).anum++, \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((LIST).anum < 16 && ((LIST).darg_mask |= (1 << (LIST).anum))), \ ((double*)(LIST).aptr)[-1] = (double)(VAL), \ (LIST).anum++, \ 0)) #endif #if defined(__alpha__) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((double*)(LIST).aptr)[-1] = (double)(VAL), \ 0)) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 \ : ((LIST).aptr++, \ ((LIST).aptr > &(LIST).args[6] \ ? /* These args will be fetched from memory using "lds" instructions */ \ /* therefore store them as floats */ \ (*(float*)((LIST).aptr-1) = (float)(VAL)) \ : /* The first 6 args will be put into registers by "ldt" instructions */ \ /* (see avcall-alpha.c!). Therefore store them as doubles. */ \ /* When viewed as floats, the value will be the correct one. */\ (*(double*)((LIST).aptr-1) = (double)(float)(VAL))), \ 0)) #endif #if defined(__hppa__) && !defined(__hppa64__) #define _av_float(LIST,VAL) \ ((LIST).aptr <= (LIST).eptr \ ? -1 : \ ((LIST).aptr--, \ ((LIST).aptr >= &(LIST).args_end[-4] \ ? ((LIST).farg_mask |= (unsigned int)1 << ((LIST).args_end - (LIST).aptr - 1), 0) \ : 0), \ *(float*)(LIST).aptr = (float)(VAL), \ 0)) #define _av_double(LIST,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr-sizeof(double)) & -(intptr_t)sizeof(double)) < (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr-sizeof(double)) & -(intptr_t)sizeof(double)), \ ((LIST).aptr >= &(LIST).args_end[-4] \ ? ((LIST).darg_mask |= (unsigned int)1 << ((LIST).args_end - (LIST).aptr - 1), 0) \ : 0), \ *(double*)(LIST).aptr = (double)(VAL), \ 0)) #endif #if defined(__hppa64__) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).aptr < &(LIST).args[8] \ ? ((LIST).farg_mask |= (unsigned int)1 << ((LIST).aptr - (LIST).args), 0) \ : 0), \ (LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).aptr < &(LIST).args[8] \ ? ((LIST).darg_mask |= (unsigned int)1 << ((LIST).aptr - (LIST).args), 0) \ : 0), \ (LIST).aptr++, \ ((double*)(LIST).aptr)[-1] = (double)(VAL), \ 0)) #endif #if defined(__arm__) && !defined(__armhf__) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0)) #define _av_double(LIST,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr + 15) & -8) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr + 15) & -8), \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0)) #endif #if defined(__armhf__) /* Up to 16 float or up to 8 double args can be passed in float registers. * But they overlap: {s0,s1} = d0, {s2,s3} = d1, and so on. */ #define _av_float(LIST,VAL) \ ((LIST).fanum <= 15 \ ? ((LIST).fargs[(LIST).fanum] = (float)(VAL), \ (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(float*)(LIST).aptr = (float)(VAL)), \ (LIST).aptr++, \ 0))) #define _av_double(LIST,VAL) \ (((LIST).fanum % 2 ? ((LIST).fanum++, 0) : 0), \ ((LIST).fanum <= 14 \ ? ((LIST).dargs[(LIST).fanum / 2] = (double)(VAL), \ (LIST).darg_mask |= ((unsigned int) 1) << ((LIST).fanum / 2), \ (LIST).fanum += 2, \ 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((*(double*)(LIST).aptr = (double)(VAL)), \ (LIST).aptr += 2, \ 0)))) #endif #if defined(__arm64__) || defined(__riscv64__) || defined(__loongarch64__) /* Up to __AV_FARG_NUM float or double args can be passed in float registers. The remaining float or double args are passed in the general-purpose argument sequence (first the integer registers, then the stack.) */ #define _av_float(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).fargs[(LIST).fanum] = (float)(VAL), \ (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(float*)(LIST).aptr = (float)(VAL)), \ (LIST).aptr++, \ 0))) #define _av_double(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).dargs[(LIST).fanum] = (double)(VAL), \ (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(double*)(LIST).aptr = (double)(VAL)), \ (LIST).aptr += sizeof(double)/sizeof(__avword), \ 0))) #endif #if defined(__powerpc_aix__) /* Up to __AV_FARG_NUM float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (LIST).tmp._double), \ 0)) #endif #if defined(__powerpc_sysv4__) /* Up to __AV_FARG_NUM float or double non-varargs args can be passed in * float registers, without occupying space in the general registers. */ #define _av_float(LIST,VAL) \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] \ ? ((*(LIST).faptr++ = (double)(float)(VAL)), 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0))) #define _av_double(LIST,VAL) \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] \ ? ((*(LIST).faptr++ = (double)(VAL)), 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0))) #endif #if defined(__powerpc64__) /* Up to __AV_FARG_NUM float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. */ #if defined(_AIX) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[(LIST).flags & __AV_AIXCC_FLOAT_ARGS ? -2 : -1] = (float)(VAL), \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \ 0)) #elif defined(__LITTLE_ENDIAN__) #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-2] = (float)(VAL), \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \ 0)) #else /* _BIG_ENDIAN */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(float)(VAL)), \ 0)) #endif #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((double*)(LIST).aptr)[-1] = (double)(VAL), \ (LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr++ = (double)(VAL)), \ 0)) #endif #if defined(__ia64__) /* Up to 8 leading float or double non-varargs args can be passed in * float registers, but we also push them into the corresponding int * registers in case of varargs. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(float*)(LIST).aptr = (float)(VAL)), \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr = *(float*)(LIST).aptr, (LIST).faptr++)), \ (LIST).aptr++, \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (*(double*)(LIST).aptr = (double)(VAL), \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] && (*(LIST).faptr = *(double*)(LIST).aptr, (LIST).faptr++)), \ (LIST).aptr++, \ 0)) #endif #if defined(__x86_64_sysv__) /* Up to 8 leading float or double args can be passed in float registers. */ #define _av_float(LIST,VAL) \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] \ ? (*(LIST).faptr = 0.0, *(float*)(LIST).faptr = (float)(VAL), \ (LIST).faptr++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(float*)(LIST).aptr = (float)(VAL)), \ (LIST).aptr++, \ 0))) #define _av_double(LIST,VAL) \ ((LIST).faptr < &(LIST).fargs[__AV_FARG_NUM] \ ? (*(LIST).faptr = (double)(VAL), \ (LIST).faptr++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(double*)(LIST).aptr = (double)(VAL)), \ (LIST).aptr++, \ 0))) #endif #if defined(__x86_64_ms__) /* The float or double args among the first 4 argument words are passed * in floating-point registers, but we also push them into the * corresponding integer registers in case of varargs. */ #define _av_float(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).anum < 4 \ ? ((LIST).farg_mask |= (1 << (LIST).anum), \ (LIST).fargs[(LIST).anum] = *(float*)(LIST).aptr = (float)(VAL)) \ : (*(float*)(LIST).aptr = (float)(VAL))), \ (LIST).anum++, \ (LIST).aptr++, \ 0)) #define _av_double(LIST,VAL) \ ((LIST).aptr >= (LIST).eptr \ ? -1 : \ (((LIST).anum < 4 \ ? ((LIST).darg_mask |= (1 << (LIST).anum), \ (LIST).dargs[(LIST).anum] = *(double*)(LIST).aptr = (double)(VAL)) \ : (*(double*)(LIST).aptr = (double)(VAL))), \ (LIST).anum++, \ (LIST).aptr++, \ 0)) #endif #if defined(__s390__) && !defined(__s390x__) /* Up to 2 float or double non-varargs args can be passed in * float registers, without occupying space in the general registers. */ #define _av_float(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).fargs[(LIST).fanum] = (float)(VAL), \ (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0))) #define _av_double(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).dargs[(LIST).fanum] = (double)(VAL), \ (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0))) #endif #if defined(__s390x__) /* Up to __AV_FARG_NUM float or double args can be passed in float registers. */ #define _av_float(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).fargs[(LIST).fanum] = (float)(VAL), \ (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((LIST).aptr++, \ ((float*)(LIST).aptr)[-1] = (float)(VAL), \ 0))) #define _av_double(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).dargs[(LIST).fanum] = (double)(VAL), \ (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(double*)(LIST).aptr = (double)(VAL)), \ (LIST).aptr++, \ 0))) #endif #if defined(__riscv32__) /* Up to __AV_FARG_NUM float or double args can be passed in float registers. The remaining float or double args are passed in the general-purpose argument sequence (first the integer registers, then the stack.) */ #define _av_float(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).fargs[(LIST).fanum] = (float)(VAL), \ (LIST).farg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr >= (LIST).eptr \ ? -1 : \ ((*(float*)(LIST).aptr) = (float)(VAL), \ (LIST).aptr++, \ 0))) #define _av_double(LIST,VAL) \ ((LIST).fanum < __AV_FARG_NUM \ ? ((LIST).dargs[(LIST).fanum] = (double)(VAL), \ (LIST).darg_mask |= ((unsigned int) 1) << (LIST).fanum, \ (LIST).fanum++, \ 0) \ : ((LIST).aptr + 2 > (LIST).eptr \ ? -1 : \ ((LIST).aptr += 2, \ (LIST).tmp._double = (double)(VAL), \ (LIST).aptr[-2] = (LIST).tmp.words[0], \ (LIST).aptr[-1] = (LIST).tmp.words[1], \ 0))) #endif /* * structure argument types */ extern void avcall_structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment); #define __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,PLACE,VAL_ADDR) \ avcall_structcpy(PLACE,VAL_ADDR,TYPE_SIZE,TYPE_ALIGN) /* Structure argument alignment. */ #if defined(__i386__) && defined(_MSC_VER) /* In MSVC, doubles inside structures have alignment 8, i.e. * __AV_alignof(double) = 8, but doubles (and also structures containing * doubles) are passed on the stack with alignment 4. Looks really weird. */ #define __av_struct_alignment(TYPE_ALIGN) \ ((TYPE_ALIGN) <= 4 ? (TYPE_ALIGN) : 4) #else #define __av_struct_alignment(TYPE_ALIGN) \ (TYPE_ALIGN) #endif #if defined(__i386__) || defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__ia64__) /* Structures are passed as fully aligned structures on the arg stack. * We align the aptr, store the structure, then fill to word alignment. * Single-small-integer structures are NOT promoted to integers and have * different alignment. */ /* little endian -> small structures < 1 word are adjusted to the left (i.e. occupy the low bits of the word) */ #if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__) && defined(__ARMEL__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0)) #endif #if defined(__ia64__) /* With GCC < 3, types larger than a word have 2-word alignment. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ (((LIST).flags & __AV_OLDGCC_STRUCT_ARGS) \ ? ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)), \ ((TYPE_SIZE) > sizeof(__avword) && (((LIST).aptr - &(LIST).args[0]) & 1) ? ++(LIST).aptr : 0), \ ((LIST).aptr > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0))) \ : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0))) #endif /* small structures < 1 word are adjusted depending on compiler */ #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (++(LIST).anum, \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0)) #define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ ++(LIST).anum, \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL),\ 0)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((LIST).flags & __AV_SGICC_STRUCT_ARGS \ ? /* SGI MIPS cc passes small structures left-adjusted, although big-endian! */\ __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ : /* SGI MIPS gcc passes small structures within the first four words left- \ * adjusted, for compatibility with cc. But structures in memory are passed \ * right-adjusted!! See gcc-2.6.3/config/mips/mips.c:function_arg(). \ */ \ ((LIST).aptr < &(LIST).args[4] \ ? __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ : __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL))) #endif #if defined(__mipsn32__) || defined(__mips64__) /* When a structure is passed (partially) in registers, it is passed in the * integer registers, except that doubles within the structure are passed in * the floating point registers. Instead of distinguishing these cases, we * always pass the structure in both the integer and the floating point * registers. */ #define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ ((LIST).anum < 8 && ((LIST).darg_mask |= (-1 << (LIST).anum))), \ (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \ (LIST).darg_mask &= (1 << ((LIST).anum < 8 ? (LIST).anum : 8)) - 1, \ 0)) #define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ ((LIST).anum < 8 && ((LIST).darg_mask |= (-1 << (LIST).anum))), \ (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \ (LIST).darg_mask &= (1 << ((LIST).anum < 8 ? (LIST).anum : 8)) - 1, \ 0)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((LIST).flags & __AV_SGICC_STRUCT_ARGS \ ? /* SGI MIPS cc and gcc >= 3.4 passes small structures left-adjusted, although big-endian! */\ __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ : /* SGI MIPS gcc < 3.4 passes small structures right-adjusted. */ \ __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)) #endif #if (defined(__armhf__) && defined(__ARMEL__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \ ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).args[(LIST).ianum]-(TYPE_SIZE)),VAL), \ 0) \ : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM] \ ? /* split case */ \ ((__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ (LIST).ianum = __AV_IARG_NUM, \ 0)) \ : ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ (LIST).ianum = __AV_IARG_NUM, \ 0)))) #endif #if defined(__powerpc__) || defined(__powerpc64__) #define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0)) #define __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ 0)) #if (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__powerpc64__) && defined(__BIG_ENDIAN__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((LIST).flags & __AV_AIXCC_STRUCT_ARGS \ ? /* AIX cc and xlc pass small structures left-adjusted, although big-endian! */\ __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ : /* gcc passes small structures right-adjusted. */ \ __av_struct_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL)) #endif #if (defined(__powerpc64__) && defined(__LITTLE_ENDIAN__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) #endif #endif /* big endian -> small structures < 1 word are adjusted to the right (i.e. occupy the high bits of the word) */ #if (defined(__arm__) && !defined(__armhf__) && !defined(__ARMEL__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ 0)) #endif #if (defined(__armhf__) && !defined(__ARMEL__)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((((LIST).ianum*sizeof(__avword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avword) \ ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).args[(LIST).ianum]-(TYPE_SIZE)),VAL), \ 0) \ : ((LIST).aptr == &(LIST).args[__AV_IARG_NUM] \ ? /* split case */ \ ((__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)&(LIST).args[(LIST).ianum]+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ (LIST).ianum = __AV_IARG_NUM, \ 0)) \ : ((__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL), \ (LIST).ianum = __AV_IARG_NUM, \ 0)))) #endif #if defined(__hppa64__) /* Structures are passed left-adjusted (although big-endian!). */ #define __av_struct_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0)) #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ __av_struct_leftadjusted(LIST,TYPE_SIZE,(TYPE_SIZE)>sizeof(__avword)?2*sizeof(__avword):(TYPE_ALIGN),VAL) #endif #endif #if defined(__m68k__) /* Structures are passed as embedded copies on the arg stack. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr-(TYPE_SIZE)),VAL),\ 0)) #endif #if (defined(__sparc__) && !defined(__sparc64__)) /* Structures are passed as pointers to caller-made local copies. We * grab space for the copies from the end of the argument list space * and always use maximal (double) alignment. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0)) #endif #if defined(__sparc64__) /* Structures <= 16 bytes are passed as embedded copies on the arg stack, * left-adjusted (although big-endian!). * When a structure is passed (partially) in registers, it is passed in the * integer registers, except that floats and doubles within the structure * are passed in the floating point registers. Instead of distinguishing * these cases, we always pass the structure in both the integer and the * floating point registers. * Big structures are passed as pointers to caller-made local copies. * FIXME: Shouldn't (LIST).anum be incremented in sync with (LIST).aptr ? */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) > 16 \ ? (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0)) \ : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ ((LIST).anum < 16 && ((LIST).darg_mask |= (-1 << (LIST).anum))), \ (LIST).anum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))/sizeof(__avword), \ (LIST).darg_mask &= (1 << ((LIST).anum < 16 ? (LIST).anum : 16)) - 1, \ 0))) #endif #if defined(__hppa__) && !defined(__hppa64__) /* Structures <= 8 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers (to caller-made local copies * with GCC >= 8, without copy otherwise). */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) > 8 \ ? (--(LIST).aptr \ < ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr + (((TYPE_SIZE) + 7) & -8))) \ ? -1 \ : (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE) + 7) & -8)), VAL), \ *(LIST).aptr = (__avword)((uintptr_t)(LIST).eptr - (((TYPE_SIZE) + 7) & -8)), \ 0)) \ : ((TYPE_SIZE) > 4 \ ? ((__avword*)((((uintptr_t)(LIST).aptr & -8) - (intptr_t)(TYPE_SIZE)) & -8) < (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)((((uintptr_t)(LIST).aptr & -8) - (intptr_t)(TYPE_SIZE)) & -8), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).aptr,VAL), \ 0)) \ : /* FIXME: gcc-2.6.3 passes structures <= 4 bytes in memory left-adjusted! ?? */\ ((__avword*)(((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)) < (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)((((uintptr_t)(LIST).aptr & -4) - (intptr_t)(TYPE_SIZE)) & -4), \ 0)))) #endif #if defined(__arm64__) /* Structures <= 16 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers to caller-made local copies. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) <= 16 \ ? ((((LIST).ianum*sizeof(__avrword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avrword) \ ? (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)&(LIST).iargs[(LIST).ianum],VAL), \ (LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avrword)-1) & -(intptr_t)sizeof(__avrword))/sizeof(__avrword), \ 0) \ : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ ((LIST).ianum = __AV_IARG_NUM, \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0))) \ : ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).iargs[(LIST).ianum++] = (__avrword)(LIST).eptr, \ 0)) \ : (((LIST).aptr += sizeof(void*)/sizeof(__avword)) \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ ((void**)(LIST).aptr)[-1] = (LIST).eptr, \ 0)))) #endif #if defined(__powerpc_sysv4__) /* Structures are passed as pointers to caller-made local copies. We * grab space for the copies from the end of the argument list space * and always use maximal (double) alignment. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).iargs[(LIST).ianum++] = (__avrword)(LIST).eptr, \ 0)) \ : (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0))) #endif #if defined(__x86_64_sysv__) /* Structures <= 16 bytes can be passed in integer or floating-point registers if there is enough room for the whole number of words needed by the structure in the corresponding iargs/fargs block. We can't distinguish the two cases and support only passing in integer registers. Other structures are passed on the arg stack. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ (((TYPE_SIZE) <= 2*sizeof(__avword) \ && (LIST).ianum + ((TYPE_SIZE) + sizeof(__avrword)-1) / sizeof(__avrword) <= __AV_IARG_NUM) \ ? (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)&(LIST).iargs[(LIST).ianum],VAL), \ (LIST).ianum += ((TYPE_SIZE) + sizeof(__avrword)-1) / sizeof(__avrword), \ 0) \ : ((__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr - (((TYPE_SIZE)+__av_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__av_struct_alignment(TYPE_ALIGN))),VAL), \ 0))) #endif #if defined(__x86_64_ms__) /* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers to caller-made local copies. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \ ? ((__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))) > (LIST).eptr \ ? -1 : \ ((LIST).aptr = (__avword*)((uintptr_t)(LIST).aptr + (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)(LIST).aptr - (((TYPE_SIZE)+sizeof(__avword)-1) & -(intptr_t)sizeof(__avword))),VAL), \ 0)) \ : (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0))) #endif #if defined(__s390__) || defined(__s390x__) /* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers to caller-made local copies. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \ ? ((((LIST).ianum*sizeof(__avrword)+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) <= __AV_IARG_NUM*sizeof(__avrword) \ ? ((LIST).ianum += (((((TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) + sizeof(__avrword)-1) & -(intptr_t)sizeof(__avrword))/sizeof(__avrword), \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((uintptr_t)&(LIST).iargs[(LIST).ianum]-(TYPE_SIZE)),VAL), \ 0) \ : ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ ((LIST).ianum = __AV_IARG_NUM, \ __av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0))) \ : ((LIST).ianum < __AV_IARG_NUM \ ? ((LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).iargs[(LIST).ianum++] = (__avrword)(LIST).eptr, \ 0)) \ : (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0)))) #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* Structures <= 16 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers to caller-made local copies. */ #define __av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL) \ ((TYPE_SIZE) <= 2*sizeof(__avword) \ ? ((__avword*)(((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) > (LIST).eptr \ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) - (TYPE_SIZE)),VAL), \ (LIST).aptr = (__avword*)(((((uintptr_t)(LIST).aptr+(TYPE_SIZE)+(TYPE_ALIGN)-1) & -(intptr_t)(TYPE_ALIGN)) +sizeof(__avword)-1) & -(intptr_t)sizeof(__avword)), \ 0)) \ : (++(LIST).aptr \ > ((LIST).eptr = (__avword*)((uintptr_t)(LIST).eptr - (((TYPE_SIZE)+7)&-8)))\ ? -1 : \ (__av_struct_copy(TYPE_SIZE,TYPE_ALIGN,(void*)(LIST).eptr,VAL), \ (LIST).aptr[-1] = (__avword)(LIST).eptr, \ 0))) #endif #endif /* _AVCALL_INTERNAL_H */ libffcall-2.5/avcall/avcall-sparc-linux.s0000664000000000000000000000316614662622066015342 00000000000000 .file "avcall-sparc.c" .section ".text" .align 4 .global avcall_call .type avcall_call,#function .proc 04 avcall_call: !#PROLOGUE# 0 save %sp, -1128, %sp ld [%i0+20], %g3 add %sp, 68, %l1 ld [%i0+24], %o7 ld [%i0+12], %l0 sub %g3, %o7, %g3 cmp %l0, 16 be .LL51 sra %g3, 2, %g4 .LL2: mov 6, %g1 cmp %g1, %g4 bge .LL46 ld [%i0+24], %l0 .LL7: sll %g1, 2, %g3 ld [%l0+%g3], %o7 add %g1, 1, %g1 cmp %g1, %g4 bl .LL7 st %o7, [%l1+%g3] .LL46: ld [%l0+20], %o5 ld [%i0+4], %g3 ld [%l0], %o0 ld [%l0+4], %o1 ld [%l0+8], %o2 ld [%l0+12], %o3 call %g3, 0 ld [%l0+16], %o4 nop ld [%i0+12], %o7 cmp %o7, 1 be .LL9 mov %o0, %l0 cmp %o7, 2 be .LL50 cmp %o7, 3 be .LL50 cmp %o7, 4 be .LL50 cmp %o7, 5 be .LL49 cmp %o7, 6 be .LL49 cmp %o7, 7 be .LL48 cmp %o7, 8 be .LL48 cmp %o7, 9 be .LL48 cmp %o7, 10 be .LL48 add %o7, -11, %g3 cmp %g3, 1 bgu .LL28 cmp %o7, 13 ld [%i0+8], %g3 st %o0, [%g3] b .LL9 st %o1, [%g3+4] .LL28: be .LL52 cmp %o7, 14 be .LL53 cmp %o7, 15 be .LL48 cmp %o7, 16 bne .LL9 nop ld [%i0], %g3 andcc %g3, 2, %g0 be .LL9 nop ld [%i0+16], %g3 cmp %g3, 1 be .LL50 cmp %g3, 2 be .LL49 cmp %g3, 4 bne .LL9 nop .LL48: ld [%i0+8], %g3 b .LL9 st %l0, [%g3] .LL49: ld [%i0+8], %g3 b .LL9 sth %l0, [%g3] .LL50: ld [%i0+8], %g3 b .LL9 stb %l0, [%g3] .LL53: ld [%i0+8], %g3 b .LL9 std %f0, [%g3] .LL52: ld [%i0], %g3 andcc %g3, 32, %g0 bne,a .LL31 fdtos %f0, %f0 .LL31: ld [%i0+8], %g3 b .LL9 st %f0, [%g3] .LL51: ld [%i0+8], %g3 b .LL2 st %g3, [%sp+64] .LL9: ret restore %g0, 0, %o0 .LLfe1: .size avcall_call,.LLfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/avcall-x86_64-x32-linux.s0000664000000000000000000002262014662622067015577 00000000000000 .file "avcall-x86_64.c" .section .text.unlikely,"ax",@progbits .LCOLDB1: .text .LHOTB1: .p2align 4,,15 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0: pushq %rbp .LCFI0: movl %esp, %ebp .LCFI1: pushq %r12 pushq %rbx .LCFI2: movq %rdi, %rbx movl 24(%edi), %edi movl 20(%ebx), %ecx movl 88(%ebx), %r8d subl $2064, %esp leal 96(%rbx), %eax leal 15(%rsp), %esi subl %edi, %ecx subl %eax, %r8d andl $-16, %esi sarl $3, %ecx sarl $3, %r8d xorl %eax, %eax testl %ecx, %ecx jle .L6 .p2align 4,,10 .p2align 3 .L76: movq (%edi,%eax,8), %rdx movq %rdx, (%esi,%eax,8) addl $1, %eax cmpl %eax, %ecx jne .L76 .L6: movl 12(%ebx), %eax cmpl $13, %eax je .L93 cmpl $14, %eax je .L94 cmpl $7, %r8d movl 4(%ebx), %r10d jle .L39 movsd 152(%ebx), %xmm14 .L40: movsd 144(%ebx), %xmm13 .L42: movsd 136(%ebx), %xmm12 .L44: movsd 128(%ebx), %xmm11 .L46: movsd 120(%ebx), %xmm10 .L48: movsd 112(%ebx), %xmm9 .L50: movsd 104(%ebx), %xmm8 .L52: movsd 96(%ebx), %xmm15 .L53: movq 64(%ebx), %rcx movq 56(%ebx), %rdx movl $8, %eax movq 48(%ebx), %rsi movq 40(%ebx), %rdi movapd %xmm14, %xmm7 movapd %xmm13, %xmm6 movapd %xmm12, %xmm5 movq 80(%ebx), %r9 movapd %xmm11, %xmm4 movq 72(%ebx), %r8 movapd %xmm10, %xmm3 movapd %xmm9, %xmm2 movapd %xmm8, %xmm1 movapd %xmm15, %xmm0 call *%r10 movl 12(%ebx), %ecx cmpl $1, %ecx je .L22 cmpl $2, %ecx je .L84 cmpl $3, %ecx je .L84 cmpl $4, %ecx je .L84 cmpl $5, %ecx je .L85 cmpl $6, %ecx je .L85 cmpl $7, %ecx je .L89 cmpl $8, %ecx je .L89 cmpl $9, %ecx je .L89 cmpl $10, %ecx je .L89 cmpl $11, %ecx je .L90 cmpl $12, %ecx je .L90 cmpl $15, %ecx je .L89 cmpl $16, %ecx jne .L22 testl $512, (%ebx) je .L22 movl 16(%ebx), %ecx leal -1(%rcx), %esi cmpl $15, %esi ja .L22 movl 8(%ebx), %esi movl %esi, %edi andl $7, %esi andl $-8, %edi cmpl $8, %ecx leal (%rcx,%rsi), %r8d ja .L66 cmpl $8, %r8d ja .L67 leal -1(,%r8,8), %ecx movq (%edi), %r9 sall $3, %esi movl $2, %edx movl $1, %r8d salq %cl, %rdx movl %esi, %ecx salq %cl, %r8 salq %cl, %rax subq %r8, %rdx xorq %r9, %rax andq %rdx, %rax xorq %r9, %rax movq %rax, (%edi) .L22: leal -16(%rbp), %esp xorl %eax, %eax popq %rbx popq %r12 popq %rbp .LCFI3: ret .p2align 4,,10 .p2align 3 .L39: .LCFI4: je .L95 cmpl $6, %r8d je .L96 cmpl $5, %r8d je .L97 cmpl $4, %r8d je .L98 cmpl $3, %r8d je .L99 cmpl $2, %r8d je .L100 pxor %xmm8, %xmm8 cmpl $1, %r8d movapd %xmm8, %xmm9 movapd %xmm8, %xmm10 movapd %xmm8, %xmm11 movapd %xmm8, %xmm12 movapd %xmm8, %xmm13 movapd %xmm8, %xmm14 je .L52 movapd %xmm8, %xmm15 jmp .L53 .p2align 4,,10 .p2align 3 .L93: cmpl $7, %r8d movl 8(%ebx), %r12d movl 4(%ebx), %r10d jle .L7 movsd 152(%ebx), %xmm14 .L8: movsd 144(%ebx), %xmm13 .L10: movsd 136(%ebx), %xmm12 .L12: movsd 128(%ebx), %xmm11 .L14: movsd 120(%ebx), %xmm10 .L16: movsd 112(%ebx), %xmm9 .L18: movsd 104(%ebx), %xmm8 .L20: movsd 96(%ebx), %xmm15 jmp .L21 .p2align 4,,10 .p2align 3 .L84: movl 8(%ebx), %edx movb %al, (%edx) leal -16(%rbp), %esp xorl %eax, %eax popq %rbx popq %r12 popq %rbp .LCFI5: ret .p2align 4,,10 .p2align 3 .L94: .LCFI6: cmpl $7, %r8d movl 8(%ebx), %r12d movl 4(%ebx), %r10d jle .L24 movsd 152(%ebx), %xmm14 .L25: movsd 144(%ebx), %xmm13 .L27: movsd 136(%ebx), %xmm12 .L29: movsd 128(%ebx), %xmm11 .L31: movsd 120(%ebx), %xmm10 .L33: movsd 112(%ebx), %xmm9 .L35: movsd 104(%ebx), %xmm8 .L37: movsd 96(%ebx), %xmm15 .L38: movq 64(%ebx), %rcx movq 56(%ebx), %rdx movl $8, %eax movq 48(%ebx), %rsi movq 40(%ebx), %rdi movq 80(%ebx), %r9 movq 72(%ebx), %r8 movapd %xmm14, %xmm7 movapd %xmm13, %xmm6 movapd %xmm12, %xmm5 movapd %xmm11, %xmm4 movapd %xmm10, %xmm3 movapd %xmm9, %xmm2 movapd %xmm8, %xmm1 movapd %xmm15, %xmm0 call *%r10 movsd %xmm0, (%r12d) leal -16(%rbp), %esp xorl %eax, %eax popq %rbx popq %r12 popq %rbp .LCFI7: ret .p2align 4,,10 .p2align 3 .L7: .LCFI8: je .L101 cmpl $6, %r8d je .L102 cmpl $5, %r8d je .L103 cmpl $4, %r8d je .L104 cmpl $3, %r8d je .L105 cmpl $2, %r8d je .L106 pxor %xmm8, %xmm8 cmpl $1, %r8d movapd %xmm8, %xmm9 movapd %xmm8, %xmm10 movapd %xmm8, %xmm11 movapd %xmm8, %xmm12 movapd %xmm8, %xmm13 movapd %xmm8, %xmm14 movapd %xmm8, %xmm15 je .L20 .L21: movq 64(%ebx), %rcx movq 56(%ebx), %rdx movl $8, %eax movq 48(%ebx), %rsi movq 40(%ebx), %rdi movq 80(%ebx), %r9 movq 72(%ebx), %r8 movapd %xmm14, %xmm7 movapd %xmm13, %xmm6 movapd %xmm12, %xmm5 movapd %xmm11, %xmm4 movapd %xmm10, %xmm3 movapd %xmm9, %xmm2 movapd %xmm8, %xmm1 movapd %xmm15, %xmm0 call *%r10 movss %xmm0, (%r12d) leal -16(%rbp), %esp xorl %eax, %eax popq %rbx popq %r12 popq %rbp .LCFI9: ret .p2align 4,,10 .p2align 3 .L100: .LCFI10: pxor %xmm9, %xmm9 movapd %xmm9, %xmm10 movapd %xmm9, %xmm11 movapd %xmm9, %xmm12 movapd %xmm9, %xmm13 movapd %xmm9, %xmm14 jmp .L50 .L24: je .L107 cmpl $6, %r8d je .L108 cmpl $5, %r8d je .L109 cmpl $4, %r8d je .L110 cmpl $3, %r8d je .L111 cmpl $2, %r8d je .L112 pxor %xmm8, %xmm8 cmpl $1, %r8d movapd %xmm8, %xmm9 movapd %xmm8, %xmm10 movapd %xmm8, %xmm11 movapd %xmm8, %xmm12 movapd %xmm8, %xmm13 movapd %xmm8, %xmm14 movapd %xmm8, %xmm15 jne .L38 jmp .L37 .L85: movl 8(%ebx), %edx movw %ax, (%edx) jmp .L22 .L89: movl 8(%ebx), %edx movl %eax, (%edx) jmp .L22 .L106: pxor %xmm9, %xmm9 movapd %xmm9, %xmm10 movapd %xmm9, %xmm11 movapd %xmm9, %xmm12 movapd %xmm9, %xmm13 movapd %xmm9, %xmm14 jmp .L18 .L90: movl 8(%ebx), %edx movq %rax, (%edx) jmp .L22 .L112: pxor %xmm9, %xmm9 movapd %xmm9, %xmm10 movapd %xmm9, %xmm11 movapd %xmm9, %xmm12 movapd %xmm9, %xmm13 movapd %xmm9, %xmm14 jmp .L35 .L66: leal 0(,%rsi,8), %r10d movq (%edi), %r9 movq %rax, %rbx movq $-1, %r11 movl %r10d, %ecx salq %cl, %rbx salq %cl, %r11 movq %rbx, %rcx xorq %r9, %rcx andq %r11, %rcx xorq %r9, %rcx cmpl $16, %r8d movq %rcx, (%edi) jbe .L113 negl %esi movq 16(%edi), %r9 leal 64(,%rsi,8), %r11d movq %rdx, %rsi movl %r11d, %ecx sarq %cl, %rax movl %r10d, %ecx salq %cl, %rsi leal -129(,%r8,8), %ecx orq %rsi, %rax movq %rax, 8(%edi) movl $2, %eax salq %cl, %rax movl %r11d, %ecx leaq -1(%rax), %rsi movq %rdx, %rax sarq %cl, %rax xorq %r9, %rax andq %rsi, %rax xorq %r9, %rax movq %rax, 16(%edi) jmp .L22 .L67: leal 0(,%rsi,8), %ecx movq $-1, %rdx movq (%edi), %r9 negl %esi salq %cl, %rdx movq %rdx, %r10 movq %rax, %rdx salq %cl, %rdx leal -65(,%r8,8), %ecx xorq %r9, %rdx andq %r10, %rdx xorq %r9, %rdx movq 8(%edi), %r9 movq %rdx, (%edi) movl $2, %edx salq %cl, %rdx leal 64(,%rsi,8), %ecx subq $1, %rdx sarq %cl, %rax xorq %r9, %rax andq %rdx, %rax xorq %r9, %rax movq %rax, 8(%edi) jmp .L22 .L113: negl %esi leal -65(,%r8,8), %ecx movq 8(%edi), %r9 leal 32(,%rsi,4), %r11d movl $2, %esi salq %cl, %rsi movl %r11d, %ecx subq $1, %rsi sarq %cl, %rax sarq %cl, %rax movl %r10d, %ecx salq %cl, %rdx orq %rdx, %rax xorq %r9, %rax andq %rsi, %rax xorq %r9, %rax movq %rax, 8(%edi) jmp .L22 .L99: pxor %xmm10, %xmm10 movapd %xmm10, %xmm11 movapd %xmm10, %xmm12 movapd %xmm10, %xmm13 movapd %xmm10, %xmm14 jmp .L48 .L111: pxor %xmm10, %xmm10 movapd %xmm10, %xmm11 movapd %xmm10, %xmm12 movapd %xmm10, %xmm13 movapd %xmm10, %xmm14 jmp .L33 .L110: pxor %xmm11, %xmm11 movapd %xmm11, %xmm12 movapd %xmm11, %xmm13 movapd %xmm11, %xmm14 jmp .L31 .L95: pxor %xmm14, %xmm14 jmp .L40 .L96: pxor %xmm13, %xmm13 movapd %xmm13, %xmm14 jmp .L42 .L97: pxor %xmm12, %xmm12 movapd %xmm12, %xmm13 movapd %xmm12, %xmm14 jmp .L44 .L98: pxor %xmm11, %xmm11 movapd %xmm11, %xmm12 movapd %xmm11, %xmm13 movapd %xmm11, %xmm14 jmp .L46 .L109: pxor %xmm12, %xmm12 movapd %xmm12, %xmm13 movapd %xmm12, %xmm14 jmp .L29 .L108: pxor %xmm13, %xmm13 movapd %xmm13, %xmm14 jmp .L27 .L107: pxor %xmm14, %xmm14 jmp .L25 .L105: pxor %xmm10, %xmm10 movapd %xmm10, %xmm11 movapd %xmm10, %xmm12 movapd %xmm10, %xmm13 movapd %xmm10, %xmm14 jmp .L16 .L104: pxor %xmm11, %xmm11 movapd %xmm11, %xmm12 movapd %xmm11, %xmm13 movapd %xmm11, %xmm14 jmp .L14 .L103: pxor %xmm12, %xmm12 movapd %xmm12, %xmm13 movapd %xmm12, %xmm14 jmp .L12 .L102: pxor %xmm13, %xmm13 movapd %xmm13, %xmm14 jmp .L10 .L101: pxor %xmm14, %xmm14 jmp .L8 .LFE0: .size avcall_call, .-avcall_call .section .text.unlikely .LCOLDE1: .text .LHOTE1: .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 4 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0-. .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0x8c .uleb128 0x3 .byte 0x83 .uleb128 0x4 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xb .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xb .byte 0x4 .long .LCFI7-.LCFI6 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI8-.LCFI7 .byte 0xb .byte 0x4 .long .LCFI9-.LCFI8 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI10-.LCFI9 .byte 0xb .align 4 .LEFDE1: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/avcall-powerpc-macos.s0000664000000000000000000000707114662622066015653 00000000000000.text .align 2 .globl _avcall_call _avcall_call: mflr r0 stmw r29,-12(r1) stw r0,8(r1) mr r29,r3 stwu r1,-1104(r1) li r11,8 lwz r0,20(r3) mr r30,r1 lwz r3,24(r3) addi r8,r1,56 subf r0,r3,r0 srawi r10,r0,2 cmpw cr0,r11,r10 bge- cr0,L87 mr r12,r3 L6: slwi r9,r11,2 addi r11,r11,1 cmpw cr0,r11,r10 lwzx r0,r9,r12 add r9,r9,r8 stw r0,-32(r9) blt+ cr0,L6 L86: lwz r9,40(r29) subf r9,r29,r9 addi r9,r9,-44 srawi. r9,r9,3 beq- cr0,L8 cmpwi cr0,r9,1 beq- cr0,L11 cmpwi cr0,r9,2 beq- cr0,L14 cmpwi cr0,r9,3 beq- cr0,L17 cmpwi cr0,r9,4 beq- cr0,L20 cmpwi cr0,r9,5 beq- cr0,L23 cmpwi cr0,r9,6 beq- cr0,L26 cmpwi cr0,r9,7 beq- cr0,L29 cmpwi cr0,r9,8 beq- cr0,L32 cmpwi cr0,r9,9 beq- cr0,L35 cmpwi cr0,r9,10 beq- cr0,L38 cmpwi cr0,r9,11 beq- cr0,L41 cmpwi cr0,r9,12 beq- cr0,L44 L47: lfd f13,140(r29) L44: lfd f12,132(r29) L41: lfd f11,124(r29) L38: lfd f10,116(r29) L35: lfd f9,108(r29) L32: lfd f8,100(r29) L29: lfd f7,92(r29) L26: lfd f6,84(r29) L23: lfd f5,76(r29) L20: lfd f4,68(r29) L17: lfd f3,60(r29) L14: lfd f2,52(r29) L11: lfd f1,44(r29) L8: lwz r0,4(r29) lwz r9,24(r12) lwz r10,28(r12) mtctr r0 lwz r3,0(r12) lwz r4,4(r12) lwz r5,8(r12) lwz r6,12(r12) lwz r7,16(r12) lwz r8,20(r12) bctrl lwz r9,12(r29) cmpwi cr0,r9,1 beq- cr0,L49 cmpwi cr0,r9,2 beq- cr0,L90 cmpwi cr0,r9,3 beq- cr0,L90 cmpwi cr0,r9,4 beq- cr0,L90 cmpwi cr0,r9,5 beq- cr0,L89 cmpwi cr0,r9,6 beq- cr0,L89 cmpwi cr0,r9,7 beq- cr0,L91 cmpwi cr0,r9,8 beq- cr0,L91 cmpwi cr0,r9,9 beq- cr0,L91 cmpwi cr0,r9,10 beq- cr0,L91 addi r0,r9,-11 cmplwi cr0,r0,1 bgt- cr0,L68 lwz r9,8(r29) stw r4,4(r9) L88: stw r3,0(r9) L49: lwz r1,0(r1) li r3,0 lwz r0,8(r1) lmw r29,-12(r1) mtlr r0 blr L68: cmpwi cr0,r9,13 beq- cr0,L92 cmpwi cr0,r9,14 beq- cr0,L93 cmpwi cr0,r9,15 beq- cr0,L91 cmpwi cr0,r9,16 bne+ cr0,L49 lwz r0,0(r29) andi. r9,r0,512 beq- cr0,L49 lwz r8,16(r29) addi r0,r8,-1 cmplwi cr0,r0,7 bgt- cr0,L49 lwz r0,8(r29) cmplwi cr0,r8,4 rlwinm r9,r0,0,30,31 rlwinm r5,r0,0,0,29 add r8,r9,r8 bgt- cr0,L79 cmplwi cr0,r8,4 bgt- cr0,L80 slwi r0,r9,3 slwi r10,r8,3 subfic r0,r0,31 li r11,2 lwz r8,0(r5) subfic r10,r10,32 slw r11,r11,r0 slw r9,r3,r10 li r0,1 xor r9,r8,r9 slw r0,r0,r10 subf r11,r0,r11 and r9,r9,r11 xor r8,r8,r9 stw r8,0(r5) b L49 L80: slwi r8,r8,3 slwi r9,r9,3 lwz r6,0(r5) subfic r9,r9,31 lwz r7,4(r5) addi r0,r8,-32 li r11,2 subfic r8,r8,64 slw r11,r11,r9 slw r10,r3,r8 sraw r0,r3,r0 li r9,-1 xor r0,r6,r0 xor r10,r7,r10 addi r11,r11,-1 slw r9,r9,r8 and r0,r0,r11 and r10,r10,r9 xor r6,r6,r0 xor r7,r7,r10 stw r7,4(r5) stw r6,0(r5) b L49 L79: slwi r0,r9,3 cmplwi cr0,r8,8 subfic r0,r0,31 li r9,2 slw r9,r9,r0 addi r29,r9,-1 bgt- cr0,L83 slwi r9,r8,2 slwi r10,r8,3 addi r9,r9,-16 subfic r10,r10,64 sraw r11,r4,r9 lwz r8,0(r5) lwz r7,4(r5) sraw r11,r11,r9 slw r0,r3,r10 slw r4,r4,r10 or r0,r0,r11 li r9,-1 xor r0,r8,r0 xor r4,r7,r4 slw r9,r9,r10 and r0,r0,r29 and r4,r4,r9 xor r8,r8,r0 xor r7,r7,r4 stw r8,0(r5) stw r7,4(r5) b L49 L83: slwi r9,r8,3 lwz r7,0(r5) addi r6,r9,-64 lwz r8,8(r5) subfic r9,r9,96 sraw r11,r3,r6 slw r10,r4,r9 li r0,-1 slw r0,r0,r9 xor r11,r7,r11 xor r10,r8,r10 and r11,r11,r29 and r10,r10,r0 slw r9,r3,r9 sraw r4,r4,r6 xor r7,r7,r11 or r9,r9,r4 xor r8,r8,r10 stw r8,8(r5) stw r7,0(r5) stw r9,4(r5) b L49 L91: lwz r9,8(r29) b L88 L93: lwz r9,8(r29) stfd f1,0(r9) b L49 L92: lwz r9,8(r29) stfs f1,0(r9) b L49 L89: lwz r9,8(r29) sth r3,0(r9) b L49 L90: lwz r9,8(r29) stb r3,0(r9) b L49 L87: lwz r12,24(r29) b L86 libffcall-2.5/avcall/avcall-mips.c0000664000000000000000000001274214662613003014014 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible Copyright 2005 Thiemo Seufer This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an SGI MIPS with gcc/sgi-cc. This calls a C function with an argument list built up using macros defined in avcall.h. SGI MIPS Argument Passing Conventions - The entire argument list forms a structure with all the appropriate holes & alignments, and space for this is allocated in the stack frame. - Shorter integers are promoted to word length (sizeof(int)=sizeof(long)=4). - Doubles are 2 words aligned on even boundaries. - The first 4 words of the structure are passed in registers $4...$7, stack space for these is always allocated. Remaining words are passed on the stack. - If the first two args are floats or doubles, they are also passed in $f12 and $f14. But varargs functions will expect them in the integer registers and we can't tell whether the function is varargs so we pass them both ways. - GCC 3.3.x and 3.4.x pass the next args after two floats in $7 and on the stack, instead of in $6, $7, and on the stack. This is a bug that is fixed in GCC 4.0.4. We don't support these versions of GCC on mips with -mabi=32. - Structure arguments are copies embedded in the arglist structure. - Structure returns are pointers to caller-allocated space passed in as the first argument of the list. The function also returns the pointer. - Integer/pointer returns are in $2, float/double returns in $f0. - Under IRIX 5, the called function expects to see its own address in $25. This file needs to be compiled with gcc for the asm extensions, but the assembly version of it and the header file seem to work with SGI cc. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) #define OFFSETOF(struct,member) ((int)&(((struct*)0)->member)) int avcall_call(av_alist* list) { register __avword* sp __asm__("$sp"); /* C names for registers */ register __avrword iret2 __asm__("$3"); register float fret_tmp __asm__("$f0"); register double dret_tmp __asm__("$f0"); __av_alist* l = &AV_LIST_INNER(list); __avword *space = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* big space for child's stack frame */ __avword *argframe = sp; /* stack offset for argument list is 0 */ int arglen = l->aptr - l->args; int i; __avrword iret; float fret; double dret; /* load leading float args */ if (l->farg_mask & (1 << 0)) __asm__("l.s $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0])); if (l->darg_mask & (1 << 0)) __asm__("l.d $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,dargs[0])); if (l->farg_mask & (1 << 1)) __asm__("l.s $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1])); if (l->darg_mask & (1 << 1)) __asm__("l.d $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,dargs[1])); for (i = 4; i < arglen; i++) /* push excess function args */ argframe[i] = l->args[i]; /* Note: The code of this call ought to put the address of the called function in register $25 before the call. */ iret = (*l->func)(l->args[0], l->args[1], /* call function with 1st 4 args */ l->args[2], l->args[3]); fret = fret_tmp; dret = dret_tmp; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = iret; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_SMALL_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { RETURN(char, iret); } else if (l->rsize == sizeof(short)) { RETURN(short, iret); } else if (l->rsize == sizeof(int)) { RETURN(int, iret); } } } return 0; } libffcall-2.5/avcall/avcall-mipsn32el-linux.s0000664000000000000000000002270514662622065016045 00000000000000 .file 1 "avcall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,32,$31 # vars= 0, regs= 4/0, args= 0, gp= 0 .mask 0xd0010000,-8 .fmask 0x00000000,0 lw $5,20($4) lw $12,24($4) lw $2,36($4) addiu $sp,$sp,-32 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp move $16,$4 addiu $sp,$sp,-2064 subu $4,$5,$12 move $3,$sp .set noreorder .set nomacro beq $2,$0,.L2 sra $4,$4,3 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L124 andi $6,$2,0x2 .set macro .set reorder #APP # 78 "avcall-mipsn32.c" 1 lwc1 $f12,44($16) # 0 "" 2 #NO_APP andi $6,$2,0x2 .L124: .set noreorder .set nomacro beq $6,$0,.L125 andi $6,$2,0x4 .set macro .set reorder #APP # 80 "avcall-mipsn32.c" 1 lwc1 $f13,48($16) # 0 "" 2 #NO_APP andi $6,$2,0x4 .L125: .set noreorder .set nomacro beq $6,$0,.L126 andi $6,$2,0x8 .set macro .set reorder #APP # 82 "avcall-mipsn32.c" 1 lwc1 $f14,52($16) # 0 "" 2 #NO_APP andi $6,$2,0x8 .L126: .set noreorder .set nomacro beq $6,$0,.L127 andi $6,$2,0x10 .set macro .set reorder #APP # 84 "avcall-mipsn32.c" 1 lwc1 $f15,56($16) # 0 "" 2 #NO_APP andi $6,$2,0x10 .L127: .set noreorder .set nomacro beq $6,$0,.L128 andi $6,$2,0x20 .set macro .set reorder #APP # 86 "avcall-mipsn32.c" 1 lwc1 $f16,60($16) # 0 "" 2 #NO_APP andi $6,$2,0x20 .L128: .set noreorder .set nomacro beq $6,$0,.L129 andi $6,$2,0x40 .set macro .set reorder #APP # 88 "avcall-mipsn32.c" 1 lwc1 $f17,64($16) # 0 "" 2 #NO_APP andi $6,$2,0x40 .L129: .set noreorder .set nomacro beql $6,$0,.L130 andi $2,$2,0x80 .set macro .set reorder #APP # 90 "avcall-mipsn32.c" 1 lwc1 $f18,68($16) # 0 "" 2 #NO_APP andi $2,$2,0x80 .L130: bne $2,$0,.L117 .L2: lw $2,40($16) .L123: .set noreorder .set nomacro beql $2,$0,.L122 slt $4,$4,9 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L131 andi $6,$2,0x2 .set macro .set reorder #APP # 98 "avcall-mipsn32.c" 1 ldc1 $f12,0($12) # 0 "" 2 #NO_APP andi $6,$2,0x2 .L131: .set noreorder .set nomacro beq $6,$0,.L132 andi $6,$2,0x4 .set macro .set reorder #APP # 100 "avcall-mipsn32.c" 1 ldc1 $f13,8($12) # 0 "" 2 #NO_APP andi $6,$2,0x4 .L132: .set noreorder .set nomacro beq $6,$0,.L133 andi $6,$2,0x8 .set macro .set reorder #APP # 102 "avcall-mipsn32.c" 1 ldc1 $f14,16($12) # 0 "" 2 #NO_APP andi $6,$2,0x8 .L133: .set noreorder .set nomacro beq $6,$0,.L134 andi $6,$2,0x10 .set macro .set reorder #APP # 104 "avcall-mipsn32.c" 1 ldc1 $f15,24($12) # 0 "" 2 #NO_APP andi $6,$2,0x10 .L134: .set noreorder .set nomacro beq $6,$0,.L135 andi $6,$2,0x20 .set macro .set reorder #APP # 106 "avcall-mipsn32.c" 1 ldc1 $f16,32($12) # 0 "" 2 #NO_APP andi $6,$2,0x20 .L135: .set noreorder .set nomacro beq $6,$0,.L136 andi $6,$2,0x40 .set macro .set reorder #APP # 108 "avcall-mipsn32.c" 1 ldc1 $f17,40($12) # 0 "" 2 #NO_APP andi $6,$2,0x40 .L136: .set noreorder .set nomacro beql $6,$0,.L137 andi $2,$2,0x80 .set macro .set reorder #APP # 110 "avcall-mipsn32.c" 1 ldc1 $f18,48($12) # 0 "" 2 #NO_APP andi $2,$2,0x80 .L137: bne $2,$0,.L118 slt $4,$4,9 .L122: .set noreorder .set nomacro bne $4,$0,.L22 addiu $2,$12,64 .set macro .set reorder .align 3 .L82: ld $4,0($2) addiu $3,$3,8 addiu $2,$2,8 .set noreorder .set nomacro bne $5,$2,.L82 sd $4,-8($3) .set macro .set reorder .L22: #APP # 119 "avcall-mipsn32.c" 1 ld $4,0($12) # 0 "" 2 # 120 "avcall-mipsn32.c" 1 ld $5,8($12) # 0 "" 2 # 121 "avcall-mipsn32.c" 1 ld $6,16($12) # 0 "" 2 # 122 "avcall-mipsn32.c" 1 ld $7,24($12) # 0 "" 2 # 123 "avcall-mipsn32.c" 1 ld $8,32($12) # 0 "" 2 # 124 "avcall-mipsn32.c" 1 ld $9,40($12) # 0 "" 2 # 125 "avcall-mipsn32.c" 1 ld $10,48($12) # 0 "" 2 # 126 "avcall-mipsn32.c" 1 ld $11,56($12) # 0 "" 2 #NO_APP lw $25,4($16) jalr $25 lw $4,12($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,11 # 0xb .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L120 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L138 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 lw $5,16($16) .set macro .set reorder lw $3,16($16) li $4,1 # 0x1 .set noreorder .set nomacro beq $3,$4,.L107 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L109 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L110 li $4,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L139 lw $3,8($16) .set macro .set reorder .L19: move $sp,$fp .L138: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L118: #APP # 112 "avcall-mipsn32.c" 1 ldc1 $f19,56($12) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L122 slt $4,$4,9 .set macro .set reorder .align 3 .L117: #APP # 92 "avcall-mipsn32.c" 1 lwc1 $f19,72($16) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L123 lw $2,40($16) .set macro .set reorder .align 3 .L107: lw $3,8($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L110: lw $3,8($16) sw $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: lw $3,8($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .L120: lw $2,8($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L115: lw $3,8($16) .L139: .set noreorder .set nomacro b .L19 sd $2,0($3) .set macro .set reorder .L119: lw $2,8($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: addiu $4,$5,-1 sltu $4,$4,16 .set noreorder .set nomacro beq $4,$0,.L19 sltu $7,$5,9 .set macro .set reorder lw $6,8($16) li $8,-8 # 0xfffffffffffffff8 andi $4,$6,0x7 addu $5,$5,$4 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$5,9 .set noreorder .set nomacro beql $3,$0,.L42 ld $10,0($6) .set macro .set reorder sll $5,$5,3 ld $7,0($6) li $3,2 # 0x2 addiu $5,$5,-1 sll $4,$4,3 dsll $5,$3,$5 li $3,1 # 0x1 dsll $3,$3,$4 dsll $4,$2,$4 dsubu $3,$5,$3 xor $2,$4,$7 and $2,$3,$2 xor $2,$2,$7 .set noreorder .set nomacro b .L19 sd $2,0($6) .set macro .set reorder .L41: ld $10,0($6) sll $9,$4,3 dsll $7,$2,$9 li $8,-1 # 0xffffffffffffffff dsll $8,$8,$9 xor $7,$7,$10 and $7,$8,$7 xor $7,$7,$10 sltu $8,$5,17 .set noreorder .set nomacro bne $8,$0,.L121 sd $7,0($6) .set macro .set reorder subu $4,$0,$4 ld $10,16($6) sll $4,$4,3 sll $5,$5,3 addiu $4,$4,64 addiu $5,$5,-129 li $7,2 # 0x2 move $8,$3 dsll $5,$7,$5 dsra $3,$3,$4 daddiu $5,$5,-1 xor $3,$3,$10 dsra $2,$2,$4 dsll $8,$8,$9 and $3,$5,$3 or $2,$2,$8 xor $3,$3,$10 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $9,8($6) sll $3,$5,3 subu $5,$0,$4 addiu $8,$3,-65 sll $4,$4,3 sll $5,$5,3 li $3,2 # 0x2 dsll $7,$2,$4 dsll $3,$3,$8 dsra $2,$2,$5 li $5,-1 # 0xffffffffffffffff dsll $4,$5,$4 daddiu $3,$3,-1 xor $5,$7,$10 xor $2,$2,$9 and $2,$3,$2 and $4,$4,$5 xor $3,$4,$10 xor $2,$2,$9 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L121: subu $7,$0,$4 sll $7,$7,2 addiu $7,$7,32 ld $10,8($6) dsra $4,$2,$7 move $8,$3 sll $3,$5,3 addiu $3,$3,-65 dsra $5,$4,$7 dsll $2,$8,$9 li $4,2 # 0x2 dsll $3,$4,$3 or $2,$5,$2 daddiu $3,$3,-1 xor $2,$2,$10 and $2,$3,$2 xor $2,$2,$10 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/avcall-s390-linux.s0000664000000000000000000000336614662622067014733 00000000000000 .file "avcall-s390.c" .text .align 4 .globl avcall_call .type avcall_call,@function avcall_call: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long 1 .LTN0_0: lr %r14,%r15 ahi %r15,-96 lr %r10,%r2 lr %r11,%r15 lhi %r2,0 st %r14,0(%r15) l %r1,0(%r15) ahi %r15,-1032 l %r3,20(%r10) l %r4,24(%r10) sr %r3,%r4 sra %r3,2 la %r5,96(%r15) st %r1,0(%r15) cr %r2,%r3 l %r0,64(%r10) jhe .L53 .L6: lr %r1,%r2 sll %r1,2 ahi %r2,1 cr %r2,%r3 l %r9,0(%r1,%r4) st %r9,0(%r1,%r5) jl .L6 .L53: ltr %r0,%r0 je .L7 l %r1,72(%r10) tml %r1,1 je .L8 ld %f0,88(%r10) .L9: cl %r0,.LC0-.LT0_0(%r13) jle .L7 tml %r1,2 je .L12 ld %f2,96(%r10) .L7: l %r1,4(%r10) l %r4,52(%r10) l %r2,44(%r10) l %r3,48(%r10) l %r5,56(%r10) l %r6,60(%r10) basr %r14,%r1 l %r4,12(%r10) chi %r4,1 je .L16 chi %r4,2 je .L56 chi %r4,3 je .L56 chi %r4,4 je .L56 chi %r4,5 je .L55 chi %r4,6 je .L55 chi %r4,7 je .L62 chi %r4,8 je .L62 chi %r4,9 je .L62 chi %r4,10 je .L62 lr %r1,%r4 ahi %r1,-11 cl %r1,.LC0-.LT0_0(%r13) jle .L61 chi %r4,13 je .L63 chi %r4,14 je .L64 chi %r4,15 je .L62 chi %r4,16 je .L65 .L16: lhi %r2,0 l %r4,152(%r11) lm %r6,%r15,120(%r11) br %r4 .L65: tm 2(%r10),2 je .L16 l %r1,16(%r10) chi %r1,1 je .L56 chi %r1,2 je .L55 chi %r1,4 je .L62 chi %r1,8 jne .L16 .L61: l %r1,8(%r10) st %r3,4(%r1) .L54: st %r2,0(%r1) j .L16 .L62: l %r1,8(%r10) j .L54 .L55: l %r1,8(%r10) sth %r2,0(%r1) j .L16 .L56: l %r1,8(%r10) stc %r2,0(%r1) j .L16 .L64: l %r1,8(%r10) std %f0,0(%r1) j .L16 .L63: l %r1,8(%r10) ste %f0,0(%r1) j .L16 .L12: tm 71(%r10),2 je .L7 le %f2,80(%r10) j .L7 .L8: tm 71(%r10),1 je .L9 le %f0,76(%r10) j .L9 .Lfe1: .size avcall_call,.Lfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/avcall.man0000664000000000000000000002403714665326517013415 00000000000000AVCALL(3) Library Functions Manual AVCALL(3) NAME avcall - build a C argument list incrementally and call a C function on it. SYNOPSIS #include  av_alist alist; av_start_type(alist, &func [[, return_type], &return_value ]); av_type(alist, [arg_type,] value); av_call(alist); DESCRIPTION This set of macros builds an argument list for a C function and calls the function on it. It significantly reduces the amount of `glue' code required for parsers, debuggers, imbedded interpreters, C extensions to application programs and other situations where collections of func‐ tions need to be called on lists of externally-supplied arguments. Function calling conventions differ considerably on different machines and avcall attempts to provide some degree of isolation from such architecture dependencies. The interface is like stdarg(3) in reverse. All of the macros return 0 for success, < 0 for failure (e.g., argument list overflow or type-not- supported). (1) #include  and declare the argument list structure av_alist alist; (2) Set any special flags. This is architecture and compiler depen‐ dent. Compiler options that affect passing conventions may need to be flagged by #defines before the #include state‐ ment. However, the configure script should have determined which #defines are needed and put them at the top of avcall.h. (3) Initialize the alist with the function address and return value pointer (if any). There is a separate macro for each simple return type ([u]char, [u]short, [u]int, [u]long, [u]longlong, float, double, where `u' indicates `unsigned'). The macros for functions returning structures or pointers require an explicit type argument. E.g., av_start_int (alist, &func, &int_return); av_start_double (alist, &func, &double_return); av_start_void (alist, &func); av_start_struct (alist, &func, struct_type, splittable, &struct_return); av_start_ptr (alist, &func, pointer_type, &pointer_return); The splittable flag specifies whether the struct_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: av_word_splittable_1 (type1) av_word_splittable_2 (type1, type2) av_word_splittable_3 (type1, type2, type3) av_word_splittable_4 (type1, type2, type3, type4) For a struct with three slots struct { type1 id1; type2 id2; type3 id3; } you can specify splittable as av_word_splittable_3 (type1, type2, type3) . (4) Push the arguments on to the list in order. Again there is a macro for each simple built-in type, and the macros for struc‐ ture and pointer arguments require an extra type argument: av_int (alist, int_value); av_double (alist, double_value); av_struct (alist, struct_or_union_type, struct_value); av_ptr (alist, pointer_type, pointer_value); (5) Call the function, set the return value, and tidy up: av_call (alist); NOTES (1) Functions whose first declaration is in Kernighan & Ritchie style (i.e., without a typed argument list) MUST use default K&R C expression promotions (char and short to int, float to double) whether they are compiled by a K&R or an ANSI compiler, because the true argument types may not be known at the call point. Such functions typically back-con‐ vert their arguments to the declared types on function entry. (In fact, the only way to pass a true char, short or float in K&R C is by an explicit cast: func((char)c,(float)f) ). Similarly, some K&R compilers (such as Sun cc on the sparc) actually return a float as a double. Hence, for arguments of functions declared in K&R style you should use av_int() and av_double() rather than av_char(), av_short() or av_float(). If you use a K&R compiler, the avcall header files may be able to detect this and define av_float(), etc, appropriately, but with an ANSI compiler there is no way avcall can know how a function was declared, so you have to correct the argument types yourself. (2) The explicit type arguments of the av_struct() and av_ptr() macros are typically used to calculate size, alignment, and passing conven‐ tions. This may not be sufficient for some machines with unusual structure and pointer handling: in this case additional av_start_type() and av_type() macros may be defined. (3) The macros av_start_longlong(), av_start_ulonglong(), av_longlong() and av_ulonglong() work only if the C compiler has a working long long 64-bit integer type. (4) The struct types used in av_start_struct() and av_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. SEE ALSO stdarg(3), varargs(3). BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in mem‐ ory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in regis‐ ters and struct { char a[3]; } in memory, although both types have the same size and the same alignment. NON-BUGS All information is passed in CPU registers and the stack. The avcall package is therefore multithread-safe. PORTING AVCALL Ports, bug-fixes, and suggestions are most welcome. The macros required for argument pushing are pretty grungy, but it does seem to be possible to port avcall to a range of machines. Ports to non-standard or non-32-bit machines are especially welcome so we can sort the interface out before it's too late. Knowledge about argument passing conventions can be found in the gcc source, file gcc-2.6.3/config/cpu/cpu.h, section "Stack layout; func‐ tion entry, exit and calling." Some of the grunge is usually handled by a C or assembly level glue routine that actually pushes the arguments, calls the function and unpacks any return value. This is called avcall_call(). A precompiled assembler version for people without gcc is also made available. The routine should ideally have flags for the passing conventions of other compilers. Many of the current routines waste a lot of stack space and generally do hairy things to stack frames - a bit more assembly code would proba‐ bly help things along quite a bit here. AUTHOR Bill Triggs . ACKNOWLEDGEMENTS Some initial ideas were stolen from the C interface to the Zelk exten‐ sions to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC C&C Research, (for Sun4 & SGI), and Roy Feather‐ stone's personal C interface library for Sun[34] & SGI. I also looked at the machine-dependent parts of the GCC and GDB distributions, and put the gcc asm() extensions to good use. Thanks guys! This work was partly supported by EC-ESPRIT Basic Research Action SEC‐ OND. 23 July 2017 AVCALL(3) libffcall-2.5/avcall/avcall-hppa64-macro.S0000664000000000000000000002221414662622066015231 00000000000000#include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(avcall_call) DECLARE_FUNCTION(avcall_call) DEF(avcall_call) .PROC .CALLINFO FRAME=256,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,256(%r30) ldi 8,%r31 std %r9,16(%r3) copy %r27,%r9 std %r8,24(%r3) copy %r26,%r8 std %r7,32(%r3) ldo -80(%r30),%r7 std %r6,40(%r3) std %r5,48(%r3) std %r4,56(%r3) ldd 40(%r26),%r29 ldd 48(%r26),%r5 sub %r29,%r5,%r29 extrd,s %r29,29+32-1,32,%r6 cmpb,<= %r6,%r31,L(113) ldo 2112(%r30),%r30 DEF(L(6)) depd,z %r31,60,61,%r29 ldo 1(%r31),%r31 add,l %r29,%r5,%r2 extrd,s %r31,63,32,%r31 ldd 0(%r2),%r4 add,l %r29,%r7,%r29 cmpb,> %r6,%r31,L(6) std %r4,0(%r29) DEF(L(113)) ldw 24(%r8),%r31 ldi 16,%r29 cmpb,= %r29,%r31,L(118) copy %r31,%r4 DEF(L(7)) cmpib,>=,n 0,%r6,L(8) ldw 68(%r8),%r2 extrw,u %r2,31,1,%r29 cmpib,=,n 0,%r29,L(9) fldd 0(%r5),%fr4 DEF(L(10)) cmpib,>=,n 1,%r6,L(8) ldi 2,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(14) fldd 8(%r5),%fr5 DEF(L(15)) cmpib,>=,n 2,%r6,L(8) ldi 4,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(19) fldd 16(%r5),%fr6 DEF(L(20)) cmpib,>=,n 3,%r6,L(8) ldi 8,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(24) fldd 24(%r5),%fr7 DEF(L(25)) cmpib,>=,n 4,%r6,L(8) ldi 16,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(29) fldd 32(%r5),%fr8 DEF(L(30)) cmpib,>=,n 5,%r6,L(8) ldi 32,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(34) fldd 40(%r5),%fr9 DEF(L(35)) cmpib,>=,n 6,%r6,L(8) ldi 64,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(39) fldd 48(%r5),%fr10 DEF(L(40)) cmpib,>=,n 7,%r6,L(8) ldi 128,%r31 and %r2,%r31,%r29 cmpib,=,n 0,%r29,L(44) fldd 56(%r5),%fr11 DEF(L(45)) cmpiclr,>= 8,%r6,%r0 ldo 64(%r7),%r1 DEF(L(8)) cmpib,=,n 13,%r4,L(119) cmpib,=,n 14,%r4,L(120) copy %r1,%r29 ldd 8(%r8),%r31 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldw 24(%r8),%r2 copy %r9,%r27 cmpib,= 1,%r2,L(50) copy %r28,%r1 cmpib,=,n 2,%r2,L(117) cmpib,=,n 3,%r2,L(117) cmpib,=,n 4,%r2,L(117) cmpib,=,n 5,%r2,L(116) cmpib,=,n 6,%r2,L(116) cmpib,=,n 7,%r2,L(115) cmpib,=,n 8,%r2,L(115) cmpib,=,n 9,%r2,L(114) cmpib,=,n 11,%r2,L(114) cmpib,=,n 10,%r2,L(114) cmpib,=,n 12,%r2,L(114) cmpib,= 15,%r2,L(114) ldi 16,%r31 cmpb,=,n %r31,%r2,L(121) DEF(L(50)) ldd -16(%r3),%r2 DEF(L(136)) ldi 0,%r28 ldd 16(%r3),%r9 ldd 24(%r3),%r8 ldd 32(%r3),%r7 ldd 40(%r3),%r6 ldd 48(%r3),%r5 ldd 56(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 DEF(L(121)) ldw 0(%r8),%r31 extrd,u %r31,54+1-1,1,%r31 cmpib,= 0,%r31,L(136) ldd -16(%r3),%r2 ldd 32(%r8),%r2 ldo -1(%r2),%r31 cmpib,*<<,n 15,%r31,L(136) ldd -16(%r3),%r2 cmpib,*=,n 1,%r2,L(122) cmpib,*=,n 2,%r2,L(123) cmpib,*= 3,%r2,L(124) extrd,s %r28,23,24,%r4 cmpib,*= 4,%r2,L(125) extrd,s %r28,31,32,%r5 cmpib,*=,n 5,%r2,L(126) cmpib,*=,n 6,%r2,L(127) cmpib,*= 7,%r2,L(128) ldo -8(%r2),%r31 cmpib,*<< 8,%r31,L(50) extrd,s %r28,7,8,%r31 ldd 16(%r8),%r2 stb %r31,0(%r2) extrd,s %r28,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r28,23,24,%r2 stb %r4,1(%r31) extrd,s %r28,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r28,39,40,%r4 stb %r2,2(%r31) extrd,s %r28,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r28,55,56,%r7 stb %r5,3(%r2) ldd 16(%r8),%r31 stb %r4,4(%r31) ldd 16(%r8),%r2 stb %r6,5(%r2) ldd 16(%r8),%r31 stb %r7,6(%r31) ldd 16(%r8),%r2 stb %r28,7(%r2) ldd 32(%r8),%r2 cmpib,*=,n 8,%r2,L(136) ldd -16(%r3),%r2 cmpib,*=,n 9,%r2,L(129) cmpib,*=,n 10,%r2,L(130) cmpib,*=,n 11,%r2,L(131) cmpib,*=,n 12,%r2,L(132) cmpib,*= 13,%r2,L(133) extrd,s %r29,7,8,%r31 cmpib,*=,n 14,%r2,L(134) cmpib,*= 15,%r2,L(135) ldi 16,%r31 cmpb,*<> %r31,%r2,L(136) ldd -16(%r3),%r2 ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r29,55,56,%r7 stb %r5,11(%r2) ldd 16(%r8),%r31 stb %r4,12(%r31) ldd 16(%r8),%r2 stb %r6,13(%r2) ldd 16(%r8),%r31 stb %r7,14(%r31) ldd 16(%r8),%r2 b L(50) stb %r29,15(%r2) DEF(L(135)) ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r6 ldd 16(%r8),%r2 extrd,s %r29,55,56,%r29 stb %r5,11(%r2) ldd 16(%r8),%r31 stb %r4,12(%r31) ldd 16(%r8),%r2 stb %r6,13(%r2) ldd 16(%r8),%r31 b L(50) stb %r29,14(%r31) DEF(L(134)) ldd 16(%r8),%r2 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r2 stb %r4,9(%r31) extrd,s %r29,31,32,%r5 ldd 16(%r8),%r31 extrd,s %r29,39,40,%r4 stb %r2,10(%r31) extrd,s %r29,47,48,%r29 ldd 16(%r8),%r31 stb %r5,11(%r31) ldd 16(%r8),%r2 stb %r4,12(%r2) ldd 16(%r8),%r31 b L(50) stb %r29,13(%r31) DEF(L(133)) ldd 16(%r8),%r2 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r5 stb %r4,9(%r31) extrd,s %r29,31,32,%r6 ldd 16(%r8),%r2 extrd,s %r29,39,40,%r29 stb %r5,10(%r2) ldd 16(%r8),%r31 stb %r6,11(%r31) ldd 16(%r8),%r2 b L(50) stb %r29,12(%r2) DEF(L(132)) ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r31 extrd,s %r29,23,24,%r5 stb %r4,9(%r31) extrd,s %r29,31,32,%r29 ldd 16(%r8),%r31 stb %r5,10(%r31) ldd 16(%r8),%r2 b L(50) stb %r29,11(%r2) DEF(L(131)) ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r4 ldd 16(%r8),%r2 extrd,s %r29,23,24,%r29 stb %r4,9(%r2) ldd 16(%r8),%r31 b L(50) stb %r29,10(%r31) DEF(L(130)) ldd 16(%r8),%r2 extrd,s %r29,7,8,%r31 stb %r31,8(%r2) extrd,s %r29,15,16,%r29 ldd 16(%r8),%r31 b L(50) stb %r29,9(%r31) DEF(L(129)) ldd 16(%r8),%r31 extrd,s %r29,7,8,%r29 b L(50) stb %r29,8(%r31) DEF(L(128)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 extrd,s %r28,23,24,%r31 stb %r2,1(%r29) extrd,s %r28,31,32,%r4 ldd 16(%r8),%r29 extrd,s %r28,39,40,%r2 stb %r31,2(%r29) extrd,s %r28,47,48,%r5 ldd 16(%r8),%r31 extrd,s %r28,55,56,%r6 stb %r4,3(%r31) ldd 16(%r8),%r29 stb %r2,4(%r29) ldd 16(%r8),%r31 stb %r5,5(%r31) ldd 16(%r8),%r29 b L(50) stb %r6,6(%r29) DEF(L(127)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 extrd,s %r28,23,24,%r31 stb %r2,1(%r29) extrd,s %r28,31,32,%r4 ldd 16(%r8),%r29 extrd,s %r28,39,40,%r2 stb %r31,2(%r29) extrd,s %r28,47,48,%r5 ldd 16(%r8),%r29 stb %r4,3(%r29) ldd 16(%r8),%r31 stb %r2,4(%r31) ldd 16(%r8),%r29 b L(50) stb %r5,5(%r29) DEF(L(126)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 stb %r2,1(%r29) ldd 16(%r8),%r31 extrd,s %r28,39,40,%r2 stb %r4,2(%r31) ldd 16(%r8),%r29 stb %r5,3(%r29) ldd 16(%r8),%r31 b L(50) stb %r2,4(%r31) DEF(L(125)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 stb %r2,1(%r29) ldd 16(%r8),%r29 stb %r4,2(%r29) ldd 16(%r8),%r31 b L(50) stb %r5,3(%r31) DEF(L(124)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r31 stb %r2,1(%r31) ldd 16(%r8),%r29 b L(50) stb %r4,2(%r29) DEF(L(123)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 stb %r29,0(%r31) extrd,s %r28,15,16,%r2 ldd 16(%r8),%r29 b L(50) stb %r2,1(%r29) DEF(L(122)) ldd 16(%r8),%r31 extrd,s %r28,7,8,%r29 b L(50) stb %r29,0(%r31) DEF(L(114)) ldd 16(%r8),%r29 b L(50) std %r1,0(%r29) DEF(L(115)) ldd 16(%r8),%r29 b L(50) stw %r1,0(%r29) DEF(L(116)) ldd 16(%r8),%r29 b L(50) sth %r1,0(%r29) DEF(L(117)) ldd 16(%r8),%r29 b L(50) stb %r1,0(%r29) DEF(L(120)) copy %r1,%r29 ldd 8(%r8),%r31 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldd 16(%r8),%r29 copy %r9,%r27 b L(50) fstd %fr4,0(%r29) DEF(L(119)) copy %r1,%r29 ldd 8(%r8),%r31 ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldd 16(%r8),%r29 copy %r9,%r27 b L(50) fstw %fr4R,0(%r29) DEF(L(44)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(45) ldd 56(%r5),%r19 fldw 60(%r5),%fr11R b,n L(45) DEF(L(39)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(40) ldd 48(%r5),%r20 fldw 52(%r5),%fr10R b,n L(40) DEF(L(34)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(35) ldd 40(%r5),%r21 fldw 44(%r5),%fr9R b,n L(35) DEF(L(29)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(30) ldd 32(%r5),%r22 fldw 36(%r5),%fr8R b,n L(30) DEF(L(24)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(25) ldd 24(%r5),%r23 fldw 28(%r5),%fr7R b,n L(25) DEF(L(19)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(20) ldd 16(%r5),%r24 fldw 20(%r5),%fr6R b,n L(20) DEF(L(14)) ldw 64(%r8),%r29 and %r29,%r31,%r29 cmpib,=,n 0,%r29,L(15) ldd 8(%r5),%r25 fldw 12(%r5),%fr5R b,n L(15) DEF(L(9)) ldw 64(%r8),%r29 extrw,u %r29,31,1,%r29 cmpib,=,n 0,%r29,L(10) ldd 0(%r5),%r26 fldw 4(%r5),%fr4R b,n L(10) DEF(L(118)) b L(7) ldd 16(%r8),%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-sparc.c0000664000000000000000000030534314662613003014156 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a Sun4 Sparc with gcc/sun-cc. This calls a C function with an argument list built up using macros defined in avcall.h. Sparc Argument Passing Conventions The first 6 words of arguments are passed in integer registers o0-o5 regardless of type or alignment. (Registers are windowed: o0-o5 become i0-i5 if the called function executes a ‘save’ instruction.) Remaining arguments are pushed onto the stack starting at a fixed offset ("argframe"). Space is left on the stack frame for temporary storage of the register arguments as well. Doubles may be cut in half and misaligned. Shorter integers are always promoted to word-length. Functions with K&R-style declarations and float args pass them as doubles and truncate them on function entry. Structures are passed as pointers to a local copy of the structure made by the caller. Integers and pointers are returned in o0, floats in f0, doubles in f0/f1. If the function returns a structure a pointer to space allocated by the caller is pushed onto the stack immediately before the function arguments. Gcc without -fpcc-struct-return returns <= 4 byte structures as integers. Sun cc allocates temporary space for a returned structure just below the current frame pointer $fp (the $sp of the caller), and the caller must copy them from there. It also returns the temp address in $o0, but that gets nuked in the return in the code below so we can't use it. **The Sun cc struct return stuff below is a kludge**, but seems to work on the test cases... Compile this routine with gcc for the __asm__ extensions and with optimisation on (-O or -O2 or -g -O) so that argframe is set to the correct offset. (%sp is used differently in non-optimized code). For Sun cc, use the pre-compiled assembler version of this routine. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register void* callee __asm__("%g2"); /* any global or local register */ register __avrword o0 __asm__("%o0"); register __avrword o1 __asm__("%o1"); register __avrword o2 __asm__("%o2"); register __avrword o3 __asm__("%o3"); register __avrword o4 __asm__("%o4"); register __avrword o5 __asm__("%o5"); int avcall_call(av_alist* list) { /*?? We probably need to make space for Sun cc struct return somewhere here. */ register __avword* sp __asm__("%sp"); /* C names for registers */ register float fret __asm__("%f0"); /* %f0 */ register double dret __asm__("%f0"); /* %f0,%f1 */ __av_alist* l = &AV_LIST_INNER(list); __avword space[__AV_ALIST_WORDS]; /* space for callee's stack frame */ __avword *argframe = sp + 17; /* stack offset for argument list */ int arglen = l->aptr - l->args; __avrword i; if (l->rtype == __AVstruct) argframe[-1] = (__avword)l->raddr; /* push struct return address */ { int i; for (i = 6; i < arglen; i++) /* push excess function args */ argframe[i] = l->args[i]; } #if defined(__sun) if ((l->rtype == __AVstruct) && (l->flags & __AV_SUNPROCC_STRUCT_RETURN)) /* SUNWspro cc compiled functions don't copy the structure to the area * pointed to by argframe[-1] unless the caller has a proper "unimp n" * instruction. We used to generate the calling instructions on the stack, * but that does not work on Solaris 11, where the stack is not executable. * For its trampolines, GCC uses a function __enable_execute_stack that * invokes mprotect(); but that it excessive for the use-case here. * So, instead use an array of precompiled trampolines. */ { unsigned int n = l->rsize; /* FRAGILE: This use of a local label does not work when compiled with gcc-3.1 -O2! */ void *trampoline = (char *) &&trampolines + n * 24; #if 0 o0 = l->args[0]; /* This instruction gets omitted! */ o1 = l->args[1]; o2 = l->args[2]; o3 = l->args[3]; o4 = l->args[4]; o5 = l->args[5]; #else void *ptr = l->args; __asm__ __volatile__ ("ld [%0],%%o0" : : "r" (ptr)); __asm__ __volatile__ ("ld [%0+4],%%o1" : : "r" (ptr)); __asm__ __volatile__ ("ld [%0+8],%%o2" : : "r" (ptr)); __asm__ __volatile__ ("ld [%0+12],%%o3" : : "r" (ptr)); __asm__ __volatile__ ("ld [%0+16],%%o4" : : "r" (ptr)); __asm__ __volatile__ ("ld [%0+20],%%o5" : : "r" (ptr)); #endif callee = l->func; __asm__ __volatile__ ("jmp %0" "\n\t" "nop" : : "r" (trampoline)); trampolines: /* Each of these trampolines has the form call %g2 0x9FC08000 nop 0x01000000 unimp n n mov 0,%i0 0xB0102000 ret 0x81C7E008 restore 0x81E80000 */ #define TRAMPOLINE(n) \ __asm__ __volatile__ ( "call %g2" \ "\n\t" "nop" \ "\n\t" ".long " #n \ "\n\t" "mov 0,%i0" \ "\n\t" "ret" \ "\n\t" "restore"); TRAMPOLINE(0); TRAMPOLINE(1) TRAMPOLINE(2) TRAMPOLINE(3) TRAMPOLINE(4) TRAMPOLINE(5) TRAMPOLINE(6) TRAMPOLINE(7) TRAMPOLINE(8) TRAMPOLINE(9) TRAMPOLINE(10) TRAMPOLINE(11) TRAMPOLINE(12) TRAMPOLINE(13) TRAMPOLINE(14) TRAMPOLINE(15) TRAMPOLINE(16) TRAMPOLINE(17) TRAMPOLINE(18) TRAMPOLINE(19) TRAMPOLINE(20) TRAMPOLINE(21) TRAMPOLINE(22) TRAMPOLINE(23) TRAMPOLINE(24) TRAMPOLINE(25) TRAMPOLINE(26) TRAMPOLINE(27) TRAMPOLINE(28) TRAMPOLINE(29) TRAMPOLINE(30) TRAMPOLINE(31) TRAMPOLINE(32) TRAMPOLINE(33) TRAMPOLINE(34) TRAMPOLINE(35) TRAMPOLINE(36) TRAMPOLINE(37) TRAMPOLINE(38) TRAMPOLINE(39) TRAMPOLINE(40) TRAMPOLINE(41) TRAMPOLINE(42) TRAMPOLINE(43) TRAMPOLINE(44) TRAMPOLINE(45) TRAMPOLINE(46) TRAMPOLINE(47) TRAMPOLINE(48) TRAMPOLINE(49) TRAMPOLINE(50) TRAMPOLINE(51) TRAMPOLINE(52) TRAMPOLINE(53) TRAMPOLINE(54) TRAMPOLINE(55) TRAMPOLINE(56) TRAMPOLINE(57) TRAMPOLINE(58) TRAMPOLINE(59) TRAMPOLINE(60) TRAMPOLINE(61) TRAMPOLINE(62) TRAMPOLINE(63) TRAMPOLINE(64) TRAMPOLINE(65) TRAMPOLINE(66) TRAMPOLINE(67) TRAMPOLINE(68) TRAMPOLINE(69) TRAMPOLINE(70) TRAMPOLINE(71) TRAMPOLINE(72) TRAMPOLINE(73) TRAMPOLINE(74) TRAMPOLINE(75) TRAMPOLINE(76) TRAMPOLINE(77) TRAMPOLINE(78) TRAMPOLINE(79) TRAMPOLINE(80) TRAMPOLINE(81) TRAMPOLINE(82) TRAMPOLINE(83) TRAMPOLINE(84) TRAMPOLINE(85) TRAMPOLINE(86) TRAMPOLINE(87) TRAMPOLINE(88) TRAMPOLINE(89) TRAMPOLINE(90) TRAMPOLINE(91) TRAMPOLINE(92) TRAMPOLINE(93) TRAMPOLINE(94) TRAMPOLINE(95) TRAMPOLINE(96) TRAMPOLINE(97) TRAMPOLINE(98) TRAMPOLINE(99) TRAMPOLINE(100) TRAMPOLINE(101) TRAMPOLINE(102) TRAMPOLINE(103) TRAMPOLINE(104) TRAMPOLINE(105) TRAMPOLINE(106) TRAMPOLINE(107) TRAMPOLINE(108) TRAMPOLINE(109) TRAMPOLINE(110) TRAMPOLINE(111) TRAMPOLINE(112) TRAMPOLINE(113) TRAMPOLINE(114) TRAMPOLINE(115) TRAMPOLINE(116) TRAMPOLINE(117) TRAMPOLINE(118) TRAMPOLINE(119) TRAMPOLINE(120) TRAMPOLINE(121) TRAMPOLINE(122) TRAMPOLINE(123) TRAMPOLINE(124) TRAMPOLINE(125) TRAMPOLINE(126) TRAMPOLINE(127) TRAMPOLINE(128) TRAMPOLINE(129) TRAMPOLINE(130) TRAMPOLINE(131) TRAMPOLINE(132) TRAMPOLINE(133) TRAMPOLINE(134) TRAMPOLINE(135) TRAMPOLINE(136) TRAMPOLINE(137) TRAMPOLINE(138) TRAMPOLINE(139) TRAMPOLINE(140) TRAMPOLINE(141) TRAMPOLINE(142) TRAMPOLINE(143) TRAMPOLINE(144) TRAMPOLINE(145) TRAMPOLINE(146) TRAMPOLINE(147) TRAMPOLINE(148) TRAMPOLINE(149) TRAMPOLINE(150) TRAMPOLINE(151) TRAMPOLINE(152) TRAMPOLINE(153) TRAMPOLINE(154) TRAMPOLINE(155) TRAMPOLINE(156) TRAMPOLINE(157) TRAMPOLINE(158) TRAMPOLINE(159) TRAMPOLINE(160) TRAMPOLINE(161) TRAMPOLINE(162) TRAMPOLINE(163) TRAMPOLINE(164) TRAMPOLINE(165) TRAMPOLINE(166) TRAMPOLINE(167) TRAMPOLINE(168) TRAMPOLINE(169) TRAMPOLINE(170) TRAMPOLINE(171) TRAMPOLINE(172) TRAMPOLINE(173) TRAMPOLINE(174) TRAMPOLINE(175) TRAMPOLINE(176) TRAMPOLINE(177) TRAMPOLINE(178) TRAMPOLINE(179) TRAMPOLINE(180) TRAMPOLINE(181) TRAMPOLINE(182) TRAMPOLINE(183) TRAMPOLINE(184) TRAMPOLINE(185) TRAMPOLINE(186) TRAMPOLINE(187) TRAMPOLINE(188) TRAMPOLINE(189) TRAMPOLINE(190) TRAMPOLINE(191) TRAMPOLINE(192) TRAMPOLINE(193) TRAMPOLINE(194) TRAMPOLINE(195) TRAMPOLINE(196) TRAMPOLINE(197) TRAMPOLINE(198) TRAMPOLINE(199) TRAMPOLINE(200) TRAMPOLINE(201) TRAMPOLINE(202) TRAMPOLINE(203) TRAMPOLINE(204) TRAMPOLINE(205) TRAMPOLINE(206) TRAMPOLINE(207) TRAMPOLINE(208) TRAMPOLINE(209) TRAMPOLINE(210) TRAMPOLINE(211) TRAMPOLINE(212) TRAMPOLINE(213) TRAMPOLINE(214) TRAMPOLINE(215) TRAMPOLINE(216) TRAMPOLINE(217) TRAMPOLINE(218) TRAMPOLINE(219) TRAMPOLINE(220) TRAMPOLINE(221) TRAMPOLINE(222) TRAMPOLINE(223) TRAMPOLINE(224) TRAMPOLINE(225) TRAMPOLINE(226) TRAMPOLINE(227) TRAMPOLINE(228) TRAMPOLINE(229) TRAMPOLINE(230) TRAMPOLINE(231) TRAMPOLINE(232) TRAMPOLINE(233) TRAMPOLINE(234) TRAMPOLINE(235) TRAMPOLINE(236) TRAMPOLINE(237) TRAMPOLINE(238) TRAMPOLINE(239) TRAMPOLINE(240) TRAMPOLINE(241) TRAMPOLINE(242) TRAMPOLINE(243) TRAMPOLINE(244) TRAMPOLINE(245) TRAMPOLINE(246) TRAMPOLINE(247) TRAMPOLINE(248) TRAMPOLINE(249) TRAMPOLINE(250) TRAMPOLINE(251) TRAMPOLINE(252) TRAMPOLINE(253) TRAMPOLINE(254) TRAMPOLINE(255) TRAMPOLINE(256) TRAMPOLINE(257) TRAMPOLINE(258) TRAMPOLINE(259) TRAMPOLINE(260) TRAMPOLINE(261) TRAMPOLINE(262) TRAMPOLINE(263) TRAMPOLINE(264) TRAMPOLINE(265) TRAMPOLINE(266) TRAMPOLINE(267) TRAMPOLINE(268) TRAMPOLINE(269) TRAMPOLINE(270) TRAMPOLINE(271) TRAMPOLINE(272) TRAMPOLINE(273) TRAMPOLINE(274) TRAMPOLINE(275) TRAMPOLINE(276) TRAMPOLINE(277) TRAMPOLINE(278) TRAMPOLINE(279) TRAMPOLINE(280) TRAMPOLINE(281) TRAMPOLINE(282) TRAMPOLINE(283) TRAMPOLINE(284) TRAMPOLINE(285) TRAMPOLINE(286) TRAMPOLINE(287) TRAMPOLINE(288) TRAMPOLINE(289) TRAMPOLINE(290) TRAMPOLINE(291) TRAMPOLINE(292) TRAMPOLINE(293) TRAMPOLINE(294) TRAMPOLINE(295) TRAMPOLINE(296) TRAMPOLINE(297) TRAMPOLINE(298) TRAMPOLINE(299) TRAMPOLINE(300) TRAMPOLINE(301) TRAMPOLINE(302) TRAMPOLINE(303) TRAMPOLINE(304) TRAMPOLINE(305) TRAMPOLINE(306) TRAMPOLINE(307) TRAMPOLINE(308) TRAMPOLINE(309) TRAMPOLINE(310) TRAMPOLINE(311) TRAMPOLINE(312) TRAMPOLINE(313) TRAMPOLINE(314) TRAMPOLINE(315) TRAMPOLINE(316) TRAMPOLINE(317) TRAMPOLINE(318) TRAMPOLINE(319) TRAMPOLINE(320) TRAMPOLINE(321) TRAMPOLINE(322) TRAMPOLINE(323) TRAMPOLINE(324) TRAMPOLINE(325) TRAMPOLINE(326) TRAMPOLINE(327) TRAMPOLINE(328) TRAMPOLINE(329) TRAMPOLINE(330) TRAMPOLINE(331) TRAMPOLINE(332) TRAMPOLINE(333) TRAMPOLINE(334) TRAMPOLINE(335) TRAMPOLINE(336) TRAMPOLINE(337) TRAMPOLINE(338) TRAMPOLINE(339) TRAMPOLINE(340) TRAMPOLINE(341) TRAMPOLINE(342) TRAMPOLINE(343) TRAMPOLINE(344) TRAMPOLINE(345) TRAMPOLINE(346) TRAMPOLINE(347) TRAMPOLINE(348) TRAMPOLINE(349) TRAMPOLINE(350) TRAMPOLINE(351) TRAMPOLINE(352) TRAMPOLINE(353) TRAMPOLINE(354) TRAMPOLINE(355) TRAMPOLINE(356) TRAMPOLINE(357) TRAMPOLINE(358) TRAMPOLINE(359) TRAMPOLINE(360) TRAMPOLINE(361) TRAMPOLINE(362) TRAMPOLINE(363) TRAMPOLINE(364) TRAMPOLINE(365) TRAMPOLINE(366) TRAMPOLINE(367) TRAMPOLINE(368) TRAMPOLINE(369) TRAMPOLINE(370) TRAMPOLINE(371) TRAMPOLINE(372) TRAMPOLINE(373) TRAMPOLINE(374) TRAMPOLINE(375) TRAMPOLINE(376) TRAMPOLINE(377) TRAMPOLINE(378) TRAMPOLINE(379) TRAMPOLINE(380) TRAMPOLINE(381) TRAMPOLINE(382) TRAMPOLINE(383) TRAMPOLINE(384) TRAMPOLINE(385) TRAMPOLINE(386) TRAMPOLINE(387) TRAMPOLINE(388) TRAMPOLINE(389) TRAMPOLINE(390) TRAMPOLINE(391) TRAMPOLINE(392) TRAMPOLINE(393) TRAMPOLINE(394) TRAMPOLINE(395) TRAMPOLINE(396) TRAMPOLINE(397) TRAMPOLINE(398) TRAMPOLINE(399) TRAMPOLINE(400) TRAMPOLINE(401) TRAMPOLINE(402) TRAMPOLINE(403) TRAMPOLINE(404) TRAMPOLINE(405) TRAMPOLINE(406) TRAMPOLINE(407) TRAMPOLINE(408) TRAMPOLINE(409) TRAMPOLINE(410) TRAMPOLINE(411) TRAMPOLINE(412) TRAMPOLINE(413) TRAMPOLINE(414) TRAMPOLINE(415) TRAMPOLINE(416) TRAMPOLINE(417) TRAMPOLINE(418) TRAMPOLINE(419) TRAMPOLINE(420) TRAMPOLINE(421) TRAMPOLINE(422) TRAMPOLINE(423) TRAMPOLINE(424) TRAMPOLINE(425) TRAMPOLINE(426) TRAMPOLINE(427) TRAMPOLINE(428) TRAMPOLINE(429) TRAMPOLINE(430) TRAMPOLINE(431) TRAMPOLINE(432) TRAMPOLINE(433) TRAMPOLINE(434) TRAMPOLINE(435) TRAMPOLINE(436) TRAMPOLINE(437) TRAMPOLINE(438) TRAMPOLINE(439) TRAMPOLINE(440) TRAMPOLINE(441) TRAMPOLINE(442) TRAMPOLINE(443) TRAMPOLINE(444) TRAMPOLINE(445) TRAMPOLINE(446) TRAMPOLINE(447) TRAMPOLINE(448) TRAMPOLINE(449) TRAMPOLINE(450) TRAMPOLINE(451) TRAMPOLINE(452) TRAMPOLINE(453) TRAMPOLINE(454) TRAMPOLINE(455) TRAMPOLINE(456) TRAMPOLINE(457) TRAMPOLINE(458) TRAMPOLINE(459) TRAMPOLINE(460) TRAMPOLINE(461) TRAMPOLINE(462) TRAMPOLINE(463) TRAMPOLINE(464) TRAMPOLINE(465) TRAMPOLINE(466) TRAMPOLINE(467) TRAMPOLINE(468) TRAMPOLINE(469) TRAMPOLINE(470) TRAMPOLINE(471) TRAMPOLINE(472) TRAMPOLINE(473) TRAMPOLINE(474) TRAMPOLINE(475) TRAMPOLINE(476) TRAMPOLINE(477) TRAMPOLINE(478) TRAMPOLINE(479) TRAMPOLINE(480) TRAMPOLINE(481) TRAMPOLINE(482) TRAMPOLINE(483) TRAMPOLINE(484) TRAMPOLINE(485) TRAMPOLINE(486) TRAMPOLINE(487) TRAMPOLINE(488) TRAMPOLINE(489) TRAMPOLINE(490) TRAMPOLINE(491) TRAMPOLINE(492) TRAMPOLINE(493) TRAMPOLINE(494) TRAMPOLINE(495) TRAMPOLINE(496) TRAMPOLINE(497) TRAMPOLINE(498) TRAMPOLINE(499) TRAMPOLINE(500) TRAMPOLINE(501) TRAMPOLINE(502) TRAMPOLINE(503) TRAMPOLINE(504) TRAMPOLINE(505) TRAMPOLINE(506) TRAMPOLINE(507) TRAMPOLINE(508) TRAMPOLINE(509) TRAMPOLINE(510) TRAMPOLINE(511) TRAMPOLINE(512) TRAMPOLINE(513) TRAMPOLINE(514) TRAMPOLINE(515) TRAMPOLINE(516) TRAMPOLINE(517) TRAMPOLINE(518) TRAMPOLINE(519) TRAMPOLINE(520) TRAMPOLINE(521) TRAMPOLINE(522) TRAMPOLINE(523) TRAMPOLINE(524) TRAMPOLINE(525) TRAMPOLINE(526) TRAMPOLINE(527) TRAMPOLINE(528) TRAMPOLINE(529) TRAMPOLINE(530) TRAMPOLINE(531) TRAMPOLINE(532) TRAMPOLINE(533) TRAMPOLINE(534) TRAMPOLINE(535) TRAMPOLINE(536) TRAMPOLINE(537) TRAMPOLINE(538) TRAMPOLINE(539) TRAMPOLINE(540) TRAMPOLINE(541) TRAMPOLINE(542) TRAMPOLINE(543) TRAMPOLINE(544) TRAMPOLINE(545) TRAMPOLINE(546) TRAMPOLINE(547) TRAMPOLINE(548) TRAMPOLINE(549) TRAMPOLINE(550) TRAMPOLINE(551) TRAMPOLINE(552) TRAMPOLINE(553) TRAMPOLINE(554) TRAMPOLINE(555) TRAMPOLINE(556) TRAMPOLINE(557) TRAMPOLINE(558) TRAMPOLINE(559) TRAMPOLINE(560) TRAMPOLINE(561) TRAMPOLINE(562) TRAMPOLINE(563) TRAMPOLINE(564) TRAMPOLINE(565) TRAMPOLINE(566) TRAMPOLINE(567) TRAMPOLINE(568) TRAMPOLINE(569) TRAMPOLINE(570) TRAMPOLINE(571) TRAMPOLINE(572) TRAMPOLINE(573) TRAMPOLINE(574) TRAMPOLINE(575) TRAMPOLINE(576) TRAMPOLINE(577) TRAMPOLINE(578) TRAMPOLINE(579) TRAMPOLINE(580) TRAMPOLINE(581) TRAMPOLINE(582) TRAMPOLINE(583) TRAMPOLINE(584) TRAMPOLINE(585) TRAMPOLINE(586) TRAMPOLINE(587) TRAMPOLINE(588) TRAMPOLINE(589) TRAMPOLINE(590) TRAMPOLINE(591) TRAMPOLINE(592) TRAMPOLINE(593) TRAMPOLINE(594) TRAMPOLINE(595) TRAMPOLINE(596) TRAMPOLINE(597) TRAMPOLINE(598) TRAMPOLINE(599) TRAMPOLINE(600) TRAMPOLINE(601) TRAMPOLINE(602) TRAMPOLINE(603) TRAMPOLINE(604) TRAMPOLINE(605) TRAMPOLINE(606) TRAMPOLINE(607) TRAMPOLINE(608) TRAMPOLINE(609) TRAMPOLINE(610) TRAMPOLINE(611) TRAMPOLINE(612) TRAMPOLINE(613) TRAMPOLINE(614) TRAMPOLINE(615) TRAMPOLINE(616) TRAMPOLINE(617) TRAMPOLINE(618) TRAMPOLINE(619) TRAMPOLINE(620) TRAMPOLINE(621) TRAMPOLINE(622) TRAMPOLINE(623) TRAMPOLINE(624) TRAMPOLINE(625) TRAMPOLINE(626) TRAMPOLINE(627) TRAMPOLINE(628) TRAMPOLINE(629) TRAMPOLINE(630) TRAMPOLINE(631) TRAMPOLINE(632) TRAMPOLINE(633) TRAMPOLINE(634) TRAMPOLINE(635) TRAMPOLINE(636) TRAMPOLINE(637) TRAMPOLINE(638) TRAMPOLINE(639) TRAMPOLINE(640) TRAMPOLINE(641) TRAMPOLINE(642) TRAMPOLINE(643) TRAMPOLINE(644) TRAMPOLINE(645) TRAMPOLINE(646) TRAMPOLINE(647) TRAMPOLINE(648) TRAMPOLINE(649) TRAMPOLINE(650) TRAMPOLINE(651) TRAMPOLINE(652) TRAMPOLINE(653) TRAMPOLINE(654) TRAMPOLINE(655) TRAMPOLINE(656) TRAMPOLINE(657) TRAMPOLINE(658) TRAMPOLINE(659) TRAMPOLINE(660) TRAMPOLINE(661) TRAMPOLINE(662) TRAMPOLINE(663) TRAMPOLINE(664) TRAMPOLINE(665) TRAMPOLINE(666) TRAMPOLINE(667) TRAMPOLINE(668) TRAMPOLINE(669) TRAMPOLINE(670) TRAMPOLINE(671) TRAMPOLINE(672) TRAMPOLINE(673) TRAMPOLINE(674) TRAMPOLINE(675) TRAMPOLINE(676) TRAMPOLINE(677) TRAMPOLINE(678) TRAMPOLINE(679) TRAMPOLINE(680) TRAMPOLINE(681) TRAMPOLINE(682) TRAMPOLINE(683) TRAMPOLINE(684) TRAMPOLINE(685) TRAMPOLINE(686) TRAMPOLINE(687) TRAMPOLINE(688) TRAMPOLINE(689) TRAMPOLINE(690) TRAMPOLINE(691) TRAMPOLINE(692) TRAMPOLINE(693) TRAMPOLINE(694) TRAMPOLINE(695) TRAMPOLINE(696) TRAMPOLINE(697) TRAMPOLINE(698) TRAMPOLINE(699) TRAMPOLINE(700) TRAMPOLINE(701) TRAMPOLINE(702) TRAMPOLINE(703) TRAMPOLINE(704) TRAMPOLINE(705) TRAMPOLINE(706) TRAMPOLINE(707) TRAMPOLINE(708) TRAMPOLINE(709) TRAMPOLINE(710) TRAMPOLINE(711) TRAMPOLINE(712) TRAMPOLINE(713) TRAMPOLINE(714) TRAMPOLINE(715) TRAMPOLINE(716) TRAMPOLINE(717) TRAMPOLINE(718) TRAMPOLINE(719) TRAMPOLINE(720) TRAMPOLINE(721) TRAMPOLINE(722) TRAMPOLINE(723) TRAMPOLINE(724) TRAMPOLINE(725) TRAMPOLINE(726) TRAMPOLINE(727) TRAMPOLINE(728) TRAMPOLINE(729) TRAMPOLINE(730) TRAMPOLINE(731) TRAMPOLINE(732) TRAMPOLINE(733) TRAMPOLINE(734) TRAMPOLINE(735) TRAMPOLINE(736) TRAMPOLINE(737) TRAMPOLINE(738) TRAMPOLINE(739) TRAMPOLINE(740) TRAMPOLINE(741) TRAMPOLINE(742) TRAMPOLINE(743) TRAMPOLINE(744) TRAMPOLINE(745) TRAMPOLINE(746) TRAMPOLINE(747) TRAMPOLINE(748) TRAMPOLINE(749) TRAMPOLINE(750) TRAMPOLINE(751) TRAMPOLINE(752) TRAMPOLINE(753) TRAMPOLINE(754) TRAMPOLINE(755) TRAMPOLINE(756) TRAMPOLINE(757) TRAMPOLINE(758) TRAMPOLINE(759) TRAMPOLINE(760) TRAMPOLINE(761) TRAMPOLINE(762) TRAMPOLINE(763) TRAMPOLINE(764) TRAMPOLINE(765) TRAMPOLINE(766) TRAMPOLINE(767) TRAMPOLINE(768) TRAMPOLINE(769) TRAMPOLINE(770) TRAMPOLINE(771) TRAMPOLINE(772) TRAMPOLINE(773) TRAMPOLINE(774) TRAMPOLINE(775) TRAMPOLINE(776) TRAMPOLINE(777) TRAMPOLINE(778) TRAMPOLINE(779) TRAMPOLINE(780) TRAMPOLINE(781) TRAMPOLINE(782) TRAMPOLINE(783) TRAMPOLINE(784) TRAMPOLINE(785) TRAMPOLINE(786) TRAMPOLINE(787) TRAMPOLINE(788) TRAMPOLINE(789) TRAMPOLINE(790) TRAMPOLINE(791) TRAMPOLINE(792) TRAMPOLINE(793) TRAMPOLINE(794) TRAMPOLINE(795) TRAMPOLINE(796) TRAMPOLINE(797) TRAMPOLINE(798) TRAMPOLINE(799) TRAMPOLINE(800) TRAMPOLINE(801) TRAMPOLINE(802) TRAMPOLINE(803) TRAMPOLINE(804) TRAMPOLINE(805) TRAMPOLINE(806) TRAMPOLINE(807) TRAMPOLINE(808) TRAMPOLINE(809) TRAMPOLINE(810) TRAMPOLINE(811) TRAMPOLINE(812) TRAMPOLINE(813) TRAMPOLINE(814) TRAMPOLINE(815) TRAMPOLINE(816) TRAMPOLINE(817) TRAMPOLINE(818) TRAMPOLINE(819) TRAMPOLINE(820) TRAMPOLINE(821) TRAMPOLINE(822) TRAMPOLINE(823) TRAMPOLINE(824) TRAMPOLINE(825) TRAMPOLINE(826) TRAMPOLINE(827) TRAMPOLINE(828) TRAMPOLINE(829) TRAMPOLINE(830) TRAMPOLINE(831) TRAMPOLINE(832) TRAMPOLINE(833) TRAMPOLINE(834) TRAMPOLINE(835) TRAMPOLINE(836) TRAMPOLINE(837) TRAMPOLINE(838) TRAMPOLINE(839) TRAMPOLINE(840) TRAMPOLINE(841) TRAMPOLINE(842) TRAMPOLINE(843) TRAMPOLINE(844) TRAMPOLINE(845) TRAMPOLINE(846) TRAMPOLINE(847) TRAMPOLINE(848) TRAMPOLINE(849) TRAMPOLINE(850) TRAMPOLINE(851) TRAMPOLINE(852) TRAMPOLINE(853) TRAMPOLINE(854) TRAMPOLINE(855) TRAMPOLINE(856) TRAMPOLINE(857) TRAMPOLINE(858) TRAMPOLINE(859) TRAMPOLINE(860) TRAMPOLINE(861) TRAMPOLINE(862) TRAMPOLINE(863) TRAMPOLINE(864) TRAMPOLINE(865) TRAMPOLINE(866) TRAMPOLINE(867) TRAMPOLINE(868) TRAMPOLINE(869) TRAMPOLINE(870) TRAMPOLINE(871) TRAMPOLINE(872) TRAMPOLINE(873) TRAMPOLINE(874) TRAMPOLINE(875) TRAMPOLINE(876) TRAMPOLINE(877) TRAMPOLINE(878) TRAMPOLINE(879) TRAMPOLINE(880) TRAMPOLINE(881) TRAMPOLINE(882) TRAMPOLINE(883) TRAMPOLINE(884) TRAMPOLINE(885) TRAMPOLINE(886) TRAMPOLINE(887) TRAMPOLINE(888) TRAMPOLINE(889) TRAMPOLINE(890) TRAMPOLINE(891) TRAMPOLINE(892) TRAMPOLINE(893) TRAMPOLINE(894) TRAMPOLINE(895) TRAMPOLINE(896) TRAMPOLINE(897) TRAMPOLINE(898) TRAMPOLINE(899) TRAMPOLINE(900) TRAMPOLINE(901) TRAMPOLINE(902) TRAMPOLINE(903) TRAMPOLINE(904) TRAMPOLINE(905) TRAMPOLINE(906) TRAMPOLINE(907) TRAMPOLINE(908) TRAMPOLINE(909) TRAMPOLINE(910) TRAMPOLINE(911) TRAMPOLINE(912) TRAMPOLINE(913) TRAMPOLINE(914) TRAMPOLINE(915) TRAMPOLINE(916) TRAMPOLINE(917) TRAMPOLINE(918) TRAMPOLINE(919) TRAMPOLINE(920) TRAMPOLINE(921) TRAMPOLINE(922) TRAMPOLINE(923) TRAMPOLINE(924) TRAMPOLINE(925) TRAMPOLINE(926) TRAMPOLINE(927) TRAMPOLINE(928) TRAMPOLINE(929) TRAMPOLINE(930) TRAMPOLINE(931) TRAMPOLINE(932) TRAMPOLINE(933) TRAMPOLINE(934) TRAMPOLINE(935) TRAMPOLINE(936) TRAMPOLINE(937) TRAMPOLINE(938) TRAMPOLINE(939) TRAMPOLINE(940) TRAMPOLINE(941) TRAMPOLINE(942) TRAMPOLINE(943) TRAMPOLINE(944) TRAMPOLINE(945) TRAMPOLINE(946) TRAMPOLINE(947) TRAMPOLINE(948) TRAMPOLINE(949) TRAMPOLINE(950) TRAMPOLINE(951) TRAMPOLINE(952) TRAMPOLINE(953) TRAMPOLINE(954) TRAMPOLINE(955) TRAMPOLINE(956) TRAMPOLINE(957) TRAMPOLINE(958) TRAMPOLINE(959) TRAMPOLINE(960) TRAMPOLINE(961) TRAMPOLINE(962) TRAMPOLINE(963) TRAMPOLINE(964) TRAMPOLINE(965) TRAMPOLINE(966) TRAMPOLINE(967) TRAMPOLINE(968) TRAMPOLINE(969) TRAMPOLINE(970) TRAMPOLINE(971) TRAMPOLINE(972) TRAMPOLINE(973) TRAMPOLINE(974) TRAMPOLINE(975) TRAMPOLINE(976) TRAMPOLINE(977) TRAMPOLINE(978) TRAMPOLINE(979) TRAMPOLINE(980) TRAMPOLINE(981) TRAMPOLINE(982) TRAMPOLINE(983) TRAMPOLINE(984) TRAMPOLINE(985) TRAMPOLINE(986) TRAMPOLINE(987) TRAMPOLINE(988) TRAMPOLINE(989) TRAMPOLINE(990) TRAMPOLINE(991) TRAMPOLINE(992) TRAMPOLINE(993) TRAMPOLINE(994) TRAMPOLINE(995) TRAMPOLINE(996) TRAMPOLINE(997) TRAMPOLINE(998) TRAMPOLINE(999) TRAMPOLINE(1000) TRAMPOLINE(1001) TRAMPOLINE(1002) TRAMPOLINE(1003) TRAMPOLINE(1004) TRAMPOLINE(1005) TRAMPOLINE(1006) TRAMPOLINE(1007) TRAMPOLINE(1008) TRAMPOLINE(1009) TRAMPOLINE(1010) TRAMPOLINE(1011) TRAMPOLINE(1012) TRAMPOLINE(1013) TRAMPOLINE(1014) TRAMPOLINE(1015) TRAMPOLINE(1016) TRAMPOLINE(1017) TRAMPOLINE(1018) TRAMPOLINE(1019) TRAMPOLINE(1020) TRAMPOLINE(1021) TRAMPOLINE(1022) TRAMPOLINE(1023) TRAMPOLINE(1024) TRAMPOLINE(1025) TRAMPOLINE(1026) TRAMPOLINE(1027) TRAMPOLINE(1028) TRAMPOLINE(1029) TRAMPOLINE(1030) TRAMPOLINE(1031) TRAMPOLINE(1032) TRAMPOLINE(1033) TRAMPOLINE(1034) TRAMPOLINE(1035) TRAMPOLINE(1036) TRAMPOLINE(1037) TRAMPOLINE(1038) TRAMPOLINE(1039) TRAMPOLINE(1040) TRAMPOLINE(1041) TRAMPOLINE(1042) TRAMPOLINE(1043) TRAMPOLINE(1044) TRAMPOLINE(1045) TRAMPOLINE(1046) TRAMPOLINE(1047) TRAMPOLINE(1048) TRAMPOLINE(1049) TRAMPOLINE(1050) TRAMPOLINE(1051) TRAMPOLINE(1052) TRAMPOLINE(1053) TRAMPOLINE(1054) TRAMPOLINE(1055) TRAMPOLINE(1056) TRAMPOLINE(1057) TRAMPOLINE(1058) TRAMPOLINE(1059) TRAMPOLINE(1060) TRAMPOLINE(1061) TRAMPOLINE(1062) TRAMPOLINE(1063) TRAMPOLINE(1064) TRAMPOLINE(1065) TRAMPOLINE(1066) TRAMPOLINE(1067) TRAMPOLINE(1068) TRAMPOLINE(1069) TRAMPOLINE(1070) TRAMPOLINE(1071) TRAMPOLINE(1072) TRAMPOLINE(1073) TRAMPOLINE(1074) TRAMPOLINE(1075) TRAMPOLINE(1076) TRAMPOLINE(1077) TRAMPOLINE(1078) TRAMPOLINE(1079) TRAMPOLINE(1080) TRAMPOLINE(1081) TRAMPOLINE(1082) TRAMPOLINE(1083) TRAMPOLINE(1084) TRAMPOLINE(1085) TRAMPOLINE(1086) TRAMPOLINE(1087) TRAMPOLINE(1088) TRAMPOLINE(1089) TRAMPOLINE(1090) TRAMPOLINE(1091) TRAMPOLINE(1092) TRAMPOLINE(1093) TRAMPOLINE(1094) TRAMPOLINE(1095) TRAMPOLINE(1096) TRAMPOLINE(1097) TRAMPOLINE(1098) TRAMPOLINE(1099) TRAMPOLINE(1100) TRAMPOLINE(1101) TRAMPOLINE(1102) TRAMPOLINE(1103) TRAMPOLINE(1104) TRAMPOLINE(1105) TRAMPOLINE(1106) TRAMPOLINE(1107) TRAMPOLINE(1108) TRAMPOLINE(1109) TRAMPOLINE(1110) TRAMPOLINE(1111) TRAMPOLINE(1112) TRAMPOLINE(1113) TRAMPOLINE(1114) TRAMPOLINE(1115) TRAMPOLINE(1116) TRAMPOLINE(1117) TRAMPOLINE(1118) TRAMPOLINE(1119) TRAMPOLINE(1120) TRAMPOLINE(1121) TRAMPOLINE(1122) TRAMPOLINE(1123) TRAMPOLINE(1124) TRAMPOLINE(1125) TRAMPOLINE(1126) TRAMPOLINE(1127) TRAMPOLINE(1128) TRAMPOLINE(1129) TRAMPOLINE(1130) TRAMPOLINE(1131) TRAMPOLINE(1132) TRAMPOLINE(1133) TRAMPOLINE(1134) TRAMPOLINE(1135) TRAMPOLINE(1136) TRAMPOLINE(1137) TRAMPOLINE(1138) TRAMPOLINE(1139) TRAMPOLINE(1140) TRAMPOLINE(1141) TRAMPOLINE(1142) TRAMPOLINE(1143) TRAMPOLINE(1144) TRAMPOLINE(1145) TRAMPOLINE(1146) TRAMPOLINE(1147) TRAMPOLINE(1148) TRAMPOLINE(1149) TRAMPOLINE(1150) TRAMPOLINE(1151) TRAMPOLINE(1152) TRAMPOLINE(1153) TRAMPOLINE(1154) TRAMPOLINE(1155) TRAMPOLINE(1156) TRAMPOLINE(1157) TRAMPOLINE(1158) TRAMPOLINE(1159) TRAMPOLINE(1160) TRAMPOLINE(1161) TRAMPOLINE(1162) TRAMPOLINE(1163) TRAMPOLINE(1164) TRAMPOLINE(1165) TRAMPOLINE(1166) TRAMPOLINE(1167) TRAMPOLINE(1168) TRAMPOLINE(1169) TRAMPOLINE(1170) TRAMPOLINE(1171) TRAMPOLINE(1172) TRAMPOLINE(1173) TRAMPOLINE(1174) TRAMPOLINE(1175) TRAMPOLINE(1176) TRAMPOLINE(1177) TRAMPOLINE(1178) TRAMPOLINE(1179) TRAMPOLINE(1180) TRAMPOLINE(1181) TRAMPOLINE(1182) TRAMPOLINE(1183) TRAMPOLINE(1184) TRAMPOLINE(1185) TRAMPOLINE(1186) TRAMPOLINE(1187) TRAMPOLINE(1188) TRAMPOLINE(1189) TRAMPOLINE(1190) TRAMPOLINE(1191) TRAMPOLINE(1192) TRAMPOLINE(1193) TRAMPOLINE(1194) TRAMPOLINE(1195) TRAMPOLINE(1196) TRAMPOLINE(1197) TRAMPOLINE(1198) TRAMPOLINE(1199) TRAMPOLINE(1200) TRAMPOLINE(1201) TRAMPOLINE(1202) TRAMPOLINE(1203) TRAMPOLINE(1204) TRAMPOLINE(1205) TRAMPOLINE(1206) TRAMPOLINE(1207) TRAMPOLINE(1208) TRAMPOLINE(1209) TRAMPOLINE(1210) TRAMPOLINE(1211) TRAMPOLINE(1212) TRAMPOLINE(1213) TRAMPOLINE(1214) TRAMPOLINE(1215) TRAMPOLINE(1216) TRAMPOLINE(1217) TRAMPOLINE(1218) TRAMPOLINE(1219) TRAMPOLINE(1220) TRAMPOLINE(1221) TRAMPOLINE(1222) TRAMPOLINE(1223) TRAMPOLINE(1224) TRAMPOLINE(1225) TRAMPOLINE(1226) TRAMPOLINE(1227) TRAMPOLINE(1228) TRAMPOLINE(1229) TRAMPOLINE(1230) TRAMPOLINE(1231) TRAMPOLINE(1232) TRAMPOLINE(1233) TRAMPOLINE(1234) TRAMPOLINE(1235) TRAMPOLINE(1236) TRAMPOLINE(1237) TRAMPOLINE(1238) TRAMPOLINE(1239) TRAMPOLINE(1240) TRAMPOLINE(1241) TRAMPOLINE(1242) TRAMPOLINE(1243) TRAMPOLINE(1244) TRAMPOLINE(1245) TRAMPOLINE(1246) TRAMPOLINE(1247) TRAMPOLINE(1248) TRAMPOLINE(1249) TRAMPOLINE(1250) TRAMPOLINE(1251) TRAMPOLINE(1252) TRAMPOLINE(1253) TRAMPOLINE(1254) TRAMPOLINE(1255) TRAMPOLINE(1256) TRAMPOLINE(1257) TRAMPOLINE(1258) TRAMPOLINE(1259) TRAMPOLINE(1260) TRAMPOLINE(1261) TRAMPOLINE(1262) TRAMPOLINE(1263) TRAMPOLINE(1264) TRAMPOLINE(1265) TRAMPOLINE(1266) TRAMPOLINE(1267) TRAMPOLINE(1268) TRAMPOLINE(1269) TRAMPOLINE(1270) TRAMPOLINE(1271) TRAMPOLINE(1272) TRAMPOLINE(1273) TRAMPOLINE(1274) TRAMPOLINE(1275) TRAMPOLINE(1276) TRAMPOLINE(1277) TRAMPOLINE(1278) TRAMPOLINE(1279) TRAMPOLINE(1280) TRAMPOLINE(1281) TRAMPOLINE(1282) TRAMPOLINE(1283) TRAMPOLINE(1284) TRAMPOLINE(1285) TRAMPOLINE(1286) TRAMPOLINE(1287) TRAMPOLINE(1288) TRAMPOLINE(1289) TRAMPOLINE(1290) TRAMPOLINE(1291) TRAMPOLINE(1292) TRAMPOLINE(1293) TRAMPOLINE(1294) TRAMPOLINE(1295) TRAMPOLINE(1296) TRAMPOLINE(1297) TRAMPOLINE(1298) TRAMPOLINE(1299) TRAMPOLINE(1300) TRAMPOLINE(1301) TRAMPOLINE(1302) TRAMPOLINE(1303) TRAMPOLINE(1304) TRAMPOLINE(1305) TRAMPOLINE(1306) TRAMPOLINE(1307) TRAMPOLINE(1308) TRAMPOLINE(1309) TRAMPOLINE(1310) TRAMPOLINE(1311) TRAMPOLINE(1312) TRAMPOLINE(1313) TRAMPOLINE(1314) TRAMPOLINE(1315) TRAMPOLINE(1316) TRAMPOLINE(1317) TRAMPOLINE(1318) TRAMPOLINE(1319) TRAMPOLINE(1320) TRAMPOLINE(1321) TRAMPOLINE(1322) TRAMPOLINE(1323) TRAMPOLINE(1324) TRAMPOLINE(1325) TRAMPOLINE(1326) TRAMPOLINE(1327) TRAMPOLINE(1328) TRAMPOLINE(1329) TRAMPOLINE(1330) TRAMPOLINE(1331) TRAMPOLINE(1332) TRAMPOLINE(1333) TRAMPOLINE(1334) TRAMPOLINE(1335) TRAMPOLINE(1336) TRAMPOLINE(1337) TRAMPOLINE(1338) TRAMPOLINE(1339) TRAMPOLINE(1340) TRAMPOLINE(1341) TRAMPOLINE(1342) TRAMPOLINE(1343) TRAMPOLINE(1344) TRAMPOLINE(1345) TRAMPOLINE(1346) TRAMPOLINE(1347) TRAMPOLINE(1348) TRAMPOLINE(1349) TRAMPOLINE(1350) TRAMPOLINE(1351) TRAMPOLINE(1352) TRAMPOLINE(1353) TRAMPOLINE(1354) TRAMPOLINE(1355) TRAMPOLINE(1356) TRAMPOLINE(1357) TRAMPOLINE(1358) TRAMPOLINE(1359) TRAMPOLINE(1360) TRAMPOLINE(1361) TRAMPOLINE(1362) TRAMPOLINE(1363) TRAMPOLINE(1364) TRAMPOLINE(1365) TRAMPOLINE(1366) TRAMPOLINE(1367) TRAMPOLINE(1368) TRAMPOLINE(1369) TRAMPOLINE(1370) TRAMPOLINE(1371) TRAMPOLINE(1372) TRAMPOLINE(1373) TRAMPOLINE(1374) TRAMPOLINE(1375) TRAMPOLINE(1376) TRAMPOLINE(1377) TRAMPOLINE(1378) TRAMPOLINE(1379) TRAMPOLINE(1380) TRAMPOLINE(1381) TRAMPOLINE(1382) TRAMPOLINE(1383) TRAMPOLINE(1384) TRAMPOLINE(1385) TRAMPOLINE(1386) TRAMPOLINE(1387) TRAMPOLINE(1388) TRAMPOLINE(1389) TRAMPOLINE(1390) TRAMPOLINE(1391) TRAMPOLINE(1392) TRAMPOLINE(1393) TRAMPOLINE(1394) TRAMPOLINE(1395) TRAMPOLINE(1396) TRAMPOLINE(1397) TRAMPOLINE(1398) TRAMPOLINE(1399) TRAMPOLINE(1400) TRAMPOLINE(1401) TRAMPOLINE(1402) TRAMPOLINE(1403) TRAMPOLINE(1404) TRAMPOLINE(1405) TRAMPOLINE(1406) TRAMPOLINE(1407) TRAMPOLINE(1408) TRAMPOLINE(1409) TRAMPOLINE(1410) TRAMPOLINE(1411) TRAMPOLINE(1412) TRAMPOLINE(1413) TRAMPOLINE(1414) TRAMPOLINE(1415) TRAMPOLINE(1416) TRAMPOLINE(1417) TRAMPOLINE(1418) TRAMPOLINE(1419) TRAMPOLINE(1420) TRAMPOLINE(1421) TRAMPOLINE(1422) TRAMPOLINE(1423) TRAMPOLINE(1424) TRAMPOLINE(1425) TRAMPOLINE(1426) TRAMPOLINE(1427) TRAMPOLINE(1428) TRAMPOLINE(1429) TRAMPOLINE(1430) TRAMPOLINE(1431) TRAMPOLINE(1432) TRAMPOLINE(1433) TRAMPOLINE(1434) TRAMPOLINE(1435) TRAMPOLINE(1436) TRAMPOLINE(1437) TRAMPOLINE(1438) TRAMPOLINE(1439) TRAMPOLINE(1440) TRAMPOLINE(1441) TRAMPOLINE(1442) TRAMPOLINE(1443) TRAMPOLINE(1444) TRAMPOLINE(1445) TRAMPOLINE(1446) TRAMPOLINE(1447) TRAMPOLINE(1448) TRAMPOLINE(1449) TRAMPOLINE(1450) TRAMPOLINE(1451) TRAMPOLINE(1452) TRAMPOLINE(1453) TRAMPOLINE(1454) TRAMPOLINE(1455) TRAMPOLINE(1456) TRAMPOLINE(1457) TRAMPOLINE(1458) TRAMPOLINE(1459) TRAMPOLINE(1460) TRAMPOLINE(1461) TRAMPOLINE(1462) TRAMPOLINE(1463) TRAMPOLINE(1464) TRAMPOLINE(1465) TRAMPOLINE(1466) TRAMPOLINE(1467) TRAMPOLINE(1468) TRAMPOLINE(1469) TRAMPOLINE(1470) TRAMPOLINE(1471) TRAMPOLINE(1472) TRAMPOLINE(1473) TRAMPOLINE(1474) TRAMPOLINE(1475) TRAMPOLINE(1476) TRAMPOLINE(1477) TRAMPOLINE(1478) TRAMPOLINE(1479) TRAMPOLINE(1480) TRAMPOLINE(1481) TRAMPOLINE(1482) TRAMPOLINE(1483) TRAMPOLINE(1484) TRAMPOLINE(1485) TRAMPOLINE(1486) TRAMPOLINE(1487) TRAMPOLINE(1488) TRAMPOLINE(1489) TRAMPOLINE(1490) TRAMPOLINE(1491) TRAMPOLINE(1492) TRAMPOLINE(1493) TRAMPOLINE(1494) TRAMPOLINE(1495) TRAMPOLINE(1496) TRAMPOLINE(1497) TRAMPOLINE(1498) TRAMPOLINE(1499) TRAMPOLINE(1500) TRAMPOLINE(1501) TRAMPOLINE(1502) TRAMPOLINE(1503) TRAMPOLINE(1504) TRAMPOLINE(1505) TRAMPOLINE(1506) TRAMPOLINE(1507) TRAMPOLINE(1508) TRAMPOLINE(1509) TRAMPOLINE(1510) TRAMPOLINE(1511) TRAMPOLINE(1512) TRAMPOLINE(1513) TRAMPOLINE(1514) TRAMPOLINE(1515) TRAMPOLINE(1516) TRAMPOLINE(1517) TRAMPOLINE(1518) TRAMPOLINE(1519) TRAMPOLINE(1520) TRAMPOLINE(1521) TRAMPOLINE(1522) TRAMPOLINE(1523) TRAMPOLINE(1524) TRAMPOLINE(1525) TRAMPOLINE(1526) TRAMPOLINE(1527) TRAMPOLINE(1528) TRAMPOLINE(1529) TRAMPOLINE(1530) TRAMPOLINE(1531) TRAMPOLINE(1532) TRAMPOLINE(1533) TRAMPOLINE(1534) TRAMPOLINE(1535) TRAMPOLINE(1536) TRAMPOLINE(1537) TRAMPOLINE(1538) TRAMPOLINE(1539) TRAMPOLINE(1540) TRAMPOLINE(1541) TRAMPOLINE(1542) TRAMPOLINE(1543) TRAMPOLINE(1544) TRAMPOLINE(1545) TRAMPOLINE(1546) TRAMPOLINE(1547) TRAMPOLINE(1548) TRAMPOLINE(1549) TRAMPOLINE(1550) TRAMPOLINE(1551) TRAMPOLINE(1552) TRAMPOLINE(1553) TRAMPOLINE(1554) TRAMPOLINE(1555) TRAMPOLINE(1556) TRAMPOLINE(1557) TRAMPOLINE(1558) TRAMPOLINE(1559) TRAMPOLINE(1560) TRAMPOLINE(1561) TRAMPOLINE(1562) TRAMPOLINE(1563) TRAMPOLINE(1564) TRAMPOLINE(1565) TRAMPOLINE(1566) TRAMPOLINE(1567) TRAMPOLINE(1568) TRAMPOLINE(1569) TRAMPOLINE(1570) TRAMPOLINE(1571) TRAMPOLINE(1572) TRAMPOLINE(1573) TRAMPOLINE(1574) TRAMPOLINE(1575) TRAMPOLINE(1576) TRAMPOLINE(1577) TRAMPOLINE(1578) TRAMPOLINE(1579) TRAMPOLINE(1580) TRAMPOLINE(1581) TRAMPOLINE(1582) TRAMPOLINE(1583) TRAMPOLINE(1584) TRAMPOLINE(1585) TRAMPOLINE(1586) TRAMPOLINE(1587) TRAMPOLINE(1588) TRAMPOLINE(1589) TRAMPOLINE(1590) TRAMPOLINE(1591) TRAMPOLINE(1592) TRAMPOLINE(1593) TRAMPOLINE(1594) TRAMPOLINE(1595) TRAMPOLINE(1596) TRAMPOLINE(1597) TRAMPOLINE(1598) TRAMPOLINE(1599) TRAMPOLINE(1600) TRAMPOLINE(1601) TRAMPOLINE(1602) TRAMPOLINE(1603) TRAMPOLINE(1604) TRAMPOLINE(1605) TRAMPOLINE(1606) TRAMPOLINE(1607) TRAMPOLINE(1608) TRAMPOLINE(1609) TRAMPOLINE(1610) TRAMPOLINE(1611) TRAMPOLINE(1612) TRAMPOLINE(1613) TRAMPOLINE(1614) TRAMPOLINE(1615) TRAMPOLINE(1616) TRAMPOLINE(1617) TRAMPOLINE(1618) TRAMPOLINE(1619) TRAMPOLINE(1620) TRAMPOLINE(1621) TRAMPOLINE(1622) TRAMPOLINE(1623) TRAMPOLINE(1624) TRAMPOLINE(1625) TRAMPOLINE(1626) TRAMPOLINE(1627) TRAMPOLINE(1628) TRAMPOLINE(1629) TRAMPOLINE(1630) TRAMPOLINE(1631) TRAMPOLINE(1632) TRAMPOLINE(1633) TRAMPOLINE(1634) TRAMPOLINE(1635) TRAMPOLINE(1636) TRAMPOLINE(1637) TRAMPOLINE(1638) TRAMPOLINE(1639) TRAMPOLINE(1640) TRAMPOLINE(1641) TRAMPOLINE(1642) TRAMPOLINE(1643) TRAMPOLINE(1644) TRAMPOLINE(1645) TRAMPOLINE(1646) TRAMPOLINE(1647) TRAMPOLINE(1648) TRAMPOLINE(1649) TRAMPOLINE(1650) TRAMPOLINE(1651) TRAMPOLINE(1652) TRAMPOLINE(1653) TRAMPOLINE(1654) TRAMPOLINE(1655) TRAMPOLINE(1656) TRAMPOLINE(1657) TRAMPOLINE(1658) TRAMPOLINE(1659) TRAMPOLINE(1660) TRAMPOLINE(1661) TRAMPOLINE(1662) TRAMPOLINE(1663) TRAMPOLINE(1664) TRAMPOLINE(1665) TRAMPOLINE(1666) TRAMPOLINE(1667) TRAMPOLINE(1668) TRAMPOLINE(1669) TRAMPOLINE(1670) TRAMPOLINE(1671) TRAMPOLINE(1672) TRAMPOLINE(1673) TRAMPOLINE(1674) TRAMPOLINE(1675) TRAMPOLINE(1676) TRAMPOLINE(1677) TRAMPOLINE(1678) TRAMPOLINE(1679) TRAMPOLINE(1680) TRAMPOLINE(1681) TRAMPOLINE(1682) TRAMPOLINE(1683) TRAMPOLINE(1684) TRAMPOLINE(1685) TRAMPOLINE(1686) TRAMPOLINE(1687) TRAMPOLINE(1688) TRAMPOLINE(1689) TRAMPOLINE(1690) TRAMPOLINE(1691) TRAMPOLINE(1692) TRAMPOLINE(1693) TRAMPOLINE(1694) TRAMPOLINE(1695) TRAMPOLINE(1696) TRAMPOLINE(1697) TRAMPOLINE(1698) TRAMPOLINE(1699) TRAMPOLINE(1700) TRAMPOLINE(1701) TRAMPOLINE(1702) TRAMPOLINE(1703) TRAMPOLINE(1704) TRAMPOLINE(1705) TRAMPOLINE(1706) TRAMPOLINE(1707) TRAMPOLINE(1708) TRAMPOLINE(1709) TRAMPOLINE(1710) TRAMPOLINE(1711) TRAMPOLINE(1712) TRAMPOLINE(1713) TRAMPOLINE(1714) TRAMPOLINE(1715) TRAMPOLINE(1716) TRAMPOLINE(1717) TRAMPOLINE(1718) TRAMPOLINE(1719) TRAMPOLINE(1720) TRAMPOLINE(1721) TRAMPOLINE(1722) TRAMPOLINE(1723) TRAMPOLINE(1724) TRAMPOLINE(1725) TRAMPOLINE(1726) TRAMPOLINE(1727) TRAMPOLINE(1728) TRAMPOLINE(1729) TRAMPOLINE(1730) TRAMPOLINE(1731) TRAMPOLINE(1732) TRAMPOLINE(1733) TRAMPOLINE(1734) TRAMPOLINE(1735) TRAMPOLINE(1736) TRAMPOLINE(1737) TRAMPOLINE(1738) TRAMPOLINE(1739) TRAMPOLINE(1740) TRAMPOLINE(1741) TRAMPOLINE(1742) TRAMPOLINE(1743) TRAMPOLINE(1744) TRAMPOLINE(1745) TRAMPOLINE(1746) TRAMPOLINE(1747) TRAMPOLINE(1748) TRAMPOLINE(1749) TRAMPOLINE(1750) TRAMPOLINE(1751) TRAMPOLINE(1752) TRAMPOLINE(1753) TRAMPOLINE(1754) TRAMPOLINE(1755) TRAMPOLINE(1756) TRAMPOLINE(1757) TRAMPOLINE(1758) TRAMPOLINE(1759) TRAMPOLINE(1760) TRAMPOLINE(1761) TRAMPOLINE(1762) TRAMPOLINE(1763) TRAMPOLINE(1764) TRAMPOLINE(1765) TRAMPOLINE(1766) TRAMPOLINE(1767) TRAMPOLINE(1768) TRAMPOLINE(1769) TRAMPOLINE(1770) TRAMPOLINE(1771) TRAMPOLINE(1772) TRAMPOLINE(1773) TRAMPOLINE(1774) TRAMPOLINE(1775) TRAMPOLINE(1776) TRAMPOLINE(1777) TRAMPOLINE(1778) TRAMPOLINE(1779) TRAMPOLINE(1780) TRAMPOLINE(1781) TRAMPOLINE(1782) TRAMPOLINE(1783) TRAMPOLINE(1784) TRAMPOLINE(1785) TRAMPOLINE(1786) TRAMPOLINE(1787) TRAMPOLINE(1788) TRAMPOLINE(1789) TRAMPOLINE(1790) TRAMPOLINE(1791) TRAMPOLINE(1792) TRAMPOLINE(1793) TRAMPOLINE(1794) TRAMPOLINE(1795) TRAMPOLINE(1796) TRAMPOLINE(1797) TRAMPOLINE(1798) TRAMPOLINE(1799) TRAMPOLINE(1800) TRAMPOLINE(1801) TRAMPOLINE(1802) TRAMPOLINE(1803) TRAMPOLINE(1804) TRAMPOLINE(1805) TRAMPOLINE(1806) TRAMPOLINE(1807) TRAMPOLINE(1808) TRAMPOLINE(1809) TRAMPOLINE(1810) TRAMPOLINE(1811) TRAMPOLINE(1812) TRAMPOLINE(1813) TRAMPOLINE(1814) TRAMPOLINE(1815) TRAMPOLINE(1816) TRAMPOLINE(1817) TRAMPOLINE(1818) TRAMPOLINE(1819) TRAMPOLINE(1820) TRAMPOLINE(1821) TRAMPOLINE(1822) TRAMPOLINE(1823) TRAMPOLINE(1824) TRAMPOLINE(1825) TRAMPOLINE(1826) TRAMPOLINE(1827) TRAMPOLINE(1828) TRAMPOLINE(1829) TRAMPOLINE(1830) TRAMPOLINE(1831) TRAMPOLINE(1832) TRAMPOLINE(1833) TRAMPOLINE(1834) TRAMPOLINE(1835) TRAMPOLINE(1836) TRAMPOLINE(1837) TRAMPOLINE(1838) TRAMPOLINE(1839) TRAMPOLINE(1840) TRAMPOLINE(1841) TRAMPOLINE(1842) TRAMPOLINE(1843) TRAMPOLINE(1844) TRAMPOLINE(1845) TRAMPOLINE(1846) TRAMPOLINE(1847) TRAMPOLINE(1848) TRAMPOLINE(1849) TRAMPOLINE(1850) TRAMPOLINE(1851) TRAMPOLINE(1852) TRAMPOLINE(1853) TRAMPOLINE(1854) TRAMPOLINE(1855) TRAMPOLINE(1856) TRAMPOLINE(1857) TRAMPOLINE(1858) TRAMPOLINE(1859) TRAMPOLINE(1860) TRAMPOLINE(1861) TRAMPOLINE(1862) TRAMPOLINE(1863) TRAMPOLINE(1864) TRAMPOLINE(1865) TRAMPOLINE(1866) TRAMPOLINE(1867) TRAMPOLINE(1868) TRAMPOLINE(1869) TRAMPOLINE(1870) TRAMPOLINE(1871) TRAMPOLINE(1872) TRAMPOLINE(1873) TRAMPOLINE(1874) TRAMPOLINE(1875) TRAMPOLINE(1876) TRAMPOLINE(1877) TRAMPOLINE(1878) TRAMPOLINE(1879) TRAMPOLINE(1880) TRAMPOLINE(1881) TRAMPOLINE(1882) TRAMPOLINE(1883) TRAMPOLINE(1884) TRAMPOLINE(1885) TRAMPOLINE(1886) TRAMPOLINE(1887) TRAMPOLINE(1888) TRAMPOLINE(1889) TRAMPOLINE(1890) TRAMPOLINE(1891) TRAMPOLINE(1892) TRAMPOLINE(1893) TRAMPOLINE(1894) TRAMPOLINE(1895) TRAMPOLINE(1896) TRAMPOLINE(1897) TRAMPOLINE(1898) TRAMPOLINE(1899) TRAMPOLINE(1900) TRAMPOLINE(1901) TRAMPOLINE(1902) TRAMPOLINE(1903) TRAMPOLINE(1904) TRAMPOLINE(1905) TRAMPOLINE(1906) TRAMPOLINE(1907) TRAMPOLINE(1908) TRAMPOLINE(1909) TRAMPOLINE(1910) TRAMPOLINE(1911) TRAMPOLINE(1912) TRAMPOLINE(1913) TRAMPOLINE(1914) TRAMPOLINE(1915) TRAMPOLINE(1916) TRAMPOLINE(1917) TRAMPOLINE(1918) TRAMPOLINE(1919) TRAMPOLINE(1920) TRAMPOLINE(1921) TRAMPOLINE(1922) TRAMPOLINE(1923) TRAMPOLINE(1924) TRAMPOLINE(1925) TRAMPOLINE(1926) TRAMPOLINE(1927) TRAMPOLINE(1928) TRAMPOLINE(1929) TRAMPOLINE(1930) TRAMPOLINE(1931) TRAMPOLINE(1932) TRAMPOLINE(1933) TRAMPOLINE(1934) TRAMPOLINE(1935) TRAMPOLINE(1936) TRAMPOLINE(1937) TRAMPOLINE(1938) TRAMPOLINE(1939) TRAMPOLINE(1940) TRAMPOLINE(1941) TRAMPOLINE(1942) TRAMPOLINE(1943) TRAMPOLINE(1944) TRAMPOLINE(1945) TRAMPOLINE(1946) TRAMPOLINE(1947) TRAMPOLINE(1948) TRAMPOLINE(1949) TRAMPOLINE(1950) TRAMPOLINE(1951) TRAMPOLINE(1952) TRAMPOLINE(1953) TRAMPOLINE(1954) TRAMPOLINE(1955) TRAMPOLINE(1956) TRAMPOLINE(1957) TRAMPOLINE(1958) TRAMPOLINE(1959) TRAMPOLINE(1960) TRAMPOLINE(1961) TRAMPOLINE(1962) TRAMPOLINE(1963) TRAMPOLINE(1964) TRAMPOLINE(1965) TRAMPOLINE(1966) TRAMPOLINE(1967) TRAMPOLINE(1968) TRAMPOLINE(1969) TRAMPOLINE(1970) TRAMPOLINE(1971) TRAMPOLINE(1972) TRAMPOLINE(1973) TRAMPOLINE(1974) TRAMPOLINE(1975) TRAMPOLINE(1976) TRAMPOLINE(1977) TRAMPOLINE(1978) TRAMPOLINE(1979) TRAMPOLINE(1980) TRAMPOLINE(1981) TRAMPOLINE(1982) TRAMPOLINE(1983) TRAMPOLINE(1984) TRAMPOLINE(1985) TRAMPOLINE(1986) TRAMPOLINE(1987) TRAMPOLINE(1988) TRAMPOLINE(1989) TRAMPOLINE(1990) TRAMPOLINE(1991) TRAMPOLINE(1992) TRAMPOLINE(1993) TRAMPOLINE(1994) TRAMPOLINE(1995) TRAMPOLINE(1996) TRAMPOLINE(1997) TRAMPOLINE(1998) TRAMPOLINE(1999) TRAMPOLINE(2000) TRAMPOLINE(2001) TRAMPOLINE(2002) TRAMPOLINE(2003) TRAMPOLINE(2004) TRAMPOLINE(2005) TRAMPOLINE(2006) TRAMPOLINE(2007) TRAMPOLINE(2008) TRAMPOLINE(2009) TRAMPOLINE(2010) TRAMPOLINE(2011) TRAMPOLINE(2012) TRAMPOLINE(2013) TRAMPOLINE(2014) TRAMPOLINE(2015) TRAMPOLINE(2016) TRAMPOLINE(2017) TRAMPOLINE(2018) TRAMPOLINE(2019) TRAMPOLINE(2020) TRAMPOLINE(2021) TRAMPOLINE(2022) TRAMPOLINE(2023) TRAMPOLINE(2024) TRAMPOLINE(2025) TRAMPOLINE(2026) TRAMPOLINE(2027) TRAMPOLINE(2028) TRAMPOLINE(2029) TRAMPOLINE(2030) TRAMPOLINE(2031) TRAMPOLINE(2032) TRAMPOLINE(2033) TRAMPOLINE(2034) TRAMPOLINE(2035) TRAMPOLINE(2036) TRAMPOLINE(2037) TRAMPOLINE(2038) TRAMPOLINE(2039) TRAMPOLINE(2040) TRAMPOLINE(2041) TRAMPOLINE(2042) TRAMPOLINE(2043) TRAMPOLINE(2044) TRAMPOLINE(2045) TRAMPOLINE(2046) TRAMPOLINE(2047) TRAMPOLINE(2048) TRAMPOLINE(2049) TRAMPOLINE(2050) TRAMPOLINE(2051) TRAMPOLINE(2052) TRAMPOLINE(2053) TRAMPOLINE(2054) TRAMPOLINE(2055) TRAMPOLINE(2056) TRAMPOLINE(2057) TRAMPOLINE(2058) TRAMPOLINE(2059) TRAMPOLINE(2060) TRAMPOLINE(2061) TRAMPOLINE(2062) TRAMPOLINE(2063) TRAMPOLINE(2064) TRAMPOLINE(2065) TRAMPOLINE(2066) TRAMPOLINE(2067) TRAMPOLINE(2068) TRAMPOLINE(2069) TRAMPOLINE(2070) TRAMPOLINE(2071) TRAMPOLINE(2072) TRAMPOLINE(2073) TRAMPOLINE(2074) TRAMPOLINE(2075) TRAMPOLINE(2076) TRAMPOLINE(2077) TRAMPOLINE(2078) TRAMPOLINE(2079) TRAMPOLINE(2080) TRAMPOLINE(2081) TRAMPOLINE(2082) TRAMPOLINE(2083) TRAMPOLINE(2084) TRAMPOLINE(2085) TRAMPOLINE(2086) TRAMPOLINE(2087) TRAMPOLINE(2088) TRAMPOLINE(2089) TRAMPOLINE(2090) TRAMPOLINE(2091) TRAMPOLINE(2092) TRAMPOLINE(2093) TRAMPOLINE(2094) TRAMPOLINE(2095) TRAMPOLINE(2096) TRAMPOLINE(2097) TRAMPOLINE(2098) TRAMPOLINE(2099) TRAMPOLINE(2100) TRAMPOLINE(2101) TRAMPOLINE(2102) TRAMPOLINE(2103) TRAMPOLINE(2104) TRAMPOLINE(2105) TRAMPOLINE(2106) TRAMPOLINE(2107) TRAMPOLINE(2108) TRAMPOLINE(2109) TRAMPOLINE(2110) TRAMPOLINE(2111) TRAMPOLINE(2112) TRAMPOLINE(2113) TRAMPOLINE(2114) TRAMPOLINE(2115) TRAMPOLINE(2116) TRAMPOLINE(2117) TRAMPOLINE(2118) TRAMPOLINE(2119) TRAMPOLINE(2120) TRAMPOLINE(2121) TRAMPOLINE(2122) TRAMPOLINE(2123) TRAMPOLINE(2124) TRAMPOLINE(2125) TRAMPOLINE(2126) TRAMPOLINE(2127) TRAMPOLINE(2128) TRAMPOLINE(2129) TRAMPOLINE(2130) TRAMPOLINE(2131) TRAMPOLINE(2132) TRAMPOLINE(2133) TRAMPOLINE(2134) TRAMPOLINE(2135) TRAMPOLINE(2136) TRAMPOLINE(2137) TRAMPOLINE(2138) TRAMPOLINE(2139) TRAMPOLINE(2140) TRAMPOLINE(2141) TRAMPOLINE(2142) TRAMPOLINE(2143) TRAMPOLINE(2144) TRAMPOLINE(2145) TRAMPOLINE(2146) TRAMPOLINE(2147) TRAMPOLINE(2148) TRAMPOLINE(2149) TRAMPOLINE(2150) TRAMPOLINE(2151) TRAMPOLINE(2152) TRAMPOLINE(2153) TRAMPOLINE(2154) TRAMPOLINE(2155) TRAMPOLINE(2156) TRAMPOLINE(2157) TRAMPOLINE(2158) TRAMPOLINE(2159) TRAMPOLINE(2160) TRAMPOLINE(2161) TRAMPOLINE(2162) TRAMPOLINE(2163) TRAMPOLINE(2164) TRAMPOLINE(2165) TRAMPOLINE(2166) TRAMPOLINE(2167) TRAMPOLINE(2168) TRAMPOLINE(2169) TRAMPOLINE(2170) TRAMPOLINE(2171) TRAMPOLINE(2172) TRAMPOLINE(2173) TRAMPOLINE(2174) TRAMPOLINE(2175) TRAMPOLINE(2176) TRAMPOLINE(2177) TRAMPOLINE(2178) TRAMPOLINE(2179) TRAMPOLINE(2180) TRAMPOLINE(2181) TRAMPOLINE(2182) TRAMPOLINE(2183) TRAMPOLINE(2184) TRAMPOLINE(2185) TRAMPOLINE(2186) TRAMPOLINE(2187) TRAMPOLINE(2188) TRAMPOLINE(2189) TRAMPOLINE(2190) TRAMPOLINE(2191) TRAMPOLINE(2192) TRAMPOLINE(2193) TRAMPOLINE(2194) TRAMPOLINE(2195) TRAMPOLINE(2196) TRAMPOLINE(2197) TRAMPOLINE(2198) TRAMPOLINE(2199) TRAMPOLINE(2200) TRAMPOLINE(2201) TRAMPOLINE(2202) TRAMPOLINE(2203) TRAMPOLINE(2204) TRAMPOLINE(2205) TRAMPOLINE(2206) TRAMPOLINE(2207) TRAMPOLINE(2208) TRAMPOLINE(2209) TRAMPOLINE(2210) TRAMPOLINE(2211) TRAMPOLINE(2212) TRAMPOLINE(2213) TRAMPOLINE(2214) TRAMPOLINE(2215) TRAMPOLINE(2216) TRAMPOLINE(2217) TRAMPOLINE(2218) TRAMPOLINE(2219) TRAMPOLINE(2220) TRAMPOLINE(2221) TRAMPOLINE(2222) TRAMPOLINE(2223) TRAMPOLINE(2224) TRAMPOLINE(2225) TRAMPOLINE(2226) TRAMPOLINE(2227) TRAMPOLINE(2228) TRAMPOLINE(2229) TRAMPOLINE(2230) TRAMPOLINE(2231) TRAMPOLINE(2232) TRAMPOLINE(2233) TRAMPOLINE(2234) TRAMPOLINE(2235) TRAMPOLINE(2236) TRAMPOLINE(2237) TRAMPOLINE(2238) TRAMPOLINE(2239) TRAMPOLINE(2240) TRAMPOLINE(2241) TRAMPOLINE(2242) TRAMPOLINE(2243) TRAMPOLINE(2244) TRAMPOLINE(2245) TRAMPOLINE(2246) TRAMPOLINE(2247) TRAMPOLINE(2248) TRAMPOLINE(2249) TRAMPOLINE(2250) TRAMPOLINE(2251) TRAMPOLINE(2252) TRAMPOLINE(2253) TRAMPOLINE(2254) TRAMPOLINE(2255) TRAMPOLINE(2256) TRAMPOLINE(2257) TRAMPOLINE(2258) TRAMPOLINE(2259) TRAMPOLINE(2260) TRAMPOLINE(2261) TRAMPOLINE(2262) TRAMPOLINE(2263) TRAMPOLINE(2264) TRAMPOLINE(2265) TRAMPOLINE(2266) TRAMPOLINE(2267) TRAMPOLINE(2268) TRAMPOLINE(2269) TRAMPOLINE(2270) TRAMPOLINE(2271) TRAMPOLINE(2272) TRAMPOLINE(2273) TRAMPOLINE(2274) TRAMPOLINE(2275) TRAMPOLINE(2276) TRAMPOLINE(2277) TRAMPOLINE(2278) TRAMPOLINE(2279) TRAMPOLINE(2280) TRAMPOLINE(2281) TRAMPOLINE(2282) TRAMPOLINE(2283) TRAMPOLINE(2284) TRAMPOLINE(2285) TRAMPOLINE(2286) TRAMPOLINE(2287) TRAMPOLINE(2288) TRAMPOLINE(2289) TRAMPOLINE(2290) TRAMPOLINE(2291) TRAMPOLINE(2292) TRAMPOLINE(2293) TRAMPOLINE(2294) TRAMPOLINE(2295) TRAMPOLINE(2296) TRAMPOLINE(2297) TRAMPOLINE(2298) TRAMPOLINE(2299) TRAMPOLINE(2300) TRAMPOLINE(2301) TRAMPOLINE(2302) TRAMPOLINE(2303) TRAMPOLINE(2304) TRAMPOLINE(2305) TRAMPOLINE(2306) TRAMPOLINE(2307) TRAMPOLINE(2308) TRAMPOLINE(2309) TRAMPOLINE(2310) TRAMPOLINE(2311) TRAMPOLINE(2312) TRAMPOLINE(2313) TRAMPOLINE(2314) TRAMPOLINE(2315) TRAMPOLINE(2316) TRAMPOLINE(2317) TRAMPOLINE(2318) TRAMPOLINE(2319) TRAMPOLINE(2320) TRAMPOLINE(2321) TRAMPOLINE(2322) TRAMPOLINE(2323) TRAMPOLINE(2324) TRAMPOLINE(2325) TRAMPOLINE(2326) TRAMPOLINE(2327) TRAMPOLINE(2328) TRAMPOLINE(2329) TRAMPOLINE(2330) TRAMPOLINE(2331) TRAMPOLINE(2332) TRAMPOLINE(2333) TRAMPOLINE(2334) TRAMPOLINE(2335) TRAMPOLINE(2336) TRAMPOLINE(2337) TRAMPOLINE(2338) TRAMPOLINE(2339) TRAMPOLINE(2340) TRAMPOLINE(2341) TRAMPOLINE(2342) TRAMPOLINE(2343) TRAMPOLINE(2344) TRAMPOLINE(2345) TRAMPOLINE(2346) TRAMPOLINE(2347) TRAMPOLINE(2348) TRAMPOLINE(2349) TRAMPOLINE(2350) TRAMPOLINE(2351) TRAMPOLINE(2352) TRAMPOLINE(2353) TRAMPOLINE(2354) TRAMPOLINE(2355) TRAMPOLINE(2356) TRAMPOLINE(2357) TRAMPOLINE(2358) TRAMPOLINE(2359) TRAMPOLINE(2360) TRAMPOLINE(2361) TRAMPOLINE(2362) TRAMPOLINE(2363) TRAMPOLINE(2364) TRAMPOLINE(2365) TRAMPOLINE(2366) TRAMPOLINE(2367) TRAMPOLINE(2368) TRAMPOLINE(2369) TRAMPOLINE(2370) TRAMPOLINE(2371) TRAMPOLINE(2372) TRAMPOLINE(2373) TRAMPOLINE(2374) TRAMPOLINE(2375) TRAMPOLINE(2376) TRAMPOLINE(2377) TRAMPOLINE(2378) TRAMPOLINE(2379) TRAMPOLINE(2380) TRAMPOLINE(2381) TRAMPOLINE(2382) TRAMPOLINE(2383) TRAMPOLINE(2384) TRAMPOLINE(2385) TRAMPOLINE(2386) TRAMPOLINE(2387) TRAMPOLINE(2388) TRAMPOLINE(2389) TRAMPOLINE(2390) TRAMPOLINE(2391) TRAMPOLINE(2392) TRAMPOLINE(2393) TRAMPOLINE(2394) TRAMPOLINE(2395) TRAMPOLINE(2396) TRAMPOLINE(2397) TRAMPOLINE(2398) TRAMPOLINE(2399) TRAMPOLINE(2400) TRAMPOLINE(2401) TRAMPOLINE(2402) TRAMPOLINE(2403) TRAMPOLINE(2404) TRAMPOLINE(2405) TRAMPOLINE(2406) TRAMPOLINE(2407) TRAMPOLINE(2408) TRAMPOLINE(2409) TRAMPOLINE(2410) TRAMPOLINE(2411) TRAMPOLINE(2412) TRAMPOLINE(2413) TRAMPOLINE(2414) TRAMPOLINE(2415) TRAMPOLINE(2416) TRAMPOLINE(2417) TRAMPOLINE(2418) TRAMPOLINE(2419) TRAMPOLINE(2420) TRAMPOLINE(2421) TRAMPOLINE(2422) TRAMPOLINE(2423) TRAMPOLINE(2424) TRAMPOLINE(2425) TRAMPOLINE(2426) TRAMPOLINE(2427) TRAMPOLINE(2428) TRAMPOLINE(2429) TRAMPOLINE(2430) TRAMPOLINE(2431) TRAMPOLINE(2432) TRAMPOLINE(2433) TRAMPOLINE(2434) TRAMPOLINE(2435) TRAMPOLINE(2436) TRAMPOLINE(2437) TRAMPOLINE(2438) TRAMPOLINE(2439) TRAMPOLINE(2440) TRAMPOLINE(2441) TRAMPOLINE(2442) TRAMPOLINE(2443) TRAMPOLINE(2444) TRAMPOLINE(2445) TRAMPOLINE(2446) TRAMPOLINE(2447) TRAMPOLINE(2448) TRAMPOLINE(2449) TRAMPOLINE(2450) TRAMPOLINE(2451) TRAMPOLINE(2452) TRAMPOLINE(2453) TRAMPOLINE(2454) TRAMPOLINE(2455) TRAMPOLINE(2456) TRAMPOLINE(2457) TRAMPOLINE(2458) TRAMPOLINE(2459) TRAMPOLINE(2460) TRAMPOLINE(2461) TRAMPOLINE(2462) TRAMPOLINE(2463) TRAMPOLINE(2464) TRAMPOLINE(2465) TRAMPOLINE(2466) TRAMPOLINE(2467) TRAMPOLINE(2468) TRAMPOLINE(2469) TRAMPOLINE(2470) TRAMPOLINE(2471) TRAMPOLINE(2472) TRAMPOLINE(2473) TRAMPOLINE(2474) TRAMPOLINE(2475) TRAMPOLINE(2476) TRAMPOLINE(2477) TRAMPOLINE(2478) TRAMPOLINE(2479) TRAMPOLINE(2480) TRAMPOLINE(2481) TRAMPOLINE(2482) TRAMPOLINE(2483) TRAMPOLINE(2484) TRAMPOLINE(2485) TRAMPOLINE(2486) TRAMPOLINE(2487) TRAMPOLINE(2488) TRAMPOLINE(2489) TRAMPOLINE(2490) TRAMPOLINE(2491) TRAMPOLINE(2492) TRAMPOLINE(2493) TRAMPOLINE(2494) TRAMPOLINE(2495) TRAMPOLINE(2496) TRAMPOLINE(2497) TRAMPOLINE(2498) TRAMPOLINE(2499) TRAMPOLINE(2500) TRAMPOLINE(2501) TRAMPOLINE(2502) TRAMPOLINE(2503) TRAMPOLINE(2504) TRAMPOLINE(2505) TRAMPOLINE(2506) TRAMPOLINE(2507) TRAMPOLINE(2508) TRAMPOLINE(2509) TRAMPOLINE(2510) TRAMPOLINE(2511) TRAMPOLINE(2512) TRAMPOLINE(2513) TRAMPOLINE(2514) TRAMPOLINE(2515) TRAMPOLINE(2516) TRAMPOLINE(2517) TRAMPOLINE(2518) TRAMPOLINE(2519) TRAMPOLINE(2520) TRAMPOLINE(2521) TRAMPOLINE(2522) TRAMPOLINE(2523) TRAMPOLINE(2524) TRAMPOLINE(2525) TRAMPOLINE(2526) TRAMPOLINE(2527) TRAMPOLINE(2528) TRAMPOLINE(2529) TRAMPOLINE(2530) TRAMPOLINE(2531) TRAMPOLINE(2532) TRAMPOLINE(2533) TRAMPOLINE(2534) TRAMPOLINE(2535) TRAMPOLINE(2536) TRAMPOLINE(2537) TRAMPOLINE(2538) TRAMPOLINE(2539) TRAMPOLINE(2540) TRAMPOLINE(2541) TRAMPOLINE(2542) TRAMPOLINE(2543) TRAMPOLINE(2544) TRAMPOLINE(2545) TRAMPOLINE(2546) TRAMPOLINE(2547) TRAMPOLINE(2548) TRAMPOLINE(2549) TRAMPOLINE(2550) TRAMPOLINE(2551) TRAMPOLINE(2552) TRAMPOLINE(2553) TRAMPOLINE(2554) TRAMPOLINE(2555) TRAMPOLINE(2556) TRAMPOLINE(2557) TRAMPOLINE(2558) TRAMPOLINE(2559) TRAMPOLINE(2560) TRAMPOLINE(2561) TRAMPOLINE(2562) TRAMPOLINE(2563) TRAMPOLINE(2564) TRAMPOLINE(2565) TRAMPOLINE(2566) TRAMPOLINE(2567) TRAMPOLINE(2568) TRAMPOLINE(2569) TRAMPOLINE(2570) TRAMPOLINE(2571) TRAMPOLINE(2572) TRAMPOLINE(2573) TRAMPOLINE(2574) TRAMPOLINE(2575) TRAMPOLINE(2576) TRAMPOLINE(2577) TRAMPOLINE(2578) TRAMPOLINE(2579) TRAMPOLINE(2580) TRAMPOLINE(2581) TRAMPOLINE(2582) TRAMPOLINE(2583) TRAMPOLINE(2584) TRAMPOLINE(2585) TRAMPOLINE(2586) TRAMPOLINE(2587) TRAMPOLINE(2588) TRAMPOLINE(2589) TRAMPOLINE(2590) TRAMPOLINE(2591) TRAMPOLINE(2592) TRAMPOLINE(2593) TRAMPOLINE(2594) TRAMPOLINE(2595) TRAMPOLINE(2596) TRAMPOLINE(2597) TRAMPOLINE(2598) TRAMPOLINE(2599) TRAMPOLINE(2600) TRAMPOLINE(2601) TRAMPOLINE(2602) TRAMPOLINE(2603) TRAMPOLINE(2604) TRAMPOLINE(2605) TRAMPOLINE(2606) TRAMPOLINE(2607) TRAMPOLINE(2608) TRAMPOLINE(2609) TRAMPOLINE(2610) TRAMPOLINE(2611) TRAMPOLINE(2612) TRAMPOLINE(2613) TRAMPOLINE(2614) TRAMPOLINE(2615) TRAMPOLINE(2616) TRAMPOLINE(2617) TRAMPOLINE(2618) TRAMPOLINE(2619) TRAMPOLINE(2620) TRAMPOLINE(2621) TRAMPOLINE(2622) TRAMPOLINE(2623) TRAMPOLINE(2624) TRAMPOLINE(2625) TRAMPOLINE(2626) TRAMPOLINE(2627) TRAMPOLINE(2628) TRAMPOLINE(2629) TRAMPOLINE(2630) TRAMPOLINE(2631) TRAMPOLINE(2632) TRAMPOLINE(2633) TRAMPOLINE(2634) TRAMPOLINE(2635) TRAMPOLINE(2636) TRAMPOLINE(2637) TRAMPOLINE(2638) TRAMPOLINE(2639) TRAMPOLINE(2640) TRAMPOLINE(2641) TRAMPOLINE(2642) TRAMPOLINE(2643) TRAMPOLINE(2644) TRAMPOLINE(2645) TRAMPOLINE(2646) TRAMPOLINE(2647) TRAMPOLINE(2648) TRAMPOLINE(2649) TRAMPOLINE(2650) TRAMPOLINE(2651) TRAMPOLINE(2652) TRAMPOLINE(2653) TRAMPOLINE(2654) TRAMPOLINE(2655) TRAMPOLINE(2656) TRAMPOLINE(2657) TRAMPOLINE(2658) TRAMPOLINE(2659) TRAMPOLINE(2660) TRAMPOLINE(2661) TRAMPOLINE(2662) TRAMPOLINE(2663) TRAMPOLINE(2664) TRAMPOLINE(2665) TRAMPOLINE(2666) TRAMPOLINE(2667) TRAMPOLINE(2668) TRAMPOLINE(2669) TRAMPOLINE(2670) TRAMPOLINE(2671) TRAMPOLINE(2672) TRAMPOLINE(2673) TRAMPOLINE(2674) TRAMPOLINE(2675) TRAMPOLINE(2676) TRAMPOLINE(2677) TRAMPOLINE(2678) TRAMPOLINE(2679) TRAMPOLINE(2680) TRAMPOLINE(2681) TRAMPOLINE(2682) TRAMPOLINE(2683) TRAMPOLINE(2684) TRAMPOLINE(2685) TRAMPOLINE(2686) TRAMPOLINE(2687) TRAMPOLINE(2688) TRAMPOLINE(2689) TRAMPOLINE(2690) TRAMPOLINE(2691) TRAMPOLINE(2692) TRAMPOLINE(2693) TRAMPOLINE(2694) TRAMPOLINE(2695) TRAMPOLINE(2696) TRAMPOLINE(2697) TRAMPOLINE(2698) TRAMPOLINE(2699) TRAMPOLINE(2700) TRAMPOLINE(2701) TRAMPOLINE(2702) TRAMPOLINE(2703) TRAMPOLINE(2704) TRAMPOLINE(2705) TRAMPOLINE(2706) TRAMPOLINE(2707) TRAMPOLINE(2708) TRAMPOLINE(2709) TRAMPOLINE(2710) TRAMPOLINE(2711) TRAMPOLINE(2712) TRAMPOLINE(2713) TRAMPOLINE(2714) TRAMPOLINE(2715) TRAMPOLINE(2716) TRAMPOLINE(2717) TRAMPOLINE(2718) TRAMPOLINE(2719) TRAMPOLINE(2720) TRAMPOLINE(2721) TRAMPOLINE(2722) TRAMPOLINE(2723) TRAMPOLINE(2724) TRAMPOLINE(2725) TRAMPOLINE(2726) TRAMPOLINE(2727) TRAMPOLINE(2728) TRAMPOLINE(2729) TRAMPOLINE(2730) TRAMPOLINE(2731) TRAMPOLINE(2732) TRAMPOLINE(2733) TRAMPOLINE(2734) TRAMPOLINE(2735) TRAMPOLINE(2736) TRAMPOLINE(2737) TRAMPOLINE(2738) TRAMPOLINE(2739) TRAMPOLINE(2740) TRAMPOLINE(2741) TRAMPOLINE(2742) TRAMPOLINE(2743) TRAMPOLINE(2744) TRAMPOLINE(2745) TRAMPOLINE(2746) TRAMPOLINE(2747) TRAMPOLINE(2748) TRAMPOLINE(2749) TRAMPOLINE(2750) TRAMPOLINE(2751) TRAMPOLINE(2752) TRAMPOLINE(2753) TRAMPOLINE(2754) TRAMPOLINE(2755) TRAMPOLINE(2756) TRAMPOLINE(2757) TRAMPOLINE(2758) TRAMPOLINE(2759) TRAMPOLINE(2760) TRAMPOLINE(2761) TRAMPOLINE(2762) TRAMPOLINE(2763) TRAMPOLINE(2764) TRAMPOLINE(2765) TRAMPOLINE(2766) TRAMPOLINE(2767) TRAMPOLINE(2768) TRAMPOLINE(2769) TRAMPOLINE(2770) TRAMPOLINE(2771) TRAMPOLINE(2772) TRAMPOLINE(2773) TRAMPOLINE(2774) TRAMPOLINE(2775) TRAMPOLINE(2776) TRAMPOLINE(2777) TRAMPOLINE(2778) TRAMPOLINE(2779) TRAMPOLINE(2780) TRAMPOLINE(2781) TRAMPOLINE(2782) TRAMPOLINE(2783) TRAMPOLINE(2784) TRAMPOLINE(2785) TRAMPOLINE(2786) TRAMPOLINE(2787) TRAMPOLINE(2788) TRAMPOLINE(2789) TRAMPOLINE(2790) TRAMPOLINE(2791) TRAMPOLINE(2792) TRAMPOLINE(2793) TRAMPOLINE(2794) TRAMPOLINE(2795) TRAMPOLINE(2796) TRAMPOLINE(2797) TRAMPOLINE(2798) TRAMPOLINE(2799) TRAMPOLINE(2800) TRAMPOLINE(2801) TRAMPOLINE(2802) TRAMPOLINE(2803) TRAMPOLINE(2804) TRAMPOLINE(2805) TRAMPOLINE(2806) TRAMPOLINE(2807) TRAMPOLINE(2808) TRAMPOLINE(2809) TRAMPOLINE(2810) TRAMPOLINE(2811) TRAMPOLINE(2812) TRAMPOLINE(2813) TRAMPOLINE(2814) TRAMPOLINE(2815) TRAMPOLINE(2816) TRAMPOLINE(2817) TRAMPOLINE(2818) TRAMPOLINE(2819) TRAMPOLINE(2820) TRAMPOLINE(2821) TRAMPOLINE(2822) TRAMPOLINE(2823) TRAMPOLINE(2824) TRAMPOLINE(2825) TRAMPOLINE(2826) TRAMPOLINE(2827) TRAMPOLINE(2828) TRAMPOLINE(2829) TRAMPOLINE(2830) TRAMPOLINE(2831) TRAMPOLINE(2832) TRAMPOLINE(2833) TRAMPOLINE(2834) TRAMPOLINE(2835) TRAMPOLINE(2836) TRAMPOLINE(2837) TRAMPOLINE(2838) TRAMPOLINE(2839) TRAMPOLINE(2840) TRAMPOLINE(2841) TRAMPOLINE(2842) TRAMPOLINE(2843) TRAMPOLINE(2844) TRAMPOLINE(2845) TRAMPOLINE(2846) TRAMPOLINE(2847) TRAMPOLINE(2848) TRAMPOLINE(2849) TRAMPOLINE(2850) TRAMPOLINE(2851) TRAMPOLINE(2852) TRAMPOLINE(2853) TRAMPOLINE(2854) TRAMPOLINE(2855) TRAMPOLINE(2856) TRAMPOLINE(2857) TRAMPOLINE(2858) TRAMPOLINE(2859) TRAMPOLINE(2860) TRAMPOLINE(2861) TRAMPOLINE(2862) TRAMPOLINE(2863) TRAMPOLINE(2864) TRAMPOLINE(2865) TRAMPOLINE(2866) TRAMPOLINE(2867) TRAMPOLINE(2868) TRAMPOLINE(2869) TRAMPOLINE(2870) TRAMPOLINE(2871) TRAMPOLINE(2872) TRAMPOLINE(2873) TRAMPOLINE(2874) TRAMPOLINE(2875) TRAMPOLINE(2876) TRAMPOLINE(2877) TRAMPOLINE(2878) TRAMPOLINE(2879) TRAMPOLINE(2880) TRAMPOLINE(2881) TRAMPOLINE(2882) TRAMPOLINE(2883) TRAMPOLINE(2884) TRAMPOLINE(2885) TRAMPOLINE(2886) TRAMPOLINE(2887) TRAMPOLINE(2888) TRAMPOLINE(2889) TRAMPOLINE(2890) TRAMPOLINE(2891) TRAMPOLINE(2892) TRAMPOLINE(2893) TRAMPOLINE(2894) TRAMPOLINE(2895) TRAMPOLINE(2896) TRAMPOLINE(2897) TRAMPOLINE(2898) TRAMPOLINE(2899) TRAMPOLINE(2900) TRAMPOLINE(2901) TRAMPOLINE(2902) TRAMPOLINE(2903) TRAMPOLINE(2904) TRAMPOLINE(2905) TRAMPOLINE(2906) TRAMPOLINE(2907) TRAMPOLINE(2908) TRAMPOLINE(2909) TRAMPOLINE(2910) TRAMPOLINE(2911) TRAMPOLINE(2912) TRAMPOLINE(2913) TRAMPOLINE(2914) TRAMPOLINE(2915) TRAMPOLINE(2916) TRAMPOLINE(2917) TRAMPOLINE(2918) TRAMPOLINE(2919) TRAMPOLINE(2920) TRAMPOLINE(2921) TRAMPOLINE(2922) TRAMPOLINE(2923) TRAMPOLINE(2924) TRAMPOLINE(2925) TRAMPOLINE(2926) TRAMPOLINE(2927) TRAMPOLINE(2928) TRAMPOLINE(2929) TRAMPOLINE(2930) TRAMPOLINE(2931) TRAMPOLINE(2932) TRAMPOLINE(2933) TRAMPOLINE(2934) TRAMPOLINE(2935) TRAMPOLINE(2936) TRAMPOLINE(2937) TRAMPOLINE(2938) TRAMPOLINE(2939) TRAMPOLINE(2940) TRAMPOLINE(2941) TRAMPOLINE(2942) TRAMPOLINE(2943) TRAMPOLINE(2944) TRAMPOLINE(2945) TRAMPOLINE(2946) TRAMPOLINE(2947) TRAMPOLINE(2948) TRAMPOLINE(2949) TRAMPOLINE(2950) TRAMPOLINE(2951) TRAMPOLINE(2952) TRAMPOLINE(2953) TRAMPOLINE(2954) TRAMPOLINE(2955) TRAMPOLINE(2956) TRAMPOLINE(2957) TRAMPOLINE(2958) TRAMPOLINE(2959) TRAMPOLINE(2960) TRAMPOLINE(2961) TRAMPOLINE(2962) TRAMPOLINE(2963) TRAMPOLINE(2964) TRAMPOLINE(2965) TRAMPOLINE(2966) TRAMPOLINE(2967) TRAMPOLINE(2968) TRAMPOLINE(2969) TRAMPOLINE(2970) TRAMPOLINE(2971) TRAMPOLINE(2972) TRAMPOLINE(2973) TRAMPOLINE(2974) TRAMPOLINE(2975) TRAMPOLINE(2976) TRAMPOLINE(2977) TRAMPOLINE(2978) TRAMPOLINE(2979) TRAMPOLINE(2980) TRAMPOLINE(2981) TRAMPOLINE(2982) TRAMPOLINE(2983) TRAMPOLINE(2984) TRAMPOLINE(2985) TRAMPOLINE(2986) TRAMPOLINE(2987) TRAMPOLINE(2988) TRAMPOLINE(2989) TRAMPOLINE(2990) TRAMPOLINE(2991) TRAMPOLINE(2992) TRAMPOLINE(2993) TRAMPOLINE(2994) TRAMPOLINE(2995) TRAMPOLINE(2996) TRAMPOLINE(2997) TRAMPOLINE(2998) TRAMPOLINE(2999) TRAMPOLINE(3000) TRAMPOLINE(3001) TRAMPOLINE(3002) TRAMPOLINE(3003) TRAMPOLINE(3004) TRAMPOLINE(3005) TRAMPOLINE(3006) TRAMPOLINE(3007) TRAMPOLINE(3008) TRAMPOLINE(3009) TRAMPOLINE(3010) TRAMPOLINE(3011) TRAMPOLINE(3012) TRAMPOLINE(3013) TRAMPOLINE(3014) TRAMPOLINE(3015) TRAMPOLINE(3016) TRAMPOLINE(3017) TRAMPOLINE(3018) TRAMPOLINE(3019) TRAMPOLINE(3020) TRAMPOLINE(3021) TRAMPOLINE(3022) TRAMPOLINE(3023) TRAMPOLINE(3024) TRAMPOLINE(3025) TRAMPOLINE(3026) TRAMPOLINE(3027) TRAMPOLINE(3028) TRAMPOLINE(3029) TRAMPOLINE(3030) TRAMPOLINE(3031) TRAMPOLINE(3032) TRAMPOLINE(3033) TRAMPOLINE(3034) TRAMPOLINE(3035) TRAMPOLINE(3036) TRAMPOLINE(3037) TRAMPOLINE(3038) TRAMPOLINE(3039) TRAMPOLINE(3040) TRAMPOLINE(3041) TRAMPOLINE(3042) TRAMPOLINE(3043) TRAMPOLINE(3044) TRAMPOLINE(3045) TRAMPOLINE(3046) TRAMPOLINE(3047) TRAMPOLINE(3048) TRAMPOLINE(3049) TRAMPOLINE(3050) TRAMPOLINE(3051) TRAMPOLINE(3052) TRAMPOLINE(3053) TRAMPOLINE(3054) TRAMPOLINE(3055) TRAMPOLINE(3056) TRAMPOLINE(3057) TRAMPOLINE(3058) TRAMPOLINE(3059) TRAMPOLINE(3060) TRAMPOLINE(3061) TRAMPOLINE(3062) TRAMPOLINE(3063) TRAMPOLINE(3064) TRAMPOLINE(3065) TRAMPOLINE(3066) TRAMPOLINE(3067) TRAMPOLINE(3068) TRAMPOLINE(3069) TRAMPOLINE(3070) TRAMPOLINE(3071) TRAMPOLINE(3072) TRAMPOLINE(3073) TRAMPOLINE(3074) TRAMPOLINE(3075) TRAMPOLINE(3076) TRAMPOLINE(3077) TRAMPOLINE(3078) TRAMPOLINE(3079) TRAMPOLINE(3080) TRAMPOLINE(3081) TRAMPOLINE(3082) TRAMPOLINE(3083) TRAMPOLINE(3084) TRAMPOLINE(3085) TRAMPOLINE(3086) TRAMPOLINE(3087) TRAMPOLINE(3088) TRAMPOLINE(3089) TRAMPOLINE(3090) TRAMPOLINE(3091) TRAMPOLINE(3092) TRAMPOLINE(3093) TRAMPOLINE(3094) TRAMPOLINE(3095) TRAMPOLINE(3096) TRAMPOLINE(3097) TRAMPOLINE(3098) TRAMPOLINE(3099) TRAMPOLINE(3100) TRAMPOLINE(3101) TRAMPOLINE(3102) TRAMPOLINE(3103) TRAMPOLINE(3104) TRAMPOLINE(3105) TRAMPOLINE(3106) TRAMPOLINE(3107) TRAMPOLINE(3108) TRAMPOLINE(3109) TRAMPOLINE(3110) TRAMPOLINE(3111) TRAMPOLINE(3112) TRAMPOLINE(3113) TRAMPOLINE(3114) TRAMPOLINE(3115) TRAMPOLINE(3116) TRAMPOLINE(3117) TRAMPOLINE(3118) TRAMPOLINE(3119) TRAMPOLINE(3120) TRAMPOLINE(3121) TRAMPOLINE(3122) TRAMPOLINE(3123) TRAMPOLINE(3124) TRAMPOLINE(3125) TRAMPOLINE(3126) TRAMPOLINE(3127) TRAMPOLINE(3128) TRAMPOLINE(3129) TRAMPOLINE(3130) TRAMPOLINE(3131) TRAMPOLINE(3132) TRAMPOLINE(3133) TRAMPOLINE(3134) TRAMPOLINE(3135) TRAMPOLINE(3136) TRAMPOLINE(3137) TRAMPOLINE(3138) TRAMPOLINE(3139) TRAMPOLINE(3140) TRAMPOLINE(3141) TRAMPOLINE(3142) TRAMPOLINE(3143) TRAMPOLINE(3144) TRAMPOLINE(3145) TRAMPOLINE(3146) TRAMPOLINE(3147) TRAMPOLINE(3148) TRAMPOLINE(3149) TRAMPOLINE(3150) TRAMPOLINE(3151) TRAMPOLINE(3152) TRAMPOLINE(3153) TRAMPOLINE(3154) TRAMPOLINE(3155) TRAMPOLINE(3156) TRAMPOLINE(3157) TRAMPOLINE(3158) TRAMPOLINE(3159) TRAMPOLINE(3160) TRAMPOLINE(3161) TRAMPOLINE(3162) TRAMPOLINE(3163) TRAMPOLINE(3164) TRAMPOLINE(3165) TRAMPOLINE(3166) TRAMPOLINE(3167) TRAMPOLINE(3168) TRAMPOLINE(3169) TRAMPOLINE(3170) TRAMPOLINE(3171) TRAMPOLINE(3172) TRAMPOLINE(3173) TRAMPOLINE(3174) TRAMPOLINE(3175) TRAMPOLINE(3176) TRAMPOLINE(3177) TRAMPOLINE(3178) TRAMPOLINE(3179) TRAMPOLINE(3180) TRAMPOLINE(3181) TRAMPOLINE(3182) TRAMPOLINE(3183) TRAMPOLINE(3184) TRAMPOLINE(3185) TRAMPOLINE(3186) TRAMPOLINE(3187) TRAMPOLINE(3188) TRAMPOLINE(3189) TRAMPOLINE(3190) TRAMPOLINE(3191) TRAMPOLINE(3192) TRAMPOLINE(3193) TRAMPOLINE(3194) TRAMPOLINE(3195) TRAMPOLINE(3196) TRAMPOLINE(3197) TRAMPOLINE(3198) TRAMPOLINE(3199) TRAMPOLINE(3200) TRAMPOLINE(3201) TRAMPOLINE(3202) TRAMPOLINE(3203) TRAMPOLINE(3204) TRAMPOLINE(3205) TRAMPOLINE(3206) TRAMPOLINE(3207) TRAMPOLINE(3208) TRAMPOLINE(3209) TRAMPOLINE(3210) TRAMPOLINE(3211) TRAMPOLINE(3212) TRAMPOLINE(3213) TRAMPOLINE(3214) TRAMPOLINE(3215) TRAMPOLINE(3216) TRAMPOLINE(3217) TRAMPOLINE(3218) TRAMPOLINE(3219) TRAMPOLINE(3220) TRAMPOLINE(3221) TRAMPOLINE(3222) TRAMPOLINE(3223) TRAMPOLINE(3224) TRAMPOLINE(3225) TRAMPOLINE(3226) TRAMPOLINE(3227) TRAMPOLINE(3228) TRAMPOLINE(3229) TRAMPOLINE(3230) TRAMPOLINE(3231) TRAMPOLINE(3232) TRAMPOLINE(3233) TRAMPOLINE(3234) TRAMPOLINE(3235) TRAMPOLINE(3236) TRAMPOLINE(3237) TRAMPOLINE(3238) TRAMPOLINE(3239) TRAMPOLINE(3240) TRAMPOLINE(3241) TRAMPOLINE(3242) TRAMPOLINE(3243) TRAMPOLINE(3244) TRAMPOLINE(3245) TRAMPOLINE(3246) TRAMPOLINE(3247) TRAMPOLINE(3248) TRAMPOLINE(3249) TRAMPOLINE(3250) TRAMPOLINE(3251) TRAMPOLINE(3252) TRAMPOLINE(3253) TRAMPOLINE(3254) TRAMPOLINE(3255) TRAMPOLINE(3256) TRAMPOLINE(3257) TRAMPOLINE(3258) TRAMPOLINE(3259) TRAMPOLINE(3260) TRAMPOLINE(3261) TRAMPOLINE(3262) TRAMPOLINE(3263) TRAMPOLINE(3264) TRAMPOLINE(3265) TRAMPOLINE(3266) TRAMPOLINE(3267) TRAMPOLINE(3268) TRAMPOLINE(3269) TRAMPOLINE(3270) TRAMPOLINE(3271) TRAMPOLINE(3272) TRAMPOLINE(3273) TRAMPOLINE(3274) TRAMPOLINE(3275) TRAMPOLINE(3276) TRAMPOLINE(3277) TRAMPOLINE(3278) TRAMPOLINE(3279) TRAMPOLINE(3280) TRAMPOLINE(3281) TRAMPOLINE(3282) TRAMPOLINE(3283) TRAMPOLINE(3284) TRAMPOLINE(3285) TRAMPOLINE(3286) TRAMPOLINE(3287) TRAMPOLINE(3288) TRAMPOLINE(3289) TRAMPOLINE(3290) TRAMPOLINE(3291) TRAMPOLINE(3292) TRAMPOLINE(3293) TRAMPOLINE(3294) TRAMPOLINE(3295) TRAMPOLINE(3296) TRAMPOLINE(3297) TRAMPOLINE(3298) TRAMPOLINE(3299) TRAMPOLINE(3300) TRAMPOLINE(3301) TRAMPOLINE(3302) TRAMPOLINE(3303) TRAMPOLINE(3304) TRAMPOLINE(3305) TRAMPOLINE(3306) TRAMPOLINE(3307) TRAMPOLINE(3308) TRAMPOLINE(3309) TRAMPOLINE(3310) TRAMPOLINE(3311) TRAMPOLINE(3312) TRAMPOLINE(3313) TRAMPOLINE(3314) TRAMPOLINE(3315) TRAMPOLINE(3316) TRAMPOLINE(3317) TRAMPOLINE(3318) TRAMPOLINE(3319) TRAMPOLINE(3320) TRAMPOLINE(3321) TRAMPOLINE(3322) TRAMPOLINE(3323) TRAMPOLINE(3324) TRAMPOLINE(3325) TRAMPOLINE(3326) TRAMPOLINE(3327) TRAMPOLINE(3328) TRAMPOLINE(3329) TRAMPOLINE(3330) TRAMPOLINE(3331) TRAMPOLINE(3332) TRAMPOLINE(3333) TRAMPOLINE(3334) TRAMPOLINE(3335) TRAMPOLINE(3336) TRAMPOLINE(3337) TRAMPOLINE(3338) TRAMPOLINE(3339) TRAMPOLINE(3340) TRAMPOLINE(3341) TRAMPOLINE(3342) TRAMPOLINE(3343) TRAMPOLINE(3344) TRAMPOLINE(3345) TRAMPOLINE(3346) TRAMPOLINE(3347) TRAMPOLINE(3348) TRAMPOLINE(3349) TRAMPOLINE(3350) TRAMPOLINE(3351) TRAMPOLINE(3352) TRAMPOLINE(3353) TRAMPOLINE(3354) TRAMPOLINE(3355) TRAMPOLINE(3356) TRAMPOLINE(3357) TRAMPOLINE(3358) TRAMPOLINE(3359) TRAMPOLINE(3360) TRAMPOLINE(3361) TRAMPOLINE(3362) TRAMPOLINE(3363) TRAMPOLINE(3364) TRAMPOLINE(3365) TRAMPOLINE(3366) TRAMPOLINE(3367) TRAMPOLINE(3368) TRAMPOLINE(3369) TRAMPOLINE(3370) TRAMPOLINE(3371) TRAMPOLINE(3372) TRAMPOLINE(3373) TRAMPOLINE(3374) TRAMPOLINE(3375) TRAMPOLINE(3376) TRAMPOLINE(3377) TRAMPOLINE(3378) TRAMPOLINE(3379) TRAMPOLINE(3380) TRAMPOLINE(3381) TRAMPOLINE(3382) TRAMPOLINE(3383) TRAMPOLINE(3384) TRAMPOLINE(3385) TRAMPOLINE(3386) TRAMPOLINE(3387) TRAMPOLINE(3388) TRAMPOLINE(3389) TRAMPOLINE(3390) TRAMPOLINE(3391) TRAMPOLINE(3392) TRAMPOLINE(3393) TRAMPOLINE(3394) TRAMPOLINE(3395) TRAMPOLINE(3396) TRAMPOLINE(3397) TRAMPOLINE(3398) TRAMPOLINE(3399) TRAMPOLINE(3400) TRAMPOLINE(3401) TRAMPOLINE(3402) TRAMPOLINE(3403) TRAMPOLINE(3404) TRAMPOLINE(3405) TRAMPOLINE(3406) TRAMPOLINE(3407) TRAMPOLINE(3408) TRAMPOLINE(3409) TRAMPOLINE(3410) TRAMPOLINE(3411) TRAMPOLINE(3412) TRAMPOLINE(3413) TRAMPOLINE(3414) TRAMPOLINE(3415) TRAMPOLINE(3416) TRAMPOLINE(3417) TRAMPOLINE(3418) TRAMPOLINE(3419) TRAMPOLINE(3420) TRAMPOLINE(3421) TRAMPOLINE(3422) TRAMPOLINE(3423) TRAMPOLINE(3424) TRAMPOLINE(3425) TRAMPOLINE(3426) TRAMPOLINE(3427) TRAMPOLINE(3428) TRAMPOLINE(3429) TRAMPOLINE(3430) TRAMPOLINE(3431) TRAMPOLINE(3432) TRAMPOLINE(3433) TRAMPOLINE(3434) TRAMPOLINE(3435) TRAMPOLINE(3436) TRAMPOLINE(3437) TRAMPOLINE(3438) TRAMPOLINE(3439) TRAMPOLINE(3440) TRAMPOLINE(3441) TRAMPOLINE(3442) TRAMPOLINE(3443) TRAMPOLINE(3444) TRAMPOLINE(3445) TRAMPOLINE(3446) TRAMPOLINE(3447) TRAMPOLINE(3448) TRAMPOLINE(3449) TRAMPOLINE(3450) TRAMPOLINE(3451) TRAMPOLINE(3452) TRAMPOLINE(3453) TRAMPOLINE(3454) TRAMPOLINE(3455) TRAMPOLINE(3456) TRAMPOLINE(3457) TRAMPOLINE(3458) TRAMPOLINE(3459) TRAMPOLINE(3460) TRAMPOLINE(3461) TRAMPOLINE(3462) TRAMPOLINE(3463) TRAMPOLINE(3464) TRAMPOLINE(3465) TRAMPOLINE(3466) TRAMPOLINE(3467) TRAMPOLINE(3468) TRAMPOLINE(3469) TRAMPOLINE(3470) TRAMPOLINE(3471) TRAMPOLINE(3472) TRAMPOLINE(3473) TRAMPOLINE(3474) TRAMPOLINE(3475) TRAMPOLINE(3476) TRAMPOLINE(3477) TRAMPOLINE(3478) TRAMPOLINE(3479) TRAMPOLINE(3480) TRAMPOLINE(3481) TRAMPOLINE(3482) TRAMPOLINE(3483) TRAMPOLINE(3484) TRAMPOLINE(3485) TRAMPOLINE(3486) TRAMPOLINE(3487) TRAMPOLINE(3488) TRAMPOLINE(3489) TRAMPOLINE(3490) TRAMPOLINE(3491) TRAMPOLINE(3492) TRAMPOLINE(3493) TRAMPOLINE(3494) TRAMPOLINE(3495) TRAMPOLINE(3496) TRAMPOLINE(3497) TRAMPOLINE(3498) TRAMPOLINE(3499) TRAMPOLINE(3500) TRAMPOLINE(3501) TRAMPOLINE(3502) TRAMPOLINE(3503) TRAMPOLINE(3504) TRAMPOLINE(3505) TRAMPOLINE(3506) TRAMPOLINE(3507) TRAMPOLINE(3508) TRAMPOLINE(3509) TRAMPOLINE(3510) TRAMPOLINE(3511) TRAMPOLINE(3512) TRAMPOLINE(3513) TRAMPOLINE(3514) TRAMPOLINE(3515) TRAMPOLINE(3516) TRAMPOLINE(3517) TRAMPOLINE(3518) TRAMPOLINE(3519) TRAMPOLINE(3520) TRAMPOLINE(3521) TRAMPOLINE(3522) TRAMPOLINE(3523) TRAMPOLINE(3524) TRAMPOLINE(3525) TRAMPOLINE(3526) TRAMPOLINE(3527) TRAMPOLINE(3528) TRAMPOLINE(3529) TRAMPOLINE(3530) TRAMPOLINE(3531) TRAMPOLINE(3532) TRAMPOLINE(3533) TRAMPOLINE(3534) TRAMPOLINE(3535) TRAMPOLINE(3536) TRAMPOLINE(3537) TRAMPOLINE(3538) TRAMPOLINE(3539) TRAMPOLINE(3540) TRAMPOLINE(3541) TRAMPOLINE(3542) TRAMPOLINE(3543) TRAMPOLINE(3544) TRAMPOLINE(3545) TRAMPOLINE(3546) TRAMPOLINE(3547) TRAMPOLINE(3548) TRAMPOLINE(3549) TRAMPOLINE(3550) TRAMPOLINE(3551) TRAMPOLINE(3552) TRAMPOLINE(3553) TRAMPOLINE(3554) TRAMPOLINE(3555) TRAMPOLINE(3556) TRAMPOLINE(3557) TRAMPOLINE(3558) TRAMPOLINE(3559) TRAMPOLINE(3560) TRAMPOLINE(3561) TRAMPOLINE(3562) TRAMPOLINE(3563) TRAMPOLINE(3564) TRAMPOLINE(3565) TRAMPOLINE(3566) TRAMPOLINE(3567) TRAMPOLINE(3568) TRAMPOLINE(3569) TRAMPOLINE(3570) TRAMPOLINE(3571) TRAMPOLINE(3572) TRAMPOLINE(3573) TRAMPOLINE(3574) TRAMPOLINE(3575) TRAMPOLINE(3576) TRAMPOLINE(3577) TRAMPOLINE(3578) TRAMPOLINE(3579) TRAMPOLINE(3580) TRAMPOLINE(3581) TRAMPOLINE(3582) TRAMPOLINE(3583) TRAMPOLINE(3584) TRAMPOLINE(3585) TRAMPOLINE(3586) TRAMPOLINE(3587) TRAMPOLINE(3588) TRAMPOLINE(3589) TRAMPOLINE(3590) TRAMPOLINE(3591) TRAMPOLINE(3592) TRAMPOLINE(3593) TRAMPOLINE(3594) TRAMPOLINE(3595) TRAMPOLINE(3596) TRAMPOLINE(3597) TRAMPOLINE(3598) TRAMPOLINE(3599) TRAMPOLINE(3600) TRAMPOLINE(3601) TRAMPOLINE(3602) TRAMPOLINE(3603) TRAMPOLINE(3604) TRAMPOLINE(3605) TRAMPOLINE(3606) TRAMPOLINE(3607) TRAMPOLINE(3608) TRAMPOLINE(3609) TRAMPOLINE(3610) TRAMPOLINE(3611) TRAMPOLINE(3612) TRAMPOLINE(3613) TRAMPOLINE(3614) TRAMPOLINE(3615) TRAMPOLINE(3616) TRAMPOLINE(3617) TRAMPOLINE(3618) TRAMPOLINE(3619) TRAMPOLINE(3620) TRAMPOLINE(3621) TRAMPOLINE(3622) TRAMPOLINE(3623) TRAMPOLINE(3624) TRAMPOLINE(3625) TRAMPOLINE(3626) TRAMPOLINE(3627) TRAMPOLINE(3628) TRAMPOLINE(3629) TRAMPOLINE(3630) TRAMPOLINE(3631) TRAMPOLINE(3632) TRAMPOLINE(3633) TRAMPOLINE(3634) TRAMPOLINE(3635) TRAMPOLINE(3636) TRAMPOLINE(3637) TRAMPOLINE(3638) TRAMPOLINE(3639) TRAMPOLINE(3640) TRAMPOLINE(3641) TRAMPOLINE(3642) TRAMPOLINE(3643) TRAMPOLINE(3644) TRAMPOLINE(3645) TRAMPOLINE(3646) TRAMPOLINE(3647) TRAMPOLINE(3648) TRAMPOLINE(3649) TRAMPOLINE(3650) TRAMPOLINE(3651) TRAMPOLINE(3652) TRAMPOLINE(3653) TRAMPOLINE(3654) TRAMPOLINE(3655) TRAMPOLINE(3656) TRAMPOLINE(3657) TRAMPOLINE(3658) TRAMPOLINE(3659) TRAMPOLINE(3660) TRAMPOLINE(3661) TRAMPOLINE(3662) TRAMPOLINE(3663) TRAMPOLINE(3664) TRAMPOLINE(3665) TRAMPOLINE(3666) TRAMPOLINE(3667) TRAMPOLINE(3668) TRAMPOLINE(3669) TRAMPOLINE(3670) TRAMPOLINE(3671) TRAMPOLINE(3672) TRAMPOLINE(3673) TRAMPOLINE(3674) TRAMPOLINE(3675) TRAMPOLINE(3676) TRAMPOLINE(3677) TRAMPOLINE(3678) TRAMPOLINE(3679) TRAMPOLINE(3680) TRAMPOLINE(3681) TRAMPOLINE(3682) TRAMPOLINE(3683) TRAMPOLINE(3684) TRAMPOLINE(3685) TRAMPOLINE(3686) TRAMPOLINE(3687) TRAMPOLINE(3688) TRAMPOLINE(3689) TRAMPOLINE(3690) TRAMPOLINE(3691) TRAMPOLINE(3692) TRAMPOLINE(3693) TRAMPOLINE(3694) TRAMPOLINE(3695) TRAMPOLINE(3696) TRAMPOLINE(3697) TRAMPOLINE(3698) TRAMPOLINE(3699) TRAMPOLINE(3700) TRAMPOLINE(3701) TRAMPOLINE(3702) TRAMPOLINE(3703) TRAMPOLINE(3704) TRAMPOLINE(3705) TRAMPOLINE(3706) TRAMPOLINE(3707) TRAMPOLINE(3708) TRAMPOLINE(3709) TRAMPOLINE(3710) TRAMPOLINE(3711) TRAMPOLINE(3712) TRAMPOLINE(3713) TRAMPOLINE(3714) TRAMPOLINE(3715) TRAMPOLINE(3716) TRAMPOLINE(3717) TRAMPOLINE(3718) TRAMPOLINE(3719) TRAMPOLINE(3720) TRAMPOLINE(3721) TRAMPOLINE(3722) TRAMPOLINE(3723) TRAMPOLINE(3724) TRAMPOLINE(3725) TRAMPOLINE(3726) TRAMPOLINE(3727) TRAMPOLINE(3728) TRAMPOLINE(3729) TRAMPOLINE(3730) TRAMPOLINE(3731) TRAMPOLINE(3732) TRAMPOLINE(3733) TRAMPOLINE(3734) TRAMPOLINE(3735) TRAMPOLINE(3736) TRAMPOLINE(3737) TRAMPOLINE(3738) TRAMPOLINE(3739) TRAMPOLINE(3740) TRAMPOLINE(3741) TRAMPOLINE(3742) TRAMPOLINE(3743) TRAMPOLINE(3744) TRAMPOLINE(3745) TRAMPOLINE(3746) TRAMPOLINE(3747) TRAMPOLINE(3748) TRAMPOLINE(3749) TRAMPOLINE(3750) TRAMPOLINE(3751) TRAMPOLINE(3752) TRAMPOLINE(3753) TRAMPOLINE(3754) TRAMPOLINE(3755) TRAMPOLINE(3756) TRAMPOLINE(3757) TRAMPOLINE(3758) TRAMPOLINE(3759) TRAMPOLINE(3760) TRAMPOLINE(3761) TRAMPOLINE(3762) TRAMPOLINE(3763) TRAMPOLINE(3764) TRAMPOLINE(3765) TRAMPOLINE(3766) TRAMPOLINE(3767) TRAMPOLINE(3768) TRAMPOLINE(3769) TRAMPOLINE(3770) TRAMPOLINE(3771) TRAMPOLINE(3772) TRAMPOLINE(3773) TRAMPOLINE(3774) TRAMPOLINE(3775) TRAMPOLINE(3776) TRAMPOLINE(3777) TRAMPOLINE(3778) TRAMPOLINE(3779) TRAMPOLINE(3780) TRAMPOLINE(3781) TRAMPOLINE(3782) TRAMPOLINE(3783) TRAMPOLINE(3784) TRAMPOLINE(3785) TRAMPOLINE(3786) TRAMPOLINE(3787) TRAMPOLINE(3788) TRAMPOLINE(3789) TRAMPOLINE(3790) TRAMPOLINE(3791) TRAMPOLINE(3792) TRAMPOLINE(3793) TRAMPOLINE(3794) TRAMPOLINE(3795) TRAMPOLINE(3796) TRAMPOLINE(3797) TRAMPOLINE(3798) TRAMPOLINE(3799) TRAMPOLINE(3800) TRAMPOLINE(3801) TRAMPOLINE(3802) TRAMPOLINE(3803) TRAMPOLINE(3804) TRAMPOLINE(3805) TRAMPOLINE(3806) TRAMPOLINE(3807) TRAMPOLINE(3808) TRAMPOLINE(3809) TRAMPOLINE(3810) TRAMPOLINE(3811) TRAMPOLINE(3812) TRAMPOLINE(3813) TRAMPOLINE(3814) TRAMPOLINE(3815) TRAMPOLINE(3816) TRAMPOLINE(3817) TRAMPOLINE(3818) TRAMPOLINE(3819) TRAMPOLINE(3820) TRAMPOLINE(3821) TRAMPOLINE(3822) TRAMPOLINE(3823) TRAMPOLINE(3824) TRAMPOLINE(3825) TRAMPOLINE(3826) TRAMPOLINE(3827) TRAMPOLINE(3828) TRAMPOLINE(3829) TRAMPOLINE(3830) TRAMPOLINE(3831) TRAMPOLINE(3832) TRAMPOLINE(3833) TRAMPOLINE(3834) TRAMPOLINE(3835) TRAMPOLINE(3836) TRAMPOLINE(3837) TRAMPOLINE(3838) TRAMPOLINE(3839) TRAMPOLINE(3840) TRAMPOLINE(3841) TRAMPOLINE(3842) TRAMPOLINE(3843) TRAMPOLINE(3844) TRAMPOLINE(3845) TRAMPOLINE(3846) TRAMPOLINE(3847) TRAMPOLINE(3848) TRAMPOLINE(3849) TRAMPOLINE(3850) TRAMPOLINE(3851) TRAMPOLINE(3852) TRAMPOLINE(3853) TRAMPOLINE(3854) TRAMPOLINE(3855) TRAMPOLINE(3856) TRAMPOLINE(3857) TRAMPOLINE(3858) TRAMPOLINE(3859) TRAMPOLINE(3860) TRAMPOLINE(3861) TRAMPOLINE(3862) TRAMPOLINE(3863) TRAMPOLINE(3864) TRAMPOLINE(3865) TRAMPOLINE(3866) TRAMPOLINE(3867) TRAMPOLINE(3868) TRAMPOLINE(3869) TRAMPOLINE(3870) TRAMPOLINE(3871) TRAMPOLINE(3872) TRAMPOLINE(3873) TRAMPOLINE(3874) TRAMPOLINE(3875) TRAMPOLINE(3876) TRAMPOLINE(3877) TRAMPOLINE(3878) TRAMPOLINE(3879) TRAMPOLINE(3880) TRAMPOLINE(3881) TRAMPOLINE(3882) TRAMPOLINE(3883) TRAMPOLINE(3884) TRAMPOLINE(3885) TRAMPOLINE(3886) TRAMPOLINE(3887) TRAMPOLINE(3888) TRAMPOLINE(3889) TRAMPOLINE(3890) TRAMPOLINE(3891) TRAMPOLINE(3892) TRAMPOLINE(3893) TRAMPOLINE(3894) TRAMPOLINE(3895) TRAMPOLINE(3896) TRAMPOLINE(3897) TRAMPOLINE(3898) TRAMPOLINE(3899) TRAMPOLINE(3900) TRAMPOLINE(3901) TRAMPOLINE(3902) TRAMPOLINE(3903) TRAMPOLINE(3904) TRAMPOLINE(3905) TRAMPOLINE(3906) TRAMPOLINE(3907) TRAMPOLINE(3908) TRAMPOLINE(3909) TRAMPOLINE(3910) TRAMPOLINE(3911) TRAMPOLINE(3912) TRAMPOLINE(3913) TRAMPOLINE(3914) TRAMPOLINE(3915) TRAMPOLINE(3916) TRAMPOLINE(3917) TRAMPOLINE(3918) TRAMPOLINE(3919) TRAMPOLINE(3920) TRAMPOLINE(3921) TRAMPOLINE(3922) TRAMPOLINE(3923) TRAMPOLINE(3924) TRAMPOLINE(3925) TRAMPOLINE(3926) TRAMPOLINE(3927) TRAMPOLINE(3928) TRAMPOLINE(3929) TRAMPOLINE(3930) TRAMPOLINE(3931) TRAMPOLINE(3932) TRAMPOLINE(3933) TRAMPOLINE(3934) TRAMPOLINE(3935) TRAMPOLINE(3936) TRAMPOLINE(3937) TRAMPOLINE(3938) TRAMPOLINE(3939) TRAMPOLINE(3940) TRAMPOLINE(3941) TRAMPOLINE(3942) TRAMPOLINE(3943) TRAMPOLINE(3944) TRAMPOLINE(3945) TRAMPOLINE(3946) TRAMPOLINE(3947) TRAMPOLINE(3948) TRAMPOLINE(3949) TRAMPOLINE(3950) TRAMPOLINE(3951) TRAMPOLINE(3952) TRAMPOLINE(3953) TRAMPOLINE(3954) TRAMPOLINE(3955) TRAMPOLINE(3956) TRAMPOLINE(3957) TRAMPOLINE(3958) TRAMPOLINE(3959) TRAMPOLINE(3960) TRAMPOLINE(3961) TRAMPOLINE(3962) TRAMPOLINE(3963) TRAMPOLINE(3964) TRAMPOLINE(3965) TRAMPOLINE(3966) TRAMPOLINE(3967) TRAMPOLINE(3968) TRAMPOLINE(3969) TRAMPOLINE(3970) TRAMPOLINE(3971) TRAMPOLINE(3972) TRAMPOLINE(3973) TRAMPOLINE(3974) TRAMPOLINE(3975) TRAMPOLINE(3976) TRAMPOLINE(3977) TRAMPOLINE(3978) TRAMPOLINE(3979) TRAMPOLINE(3980) TRAMPOLINE(3981) TRAMPOLINE(3982) TRAMPOLINE(3983) TRAMPOLINE(3984) TRAMPOLINE(3985) TRAMPOLINE(3986) TRAMPOLINE(3987) TRAMPOLINE(3988) TRAMPOLINE(3989) TRAMPOLINE(3990) TRAMPOLINE(3991) TRAMPOLINE(3992) TRAMPOLINE(3993) TRAMPOLINE(3994) TRAMPOLINE(3995) TRAMPOLINE(3996) TRAMPOLINE(3997) TRAMPOLINE(3998) TRAMPOLINE(3999) TRAMPOLINE(4000) TRAMPOLINE(4001) TRAMPOLINE(4002) TRAMPOLINE(4003) TRAMPOLINE(4004) TRAMPOLINE(4005) TRAMPOLINE(4006) TRAMPOLINE(4007) TRAMPOLINE(4008) TRAMPOLINE(4009) TRAMPOLINE(4010) TRAMPOLINE(4011) TRAMPOLINE(4012) TRAMPOLINE(4013) TRAMPOLINE(4014) TRAMPOLINE(4015) TRAMPOLINE(4016) TRAMPOLINE(4017) TRAMPOLINE(4018) TRAMPOLINE(4019) TRAMPOLINE(4020) TRAMPOLINE(4021) TRAMPOLINE(4022) TRAMPOLINE(4023) TRAMPOLINE(4024) TRAMPOLINE(4025) TRAMPOLINE(4026) TRAMPOLINE(4027) TRAMPOLINE(4028) TRAMPOLINE(4029) TRAMPOLINE(4030) TRAMPOLINE(4031) TRAMPOLINE(4032) TRAMPOLINE(4033) TRAMPOLINE(4034) TRAMPOLINE(4035) TRAMPOLINE(4036) TRAMPOLINE(4037) TRAMPOLINE(4038) TRAMPOLINE(4039) TRAMPOLINE(4040) TRAMPOLINE(4041) TRAMPOLINE(4042) TRAMPOLINE(4043) TRAMPOLINE(4044) TRAMPOLINE(4045) TRAMPOLINE(4046) TRAMPOLINE(4047) TRAMPOLINE(4048) TRAMPOLINE(4049) TRAMPOLINE(4050) TRAMPOLINE(4051) TRAMPOLINE(4052) TRAMPOLINE(4053) TRAMPOLINE(4054) TRAMPOLINE(4055) TRAMPOLINE(4056) TRAMPOLINE(4057) TRAMPOLINE(4058) TRAMPOLINE(4059) TRAMPOLINE(4060) TRAMPOLINE(4061) TRAMPOLINE(4062) TRAMPOLINE(4063) TRAMPOLINE(4064) TRAMPOLINE(4065) TRAMPOLINE(4066) TRAMPOLINE(4067) TRAMPOLINE(4068) TRAMPOLINE(4069) TRAMPOLINE(4070) TRAMPOLINE(4071) TRAMPOLINE(4072) TRAMPOLINE(4073) TRAMPOLINE(4074) TRAMPOLINE(4075) TRAMPOLINE(4076) TRAMPOLINE(4077) TRAMPOLINE(4078) TRAMPOLINE(4079) TRAMPOLINE(4080) TRAMPOLINE(4081) TRAMPOLINE(4082) TRAMPOLINE(4083) TRAMPOLINE(4084) TRAMPOLINE(4085) TRAMPOLINE(4086) TRAMPOLINE(4087) TRAMPOLINE(4088) TRAMPOLINE(4089) TRAMPOLINE(4090) TRAMPOLINE(4091) TRAMPOLINE(4092) TRAMPOLINE(4093) TRAMPOLINE(4094) TRAMPOLINE(4095) } #endif /* call function with 1st 6 args */ i = ({ register __avrword iret __asm__("%o0"); iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5]); asm ("nop"); /* struct returning functions skip this instruction */ iret; }); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = o1; } else if (l->rtype == __AVfloat) { /* old Sun cc returns floats as doubles */ if (l->flags & __AV_SUNCC_FLOAT_RETURN) { RETURN(float, (float)dret); } else { RETURN(float, fret); } } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_SMALL_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { RETURN(char, i); } else if (l->rsize == sizeof(short)) { RETURN(short, i); } else if (l->rsize == sizeof(int)) { RETURN(int, i); } } } return 0; } libffcall-2.5/avcall/avcall-riscv32.c0000664000000000000000000002456614662613003014346 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for a Linux riscv32 with ILP32 ABI. This calls a C function with an argument list built up using macros defined in avcall.h. RISC-V Argument Passing Conventions are documented in https://people.eecs.berkeley.edu/~krste/papers/riscv-spec-v2.1.pdf chapter 20. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avrword iarg1 __asm__("a0"); register __avrword iarg2 __asm__("a1"); register __avrword iarg3 __asm__("a2"); register __avrword iarg4 __asm__("a3"); register __avrword iarg5 __asm__("a4"); register __avrword iarg6 __asm__("a5"); register __avrword iarg7 __asm__("a6"); register __avrword iarg8 __asm__("a7"); register float farg1 __asm__("fa0"); register float farg2 __asm__("fa1"); register float farg3 __asm__("fa2"); register float farg4 __asm__("fa3"); register float farg5 __asm__("fa4"); register float farg6 __asm__("fa5"); register float farg7 __asm__("fa6"); register float farg8 __asm__("fa7"); register double darg1 __asm__("fa0"); register double darg2 __asm__("fa1"); register double darg3 __asm__("fa2"); register double darg4 __asm__("fa3"); register double darg5 __asm__("fa4"); register double darg6 __asm__("fa5"); register double darg7 __asm__("fa6"); register double darg8 __asm__("fa7"); int avcall_call(av_alist* list) { register __avrword iretreg __asm__("a0"); register __avrword iret2reg __asm__("a1"); register double dret __asm__("fa0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int fanum = l->fanum; { int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i-8] = l->args[i]; } /* Put up to 8 integer args into registers. */ if (arglen >= 1) { iarg1 = l->args[0]; if (arglen >= 2) { iarg2 = l->args[1]; if (arglen >= 3) { iarg3 = l->args[2]; if (arglen >= 4) { iarg4 = l->args[3]; if (arglen >= 5) { iarg5 = l->args[4]; if (arglen >= 6) { iarg6 = l->args[5]; if (arglen >= 7) { iarg7 = l->args[6]; if (arglen >= 8) { iarg8 = l->args[7]; } } } } } } } } /* Put upto 8 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; if (fanum >= 3) { if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2]; else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2]; if (fanum >= 4) { if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3]; else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3]; if (fanum >= 5) { if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4]; else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4]; if (fanum >= 6) { if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5]; else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5]; if (fanum >= 7) { if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6]; else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6]; if (fanum >= 8) { if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7]; else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7]; } } } } } } } } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { __avrword iret, iret2; iret = (*l->func)(); iret2 = iret2reg; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = iret; ((__avrword*)raddr)[1] = iret2; } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_SMALL_STRUCT_RETURN) { /* Return structs of size <= 8 in registers. */ if (l->rsize > 0 && l->rsize <= 8) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize >= 4 && l->rsize <= 8) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); if (l->rsize == 4) { } else if (l->rsize == 5) { ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2); } else if (l->rsize == 6) { ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 7) { ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[4+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 8) { ((unsigned char *)raddr)[4+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[4+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[4+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[4+3] = (unsigned char)(iret2>>24); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-x86_64-linux.s0000664000000000000000000002352114662622067015166 00000000000000 .file "avcall-x86_64.c" .text .p2align 4,,15 .globl avcall_call .type avcall_call, @function avcall_call: .LFB2: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: pushq %r13 .LCFI2: pushq %r12 .LCFI3: pushq %rbx .LCFI4: movq %rdi, %rbx leaq 128(%rbx), %rdx subq $2072, %rsp .LCFI5: movq 40(%rdi), %rax movq 48(%rdi), %r8 leaq 15(%rsp), %rsi subq %r8, %rax andq $-16, %rsi movq %rax, %rdi movq 120(%rbx), %rax shrq $3, %rdi subq %rdx, %rax movq %rax, %r9 shrq $3, %r9 testl %edi, %edi jle .L2 xorl %ecx, %ecx xorl %edx, %edx .p2align 4,,7 .L4: movq (%rdx,%r8), %rax incl %ecx movq %rax, (%rsi,%rdx) addq $8, %rdx cmpl %ecx, %edi jne .L4 .L2: movl 24(%rbx), %eax cmpl $13, %eax je .L124 cmpl $14, %eax je .L125 cmpl $7, %r9d movq 8(%rbx), %r12 jle .L58 movlpd 184(%rbx), %xmm10 .L60: movq 176(%rbx), %r9 .L63: movq 168(%rbx), %r11 .L66: movq 160(%rbx), %r10 .L69: movlpd 152(%rbx), %xmm8 .L72: movq 144(%rbx), %rax .L75: movq 136(%rbx), %r8 .L78: movlpd 128(%rbx), %xmm9 .L81: movq 88(%rbx), %rdx movq 96(%rbx), %rcx movsd %xmm10, %xmm7 movq 80(%rbx), %rsi movq 72(%rbx), %rdi movsd %xmm8, %xmm3 movq %r9, -32(%rbp) movsd %xmm9, %xmm0 movlpd -32(%rbp), %xmm6 movq %r11, -32(%rbp) movlpd -32(%rbp), %xmm5 movq %r10, -32(%rbp) movlpd -32(%rbp), %xmm4 movq %rax, -32(%rbp) movl $8, %eax movlpd -32(%rbp), %xmm2 movq %r8, -32(%rbp) movlpd -32(%rbp), %xmm1 movq 112(%rbx), %r9 movq 104(%rbx), %r8 call *%r12 movq %rax, %r8 movl 24(%rbx), %eax movq %rdx, %r9 cmpl $1, %eax je .L31 cmpl $2, %eax je .L119 cmpl $3, %eax je .L119 cmpl $4, %eax .p2align 4,,5 je .L119 cmpl $5, %eax .p2align 4,,5 je .L120 cmpl $6, %eax .p2align 4,,5 je .L120 cmpl $7, %eax .p2align 4,,5 je .L121 cmpl $8, %eax .p2align 4,,5 je .L121 cmpl $9, %eax .p2align 4,,5 je .L122 cmpl $10, %eax .p2align 4,,5 je .L122 cmpl $11, %eax .p2align 4,,5 je .L122 cmpl $12, %eax .p2align 4,,5 je .L122 cmpl $15, %eax .p2align 4,,5 je .L122 cmpl $16, %eax .p2align 4,,5 jne .L31 testb $2, 1(%rbx) .p2align 4,,5 je .L31 movq 32(%rbx), %rdx leaq -1(%rdx), %rax cmpq $15, %rax ja .L31 movq 16(%rbx), %rax movq %rax, %r10 movq %rax, %rdi andl $7, %edi andq $-8, %r10 cmpq $8, %rdx leaq (%rdx,%rdi), %r11 ja .L110 cmpq $8, %r11 ja .L112 leal -1(,%r11,8), %ecx movq (%r10), %rsi sall $3, %edi movl $2, %edx movl $1, %eax salq %cl, %rdx movl %edi, %ecx salq %cl, %rax salq %cl, %r8 xorq %rsi, %r8 subq %rax, %rdx andq %r8, %rdx xorq %rdx, %rsi movq %rsi, (%r10) jmp .L31 .p2align 4,,7 .L58: je .L126 cmpl $5, %r9d jle .L64 xorl %r9d, %r9d movq %r9, -32(%rbp) movlpd -32(%rbp), %xmm10 .p2align 4,,3 jmp .L63 .L119: movq 16(%rbx), %rax movb %r8b, (%rax) .L31: leaq -24(%rbp), %rsp xorl %eax, %eax popq %rbx popq %r12 popq %r13 leave ret .L124: cmpl $7, %r9d movq 16(%rbx), %r13 movq 8(%rbx), %r12 jle .L7 movlpd 184(%rbx), %xmm10 .L9: movq 176(%rbx), %r9 .L12: movq 168(%rbx), %r11 .L15: movq 160(%rbx), %r10 .L18: movlpd 152(%rbx), %xmm8 .L21: movq 144(%rbx), %rax .L24: movq 136(%rbx), %r8 .L27: movlpd 128(%rbx), %xmm9 .L30: movq 96(%rbx), %rcx movq 88(%rbx), %rdx movsd %xmm10, %xmm7 movq 80(%rbx), %rsi movq 72(%rbx), %rdi movsd %xmm8, %xmm3 movq %r9, -32(%rbp) movsd %xmm9, %xmm0 movlpd -32(%rbp), %xmm6 movq %r11, -32(%rbp) movlpd -32(%rbp), %xmm5 movq %r10, -32(%rbp) movlpd -32(%rbp), %xmm4 movq %rax, -32(%rbp) movl $8, %eax movlpd -32(%rbp), %xmm2 movq %r8, -32(%rbp) movlpd -32(%rbp), %xmm1 movq 112(%rbx), %r9 movq 104(%rbx), %r8 call *%r12 movss %xmm0, (%r13) leaq -24(%rbp), %rsp xorl %eax, %eax popq %rbx popq %r12 popq %r13 leave ret .L125: cmpl $7, %r9d movq 16(%rbx), %r13 movq 8(%rbx), %r12 jle .L34 movlpd 184(%rbx), %xmm10 .L36: movq 176(%rbx), %r10 .L39: movq 168(%rbx), %r11 .L42: movq 160(%rbx), %r9 .L45: movlpd 152(%rbx), %xmm8 .L48: movq 144(%rbx), %rax .L51: movq 136(%rbx), %r8 .L54: movlpd 128(%rbx), %xmm9 .L57: movq 96(%rbx), %rcx movq 88(%rbx), %rdx movsd %xmm10, %xmm7 movq 80(%rbx), %rsi movq 72(%rbx), %rdi movsd %xmm8, %xmm3 movq %r10, -32(%rbp) movsd %xmm9, %xmm0 movlpd -32(%rbp), %xmm6 movq %r11, -32(%rbp) movlpd -32(%rbp), %xmm5 movq %r9, -32(%rbp) movlpd -32(%rbp), %xmm4 movq %rax, -32(%rbp) movl $8, %eax movlpd -32(%rbp), %xmm2 movq %r8, -32(%rbp) movlpd -32(%rbp), %xmm1 movq 112(%rbx), %r9 movq 104(%rbx), %r8 call *%r12 movsd %xmm0, (%r13) leaq -24(%rbp), %rsp xorl %eax, %eax popq %rbx popq %r12 popq %r13 leave ret .L7: jne .L10 xorpd %xmm10, %xmm10 jmp .L9 .L126: xorpd %xmm10, %xmm10 .p2align 4,,7 jmp .L60 .L34: .p2align 4,,7 jne .L37 xorpd %xmm10, %xmm10 .p2align 4,,7 jmp .L36 .L120: movq 16(%rbx), %rax movw %r8w, (%rax) .p2align 4,,5 jmp .L31 .L10: cmpl $5, %r9d .p2align 4,,3 jg .L127 .p2align 4,,5 jne .L16 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r11 movlpd -32(%rbp), %xmm10 jmp .L15 .L64: .p2align 4,,3 je .L128 cmpl $3, %r9d jle .L70 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 jmp .L69 .L37: cmpl $5, %r9d jg .L129 jne .L43 xorl %r10d, %r10d movq %r10, -32(%rbp) movq %r10, %r11 movlpd -32(%rbp), %xmm10 jmp .L42 .L127: xorl %r9d, %r9d movq %r9, -32(%rbp) movlpd -32(%rbp), %xmm10 jmp .L12 .L128: xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r11 movlpd -32(%rbp), %xmm10 jmp .L66 .L129: xorl %r10d, %r10d movq %r10, -32(%rbp) movlpd -32(%rbp), %xmm10 jmp .L39 .L121: movq 16(%rbx), %rax movl %r8d, (%rax) jmp .L31 .L122: movq 16(%rbx), %rax movq %r8, (%rax) jmp .L31 .L16: cmpl $3, %r9d jle .L19 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 jmp .L18 .L70: jne .L73 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movsd %xmm10, %xmm8 jmp .L72 .L43: cmpl $3, %r9d jle .L46 xorl %r10d, %r10d movq %r10, -32(%rbp) movq %r10, %r9 movq %r10, %r11 movlpd -32(%rbp), %xmm10 jmp .L45 .L19: jne .L22 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movsd %xmm10, %xmm8 jmp .L21 .L73: cmpl $1, %r9d jle .L76 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movq %r9, %rax movsd %xmm10, %xmm8 jmp .L75 .L46: jne .L49 xorl %r10d, %r10d movq %r10, -32(%rbp) movq %r10, %r9 movq %r10, %r11 movlpd -32(%rbp), %xmm10 movsd %xmm10, %xmm8 jmp .L48 .L22: cmpl $1, %r9d jle .L25 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movq %r9, %rax movsd %xmm10, %xmm8 jmp .L24 .L49: cmpl $1, %r9d jle .L52 xorl %r10d, %r10d movq %r10, -32(%rbp) movq %r10, %r9 movq %r10, %r11 movlpd -32(%rbp), %xmm10 movq %r10, %rax movsd %xmm10, %xmm8 jmp .L51 .L76: jne .L130 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movq %r9, %rax movq %r9, %r8 movsd %xmm10, %xmm8 jmp .L78 .L25: jne .L131 xorl %r9d, %r9d movq %r9, -32(%rbp) movq %r9, %r10 movq %r9, %r11 movlpd -32(%rbp), %xmm10 movq %r9, %rax movq %r9, %r8 movsd %xmm10, %xmm8 jmp .L27 .L110: leaq 0(,%rdi,8), %r12 movq (%r10), %rsi movq %r8, %rax movq $-1, %rdx movl %r12d, %ecx salq %cl, %rax salq %cl, %rdx xorq %rsi, %rax andq %rax, %rdx xorq %rdx, %rsi cmpq $16, %r11 movq %rsi, (%r10) ja .L114 leaq 0(,%rdi,4), %rax leal -65(,%r11,8), %edx movl $32, %edi movq 8(%r10), %rsi subl %eax, %edi movl %edx, %ecx movl $2, %eax salq %cl, %rax movl %edi, %ecx sarq %cl, %r8 decq %rax sarq %cl, %r8 movl %r12d, %ecx salq %cl, %r9 orq %r9, %r8 xorq %rsi, %r8 andq %r8, %rax xorq %rax, %rsi movq %rsi, 8(%r10) jmp .L31 .L112: leaq 0(,%rdi,8), %rsi movq (%r10), %rdx movq %r8, %rbx movq $-1, %rax movl %esi, %ecx salq %cl, %rbx salq %cl, %rax movq %rbx, %rcx xorq %rdx, %rcx andq %rcx, %rax leal -65(,%r11,8), %ecx xorq %rax, %rdx movl $2, %eax salq %cl, %rax movq %rdx, (%r10) movl $64, %ecx movq 8(%r10), %rdx subl %esi, %ecx decq %rax sarq %cl, %r8 xorq %rdx, %r8 andq %r8, %rax xorq %rax, %rdx movq %rdx, 8(%r10) jmp .L31 .L52: jne .L132 xorl %r10d, %r10d movq %r10, -32(%rbp) movq %r10, %r9 movq %r10, %r11 movlpd -32(%rbp), %xmm10 movq %r10, %rax movq %r10, %r8 movsd %xmm10, %xmm8 jmp .L54 .L130: xorpd %xmm9, %xmm9 movsd %xmm9, -32(%rbp) movq -32(%rbp), %r9 movsd %xmm9, %xmm10 movsd %xmm9, %xmm8 movq %r9, %r11 movq %r9, %r10 movq %r9, %rax movq %r9, %r8 jmp .L81 .L114: movl $64, %esi movq %r9, %rax movq 16(%r10), %rdx subl %r12d, %esi movl %esi, %ecx sarq %cl, %r8 movl %r12d, %ecx salq %cl, %rax leal -129(,%r11,8), %ecx orq %r8, %rax movq %rax, 8(%r10) movl $2, %eax salq %cl, %rax movl %esi, %ecx sarq %cl, %r9 decq %rax xorq %rdx, %r9 andq %r9, %rax xorq %rax, %rdx movq %rdx, 16(%r10) jmp .L31 .L131: xorpd %xmm9, %xmm9 movsd %xmm9, -32(%rbp) movq -32(%rbp), %r9 movsd %xmm9, %xmm10 movsd %xmm9, %xmm8 movq %r9, %r11 movq %r9, %r10 movq %r9, %rax movq %r9, %r8 jmp .L30 .L132: xorpd %xmm9, %xmm9 movsd %xmm9, -32(%rbp) movq -32(%rbp), %r10 movsd %xmm9, %xmm10 movsd %xmm9, %xmm8 movq %r10, %r11 movq %r10, %r9 movq %r10, %rax movq %r10, %r8 jmp .L57 .LFE2: .size avcall_call, .-avcall_call .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0x0 .byte 0x1 .string "zR" .uleb128 0x1 .sleb128 -8 .byte 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB2-. .long .LFE2-.LFB2 .uleb128 0x0 .byte 0x4 .long .LCFI0-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI4-.LCFI1 .byte 0x83 .uleb128 0x5 .byte 0x8c .uleb128 0x4 .byte 0x8d .uleb128 0x3 .align 8 .LEFDE1: .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/avcall/avcall-m68k.mit.S0000664000000000000000000000437114662622065014410 00000000000000#include "asm-m68k.h" .text .even .globl C(avcall_call) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) link $a6,#0 moveml #0x3820,$sp@- movel $a6@(8),$a2 lea $sp@(-1024),$sp movel $a2@(24),$d1 movel $a2@(20),$d0 subl $d1,$d0 asrl #2,$d0 jle L(52) movel $sp,$a1 movel $d1,$a0 movel $d0,$d2 .even L(6): movel $a0@+,$a1@+ subql #1,$d2 jne L(6) L(52): moveq #16,$d0 cmpl $a2@(12),$d0 jeq L(57) L(7): movel $a2@(4),$a0 jsr $a0@ movel $d0,$d2 movel $d1,$d3 movel $a2@(12),$a1 moveq #1,$d1 cmpl $a1,$d1 jeq L(9) moveq #2,$d4 cmpl $a1,$d4 jeq L(56) moveq #3,$d4 cmpl $a1,$d4 jeq L(56) moveq #4,$d4 cmpl $a1,$d4 jeq L(56) moveq #5,$d4 cmpl $a1,$d4 jeq L(55) moveq #6,$d4 cmpl $a1,$d4 jeq L(55) moveq #7,$d4 cmpl $a1,$d4 jeq L(53) moveq #8,$d4 cmpl $a1,$d4 jeq L(53) moveq #9,$d4 cmpl $a1,$d4 jeq L(53) moveq #10,$d4 cmpl $a1,$d4 jeq L(53) lea $a1@(-11),$a0 moveq #1,$d4 cmpl $a0,$d4 jcc L(54) moveq #13,$d4 cmpl $a1,$d4 jeq L(58) moveq #14,$d4 cmpl $a1,$d4 jeq L(59) moveq #15,$d0 cmpl $a1,$d0 jeq L(53) moveq #16,$d1 cmpl $a1,$d1 jne L(9) btst #1,$a2@(2) jeq L(9) movel $a2@(16),$d0 moveq #1,$d4 cmpl $d0,$d4 jeq L(56) moveq #2,$d1 cmpl $d0,$d1 jeq L(55) moveq #4,$d4 cmpl $d0,$d4 jeq L(53) moveq #8,$d1 cmpl $d0,$d1 jne L(9) L(54): movel $a2@(8),$a0 movel $d2,$a0@ movel $d3,$a0@(4) jra L(9) .even L(53): movel $a2@(8),$a0 movel $d2,$a0@ jra L(9) .even L(55): movel $a2@(8),$a0 movew $d2,$a0@ jra L(9) .even L(56): movel $a2@(8),$a0 moveb $d2,$a0@ jra L(9) .even L(59): btst #6,$a2@(3) jeq L(37) movel $a2@(8),$a0 fmoved $fp0,$a0@ jra L(9) .even L(37): movel $a2@(8),$a0 movel $d0,$a0@ movel $d1,$a0@(4) jra L(9) .even L(58): movel $a2@,$d2 btst #6,$d2 jeq L(31) movel $a2@(8),$a0 fmoves $fp0,$a0@ jra L(9) .even L(31): btst #5,$d2 jeq L(33) movel $a2@(8),$a0 movel $d1,$sp@- movel $d0,$sp@- fmoved $sp@+,$fp0 fmoves $fp0,$a0@ jra L(9) .even L(33): movel $a2@(8),$a0 movel $d0,$a0@ jra L(9) .even L(57): movel $a2@(8),$a1 jra L(7) .even L(9): clrl $d0 moveml $a6@(-16),#0x41c unlk $a6 rts FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-libapi.c0000664000000000000000000000513014662613003014275 00000000000000/* * Copyright 2017-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include "avcall-internal.h" /* This is the implementation of the library API. The symbols that the linker sees are all prefixed with 'avcall_', to avoid potential collisions with other libraries. */ int avcall_overflown (av_alist* list) { return _av_overflown(AV_LIST_INNER(list)); } void avcall_start (av_alist* list, __avword* list_args, __avword* list_args_end, __avrword(*func)(), void* raddr, int rettype, int flags) { __av_start(AV_LIST_INNER(list),list_args,list_args_end,func,raddr,rettype,flags); } void avcall_start_struct (av_alist* list, __avword* list_args, __avword* list_args_end, __avrword(*func)(), size_t type_size, int type_splittable, void* raddr, int flags) { __av_start_struct(AV_LIST_INNER(list),list_args,list_args_end,func,type_size,type_splittable,raddr,flags); } int avcall_arg_int (av_alist* list, int val) { return __av_int(AV_LIST_INNER(list),val); } int avcall_arg_uint (av_alist* list, unsigned int val) { return __av_uint(AV_LIST_INNER(list),val); } int avcall_arg_long (av_alist* list, long val) { return __av_long(AV_LIST_INNER(list),val); } int avcall_arg_ulong (av_alist* list, unsigned long val) { return __av_ulong(AV_LIST_INNER(list),val); } int avcall_arg_ptr (av_alist* list, void* val) { return __av_ptr(AV_LIST_INNER(list),val); } int avcall_arg_longlong (av_alist* list, long long val) { return __av_longlong(AV_LIST_INNER(list),val); } int avcall_arg_ulonglong (av_alist* list, unsigned long long val) { return __av_ulonglong(AV_LIST_INNER(list),val); } int avcall_arg_float (av_alist* list, float val) { return _av_float(AV_LIST_INNER(list),val); } int avcall_arg_double (av_alist* list, double val) { return _av_double(AV_LIST_INNER(list),val); } int avcall_arg_struct (av_alist* list, size_t type_size, size_t type_align, const void* val_addr) { return __av_struct(AV_LIST_INNER(list),type_size,type_align,val_addr); } libffcall-2.5/avcall/avcall-mipseb-linux.s0000664000000000000000000001073714662622065015512 00000000000000 .file 1 "avcall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,40,$31 # vars= 0, regs= 3/0, args= 16, gp= 8 .mask 0xc0010000,-4 .fmask 0x00000000,0 lw $6,40($4) lw $5,20($4) lw $8,24($4) addiu $sp,$sp,-40 andi $2,$6,0x1 sw $fp,32($sp) sw $16,28($sp) move $fp,$sp sw $31,36($sp) move $16,$4 addiu $sp,$sp,-1032 subu $4,$5,$8 move $3,$sp .set noreorder .set nomacro beq $2,$0,$L2 sra $4,$4,2 .set macro .set reorder #APP # 76 "avcall-mips.c" 1 l.s $f12,48($16) # 0 "" 2 #NO_APP $L2: lw $2,44($16) andi $7,$2,0x1 .set noreorder .set nomacro beql $7,$0,$L54 andi $6,$6,0x2 .set macro .set reorder #APP # 78 "avcall-mips.c" 1 l.d $f12,56($16) # 0 "" 2 #NO_APP andi $6,$6,0x2 $L54: .set noreorder .set nomacro beql $6,$0,$L55 andi $2,$2,0x2 .set macro .set reorder #APP # 80 "avcall-mips.c" 1 l.s $f14,52($16) # 0 "" 2 #NO_APP andi $2,$2,0x2 $L55: .set noreorder .set nomacro beql $2,$0,$L56 slt $4,$4,5 .set macro .set reorder #APP # 82 "avcall-mips.c" 1 l.d $f14,64($16) # 0 "" 2 #NO_APP slt $4,$4,5 $L56: addiu $2,$8,16 .set noreorder .set nomacro bne $4,$0,$L10 addiu $3,$3,16 .set macro .set reorder $L36: lw $4,0($2) addiu $3,$3,4 addiu $2,$2,4 .set noreorder .set nomacro bne $5,$2,$L36 sw $4,-4($3) .set macro .set reorder $L10: lw $5,4($8) lw $4,0($8) lw $25,4($16) lw $7,12($8) .set noreorder .set nomacro jalr $25 lw $6,8($8) .set macro .set reorder lw $4,12($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,$L7 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 addiu $5,$4,-11 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bnel $5,$0,$L51 lw $4,8($16) .set macro .set reorder li $3,13 # 0xd .set noreorder .set nomacro beq $4,$3,$L52 li $3,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L53 li $3,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L49 li $3,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$3,$L57 move $sp,$fp .set macro .set reorder lw $3,0($16) andi $3,$3,0x2 .set noreorder .set nomacro beq $3,$0,$L7 li $4,1 # 0x1 .set macro .set reorder lw $3,16($16) .set noreorder .set nomacro beq $3,$4,$L47 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,$L48 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,$L58 lw $3,8($16) .set macro .set reorder $L7: move $sp,$fp $L57: lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L47: lw $3,8($16) sb $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L49: lw $3,8($16) $L58: sw $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L48: lw $3,8($16) sh $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L51: sw $2,0($4) .set noreorder .set nomacro b $L7 sw $3,4($4) .set macro .set reorder $L52: lw $2,8($16) .set noreorder .set nomacro b $L7 swc1 $f0,0($2) .set macro .set reorder $L53: lw $2,8($16) .set noreorder .set nomacro b $L7 sdc1 $f0,0($2) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/avcall-mipsel-macro.S0000664000000000000000000001013614662622065015417 00000000000000#include "asm-mips.h" .file 1 "avcall-mips.c" .text .align 2 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,40,$31 .mask 0xc0010000,-4 .fmask 0x00000000,0 lw $6,40($4) lw $5,20($4) lw $8,24($4) addiu $sp,$sp,-40 andi $2,$6,0x1 sw $fp,32($sp) sw $16,28($sp) move $fp,$sp sw $31,36($sp) move $16,$4 addiu $sp,$sp,-1032 subu $4,$5,$8 move $3,$sp .set noreorder .set nomacro beq $2,$0,$L2 sra $4,$4,2 .set macro .set reorder l.s $f12,48($16) $L2: lw $2,44($16) andi $7,$2,0x1 .set noreorder .set nomacro beql $7,$0,$L54 andi $6,$6,0x2 .set macro .set reorder l.d $f12,56($16) andi $6,$6,0x2 $L54: .set noreorder .set nomacro beql $6,$0,$L55 andi $2,$2,0x2 .set macro .set reorder l.s $f14,52($16) andi $2,$2,0x2 $L55: .set noreorder .set nomacro beql $2,$0,$L56 slt $4,$4,5 .set macro .set reorder l.d $f14,64($16) slt $4,$4,5 $L56: addiu $2,$8,16 .set noreorder .set nomacro bne $4,$0,$L10 addiu $3,$3,16 .set macro .set reorder $L36: lw $4,0($2) addiu $3,$3,4 addiu $2,$2,4 .set noreorder .set nomacro bne $5,$2,$L36 sw $4,-4($3) .set macro .set reorder $L10: lw $5,4($8) lw $4,0($8) lw $25,4($16) lw $7,12($8) .set noreorder .set nomacro jalr $25 lw $6,8($8) .set macro .set reorder lw $4,12($16) li $5,1 .set noreorder .set nomacro beq $4,$5,$L7 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 addiu $5,$4,-11 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bnel $5,$0,$L51 lw $4,8($16) .set macro .set reorder li $3,13 .set noreorder .set nomacro beq $4,$3,$L52 li $3,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L53 li $3,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L49 li $3,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$3,$L57 move $sp,$fp .set macro .set reorder lw $3,0($16) andi $3,$3,0x2 .set noreorder .set nomacro beq $3,$0,$L7 li $4,1 .set macro .set reorder lw $3,16($16) .set noreorder .set nomacro beq $3,$4,$L47 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,$L48 li $4,4 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,$L58 lw $3,8($16) .set macro .set reorder $L7: move $sp,$fp $L57: lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L47: lw $3,8($16) sb $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L49: lw $3,8($16) $L58: sw $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L48: lw $3,8($16) sh $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L51: sw $2,0($4) .set noreorder .set nomacro b $L7 sw $3,4($4) .set macro .set reorder $L52: lw $2,8($16) .set noreorder .set nomacro b $L7 swc1 $f0,0($2) .set macro .set reorder $L53: lw $2,8($16) .set noreorder .set nomacro b $L7 sdc1 $f0,0($2) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-ia64-macro.S0000664000000000000000000003417514662703327014703 00000000000000 .file "avcall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .global avcall_call# .proc avcall_call# avcall_call: .prologue 14, 34 .mmi .save ar.pfs, r35 alloc r35 = ar.pfs, 1, 6, 8, 0 adds r14 = 40, r32 adds r20 = 48, r32 .mmi adds r16 = 64, r32 .vframe r36 mov r36 = r12 adds r21 = 72, r32 ;; .mmb ld8 r15 = [r14] ld8 r17 = [r20] nop 0 .mii adds r12 = -2064, r12 .save ar.lc, r38 mov r38 = ar.lc mov r37 = r1 ;; .mmb sub r15 = r15, r17 ld8 r14 = [r16] nop 0 .mii adds r19 = 16, r12 .save rp, r34 mov r34 = b0 .body ;; shr.u r15 = r15, 3 .mmi sub r14 = r14, r21 ;; nop 0 shr.u r18 = r14, 3 .mmb nop 0 cmp4.ge p6, p7 = 8, r15 (p6) br.cond.dptk .L2 .mii sub r14 = 8, r15 addl r16 = 8, r0 ;; andcm r14 = -1, r14 ;; .mii nop 0 addp4 r14 = r14, r0 ;; mov ar.lc = r14 .L4: .mii nop 0 sxt4 r14 = r16 adds r16 = 1, r16 ;; .mmi shladd r14 = r14, 3, r0 ;; add r15 = r17, r14 add r14 = r19, r14 ;; .mmb adds r14 = -64, r14 ld8 r15 = [r15] nop 0 ;; .mfb st8 [r14] = r15 nop 0 br.cloop.sptk.few .L4 .L2: .mmi adds r33 = 24, r32 ;; ld4 r15 = [r33] nop 0 ;; .mii nop 0 cmp4.ne p6, p7 = 16, r15 ;; (p7) adds r14 = 16, r32 ;; .mfi (p7) ld8 r8 = [r14] nop 0 cmp4.ge p6, p7 = 0, r18 .mfb adds r14 = 80, r32 nop 0 (p6) br.cond.dpnt .L7 ;; .mmb nop 0 cmp4.ge p6, p7 = 1, r18 nop 0 .mfb ldfd f8 = [r21] nop 0 (p6) br.cond.dpnt .L7 ;; .mmb nop 0 cmp4.ge p6, p7 = 2, r18 nop 0 .mfb ldfd f9 = [r14] nop 0 (p7) br.cond.dptk .L68 ;; .L7: .mib nop 0 cmp4.ne p6, p7 = 13, r15 (p7) br.cond.dpnt .L69 ;; .L16: .mib cmp4.ne p6, p7 = 14, r15 adds r15 = 8, r32 (p7) br.cond.dpnt .L70 .mmb nop 0 ld8 r14 = [r20] nop 0 ;; .mmi ld8 r15 = [r15] adds r16 = 8, r14 adds r17 = 16, r14 .mmi adds r18 = 24, r14 adds r19 = 32, r14 adds r20 = 40, r14 .mmi nop 0 adds r21 = 48, r14 adds r22 = 56, r14 .mmi ld8 r39 = [r14] ;; ld8 r14 = [r15], 8 nop 0 .mii ld8 r40 = [r16] nop 0 ;; mov b6 = r14 .mmb ld8 r1 = [r15] ld8 r41 = [r17] nop 0 .mmb ld8 r42 = [r18] ld8 r43 = [r19] nop 0 .mmb ld8 r44 = [r20] ld8 r45 = [r21] nop 0 .mbb ld8 r46 = [r22] nop 0 br.call.sptk.many b0 = b6 ;; .mmi mov r1 = r37 ld4 r14 = [r33] mov r28 = r8 ;; .mfb cmp4.eq p6, p7 = 1, r14 nop 0 (p6) br.cond.dpnt .L18 ;; .mfb cmp4.ne p6, p7 = 2, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 3, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 4, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 5, r14 nop 0 (p7) br.cond.dpnt .L63 ;; .mfb cmp4.ne p6, p7 = 6, r14 nop 0 (p7) br.cond.dpnt .L63 ;; .mfb cmp4.ne p6, p7 = 7, r14 nop 0 (p7) br.cond.dpnt .L64 ;; .mfb cmp4.ne p6, p7 = 8, r14 nop 0 (p7) br.cond.dpnt .L64 ;; .mii nop 0 cmp4.ne p6, p7 = 9, r14 ;; nop 0 .mfb cmp4.ne.and.orcm p6, p7 = 11, r14 nop 0 (p7) br.cond.dptk .L66 ;; .mii nop 0 cmp4.ne p6, p7 = 10, r14 ;; nop 0 .mfb cmp4.ne.and.orcm p6, p7 = 12, r14 nop 0 (p7) br.cond.dptk .L66 ;; .mfb cmp4.ne p6, p7 = 15, r14 nop 0 (p7) br.cond.dpnt .L66 ;; .mib nop 0 cmp4.ne p6, p7 = 16, r14 (p6) br.cond.dptk .L18 .mmi ld4 r14 = [r32] ;; nop 0 tbit.z p6, p7 = r14, 9 .mfb adds r14 = 32, r32 nop 0 (p6) br.cond.dpnt .L18 ;; .mmi ld8 r19 = [r14] ;; adds r14 = -1, r19 nop 0 ;; .mib cmp.ltu p6, p7 = 31, r14 adds r14 = 16, r32 (p6) br.cond.dpnt .L18 ;; .mii ld8 r14 = [r14] cmp.ltu p6, p7 = 8, r19 ;; and r17 = 7, r14 .mii nop 0 and r27 = -8, r14 ;; nop 0 .mfb add r23 = r19, r17 nop 0 (p6) br.cond.dptk .L45 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r23 (p6) br.cond.dptk .L47 .mmi shladd r15 = r23, 3, r0 addl r14 = 2, r0 shladd r18 = r17, 3, r0 .mmi ld8 r17 = [r27] ;; adds r15 = -1, r15 nop 0 ;; .mii nop 0 sxt4 r15 = r15 ;; shl r14 = r14, r15 .mii addl r15 = 1, r0 shl r16 = r8, r18 ;; shl r15 = r15, r18 .mii nop 0 xor r16 = r16, r17 ;; sub r14 = r14, r15 ;; .mmi and r14 = r16, r14 ;; xor r17 = r14, r17 nop 0 ;; .mfb st8 [r27] = r17 nop 0 nop 0 .L18: .mfi mov r8 = r0 nop 0 mov b0 = r34 .mmi nop 0 .label_state 1 .restore sp mov r12 = r36 mov ar.pfs = r35 .mib nop 0 mov ar.lc = r38 br.ret.sptk.many b0 .L68: .body .copy_state 1 .mfi adds r14 = 88, r32 nop 0 cmp4.ge p6, p7 = 3, r18 ;; .mfb ldfd f10 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 96, r32 nop 0 cmp4.ge p6, p7 = 4, r18 ;; .mfb ldfd f11 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 104, r32 nop 0 cmp4.ge p6, p7 = 5, r18 ;; .mfb ldfd f12 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 112, r32 nop 0 cmp4.ge p6, p7 = 6, r18 ;; .mfb ldfd f13 = [r14] nop 0 (p6) br.cond.dptk .L7 .mii adds r14 = 120, r32 cmp4.ge p6, p7 = 7, r18 ;; nop 0 .mii ldfd f14 = [r14] (p7) adds r14 = 128, r32 ;; nop 0 .mmb (p7) ldfd f15 = [r14] cmp4.ne p6, p7 = 13, r15 (p6) br.cond.dptk .L16 .L69: .mmb adds r16 = 8, r32 adds r15 = 16, r32 nop 0 .mfi ld8 r14 = [r20] nop 0 mov ar.lc = r38 ;; .mmi ld8 r33 = [r15] ld8 r15 = [r16] adds r17 = 8, r14 .mmi adds r18 = 16, r14 adds r19 = 24, r14 adds r20 = 32, r14 .mmi adds r21 = 40, r14 adds r22 = 48, r14 adds r23 = 56, r14 .mii ld8 r39 = [r14] nop 0 ;; nop 0 .mmb ld8 r14 = [r15], 8 ld8 r40 = [r17] nop 0 ;; .mmi ld8 r1 = [r15] ld8 r41 = [r18] mov b6 = r14 .mmb ld8 r42 = [r19] ld8 r43 = [r20] nop 0 .mmb ld8 r44 = [r21] ld8 r45 = [r22] nop 0 .mbb ld8 r46 = [r23] nop 0 br.call.sptk.many b0 = b6 ;; .mmb .label_state 2 .restore sp mov r12 = r36 mov r8 = r0 nop 0 .mmi mov r1 = r37 stfs [r33] = f8 mov b0 = r34 .mib nop 0 mov ar.pfs = r35 br.ret.sptk.many b0 ;; .L62: .body .copy_state 2 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 3 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st1 [r14] = r28 nop 0 br.ret.sptk.many b0 .L70: .body .copy_state 3 .mmb adds r16 = 8, r32 adds r15 = 16, r32 nop 0 .mfi ld8 r14 = [r20] nop 0 mov ar.lc = r38 ;; .mmi ld8 r33 = [r15] ld8 r15 = [r16] adds r17 = 8, r14 .mmi adds r18 = 16, r14 adds r19 = 24, r14 adds r20 = 32, r14 .mmi adds r21 = 40, r14 adds r22 = 48, r14 adds r23 = 56, r14 .mii ld8 r39 = [r14] nop 0 ;; nop 0 .mmb ld8 r14 = [r15], 8 ld8 r40 = [r17] nop 0 ;; .mmi ld8 r1 = [r15] ld8 r41 = [r18] mov b6 = r14 .mmb ld8 r42 = [r19] ld8 r43 = [r20] nop 0 .mmb ld8 r44 = [r21] ld8 r45 = [r22] nop 0 .mbb ld8 r46 = [r23] nop 0 br.call.sptk.many b0 = b6 ;; .mmb .label_state 4 .restore sp mov r12 = r36 mov r8 = r0 nop 0 .mmi mov r1 = r37 stfd [r33] = f8 mov b0 = r34 .mib nop 0 mov ar.pfs = r35 br.ret.sptk.many b0 ;; .L63: .body .copy_state 4 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 5 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st2 [r14] = r28 nop 0 br.ret.sptk.many b0 .L64: .body .copy_state 5 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 6 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st4 [r14] = r28 nop 0 br.ret.sptk.many b0 .L66: .body .copy_state 6 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 7 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st8 [r14] = r28 nop 0 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mib nop 0 cmp.ltu p6, p7 = 16, r19 (p6) br.cond.dptk .L49 ;; .mfi shladd r20 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 16, r23 ;; nop 0 .mii mov r19 = r20 shl r15 = r8, r20 shl r14 = r14, r20 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L51 .mmi shladd r17 = r17, 2, r0 shladd r16 = r23, 3, r0 addl r15 = 2, r0 .mmi adds r19 = 8, r27 .label_state 8 .restore sp mov r12 = r36 shl r20 = r9, r20 ;; .mmb sub r17 = 32, r17 adds r16 = -65, r16 nop 0 .mii ld8 r18 = [r19] mov b0 = r34 mov ar.pfs = r35 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r17 = r17 .mib nop 0 mov ar.lc = r38 nop 0 ;; .mii nop 0 shr r14 = r8, r17 shl r15 = r15, r16 .mmi mov r8 = r0 ;; nop 0 shr r14 = r14, r17 .mii nop 0 adds r15 = -1, r15 ;; or r14 = r20, r14 ;; .mii nop 0 xor r14 = r14, r18 ;; and r15 = r14, r15 ;; .mii nop 0 xor r18 = r15, r18 ;; nop 0 .mfb st8 [r19] = r18 nop 0 br.ret.sptk.many b0 .L47: .body .copy_state 8 .mmi shladd r14 = r23, 3, r0 addl r15 = 2, r0 mov b0 = r34 .mmi shladd r18 = r17, 3, r0 ld8 r19 = [r27] .label_state 9 .restore sp mov r12 = r36 ;; .mmi adds r14 = -65, r14 sub r16 = 64, r18 mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; sxt4 r14 = r14 .mii nop 0 shl r17 = r8, r18 ;; shl r15 = r15, r14 .mii addl r14 = -1, r0 sxt4 r16 = r16 ;; shr r16 = r8, r16 .mii mov r8 = r0 xor r17 = r17, r19 shl r14 = r14, r18 .mii nop 0 adds r15 = -1, r15 ;; and r14 = r17, r14 ;; .mmi xor r19 = r14, r19 ;; st8 [r27] = r19, 8 nop 0 ;; .mmi ld8 r14 = [r27] ;; xor r16 = r16, r14 nop 0 ;; .mmi and r15 = r16, r15 ;; xor r14 = r15, r14 nop 0 ;; .mfb st8 [r27] = r14 nop 0 br.ret.sptk.many b0 .L49: .body .copy_state 9 .mib nop 0 cmp.ltu p6, p7 = 24, r19 (p6) br.cond.dptk .L53 ;; .mfi shladd r19 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 24, r23 ;; nop 0 .mii mov r29 = r19 shl r15 = r8, r19 shl r14 = r14, r19 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L55 .mmi shladd r14 = r17, 2, r0 shladd r18 = r23, 3, r0 addl r16 = 2, r0 .mmi adds r22 = 16, r27 adds r20 = 8, r27 shl r21 = r10, r29 ;; .mmi sub r14 = 32, r14 adds r18 = -65, r18 mov b0 = r34 .mii .label_state 10 .restore sp mov r12 = r36 shl r19 = r9, r29 mov ar.pfs = r35 ;; .mii nop 0 sxt4 r18 = r18 sxt4 r14 = r14 .mib nop 0 mov ar.lc = r38 nop 0 ;; .mii nop 0 shr r15 = r9, r14 shr r17 = r8, r14 .mii mov r8 = r0 nop 0 shl r16 = r16, r18 ;; .mii nop 0 shr r15 = r15, r14 shr r17 = r17, r14 .mii ld8 r14 = [r22] nop 0 adds r16 = -1, r16 ;; .mii or r15 = r21, r15 or r17 = r19, r17 ;; xor r15 = r15, r14 .mmi st8 [r20] = r17 ;; and r16 = r15, r16 nop 0 ;; .mii nop 0 xor r14 = r16, r14 ;; nop 0 .mfb st8 [r22] = r14 nop 0 br.ret.sptk.many b0 .L51: .body .copy_state 10 .mmi shladd r15 = r23, 3, r0 addl r14 = 2, r0 sub r17 = 64, r20 .mmi adds r21 = 16, r27 adds r20 = 8, r27 shl r19 = r9, r19 ;; .mii adds r15 = -129, r15 mov b0 = r34 sxt4 r17 = r17 .mmi .label_state 11 .restore sp mov r12 = r36 nop 0 mov ar.pfs = r35 ;; .mii nop 0 shr r18 = r9, r17 sxt4 r15 = r15 ;; .mii nop 0 shl r14 = r14, r15 shr r16 = r8, r17 .mmi ld8 r15 = [r21] mov r8 = r0 mov ar.lc = r38 ;; .mii xor r18 = r18, r15 adds r14 = -1, r14 or r16 = r19, r16 ;; .mmb and r14 = r18, r14 st8 [r20] = r16 nop 0 ;; .mii nop 0 xor r15 = r14, r15 ;; nop 0 .mfb st8 [r21] = r15 nop 0 br.ret.sptk.many b0 .L55: .body .copy_state 11 .mmi shladd r14 = r23, 3, r0 addl r15 = 2, r0 sub r16 = 64, r19 .mmi adds r24 = 24, r27 adds r22 = 8, r27 shl r21 = r10, r29 ;; .mii adds r14 = -129, r14 sxt4 r16 = r16 shl r20 = r9, r29 .mmi adds r23 = 16, r27 .label_state 12 .restore sp mov r12 = r36 mov b0 = r34 ;; .mii nop 0 shr r18 = r10, r16 sxt4 r14 = r14 ;; .mii nop 0 shl r15 = r15, r14 shr r19 = r8, r16 .mmi ld8 r14 = [r24] mov r8 = r0 mov ar.pfs = r35 .mib nop 0 shr r17 = r9, r16 nop 0 ;; .mii xor r18 = r18, r14 mov ar.lc = r38 adds r15 = -1, r15 .mmi or r19 = r20, r19 ;; and r15 = r18, r15 or r17 = r21, r17 .mii st8 [r22] = r19 nop 0 ;; xor r14 = r15, r14 .mmb nop 0 st8 [r23] = r17 nop 0 ;; .mfb st8 [r24] = r14 nop 0 br.ret.sptk.many b0 .L53: .body .copy_state 12 .mfi shladd r18 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 32, r23 ;; nop 0 .mii mov r29 = r18 shl r15 = r8, r18 shl r14 = r14, r18 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L57 .mmi shladd r14 = r17, 2, r0 addl r15 = 2, r0 shl r20 = r10, r18 .mmi shladd r18 = r23, 3, r0 adds r23 = 24, r27 shl r19 = r9, r29 ;; .mmi sub r14 = 32, r14 adds r18 = -65, r18 mov b0 = r34 .mmi adds r21 = 8, r27 adds r22 = 16, r27 .label_state 13 .restore sp mov r12 = r36 .mii nop 0 mov ar.pfs = r35 ;; sxt4 r18 = r18 .mii nop 0 sxt4 r14 = r14 mov ar.lc = r38 ;; .mii nop 0 shr r16 = r8, r14 shr r17 = r9, r14 .mii mov r8 = r0 nop 0 shl r15 = r15, r18 ;; .mii nop 0 shr r16 = r16, r14 shr r17 = r17, r14 .mii ld8 r14 = [r23] adds r15 = -1, r15 ;; or r16 = r19, r16 .mmi or r17 = r20, r17 ;; st8 [r21] = r16 xor r16 = r14, r16 .mmi st8 [r22] = r17 ;; and r15 = r16, r15 nop 0 ;; .mii nop 0 xor r14 = r15, r14 ;; nop 0 .mfb st8 [r23] = r14 nop 0 br.ret.sptk.many b0 .L57: .body .copy_state 13 .mmi shladd r16 = r23, 3, r0 addl r15 = 2, r0 sub r14 = 64, r18 .mmi adds r24 = 8, r27 adds r25 = 16, r27 adds r26 = 24, r27 ;; .mmi nop 0 adds r16 = -129, r16 sxt4 r14 = r14 .mmi adds r27 = 32, r27 .restore sp mov r12 = r36 shl r23 = r11, r29 ;; .mii nop 0 sxt4 r16 = r16 shr r22 = r11, r14 ;; .mii nop 0 shl r15 = r15, r16 shr r17 = r8, r14 .mii mov r8 = r0 shr r18 = r9, r14 shr r19 = r10, r14 .mii ld8 r14 = [r27] shl r20 = r9, r29 shl r21 = r10, r29 ;; .mmi xor r22 = r22, r14 adds r15 = -1, r15 mov b0 = r34 ;; .mmi and r15 = r22, r15 or r19 = r23, r19 mov ar.pfs = r35 .mmi or r17 = r20, r17 or r18 = r21, r18 mov ar.lc = r38 ;; .mmb xor r14 = r15, r14 st8 [r24] = r17 nop 0 .mmb st8 [r25] = r18 st8 [r26] = r19 nop 0 ;; .mfb st8 [r27] = r14 nop 0 br.ret.sptk.many b0 .endp avcall_call# .ident "GCC: (GNU) 4.0.1" #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/README0000664000000000000000000000453613347755263012340 00000000000000avcall - calling C functions with variable arguments This library allows arbitrary C functions to be called from embedded interpreters, debuggers, RPC calls, etc, by building up a C argument-list incrementally from explicitly typed arguments. This considerably reduces the amount of boilerplate glue code required for such applications. The interface is like stdargs/varargs in reverse and is intended to be as portable as possible, however the details of function calling are highly machine-dependent so your mileage may vary. At the very least there are typically built-in limits on the size of the argument-list. The argument-pushing macros all return 0 for success, < 0 for error (eg, arg-list overflow). Installation instructions: Configure the parent directory. Then: cd avcall make make check make install Files in this package: Documentation: README this text COPYING free software license PLATFORMS list of supported platforms avcall.3 manual page in Unix man format avcall.man manual page avcall.html manual page in HTML format DOC documentation Source: avcall.h main include file avcall-*.c source for the main interface function avcall-*.[sS] its translation to assembly language avcall-libapi.c implementation of other library API avcall-structcpy.c auxiliary function tests.c test program Building: Makefile.in Makefile master Porting: Makefile.devel developer's Makefile Copyright notice: Copyright 1993-1995 Bill Triggs Copyright 1995-2017 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . libffcall-2.5/avcall/avcall.30000664000000000000000000002111613146127475012772 00000000000000.\" Copyright (C) 1993 Bill Triggs .\" Copyright (C) 1995-2017 Bruno Haible .\" .\" This manual is covered by the GNU GPL. You can redistribute it and/or .\" modify it under the terms of the GNU General Public License (GPL), either .\" version 2 of the License, or (at your option) any later version published .\" by the Free Software Foundation (FSF). .\" A copy of the license is at . .\" .TH AVCALL 3 "23 July 2017" .SH NAME avcall \- build a C argument list incrementally and call a C function on it. .SH SYNOPSIS .B #include .LP .BI "av_alist " alist ";" .LP .BI av_start_ type "(" alist ", " "&func" .RI "[["\c .BI ", "\c .I return_type\c .RB "]" ", "\c .I "&return_value"\c .RB "]" ");" .LP .BI av_ type "(" alist ", "\c .RI "["\c .IB arg_type ","\c .RI "] "\c .IB value ");" .LP .BI "av_call(" alist ");" .IX "av_alist" "" "\fLav_alist\fP \(em avcall argument list declaration" .IX "av_start_type()" "" "\fLav_start_type()\fP \(em initialize avcall function" .IX "av_type()" "" "\fLav_type()\fP \(em push next argument in avcall list" .IX "av_call()" "" "\fLav_call()\fP \(em finish avcall argument list and call function" .SH DESCRIPTION .LP This set of macros builds an argument list for a C function and calls the function on it. It significantly reduces the amount of `glue' code required for parsers, debuggers, imbedded interpreters, C extensions to application programs and other situations where collections of functions need to be called on lists of externally-supplied arguments. Function calling conventions differ considerably on different machines and .I avcall attempts to provide some degree of isolation from such architecture dependencies. The interface is like .BR stdarg (3) in reverse. All of the macros return 0 for success, < 0 for failure (e.g., argument list overflow or type-not-supported). .RS 0 .TP (1) .B #include .nf and declare the argument list structure .BI "av_alist " alist ; .fi .TP (2) Set any special flags. This is architecture and compiler dependent. Compiler options that affect passing conventions may need to be flagged by .BR "#define" s before the .B "#include " statement. However, the .I configure script should have determined which .BR "#define" s are needed and put them at the top of .BR avcall.h . .TP (3) Initialize the alist with the function address and return value pointer (if any). There is a separate macro for each simple return type ([u]char, [u]short, [u]int, [u]long, [u]longlong, float, double, where `u' indicates `unsigned'). The macros for functions returning structures or pointers require an explicit type argument. .LP E.g., .LP .BI "av_start_int (" alist ", " &func ", " &int_return ); .LP .BI "av_start_double (" alist ", " &func ", " &double_return ); .LP .BI "av_start_void (" alist ", " &func ); .LP .nf .BI "av_start_struct (" alist ", " &func ", " struct_type ", " splittable ", " .BI " " &struct_return ); .fi .LP .nf .BI "av_start_ptr (" alist ", " &func ", " pointer_type ", " .BI " " &pointer_return ); .fi .LP The .I splittable flag specifies whether the .I struct_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), .I splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), .I splittable is ignored and assumed to be 0. There are some handy macros for this: .nf .BI "av_word_splittable_1 (" type1 ) .BI "av_word_splittable_2 (" type1 ", " type2 ) .BI "av_word_splittable_3 (" type1 ", " type2 ", " type3 ) .BI "av_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 ) .fi For a struct with three slots .nf .BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }" .fi you can specify .I splittable as .BI "av_word_splittable_3 (" type1 ", " type2 ", " type3 ) .RB . .TP (4) Push the arguments on to the list in order. Again there is a macro for each simple built-in type, and the macros for structure and pointer arguments require an extra type argument: .LP .BI "av_int (" alist ", " int_value ); .LP .BI "av_double (" alist ", " double_value ); .LP .BI "av_struct (" alist ", " struct_or_union_type ", " struct_value ); .LP .BI "av_ptr (" alist ", " pointer_type ", " pointer_value ); .TP (5) Call the function, set the return value, and tidy up: .LP .BI "av_call (" alist ); .RE .SH NOTES (1) Functions whose first declaration is in Kernighan & Ritchie style (i.e., without a typed argument list) MUST use default K&R C expression promotions (char and short to int, float to double) whether they are compiled by a K&R or an ANSI compiler, because the true argument types may not be known at the call point. Such functions typically back-convert their arguments to the declared types on function entry. (In fact, the only way to pass a true char, short or float in K&R C is by an explicit cast: .B func((char)c,(float)f) ). Similarly, some K&R compilers (such as Sun cc on the sparc) actually return a float as a double. Hence, for arguments of functions declared in K&R style you should use .B av_int(\|) and .B av_double(\|) rather than .B av_char(\|), .B av_short(\|) or .B av_float(\|). If you use a K&R compiler, the avcall header files may be able to detect this and define .B av_float(\|), etc, appropriately, but with an ANSI compiler there is no way .I avcall can know how a function was declared, so you have to correct the argument types yourself. (2) The explicit type arguments of the .B av_struct(\|) and .B av_ptr(\|) macros are typically used to calculate size, alignment, and passing conventions. This may not be sufficient for some machines with unusual structure and pointer handling: in this case additional .B av_start_\c .I type\c .B (\|) and .B av_\c .I type\c .B (\|) macros may be defined. (3) The macros .BR av_start_longlong(\|) , .BR av_start_ulonglong(\|) , .B av_longlong(\|) and .B av_ulonglong(\|) work only if the C compiler has a working .B long long 64-bit integer type. (4) The struct types used in .B av_start_struct(\|) and .B av_struct(\|) must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. .SH SEE ALSO .BR stdarg (3), .BR varargs (3). .SH BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns .B "struct { char a,b,c; }" in registers and .B "struct { char a[3]; }" in memory, although both types have the same size and the same alignment. .SH NON-BUGS All information is passed in CPU registers and the stack. The .B avcall package is therefore multithread-safe. .SH PORTING AVCALL Ports, bug-fixes, and suggestions are most welcome. The macros required for argument pushing are pretty grungy, but it does seem to be possible to port avcall to a range of machines. Ports to non-standard or non-32-bit machines are especially welcome so we can sort the interface out before it's too late. Knowledge about argument passing conventions can be found in the gcc source, file .RI gcc-2.6.3/config/ cpu / cpu .h, section "Stack layout; function entry, exit and calling." Some of the grunge is usually handled by a C or assembly level glue routine that actually pushes the arguments, calls the function and unpacks any return value. This is called avcall_call(\|). A precompiled assembler version for people without gcc is also made available. The routine should ideally have flags for the passing conventions of other compilers. Many of the current routines waste a lot of stack space and generally do hairy things to stack frames - a bit more assembly code would probably help things along quite a bit here. .SH AUTHOR Bill Triggs . .SH ACKNOWLEDGEMENTS Some initial ideas were stolen from the C interface to the Zelk extensions to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC C&C Research, (for Sun4 & SGI), and Roy Featherstone's personal C interface library for Sun[34] & SGI. I also looked at the machine-dependent parts of the GCC and GDB distributions, and put the gcc asm(\|) extensions to good use. Thanks guys! This work was partly supported by EC-ESPRIT Basic Research Action SECOND. libffcall-2.5/avcall/avcall-i386.c0000664000000000000000000001150114662613003013525 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O -fno-omit-frame-pointer !!! Foreign function interface for a Linux i386/486 with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. i386 Argument Passing Conventions: All arguments are passed on the stack with word alignment. Doubles take two words. Structure args are passed as true structures embedded in the argument stack. Float and double returns often come from FPU registers. To return a structure, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. At least on FreeBSD, the function also returns the pointer. GCC returns structures of size 1, 2, 4, 8 like integers. Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O) to get the right register variables. For other compilers use the pre-compiled assembler version. -fomit-frame-pointer is forbidden because when calling structure returning functions (the "i = (*l->func)();" line below) the called functions pops the return value container pointer from the stack: "ret $4" instead of "ret". (See gcc-2.6.3 macro RETURN_POPS_ARGS.) From our point of view, %esp gets magically incremented. A workaround would be to push the return value container pointer using an __asm__("pushl %0" : : : ...) instruction. Similarly, when calling functions with ‘stdcall’ linkage, %esp also gets incremented: all arguments (including the return value container pointer) are popped from the stack. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) int avcall_call(av_alist* list) { register __avword* sp __asm__("sp"); /* C names for registers */ /*register __avrword iret __asm__("eax"); */ register __avrword iret2 __asm__("edx"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; __avrword i; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; /* call function */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { i = (*l->func)(); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { RETURN(char, i); } else if (l->rsize == sizeof(short)) { RETURN(short, i); } else if (l->rsize == sizeof(int)) { RETURN(int, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } } } } return 0; } libffcall-2.5/avcall/avcall-sparc-solaris-macro.S0000664000000000000000000064275414662622066016732 00000000000000#include "asm-sparc.h" .section ".text" .align 4 L(LGETPC0): retl add %o7, %l7, %l7 .align 4 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) .proc 04 FUNBEGIN(avcall_call) !$PROLOGUE$ 0 save %sp, -1128, %sp sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call L(LGETPC0) add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 add %sp, 68, %l1 ld [%i0+20], %o7 ld [%i0+24], %g3 sub %o7, %g3, %g1 ld [%i0+12], %g3 cmp %g3, 16 bne L(L2) sra %g1, 2, %g1 ld [%i0+8], %g3 st %g3, [%sp+64] L(L2): mov 6, %l0 cmp %l0, %g1 bge,a L(L53) ld [%i0+12], %g3 ld [%i0+24], %g4 L(L7): sll %l0, 2, %o7 ld [%g4+%o7], %g3 add %l0, 1, %l0 cmp %l0, %g1 bl L(L7) st %g3, [%l1+%o7] ld [%i0+12], %g3 L(L53): cmp %g3, 16 bne,a L(L54) ld [%i0+24], %g3 ld [%i0], %g3 andcc %g3, 16, %g0 be,a L(L54) ld [%i0+24], %g3 ld [%i0+16], %g3 sll %g3, 1, %o7 add %o7, %g3, %o7 sll %o7, 3, %o7 sethi %hi(_GLOBAL_OFFSET_TABLE_-(L(L9)-.)), %g3 or %g3, %lo(_GLOBAL_OFFSET_TABLE_-(L(L9)-.)), %g3 sub %l7, %g3, %g3 add %o7, %g3, %o7 ld [%i0+24], %g3 ld [%g3],%o0 ld [%g3+4],%o1 ld [%g3+8],%o2 ld [%g3+12],%o3 ld [%g3+16],%o4 ld [%g3+20],%o5 ld [%i0+4], %g2 jmp %o7 nop L(L9): call %g2 nop .long 0 mov 0,%i0 ret restore call %g2 nop .long 1 mov 0,%i0 ret restore call %g2 nop .long 2 mov 0,%i0 ret restore call %g2 nop .long 3 mov 0,%i0 ret restore call %g2 nop .long 4 mov 0,%i0 ret restore call %g2 nop .long 5 mov 0,%i0 ret restore call %g2 nop .long 6 mov 0,%i0 ret restore call %g2 nop .long 7 mov 0,%i0 ret restore call %g2 nop .long 8 mov 0,%i0 ret restore call %g2 nop .long 9 mov 0,%i0 ret restore call %g2 nop .long 10 mov 0,%i0 ret restore call %g2 nop .long 11 mov 0,%i0 ret restore call %g2 nop .long 12 mov 0,%i0 ret restore call %g2 nop .long 13 mov 0,%i0 ret restore call %g2 nop .long 14 mov 0,%i0 ret restore call %g2 nop .long 15 mov 0,%i0 ret restore call %g2 nop .long 16 mov 0,%i0 ret restore call %g2 nop .long 17 mov 0,%i0 ret restore call %g2 nop .long 18 mov 0,%i0 ret restore call %g2 nop .long 19 mov 0,%i0 ret restore call %g2 nop .long 20 mov 0,%i0 ret restore call %g2 nop .long 21 mov 0,%i0 ret restore call %g2 nop .long 22 mov 0,%i0 ret restore call %g2 nop .long 23 mov 0,%i0 ret restore call %g2 nop .long 24 mov 0,%i0 ret restore call %g2 nop .long 25 mov 0,%i0 ret restore call %g2 nop .long 26 mov 0,%i0 ret restore call %g2 nop .long 27 mov 0,%i0 ret restore call %g2 nop .long 28 mov 0,%i0 ret restore call %g2 nop .long 29 mov 0,%i0 ret restore call %g2 nop .long 30 mov 0,%i0 ret restore call %g2 nop .long 31 mov 0,%i0 ret restore call %g2 nop .long 32 mov 0,%i0 ret restore call %g2 nop .long 33 mov 0,%i0 ret restore call %g2 nop .long 34 mov 0,%i0 ret restore call %g2 nop .long 35 mov 0,%i0 ret restore call %g2 nop .long 36 mov 0,%i0 ret restore call %g2 nop .long 37 mov 0,%i0 ret restore call %g2 nop .long 38 mov 0,%i0 ret restore call %g2 nop .long 39 mov 0,%i0 ret restore call %g2 nop .long 40 mov 0,%i0 ret restore call %g2 nop .long 41 mov 0,%i0 ret restore call %g2 nop .long 42 mov 0,%i0 ret restore call %g2 nop .long 43 mov 0,%i0 ret restore call %g2 nop .long 44 mov 0,%i0 ret restore call %g2 nop .long 45 mov 0,%i0 ret restore call %g2 nop .long 46 mov 0,%i0 ret restore call %g2 nop .long 47 mov 0,%i0 ret restore call %g2 nop .long 48 mov 0,%i0 ret restore call %g2 nop .long 49 mov 0,%i0 ret restore call %g2 nop .long 50 mov 0,%i0 ret restore call %g2 nop .long 51 mov 0,%i0 ret restore call %g2 nop .long 52 mov 0,%i0 ret restore call %g2 nop .long 53 mov 0,%i0 ret restore call %g2 nop .long 54 mov 0,%i0 ret restore call %g2 nop .long 55 mov 0,%i0 ret restore call %g2 nop .long 56 mov 0,%i0 ret restore call %g2 nop .long 57 mov 0,%i0 ret restore call %g2 nop .long 58 mov 0,%i0 ret restore call %g2 nop .long 59 mov 0,%i0 ret restore call %g2 nop .long 60 mov 0,%i0 ret restore call %g2 nop .long 61 mov 0,%i0 ret restore call %g2 nop .long 62 mov 0,%i0 ret restore call %g2 nop .long 63 mov 0,%i0 ret restore call %g2 nop .long 64 mov 0,%i0 ret restore call %g2 nop .long 65 mov 0,%i0 ret restore call %g2 nop .long 66 mov 0,%i0 ret restore call %g2 nop .long 67 mov 0,%i0 ret restore call %g2 nop .long 68 mov 0,%i0 ret restore call %g2 nop .long 69 mov 0,%i0 ret restore call %g2 nop .long 70 mov 0,%i0 ret restore call %g2 nop .long 71 mov 0,%i0 ret restore call %g2 nop .long 72 mov 0,%i0 ret restore call %g2 nop .long 73 mov 0,%i0 ret restore call %g2 nop .long 74 mov 0,%i0 ret restore call %g2 nop .long 75 mov 0,%i0 ret restore call %g2 nop .long 76 mov 0,%i0 ret restore call %g2 nop .long 77 mov 0,%i0 ret restore call %g2 nop .long 78 mov 0,%i0 ret restore call %g2 nop .long 79 mov 0,%i0 ret restore call %g2 nop .long 80 mov 0,%i0 ret restore call %g2 nop .long 81 mov 0,%i0 ret restore call %g2 nop .long 82 mov 0,%i0 ret restore call %g2 nop .long 83 mov 0,%i0 ret restore call %g2 nop .long 84 mov 0,%i0 ret restore call %g2 nop .long 85 mov 0,%i0 ret restore call %g2 nop .long 86 mov 0,%i0 ret restore call %g2 nop .long 87 mov 0,%i0 ret restore call %g2 nop .long 88 mov 0,%i0 ret restore call %g2 nop .long 89 mov 0,%i0 ret restore call %g2 nop .long 90 mov 0,%i0 ret restore call %g2 nop .long 91 mov 0,%i0 ret restore call %g2 nop .long 92 mov 0,%i0 ret restore call %g2 nop .long 93 mov 0,%i0 ret restore call %g2 nop .long 94 mov 0,%i0 ret restore call %g2 nop .long 95 mov 0,%i0 ret restore call %g2 nop .long 96 mov 0,%i0 ret restore call %g2 nop .long 97 mov 0,%i0 ret restore call %g2 nop .long 98 mov 0,%i0 ret restore call %g2 nop .long 99 mov 0,%i0 ret restore call %g2 nop .long 100 mov 0,%i0 ret restore call %g2 nop .long 101 mov 0,%i0 ret restore call %g2 nop .long 102 mov 0,%i0 ret restore call %g2 nop .long 103 mov 0,%i0 ret restore call %g2 nop .long 104 mov 0,%i0 ret restore call %g2 nop .long 105 mov 0,%i0 ret restore call %g2 nop .long 106 mov 0,%i0 ret restore call %g2 nop .long 107 mov 0,%i0 ret restore call %g2 nop .long 108 mov 0,%i0 ret restore call %g2 nop .long 109 mov 0,%i0 ret restore call %g2 nop .long 110 mov 0,%i0 ret restore call %g2 nop .long 111 mov 0,%i0 ret restore call %g2 nop .long 112 mov 0,%i0 ret restore call %g2 nop .long 113 mov 0,%i0 ret restore call %g2 nop .long 114 mov 0,%i0 ret restore call %g2 nop .long 115 mov 0,%i0 ret restore call %g2 nop .long 116 mov 0,%i0 ret restore call %g2 nop .long 117 mov 0,%i0 ret restore call %g2 nop .long 118 mov 0,%i0 ret restore call %g2 nop .long 119 mov 0,%i0 ret restore call %g2 nop .long 120 mov 0,%i0 ret restore call %g2 nop .long 121 mov 0,%i0 ret restore call %g2 nop .long 122 mov 0,%i0 ret restore call %g2 nop .long 123 mov 0,%i0 ret restore call %g2 nop .long 124 mov 0,%i0 ret restore call %g2 nop .long 125 mov 0,%i0 ret restore call %g2 nop .long 126 mov 0,%i0 ret restore call %g2 nop .long 127 mov 0,%i0 ret restore call %g2 nop .long 128 mov 0,%i0 ret restore call %g2 nop .long 129 mov 0,%i0 ret restore call %g2 nop .long 130 mov 0,%i0 ret restore call %g2 nop .long 131 mov 0,%i0 ret restore call %g2 nop .long 132 mov 0,%i0 ret restore call %g2 nop .long 133 mov 0,%i0 ret restore call %g2 nop .long 134 mov 0,%i0 ret restore call %g2 nop .long 135 mov 0,%i0 ret restore call %g2 nop .long 136 mov 0,%i0 ret restore call %g2 nop .long 137 mov 0,%i0 ret restore call %g2 nop .long 138 mov 0,%i0 ret restore call %g2 nop .long 139 mov 0,%i0 ret restore call %g2 nop .long 140 mov 0,%i0 ret restore call %g2 nop .long 141 mov 0,%i0 ret restore call %g2 nop .long 142 mov 0,%i0 ret restore call %g2 nop .long 143 mov 0,%i0 ret restore call %g2 nop .long 144 mov 0,%i0 ret restore call %g2 nop .long 145 mov 0,%i0 ret restore call %g2 nop .long 146 mov 0,%i0 ret restore call %g2 nop .long 147 mov 0,%i0 ret restore call %g2 nop .long 148 mov 0,%i0 ret restore call %g2 nop .long 149 mov 0,%i0 ret restore call %g2 nop .long 150 mov 0,%i0 ret restore call %g2 nop .long 151 mov 0,%i0 ret restore call %g2 nop .long 152 mov 0,%i0 ret restore call %g2 nop .long 153 mov 0,%i0 ret restore call %g2 nop .long 154 mov 0,%i0 ret restore call %g2 nop .long 155 mov 0,%i0 ret restore call %g2 nop .long 156 mov 0,%i0 ret restore call %g2 nop .long 157 mov 0,%i0 ret restore call %g2 nop .long 158 mov 0,%i0 ret restore call %g2 nop .long 159 mov 0,%i0 ret restore call %g2 nop .long 160 mov 0,%i0 ret restore call %g2 nop .long 161 mov 0,%i0 ret restore call %g2 nop .long 162 mov 0,%i0 ret restore call %g2 nop .long 163 mov 0,%i0 ret restore call %g2 nop .long 164 mov 0,%i0 ret restore call %g2 nop .long 165 mov 0,%i0 ret restore call %g2 nop .long 166 mov 0,%i0 ret restore call %g2 nop .long 167 mov 0,%i0 ret restore call %g2 nop .long 168 mov 0,%i0 ret restore call %g2 nop .long 169 mov 0,%i0 ret restore call %g2 nop .long 170 mov 0,%i0 ret restore call %g2 nop .long 171 mov 0,%i0 ret restore call %g2 nop .long 172 mov 0,%i0 ret restore call %g2 nop .long 173 mov 0,%i0 ret restore call %g2 nop .long 174 mov 0,%i0 ret restore call %g2 nop .long 175 mov 0,%i0 ret restore call %g2 nop .long 176 mov 0,%i0 ret restore call %g2 nop .long 177 mov 0,%i0 ret restore call %g2 nop .long 178 mov 0,%i0 ret restore call %g2 nop .long 179 mov 0,%i0 ret restore call %g2 nop .long 180 mov 0,%i0 ret restore call %g2 nop .long 181 mov 0,%i0 ret restore call %g2 nop .long 182 mov 0,%i0 ret restore call %g2 nop .long 183 mov 0,%i0 ret restore call %g2 nop .long 184 mov 0,%i0 ret restore call %g2 nop .long 185 mov 0,%i0 ret restore call %g2 nop .long 186 mov 0,%i0 ret restore call %g2 nop .long 187 mov 0,%i0 ret restore call %g2 nop .long 188 mov 0,%i0 ret restore call %g2 nop .long 189 mov 0,%i0 ret restore call %g2 nop .long 190 mov 0,%i0 ret restore call %g2 nop .long 191 mov 0,%i0 ret restore call %g2 nop .long 192 mov 0,%i0 ret restore call %g2 nop .long 193 mov 0,%i0 ret restore call %g2 nop .long 194 mov 0,%i0 ret restore call %g2 nop .long 195 mov 0,%i0 ret restore call %g2 nop .long 196 mov 0,%i0 ret restore call %g2 nop .long 197 mov 0,%i0 ret restore call %g2 nop .long 198 mov 0,%i0 ret restore call %g2 nop .long 199 mov 0,%i0 ret restore call %g2 nop .long 200 mov 0,%i0 ret restore call %g2 nop .long 201 mov 0,%i0 ret restore call %g2 nop .long 202 mov 0,%i0 ret restore call %g2 nop .long 203 mov 0,%i0 ret restore call %g2 nop .long 204 mov 0,%i0 ret restore call %g2 nop .long 205 mov 0,%i0 ret restore call %g2 nop .long 206 mov 0,%i0 ret restore call %g2 nop .long 207 mov 0,%i0 ret restore call %g2 nop .long 208 mov 0,%i0 ret restore call %g2 nop .long 209 mov 0,%i0 ret restore call %g2 nop .long 210 mov 0,%i0 ret restore call %g2 nop .long 211 mov 0,%i0 ret restore call %g2 nop .long 212 mov 0,%i0 ret restore call %g2 nop .long 213 mov 0,%i0 ret restore call %g2 nop .long 214 mov 0,%i0 ret restore call %g2 nop .long 215 mov 0,%i0 ret restore call %g2 nop .long 216 mov 0,%i0 ret restore call %g2 nop .long 217 mov 0,%i0 ret restore call %g2 nop .long 218 mov 0,%i0 ret restore call %g2 nop .long 219 mov 0,%i0 ret restore call %g2 nop .long 220 mov 0,%i0 ret restore call %g2 nop .long 221 mov 0,%i0 ret restore call %g2 nop .long 222 mov 0,%i0 ret restore call %g2 nop .long 223 mov 0,%i0 ret restore call %g2 nop .long 224 mov 0,%i0 ret restore call %g2 nop .long 225 mov 0,%i0 ret restore call %g2 nop .long 226 mov 0,%i0 ret restore call %g2 nop .long 227 mov 0,%i0 ret restore call %g2 nop .long 228 mov 0,%i0 ret restore call %g2 nop .long 229 mov 0,%i0 ret restore call %g2 nop .long 230 mov 0,%i0 ret restore call %g2 nop .long 231 mov 0,%i0 ret restore call %g2 nop .long 232 mov 0,%i0 ret restore call %g2 nop .long 233 mov 0,%i0 ret restore call %g2 nop .long 234 mov 0,%i0 ret restore call %g2 nop .long 235 mov 0,%i0 ret restore call %g2 nop .long 236 mov 0,%i0 ret restore call %g2 nop .long 237 mov 0,%i0 ret restore call %g2 nop .long 238 mov 0,%i0 ret restore call %g2 nop .long 239 mov 0,%i0 ret restore call %g2 nop .long 240 mov 0,%i0 ret restore call %g2 nop .long 241 mov 0,%i0 ret restore call %g2 nop .long 242 mov 0,%i0 ret restore call %g2 nop .long 243 mov 0,%i0 ret restore call %g2 nop .long 244 mov 0,%i0 ret restore call %g2 nop .long 245 mov 0,%i0 ret restore call %g2 nop .long 246 mov 0,%i0 ret restore call %g2 nop .long 247 mov 0,%i0 ret restore call %g2 nop .long 248 mov 0,%i0 ret restore call %g2 nop .long 249 mov 0,%i0 ret restore call %g2 nop .long 250 mov 0,%i0 ret restore call %g2 nop .long 251 mov 0,%i0 ret restore call %g2 nop .long 252 mov 0,%i0 ret restore call %g2 nop .long 253 mov 0,%i0 ret restore call %g2 nop .long 254 mov 0,%i0 ret restore call %g2 nop .long 255 mov 0,%i0 ret restore call %g2 nop .long 256 mov 0,%i0 ret restore call %g2 nop .long 257 mov 0,%i0 ret restore call %g2 nop .long 258 mov 0,%i0 ret restore call %g2 nop .long 259 mov 0,%i0 ret restore call %g2 nop .long 260 mov 0,%i0 ret restore call %g2 nop .long 261 mov 0,%i0 ret restore call %g2 nop .long 262 mov 0,%i0 ret restore call %g2 nop .long 263 mov 0,%i0 ret restore call %g2 nop .long 264 mov 0,%i0 ret restore call %g2 nop .long 265 mov 0,%i0 ret restore call %g2 nop .long 266 mov 0,%i0 ret restore call %g2 nop .long 267 mov 0,%i0 ret restore call %g2 nop .long 268 mov 0,%i0 ret restore call %g2 nop .long 269 mov 0,%i0 ret restore call %g2 nop .long 270 mov 0,%i0 ret restore call %g2 nop .long 271 mov 0,%i0 ret restore call %g2 nop .long 272 mov 0,%i0 ret restore call %g2 nop .long 273 mov 0,%i0 ret restore call %g2 nop .long 274 mov 0,%i0 ret restore call %g2 nop .long 275 mov 0,%i0 ret restore call %g2 nop .long 276 mov 0,%i0 ret restore call %g2 nop .long 277 mov 0,%i0 ret restore call %g2 nop .long 278 mov 0,%i0 ret restore call %g2 nop .long 279 mov 0,%i0 ret restore call %g2 nop .long 280 mov 0,%i0 ret restore call %g2 nop .long 281 mov 0,%i0 ret restore call %g2 nop .long 282 mov 0,%i0 ret restore call %g2 nop .long 283 mov 0,%i0 ret restore call %g2 nop .long 284 mov 0,%i0 ret restore call %g2 nop .long 285 mov 0,%i0 ret restore call %g2 nop .long 286 mov 0,%i0 ret restore call %g2 nop .long 287 mov 0,%i0 ret restore call %g2 nop .long 288 mov 0,%i0 ret restore call %g2 nop .long 289 mov 0,%i0 ret restore call %g2 nop .long 290 mov 0,%i0 ret restore call %g2 nop .long 291 mov 0,%i0 ret restore call %g2 nop .long 292 mov 0,%i0 ret restore call %g2 nop .long 293 mov 0,%i0 ret restore call %g2 nop .long 294 mov 0,%i0 ret restore call %g2 nop .long 295 mov 0,%i0 ret restore call %g2 nop .long 296 mov 0,%i0 ret restore call %g2 nop .long 297 mov 0,%i0 ret restore call %g2 nop .long 298 mov 0,%i0 ret restore call %g2 nop .long 299 mov 0,%i0 ret restore call %g2 nop .long 300 mov 0,%i0 ret restore call %g2 nop .long 301 mov 0,%i0 ret restore call %g2 nop .long 302 mov 0,%i0 ret restore call %g2 nop .long 303 mov 0,%i0 ret restore call %g2 nop .long 304 mov 0,%i0 ret restore call %g2 nop .long 305 mov 0,%i0 ret restore call %g2 nop .long 306 mov 0,%i0 ret restore call %g2 nop .long 307 mov 0,%i0 ret restore call %g2 nop .long 308 mov 0,%i0 ret restore call %g2 nop .long 309 mov 0,%i0 ret restore call %g2 nop .long 310 mov 0,%i0 ret restore call %g2 nop .long 311 mov 0,%i0 ret restore call %g2 nop .long 312 mov 0,%i0 ret restore call %g2 nop .long 313 mov 0,%i0 ret restore call %g2 nop .long 314 mov 0,%i0 ret restore call %g2 nop .long 315 mov 0,%i0 ret restore call %g2 nop .long 316 mov 0,%i0 ret restore call %g2 nop .long 317 mov 0,%i0 ret restore call %g2 nop .long 318 mov 0,%i0 ret restore call %g2 nop .long 319 mov 0,%i0 ret restore call %g2 nop .long 320 mov 0,%i0 ret restore call %g2 nop .long 321 mov 0,%i0 ret restore call %g2 nop .long 322 mov 0,%i0 ret restore call %g2 nop .long 323 mov 0,%i0 ret restore call %g2 nop .long 324 mov 0,%i0 ret restore call %g2 nop .long 325 mov 0,%i0 ret restore call %g2 nop .long 326 mov 0,%i0 ret restore call %g2 nop .long 327 mov 0,%i0 ret restore call %g2 nop .long 328 mov 0,%i0 ret restore call %g2 nop .long 329 mov 0,%i0 ret restore call %g2 nop .long 330 mov 0,%i0 ret restore call %g2 nop .long 331 mov 0,%i0 ret restore call %g2 nop .long 332 mov 0,%i0 ret restore call %g2 nop .long 333 mov 0,%i0 ret restore call %g2 nop .long 334 mov 0,%i0 ret restore call %g2 nop .long 335 mov 0,%i0 ret restore call %g2 nop .long 336 mov 0,%i0 ret restore call %g2 nop .long 337 mov 0,%i0 ret restore call %g2 nop .long 338 mov 0,%i0 ret restore call %g2 nop .long 339 mov 0,%i0 ret restore call %g2 nop .long 340 mov 0,%i0 ret restore call %g2 nop .long 341 mov 0,%i0 ret restore call %g2 nop .long 342 mov 0,%i0 ret restore call %g2 nop .long 343 mov 0,%i0 ret restore call %g2 nop .long 344 mov 0,%i0 ret restore call %g2 nop .long 345 mov 0,%i0 ret restore call %g2 nop .long 346 mov 0,%i0 ret restore call %g2 nop .long 347 mov 0,%i0 ret restore call %g2 nop .long 348 mov 0,%i0 ret restore call %g2 nop .long 349 mov 0,%i0 ret restore call %g2 nop .long 350 mov 0,%i0 ret restore call %g2 nop .long 351 mov 0,%i0 ret restore call %g2 nop .long 352 mov 0,%i0 ret restore call %g2 nop .long 353 mov 0,%i0 ret restore call %g2 nop .long 354 mov 0,%i0 ret restore call %g2 nop .long 355 mov 0,%i0 ret restore call %g2 nop .long 356 mov 0,%i0 ret restore call %g2 nop .long 357 mov 0,%i0 ret restore call %g2 nop .long 358 mov 0,%i0 ret restore call %g2 nop .long 359 mov 0,%i0 ret restore call %g2 nop .long 360 mov 0,%i0 ret restore call %g2 nop .long 361 mov 0,%i0 ret restore call %g2 nop .long 362 mov 0,%i0 ret restore call %g2 nop .long 363 mov 0,%i0 ret restore call %g2 nop .long 364 mov 0,%i0 ret restore call %g2 nop .long 365 mov 0,%i0 ret restore call %g2 nop .long 366 mov 0,%i0 ret restore call %g2 nop .long 367 mov 0,%i0 ret restore call %g2 nop .long 368 mov 0,%i0 ret restore call %g2 nop .long 369 mov 0,%i0 ret restore call %g2 nop .long 370 mov 0,%i0 ret restore call %g2 nop .long 371 mov 0,%i0 ret restore call %g2 nop .long 372 mov 0,%i0 ret restore call %g2 nop .long 373 mov 0,%i0 ret restore call %g2 nop .long 374 mov 0,%i0 ret restore call %g2 nop .long 375 mov 0,%i0 ret restore call %g2 nop .long 376 mov 0,%i0 ret restore call %g2 nop .long 377 mov 0,%i0 ret restore call %g2 nop .long 378 mov 0,%i0 ret restore call %g2 nop .long 379 mov 0,%i0 ret restore call %g2 nop .long 380 mov 0,%i0 ret restore call %g2 nop .long 381 mov 0,%i0 ret restore call %g2 nop .long 382 mov 0,%i0 ret restore call %g2 nop .long 383 mov 0,%i0 ret restore call %g2 nop .long 384 mov 0,%i0 ret restore call %g2 nop .long 385 mov 0,%i0 ret restore call %g2 nop .long 386 mov 0,%i0 ret restore call %g2 nop .long 387 mov 0,%i0 ret restore call %g2 nop .long 388 mov 0,%i0 ret restore call %g2 nop .long 389 mov 0,%i0 ret restore call %g2 nop .long 390 mov 0,%i0 ret restore call %g2 nop .long 391 mov 0,%i0 ret restore call %g2 nop .long 392 mov 0,%i0 ret restore call %g2 nop .long 393 mov 0,%i0 ret restore call %g2 nop .long 394 mov 0,%i0 ret restore call %g2 nop .long 395 mov 0,%i0 ret restore call %g2 nop .long 396 mov 0,%i0 ret restore call %g2 nop .long 397 mov 0,%i0 ret restore call %g2 nop .long 398 mov 0,%i0 ret restore call %g2 nop .long 399 mov 0,%i0 ret restore call %g2 nop .long 400 mov 0,%i0 ret restore call %g2 nop .long 401 mov 0,%i0 ret restore call %g2 nop .long 402 mov 0,%i0 ret restore call %g2 nop .long 403 mov 0,%i0 ret restore call %g2 nop .long 404 mov 0,%i0 ret restore call %g2 nop .long 405 mov 0,%i0 ret restore call %g2 nop .long 406 mov 0,%i0 ret restore call %g2 nop .long 407 mov 0,%i0 ret restore call %g2 nop .long 408 mov 0,%i0 ret restore call %g2 nop .long 409 mov 0,%i0 ret restore call %g2 nop .long 410 mov 0,%i0 ret restore call %g2 nop .long 411 mov 0,%i0 ret restore call %g2 nop .long 412 mov 0,%i0 ret restore call %g2 nop .long 413 mov 0,%i0 ret restore call %g2 nop .long 414 mov 0,%i0 ret restore call %g2 nop .long 415 mov 0,%i0 ret restore call %g2 nop .long 416 mov 0,%i0 ret restore call %g2 nop .long 417 mov 0,%i0 ret restore call %g2 nop .long 418 mov 0,%i0 ret restore call %g2 nop .long 419 mov 0,%i0 ret restore call %g2 nop .long 420 mov 0,%i0 ret restore call %g2 nop .long 421 mov 0,%i0 ret restore call %g2 nop .long 422 mov 0,%i0 ret restore call %g2 nop .long 423 mov 0,%i0 ret restore call %g2 nop .long 424 mov 0,%i0 ret restore call %g2 nop .long 425 mov 0,%i0 ret restore call %g2 nop .long 426 mov 0,%i0 ret restore call %g2 nop .long 427 mov 0,%i0 ret restore call %g2 nop .long 428 mov 0,%i0 ret restore call %g2 nop .long 429 mov 0,%i0 ret restore call %g2 nop .long 430 mov 0,%i0 ret restore call %g2 nop .long 431 mov 0,%i0 ret restore call %g2 nop .long 432 mov 0,%i0 ret restore call %g2 nop .long 433 mov 0,%i0 ret restore call %g2 nop .long 434 mov 0,%i0 ret restore call %g2 nop .long 435 mov 0,%i0 ret restore call %g2 nop .long 436 mov 0,%i0 ret restore call %g2 nop .long 437 mov 0,%i0 ret restore call %g2 nop .long 438 mov 0,%i0 ret restore call %g2 nop .long 439 mov 0,%i0 ret restore call %g2 nop .long 440 mov 0,%i0 ret restore call %g2 nop .long 441 mov 0,%i0 ret restore call %g2 nop .long 442 mov 0,%i0 ret restore call %g2 nop .long 443 mov 0,%i0 ret restore call %g2 nop .long 444 mov 0,%i0 ret restore call %g2 nop .long 445 mov 0,%i0 ret restore call %g2 nop .long 446 mov 0,%i0 ret restore call %g2 nop .long 447 mov 0,%i0 ret restore call %g2 nop .long 448 mov 0,%i0 ret restore call %g2 nop .long 449 mov 0,%i0 ret restore call %g2 nop .long 450 mov 0,%i0 ret restore call %g2 nop .long 451 mov 0,%i0 ret restore call %g2 nop .long 452 mov 0,%i0 ret restore call %g2 nop .long 453 mov 0,%i0 ret restore call %g2 nop .long 454 mov 0,%i0 ret restore call %g2 nop .long 455 mov 0,%i0 ret restore call %g2 nop .long 456 mov 0,%i0 ret restore call %g2 nop .long 457 mov 0,%i0 ret restore call %g2 nop .long 458 mov 0,%i0 ret restore call %g2 nop .long 459 mov 0,%i0 ret restore call %g2 nop .long 460 mov 0,%i0 ret restore call %g2 nop .long 461 mov 0,%i0 ret restore call %g2 nop .long 462 mov 0,%i0 ret restore call %g2 nop .long 463 mov 0,%i0 ret restore call %g2 nop .long 464 mov 0,%i0 ret restore call %g2 nop .long 465 mov 0,%i0 ret restore call %g2 nop .long 466 mov 0,%i0 ret restore call %g2 nop .long 467 mov 0,%i0 ret restore call %g2 nop .long 468 mov 0,%i0 ret restore call %g2 nop .long 469 mov 0,%i0 ret restore call %g2 nop .long 470 mov 0,%i0 ret restore call %g2 nop .long 471 mov 0,%i0 ret restore call %g2 nop .long 472 mov 0,%i0 ret restore call %g2 nop .long 473 mov 0,%i0 ret restore call %g2 nop .long 474 mov 0,%i0 ret restore call %g2 nop .long 475 mov 0,%i0 ret restore call %g2 nop .long 476 mov 0,%i0 ret restore call %g2 nop .long 477 mov 0,%i0 ret restore call %g2 nop .long 478 mov 0,%i0 ret restore call %g2 nop .long 479 mov 0,%i0 ret restore call %g2 nop .long 480 mov 0,%i0 ret restore call %g2 nop .long 481 mov 0,%i0 ret restore call %g2 nop .long 482 mov 0,%i0 ret restore call %g2 nop .long 483 mov 0,%i0 ret restore call %g2 nop .long 484 mov 0,%i0 ret restore call %g2 nop .long 485 mov 0,%i0 ret restore call %g2 nop .long 486 mov 0,%i0 ret restore call %g2 nop .long 487 mov 0,%i0 ret restore call %g2 nop .long 488 mov 0,%i0 ret restore call %g2 nop .long 489 mov 0,%i0 ret restore call %g2 nop .long 490 mov 0,%i0 ret restore call %g2 nop .long 491 mov 0,%i0 ret restore call %g2 nop .long 492 mov 0,%i0 ret restore call %g2 nop .long 493 mov 0,%i0 ret restore call %g2 nop .long 494 mov 0,%i0 ret restore call %g2 nop .long 495 mov 0,%i0 ret restore call %g2 nop .long 496 mov 0,%i0 ret restore call %g2 nop .long 497 mov 0,%i0 ret restore call %g2 nop .long 498 mov 0,%i0 ret restore call %g2 nop .long 499 mov 0,%i0 ret restore call %g2 nop .long 500 mov 0,%i0 ret restore call %g2 nop .long 501 mov 0,%i0 ret restore call %g2 nop .long 502 mov 0,%i0 ret restore call %g2 nop .long 503 mov 0,%i0 ret restore call %g2 nop .long 504 mov 0,%i0 ret restore call %g2 nop .long 505 mov 0,%i0 ret restore call %g2 nop .long 506 mov 0,%i0 ret restore call %g2 nop .long 507 mov 0,%i0 ret restore call %g2 nop .long 508 mov 0,%i0 ret restore call %g2 nop .long 509 mov 0,%i0 ret restore call %g2 nop .long 510 mov 0,%i0 ret restore call %g2 nop .long 511 mov 0,%i0 ret restore call %g2 nop .long 512 mov 0,%i0 ret restore call %g2 nop .long 513 mov 0,%i0 ret restore call %g2 nop .long 514 mov 0,%i0 ret restore call %g2 nop .long 515 mov 0,%i0 ret restore call %g2 nop .long 516 mov 0,%i0 ret restore call %g2 nop .long 517 mov 0,%i0 ret restore call %g2 nop .long 518 mov 0,%i0 ret restore call %g2 nop .long 519 mov 0,%i0 ret restore call %g2 nop .long 520 mov 0,%i0 ret restore call %g2 nop .long 521 mov 0,%i0 ret restore call %g2 nop .long 522 mov 0,%i0 ret restore call %g2 nop .long 523 mov 0,%i0 ret restore call %g2 nop .long 524 mov 0,%i0 ret restore call %g2 nop .long 525 mov 0,%i0 ret restore call %g2 nop .long 526 mov 0,%i0 ret restore call %g2 nop .long 527 mov 0,%i0 ret restore call %g2 nop .long 528 mov 0,%i0 ret restore call %g2 nop .long 529 mov 0,%i0 ret restore call %g2 nop .long 530 mov 0,%i0 ret restore call %g2 nop .long 531 mov 0,%i0 ret restore call %g2 nop .long 532 mov 0,%i0 ret restore call %g2 nop .long 533 mov 0,%i0 ret restore call %g2 nop .long 534 mov 0,%i0 ret restore call %g2 nop .long 535 mov 0,%i0 ret restore call %g2 nop .long 536 mov 0,%i0 ret restore call %g2 nop .long 537 mov 0,%i0 ret restore call %g2 nop .long 538 mov 0,%i0 ret restore call %g2 nop .long 539 mov 0,%i0 ret restore call %g2 nop .long 540 mov 0,%i0 ret restore call %g2 nop .long 541 mov 0,%i0 ret restore call %g2 nop .long 542 mov 0,%i0 ret restore call %g2 nop .long 543 mov 0,%i0 ret restore call %g2 nop .long 544 mov 0,%i0 ret restore call %g2 nop .long 545 mov 0,%i0 ret restore call %g2 nop .long 546 mov 0,%i0 ret restore call %g2 nop .long 547 mov 0,%i0 ret restore call %g2 nop .long 548 mov 0,%i0 ret restore call %g2 nop .long 549 mov 0,%i0 ret restore call %g2 nop .long 550 mov 0,%i0 ret restore call %g2 nop .long 551 mov 0,%i0 ret restore call %g2 nop .long 552 mov 0,%i0 ret restore call %g2 nop .long 553 mov 0,%i0 ret restore call %g2 nop .long 554 mov 0,%i0 ret restore call %g2 nop .long 555 mov 0,%i0 ret restore call %g2 nop .long 556 mov 0,%i0 ret restore call %g2 nop .long 557 mov 0,%i0 ret restore call %g2 nop .long 558 mov 0,%i0 ret restore call %g2 nop .long 559 mov 0,%i0 ret restore call %g2 nop .long 560 mov 0,%i0 ret restore call %g2 nop .long 561 mov 0,%i0 ret restore call %g2 nop .long 562 mov 0,%i0 ret restore call %g2 nop .long 563 mov 0,%i0 ret restore call %g2 nop .long 564 mov 0,%i0 ret restore call %g2 nop .long 565 mov 0,%i0 ret restore call %g2 nop .long 566 mov 0,%i0 ret restore call %g2 nop .long 567 mov 0,%i0 ret restore call %g2 nop .long 568 mov 0,%i0 ret restore call %g2 nop .long 569 mov 0,%i0 ret restore call %g2 nop .long 570 mov 0,%i0 ret restore call %g2 nop .long 571 mov 0,%i0 ret restore call %g2 nop .long 572 mov 0,%i0 ret restore call %g2 nop .long 573 mov 0,%i0 ret restore call %g2 nop .long 574 mov 0,%i0 ret restore call %g2 nop .long 575 mov 0,%i0 ret restore call %g2 nop .long 576 mov 0,%i0 ret restore call %g2 nop .long 577 mov 0,%i0 ret restore call %g2 nop .long 578 mov 0,%i0 ret restore call %g2 nop .long 579 mov 0,%i0 ret restore call %g2 nop .long 580 mov 0,%i0 ret restore call %g2 nop .long 581 mov 0,%i0 ret restore call %g2 nop .long 582 mov 0,%i0 ret restore call %g2 nop .long 583 mov 0,%i0 ret restore call %g2 nop .long 584 mov 0,%i0 ret restore call %g2 nop .long 585 mov 0,%i0 ret restore call %g2 nop .long 586 mov 0,%i0 ret restore call %g2 nop .long 587 mov 0,%i0 ret restore call %g2 nop .long 588 mov 0,%i0 ret restore call %g2 nop .long 589 mov 0,%i0 ret restore call %g2 nop .long 590 mov 0,%i0 ret restore call %g2 nop .long 591 mov 0,%i0 ret restore call %g2 nop .long 592 mov 0,%i0 ret restore call %g2 nop .long 593 mov 0,%i0 ret restore call %g2 nop .long 594 mov 0,%i0 ret restore call %g2 nop .long 595 mov 0,%i0 ret restore call %g2 nop .long 596 mov 0,%i0 ret restore call %g2 nop .long 597 mov 0,%i0 ret restore call %g2 nop .long 598 mov 0,%i0 ret restore call %g2 nop .long 599 mov 0,%i0 ret restore call %g2 nop .long 600 mov 0,%i0 ret restore call %g2 nop .long 601 mov 0,%i0 ret restore call %g2 nop .long 602 mov 0,%i0 ret restore call %g2 nop .long 603 mov 0,%i0 ret restore call %g2 nop .long 604 mov 0,%i0 ret restore call %g2 nop .long 605 mov 0,%i0 ret restore call %g2 nop .long 606 mov 0,%i0 ret restore call %g2 nop .long 607 mov 0,%i0 ret restore call %g2 nop .long 608 mov 0,%i0 ret restore call %g2 nop .long 609 mov 0,%i0 ret restore call %g2 nop .long 610 mov 0,%i0 ret restore call %g2 nop .long 611 mov 0,%i0 ret restore call %g2 nop .long 612 mov 0,%i0 ret restore call %g2 nop .long 613 mov 0,%i0 ret restore call %g2 nop .long 614 mov 0,%i0 ret restore call %g2 nop .long 615 mov 0,%i0 ret restore call %g2 nop .long 616 mov 0,%i0 ret restore call %g2 nop .long 617 mov 0,%i0 ret restore call %g2 nop .long 618 mov 0,%i0 ret restore call %g2 nop .long 619 mov 0,%i0 ret restore call %g2 nop .long 620 mov 0,%i0 ret restore call %g2 nop .long 621 mov 0,%i0 ret restore call %g2 nop .long 622 mov 0,%i0 ret restore call %g2 nop .long 623 mov 0,%i0 ret restore call %g2 nop .long 624 mov 0,%i0 ret restore call %g2 nop .long 625 mov 0,%i0 ret restore call %g2 nop .long 626 mov 0,%i0 ret restore call %g2 nop .long 627 mov 0,%i0 ret restore call %g2 nop .long 628 mov 0,%i0 ret restore call %g2 nop .long 629 mov 0,%i0 ret restore call %g2 nop .long 630 mov 0,%i0 ret restore call %g2 nop .long 631 mov 0,%i0 ret restore call %g2 nop .long 632 mov 0,%i0 ret restore call %g2 nop .long 633 mov 0,%i0 ret restore call %g2 nop .long 634 mov 0,%i0 ret restore call %g2 nop .long 635 mov 0,%i0 ret restore call %g2 nop .long 636 mov 0,%i0 ret restore call %g2 nop .long 637 mov 0,%i0 ret restore call %g2 nop .long 638 mov 0,%i0 ret restore call %g2 nop .long 639 mov 0,%i0 ret restore call %g2 nop .long 640 mov 0,%i0 ret restore call %g2 nop .long 641 mov 0,%i0 ret restore call %g2 nop .long 642 mov 0,%i0 ret restore call %g2 nop .long 643 mov 0,%i0 ret restore call %g2 nop .long 644 mov 0,%i0 ret restore call %g2 nop .long 645 mov 0,%i0 ret restore call %g2 nop .long 646 mov 0,%i0 ret restore call %g2 nop .long 647 mov 0,%i0 ret restore call %g2 nop .long 648 mov 0,%i0 ret restore call %g2 nop .long 649 mov 0,%i0 ret restore call %g2 nop .long 650 mov 0,%i0 ret restore call %g2 nop .long 651 mov 0,%i0 ret restore call %g2 nop .long 652 mov 0,%i0 ret restore call %g2 nop .long 653 mov 0,%i0 ret restore call %g2 nop .long 654 mov 0,%i0 ret restore call %g2 nop .long 655 mov 0,%i0 ret restore call %g2 nop .long 656 mov 0,%i0 ret restore call %g2 nop .long 657 mov 0,%i0 ret restore call %g2 nop .long 658 mov 0,%i0 ret restore call %g2 nop .long 659 mov 0,%i0 ret restore call %g2 nop .long 660 mov 0,%i0 ret restore call %g2 nop .long 661 mov 0,%i0 ret restore call %g2 nop .long 662 mov 0,%i0 ret restore call %g2 nop .long 663 mov 0,%i0 ret restore call %g2 nop .long 664 mov 0,%i0 ret restore call %g2 nop .long 665 mov 0,%i0 ret restore call %g2 nop .long 666 mov 0,%i0 ret restore call %g2 nop .long 667 mov 0,%i0 ret restore call %g2 nop .long 668 mov 0,%i0 ret restore call %g2 nop .long 669 mov 0,%i0 ret restore call %g2 nop .long 670 mov 0,%i0 ret restore call %g2 nop .long 671 mov 0,%i0 ret restore call %g2 nop .long 672 mov 0,%i0 ret restore call %g2 nop .long 673 mov 0,%i0 ret restore call %g2 nop .long 674 mov 0,%i0 ret restore call %g2 nop .long 675 mov 0,%i0 ret restore call %g2 nop .long 676 mov 0,%i0 ret restore call %g2 nop .long 677 mov 0,%i0 ret restore call %g2 nop .long 678 mov 0,%i0 ret restore call %g2 nop .long 679 mov 0,%i0 ret restore call %g2 nop .long 680 mov 0,%i0 ret restore call %g2 nop .long 681 mov 0,%i0 ret restore call %g2 nop .long 682 mov 0,%i0 ret restore call %g2 nop .long 683 mov 0,%i0 ret restore call %g2 nop .long 684 mov 0,%i0 ret restore call %g2 nop .long 685 mov 0,%i0 ret restore call %g2 nop .long 686 mov 0,%i0 ret restore call %g2 nop .long 687 mov 0,%i0 ret restore call %g2 nop .long 688 mov 0,%i0 ret restore call %g2 nop .long 689 mov 0,%i0 ret restore call %g2 nop .long 690 mov 0,%i0 ret restore call %g2 nop .long 691 mov 0,%i0 ret restore call %g2 nop .long 692 mov 0,%i0 ret restore call %g2 nop .long 693 mov 0,%i0 ret restore call %g2 nop .long 694 mov 0,%i0 ret restore call %g2 nop .long 695 mov 0,%i0 ret restore call %g2 nop .long 696 mov 0,%i0 ret restore call %g2 nop .long 697 mov 0,%i0 ret restore call %g2 nop .long 698 mov 0,%i0 ret restore call %g2 nop .long 699 mov 0,%i0 ret restore call %g2 nop .long 700 mov 0,%i0 ret restore call %g2 nop .long 701 mov 0,%i0 ret restore call %g2 nop .long 702 mov 0,%i0 ret restore call %g2 nop .long 703 mov 0,%i0 ret restore call %g2 nop .long 704 mov 0,%i0 ret restore call %g2 nop .long 705 mov 0,%i0 ret restore call %g2 nop .long 706 mov 0,%i0 ret restore call %g2 nop .long 707 mov 0,%i0 ret restore call %g2 nop .long 708 mov 0,%i0 ret restore call %g2 nop .long 709 mov 0,%i0 ret restore call %g2 nop .long 710 mov 0,%i0 ret restore call %g2 nop .long 711 mov 0,%i0 ret restore call %g2 nop .long 712 mov 0,%i0 ret restore call %g2 nop .long 713 mov 0,%i0 ret restore call %g2 nop .long 714 mov 0,%i0 ret restore call %g2 nop .long 715 mov 0,%i0 ret restore call %g2 nop .long 716 mov 0,%i0 ret restore call %g2 nop .long 717 mov 0,%i0 ret restore call %g2 nop .long 718 mov 0,%i0 ret restore call %g2 nop .long 719 mov 0,%i0 ret restore call %g2 nop .long 720 mov 0,%i0 ret restore call %g2 nop .long 721 mov 0,%i0 ret restore call %g2 nop .long 722 mov 0,%i0 ret restore call %g2 nop .long 723 mov 0,%i0 ret restore call %g2 nop .long 724 mov 0,%i0 ret restore call %g2 nop .long 725 mov 0,%i0 ret restore call %g2 nop .long 726 mov 0,%i0 ret restore call %g2 nop .long 727 mov 0,%i0 ret restore call %g2 nop .long 728 mov 0,%i0 ret restore call %g2 nop .long 729 mov 0,%i0 ret restore call %g2 nop .long 730 mov 0,%i0 ret restore call %g2 nop .long 731 mov 0,%i0 ret restore call %g2 nop .long 732 mov 0,%i0 ret restore call %g2 nop .long 733 mov 0,%i0 ret restore call %g2 nop .long 734 mov 0,%i0 ret restore call %g2 nop .long 735 mov 0,%i0 ret restore call %g2 nop .long 736 mov 0,%i0 ret restore call %g2 nop .long 737 mov 0,%i0 ret restore call %g2 nop .long 738 mov 0,%i0 ret restore call %g2 nop .long 739 mov 0,%i0 ret restore call %g2 nop .long 740 mov 0,%i0 ret restore call %g2 nop .long 741 mov 0,%i0 ret restore call %g2 nop .long 742 mov 0,%i0 ret restore call %g2 nop .long 743 mov 0,%i0 ret restore call %g2 nop .long 744 mov 0,%i0 ret restore call %g2 nop .long 745 mov 0,%i0 ret restore call %g2 nop .long 746 mov 0,%i0 ret restore call %g2 nop .long 747 mov 0,%i0 ret restore call %g2 nop .long 748 mov 0,%i0 ret restore call %g2 nop .long 749 mov 0,%i0 ret restore call %g2 nop .long 750 mov 0,%i0 ret restore call %g2 nop .long 751 mov 0,%i0 ret restore call %g2 nop .long 752 mov 0,%i0 ret restore call %g2 nop .long 753 mov 0,%i0 ret restore call %g2 nop .long 754 mov 0,%i0 ret restore call %g2 nop .long 755 mov 0,%i0 ret restore call %g2 nop .long 756 mov 0,%i0 ret restore call %g2 nop .long 757 mov 0,%i0 ret restore call %g2 nop .long 758 mov 0,%i0 ret restore call %g2 nop .long 759 mov 0,%i0 ret restore call %g2 nop .long 760 mov 0,%i0 ret restore call %g2 nop .long 761 mov 0,%i0 ret restore call %g2 nop .long 762 mov 0,%i0 ret restore call %g2 nop .long 763 mov 0,%i0 ret restore call %g2 nop .long 764 mov 0,%i0 ret restore call %g2 nop .long 765 mov 0,%i0 ret restore call %g2 nop .long 766 mov 0,%i0 ret restore call %g2 nop .long 767 mov 0,%i0 ret restore call %g2 nop .long 768 mov 0,%i0 ret restore call %g2 nop .long 769 mov 0,%i0 ret restore call %g2 nop .long 770 mov 0,%i0 ret restore call %g2 nop .long 771 mov 0,%i0 ret restore call %g2 nop .long 772 mov 0,%i0 ret restore call %g2 nop .long 773 mov 0,%i0 ret restore call %g2 nop .long 774 mov 0,%i0 ret restore call %g2 nop .long 775 mov 0,%i0 ret restore call %g2 nop .long 776 mov 0,%i0 ret restore call %g2 nop .long 777 mov 0,%i0 ret restore call %g2 nop .long 778 mov 0,%i0 ret restore call %g2 nop .long 779 mov 0,%i0 ret restore call %g2 nop .long 780 mov 0,%i0 ret restore call %g2 nop .long 781 mov 0,%i0 ret restore call %g2 nop .long 782 mov 0,%i0 ret restore call %g2 nop .long 783 mov 0,%i0 ret restore call %g2 nop .long 784 mov 0,%i0 ret restore call %g2 nop .long 785 mov 0,%i0 ret restore call %g2 nop .long 786 mov 0,%i0 ret restore call %g2 nop .long 787 mov 0,%i0 ret restore call %g2 nop .long 788 mov 0,%i0 ret restore call %g2 nop .long 789 mov 0,%i0 ret restore call %g2 nop .long 790 mov 0,%i0 ret restore call %g2 nop .long 791 mov 0,%i0 ret restore call %g2 nop .long 792 mov 0,%i0 ret restore call %g2 nop .long 793 mov 0,%i0 ret restore call %g2 nop .long 794 mov 0,%i0 ret restore call %g2 nop .long 795 mov 0,%i0 ret restore call %g2 nop .long 796 mov 0,%i0 ret restore call %g2 nop .long 797 mov 0,%i0 ret restore call %g2 nop .long 798 mov 0,%i0 ret restore call %g2 nop .long 799 mov 0,%i0 ret restore call %g2 nop .long 800 mov 0,%i0 ret restore call %g2 nop .long 801 mov 0,%i0 ret restore call %g2 nop .long 802 mov 0,%i0 ret restore call %g2 nop .long 803 mov 0,%i0 ret restore call %g2 nop .long 804 mov 0,%i0 ret restore call %g2 nop .long 805 mov 0,%i0 ret restore call %g2 nop .long 806 mov 0,%i0 ret restore call %g2 nop .long 807 mov 0,%i0 ret restore call %g2 nop .long 808 mov 0,%i0 ret restore call %g2 nop .long 809 mov 0,%i0 ret restore call %g2 nop .long 810 mov 0,%i0 ret restore call %g2 nop .long 811 mov 0,%i0 ret restore call %g2 nop .long 812 mov 0,%i0 ret restore call %g2 nop .long 813 mov 0,%i0 ret restore call %g2 nop .long 814 mov 0,%i0 ret restore call %g2 nop .long 815 mov 0,%i0 ret restore call %g2 nop .long 816 mov 0,%i0 ret restore call %g2 nop .long 817 mov 0,%i0 ret restore call %g2 nop .long 818 mov 0,%i0 ret restore call %g2 nop .long 819 mov 0,%i0 ret restore call %g2 nop .long 820 mov 0,%i0 ret restore call %g2 nop .long 821 mov 0,%i0 ret restore call %g2 nop .long 822 mov 0,%i0 ret restore call %g2 nop .long 823 mov 0,%i0 ret restore call %g2 nop .long 824 mov 0,%i0 ret restore call %g2 nop .long 825 mov 0,%i0 ret restore call %g2 nop .long 826 mov 0,%i0 ret restore call %g2 nop .long 827 mov 0,%i0 ret restore call %g2 nop .long 828 mov 0,%i0 ret restore call %g2 nop .long 829 mov 0,%i0 ret restore call %g2 nop .long 830 mov 0,%i0 ret restore call %g2 nop .long 831 mov 0,%i0 ret restore call %g2 nop .long 832 mov 0,%i0 ret restore call %g2 nop .long 833 mov 0,%i0 ret restore call %g2 nop .long 834 mov 0,%i0 ret restore call %g2 nop .long 835 mov 0,%i0 ret restore call %g2 nop .long 836 mov 0,%i0 ret restore call %g2 nop .long 837 mov 0,%i0 ret restore call %g2 nop .long 838 mov 0,%i0 ret restore call %g2 nop .long 839 mov 0,%i0 ret restore call %g2 nop .long 840 mov 0,%i0 ret restore call %g2 nop .long 841 mov 0,%i0 ret restore call %g2 nop .long 842 mov 0,%i0 ret restore call %g2 nop .long 843 mov 0,%i0 ret restore call %g2 nop .long 844 mov 0,%i0 ret restore call %g2 nop .long 845 mov 0,%i0 ret restore call %g2 nop .long 846 mov 0,%i0 ret restore call %g2 nop .long 847 mov 0,%i0 ret restore call %g2 nop .long 848 mov 0,%i0 ret restore call %g2 nop .long 849 mov 0,%i0 ret restore call %g2 nop .long 850 mov 0,%i0 ret restore call %g2 nop .long 851 mov 0,%i0 ret restore call %g2 nop .long 852 mov 0,%i0 ret restore call %g2 nop .long 853 mov 0,%i0 ret restore call %g2 nop .long 854 mov 0,%i0 ret restore call %g2 nop .long 855 mov 0,%i0 ret restore call %g2 nop .long 856 mov 0,%i0 ret restore call %g2 nop .long 857 mov 0,%i0 ret restore call %g2 nop .long 858 mov 0,%i0 ret restore call %g2 nop .long 859 mov 0,%i0 ret restore call %g2 nop .long 860 mov 0,%i0 ret restore call %g2 nop .long 861 mov 0,%i0 ret restore call %g2 nop .long 862 mov 0,%i0 ret restore call %g2 nop .long 863 mov 0,%i0 ret restore call %g2 nop .long 864 mov 0,%i0 ret restore call %g2 nop .long 865 mov 0,%i0 ret restore call %g2 nop .long 866 mov 0,%i0 ret restore call %g2 nop .long 867 mov 0,%i0 ret restore call %g2 nop .long 868 mov 0,%i0 ret restore call %g2 nop .long 869 mov 0,%i0 ret restore call %g2 nop .long 870 mov 0,%i0 ret restore call %g2 nop .long 871 mov 0,%i0 ret restore call %g2 nop .long 872 mov 0,%i0 ret restore call %g2 nop .long 873 mov 0,%i0 ret restore call %g2 nop .long 874 mov 0,%i0 ret restore call %g2 nop .long 875 mov 0,%i0 ret restore call %g2 nop .long 876 mov 0,%i0 ret restore call %g2 nop .long 877 mov 0,%i0 ret restore call %g2 nop .long 878 mov 0,%i0 ret restore call %g2 nop .long 879 mov 0,%i0 ret restore call %g2 nop .long 880 mov 0,%i0 ret restore call %g2 nop .long 881 mov 0,%i0 ret restore call %g2 nop .long 882 mov 0,%i0 ret restore call %g2 nop .long 883 mov 0,%i0 ret restore call %g2 nop .long 884 mov 0,%i0 ret restore call %g2 nop .long 885 mov 0,%i0 ret restore call %g2 nop .long 886 mov 0,%i0 ret restore call %g2 nop .long 887 mov 0,%i0 ret restore call %g2 nop .long 888 mov 0,%i0 ret restore call %g2 nop .long 889 mov 0,%i0 ret restore call %g2 nop .long 890 mov 0,%i0 ret restore call %g2 nop .long 891 mov 0,%i0 ret restore call %g2 nop .long 892 mov 0,%i0 ret restore call %g2 nop .long 893 mov 0,%i0 ret restore call %g2 nop .long 894 mov 0,%i0 ret restore call %g2 nop .long 895 mov 0,%i0 ret restore call %g2 nop .long 896 mov 0,%i0 ret restore call %g2 nop .long 897 mov 0,%i0 ret restore call %g2 nop .long 898 mov 0,%i0 ret restore call %g2 nop .long 899 mov 0,%i0 ret restore call %g2 nop .long 900 mov 0,%i0 ret restore call %g2 nop .long 901 mov 0,%i0 ret restore call %g2 nop .long 902 mov 0,%i0 ret restore call %g2 nop .long 903 mov 0,%i0 ret restore call %g2 nop .long 904 mov 0,%i0 ret restore call %g2 nop .long 905 mov 0,%i0 ret restore call %g2 nop .long 906 mov 0,%i0 ret restore call %g2 nop .long 907 mov 0,%i0 ret restore call %g2 nop .long 908 mov 0,%i0 ret restore call %g2 nop .long 909 mov 0,%i0 ret restore call %g2 nop .long 910 mov 0,%i0 ret restore call %g2 nop .long 911 mov 0,%i0 ret restore call %g2 nop .long 912 mov 0,%i0 ret restore call %g2 nop .long 913 mov 0,%i0 ret restore call %g2 nop .long 914 mov 0,%i0 ret restore call %g2 nop .long 915 mov 0,%i0 ret restore call %g2 nop .long 916 mov 0,%i0 ret restore call %g2 nop .long 917 mov 0,%i0 ret restore call %g2 nop .long 918 mov 0,%i0 ret restore call %g2 nop .long 919 mov 0,%i0 ret restore call %g2 nop .long 920 mov 0,%i0 ret restore call %g2 nop .long 921 mov 0,%i0 ret restore call %g2 nop .long 922 mov 0,%i0 ret restore call %g2 nop .long 923 mov 0,%i0 ret restore call %g2 nop .long 924 mov 0,%i0 ret restore call %g2 nop .long 925 mov 0,%i0 ret restore call %g2 nop .long 926 mov 0,%i0 ret restore call %g2 nop .long 927 mov 0,%i0 ret restore call %g2 nop .long 928 mov 0,%i0 ret restore call %g2 nop .long 929 mov 0,%i0 ret restore call %g2 nop .long 930 mov 0,%i0 ret restore call %g2 nop .long 931 mov 0,%i0 ret restore call %g2 nop .long 932 mov 0,%i0 ret restore call %g2 nop .long 933 mov 0,%i0 ret restore call %g2 nop .long 934 mov 0,%i0 ret restore call %g2 nop .long 935 mov 0,%i0 ret restore call %g2 nop .long 936 mov 0,%i0 ret restore call %g2 nop .long 937 mov 0,%i0 ret restore call %g2 nop .long 938 mov 0,%i0 ret restore call %g2 nop .long 939 mov 0,%i0 ret restore call %g2 nop .long 940 mov 0,%i0 ret restore call %g2 nop .long 941 mov 0,%i0 ret restore call %g2 nop .long 942 mov 0,%i0 ret restore call %g2 nop .long 943 mov 0,%i0 ret restore call %g2 nop .long 944 mov 0,%i0 ret restore call %g2 nop .long 945 mov 0,%i0 ret restore call %g2 nop .long 946 mov 0,%i0 ret restore call %g2 nop .long 947 mov 0,%i0 ret restore call %g2 nop .long 948 mov 0,%i0 ret restore call %g2 nop .long 949 mov 0,%i0 ret restore call %g2 nop .long 950 mov 0,%i0 ret restore call %g2 nop .long 951 mov 0,%i0 ret restore call %g2 nop .long 952 mov 0,%i0 ret restore call %g2 nop .long 953 mov 0,%i0 ret restore call %g2 nop .long 954 mov 0,%i0 ret restore call %g2 nop .long 955 mov 0,%i0 ret restore call %g2 nop .long 956 mov 0,%i0 ret restore call %g2 nop .long 957 mov 0,%i0 ret restore call %g2 nop .long 958 mov 0,%i0 ret restore call %g2 nop .long 959 mov 0,%i0 ret restore call %g2 nop .long 960 mov 0,%i0 ret restore call %g2 nop .long 961 mov 0,%i0 ret restore call %g2 nop .long 962 mov 0,%i0 ret restore call %g2 nop .long 963 mov 0,%i0 ret restore call %g2 nop .long 964 mov 0,%i0 ret restore call %g2 nop .long 965 mov 0,%i0 ret restore call %g2 nop .long 966 mov 0,%i0 ret restore call %g2 nop .long 967 mov 0,%i0 ret restore call %g2 nop .long 968 mov 0,%i0 ret restore call %g2 nop .long 969 mov 0,%i0 ret restore call %g2 nop .long 970 mov 0,%i0 ret restore call %g2 nop .long 971 mov 0,%i0 ret restore call %g2 nop .long 972 mov 0,%i0 ret restore call %g2 nop .long 973 mov 0,%i0 ret restore call %g2 nop .long 974 mov 0,%i0 ret restore call %g2 nop .long 975 mov 0,%i0 ret restore call %g2 nop .long 976 mov 0,%i0 ret restore call %g2 nop .long 977 mov 0,%i0 ret restore call %g2 nop .long 978 mov 0,%i0 ret restore call %g2 nop .long 979 mov 0,%i0 ret restore call %g2 nop .long 980 mov 0,%i0 ret restore call %g2 nop .long 981 mov 0,%i0 ret restore call %g2 nop .long 982 mov 0,%i0 ret restore call %g2 nop .long 983 mov 0,%i0 ret restore call %g2 nop .long 984 mov 0,%i0 ret restore call %g2 nop .long 985 mov 0,%i0 ret restore call %g2 nop .long 986 mov 0,%i0 ret restore call %g2 nop .long 987 mov 0,%i0 ret restore call %g2 nop .long 988 mov 0,%i0 ret restore call %g2 nop .long 989 mov 0,%i0 ret restore call %g2 nop .long 990 mov 0,%i0 ret restore call %g2 nop .long 991 mov 0,%i0 ret restore call %g2 nop .long 992 mov 0,%i0 ret restore call %g2 nop .long 993 mov 0,%i0 ret restore call %g2 nop .long 994 mov 0,%i0 ret restore call %g2 nop .long 995 mov 0,%i0 ret restore call %g2 nop .long 996 mov 0,%i0 ret restore call %g2 nop .long 997 mov 0,%i0 ret restore call %g2 nop .long 998 mov 0,%i0 ret restore call %g2 nop .long 999 mov 0,%i0 ret restore call %g2 nop .long 1000 mov 0,%i0 ret restore call %g2 nop .long 1001 mov 0,%i0 ret restore call %g2 nop .long 1002 mov 0,%i0 ret restore call %g2 nop .long 1003 mov 0,%i0 ret restore call %g2 nop .long 1004 mov 0,%i0 ret restore call %g2 nop .long 1005 mov 0,%i0 ret restore call %g2 nop .long 1006 mov 0,%i0 ret restore call %g2 nop .long 1007 mov 0,%i0 ret restore call %g2 nop .long 1008 mov 0,%i0 ret restore call %g2 nop .long 1009 mov 0,%i0 ret restore call %g2 nop .long 1010 mov 0,%i0 ret restore call %g2 nop .long 1011 mov 0,%i0 ret restore call %g2 nop .long 1012 mov 0,%i0 ret restore call %g2 nop .long 1013 mov 0,%i0 ret restore call %g2 nop .long 1014 mov 0,%i0 ret restore call %g2 nop .long 1015 mov 0,%i0 ret restore call %g2 nop .long 1016 mov 0,%i0 ret restore call %g2 nop .long 1017 mov 0,%i0 ret restore call %g2 nop .long 1018 mov 0,%i0 ret restore call %g2 nop .long 1019 mov 0,%i0 ret restore call %g2 nop .long 1020 mov 0,%i0 ret restore call %g2 nop .long 1021 mov 0,%i0 ret restore call %g2 nop .long 1022 mov 0,%i0 ret restore call %g2 nop .long 1023 mov 0,%i0 ret restore call %g2 nop .long 1024 mov 0,%i0 ret restore call %g2 nop .long 1025 mov 0,%i0 ret restore call %g2 nop .long 1026 mov 0,%i0 ret restore call %g2 nop .long 1027 mov 0,%i0 ret restore call %g2 nop .long 1028 mov 0,%i0 ret restore call %g2 nop .long 1029 mov 0,%i0 ret restore call %g2 nop .long 1030 mov 0,%i0 ret restore call %g2 nop .long 1031 mov 0,%i0 ret restore call %g2 nop .long 1032 mov 0,%i0 ret restore call %g2 nop .long 1033 mov 0,%i0 ret restore call %g2 nop .long 1034 mov 0,%i0 ret restore call %g2 nop .long 1035 mov 0,%i0 ret restore call %g2 nop .long 1036 mov 0,%i0 ret restore call %g2 nop .long 1037 mov 0,%i0 ret restore call %g2 nop .long 1038 mov 0,%i0 ret restore call %g2 nop .long 1039 mov 0,%i0 ret restore call %g2 nop .long 1040 mov 0,%i0 ret restore call %g2 nop .long 1041 mov 0,%i0 ret restore call %g2 nop .long 1042 mov 0,%i0 ret restore call %g2 nop .long 1043 mov 0,%i0 ret restore call %g2 nop .long 1044 mov 0,%i0 ret restore call %g2 nop .long 1045 mov 0,%i0 ret restore call %g2 nop .long 1046 mov 0,%i0 ret restore call %g2 nop .long 1047 mov 0,%i0 ret restore call %g2 nop .long 1048 mov 0,%i0 ret restore call %g2 nop .long 1049 mov 0,%i0 ret restore call %g2 nop .long 1050 mov 0,%i0 ret restore call %g2 nop .long 1051 mov 0,%i0 ret restore call %g2 nop .long 1052 mov 0,%i0 ret restore call %g2 nop .long 1053 mov 0,%i0 ret restore call %g2 nop .long 1054 mov 0,%i0 ret restore call %g2 nop .long 1055 mov 0,%i0 ret restore call %g2 nop .long 1056 mov 0,%i0 ret restore call %g2 nop .long 1057 mov 0,%i0 ret restore call %g2 nop .long 1058 mov 0,%i0 ret restore call %g2 nop .long 1059 mov 0,%i0 ret restore call %g2 nop .long 1060 mov 0,%i0 ret restore call %g2 nop .long 1061 mov 0,%i0 ret restore call %g2 nop .long 1062 mov 0,%i0 ret restore call %g2 nop .long 1063 mov 0,%i0 ret restore call %g2 nop .long 1064 mov 0,%i0 ret restore call %g2 nop .long 1065 mov 0,%i0 ret restore call %g2 nop .long 1066 mov 0,%i0 ret restore call %g2 nop .long 1067 mov 0,%i0 ret restore call %g2 nop .long 1068 mov 0,%i0 ret restore call %g2 nop .long 1069 mov 0,%i0 ret restore call %g2 nop .long 1070 mov 0,%i0 ret restore call %g2 nop .long 1071 mov 0,%i0 ret restore call %g2 nop .long 1072 mov 0,%i0 ret restore call %g2 nop .long 1073 mov 0,%i0 ret restore call %g2 nop .long 1074 mov 0,%i0 ret restore call %g2 nop .long 1075 mov 0,%i0 ret restore call %g2 nop .long 1076 mov 0,%i0 ret restore call %g2 nop .long 1077 mov 0,%i0 ret restore call %g2 nop .long 1078 mov 0,%i0 ret restore call %g2 nop .long 1079 mov 0,%i0 ret restore call %g2 nop .long 1080 mov 0,%i0 ret restore call %g2 nop .long 1081 mov 0,%i0 ret restore call %g2 nop .long 1082 mov 0,%i0 ret restore call %g2 nop .long 1083 mov 0,%i0 ret restore call %g2 nop .long 1084 mov 0,%i0 ret restore call %g2 nop .long 1085 mov 0,%i0 ret restore call %g2 nop .long 1086 mov 0,%i0 ret restore call %g2 nop .long 1087 mov 0,%i0 ret restore call %g2 nop .long 1088 mov 0,%i0 ret restore call %g2 nop .long 1089 mov 0,%i0 ret restore call %g2 nop .long 1090 mov 0,%i0 ret restore call %g2 nop .long 1091 mov 0,%i0 ret restore call %g2 nop .long 1092 mov 0,%i0 ret restore call %g2 nop .long 1093 mov 0,%i0 ret restore call %g2 nop .long 1094 mov 0,%i0 ret restore call %g2 nop .long 1095 mov 0,%i0 ret restore call %g2 nop .long 1096 mov 0,%i0 ret restore call %g2 nop .long 1097 mov 0,%i0 ret restore call %g2 nop .long 1098 mov 0,%i0 ret restore call %g2 nop .long 1099 mov 0,%i0 ret restore call %g2 nop .long 1100 mov 0,%i0 ret restore call %g2 nop .long 1101 mov 0,%i0 ret restore call %g2 nop .long 1102 mov 0,%i0 ret restore call %g2 nop .long 1103 mov 0,%i0 ret restore call %g2 nop .long 1104 mov 0,%i0 ret restore call %g2 nop .long 1105 mov 0,%i0 ret restore call %g2 nop .long 1106 mov 0,%i0 ret restore call %g2 nop .long 1107 mov 0,%i0 ret restore call %g2 nop .long 1108 mov 0,%i0 ret restore call %g2 nop .long 1109 mov 0,%i0 ret restore call %g2 nop .long 1110 mov 0,%i0 ret restore call %g2 nop .long 1111 mov 0,%i0 ret restore call %g2 nop .long 1112 mov 0,%i0 ret restore call %g2 nop .long 1113 mov 0,%i0 ret restore call %g2 nop .long 1114 mov 0,%i0 ret restore call %g2 nop .long 1115 mov 0,%i0 ret restore call %g2 nop .long 1116 mov 0,%i0 ret restore call %g2 nop .long 1117 mov 0,%i0 ret restore call %g2 nop .long 1118 mov 0,%i0 ret restore call %g2 nop .long 1119 mov 0,%i0 ret restore call %g2 nop .long 1120 mov 0,%i0 ret restore call %g2 nop .long 1121 mov 0,%i0 ret restore call %g2 nop .long 1122 mov 0,%i0 ret restore call %g2 nop .long 1123 mov 0,%i0 ret restore call %g2 nop .long 1124 mov 0,%i0 ret restore call %g2 nop .long 1125 mov 0,%i0 ret restore call %g2 nop .long 1126 mov 0,%i0 ret restore call %g2 nop .long 1127 mov 0,%i0 ret restore call %g2 nop .long 1128 mov 0,%i0 ret restore call %g2 nop .long 1129 mov 0,%i0 ret restore call %g2 nop .long 1130 mov 0,%i0 ret restore call %g2 nop .long 1131 mov 0,%i0 ret restore call %g2 nop .long 1132 mov 0,%i0 ret restore call %g2 nop .long 1133 mov 0,%i0 ret restore call %g2 nop .long 1134 mov 0,%i0 ret restore call %g2 nop .long 1135 mov 0,%i0 ret restore call %g2 nop .long 1136 mov 0,%i0 ret restore call %g2 nop .long 1137 mov 0,%i0 ret restore call %g2 nop .long 1138 mov 0,%i0 ret restore call %g2 nop .long 1139 mov 0,%i0 ret restore call %g2 nop .long 1140 mov 0,%i0 ret restore call %g2 nop .long 1141 mov 0,%i0 ret restore call %g2 nop .long 1142 mov 0,%i0 ret restore call %g2 nop .long 1143 mov 0,%i0 ret restore call %g2 nop .long 1144 mov 0,%i0 ret restore call %g2 nop .long 1145 mov 0,%i0 ret restore call %g2 nop .long 1146 mov 0,%i0 ret restore call %g2 nop .long 1147 mov 0,%i0 ret restore call %g2 nop .long 1148 mov 0,%i0 ret restore call %g2 nop .long 1149 mov 0,%i0 ret restore call %g2 nop .long 1150 mov 0,%i0 ret restore call %g2 nop .long 1151 mov 0,%i0 ret restore call %g2 nop .long 1152 mov 0,%i0 ret restore call %g2 nop .long 1153 mov 0,%i0 ret restore call %g2 nop .long 1154 mov 0,%i0 ret restore call %g2 nop .long 1155 mov 0,%i0 ret restore call %g2 nop .long 1156 mov 0,%i0 ret restore call %g2 nop .long 1157 mov 0,%i0 ret restore call %g2 nop .long 1158 mov 0,%i0 ret restore call %g2 nop .long 1159 mov 0,%i0 ret restore call %g2 nop .long 1160 mov 0,%i0 ret restore call %g2 nop .long 1161 mov 0,%i0 ret restore call %g2 nop .long 1162 mov 0,%i0 ret restore call %g2 nop .long 1163 mov 0,%i0 ret restore call %g2 nop .long 1164 mov 0,%i0 ret restore call %g2 nop .long 1165 mov 0,%i0 ret restore call %g2 nop .long 1166 mov 0,%i0 ret restore call %g2 nop .long 1167 mov 0,%i0 ret restore call %g2 nop .long 1168 mov 0,%i0 ret restore call %g2 nop .long 1169 mov 0,%i0 ret restore call %g2 nop .long 1170 mov 0,%i0 ret restore call %g2 nop .long 1171 mov 0,%i0 ret restore call %g2 nop .long 1172 mov 0,%i0 ret restore call %g2 nop .long 1173 mov 0,%i0 ret restore call %g2 nop .long 1174 mov 0,%i0 ret restore call %g2 nop .long 1175 mov 0,%i0 ret restore call %g2 nop .long 1176 mov 0,%i0 ret restore call %g2 nop .long 1177 mov 0,%i0 ret restore call %g2 nop .long 1178 mov 0,%i0 ret restore call %g2 nop .long 1179 mov 0,%i0 ret restore call %g2 nop .long 1180 mov 0,%i0 ret restore call %g2 nop .long 1181 mov 0,%i0 ret restore call %g2 nop .long 1182 mov 0,%i0 ret restore call %g2 nop .long 1183 mov 0,%i0 ret restore call %g2 nop .long 1184 mov 0,%i0 ret restore call %g2 nop .long 1185 mov 0,%i0 ret restore call %g2 nop .long 1186 mov 0,%i0 ret restore call %g2 nop .long 1187 mov 0,%i0 ret restore call %g2 nop .long 1188 mov 0,%i0 ret restore call %g2 nop .long 1189 mov 0,%i0 ret restore call %g2 nop .long 1190 mov 0,%i0 ret restore call %g2 nop .long 1191 mov 0,%i0 ret restore call %g2 nop .long 1192 mov 0,%i0 ret restore call %g2 nop .long 1193 mov 0,%i0 ret restore call %g2 nop .long 1194 mov 0,%i0 ret restore call %g2 nop .long 1195 mov 0,%i0 ret restore call %g2 nop .long 1196 mov 0,%i0 ret restore call %g2 nop .long 1197 mov 0,%i0 ret restore call %g2 nop .long 1198 mov 0,%i0 ret restore call %g2 nop .long 1199 mov 0,%i0 ret restore call %g2 nop .long 1200 mov 0,%i0 ret restore call %g2 nop .long 1201 mov 0,%i0 ret restore call %g2 nop .long 1202 mov 0,%i0 ret restore call %g2 nop .long 1203 mov 0,%i0 ret restore call %g2 nop .long 1204 mov 0,%i0 ret restore call %g2 nop .long 1205 mov 0,%i0 ret restore call %g2 nop .long 1206 mov 0,%i0 ret restore call %g2 nop .long 1207 mov 0,%i0 ret restore call %g2 nop .long 1208 mov 0,%i0 ret restore call %g2 nop .long 1209 mov 0,%i0 ret restore call %g2 nop .long 1210 mov 0,%i0 ret restore call %g2 nop .long 1211 mov 0,%i0 ret restore call %g2 nop .long 1212 mov 0,%i0 ret restore call %g2 nop .long 1213 mov 0,%i0 ret restore call %g2 nop .long 1214 mov 0,%i0 ret restore call %g2 nop .long 1215 mov 0,%i0 ret restore call %g2 nop .long 1216 mov 0,%i0 ret restore call %g2 nop .long 1217 mov 0,%i0 ret restore call %g2 nop .long 1218 mov 0,%i0 ret restore call %g2 nop .long 1219 mov 0,%i0 ret restore call %g2 nop .long 1220 mov 0,%i0 ret restore call %g2 nop .long 1221 mov 0,%i0 ret restore call %g2 nop .long 1222 mov 0,%i0 ret restore call %g2 nop .long 1223 mov 0,%i0 ret restore call %g2 nop .long 1224 mov 0,%i0 ret restore call %g2 nop .long 1225 mov 0,%i0 ret restore call %g2 nop .long 1226 mov 0,%i0 ret restore call %g2 nop .long 1227 mov 0,%i0 ret restore call %g2 nop .long 1228 mov 0,%i0 ret restore call %g2 nop .long 1229 mov 0,%i0 ret restore call %g2 nop .long 1230 mov 0,%i0 ret restore call %g2 nop .long 1231 mov 0,%i0 ret restore call %g2 nop .long 1232 mov 0,%i0 ret restore call %g2 nop .long 1233 mov 0,%i0 ret restore call %g2 nop .long 1234 mov 0,%i0 ret restore call %g2 nop .long 1235 mov 0,%i0 ret restore call %g2 nop .long 1236 mov 0,%i0 ret restore call %g2 nop .long 1237 mov 0,%i0 ret restore call %g2 nop .long 1238 mov 0,%i0 ret restore call %g2 nop .long 1239 mov 0,%i0 ret restore call %g2 nop .long 1240 mov 0,%i0 ret restore call %g2 nop .long 1241 mov 0,%i0 ret restore call %g2 nop .long 1242 mov 0,%i0 ret restore call %g2 nop .long 1243 mov 0,%i0 ret restore call %g2 nop .long 1244 mov 0,%i0 ret restore call %g2 nop .long 1245 mov 0,%i0 ret restore call %g2 nop .long 1246 mov 0,%i0 ret restore call %g2 nop .long 1247 mov 0,%i0 ret restore call %g2 nop .long 1248 mov 0,%i0 ret restore call %g2 nop .long 1249 mov 0,%i0 ret restore call %g2 nop .long 1250 mov 0,%i0 ret restore call %g2 nop .long 1251 mov 0,%i0 ret restore call %g2 nop .long 1252 mov 0,%i0 ret restore call %g2 nop .long 1253 mov 0,%i0 ret restore call %g2 nop .long 1254 mov 0,%i0 ret restore call %g2 nop .long 1255 mov 0,%i0 ret restore call %g2 nop .long 1256 mov 0,%i0 ret restore call %g2 nop .long 1257 mov 0,%i0 ret restore call %g2 nop .long 1258 mov 0,%i0 ret restore call %g2 nop .long 1259 mov 0,%i0 ret restore call %g2 nop .long 1260 mov 0,%i0 ret restore call %g2 nop .long 1261 mov 0,%i0 ret restore call %g2 nop .long 1262 mov 0,%i0 ret restore call %g2 nop .long 1263 mov 0,%i0 ret restore call %g2 nop .long 1264 mov 0,%i0 ret restore call %g2 nop .long 1265 mov 0,%i0 ret restore call %g2 nop .long 1266 mov 0,%i0 ret restore call %g2 nop .long 1267 mov 0,%i0 ret restore call %g2 nop .long 1268 mov 0,%i0 ret restore call %g2 nop .long 1269 mov 0,%i0 ret restore call %g2 nop .long 1270 mov 0,%i0 ret restore call %g2 nop .long 1271 mov 0,%i0 ret restore call %g2 nop .long 1272 mov 0,%i0 ret restore call %g2 nop .long 1273 mov 0,%i0 ret restore call %g2 nop .long 1274 mov 0,%i0 ret restore call %g2 nop .long 1275 mov 0,%i0 ret restore call %g2 nop .long 1276 mov 0,%i0 ret restore call %g2 nop .long 1277 mov 0,%i0 ret restore call %g2 nop .long 1278 mov 0,%i0 ret restore call %g2 nop .long 1279 mov 0,%i0 ret restore call %g2 nop .long 1280 mov 0,%i0 ret restore call %g2 nop .long 1281 mov 0,%i0 ret restore call %g2 nop .long 1282 mov 0,%i0 ret restore call %g2 nop .long 1283 mov 0,%i0 ret restore call %g2 nop .long 1284 mov 0,%i0 ret restore call %g2 nop .long 1285 mov 0,%i0 ret restore call %g2 nop .long 1286 mov 0,%i0 ret restore call %g2 nop .long 1287 mov 0,%i0 ret restore call %g2 nop .long 1288 mov 0,%i0 ret restore call %g2 nop .long 1289 mov 0,%i0 ret restore call %g2 nop .long 1290 mov 0,%i0 ret restore call %g2 nop .long 1291 mov 0,%i0 ret restore call %g2 nop .long 1292 mov 0,%i0 ret restore call %g2 nop .long 1293 mov 0,%i0 ret restore call %g2 nop .long 1294 mov 0,%i0 ret restore call %g2 nop .long 1295 mov 0,%i0 ret restore call %g2 nop .long 1296 mov 0,%i0 ret restore call %g2 nop .long 1297 mov 0,%i0 ret restore call %g2 nop .long 1298 mov 0,%i0 ret restore call %g2 nop .long 1299 mov 0,%i0 ret restore call %g2 nop .long 1300 mov 0,%i0 ret restore call %g2 nop .long 1301 mov 0,%i0 ret restore call %g2 nop .long 1302 mov 0,%i0 ret restore call %g2 nop .long 1303 mov 0,%i0 ret restore call %g2 nop .long 1304 mov 0,%i0 ret restore call %g2 nop .long 1305 mov 0,%i0 ret restore call %g2 nop .long 1306 mov 0,%i0 ret restore call %g2 nop .long 1307 mov 0,%i0 ret restore call %g2 nop .long 1308 mov 0,%i0 ret restore call %g2 nop .long 1309 mov 0,%i0 ret restore call %g2 nop .long 1310 mov 0,%i0 ret restore call %g2 nop .long 1311 mov 0,%i0 ret restore call %g2 nop .long 1312 mov 0,%i0 ret restore call %g2 nop .long 1313 mov 0,%i0 ret restore call %g2 nop .long 1314 mov 0,%i0 ret restore call %g2 nop .long 1315 mov 0,%i0 ret restore call %g2 nop .long 1316 mov 0,%i0 ret restore call %g2 nop .long 1317 mov 0,%i0 ret restore call %g2 nop .long 1318 mov 0,%i0 ret restore call %g2 nop .long 1319 mov 0,%i0 ret restore call %g2 nop .long 1320 mov 0,%i0 ret restore call %g2 nop .long 1321 mov 0,%i0 ret restore call %g2 nop .long 1322 mov 0,%i0 ret restore call %g2 nop .long 1323 mov 0,%i0 ret restore call %g2 nop .long 1324 mov 0,%i0 ret restore call %g2 nop .long 1325 mov 0,%i0 ret restore call %g2 nop .long 1326 mov 0,%i0 ret restore call %g2 nop .long 1327 mov 0,%i0 ret restore call %g2 nop .long 1328 mov 0,%i0 ret restore call %g2 nop .long 1329 mov 0,%i0 ret restore call %g2 nop .long 1330 mov 0,%i0 ret restore call %g2 nop .long 1331 mov 0,%i0 ret restore call %g2 nop .long 1332 mov 0,%i0 ret restore call %g2 nop .long 1333 mov 0,%i0 ret restore call %g2 nop .long 1334 mov 0,%i0 ret restore call %g2 nop .long 1335 mov 0,%i0 ret restore call %g2 nop .long 1336 mov 0,%i0 ret restore call %g2 nop .long 1337 mov 0,%i0 ret restore call %g2 nop .long 1338 mov 0,%i0 ret restore call %g2 nop .long 1339 mov 0,%i0 ret restore call %g2 nop .long 1340 mov 0,%i0 ret restore call %g2 nop .long 1341 mov 0,%i0 ret restore call %g2 nop .long 1342 mov 0,%i0 ret restore call %g2 nop .long 1343 mov 0,%i0 ret restore call %g2 nop .long 1344 mov 0,%i0 ret restore call %g2 nop .long 1345 mov 0,%i0 ret restore call %g2 nop .long 1346 mov 0,%i0 ret restore call %g2 nop .long 1347 mov 0,%i0 ret restore call %g2 nop .long 1348 mov 0,%i0 ret restore call %g2 nop .long 1349 mov 0,%i0 ret restore call %g2 nop .long 1350 mov 0,%i0 ret restore call %g2 nop .long 1351 mov 0,%i0 ret restore call %g2 nop .long 1352 mov 0,%i0 ret restore call %g2 nop .long 1353 mov 0,%i0 ret restore call %g2 nop .long 1354 mov 0,%i0 ret restore call %g2 nop .long 1355 mov 0,%i0 ret restore call %g2 nop .long 1356 mov 0,%i0 ret restore call %g2 nop .long 1357 mov 0,%i0 ret restore call %g2 nop .long 1358 mov 0,%i0 ret restore call %g2 nop .long 1359 mov 0,%i0 ret restore call %g2 nop .long 1360 mov 0,%i0 ret restore call %g2 nop .long 1361 mov 0,%i0 ret restore call %g2 nop .long 1362 mov 0,%i0 ret restore call %g2 nop .long 1363 mov 0,%i0 ret restore call %g2 nop .long 1364 mov 0,%i0 ret restore call %g2 nop .long 1365 mov 0,%i0 ret restore call %g2 nop .long 1366 mov 0,%i0 ret restore call %g2 nop .long 1367 mov 0,%i0 ret restore call %g2 nop .long 1368 mov 0,%i0 ret restore call %g2 nop .long 1369 mov 0,%i0 ret restore call %g2 nop .long 1370 mov 0,%i0 ret restore call %g2 nop .long 1371 mov 0,%i0 ret restore call %g2 nop .long 1372 mov 0,%i0 ret restore call %g2 nop .long 1373 mov 0,%i0 ret restore call %g2 nop .long 1374 mov 0,%i0 ret restore call %g2 nop .long 1375 mov 0,%i0 ret restore call %g2 nop .long 1376 mov 0,%i0 ret restore call %g2 nop .long 1377 mov 0,%i0 ret restore call %g2 nop .long 1378 mov 0,%i0 ret restore call %g2 nop .long 1379 mov 0,%i0 ret restore call %g2 nop .long 1380 mov 0,%i0 ret restore call %g2 nop .long 1381 mov 0,%i0 ret restore call %g2 nop .long 1382 mov 0,%i0 ret restore call %g2 nop .long 1383 mov 0,%i0 ret restore call %g2 nop .long 1384 mov 0,%i0 ret restore call %g2 nop .long 1385 mov 0,%i0 ret restore call %g2 nop .long 1386 mov 0,%i0 ret restore call %g2 nop .long 1387 mov 0,%i0 ret restore call %g2 nop .long 1388 mov 0,%i0 ret restore call %g2 nop .long 1389 mov 0,%i0 ret restore call %g2 nop .long 1390 mov 0,%i0 ret restore call %g2 nop .long 1391 mov 0,%i0 ret restore call %g2 nop .long 1392 mov 0,%i0 ret restore call %g2 nop .long 1393 mov 0,%i0 ret restore call %g2 nop .long 1394 mov 0,%i0 ret restore call %g2 nop .long 1395 mov 0,%i0 ret restore call %g2 nop .long 1396 mov 0,%i0 ret restore call %g2 nop .long 1397 mov 0,%i0 ret restore call %g2 nop .long 1398 mov 0,%i0 ret restore call %g2 nop .long 1399 mov 0,%i0 ret restore call %g2 nop .long 1400 mov 0,%i0 ret restore call %g2 nop .long 1401 mov 0,%i0 ret restore call %g2 nop .long 1402 mov 0,%i0 ret restore call %g2 nop .long 1403 mov 0,%i0 ret restore call %g2 nop .long 1404 mov 0,%i0 ret restore call %g2 nop .long 1405 mov 0,%i0 ret restore call %g2 nop .long 1406 mov 0,%i0 ret restore call %g2 nop .long 1407 mov 0,%i0 ret restore call %g2 nop .long 1408 mov 0,%i0 ret restore call %g2 nop .long 1409 mov 0,%i0 ret restore call %g2 nop .long 1410 mov 0,%i0 ret restore call %g2 nop .long 1411 mov 0,%i0 ret restore call %g2 nop .long 1412 mov 0,%i0 ret restore call %g2 nop .long 1413 mov 0,%i0 ret restore call %g2 nop .long 1414 mov 0,%i0 ret restore call %g2 nop .long 1415 mov 0,%i0 ret restore call %g2 nop .long 1416 mov 0,%i0 ret restore call %g2 nop .long 1417 mov 0,%i0 ret restore call %g2 nop .long 1418 mov 0,%i0 ret restore call %g2 nop .long 1419 mov 0,%i0 ret restore call %g2 nop .long 1420 mov 0,%i0 ret restore call %g2 nop .long 1421 mov 0,%i0 ret restore call %g2 nop .long 1422 mov 0,%i0 ret restore call %g2 nop .long 1423 mov 0,%i0 ret restore call %g2 nop .long 1424 mov 0,%i0 ret restore call %g2 nop .long 1425 mov 0,%i0 ret restore call %g2 nop .long 1426 mov 0,%i0 ret restore call %g2 nop .long 1427 mov 0,%i0 ret restore call %g2 nop .long 1428 mov 0,%i0 ret restore call %g2 nop .long 1429 mov 0,%i0 ret restore call %g2 nop .long 1430 mov 0,%i0 ret restore call %g2 nop .long 1431 mov 0,%i0 ret restore call %g2 nop .long 1432 mov 0,%i0 ret restore call %g2 nop .long 1433 mov 0,%i0 ret restore call %g2 nop .long 1434 mov 0,%i0 ret restore call %g2 nop .long 1435 mov 0,%i0 ret restore call %g2 nop .long 1436 mov 0,%i0 ret restore call %g2 nop .long 1437 mov 0,%i0 ret restore call %g2 nop .long 1438 mov 0,%i0 ret restore call %g2 nop .long 1439 mov 0,%i0 ret restore call %g2 nop .long 1440 mov 0,%i0 ret restore call %g2 nop .long 1441 mov 0,%i0 ret restore call %g2 nop .long 1442 mov 0,%i0 ret restore call %g2 nop .long 1443 mov 0,%i0 ret restore call %g2 nop .long 1444 mov 0,%i0 ret restore call %g2 nop .long 1445 mov 0,%i0 ret restore call %g2 nop .long 1446 mov 0,%i0 ret restore call %g2 nop .long 1447 mov 0,%i0 ret restore call %g2 nop .long 1448 mov 0,%i0 ret restore call %g2 nop .long 1449 mov 0,%i0 ret restore call %g2 nop .long 1450 mov 0,%i0 ret restore call %g2 nop .long 1451 mov 0,%i0 ret restore call %g2 nop .long 1452 mov 0,%i0 ret restore call %g2 nop .long 1453 mov 0,%i0 ret restore call %g2 nop .long 1454 mov 0,%i0 ret restore call %g2 nop .long 1455 mov 0,%i0 ret restore call %g2 nop .long 1456 mov 0,%i0 ret restore call %g2 nop .long 1457 mov 0,%i0 ret restore call %g2 nop .long 1458 mov 0,%i0 ret restore call %g2 nop .long 1459 mov 0,%i0 ret restore call %g2 nop .long 1460 mov 0,%i0 ret restore call %g2 nop .long 1461 mov 0,%i0 ret restore call %g2 nop .long 1462 mov 0,%i0 ret restore call %g2 nop .long 1463 mov 0,%i0 ret restore call %g2 nop .long 1464 mov 0,%i0 ret restore call %g2 nop .long 1465 mov 0,%i0 ret restore call %g2 nop .long 1466 mov 0,%i0 ret restore call %g2 nop .long 1467 mov 0,%i0 ret restore call %g2 nop .long 1468 mov 0,%i0 ret restore call %g2 nop .long 1469 mov 0,%i0 ret restore call %g2 nop .long 1470 mov 0,%i0 ret restore call %g2 nop .long 1471 mov 0,%i0 ret restore call %g2 nop .long 1472 mov 0,%i0 ret restore call %g2 nop .long 1473 mov 0,%i0 ret restore call %g2 nop .long 1474 mov 0,%i0 ret restore call %g2 nop .long 1475 mov 0,%i0 ret restore call %g2 nop .long 1476 mov 0,%i0 ret restore call %g2 nop .long 1477 mov 0,%i0 ret restore call %g2 nop .long 1478 mov 0,%i0 ret restore call %g2 nop .long 1479 mov 0,%i0 ret restore call %g2 nop .long 1480 mov 0,%i0 ret restore call %g2 nop .long 1481 mov 0,%i0 ret restore call %g2 nop .long 1482 mov 0,%i0 ret restore call %g2 nop .long 1483 mov 0,%i0 ret restore call %g2 nop .long 1484 mov 0,%i0 ret restore call %g2 nop .long 1485 mov 0,%i0 ret restore call %g2 nop .long 1486 mov 0,%i0 ret restore call %g2 nop .long 1487 mov 0,%i0 ret restore call %g2 nop .long 1488 mov 0,%i0 ret restore call %g2 nop .long 1489 mov 0,%i0 ret restore call %g2 nop .long 1490 mov 0,%i0 ret restore call %g2 nop .long 1491 mov 0,%i0 ret restore call %g2 nop .long 1492 mov 0,%i0 ret restore call %g2 nop .long 1493 mov 0,%i0 ret restore call %g2 nop .long 1494 mov 0,%i0 ret restore call %g2 nop .long 1495 mov 0,%i0 ret restore call %g2 nop .long 1496 mov 0,%i0 ret restore call %g2 nop .long 1497 mov 0,%i0 ret restore call %g2 nop .long 1498 mov 0,%i0 ret restore call %g2 nop .long 1499 mov 0,%i0 ret restore call %g2 nop .long 1500 mov 0,%i0 ret restore call %g2 nop .long 1501 mov 0,%i0 ret restore call %g2 nop .long 1502 mov 0,%i0 ret restore call %g2 nop .long 1503 mov 0,%i0 ret restore call %g2 nop .long 1504 mov 0,%i0 ret restore call %g2 nop .long 1505 mov 0,%i0 ret restore call %g2 nop .long 1506 mov 0,%i0 ret restore call %g2 nop .long 1507 mov 0,%i0 ret restore call %g2 nop .long 1508 mov 0,%i0 ret restore call %g2 nop .long 1509 mov 0,%i0 ret restore call %g2 nop .long 1510 mov 0,%i0 ret restore call %g2 nop .long 1511 mov 0,%i0 ret restore call %g2 nop .long 1512 mov 0,%i0 ret restore call %g2 nop .long 1513 mov 0,%i0 ret restore call %g2 nop .long 1514 mov 0,%i0 ret restore call %g2 nop .long 1515 mov 0,%i0 ret restore call %g2 nop .long 1516 mov 0,%i0 ret restore call %g2 nop .long 1517 mov 0,%i0 ret restore call %g2 nop .long 1518 mov 0,%i0 ret restore call %g2 nop .long 1519 mov 0,%i0 ret restore call %g2 nop .long 1520 mov 0,%i0 ret restore call %g2 nop .long 1521 mov 0,%i0 ret restore call %g2 nop .long 1522 mov 0,%i0 ret restore call %g2 nop .long 1523 mov 0,%i0 ret restore call %g2 nop .long 1524 mov 0,%i0 ret restore call %g2 nop .long 1525 mov 0,%i0 ret restore call %g2 nop .long 1526 mov 0,%i0 ret restore call %g2 nop .long 1527 mov 0,%i0 ret restore call %g2 nop .long 1528 mov 0,%i0 ret restore call %g2 nop .long 1529 mov 0,%i0 ret restore call %g2 nop .long 1530 mov 0,%i0 ret restore call %g2 nop .long 1531 mov 0,%i0 ret restore call %g2 nop .long 1532 mov 0,%i0 ret restore call %g2 nop .long 1533 mov 0,%i0 ret restore call %g2 nop .long 1534 mov 0,%i0 ret restore call %g2 nop .long 1535 mov 0,%i0 ret restore call %g2 nop .long 1536 mov 0,%i0 ret restore call %g2 nop .long 1537 mov 0,%i0 ret restore call %g2 nop .long 1538 mov 0,%i0 ret restore call %g2 nop .long 1539 mov 0,%i0 ret restore call %g2 nop .long 1540 mov 0,%i0 ret restore call %g2 nop .long 1541 mov 0,%i0 ret restore call %g2 nop .long 1542 mov 0,%i0 ret restore call %g2 nop .long 1543 mov 0,%i0 ret restore call %g2 nop .long 1544 mov 0,%i0 ret restore call %g2 nop .long 1545 mov 0,%i0 ret restore call %g2 nop .long 1546 mov 0,%i0 ret restore call %g2 nop .long 1547 mov 0,%i0 ret restore call %g2 nop .long 1548 mov 0,%i0 ret restore call %g2 nop .long 1549 mov 0,%i0 ret restore call %g2 nop .long 1550 mov 0,%i0 ret restore call %g2 nop .long 1551 mov 0,%i0 ret restore call %g2 nop .long 1552 mov 0,%i0 ret restore call %g2 nop .long 1553 mov 0,%i0 ret restore call %g2 nop .long 1554 mov 0,%i0 ret restore call %g2 nop .long 1555 mov 0,%i0 ret restore call %g2 nop .long 1556 mov 0,%i0 ret restore call %g2 nop .long 1557 mov 0,%i0 ret restore call %g2 nop .long 1558 mov 0,%i0 ret restore call %g2 nop .long 1559 mov 0,%i0 ret restore call %g2 nop .long 1560 mov 0,%i0 ret restore call %g2 nop .long 1561 mov 0,%i0 ret restore call %g2 nop .long 1562 mov 0,%i0 ret restore call %g2 nop .long 1563 mov 0,%i0 ret restore call %g2 nop .long 1564 mov 0,%i0 ret restore call %g2 nop .long 1565 mov 0,%i0 ret restore call %g2 nop .long 1566 mov 0,%i0 ret restore call %g2 nop .long 1567 mov 0,%i0 ret restore call %g2 nop .long 1568 mov 0,%i0 ret restore call %g2 nop .long 1569 mov 0,%i0 ret restore call %g2 nop .long 1570 mov 0,%i0 ret restore call %g2 nop .long 1571 mov 0,%i0 ret restore call %g2 nop .long 1572 mov 0,%i0 ret restore call %g2 nop .long 1573 mov 0,%i0 ret restore call %g2 nop .long 1574 mov 0,%i0 ret restore call %g2 nop .long 1575 mov 0,%i0 ret restore call %g2 nop .long 1576 mov 0,%i0 ret restore call %g2 nop .long 1577 mov 0,%i0 ret restore call %g2 nop .long 1578 mov 0,%i0 ret restore call %g2 nop .long 1579 mov 0,%i0 ret restore call %g2 nop .long 1580 mov 0,%i0 ret restore call %g2 nop .long 1581 mov 0,%i0 ret restore call %g2 nop .long 1582 mov 0,%i0 ret restore call %g2 nop .long 1583 mov 0,%i0 ret restore call %g2 nop .long 1584 mov 0,%i0 ret restore call %g2 nop .long 1585 mov 0,%i0 ret restore call %g2 nop .long 1586 mov 0,%i0 ret restore call %g2 nop .long 1587 mov 0,%i0 ret restore call %g2 nop .long 1588 mov 0,%i0 ret restore call %g2 nop .long 1589 mov 0,%i0 ret restore call %g2 nop .long 1590 mov 0,%i0 ret restore call %g2 nop .long 1591 mov 0,%i0 ret restore call %g2 nop .long 1592 mov 0,%i0 ret restore call %g2 nop .long 1593 mov 0,%i0 ret restore call %g2 nop .long 1594 mov 0,%i0 ret restore call %g2 nop .long 1595 mov 0,%i0 ret restore call %g2 nop .long 1596 mov 0,%i0 ret restore call %g2 nop .long 1597 mov 0,%i0 ret restore call %g2 nop .long 1598 mov 0,%i0 ret restore call %g2 nop .long 1599 mov 0,%i0 ret restore call %g2 nop .long 1600 mov 0,%i0 ret restore call %g2 nop .long 1601 mov 0,%i0 ret restore call %g2 nop .long 1602 mov 0,%i0 ret restore call %g2 nop .long 1603 mov 0,%i0 ret restore call %g2 nop .long 1604 mov 0,%i0 ret restore call %g2 nop .long 1605 mov 0,%i0 ret restore call %g2 nop .long 1606 mov 0,%i0 ret restore call %g2 nop .long 1607 mov 0,%i0 ret restore call %g2 nop .long 1608 mov 0,%i0 ret restore call %g2 nop .long 1609 mov 0,%i0 ret restore call %g2 nop .long 1610 mov 0,%i0 ret restore call %g2 nop .long 1611 mov 0,%i0 ret restore call %g2 nop .long 1612 mov 0,%i0 ret restore call %g2 nop .long 1613 mov 0,%i0 ret restore call %g2 nop .long 1614 mov 0,%i0 ret restore call %g2 nop .long 1615 mov 0,%i0 ret restore call %g2 nop .long 1616 mov 0,%i0 ret restore call %g2 nop .long 1617 mov 0,%i0 ret restore call %g2 nop .long 1618 mov 0,%i0 ret restore call %g2 nop .long 1619 mov 0,%i0 ret restore call %g2 nop .long 1620 mov 0,%i0 ret restore call %g2 nop .long 1621 mov 0,%i0 ret restore call %g2 nop .long 1622 mov 0,%i0 ret restore call %g2 nop .long 1623 mov 0,%i0 ret restore call %g2 nop .long 1624 mov 0,%i0 ret restore call %g2 nop .long 1625 mov 0,%i0 ret restore call %g2 nop .long 1626 mov 0,%i0 ret restore call %g2 nop .long 1627 mov 0,%i0 ret restore call %g2 nop .long 1628 mov 0,%i0 ret restore call %g2 nop .long 1629 mov 0,%i0 ret restore call %g2 nop .long 1630 mov 0,%i0 ret restore call %g2 nop .long 1631 mov 0,%i0 ret restore call %g2 nop .long 1632 mov 0,%i0 ret restore call %g2 nop .long 1633 mov 0,%i0 ret restore call %g2 nop .long 1634 mov 0,%i0 ret restore call %g2 nop .long 1635 mov 0,%i0 ret restore call %g2 nop .long 1636 mov 0,%i0 ret restore call %g2 nop .long 1637 mov 0,%i0 ret restore call %g2 nop .long 1638 mov 0,%i0 ret restore call %g2 nop .long 1639 mov 0,%i0 ret restore call %g2 nop .long 1640 mov 0,%i0 ret restore call %g2 nop .long 1641 mov 0,%i0 ret restore call %g2 nop .long 1642 mov 0,%i0 ret restore call %g2 nop .long 1643 mov 0,%i0 ret restore call %g2 nop .long 1644 mov 0,%i0 ret restore call %g2 nop .long 1645 mov 0,%i0 ret restore call %g2 nop .long 1646 mov 0,%i0 ret restore call %g2 nop .long 1647 mov 0,%i0 ret restore call %g2 nop .long 1648 mov 0,%i0 ret restore call %g2 nop .long 1649 mov 0,%i0 ret restore call %g2 nop .long 1650 mov 0,%i0 ret restore call %g2 nop .long 1651 mov 0,%i0 ret restore call %g2 nop .long 1652 mov 0,%i0 ret restore call %g2 nop .long 1653 mov 0,%i0 ret restore call %g2 nop .long 1654 mov 0,%i0 ret restore call %g2 nop .long 1655 mov 0,%i0 ret restore call %g2 nop .long 1656 mov 0,%i0 ret restore call %g2 nop .long 1657 mov 0,%i0 ret restore call %g2 nop .long 1658 mov 0,%i0 ret restore call %g2 nop .long 1659 mov 0,%i0 ret restore call %g2 nop .long 1660 mov 0,%i0 ret restore call %g2 nop .long 1661 mov 0,%i0 ret restore call %g2 nop .long 1662 mov 0,%i0 ret restore call %g2 nop .long 1663 mov 0,%i0 ret restore call %g2 nop .long 1664 mov 0,%i0 ret restore call %g2 nop .long 1665 mov 0,%i0 ret restore call %g2 nop .long 1666 mov 0,%i0 ret restore call %g2 nop .long 1667 mov 0,%i0 ret restore call %g2 nop .long 1668 mov 0,%i0 ret restore call %g2 nop .long 1669 mov 0,%i0 ret restore call %g2 nop .long 1670 mov 0,%i0 ret restore call %g2 nop .long 1671 mov 0,%i0 ret restore call %g2 nop .long 1672 mov 0,%i0 ret restore call %g2 nop .long 1673 mov 0,%i0 ret restore call %g2 nop .long 1674 mov 0,%i0 ret restore call %g2 nop .long 1675 mov 0,%i0 ret restore call %g2 nop .long 1676 mov 0,%i0 ret restore call %g2 nop .long 1677 mov 0,%i0 ret restore call %g2 nop .long 1678 mov 0,%i0 ret restore call %g2 nop .long 1679 mov 0,%i0 ret restore call %g2 nop .long 1680 mov 0,%i0 ret restore call %g2 nop .long 1681 mov 0,%i0 ret restore call %g2 nop .long 1682 mov 0,%i0 ret restore call %g2 nop .long 1683 mov 0,%i0 ret restore call %g2 nop .long 1684 mov 0,%i0 ret restore call %g2 nop .long 1685 mov 0,%i0 ret restore call %g2 nop .long 1686 mov 0,%i0 ret restore call %g2 nop .long 1687 mov 0,%i0 ret restore call %g2 nop .long 1688 mov 0,%i0 ret restore call %g2 nop .long 1689 mov 0,%i0 ret restore call %g2 nop .long 1690 mov 0,%i0 ret restore call %g2 nop .long 1691 mov 0,%i0 ret restore call %g2 nop .long 1692 mov 0,%i0 ret restore call %g2 nop .long 1693 mov 0,%i0 ret restore call %g2 nop .long 1694 mov 0,%i0 ret restore call %g2 nop .long 1695 mov 0,%i0 ret restore call %g2 nop .long 1696 mov 0,%i0 ret restore call %g2 nop .long 1697 mov 0,%i0 ret restore call %g2 nop .long 1698 mov 0,%i0 ret restore call %g2 nop .long 1699 mov 0,%i0 ret restore call %g2 nop .long 1700 mov 0,%i0 ret restore call %g2 nop .long 1701 mov 0,%i0 ret restore call %g2 nop .long 1702 mov 0,%i0 ret restore call %g2 nop .long 1703 mov 0,%i0 ret restore call %g2 nop .long 1704 mov 0,%i0 ret restore call %g2 nop .long 1705 mov 0,%i0 ret restore call %g2 nop .long 1706 mov 0,%i0 ret restore call %g2 nop .long 1707 mov 0,%i0 ret restore call %g2 nop .long 1708 mov 0,%i0 ret restore call %g2 nop .long 1709 mov 0,%i0 ret restore call %g2 nop .long 1710 mov 0,%i0 ret restore call %g2 nop .long 1711 mov 0,%i0 ret restore call %g2 nop .long 1712 mov 0,%i0 ret restore call %g2 nop .long 1713 mov 0,%i0 ret restore call %g2 nop .long 1714 mov 0,%i0 ret restore call %g2 nop .long 1715 mov 0,%i0 ret restore call %g2 nop .long 1716 mov 0,%i0 ret restore call %g2 nop .long 1717 mov 0,%i0 ret restore call %g2 nop .long 1718 mov 0,%i0 ret restore call %g2 nop .long 1719 mov 0,%i0 ret restore call %g2 nop .long 1720 mov 0,%i0 ret restore call %g2 nop .long 1721 mov 0,%i0 ret restore call %g2 nop .long 1722 mov 0,%i0 ret restore call %g2 nop .long 1723 mov 0,%i0 ret restore call %g2 nop .long 1724 mov 0,%i0 ret restore call %g2 nop .long 1725 mov 0,%i0 ret restore call %g2 nop .long 1726 mov 0,%i0 ret restore call %g2 nop .long 1727 mov 0,%i0 ret restore call %g2 nop .long 1728 mov 0,%i0 ret restore call %g2 nop .long 1729 mov 0,%i0 ret restore call %g2 nop .long 1730 mov 0,%i0 ret restore call %g2 nop .long 1731 mov 0,%i0 ret restore call %g2 nop .long 1732 mov 0,%i0 ret restore call %g2 nop .long 1733 mov 0,%i0 ret restore call %g2 nop .long 1734 mov 0,%i0 ret restore call %g2 nop .long 1735 mov 0,%i0 ret restore call %g2 nop .long 1736 mov 0,%i0 ret restore call %g2 nop .long 1737 mov 0,%i0 ret restore call %g2 nop .long 1738 mov 0,%i0 ret restore call %g2 nop .long 1739 mov 0,%i0 ret restore call %g2 nop .long 1740 mov 0,%i0 ret restore call %g2 nop .long 1741 mov 0,%i0 ret restore call %g2 nop .long 1742 mov 0,%i0 ret restore call %g2 nop .long 1743 mov 0,%i0 ret restore call %g2 nop .long 1744 mov 0,%i0 ret restore call %g2 nop .long 1745 mov 0,%i0 ret restore call %g2 nop .long 1746 mov 0,%i0 ret restore call %g2 nop .long 1747 mov 0,%i0 ret restore call %g2 nop .long 1748 mov 0,%i0 ret restore call %g2 nop .long 1749 mov 0,%i0 ret restore call %g2 nop .long 1750 mov 0,%i0 ret restore call %g2 nop .long 1751 mov 0,%i0 ret restore call %g2 nop .long 1752 mov 0,%i0 ret restore call %g2 nop .long 1753 mov 0,%i0 ret restore call %g2 nop .long 1754 mov 0,%i0 ret restore call %g2 nop .long 1755 mov 0,%i0 ret restore call %g2 nop .long 1756 mov 0,%i0 ret restore call %g2 nop .long 1757 mov 0,%i0 ret restore call %g2 nop .long 1758 mov 0,%i0 ret restore call %g2 nop .long 1759 mov 0,%i0 ret restore call %g2 nop .long 1760 mov 0,%i0 ret restore call %g2 nop .long 1761 mov 0,%i0 ret restore call %g2 nop .long 1762 mov 0,%i0 ret restore call %g2 nop .long 1763 mov 0,%i0 ret restore call %g2 nop .long 1764 mov 0,%i0 ret restore call %g2 nop .long 1765 mov 0,%i0 ret restore call %g2 nop .long 1766 mov 0,%i0 ret restore call %g2 nop .long 1767 mov 0,%i0 ret restore call %g2 nop .long 1768 mov 0,%i0 ret restore call %g2 nop .long 1769 mov 0,%i0 ret restore call %g2 nop .long 1770 mov 0,%i0 ret restore call %g2 nop .long 1771 mov 0,%i0 ret restore call %g2 nop .long 1772 mov 0,%i0 ret restore call %g2 nop .long 1773 mov 0,%i0 ret restore call %g2 nop .long 1774 mov 0,%i0 ret restore call %g2 nop .long 1775 mov 0,%i0 ret restore call %g2 nop .long 1776 mov 0,%i0 ret restore call %g2 nop .long 1777 mov 0,%i0 ret restore call %g2 nop .long 1778 mov 0,%i0 ret restore call %g2 nop .long 1779 mov 0,%i0 ret restore call %g2 nop .long 1780 mov 0,%i0 ret restore call %g2 nop .long 1781 mov 0,%i0 ret restore call %g2 nop .long 1782 mov 0,%i0 ret restore call %g2 nop .long 1783 mov 0,%i0 ret restore call %g2 nop .long 1784 mov 0,%i0 ret restore call %g2 nop .long 1785 mov 0,%i0 ret restore call %g2 nop .long 1786 mov 0,%i0 ret restore call %g2 nop .long 1787 mov 0,%i0 ret restore call %g2 nop .long 1788 mov 0,%i0 ret restore call %g2 nop .long 1789 mov 0,%i0 ret restore call %g2 nop .long 1790 mov 0,%i0 ret restore call %g2 nop .long 1791 mov 0,%i0 ret restore call %g2 nop .long 1792 mov 0,%i0 ret restore call %g2 nop .long 1793 mov 0,%i0 ret restore call %g2 nop .long 1794 mov 0,%i0 ret restore call %g2 nop .long 1795 mov 0,%i0 ret restore call %g2 nop .long 1796 mov 0,%i0 ret restore call %g2 nop .long 1797 mov 0,%i0 ret restore call %g2 nop .long 1798 mov 0,%i0 ret restore call %g2 nop .long 1799 mov 0,%i0 ret restore call %g2 nop .long 1800 mov 0,%i0 ret restore call %g2 nop .long 1801 mov 0,%i0 ret restore call %g2 nop .long 1802 mov 0,%i0 ret restore call %g2 nop .long 1803 mov 0,%i0 ret restore call %g2 nop .long 1804 mov 0,%i0 ret restore call %g2 nop .long 1805 mov 0,%i0 ret restore call %g2 nop .long 1806 mov 0,%i0 ret restore call %g2 nop .long 1807 mov 0,%i0 ret restore call %g2 nop .long 1808 mov 0,%i0 ret restore call %g2 nop .long 1809 mov 0,%i0 ret restore call %g2 nop .long 1810 mov 0,%i0 ret restore call %g2 nop .long 1811 mov 0,%i0 ret restore call %g2 nop .long 1812 mov 0,%i0 ret restore call %g2 nop .long 1813 mov 0,%i0 ret restore call %g2 nop .long 1814 mov 0,%i0 ret restore call %g2 nop .long 1815 mov 0,%i0 ret restore call %g2 nop .long 1816 mov 0,%i0 ret restore call %g2 nop .long 1817 mov 0,%i0 ret restore call %g2 nop .long 1818 mov 0,%i0 ret restore call %g2 nop .long 1819 mov 0,%i0 ret restore call %g2 nop .long 1820 mov 0,%i0 ret restore call %g2 nop .long 1821 mov 0,%i0 ret restore call %g2 nop .long 1822 mov 0,%i0 ret restore call %g2 nop .long 1823 mov 0,%i0 ret restore call %g2 nop .long 1824 mov 0,%i0 ret restore call %g2 nop .long 1825 mov 0,%i0 ret restore call %g2 nop .long 1826 mov 0,%i0 ret restore call %g2 nop .long 1827 mov 0,%i0 ret restore call %g2 nop .long 1828 mov 0,%i0 ret restore call %g2 nop .long 1829 mov 0,%i0 ret restore call %g2 nop .long 1830 mov 0,%i0 ret restore call %g2 nop .long 1831 mov 0,%i0 ret restore call %g2 nop .long 1832 mov 0,%i0 ret restore call %g2 nop .long 1833 mov 0,%i0 ret restore call %g2 nop .long 1834 mov 0,%i0 ret restore call %g2 nop .long 1835 mov 0,%i0 ret restore call %g2 nop .long 1836 mov 0,%i0 ret restore call %g2 nop .long 1837 mov 0,%i0 ret restore call %g2 nop .long 1838 mov 0,%i0 ret restore call %g2 nop .long 1839 mov 0,%i0 ret restore call %g2 nop .long 1840 mov 0,%i0 ret restore call %g2 nop .long 1841 mov 0,%i0 ret restore call %g2 nop .long 1842 mov 0,%i0 ret restore call %g2 nop .long 1843 mov 0,%i0 ret restore call %g2 nop .long 1844 mov 0,%i0 ret restore call %g2 nop .long 1845 mov 0,%i0 ret restore call %g2 nop .long 1846 mov 0,%i0 ret restore call %g2 nop .long 1847 mov 0,%i0 ret restore call %g2 nop .long 1848 mov 0,%i0 ret restore call %g2 nop .long 1849 mov 0,%i0 ret restore call %g2 nop .long 1850 mov 0,%i0 ret restore call %g2 nop .long 1851 mov 0,%i0 ret restore call %g2 nop .long 1852 mov 0,%i0 ret restore call %g2 nop .long 1853 mov 0,%i0 ret restore call %g2 nop .long 1854 mov 0,%i0 ret restore call %g2 nop .long 1855 mov 0,%i0 ret restore call %g2 nop .long 1856 mov 0,%i0 ret restore call %g2 nop .long 1857 mov 0,%i0 ret restore call %g2 nop .long 1858 mov 0,%i0 ret restore call %g2 nop .long 1859 mov 0,%i0 ret restore call %g2 nop .long 1860 mov 0,%i0 ret restore call %g2 nop .long 1861 mov 0,%i0 ret restore call %g2 nop .long 1862 mov 0,%i0 ret restore call %g2 nop .long 1863 mov 0,%i0 ret restore call %g2 nop .long 1864 mov 0,%i0 ret restore call %g2 nop .long 1865 mov 0,%i0 ret restore call %g2 nop .long 1866 mov 0,%i0 ret restore call %g2 nop .long 1867 mov 0,%i0 ret restore call %g2 nop .long 1868 mov 0,%i0 ret restore call %g2 nop .long 1869 mov 0,%i0 ret restore call %g2 nop .long 1870 mov 0,%i0 ret restore call %g2 nop .long 1871 mov 0,%i0 ret restore call %g2 nop .long 1872 mov 0,%i0 ret restore call %g2 nop .long 1873 mov 0,%i0 ret restore call %g2 nop .long 1874 mov 0,%i0 ret restore call %g2 nop .long 1875 mov 0,%i0 ret restore call %g2 nop .long 1876 mov 0,%i0 ret restore call %g2 nop .long 1877 mov 0,%i0 ret restore call %g2 nop .long 1878 mov 0,%i0 ret restore call %g2 nop .long 1879 mov 0,%i0 ret restore call %g2 nop .long 1880 mov 0,%i0 ret restore call %g2 nop .long 1881 mov 0,%i0 ret restore call %g2 nop .long 1882 mov 0,%i0 ret restore call %g2 nop .long 1883 mov 0,%i0 ret restore call %g2 nop .long 1884 mov 0,%i0 ret restore call %g2 nop .long 1885 mov 0,%i0 ret restore call %g2 nop .long 1886 mov 0,%i0 ret restore call %g2 nop .long 1887 mov 0,%i0 ret restore call %g2 nop .long 1888 mov 0,%i0 ret restore call %g2 nop .long 1889 mov 0,%i0 ret restore call %g2 nop .long 1890 mov 0,%i0 ret restore call %g2 nop .long 1891 mov 0,%i0 ret restore call %g2 nop .long 1892 mov 0,%i0 ret restore call %g2 nop .long 1893 mov 0,%i0 ret restore call %g2 nop .long 1894 mov 0,%i0 ret restore call %g2 nop .long 1895 mov 0,%i0 ret restore call %g2 nop .long 1896 mov 0,%i0 ret restore call %g2 nop .long 1897 mov 0,%i0 ret restore call %g2 nop .long 1898 mov 0,%i0 ret restore call %g2 nop .long 1899 mov 0,%i0 ret restore call %g2 nop .long 1900 mov 0,%i0 ret restore call %g2 nop .long 1901 mov 0,%i0 ret restore call %g2 nop .long 1902 mov 0,%i0 ret restore call %g2 nop .long 1903 mov 0,%i0 ret restore call %g2 nop .long 1904 mov 0,%i0 ret restore call %g2 nop .long 1905 mov 0,%i0 ret restore call %g2 nop .long 1906 mov 0,%i0 ret restore call %g2 nop .long 1907 mov 0,%i0 ret restore call %g2 nop .long 1908 mov 0,%i0 ret restore call %g2 nop .long 1909 mov 0,%i0 ret restore call %g2 nop .long 1910 mov 0,%i0 ret restore call %g2 nop .long 1911 mov 0,%i0 ret restore call %g2 nop .long 1912 mov 0,%i0 ret restore call %g2 nop .long 1913 mov 0,%i0 ret restore call %g2 nop .long 1914 mov 0,%i0 ret restore call %g2 nop .long 1915 mov 0,%i0 ret restore call %g2 nop .long 1916 mov 0,%i0 ret restore call %g2 nop .long 1917 mov 0,%i0 ret restore call %g2 nop .long 1918 mov 0,%i0 ret restore call %g2 nop .long 1919 mov 0,%i0 ret restore call %g2 nop .long 1920 mov 0,%i0 ret restore call %g2 nop .long 1921 mov 0,%i0 ret restore call %g2 nop .long 1922 mov 0,%i0 ret restore call %g2 nop .long 1923 mov 0,%i0 ret restore call %g2 nop .long 1924 mov 0,%i0 ret restore call %g2 nop .long 1925 mov 0,%i0 ret restore call %g2 nop .long 1926 mov 0,%i0 ret restore call %g2 nop .long 1927 mov 0,%i0 ret restore call %g2 nop .long 1928 mov 0,%i0 ret restore call %g2 nop .long 1929 mov 0,%i0 ret restore call %g2 nop .long 1930 mov 0,%i0 ret restore call %g2 nop .long 1931 mov 0,%i0 ret restore call %g2 nop .long 1932 mov 0,%i0 ret restore call %g2 nop .long 1933 mov 0,%i0 ret restore call %g2 nop .long 1934 mov 0,%i0 ret restore call %g2 nop .long 1935 mov 0,%i0 ret restore call %g2 nop .long 1936 mov 0,%i0 ret restore call %g2 nop .long 1937 mov 0,%i0 ret restore call %g2 nop .long 1938 mov 0,%i0 ret restore call %g2 nop .long 1939 mov 0,%i0 ret restore call %g2 nop .long 1940 mov 0,%i0 ret restore call %g2 nop .long 1941 mov 0,%i0 ret restore call %g2 nop .long 1942 mov 0,%i0 ret restore call %g2 nop .long 1943 mov 0,%i0 ret restore call %g2 nop .long 1944 mov 0,%i0 ret restore call %g2 nop .long 1945 mov 0,%i0 ret restore call %g2 nop .long 1946 mov 0,%i0 ret restore call %g2 nop .long 1947 mov 0,%i0 ret restore call %g2 nop .long 1948 mov 0,%i0 ret restore call %g2 nop .long 1949 mov 0,%i0 ret restore call %g2 nop .long 1950 mov 0,%i0 ret restore call %g2 nop .long 1951 mov 0,%i0 ret restore call %g2 nop .long 1952 mov 0,%i0 ret restore call %g2 nop .long 1953 mov 0,%i0 ret restore call %g2 nop .long 1954 mov 0,%i0 ret restore call %g2 nop .long 1955 mov 0,%i0 ret restore call %g2 nop .long 1956 mov 0,%i0 ret restore call %g2 nop .long 1957 mov 0,%i0 ret restore call %g2 nop .long 1958 mov 0,%i0 ret restore call %g2 nop .long 1959 mov 0,%i0 ret restore call %g2 nop .long 1960 mov 0,%i0 ret restore call %g2 nop .long 1961 mov 0,%i0 ret restore call %g2 nop .long 1962 mov 0,%i0 ret restore call %g2 nop .long 1963 mov 0,%i0 ret restore call %g2 nop .long 1964 mov 0,%i0 ret restore call %g2 nop .long 1965 mov 0,%i0 ret restore call %g2 nop .long 1966 mov 0,%i0 ret restore call %g2 nop .long 1967 mov 0,%i0 ret restore call %g2 nop .long 1968 mov 0,%i0 ret restore call %g2 nop .long 1969 mov 0,%i0 ret restore call %g2 nop .long 1970 mov 0,%i0 ret restore call %g2 nop .long 1971 mov 0,%i0 ret restore call %g2 nop .long 1972 mov 0,%i0 ret restore call %g2 nop .long 1973 mov 0,%i0 ret restore call %g2 nop .long 1974 mov 0,%i0 ret restore call %g2 nop .long 1975 mov 0,%i0 ret restore call %g2 nop .long 1976 mov 0,%i0 ret restore call %g2 nop .long 1977 mov 0,%i0 ret restore call %g2 nop .long 1978 mov 0,%i0 ret restore call %g2 nop .long 1979 mov 0,%i0 ret restore call %g2 nop .long 1980 mov 0,%i0 ret restore call %g2 nop .long 1981 mov 0,%i0 ret restore call %g2 nop .long 1982 mov 0,%i0 ret restore call %g2 nop .long 1983 mov 0,%i0 ret restore call %g2 nop .long 1984 mov 0,%i0 ret restore call %g2 nop .long 1985 mov 0,%i0 ret restore call %g2 nop .long 1986 mov 0,%i0 ret restore call %g2 nop .long 1987 mov 0,%i0 ret restore call %g2 nop .long 1988 mov 0,%i0 ret restore call %g2 nop .long 1989 mov 0,%i0 ret restore call %g2 nop .long 1990 mov 0,%i0 ret restore call %g2 nop .long 1991 mov 0,%i0 ret restore call %g2 nop .long 1992 mov 0,%i0 ret restore call %g2 nop .long 1993 mov 0,%i0 ret restore call %g2 nop .long 1994 mov 0,%i0 ret restore call %g2 nop .long 1995 mov 0,%i0 ret restore call %g2 nop .long 1996 mov 0,%i0 ret restore call %g2 nop .long 1997 mov 0,%i0 ret restore call %g2 nop .long 1998 mov 0,%i0 ret restore call %g2 nop .long 1999 mov 0,%i0 ret restore call %g2 nop .long 2000 mov 0,%i0 ret restore call %g2 nop .long 2001 mov 0,%i0 ret restore call %g2 nop .long 2002 mov 0,%i0 ret restore call %g2 nop .long 2003 mov 0,%i0 ret restore call %g2 nop .long 2004 mov 0,%i0 ret restore call %g2 nop .long 2005 mov 0,%i0 ret restore call %g2 nop .long 2006 mov 0,%i0 ret restore call %g2 nop .long 2007 mov 0,%i0 ret restore call %g2 nop .long 2008 mov 0,%i0 ret restore call %g2 nop .long 2009 mov 0,%i0 ret restore call %g2 nop .long 2010 mov 0,%i0 ret restore call %g2 nop .long 2011 mov 0,%i0 ret restore call %g2 nop .long 2012 mov 0,%i0 ret restore call %g2 nop .long 2013 mov 0,%i0 ret restore call %g2 nop .long 2014 mov 0,%i0 ret restore call %g2 nop .long 2015 mov 0,%i0 ret restore call %g2 nop .long 2016 mov 0,%i0 ret restore call %g2 nop .long 2017 mov 0,%i0 ret restore call %g2 nop .long 2018 mov 0,%i0 ret restore call %g2 nop .long 2019 mov 0,%i0 ret restore call %g2 nop .long 2020 mov 0,%i0 ret restore call %g2 nop .long 2021 mov 0,%i0 ret restore call %g2 nop .long 2022 mov 0,%i0 ret restore call %g2 nop .long 2023 mov 0,%i0 ret restore call %g2 nop .long 2024 mov 0,%i0 ret restore call %g2 nop .long 2025 mov 0,%i0 ret restore call %g2 nop .long 2026 mov 0,%i0 ret restore call %g2 nop .long 2027 mov 0,%i0 ret restore call %g2 nop .long 2028 mov 0,%i0 ret restore call %g2 nop .long 2029 mov 0,%i0 ret restore call %g2 nop .long 2030 mov 0,%i0 ret restore call %g2 nop .long 2031 mov 0,%i0 ret restore call %g2 nop .long 2032 mov 0,%i0 ret restore call %g2 nop .long 2033 mov 0,%i0 ret restore call %g2 nop .long 2034 mov 0,%i0 ret restore call %g2 nop .long 2035 mov 0,%i0 ret restore call %g2 nop .long 2036 mov 0,%i0 ret restore call %g2 nop .long 2037 mov 0,%i0 ret restore call %g2 nop .long 2038 mov 0,%i0 ret restore call %g2 nop .long 2039 mov 0,%i0 ret restore call %g2 nop .long 2040 mov 0,%i0 ret restore call %g2 nop .long 2041 mov 0,%i0 ret restore call %g2 nop .long 2042 mov 0,%i0 ret restore call %g2 nop .long 2043 mov 0,%i0 ret restore call %g2 nop .long 2044 mov 0,%i0 ret restore call %g2 nop .long 2045 mov 0,%i0 ret restore call %g2 nop .long 2046 mov 0,%i0 ret restore call %g2 nop .long 2047 mov 0,%i0 ret restore call %g2 nop .long 2048 mov 0,%i0 ret restore call %g2 nop .long 2049 mov 0,%i0 ret restore call %g2 nop .long 2050 mov 0,%i0 ret restore call %g2 nop .long 2051 mov 0,%i0 ret restore call %g2 nop .long 2052 mov 0,%i0 ret restore call %g2 nop .long 2053 mov 0,%i0 ret restore call %g2 nop .long 2054 mov 0,%i0 ret restore call %g2 nop .long 2055 mov 0,%i0 ret restore call %g2 nop .long 2056 mov 0,%i0 ret restore call %g2 nop .long 2057 mov 0,%i0 ret restore call %g2 nop .long 2058 mov 0,%i0 ret restore call %g2 nop .long 2059 mov 0,%i0 ret restore call %g2 nop .long 2060 mov 0,%i0 ret restore call %g2 nop .long 2061 mov 0,%i0 ret restore call %g2 nop .long 2062 mov 0,%i0 ret restore call %g2 nop .long 2063 mov 0,%i0 ret restore call %g2 nop .long 2064 mov 0,%i0 ret restore call %g2 nop .long 2065 mov 0,%i0 ret restore call %g2 nop .long 2066 mov 0,%i0 ret restore call %g2 nop .long 2067 mov 0,%i0 ret restore call %g2 nop .long 2068 mov 0,%i0 ret restore call %g2 nop .long 2069 mov 0,%i0 ret restore call %g2 nop .long 2070 mov 0,%i0 ret restore call %g2 nop .long 2071 mov 0,%i0 ret restore call %g2 nop .long 2072 mov 0,%i0 ret restore call %g2 nop .long 2073 mov 0,%i0 ret restore call %g2 nop .long 2074 mov 0,%i0 ret restore call %g2 nop .long 2075 mov 0,%i0 ret restore call %g2 nop .long 2076 mov 0,%i0 ret restore call %g2 nop .long 2077 mov 0,%i0 ret restore call %g2 nop .long 2078 mov 0,%i0 ret restore call %g2 nop .long 2079 mov 0,%i0 ret restore call %g2 nop .long 2080 mov 0,%i0 ret restore call %g2 nop .long 2081 mov 0,%i0 ret restore call %g2 nop .long 2082 mov 0,%i0 ret restore call %g2 nop .long 2083 mov 0,%i0 ret restore call %g2 nop .long 2084 mov 0,%i0 ret restore call %g2 nop .long 2085 mov 0,%i0 ret restore call %g2 nop .long 2086 mov 0,%i0 ret restore call %g2 nop .long 2087 mov 0,%i0 ret restore call %g2 nop .long 2088 mov 0,%i0 ret restore call %g2 nop .long 2089 mov 0,%i0 ret restore call %g2 nop .long 2090 mov 0,%i0 ret restore call %g2 nop .long 2091 mov 0,%i0 ret restore call %g2 nop .long 2092 mov 0,%i0 ret restore call %g2 nop .long 2093 mov 0,%i0 ret restore call %g2 nop .long 2094 mov 0,%i0 ret restore call %g2 nop .long 2095 mov 0,%i0 ret restore call %g2 nop .long 2096 mov 0,%i0 ret restore call %g2 nop .long 2097 mov 0,%i0 ret restore call %g2 nop .long 2098 mov 0,%i0 ret restore call %g2 nop .long 2099 mov 0,%i0 ret restore call %g2 nop .long 2100 mov 0,%i0 ret restore call %g2 nop .long 2101 mov 0,%i0 ret restore call %g2 nop .long 2102 mov 0,%i0 ret restore call %g2 nop .long 2103 mov 0,%i0 ret restore call %g2 nop .long 2104 mov 0,%i0 ret restore call %g2 nop .long 2105 mov 0,%i0 ret restore call %g2 nop .long 2106 mov 0,%i0 ret restore call %g2 nop .long 2107 mov 0,%i0 ret restore call %g2 nop .long 2108 mov 0,%i0 ret restore call %g2 nop .long 2109 mov 0,%i0 ret restore call %g2 nop .long 2110 mov 0,%i0 ret restore call %g2 nop .long 2111 mov 0,%i0 ret restore call %g2 nop .long 2112 mov 0,%i0 ret restore call %g2 nop .long 2113 mov 0,%i0 ret restore call %g2 nop .long 2114 mov 0,%i0 ret restore call %g2 nop .long 2115 mov 0,%i0 ret restore call %g2 nop .long 2116 mov 0,%i0 ret restore call %g2 nop .long 2117 mov 0,%i0 ret restore call %g2 nop .long 2118 mov 0,%i0 ret restore call %g2 nop .long 2119 mov 0,%i0 ret restore call %g2 nop .long 2120 mov 0,%i0 ret restore call %g2 nop .long 2121 mov 0,%i0 ret restore call %g2 nop .long 2122 mov 0,%i0 ret restore call %g2 nop .long 2123 mov 0,%i0 ret restore call %g2 nop .long 2124 mov 0,%i0 ret restore call %g2 nop .long 2125 mov 0,%i0 ret restore call %g2 nop .long 2126 mov 0,%i0 ret restore call %g2 nop .long 2127 mov 0,%i0 ret restore call %g2 nop .long 2128 mov 0,%i0 ret restore call %g2 nop .long 2129 mov 0,%i0 ret restore call %g2 nop .long 2130 mov 0,%i0 ret restore call %g2 nop .long 2131 mov 0,%i0 ret restore call %g2 nop .long 2132 mov 0,%i0 ret restore call %g2 nop .long 2133 mov 0,%i0 ret restore call %g2 nop .long 2134 mov 0,%i0 ret restore call %g2 nop .long 2135 mov 0,%i0 ret restore call %g2 nop .long 2136 mov 0,%i0 ret restore call %g2 nop .long 2137 mov 0,%i0 ret restore call %g2 nop .long 2138 mov 0,%i0 ret restore call %g2 nop .long 2139 mov 0,%i0 ret restore call %g2 nop .long 2140 mov 0,%i0 ret restore call %g2 nop .long 2141 mov 0,%i0 ret restore call %g2 nop .long 2142 mov 0,%i0 ret restore call %g2 nop .long 2143 mov 0,%i0 ret restore call %g2 nop .long 2144 mov 0,%i0 ret restore call %g2 nop .long 2145 mov 0,%i0 ret restore call %g2 nop .long 2146 mov 0,%i0 ret restore call %g2 nop .long 2147 mov 0,%i0 ret restore call %g2 nop .long 2148 mov 0,%i0 ret restore call %g2 nop .long 2149 mov 0,%i0 ret restore call %g2 nop .long 2150 mov 0,%i0 ret restore call %g2 nop .long 2151 mov 0,%i0 ret restore call %g2 nop .long 2152 mov 0,%i0 ret restore call %g2 nop .long 2153 mov 0,%i0 ret restore call %g2 nop .long 2154 mov 0,%i0 ret restore call %g2 nop .long 2155 mov 0,%i0 ret restore call %g2 nop .long 2156 mov 0,%i0 ret restore call %g2 nop .long 2157 mov 0,%i0 ret restore call %g2 nop .long 2158 mov 0,%i0 ret restore call %g2 nop .long 2159 mov 0,%i0 ret restore call %g2 nop .long 2160 mov 0,%i0 ret restore call %g2 nop .long 2161 mov 0,%i0 ret restore call %g2 nop .long 2162 mov 0,%i0 ret restore call %g2 nop .long 2163 mov 0,%i0 ret restore call %g2 nop .long 2164 mov 0,%i0 ret restore call %g2 nop .long 2165 mov 0,%i0 ret restore call %g2 nop .long 2166 mov 0,%i0 ret restore call %g2 nop .long 2167 mov 0,%i0 ret restore call %g2 nop .long 2168 mov 0,%i0 ret restore call %g2 nop .long 2169 mov 0,%i0 ret restore call %g2 nop .long 2170 mov 0,%i0 ret restore call %g2 nop .long 2171 mov 0,%i0 ret restore call %g2 nop .long 2172 mov 0,%i0 ret restore call %g2 nop .long 2173 mov 0,%i0 ret restore call %g2 nop .long 2174 mov 0,%i0 ret restore call %g2 nop .long 2175 mov 0,%i0 ret restore call %g2 nop .long 2176 mov 0,%i0 ret restore call %g2 nop .long 2177 mov 0,%i0 ret restore call %g2 nop .long 2178 mov 0,%i0 ret restore call %g2 nop .long 2179 mov 0,%i0 ret restore call %g2 nop .long 2180 mov 0,%i0 ret restore call %g2 nop .long 2181 mov 0,%i0 ret restore call %g2 nop .long 2182 mov 0,%i0 ret restore call %g2 nop .long 2183 mov 0,%i0 ret restore call %g2 nop .long 2184 mov 0,%i0 ret restore call %g2 nop .long 2185 mov 0,%i0 ret restore call %g2 nop .long 2186 mov 0,%i0 ret restore call %g2 nop .long 2187 mov 0,%i0 ret restore call %g2 nop .long 2188 mov 0,%i0 ret restore call %g2 nop .long 2189 mov 0,%i0 ret restore call %g2 nop .long 2190 mov 0,%i0 ret restore call %g2 nop .long 2191 mov 0,%i0 ret restore call %g2 nop .long 2192 mov 0,%i0 ret restore call %g2 nop .long 2193 mov 0,%i0 ret restore call %g2 nop .long 2194 mov 0,%i0 ret restore call %g2 nop .long 2195 mov 0,%i0 ret restore call %g2 nop .long 2196 mov 0,%i0 ret restore call %g2 nop .long 2197 mov 0,%i0 ret restore call %g2 nop .long 2198 mov 0,%i0 ret restore call %g2 nop .long 2199 mov 0,%i0 ret restore call %g2 nop .long 2200 mov 0,%i0 ret restore call %g2 nop .long 2201 mov 0,%i0 ret restore call %g2 nop .long 2202 mov 0,%i0 ret restore call %g2 nop .long 2203 mov 0,%i0 ret restore call %g2 nop .long 2204 mov 0,%i0 ret restore call %g2 nop .long 2205 mov 0,%i0 ret restore call %g2 nop .long 2206 mov 0,%i0 ret restore call %g2 nop .long 2207 mov 0,%i0 ret restore call %g2 nop .long 2208 mov 0,%i0 ret restore call %g2 nop .long 2209 mov 0,%i0 ret restore call %g2 nop .long 2210 mov 0,%i0 ret restore call %g2 nop .long 2211 mov 0,%i0 ret restore call %g2 nop .long 2212 mov 0,%i0 ret restore call %g2 nop .long 2213 mov 0,%i0 ret restore call %g2 nop .long 2214 mov 0,%i0 ret restore call %g2 nop .long 2215 mov 0,%i0 ret restore call %g2 nop .long 2216 mov 0,%i0 ret restore call %g2 nop .long 2217 mov 0,%i0 ret restore call %g2 nop .long 2218 mov 0,%i0 ret restore call %g2 nop .long 2219 mov 0,%i0 ret restore call %g2 nop .long 2220 mov 0,%i0 ret restore call %g2 nop .long 2221 mov 0,%i0 ret restore call %g2 nop .long 2222 mov 0,%i0 ret restore call %g2 nop .long 2223 mov 0,%i0 ret restore call %g2 nop .long 2224 mov 0,%i0 ret restore call %g2 nop .long 2225 mov 0,%i0 ret restore call %g2 nop .long 2226 mov 0,%i0 ret restore call %g2 nop .long 2227 mov 0,%i0 ret restore call %g2 nop .long 2228 mov 0,%i0 ret restore call %g2 nop .long 2229 mov 0,%i0 ret restore call %g2 nop .long 2230 mov 0,%i0 ret restore call %g2 nop .long 2231 mov 0,%i0 ret restore call %g2 nop .long 2232 mov 0,%i0 ret restore call %g2 nop .long 2233 mov 0,%i0 ret restore call %g2 nop .long 2234 mov 0,%i0 ret restore call %g2 nop .long 2235 mov 0,%i0 ret restore call %g2 nop .long 2236 mov 0,%i0 ret restore call %g2 nop .long 2237 mov 0,%i0 ret restore call %g2 nop .long 2238 mov 0,%i0 ret restore call %g2 nop .long 2239 mov 0,%i0 ret restore call %g2 nop .long 2240 mov 0,%i0 ret restore call %g2 nop .long 2241 mov 0,%i0 ret restore call %g2 nop .long 2242 mov 0,%i0 ret restore call %g2 nop .long 2243 mov 0,%i0 ret restore call %g2 nop .long 2244 mov 0,%i0 ret restore call %g2 nop .long 2245 mov 0,%i0 ret restore call %g2 nop .long 2246 mov 0,%i0 ret restore call %g2 nop .long 2247 mov 0,%i0 ret restore call %g2 nop .long 2248 mov 0,%i0 ret restore call %g2 nop .long 2249 mov 0,%i0 ret restore call %g2 nop .long 2250 mov 0,%i0 ret restore call %g2 nop .long 2251 mov 0,%i0 ret restore call %g2 nop .long 2252 mov 0,%i0 ret restore call %g2 nop .long 2253 mov 0,%i0 ret restore call %g2 nop .long 2254 mov 0,%i0 ret restore call %g2 nop .long 2255 mov 0,%i0 ret restore call %g2 nop .long 2256 mov 0,%i0 ret restore call %g2 nop .long 2257 mov 0,%i0 ret restore call %g2 nop .long 2258 mov 0,%i0 ret restore call %g2 nop .long 2259 mov 0,%i0 ret restore call %g2 nop .long 2260 mov 0,%i0 ret restore call %g2 nop .long 2261 mov 0,%i0 ret restore call %g2 nop .long 2262 mov 0,%i0 ret restore call %g2 nop .long 2263 mov 0,%i0 ret restore call %g2 nop .long 2264 mov 0,%i0 ret restore call %g2 nop .long 2265 mov 0,%i0 ret restore call %g2 nop .long 2266 mov 0,%i0 ret restore call %g2 nop .long 2267 mov 0,%i0 ret restore call %g2 nop .long 2268 mov 0,%i0 ret restore call %g2 nop .long 2269 mov 0,%i0 ret restore call %g2 nop .long 2270 mov 0,%i0 ret restore call %g2 nop .long 2271 mov 0,%i0 ret restore call %g2 nop .long 2272 mov 0,%i0 ret restore call %g2 nop .long 2273 mov 0,%i0 ret restore call %g2 nop .long 2274 mov 0,%i0 ret restore call %g2 nop .long 2275 mov 0,%i0 ret restore call %g2 nop .long 2276 mov 0,%i0 ret restore call %g2 nop .long 2277 mov 0,%i0 ret restore call %g2 nop .long 2278 mov 0,%i0 ret restore call %g2 nop .long 2279 mov 0,%i0 ret restore call %g2 nop .long 2280 mov 0,%i0 ret restore call %g2 nop .long 2281 mov 0,%i0 ret restore call %g2 nop .long 2282 mov 0,%i0 ret restore call %g2 nop .long 2283 mov 0,%i0 ret restore call %g2 nop .long 2284 mov 0,%i0 ret restore call %g2 nop .long 2285 mov 0,%i0 ret restore call %g2 nop .long 2286 mov 0,%i0 ret restore call %g2 nop .long 2287 mov 0,%i0 ret restore call %g2 nop .long 2288 mov 0,%i0 ret restore call %g2 nop .long 2289 mov 0,%i0 ret restore call %g2 nop .long 2290 mov 0,%i0 ret restore call %g2 nop .long 2291 mov 0,%i0 ret restore call %g2 nop .long 2292 mov 0,%i0 ret restore call %g2 nop .long 2293 mov 0,%i0 ret restore call %g2 nop .long 2294 mov 0,%i0 ret restore call %g2 nop .long 2295 mov 0,%i0 ret restore call %g2 nop .long 2296 mov 0,%i0 ret restore call %g2 nop .long 2297 mov 0,%i0 ret restore call %g2 nop .long 2298 mov 0,%i0 ret restore call %g2 nop .long 2299 mov 0,%i0 ret restore call %g2 nop .long 2300 mov 0,%i0 ret restore call %g2 nop .long 2301 mov 0,%i0 ret restore call %g2 nop .long 2302 mov 0,%i0 ret restore call %g2 nop .long 2303 mov 0,%i0 ret restore call %g2 nop .long 2304 mov 0,%i0 ret restore call %g2 nop .long 2305 mov 0,%i0 ret restore call %g2 nop .long 2306 mov 0,%i0 ret restore call %g2 nop .long 2307 mov 0,%i0 ret restore call %g2 nop .long 2308 mov 0,%i0 ret restore call %g2 nop .long 2309 mov 0,%i0 ret restore call %g2 nop .long 2310 mov 0,%i0 ret restore call %g2 nop .long 2311 mov 0,%i0 ret restore call %g2 nop .long 2312 mov 0,%i0 ret restore call %g2 nop .long 2313 mov 0,%i0 ret restore call %g2 nop .long 2314 mov 0,%i0 ret restore call %g2 nop .long 2315 mov 0,%i0 ret restore call %g2 nop .long 2316 mov 0,%i0 ret restore call %g2 nop .long 2317 mov 0,%i0 ret restore call %g2 nop .long 2318 mov 0,%i0 ret restore call %g2 nop .long 2319 mov 0,%i0 ret restore call %g2 nop .long 2320 mov 0,%i0 ret restore call %g2 nop .long 2321 mov 0,%i0 ret restore call %g2 nop .long 2322 mov 0,%i0 ret restore call %g2 nop .long 2323 mov 0,%i0 ret restore call %g2 nop .long 2324 mov 0,%i0 ret restore call %g2 nop .long 2325 mov 0,%i0 ret restore call %g2 nop .long 2326 mov 0,%i0 ret restore call %g2 nop .long 2327 mov 0,%i0 ret restore call %g2 nop .long 2328 mov 0,%i0 ret restore call %g2 nop .long 2329 mov 0,%i0 ret restore call %g2 nop .long 2330 mov 0,%i0 ret restore call %g2 nop .long 2331 mov 0,%i0 ret restore call %g2 nop .long 2332 mov 0,%i0 ret restore call %g2 nop .long 2333 mov 0,%i0 ret restore call %g2 nop .long 2334 mov 0,%i0 ret restore call %g2 nop .long 2335 mov 0,%i0 ret restore call %g2 nop .long 2336 mov 0,%i0 ret restore call %g2 nop .long 2337 mov 0,%i0 ret restore call %g2 nop .long 2338 mov 0,%i0 ret restore call %g2 nop .long 2339 mov 0,%i0 ret restore call %g2 nop .long 2340 mov 0,%i0 ret restore call %g2 nop .long 2341 mov 0,%i0 ret restore call %g2 nop .long 2342 mov 0,%i0 ret restore call %g2 nop .long 2343 mov 0,%i0 ret restore call %g2 nop .long 2344 mov 0,%i0 ret restore call %g2 nop .long 2345 mov 0,%i0 ret restore call %g2 nop .long 2346 mov 0,%i0 ret restore call %g2 nop .long 2347 mov 0,%i0 ret restore call %g2 nop .long 2348 mov 0,%i0 ret restore call %g2 nop .long 2349 mov 0,%i0 ret restore call %g2 nop .long 2350 mov 0,%i0 ret restore call %g2 nop .long 2351 mov 0,%i0 ret restore call %g2 nop .long 2352 mov 0,%i0 ret restore call %g2 nop .long 2353 mov 0,%i0 ret restore call %g2 nop .long 2354 mov 0,%i0 ret restore call %g2 nop .long 2355 mov 0,%i0 ret restore call %g2 nop .long 2356 mov 0,%i0 ret restore call %g2 nop .long 2357 mov 0,%i0 ret restore call %g2 nop .long 2358 mov 0,%i0 ret restore call %g2 nop .long 2359 mov 0,%i0 ret restore call %g2 nop .long 2360 mov 0,%i0 ret restore call %g2 nop .long 2361 mov 0,%i0 ret restore call %g2 nop .long 2362 mov 0,%i0 ret restore call %g2 nop .long 2363 mov 0,%i0 ret restore call %g2 nop .long 2364 mov 0,%i0 ret restore call %g2 nop .long 2365 mov 0,%i0 ret restore call %g2 nop .long 2366 mov 0,%i0 ret restore call %g2 nop .long 2367 mov 0,%i0 ret restore call %g2 nop .long 2368 mov 0,%i0 ret restore call %g2 nop .long 2369 mov 0,%i0 ret restore call %g2 nop .long 2370 mov 0,%i0 ret restore call %g2 nop .long 2371 mov 0,%i0 ret restore call %g2 nop .long 2372 mov 0,%i0 ret restore call %g2 nop .long 2373 mov 0,%i0 ret restore call %g2 nop .long 2374 mov 0,%i0 ret restore call %g2 nop .long 2375 mov 0,%i0 ret restore call %g2 nop .long 2376 mov 0,%i0 ret restore call %g2 nop .long 2377 mov 0,%i0 ret restore call %g2 nop .long 2378 mov 0,%i0 ret restore call %g2 nop .long 2379 mov 0,%i0 ret restore call %g2 nop .long 2380 mov 0,%i0 ret restore call %g2 nop .long 2381 mov 0,%i0 ret restore call %g2 nop .long 2382 mov 0,%i0 ret restore call %g2 nop .long 2383 mov 0,%i0 ret restore call %g2 nop .long 2384 mov 0,%i0 ret restore call %g2 nop .long 2385 mov 0,%i0 ret restore call %g2 nop .long 2386 mov 0,%i0 ret restore call %g2 nop .long 2387 mov 0,%i0 ret restore call %g2 nop .long 2388 mov 0,%i0 ret restore call %g2 nop .long 2389 mov 0,%i0 ret restore call %g2 nop .long 2390 mov 0,%i0 ret restore call %g2 nop .long 2391 mov 0,%i0 ret restore call %g2 nop .long 2392 mov 0,%i0 ret restore call %g2 nop .long 2393 mov 0,%i0 ret restore call %g2 nop .long 2394 mov 0,%i0 ret restore call %g2 nop .long 2395 mov 0,%i0 ret restore call %g2 nop .long 2396 mov 0,%i0 ret restore call %g2 nop .long 2397 mov 0,%i0 ret restore call %g2 nop .long 2398 mov 0,%i0 ret restore call %g2 nop .long 2399 mov 0,%i0 ret restore call %g2 nop .long 2400 mov 0,%i0 ret restore call %g2 nop .long 2401 mov 0,%i0 ret restore call %g2 nop .long 2402 mov 0,%i0 ret restore call %g2 nop .long 2403 mov 0,%i0 ret restore call %g2 nop .long 2404 mov 0,%i0 ret restore call %g2 nop .long 2405 mov 0,%i0 ret restore call %g2 nop .long 2406 mov 0,%i0 ret restore call %g2 nop .long 2407 mov 0,%i0 ret restore call %g2 nop .long 2408 mov 0,%i0 ret restore call %g2 nop .long 2409 mov 0,%i0 ret restore call %g2 nop .long 2410 mov 0,%i0 ret restore call %g2 nop .long 2411 mov 0,%i0 ret restore call %g2 nop .long 2412 mov 0,%i0 ret restore call %g2 nop .long 2413 mov 0,%i0 ret restore call %g2 nop .long 2414 mov 0,%i0 ret restore call %g2 nop .long 2415 mov 0,%i0 ret restore call %g2 nop .long 2416 mov 0,%i0 ret restore call %g2 nop .long 2417 mov 0,%i0 ret restore call %g2 nop .long 2418 mov 0,%i0 ret restore call %g2 nop .long 2419 mov 0,%i0 ret restore call %g2 nop .long 2420 mov 0,%i0 ret restore call %g2 nop .long 2421 mov 0,%i0 ret restore call %g2 nop .long 2422 mov 0,%i0 ret restore call %g2 nop .long 2423 mov 0,%i0 ret restore call %g2 nop .long 2424 mov 0,%i0 ret restore call %g2 nop .long 2425 mov 0,%i0 ret restore call %g2 nop .long 2426 mov 0,%i0 ret restore call %g2 nop .long 2427 mov 0,%i0 ret restore call %g2 nop .long 2428 mov 0,%i0 ret restore call %g2 nop .long 2429 mov 0,%i0 ret restore call %g2 nop .long 2430 mov 0,%i0 ret restore call %g2 nop .long 2431 mov 0,%i0 ret restore call %g2 nop .long 2432 mov 0,%i0 ret restore call %g2 nop .long 2433 mov 0,%i0 ret restore call %g2 nop .long 2434 mov 0,%i0 ret restore call %g2 nop .long 2435 mov 0,%i0 ret restore call %g2 nop .long 2436 mov 0,%i0 ret restore call %g2 nop .long 2437 mov 0,%i0 ret restore call %g2 nop .long 2438 mov 0,%i0 ret restore call %g2 nop .long 2439 mov 0,%i0 ret restore call %g2 nop .long 2440 mov 0,%i0 ret restore call %g2 nop .long 2441 mov 0,%i0 ret restore call %g2 nop .long 2442 mov 0,%i0 ret restore call %g2 nop .long 2443 mov 0,%i0 ret restore call %g2 nop .long 2444 mov 0,%i0 ret restore call %g2 nop .long 2445 mov 0,%i0 ret restore call %g2 nop .long 2446 mov 0,%i0 ret restore call %g2 nop .long 2447 mov 0,%i0 ret restore call %g2 nop .long 2448 mov 0,%i0 ret restore call %g2 nop .long 2449 mov 0,%i0 ret restore call %g2 nop .long 2450 mov 0,%i0 ret restore call %g2 nop .long 2451 mov 0,%i0 ret restore call %g2 nop .long 2452 mov 0,%i0 ret restore call %g2 nop .long 2453 mov 0,%i0 ret restore call %g2 nop .long 2454 mov 0,%i0 ret restore call %g2 nop .long 2455 mov 0,%i0 ret restore call %g2 nop .long 2456 mov 0,%i0 ret restore call %g2 nop .long 2457 mov 0,%i0 ret restore call %g2 nop .long 2458 mov 0,%i0 ret restore call %g2 nop .long 2459 mov 0,%i0 ret restore call %g2 nop .long 2460 mov 0,%i0 ret restore call %g2 nop .long 2461 mov 0,%i0 ret restore call %g2 nop .long 2462 mov 0,%i0 ret restore call %g2 nop .long 2463 mov 0,%i0 ret restore call %g2 nop .long 2464 mov 0,%i0 ret restore call %g2 nop .long 2465 mov 0,%i0 ret restore call %g2 nop .long 2466 mov 0,%i0 ret restore call %g2 nop .long 2467 mov 0,%i0 ret restore call %g2 nop .long 2468 mov 0,%i0 ret restore call %g2 nop .long 2469 mov 0,%i0 ret restore call %g2 nop .long 2470 mov 0,%i0 ret restore call %g2 nop .long 2471 mov 0,%i0 ret restore call %g2 nop .long 2472 mov 0,%i0 ret restore call %g2 nop .long 2473 mov 0,%i0 ret restore call %g2 nop .long 2474 mov 0,%i0 ret restore call %g2 nop .long 2475 mov 0,%i0 ret restore call %g2 nop .long 2476 mov 0,%i0 ret restore call %g2 nop .long 2477 mov 0,%i0 ret restore call %g2 nop .long 2478 mov 0,%i0 ret restore call %g2 nop .long 2479 mov 0,%i0 ret restore call %g2 nop .long 2480 mov 0,%i0 ret restore call %g2 nop .long 2481 mov 0,%i0 ret restore call %g2 nop .long 2482 mov 0,%i0 ret restore call %g2 nop .long 2483 mov 0,%i0 ret restore call %g2 nop .long 2484 mov 0,%i0 ret restore call %g2 nop .long 2485 mov 0,%i0 ret restore call %g2 nop .long 2486 mov 0,%i0 ret restore call %g2 nop .long 2487 mov 0,%i0 ret restore call %g2 nop .long 2488 mov 0,%i0 ret restore call %g2 nop .long 2489 mov 0,%i0 ret restore call %g2 nop .long 2490 mov 0,%i0 ret restore call %g2 nop .long 2491 mov 0,%i0 ret restore call %g2 nop .long 2492 mov 0,%i0 ret restore call %g2 nop .long 2493 mov 0,%i0 ret restore call %g2 nop .long 2494 mov 0,%i0 ret restore call %g2 nop .long 2495 mov 0,%i0 ret restore call %g2 nop .long 2496 mov 0,%i0 ret restore call %g2 nop .long 2497 mov 0,%i0 ret restore call %g2 nop .long 2498 mov 0,%i0 ret restore call %g2 nop .long 2499 mov 0,%i0 ret restore call %g2 nop .long 2500 mov 0,%i0 ret restore call %g2 nop .long 2501 mov 0,%i0 ret restore call %g2 nop .long 2502 mov 0,%i0 ret restore call %g2 nop .long 2503 mov 0,%i0 ret restore call %g2 nop .long 2504 mov 0,%i0 ret restore call %g2 nop .long 2505 mov 0,%i0 ret restore call %g2 nop .long 2506 mov 0,%i0 ret restore call %g2 nop .long 2507 mov 0,%i0 ret restore call %g2 nop .long 2508 mov 0,%i0 ret restore call %g2 nop .long 2509 mov 0,%i0 ret restore call %g2 nop .long 2510 mov 0,%i0 ret restore call %g2 nop .long 2511 mov 0,%i0 ret restore call %g2 nop .long 2512 mov 0,%i0 ret restore call %g2 nop .long 2513 mov 0,%i0 ret restore call %g2 nop .long 2514 mov 0,%i0 ret restore call %g2 nop .long 2515 mov 0,%i0 ret restore call %g2 nop .long 2516 mov 0,%i0 ret restore call %g2 nop .long 2517 mov 0,%i0 ret restore call %g2 nop .long 2518 mov 0,%i0 ret restore call %g2 nop .long 2519 mov 0,%i0 ret restore call %g2 nop .long 2520 mov 0,%i0 ret restore call %g2 nop .long 2521 mov 0,%i0 ret restore call %g2 nop .long 2522 mov 0,%i0 ret restore call %g2 nop .long 2523 mov 0,%i0 ret restore call %g2 nop .long 2524 mov 0,%i0 ret restore call %g2 nop .long 2525 mov 0,%i0 ret restore call %g2 nop .long 2526 mov 0,%i0 ret restore call %g2 nop .long 2527 mov 0,%i0 ret restore call %g2 nop .long 2528 mov 0,%i0 ret restore call %g2 nop .long 2529 mov 0,%i0 ret restore call %g2 nop .long 2530 mov 0,%i0 ret restore call %g2 nop .long 2531 mov 0,%i0 ret restore call %g2 nop .long 2532 mov 0,%i0 ret restore call %g2 nop .long 2533 mov 0,%i0 ret restore call %g2 nop .long 2534 mov 0,%i0 ret restore call %g2 nop .long 2535 mov 0,%i0 ret restore call %g2 nop .long 2536 mov 0,%i0 ret restore call %g2 nop .long 2537 mov 0,%i0 ret restore call %g2 nop .long 2538 mov 0,%i0 ret restore call %g2 nop .long 2539 mov 0,%i0 ret restore call %g2 nop .long 2540 mov 0,%i0 ret restore call %g2 nop .long 2541 mov 0,%i0 ret restore call %g2 nop .long 2542 mov 0,%i0 ret restore call %g2 nop .long 2543 mov 0,%i0 ret restore call %g2 nop .long 2544 mov 0,%i0 ret restore call %g2 nop .long 2545 mov 0,%i0 ret restore call %g2 nop .long 2546 mov 0,%i0 ret restore call %g2 nop .long 2547 mov 0,%i0 ret restore call %g2 nop .long 2548 mov 0,%i0 ret restore call %g2 nop .long 2549 mov 0,%i0 ret restore call %g2 nop .long 2550 mov 0,%i0 ret restore call %g2 nop .long 2551 mov 0,%i0 ret restore call %g2 nop .long 2552 mov 0,%i0 ret restore call %g2 nop .long 2553 mov 0,%i0 ret restore call %g2 nop .long 2554 mov 0,%i0 ret restore call %g2 nop .long 2555 mov 0,%i0 ret restore call %g2 nop .long 2556 mov 0,%i0 ret restore call %g2 nop .long 2557 mov 0,%i0 ret restore call %g2 nop .long 2558 mov 0,%i0 ret restore call %g2 nop .long 2559 mov 0,%i0 ret restore call %g2 nop .long 2560 mov 0,%i0 ret restore call %g2 nop .long 2561 mov 0,%i0 ret restore call %g2 nop .long 2562 mov 0,%i0 ret restore call %g2 nop .long 2563 mov 0,%i0 ret restore call %g2 nop .long 2564 mov 0,%i0 ret restore call %g2 nop .long 2565 mov 0,%i0 ret restore call %g2 nop .long 2566 mov 0,%i0 ret restore call %g2 nop .long 2567 mov 0,%i0 ret restore call %g2 nop .long 2568 mov 0,%i0 ret restore call %g2 nop .long 2569 mov 0,%i0 ret restore call %g2 nop .long 2570 mov 0,%i0 ret restore call %g2 nop .long 2571 mov 0,%i0 ret restore call %g2 nop .long 2572 mov 0,%i0 ret restore call %g2 nop .long 2573 mov 0,%i0 ret restore call %g2 nop .long 2574 mov 0,%i0 ret restore call %g2 nop .long 2575 mov 0,%i0 ret restore call %g2 nop .long 2576 mov 0,%i0 ret restore call %g2 nop .long 2577 mov 0,%i0 ret restore call %g2 nop .long 2578 mov 0,%i0 ret restore call %g2 nop .long 2579 mov 0,%i0 ret restore call %g2 nop .long 2580 mov 0,%i0 ret restore call %g2 nop .long 2581 mov 0,%i0 ret restore call %g2 nop .long 2582 mov 0,%i0 ret restore call %g2 nop .long 2583 mov 0,%i0 ret restore call %g2 nop .long 2584 mov 0,%i0 ret restore call %g2 nop .long 2585 mov 0,%i0 ret restore call %g2 nop .long 2586 mov 0,%i0 ret restore call %g2 nop .long 2587 mov 0,%i0 ret restore call %g2 nop .long 2588 mov 0,%i0 ret restore call %g2 nop .long 2589 mov 0,%i0 ret restore call %g2 nop .long 2590 mov 0,%i0 ret restore call %g2 nop .long 2591 mov 0,%i0 ret restore call %g2 nop .long 2592 mov 0,%i0 ret restore call %g2 nop .long 2593 mov 0,%i0 ret restore call %g2 nop .long 2594 mov 0,%i0 ret restore call %g2 nop .long 2595 mov 0,%i0 ret restore call %g2 nop .long 2596 mov 0,%i0 ret restore call %g2 nop .long 2597 mov 0,%i0 ret restore call %g2 nop .long 2598 mov 0,%i0 ret restore call %g2 nop .long 2599 mov 0,%i0 ret restore call %g2 nop .long 2600 mov 0,%i0 ret restore call %g2 nop .long 2601 mov 0,%i0 ret restore call %g2 nop .long 2602 mov 0,%i0 ret restore call %g2 nop .long 2603 mov 0,%i0 ret restore call %g2 nop .long 2604 mov 0,%i0 ret restore call %g2 nop .long 2605 mov 0,%i0 ret restore call %g2 nop .long 2606 mov 0,%i0 ret restore call %g2 nop .long 2607 mov 0,%i0 ret restore call %g2 nop .long 2608 mov 0,%i0 ret restore call %g2 nop .long 2609 mov 0,%i0 ret restore call %g2 nop .long 2610 mov 0,%i0 ret restore call %g2 nop .long 2611 mov 0,%i0 ret restore call %g2 nop .long 2612 mov 0,%i0 ret restore call %g2 nop .long 2613 mov 0,%i0 ret restore call %g2 nop .long 2614 mov 0,%i0 ret restore call %g2 nop .long 2615 mov 0,%i0 ret restore call %g2 nop .long 2616 mov 0,%i0 ret restore call %g2 nop .long 2617 mov 0,%i0 ret restore call %g2 nop .long 2618 mov 0,%i0 ret restore call %g2 nop .long 2619 mov 0,%i0 ret restore call %g2 nop .long 2620 mov 0,%i0 ret restore call %g2 nop .long 2621 mov 0,%i0 ret restore call %g2 nop .long 2622 mov 0,%i0 ret restore call %g2 nop .long 2623 mov 0,%i0 ret restore call %g2 nop .long 2624 mov 0,%i0 ret restore call %g2 nop .long 2625 mov 0,%i0 ret restore call %g2 nop .long 2626 mov 0,%i0 ret restore call %g2 nop .long 2627 mov 0,%i0 ret restore call %g2 nop .long 2628 mov 0,%i0 ret restore call %g2 nop .long 2629 mov 0,%i0 ret restore call %g2 nop .long 2630 mov 0,%i0 ret restore call %g2 nop .long 2631 mov 0,%i0 ret restore call %g2 nop .long 2632 mov 0,%i0 ret restore call %g2 nop .long 2633 mov 0,%i0 ret restore call %g2 nop .long 2634 mov 0,%i0 ret restore call %g2 nop .long 2635 mov 0,%i0 ret restore call %g2 nop .long 2636 mov 0,%i0 ret restore call %g2 nop .long 2637 mov 0,%i0 ret restore call %g2 nop .long 2638 mov 0,%i0 ret restore call %g2 nop .long 2639 mov 0,%i0 ret restore call %g2 nop .long 2640 mov 0,%i0 ret restore call %g2 nop .long 2641 mov 0,%i0 ret restore call %g2 nop .long 2642 mov 0,%i0 ret restore call %g2 nop .long 2643 mov 0,%i0 ret restore call %g2 nop .long 2644 mov 0,%i0 ret restore call %g2 nop .long 2645 mov 0,%i0 ret restore call %g2 nop .long 2646 mov 0,%i0 ret restore call %g2 nop .long 2647 mov 0,%i0 ret restore call %g2 nop .long 2648 mov 0,%i0 ret restore call %g2 nop .long 2649 mov 0,%i0 ret restore call %g2 nop .long 2650 mov 0,%i0 ret restore call %g2 nop .long 2651 mov 0,%i0 ret restore call %g2 nop .long 2652 mov 0,%i0 ret restore call %g2 nop .long 2653 mov 0,%i0 ret restore call %g2 nop .long 2654 mov 0,%i0 ret restore call %g2 nop .long 2655 mov 0,%i0 ret restore call %g2 nop .long 2656 mov 0,%i0 ret restore call %g2 nop .long 2657 mov 0,%i0 ret restore call %g2 nop .long 2658 mov 0,%i0 ret restore call %g2 nop .long 2659 mov 0,%i0 ret restore call %g2 nop .long 2660 mov 0,%i0 ret restore call %g2 nop .long 2661 mov 0,%i0 ret restore call %g2 nop .long 2662 mov 0,%i0 ret restore call %g2 nop .long 2663 mov 0,%i0 ret restore call %g2 nop .long 2664 mov 0,%i0 ret restore call %g2 nop .long 2665 mov 0,%i0 ret restore call %g2 nop .long 2666 mov 0,%i0 ret restore call %g2 nop .long 2667 mov 0,%i0 ret restore call %g2 nop .long 2668 mov 0,%i0 ret restore call %g2 nop .long 2669 mov 0,%i0 ret restore call %g2 nop .long 2670 mov 0,%i0 ret restore call %g2 nop .long 2671 mov 0,%i0 ret restore call %g2 nop .long 2672 mov 0,%i0 ret restore call %g2 nop .long 2673 mov 0,%i0 ret restore call %g2 nop .long 2674 mov 0,%i0 ret restore call %g2 nop .long 2675 mov 0,%i0 ret restore call %g2 nop .long 2676 mov 0,%i0 ret restore call %g2 nop .long 2677 mov 0,%i0 ret restore call %g2 nop .long 2678 mov 0,%i0 ret restore call %g2 nop .long 2679 mov 0,%i0 ret restore call %g2 nop .long 2680 mov 0,%i0 ret restore call %g2 nop .long 2681 mov 0,%i0 ret restore call %g2 nop .long 2682 mov 0,%i0 ret restore call %g2 nop .long 2683 mov 0,%i0 ret restore call %g2 nop .long 2684 mov 0,%i0 ret restore call %g2 nop .long 2685 mov 0,%i0 ret restore call %g2 nop .long 2686 mov 0,%i0 ret restore call %g2 nop .long 2687 mov 0,%i0 ret restore call %g2 nop .long 2688 mov 0,%i0 ret restore call %g2 nop .long 2689 mov 0,%i0 ret restore call %g2 nop .long 2690 mov 0,%i0 ret restore call %g2 nop .long 2691 mov 0,%i0 ret restore call %g2 nop .long 2692 mov 0,%i0 ret restore call %g2 nop .long 2693 mov 0,%i0 ret restore call %g2 nop .long 2694 mov 0,%i0 ret restore call %g2 nop .long 2695 mov 0,%i0 ret restore call %g2 nop .long 2696 mov 0,%i0 ret restore call %g2 nop .long 2697 mov 0,%i0 ret restore call %g2 nop .long 2698 mov 0,%i0 ret restore call %g2 nop .long 2699 mov 0,%i0 ret restore call %g2 nop .long 2700 mov 0,%i0 ret restore call %g2 nop .long 2701 mov 0,%i0 ret restore call %g2 nop .long 2702 mov 0,%i0 ret restore call %g2 nop .long 2703 mov 0,%i0 ret restore call %g2 nop .long 2704 mov 0,%i0 ret restore call %g2 nop .long 2705 mov 0,%i0 ret restore call %g2 nop .long 2706 mov 0,%i0 ret restore call %g2 nop .long 2707 mov 0,%i0 ret restore call %g2 nop .long 2708 mov 0,%i0 ret restore call %g2 nop .long 2709 mov 0,%i0 ret restore call %g2 nop .long 2710 mov 0,%i0 ret restore call %g2 nop .long 2711 mov 0,%i0 ret restore call %g2 nop .long 2712 mov 0,%i0 ret restore call %g2 nop .long 2713 mov 0,%i0 ret restore call %g2 nop .long 2714 mov 0,%i0 ret restore call %g2 nop .long 2715 mov 0,%i0 ret restore call %g2 nop .long 2716 mov 0,%i0 ret restore call %g2 nop .long 2717 mov 0,%i0 ret restore call %g2 nop .long 2718 mov 0,%i0 ret restore call %g2 nop .long 2719 mov 0,%i0 ret restore call %g2 nop .long 2720 mov 0,%i0 ret restore call %g2 nop .long 2721 mov 0,%i0 ret restore call %g2 nop .long 2722 mov 0,%i0 ret restore call %g2 nop .long 2723 mov 0,%i0 ret restore call %g2 nop .long 2724 mov 0,%i0 ret restore call %g2 nop .long 2725 mov 0,%i0 ret restore call %g2 nop .long 2726 mov 0,%i0 ret restore call %g2 nop .long 2727 mov 0,%i0 ret restore call %g2 nop .long 2728 mov 0,%i0 ret restore call %g2 nop .long 2729 mov 0,%i0 ret restore call %g2 nop .long 2730 mov 0,%i0 ret restore call %g2 nop .long 2731 mov 0,%i0 ret restore call %g2 nop .long 2732 mov 0,%i0 ret restore call %g2 nop .long 2733 mov 0,%i0 ret restore call %g2 nop .long 2734 mov 0,%i0 ret restore call %g2 nop .long 2735 mov 0,%i0 ret restore call %g2 nop .long 2736 mov 0,%i0 ret restore call %g2 nop .long 2737 mov 0,%i0 ret restore call %g2 nop .long 2738 mov 0,%i0 ret restore call %g2 nop .long 2739 mov 0,%i0 ret restore call %g2 nop .long 2740 mov 0,%i0 ret restore call %g2 nop .long 2741 mov 0,%i0 ret restore call %g2 nop .long 2742 mov 0,%i0 ret restore call %g2 nop .long 2743 mov 0,%i0 ret restore call %g2 nop .long 2744 mov 0,%i0 ret restore call %g2 nop .long 2745 mov 0,%i0 ret restore call %g2 nop .long 2746 mov 0,%i0 ret restore call %g2 nop .long 2747 mov 0,%i0 ret restore call %g2 nop .long 2748 mov 0,%i0 ret restore call %g2 nop .long 2749 mov 0,%i0 ret restore call %g2 nop .long 2750 mov 0,%i0 ret restore call %g2 nop .long 2751 mov 0,%i0 ret restore call %g2 nop .long 2752 mov 0,%i0 ret restore call %g2 nop .long 2753 mov 0,%i0 ret restore call %g2 nop .long 2754 mov 0,%i0 ret restore call %g2 nop .long 2755 mov 0,%i0 ret restore call %g2 nop .long 2756 mov 0,%i0 ret restore call %g2 nop .long 2757 mov 0,%i0 ret restore call %g2 nop .long 2758 mov 0,%i0 ret restore call %g2 nop .long 2759 mov 0,%i0 ret restore call %g2 nop .long 2760 mov 0,%i0 ret restore call %g2 nop .long 2761 mov 0,%i0 ret restore call %g2 nop .long 2762 mov 0,%i0 ret restore call %g2 nop .long 2763 mov 0,%i0 ret restore call %g2 nop .long 2764 mov 0,%i0 ret restore call %g2 nop .long 2765 mov 0,%i0 ret restore call %g2 nop .long 2766 mov 0,%i0 ret restore call %g2 nop .long 2767 mov 0,%i0 ret restore call %g2 nop .long 2768 mov 0,%i0 ret restore call %g2 nop .long 2769 mov 0,%i0 ret restore call %g2 nop .long 2770 mov 0,%i0 ret restore call %g2 nop .long 2771 mov 0,%i0 ret restore call %g2 nop .long 2772 mov 0,%i0 ret restore call %g2 nop .long 2773 mov 0,%i0 ret restore call %g2 nop .long 2774 mov 0,%i0 ret restore call %g2 nop .long 2775 mov 0,%i0 ret restore call %g2 nop .long 2776 mov 0,%i0 ret restore call %g2 nop .long 2777 mov 0,%i0 ret restore call %g2 nop .long 2778 mov 0,%i0 ret restore call %g2 nop .long 2779 mov 0,%i0 ret restore call %g2 nop .long 2780 mov 0,%i0 ret restore call %g2 nop .long 2781 mov 0,%i0 ret restore call %g2 nop .long 2782 mov 0,%i0 ret restore call %g2 nop .long 2783 mov 0,%i0 ret restore call %g2 nop .long 2784 mov 0,%i0 ret restore call %g2 nop .long 2785 mov 0,%i0 ret restore call %g2 nop .long 2786 mov 0,%i0 ret restore call %g2 nop .long 2787 mov 0,%i0 ret restore call %g2 nop .long 2788 mov 0,%i0 ret restore call %g2 nop .long 2789 mov 0,%i0 ret restore call %g2 nop .long 2790 mov 0,%i0 ret restore call %g2 nop .long 2791 mov 0,%i0 ret restore call %g2 nop .long 2792 mov 0,%i0 ret restore call %g2 nop .long 2793 mov 0,%i0 ret restore call %g2 nop .long 2794 mov 0,%i0 ret restore call %g2 nop .long 2795 mov 0,%i0 ret restore call %g2 nop .long 2796 mov 0,%i0 ret restore call %g2 nop .long 2797 mov 0,%i0 ret restore call %g2 nop .long 2798 mov 0,%i0 ret restore call %g2 nop .long 2799 mov 0,%i0 ret restore call %g2 nop .long 2800 mov 0,%i0 ret restore call %g2 nop .long 2801 mov 0,%i0 ret restore call %g2 nop .long 2802 mov 0,%i0 ret restore call %g2 nop .long 2803 mov 0,%i0 ret restore call %g2 nop .long 2804 mov 0,%i0 ret restore call %g2 nop .long 2805 mov 0,%i0 ret restore call %g2 nop .long 2806 mov 0,%i0 ret restore call %g2 nop .long 2807 mov 0,%i0 ret restore call %g2 nop .long 2808 mov 0,%i0 ret restore call %g2 nop .long 2809 mov 0,%i0 ret restore call %g2 nop .long 2810 mov 0,%i0 ret restore call %g2 nop .long 2811 mov 0,%i0 ret restore call %g2 nop .long 2812 mov 0,%i0 ret restore call %g2 nop .long 2813 mov 0,%i0 ret restore call %g2 nop .long 2814 mov 0,%i0 ret restore call %g2 nop .long 2815 mov 0,%i0 ret restore call %g2 nop .long 2816 mov 0,%i0 ret restore call %g2 nop .long 2817 mov 0,%i0 ret restore call %g2 nop .long 2818 mov 0,%i0 ret restore call %g2 nop .long 2819 mov 0,%i0 ret restore call %g2 nop .long 2820 mov 0,%i0 ret restore call %g2 nop .long 2821 mov 0,%i0 ret restore call %g2 nop .long 2822 mov 0,%i0 ret restore call %g2 nop .long 2823 mov 0,%i0 ret restore call %g2 nop .long 2824 mov 0,%i0 ret restore call %g2 nop .long 2825 mov 0,%i0 ret restore call %g2 nop .long 2826 mov 0,%i0 ret restore call %g2 nop .long 2827 mov 0,%i0 ret restore call %g2 nop .long 2828 mov 0,%i0 ret restore call %g2 nop .long 2829 mov 0,%i0 ret restore call %g2 nop .long 2830 mov 0,%i0 ret restore call %g2 nop .long 2831 mov 0,%i0 ret restore call %g2 nop .long 2832 mov 0,%i0 ret restore call %g2 nop .long 2833 mov 0,%i0 ret restore call %g2 nop .long 2834 mov 0,%i0 ret restore call %g2 nop .long 2835 mov 0,%i0 ret restore call %g2 nop .long 2836 mov 0,%i0 ret restore call %g2 nop .long 2837 mov 0,%i0 ret restore call %g2 nop .long 2838 mov 0,%i0 ret restore call %g2 nop .long 2839 mov 0,%i0 ret restore call %g2 nop .long 2840 mov 0,%i0 ret restore call %g2 nop .long 2841 mov 0,%i0 ret restore call %g2 nop .long 2842 mov 0,%i0 ret restore call %g2 nop .long 2843 mov 0,%i0 ret restore call %g2 nop .long 2844 mov 0,%i0 ret restore call %g2 nop .long 2845 mov 0,%i0 ret restore call %g2 nop .long 2846 mov 0,%i0 ret restore call %g2 nop .long 2847 mov 0,%i0 ret restore call %g2 nop .long 2848 mov 0,%i0 ret restore call %g2 nop .long 2849 mov 0,%i0 ret restore call %g2 nop .long 2850 mov 0,%i0 ret restore call %g2 nop .long 2851 mov 0,%i0 ret restore call %g2 nop .long 2852 mov 0,%i0 ret restore call %g2 nop .long 2853 mov 0,%i0 ret restore call %g2 nop .long 2854 mov 0,%i0 ret restore call %g2 nop .long 2855 mov 0,%i0 ret restore call %g2 nop .long 2856 mov 0,%i0 ret restore call %g2 nop .long 2857 mov 0,%i0 ret restore call %g2 nop .long 2858 mov 0,%i0 ret restore call %g2 nop .long 2859 mov 0,%i0 ret restore call %g2 nop .long 2860 mov 0,%i0 ret restore call %g2 nop .long 2861 mov 0,%i0 ret restore call %g2 nop .long 2862 mov 0,%i0 ret restore call %g2 nop .long 2863 mov 0,%i0 ret restore call %g2 nop .long 2864 mov 0,%i0 ret restore call %g2 nop .long 2865 mov 0,%i0 ret restore call %g2 nop .long 2866 mov 0,%i0 ret restore call %g2 nop .long 2867 mov 0,%i0 ret restore call %g2 nop .long 2868 mov 0,%i0 ret restore call %g2 nop .long 2869 mov 0,%i0 ret restore call %g2 nop .long 2870 mov 0,%i0 ret restore call %g2 nop .long 2871 mov 0,%i0 ret restore call %g2 nop .long 2872 mov 0,%i0 ret restore call %g2 nop .long 2873 mov 0,%i0 ret restore call %g2 nop .long 2874 mov 0,%i0 ret restore call %g2 nop .long 2875 mov 0,%i0 ret restore call %g2 nop .long 2876 mov 0,%i0 ret restore call %g2 nop .long 2877 mov 0,%i0 ret restore call %g2 nop .long 2878 mov 0,%i0 ret restore call %g2 nop .long 2879 mov 0,%i0 ret restore call %g2 nop .long 2880 mov 0,%i0 ret restore call %g2 nop .long 2881 mov 0,%i0 ret restore call %g2 nop .long 2882 mov 0,%i0 ret restore call %g2 nop .long 2883 mov 0,%i0 ret restore call %g2 nop .long 2884 mov 0,%i0 ret restore call %g2 nop .long 2885 mov 0,%i0 ret restore call %g2 nop .long 2886 mov 0,%i0 ret restore call %g2 nop .long 2887 mov 0,%i0 ret restore call %g2 nop .long 2888 mov 0,%i0 ret restore call %g2 nop .long 2889 mov 0,%i0 ret restore call %g2 nop .long 2890 mov 0,%i0 ret restore call %g2 nop .long 2891 mov 0,%i0 ret restore call %g2 nop .long 2892 mov 0,%i0 ret restore call %g2 nop .long 2893 mov 0,%i0 ret restore call %g2 nop .long 2894 mov 0,%i0 ret restore call %g2 nop .long 2895 mov 0,%i0 ret restore call %g2 nop .long 2896 mov 0,%i0 ret restore call %g2 nop .long 2897 mov 0,%i0 ret restore call %g2 nop .long 2898 mov 0,%i0 ret restore call %g2 nop .long 2899 mov 0,%i0 ret restore call %g2 nop .long 2900 mov 0,%i0 ret restore call %g2 nop .long 2901 mov 0,%i0 ret restore call %g2 nop .long 2902 mov 0,%i0 ret restore call %g2 nop .long 2903 mov 0,%i0 ret restore call %g2 nop .long 2904 mov 0,%i0 ret restore call %g2 nop .long 2905 mov 0,%i0 ret restore call %g2 nop .long 2906 mov 0,%i0 ret restore call %g2 nop .long 2907 mov 0,%i0 ret restore call %g2 nop .long 2908 mov 0,%i0 ret restore call %g2 nop .long 2909 mov 0,%i0 ret restore call %g2 nop .long 2910 mov 0,%i0 ret restore call %g2 nop .long 2911 mov 0,%i0 ret restore call %g2 nop .long 2912 mov 0,%i0 ret restore call %g2 nop .long 2913 mov 0,%i0 ret restore call %g2 nop .long 2914 mov 0,%i0 ret restore call %g2 nop .long 2915 mov 0,%i0 ret restore call %g2 nop .long 2916 mov 0,%i0 ret restore call %g2 nop .long 2917 mov 0,%i0 ret restore call %g2 nop .long 2918 mov 0,%i0 ret restore call %g2 nop .long 2919 mov 0,%i0 ret restore call %g2 nop .long 2920 mov 0,%i0 ret restore call %g2 nop .long 2921 mov 0,%i0 ret restore call %g2 nop .long 2922 mov 0,%i0 ret restore call %g2 nop .long 2923 mov 0,%i0 ret restore call %g2 nop .long 2924 mov 0,%i0 ret restore call %g2 nop .long 2925 mov 0,%i0 ret restore call %g2 nop .long 2926 mov 0,%i0 ret restore call %g2 nop .long 2927 mov 0,%i0 ret restore call %g2 nop .long 2928 mov 0,%i0 ret restore call %g2 nop .long 2929 mov 0,%i0 ret restore call %g2 nop .long 2930 mov 0,%i0 ret restore call %g2 nop .long 2931 mov 0,%i0 ret restore call %g2 nop .long 2932 mov 0,%i0 ret restore call %g2 nop .long 2933 mov 0,%i0 ret restore call %g2 nop .long 2934 mov 0,%i0 ret restore call %g2 nop .long 2935 mov 0,%i0 ret restore call %g2 nop .long 2936 mov 0,%i0 ret restore call %g2 nop .long 2937 mov 0,%i0 ret restore call %g2 nop .long 2938 mov 0,%i0 ret restore call %g2 nop .long 2939 mov 0,%i0 ret restore call %g2 nop .long 2940 mov 0,%i0 ret restore call %g2 nop .long 2941 mov 0,%i0 ret restore call %g2 nop .long 2942 mov 0,%i0 ret restore call %g2 nop .long 2943 mov 0,%i0 ret restore call %g2 nop .long 2944 mov 0,%i0 ret restore call %g2 nop .long 2945 mov 0,%i0 ret restore call %g2 nop .long 2946 mov 0,%i0 ret restore call %g2 nop .long 2947 mov 0,%i0 ret restore call %g2 nop .long 2948 mov 0,%i0 ret restore call %g2 nop .long 2949 mov 0,%i0 ret restore call %g2 nop .long 2950 mov 0,%i0 ret restore call %g2 nop .long 2951 mov 0,%i0 ret restore call %g2 nop .long 2952 mov 0,%i0 ret restore call %g2 nop .long 2953 mov 0,%i0 ret restore call %g2 nop .long 2954 mov 0,%i0 ret restore call %g2 nop .long 2955 mov 0,%i0 ret restore call %g2 nop .long 2956 mov 0,%i0 ret restore call %g2 nop .long 2957 mov 0,%i0 ret restore call %g2 nop .long 2958 mov 0,%i0 ret restore call %g2 nop .long 2959 mov 0,%i0 ret restore call %g2 nop .long 2960 mov 0,%i0 ret restore call %g2 nop .long 2961 mov 0,%i0 ret restore call %g2 nop .long 2962 mov 0,%i0 ret restore call %g2 nop .long 2963 mov 0,%i0 ret restore call %g2 nop .long 2964 mov 0,%i0 ret restore call %g2 nop .long 2965 mov 0,%i0 ret restore call %g2 nop .long 2966 mov 0,%i0 ret restore call %g2 nop .long 2967 mov 0,%i0 ret restore call %g2 nop .long 2968 mov 0,%i0 ret restore call %g2 nop .long 2969 mov 0,%i0 ret restore call %g2 nop .long 2970 mov 0,%i0 ret restore call %g2 nop .long 2971 mov 0,%i0 ret restore call %g2 nop .long 2972 mov 0,%i0 ret restore call %g2 nop .long 2973 mov 0,%i0 ret restore call %g2 nop .long 2974 mov 0,%i0 ret restore call %g2 nop .long 2975 mov 0,%i0 ret restore call %g2 nop .long 2976 mov 0,%i0 ret restore call %g2 nop .long 2977 mov 0,%i0 ret restore call %g2 nop .long 2978 mov 0,%i0 ret restore call %g2 nop .long 2979 mov 0,%i0 ret restore call %g2 nop .long 2980 mov 0,%i0 ret restore call %g2 nop .long 2981 mov 0,%i0 ret restore call %g2 nop .long 2982 mov 0,%i0 ret restore call %g2 nop .long 2983 mov 0,%i0 ret restore call %g2 nop .long 2984 mov 0,%i0 ret restore call %g2 nop .long 2985 mov 0,%i0 ret restore call %g2 nop .long 2986 mov 0,%i0 ret restore call %g2 nop .long 2987 mov 0,%i0 ret restore call %g2 nop .long 2988 mov 0,%i0 ret restore call %g2 nop .long 2989 mov 0,%i0 ret restore call %g2 nop .long 2990 mov 0,%i0 ret restore call %g2 nop .long 2991 mov 0,%i0 ret restore call %g2 nop .long 2992 mov 0,%i0 ret restore call %g2 nop .long 2993 mov 0,%i0 ret restore call %g2 nop .long 2994 mov 0,%i0 ret restore call %g2 nop .long 2995 mov 0,%i0 ret restore call %g2 nop .long 2996 mov 0,%i0 ret restore call %g2 nop .long 2997 mov 0,%i0 ret restore call %g2 nop .long 2998 mov 0,%i0 ret restore call %g2 nop .long 2999 mov 0,%i0 ret restore call %g2 nop .long 3000 mov 0,%i0 ret restore call %g2 nop .long 3001 mov 0,%i0 ret restore call %g2 nop .long 3002 mov 0,%i0 ret restore call %g2 nop .long 3003 mov 0,%i0 ret restore call %g2 nop .long 3004 mov 0,%i0 ret restore call %g2 nop .long 3005 mov 0,%i0 ret restore call %g2 nop .long 3006 mov 0,%i0 ret restore call %g2 nop .long 3007 mov 0,%i0 ret restore call %g2 nop .long 3008 mov 0,%i0 ret restore call %g2 nop .long 3009 mov 0,%i0 ret restore call %g2 nop .long 3010 mov 0,%i0 ret restore call %g2 nop .long 3011 mov 0,%i0 ret restore call %g2 nop .long 3012 mov 0,%i0 ret restore call %g2 nop .long 3013 mov 0,%i0 ret restore call %g2 nop .long 3014 mov 0,%i0 ret restore call %g2 nop .long 3015 mov 0,%i0 ret restore call %g2 nop .long 3016 mov 0,%i0 ret restore call %g2 nop .long 3017 mov 0,%i0 ret restore call %g2 nop .long 3018 mov 0,%i0 ret restore call %g2 nop .long 3019 mov 0,%i0 ret restore call %g2 nop .long 3020 mov 0,%i0 ret restore call %g2 nop .long 3021 mov 0,%i0 ret restore call %g2 nop .long 3022 mov 0,%i0 ret restore call %g2 nop .long 3023 mov 0,%i0 ret restore call %g2 nop .long 3024 mov 0,%i0 ret restore call %g2 nop .long 3025 mov 0,%i0 ret restore call %g2 nop .long 3026 mov 0,%i0 ret restore call %g2 nop .long 3027 mov 0,%i0 ret restore call %g2 nop .long 3028 mov 0,%i0 ret restore call %g2 nop .long 3029 mov 0,%i0 ret restore call %g2 nop .long 3030 mov 0,%i0 ret restore call %g2 nop .long 3031 mov 0,%i0 ret restore call %g2 nop .long 3032 mov 0,%i0 ret restore call %g2 nop .long 3033 mov 0,%i0 ret restore call %g2 nop .long 3034 mov 0,%i0 ret restore call %g2 nop .long 3035 mov 0,%i0 ret restore call %g2 nop .long 3036 mov 0,%i0 ret restore call %g2 nop .long 3037 mov 0,%i0 ret restore call %g2 nop .long 3038 mov 0,%i0 ret restore call %g2 nop .long 3039 mov 0,%i0 ret restore call %g2 nop .long 3040 mov 0,%i0 ret restore call %g2 nop .long 3041 mov 0,%i0 ret restore call %g2 nop .long 3042 mov 0,%i0 ret restore call %g2 nop .long 3043 mov 0,%i0 ret restore call %g2 nop .long 3044 mov 0,%i0 ret restore call %g2 nop .long 3045 mov 0,%i0 ret restore call %g2 nop .long 3046 mov 0,%i0 ret restore call %g2 nop .long 3047 mov 0,%i0 ret restore call %g2 nop .long 3048 mov 0,%i0 ret restore call %g2 nop .long 3049 mov 0,%i0 ret restore call %g2 nop .long 3050 mov 0,%i0 ret restore call %g2 nop .long 3051 mov 0,%i0 ret restore call %g2 nop .long 3052 mov 0,%i0 ret restore call %g2 nop .long 3053 mov 0,%i0 ret restore call %g2 nop .long 3054 mov 0,%i0 ret restore call %g2 nop .long 3055 mov 0,%i0 ret restore call %g2 nop .long 3056 mov 0,%i0 ret restore call %g2 nop .long 3057 mov 0,%i0 ret restore call %g2 nop .long 3058 mov 0,%i0 ret restore call %g2 nop .long 3059 mov 0,%i0 ret restore call %g2 nop .long 3060 mov 0,%i0 ret restore call %g2 nop .long 3061 mov 0,%i0 ret restore call %g2 nop .long 3062 mov 0,%i0 ret restore call %g2 nop .long 3063 mov 0,%i0 ret restore call %g2 nop .long 3064 mov 0,%i0 ret restore call %g2 nop .long 3065 mov 0,%i0 ret restore call %g2 nop .long 3066 mov 0,%i0 ret restore call %g2 nop .long 3067 mov 0,%i0 ret restore call %g2 nop .long 3068 mov 0,%i0 ret restore call %g2 nop .long 3069 mov 0,%i0 ret restore call %g2 nop .long 3070 mov 0,%i0 ret restore call %g2 nop .long 3071 mov 0,%i0 ret restore call %g2 nop .long 3072 mov 0,%i0 ret restore call %g2 nop .long 3073 mov 0,%i0 ret restore call %g2 nop .long 3074 mov 0,%i0 ret restore call %g2 nop .long 3075 mov 0,%i0 ret restore call %g2 nop .long 3076 mov 0,%i0 ret restore call %g2 nop .long 3077 mov 0,%i0 ret restore call %g2 nop .long 3078 mov 0,%i0 ret restore call %g2 nop .long 3079 mov 0,%i0 ret restore call %g2 nop .long 3080 mov 0,%i0 ret restore call %g2 nop .long 3081 mov 0,%i0 ret restore call %g2 nop .long 3082 mov 0,%i0 ret restore call %g2 nop .long 3083 mov 0,%i0 ret restore call %g2 nop .long 3084 mov 0,%i0 ret restore call %g2 nop .long 3085 mov 0,%i0 ret restore call %g2 nop .long 3086 mov 0,%i0 ret restore call %g2 nop .long 3087 mov 0,%i0 ret restore call %g2 nop .long 3088 mov 0,%i0 ret restore call %g2 nop .long 3089 mov 0,%i0 ret restore call %g2 nop .long 3090 mov 0,%i0 ret restore call %g2 nop .long 3091 mov 0,%i0 ret restore call %g2 nop .long 3092 mov 0,%i0 ret restore call %g2 nop .long 3093 mov 0,%i0 ret restore call %g2 nop .long 3094 mov 0,%i0 ret restore call %g2 nop .long 3095 mov 0,%i0 ret restore call %g2 nop .long 3096 mov 0,%i0 ret restore call %g2 nop .long 3097 mov 0,%i0 ret restore call %g2 nop .long 3098 mov 0,%i0 ret restore call %g2 nop .long 3099 mov 0,%i0 ret restore call %g2 nop .long 3100 mov 0,%i0 ret restore call %g2 nop .long 3101 mov 0,%i0 ret restore call %g2 nop .long 3102 mov 0,%i0 ret restore call %g2 nop .long 3103 mov 0,%i0 ret restore call %g2 nop .long 3104 mov 0,%i0 ret restore call %g2 nop .long 3105 mov 0,%i0 ret restore call %g2 nop .long 3106 mov 0,%i0 ret restore call %g2 nop .long 3107 mov 0,%i0 ret restore call %g2 nop .long 3108 mov 0,%i0 ret restore call %g2 nop .long 3109 mov 0,%i0 ret restore call %g2 nop .long 3110 mov 0,%i0 ret restore call %g2 nop .long 3111 mov 0,%i0 ret restore call %g2 nop .long 3112 mov 0,%i0 ret restore call %g2 nop .long 3113 mov 0,%i0 ret restore call %g2 nop .long 3114 mov 0,%i0 ret restore call %g2 nop .long 3115 mov 0,%i0 ret restore call %g2 nop .long 3116 mov 0,%i0 ret restore call %g2 nop .long 3117 mov 0,%i0 ret restore call %g2 nop .long 3118 mov 0,%i0 ret restore call %g2 nop .long 3119 mov 0,%i0 ret restore call %g2 nop .long 3120 mov 0,%i0 ret restore call %g2 nop .long 3121 mov 0,%i0 ret restore call %g2 nop .long 3122 mov 0,%i0 ret restore call %g2 nop .long 3123 mov 0,%i0 ret restore call %g2 nop .long 3124 mov 0,%i0 ret restore call %g2 nop .long 3125 mov 0,%i0 ret restore call %g2 nop .long 3126 mov 0,%i0 ret restore call %g2 nop .long 3127 mov 0,%i0 ret restore call %g2 nop .long 3128 mov 0,%i0 ret restore call %g2 nop .long 3129 mov 0,%i0 ret restore call %g2 nop .long 3130 mov 0,%i0 ret restore call %g2 nop .long 3131 mov 0,%i0 ret restore call %g2 nop .long 3132 mov 0,%i0 ret restore call %g2 nop .long 3133 mov 0,%i0 ret restore call %g2 nop .long 3134 mov 0,%i0 ret restore call %g2 nop .long 3135 mov 0,%i0 ret restore call %g2 nop .long 3136 mov 0,%i0 ret restore call %g2 nop .long 3137 mov 0,%i0 ret restore call %g2 nop .long 3138 mov 0,%i0 ret restore call %g2 nop .long 3139 mov 0,%i0 ret restore call %g2 nop .long 3140 mov 0,%i0 ret restore call %g2 nop .long 3141 mov 0,%i0 ret restore call %g2 nop .long 3142 mov 0,%i0 ret restore call %g2 nop .long 3143 mov 0,%i0 ret restore call %g2 nop .long 3144 mov 0,%i0 ret restore call %g2 nop .long 3145 mov 0,%i0 ret restore call %g2 nop .long 3146 mov 0,%i0 ret restore call %g2 nop .long 3147 mov 0,%i0 ret restore call %g2 nop .long 3148 mov 0,%i0 ret restore call %g2 nop .long 3149 mov 0,%i0 ret restore call %g2 nop .long 3150 mov 0,%i0 ret restore call %g2 nop .long 3151 mov 0,%i0 ret restore call %g2 nop .long 3152 mov 0,%i0 ret restore call %g2 nop .long 3153 mov 0,%i0 ret restore call %g2 nop .long 3154 mov 0,%i0 ret restore call %g2 nop .long 3155 mov 0,%i0 ret restore call %g2 nop .long 3156 mov 0,%i0 ret restore call %g2 nop .long 3157 mov 0,%i0 ret restore call %g2 nop .long 3158 mov 0,%i0 ret restore call %g2 nop .long 3159 mov 0,%i0 ret restore call %g2 nop .long 3160 mov 0,%i0 ret restore call %g2 nop .long 3161 mov 0,%i0 ret restore call %g2 nop .long 3162 mov 0,%i0 ret restore call %g2 nop .long 3163 mov 0,%i0 ret restore call %g2 nop .long 3164 mov 0,%i0 ret restore call %g2 nop .long 3165 mov 0,%i0 ret restore call %g2 nop .long 3166 mov 0,%i0 ret restore call %g2 nop .long 3167 mov 0,%i0 ret restore call %g2 nop .long 3168 mov 0,%i0 ret restore call %g2 nop .long 3169 mov 0,%i0 ret restore call %g2 nop .long 3170 mov 0,%i0 ret restore call %g2 nop .long 3171 mov 0,%i0 ret restore call %g2 nop .long 3172 mov 0,%i0 ret restore call %g2 nop .long 3173 mov 0,%i0 ret restore call %g2 nop .long 3174 mov 0,%i0 ret restore call %g2 nop .long 3175 mov 0,%i0 ret restore call %g2 nop .long 3176 mov 0,%i0 ret restore call %g2 nop .long 3177 mov 0,%i0 ret restore call %g2 nop .long 3178 mov 0,%i0 ret restore call %g2 nop .long 3179 mov 0,%i0 ret restore call %g2 nop .long 3180 mov 0,%i0 ret restore call %g2 nop .long 3181 mov 0,%i0 ret restore call %g2 nop .long 3182 mov 0,%i0 ret restore call %g2 nop .long 3183 mov 0,%i0 ret restore call %g2 nop .long 3184 mov 0,%i0 ret restore call %g2 nop .long 3185 mov 0,%i0 ret restore call %g2 nop .long 3186 mov 0,%i0 ret restore call %g2 nop .long 3187 mov 0,%i0 ret restore call %g2 nop .long 3188 mov 0,%i0 ret restore call %g2 nop .long 3189 mov 0,%i0 ret restore call %g2 nop .long 3190 mov 0,%i0 ret restore call %g2 nop .long 3191 mov 0,%i0 ret restore call %g2 nop .long 3192 mov 0,%i0 ret restore call %g2 nop .long 3193 mov 0,%i0 ret restore call %g2 nop .long 3194 mov 0,%i0 ret restore call %g2 nop .long 3195 mov 0,%i0 ret restore call %g2 nop .long 3196 mov 0,%i0 ret restore call %g2 nop .long 3197 mov 0,%i0 ret restore call %g2 nop .long 3198 mov 0,%i0 ret restore call %g2 nop .long 3199 mov 0,%i0 ret restore call %g2 nop .long 3200 mov 0,%i0 ret restore call %g2 nop .long 3201 mov 0,%i0 ret restore call %g2 nop .long 3202 mov 0,%i0 ret restore call %g2 nop .long 3203 mov 0,%i0 ret restore call %g2 nop .long 3204 mov 0,%i0 ret restore call %g2 nop .long 3205 mov 0,%i0 ret restore call %g2 nop .long 3206 mov 0,%i0 ret restore call %g2 nop .long 3207 mov 0,%i0 ret restore call %g2 nop .long 3208 mov 0,%i0 ret restore call %g2 nop .long 3209 mov 0,%i0 ret restore call %g2 nop .long 3210 mov 0,%i0 ret restore call %g2 nop .long 3211 mov 0,%i0 ret restore call %g2 nop .long 3212 mov 0,%i0 ret restore call %g2 nop .long 3213 mov 0,%i0 ret restore call %g2 nop .long 3214 mov 0,%i0 ret restore call %g2 nop .long 3215 mov 0,%i0 ret restore call %g2 nop .long 3216 mov 0,%i0 ret restore call %g2 nop .long 3217 mov 0,%i0 ret restore call %g2 nop .long 3218 mov 0,%i0 ret restore call %g2 nop .long 3219 mov 0,%i0 ret restore call %g2 nop .long 3220 mov 0,%i0 ret restore call %g2 nop .long 3221 mov 0,%i0 ret restore call %g2 nop .long 3222 mov 0,%i0 ret restore call %g2 nop .long 3223 mov 0,%i0 ret restore call %g2 nop .long 3224 mov 0,%i0 ret restore call %g2 nop .long 3225 mov 0,%i0 ret restore call %g2 nop .long 3226 mov 0,%i0 ret restore call %g2 nop .long 3227 mov 0,%i0 ret restore call %g2 nop .long 3228 mov 0,%i0 ret restore call %g2 nop .long 3229 mov 0,%i0 ret restore call %g2 nop .long 3230 mov 0,%i0 ret restore call %g2 nop .long 3231 mov 0,%i0 ret restore call %g2 nop .long 3232 mov 0,%i0 ret restore call %g2 nop .long 3233 mov 0,%i0 ret restore call %g2 nop .long 3234 mov 0,%i0 ret restore call %g2 nop .long 3235 mov 0,%i0 ret restore call %g2 nop .long 3236 mov 0,%i0 ret restore call %g2 nop .long 3237 mov 0,%i0 ret restore call %g2 nop .long 3238 mov 0,%i0 ret restore call %g2 nop .long 3239 mov 0,%i0 ret restore call %g2 nop .long 3240 mov 0,%i0 ret restore call %g2 nop .long 3241 mov 0,%i0 ret restore call %g2 nop .long 3242 mov 0,%i0 ret restore call %g2 nop .long 3243 mov 0,%i0 ret restore call %g2 nop .long 3244 mov 0,%i0 ret restore call %g2 nop .long 3245 mov 0,%i0 ret restore call %g2 nop .long 3246 mov 0,%i0 ret restore call %g2 nop .long 3247 mov 0,%i0 ret restore call %g2 nop .long 3248 mov 0,%i0 ret restore call %g2 nop .long 3249 mov 0,%i0 ret restore call %g2 nop .long 3250 mov 0,%i0 ret restore call %g2 nop .long 3251 mov 0,%i0 ret restore call %g2 nop .long 3252 mov 0,%i0 ret restore call %g2 nop .long 3253 mov 0,%i0 ret restore call %g2 nop .long 3254 mov 0,%i0 ret restore call %g2 nop .long 3255 mov 0,%i0 ret restore call %g2 nop .long 3256 mov 0,%i0 ret restore call %g2 nop .long 3257 mov 0,%i0 ret restore call %g2 nop .long 3258 mov 0,%i0 ret restore call %g2 nop .long 3259 mov 0,%i0 ret restore call %g2 nop .long 3260 mov 0,%i0 ret restore call %g2 nop .long 3261 mov 0,%i0 ret restore call %g2 nop .long 3262 mov 0,%i0 ret restore call %g2 nop .long 3263 mov 0,%i0 ret restore call %g2 nop .long 3264 mov 0,%i0 ret restore call %g2 nop .long 3265 mov 0,%i0 ret restore call %g2 nop .long 3266 mov 0,%i0 ret restore call %g2 nop .long 3267 mov 0,%i0 ret restore call %g2 nop .long 3268 mov 0,%i0 ret restore call %g2 nop .long 3269 mov 0,%i0 ret restore call %g2 nop .long 3270 mov 0,%i0 ret restore call %g2 nop .long 3271 mov 0,%i0 ret restore call %g2 nop .long 3272 mov 0,%i0 ret restore call %g2 nop .long 3273 mov 0,%i0 ret restore call %g2 nop .long 3274 mov 0,%i0 ret restore call %g2 nop .long 3275 mov 0,%i0 ret restore call %g2 nop .long 3276 mov 0,%i0 ret restore call %g2 nop .long 3277 mov 0,%i0 ret restore call %g2 nop .long 3278 mov 0,%i0 ret restore call %g2 nop .long 3279 mov 0,%i0 ret restore call %g2 nop .long 3280 mov 0,%i0 ret restore call %g2 nop .long 3281 mov 0,%i0 ret restore call %g2 nop .long 3282 mov 0,%i0 ret restore call %g2 nop .long 3283 mov 0,%i0 ret restore call %g2 nop .long 3284 mov 0,%i0 ret restore call %g2 nop .long 3285 mov 0,%i0 ret restore call %g2 nop .long 3286 mov 0,%i0 ret restore call %g2 nop .long 3287 mov 0,%i0 ret restore call %g2 nop .long 3288 mov 0,%i0 ret restore call %g2 nop .long 3289 mov 0,%i0 ret restore call %g2 nop .long 3290 mov 0,%i0 ret restore call %g2 nop .long 3291 mov 0,%i0 ret restore call %g2 nop .long 3292 mov 0,%i0 ret restore call %g2 nop .long 3293 mov 0,%i0 ret restore call %g2 nop .long 3294 mov 0,%i0 ret restore call %g2 nop .long 3295 mov 0,%i0 ret restore call %g2 nop .long 3296 mov 0,%i0 ret restore call %g2 nop .long 3297 mov 0,%i0 ret restore call %g2 nop .long 3298 mov 0,%i0 ret restore call %g2 nop .long 3299 mov 0,%i0 ret restore call %g2 nop .long 3300 mov 0,%i0 ret restore call %g2 nop .long 3301 mov 0,%i0 ret restore call %g2 nop .long 3302 mov 0,%i0 ret restore call %g2 nop .long 3303 mov 0,%i0 ret restore call %g2 nop .long 3304 mov 0,%i0 ret restore call %g2 nop .long 3305 mov 0,%i0 ret restore call %g2 nop .long 3306 mov 0,%i0 ret restore call %g2 nop .long 3307 mov 0,%i0 ret restore call %g2 nop .long 3308 mov 0,%i0 ret restore call %g2 nop .long 3309 mov 0,%i0 ret restore call %g2 nop .long 3310 mov 0,%i0 ret restore call %g2 nop .long 3311 mov 0,%i0 ret restore call %g2 nop .long 3312 mov 0,%i0 ret restore call %g2 nop .long 3313 mov 0,%i0 ret restore call %g2 nop .long 3314 mov 0,%i0 ret restore call %g2 nop .long 3315 mov 0,%i0 ret restore call %g2 nop .long 3316 mov 0,%i0 ret restore call %g2 nop .long 3317 mov 0,%i0 ret restore call %g2 nop .long 3318 mov 0,%i0 ret restore call %g2 nop .long 3319 mov 0,%i0 ret restore call %g2 nop .long 3320 mov 0,%i0 ret restore call %g2 nop .long 3321 mov 0,%i0 ret restore call %g2 nop .long 3322 mov 0,%i0 ret restore call %g2 nop .long 3323 mov 0,%i0 ret restore call %g2 nop .long 3324 mov 0,%i0 ret restore call %g2 nop .long 3325 mov 0,%i0 ret restore call %g2 nop .long 3326 mov 0,%i0 ret restore call %g2 nop .long 3327 mov 0,%i0 ret restore call %g2 nop .long 3328 mov 0,%i0 ret restore call %g2 nop .long 3329 mov 0,%i0 ret restore call %g2 nop .long 3330 mov 0,%i0 ret restore call %g2 nop .long 3331 mov 0,%i0 ret restore call %g2 nop .long 3332 mov 0,%i0 ret restore call %g2 nop .long 3333 mov 0,%i0 ret restore call %g2 nop .long 3334 mov 0,%i0 ret restore call %g2 nop .long 3335 mov 0,%i0 ret restore call %g2 nop .long 3336 mov 0,%i0 ret restore call %g2 nop .long 3337 mov 0,%i0 ret restore call %g2 nop .long 3338 mov 0,%i0 ret restore call %g2 nop .long 3339 mov 0,%i0 ret restore call %g2 nop .long 3340 mov 0,%i0 ret restore call %g2 nop .long 3341 mov 0,%i0 ret restore call %g2 nop .long 3342 mov 0,%i0 ret restore call %g2 nop .long 3343 mov 0,%i0 ret restore call %g2 nop .long 3344 mov 0,%i0 ret restore call %g2 nop .long 3345 mov 0,%i0 ret restore call %g2 nop .long 3346 mov 0,%i0 ret restore call %g2 nop .long 3347 mov 0,%i0 ret restore call %g2 nop .long 3348 mov 0,%i0 ret restore call %g2 nop .long 3349 mov 0,%i0 ret restore call %g2 nop .long 3350 mov 0,%i0 ret restore call %g2 nop .long 3351 mov 0,%i0 ret restore call %g2 nop .long 3352 mov 0,%i0 ret restore call %g2 nop .long 3353 mov 0,%i0 ret restore call %g2 nop .long 3354 mov 0,%i0 ret restore call %g2 nop .long 3355 mov 0,%i0 ret restore call %g2 nop .long 3356 mov 0,%i0 ret restore call %g2 nop .long 3357 mov 0,%i0 ret restore call %g2 nop .long 3358 mov 0,%i0 ret restore call %g2 nop .long 3359 mov 0,%i0 ret restore call %g2 nop .long 3360 mov 0,%i0 ret restore call %g2 nop .long 3361 mov 0,%i0 ret restore call %g2 nop .long 3362 mov 0,%i0 ret restore call %g2 nop .long 3363 mov 0,%i0 ret restore call %g2 nop .long 3364 mov 0,%i0 ret restore call %g2 nop .long 3365 mov 0,%i0 ret restore call %g2 nop .long 3366 mov 0,%i0 ret restore call %g2 nop .long 3367 mov 0,%i0 ret restore call %g2 nop .long 3368 mov 0,%i0 ret restore call %g2 nop .long 3369 mov 0,%i0 ret restore call %g2 nop .long 3370 mov 0,%i0 ret restore call %g2 nop .long 3371 mov 0,%i0 ret restore call %g2 nop .long 3372 mov 0,%i0 ret restore call %g2 nop .long 3373 mov 0,%i0 ret restore call %g2 nop .long 3374 mov 0,%i0 ret restore call %g2 nop .long 3375 mov 0,%i0 ret restore call %g2 nop .long 3376 mov 0,%i0 ret restore call %g2 nop .long 3377 mov 0,%i0 ret restore call %g2 nop .long 3378 mov 0,%i0 ret restore call %g2 nop .long 3379 mov 0,%i0 ret restore call %g2 nop .long 3380 mov 0,%i0 ret restore call %g2 nop .long 3381 mov 0,%i0 ret restore call %g2 nop .long 3382 mov 0,%i0 ret restore call %g2 nop .long 3383 mov 0,%i0 ret restore call %g2 nop .long 3384 mov 0,%i0 ret restore call %g2 nop .long 3385 mov 0,%i0 ret restore call %g2 nop .long 3386 mov 0,%i0 ret restore call %g2 nop .long 3387 mov 0,%i0 ret restore call %g2 nop .long 3388 mov 0,%i0 ret restore call %g2 nop .long 3389 mov 0,%i0 ret restore call %g2 nop .long 3390 mov 0,%i0 ret restore call %g2 nop .long 3391 mov 0,%i0 ret restore call %g2 nop .long 3392 mov 0,%i0 ret restore call %g2 nop .long 3393 mov 0,%i0 ret restore call %g2 nop .long 3394 mov 0,%i0 ret restore call %g2 nop .long 3395 mov 0,%i0 ret restore call %g2 nop .long 3396 mov 0,%i0 ret restore call %g2 nop .long 3397 mov 0,%i0 ret restore call %g2 nop .long 3398 mov 0,%i0 ret restore call %g2 nop .long 3399 mov 0,%i0 ret restore call %g2 nop .long 3400 mov 0,%i0 ret restore call %g2 nop .long 3401 mov 0,%i0 ret restore call %g2 nop .long 3402 mov 0,%i0 ret restore call %g2 nop .long 3403 mov 0,%i0 ret restore call %g2 nop .long 3404 mov 0,%i0 ret restore call %g2 nop .long 3405 mov 0,%i0 ret restore call %g2 nop .long 3406 mov 0,%i0 ret restore call %g2 nop .long 3407 mov 0,%i0 ret restore call %g2 nop .long 3408 mov 0,%i0 ret restore call %g2 nop .long 3409 mov 0,%i0 ret restore call %g2 nop .long 3410 mov 0,%i0 ret restore call %g2 nop .long 3411 mov 0,%i0 ret restore call %g2 nop .long 3412 mov 0,%i0 ret restore call %g2 nop .long 3413 mov 0,%i0 ret restore call %g2 nop .long 3414 mov 0,%i0 ret restore call %g2 nop .long 3415 mov 0,%i0 ret restore call %g2 nop .long 3416 mov 0,%i0 ret restore call %g2 nop .long 3417 mov 0,%i0 ret restore call %g2 nop .long 3418 mov 0,%i0 ret restore call %g2 nop .long 3419 mov 0,%i0 ret restore call %g2 nop .long 3420 mov 0,%i0 ret restore call %g2 nop .long 3421 mov 0,%i0 ret restore call %g2 nop .long 3422 mov 0,%i0 ret restore call %g2 nop .long 3423 mov 0,%i0 ret restore call %g2 nop .long 3424 mov 0,%i0 ret restore call %g2 nop .long 3425 mov 0,%i0 ret restore call %g2 nop .long 3426 mov 0,%i0 ret restore call %g2 nop .long 3427 mov 0,%i0 ret restore call %g2 nop .long 3428 mov 0,%i0 ret restore call %g2 nop .long 3429 mov 0,%i0 ret restore call %g2 nop .long 3430 mov 0,%i0 ret restore call %g2 nop .long 3431 mov 0,%i0 ret restore call %g2 nop .long 3432 mov 0,%i0 ret restore call %g2 nop .long 3433 mov 0,%i0 ret restore call %g2 nop .long 3434 mov 0,%i0 ret restore call %g2 nop .long 3435 mov 0,%i0 ret restore call %g2 nop .long 3436 mov 0,%i0 ret restore call %g2 nop .long 3437 mov 0,%i0 ret restore call %g2 nop .long 3438 mov 0,%i0 ret restore call %g2 nop .long 3439 mov 0,%i0 ret restore call %g2 nop .long 3440 mov 0,%i0 ret restore call %g2 nop .long 3441 mov 0,%i0 ret restore call %g2 nop .long 3442 mov 0,%i0 ret restore call %g2 nop .long 3443 mov 0,%i0 ret restore call %g2 nop .long 3444 mov 0,%i0 ret restore call %g2 nop .long 3445 mov 0,%i0 ret restore call %g2 nop .long 3446 mov 0,%i0 ret restore call %g2 nop .long 3447 mov 0,%i0 ret restore call %g2 nop .long 3448 mov 0,%i0 ret restore call %g2 nop .long 3449 mov 0,%i0 ret restore call %g2 nop .long 3450 mov 0,%i0 ret restore call %g2 nop .long 3451 mov 0,%i0 ret restore call %g2 nop .long 3452 mov 0,%i0 ret restore call %g2 nop .long 3453 mov 0,%i0 ret restore call %g2 nop .long 3454 mov 0,%i0 ret restore call %g2 nop .long 3455 mov 0,%i0 ret restore call %g2 nop .long 3456 mov 0,%i0 ret restore call %g2 nop .long 3457 mov 0,%i0 ret restore call %g2 nop .long 3458 mov 0,%i0 ret restore call %g2 nop .long 3459 mov 0,%i0 ret restore call %g2 nop .long 3460 mov 0,%i0 ret restore call %g2 nop .long 3461 mov 0,%i0 ret restore call %g2 nop .long 3462 mov 0,%i0 ret restore call %g2 nop .long 3463 mov 0,%i0 ret restore call %g2 nop .long 3464 mov 0,%i0 ret restore call %g2 nop .long 3465 mov 0,%i0 ret restore call %g2 nop .long 3466 mov 0,%i0 ret restore call %g2 nop .long 3467 mov 0,%i0 ret restore call %g2 nop .long 3468 mov 0,%i0 ret restore call %g2 nop .long 3469 mov 0,%i0 ret restore call %g2 nop .long 3470 mov 0,%i0 ret restore call %g2 nop .long 3471 mov 0,%i0 ret restore call %g2 nop .long 3472 mov 0,%i0 ret restore call %g2 nop .long 3473 mov 0,%i0 ret restore call %g2 nop .long 3474 mov 0,%i0 ret restore call %g2 nop .long 3475 mov 0,%i0 ret restore call %g2 nop .long 3476 mov 0,%i0 ret restore call %g2 nop .long 3477 mov 0,%i0 ret restore call %g2 nop .long 3478 mov 0,%i0 ret restore call %g2 nop .long 3479 mov 0,%i0 ret restore call %g2 nop .long 3480 mov 0,%i0 ret restore call %g2 nop .long 3481 mov 0,%i0 ret restore call %g2 nop .long 3482 mov 0,%i0 ret restore call %g2 nop .long 3483 mov 0,%i0 ret restore call %g2 nop .long 3484 mov 0,%i0 ret restore call %g2 nop .long 3485 mov 0,%i0 ret restore call %g2 nop .long 3486 mov 0,%i0 ret restore call %g2 nop .long 3487 mov 0,%i0 ret restore call %g2 nop .long 3488 mov 0,%i0 ret restore call %g2 nop .long 3489 mov 0,%i0 ret restore call %g2 nop .long 3490 mov 0,%i0 ret restore call %g2 nop .long 3491 mov 0,%i0 ret restore call %g2 nop .long 3492 mov 0,%i0 ret restore call %g2 nop .long 3493 mov 0,%i0 ret restore call %g2 nop .long 3494 mov 0,%i0 ret restore call %g2 nop .long 3495 mov 0,%i0 ret restore call %g2 nop .long 3496 mov 0,%i0 ret restore call %g2 nop .long 3497 mov 0,%i0 ret restore call %g2 nop .long 3498 mov 0,%i0 ret restore call %g2 nop .long 3499 mov 0,%i0 ret restore call %g2 nop .long 3500 mov 0,%i0 ret restore call %g2 nop .long 3501 mov 0,%i0 ret restore call %g2 nop .long 3502 mov 0,%i0 ret restore call %g2 nop .long 3503 mov 0,%i0 ret restore call %g2 nop .long 3504 mov 0,%i0 ret restore call %g2 nop .long 3505 mov 0,%i0 ret restore call %g2 nop .long 3506 mov 0,%i0 ret restore call %g2 nop .long 3507 mov 0,%i0 ret restore call %g2 nop .long 3508 mov 0,%i0 ret restore call %g2 nop .long 3509 mov 0,%i0 ret restore call %g2 nop .long 3510 mov 0,%i0 ret restore call %g2 nop .long 3511 mov 0,%i0 ret restore call %g2 nop .long 3512 mov 0,%i0 ret restore call %g2 nop .long 3513 mov 0,%i0 ret restore call %g2 nop .long 3514 mov 0,%i0 ret restore call %g2 nop .long 3515 mov 0,%i0 ret restore call %g2 nop .long 3516 mov 0,%i0 ret restore call %g2 nop .long 3517 mov 0,%i0 ret restore call %g2 nop .long 3518 mov 0,%i0 ret restore call %g2 nop .long 3519 mov 0,%i0 ret restore call %g2 nop .long 3520 mov 0,%i0 ret restore call %g2 nop .long 3521 mov 0,%i0 ret restore call %g2 nop .long 3522 mov 0,%i0 ret restore call %g2 nop .long 3523 mov 0,%i0 ret restore call %g2 nop .long 3524 mov 0,%i0 ret restore call %g2 nop .long 3525 mov 0,%i0 ret restore call %g2 nop .long 3526 mov 0,%i0 ret restore call %g2 nop .long 3527 mov 0,%i0 ret restore call %g2 nop .long 3528 mov 0,%i0 ret restore call %g2 nop .long 3529 mov 0,%i0 ret restore call %g2 nop .long 3530 mov 0,%i0 ret restore call %g2 nop .long 3531 mov 0,%i0 ret restore call %g2 nop .long 3532 mov 0,%i0 ret restore call %g2 nop .long 3533 mov 0,%i0 ret restore call %g2 nop .long 3534 mov 0,%i0 ret restore call %g2 nop .long 3535 mov 0,%i0 ret restore call %g2 nop .long 3536 mov 0,%i0 ret restore call %g2 nop .long 3537 mov 0,%i0 ret restore call %g2 nop .long 3538 mov 0,%i0 ret restore call %g2 nop .long 3539 mov 0,%i0 ret restore call %g2 nop .long 3540 mov 0,%i0 ret restore call %g2 nop .long 3541 mov 0,%i0 ret restore call %g2 nop .long 3542 mov 0,%i0 ret restore call %g2 nop .long 3543 mov 0,%i0 ret restore call %g2 nop .long 3544 mov 0,%i0 ret restore call %g2 nop .long 3545 mov 0,%i0 ret restore call %g2 nop .long 3546 mov 0,%i0 ret restore call %g2 nop .long 3547 mov 0,%i0 ret restore call %g2 nop .long 3548 mov 0,%i0 ret restore call %g2 nop .long 3549 mov 0,%i0 ret restore call %g2 nop .long 3550 mov 0,%i0 ret restore call %g2 nop .long 3551 mov 0,%i0 ret restore call %g2 nop .long 3552 mov 0,%i0 ret restore call %g2 nop .long 3553 mov 0,%i0 ret restore call %g2 nop .long 3554 mov 0,%i0 ret restore call %g2 nop .long 3555 mov 0,%i0 ret restore call %g2 nop .long 3556 mov 0,%i0 ret restore call %g2 nop .long 3557 mov 0,%i0 ret restore call %g2 nop .long 3558 mov 0,%i0 ret restore call %g2 nop .long 3559 mov 0,%i0 ret restore call %g2 nop .long 3560 mov 0,%i0 ret restore call %g2 nop .long 3561 mov 0,%i0 ret restore call %g2 nop .long 3562 mov 0,%i0 ret restore call %g2 nop .long 3563 mov 0,%i0 ret restore call %g2 nop .long 3564 mov 0,%i0 ret restore call %g2 nop .long 3565 mov 0,%i0 ret restore call %g2 nop .long 3566 mov 0,%i0 ret restore call %g2 nop .long 3567 mov 0,%i0 ret restore call %g2 nop .long 3568 mov 0,%i0 ret restore call %g2 nop .long 3569 mov 0,%i0 ret restore call %g2 nop .long 3570 mov 0,%i0 ret restore call %g2 nop .long 3571 mov 0,%i0 ret restore call %g2 nop .long 3572 mov 0,%i0 ret restore call %g2 nop .long 3573 mov 0,%i0 ret restore call %g2 nop .long 3574 mov 0,%i0 ret restore call %g2 nop .long 3575 mov 0,%i0 ret restore call %g2 nop .long 3576 mov 0,%i0 ret restore call %g2 nop .long 3577 mov 0,%i0 ret restore call %g2 nop .long 3578 mov 0,%i0 ret restore call %g2 nop .long 3579 mov 0,%i0 ret restore call %g2 nop .long 3580 mov 0,%i0 ret restore call %g2 nop .long 3581 mov 0,%i0 ret restore call %g2 nop .long 3582 mov 0,%i0 ret restore call %g2 nop .long 3583 mov 0,%i0 ret restore call %g2 nop .long 3584 mov 0,%i0 ret restore call %g2 nop .long 3585 mov 0,%i0 ret restore call %g2 nop .long 3586 mov 0,%i0 ret restore call %g2 nop .long 3587 mov 0,%i0 ret restore call %g2 nop .long 3588 mov 0,%i0 ret restore call %g2 nop .long 3589 mov 0,%i0 ret restore call %g2 nop .long 3590 mov 0,%i0 ret restore call %g2 nop .long 3591 mov 0,%i0 ret restore call %g2 nop .long 3592 mov 0,%i0 ret restore call %g2 nop .long 3593 mov 0,%i0 ret restore call %g2 nop .long 3594 mov 0,%i0 ret restore call %g2 nop .long 3595 mov 0,%i0 ret restore call %g2 nop .long 3596 mov 0,%i0 ret restore call %g2 nop .long 3597 mov 0,%i0 ret restore call %g2 nop .long 3598 mov 0,%i0 ret restore call %g2 nop .long 3599 mov 0,%i0 ret restore call %g2 nop .long 3600 mov 0,%i0 ret restore call %g2 nop .long 3601 mov 0,%i0 ret restore call %g2 nop .long 3602 mov 0,%i0 ret restore call %g2 nop .long 3603 mov 0,%i0 ret restore call %g2 nop .long 3604 mov 0,%i0 ret restore call %g2 nop .long 3605 mov 0,%i0 ret restore call %g2 nop .long 3606 mov 0,%i0 ret restore call %g2 nop .long 3607 mov 0,%i0 ret restore call %g2 nop .long 3608 mov 0,%i0 ret restore call %g2 nop .long 3609 mov 0,%i0 ret restore call %g2 nop .long 3610 mov 0,%i0 ret restore call %g2 nop .long 3611 mov 0,%i0 ret restore call %g2 nop .long 3612 mov 0,%i0 ret restore call %g2 nop .long 3613 mov 0,%i0 ret restore call %g2 nop .long 3614 mov 0,%i0 ret restore call %g2 nop .long 3615 mov 0,%i0 ret restore call %g2 nop .long 3616 mov 0,%i0 ret restore call %g2 nop .long 3617 mov 0,%i0 ret restore call %g2 nop .long 3618 mov 0,%i0 ret restore call %g2 nop .long 3619 mov 0,%i0 ret restore call %g2 nop .long 3620 mov 0,%i0 ret restore call %g2 nop .long 3621 mov 0,%i0 ret restore call %g2 nop .long 3622 mov 0,%i0 ret restore call %g2 nop .long 3623 mov 0,%i0 ret restore call %g2 nop .long 3624 mov 0,%i0 ret restore call %g2 nop .long 3625 mov 0,%i0 ret restore call %g2 nop .long 3626 mov 0,%i0 ret restore call %g2 nop .long 3627 mov 0,%i0 ret restore call %g2 nop .long 3628 mov 0,%i0 ret restore call %g2 nop .long 3629 mov 0,%i0 ret restore call %g2 nop .long 3630 mov 0,%i0 ret restore call %g2 nop .long 3631 mov 0,%i0 ret restore call %g2 nop .long 3632 mov 0,%i0 ret restore call %g2 nop .long 3633 mov 0,%i0 ret restore call %g2 nop .long 3634 mov 0,%i0 ret restore call %g2 nop .long 3635 mov 0,%i0 ret restore call %g2 nop .long 3636 mov 0,%i0 ret restore call %g2 nop .long 3637 mov 0,%i0 ret restore call %g2 nop .long 3638 mov 0,%i0 ret restore call %g2 nop .long 3639 mov 0,%i0 ret restore call %g2 nop .long 3640 mov 0,%i0 ret restore call %g2 nop .long 3641 mov 0,%i0 ret restore call %g2 nop .long 3642 mov 0,%i0 ret restore call %g2 nop .long 3643 mov 0,%i0 ret restore call %g2 nop .long 3644 mov 0,%i0 ret restore call %g2 nop .long 3645 mov 0,%i0 ret restore call %g2 nop .long 3646 mov 0,%i0 ret restore call %g2 nop .long 3647 mov 0,%i0 ret restore call %g2 nop .long 3648 mov 0,%i0 ret restore call %g2 nop .long 3649 mov 0,%i0 ret restore call %g2 nop .long 3650 mov 0,%i0 ret restore call %g2 nop .long 3651 mov 0,%i0 ret restore call %g2 nop .long 3652 mov 0,%i0 ret restore call %g2 nop .long 3653 mov 0,%i0 ret restore call %g2 nop .long 3654 mov 0,%i0 ret restore call %g2 nop .long 3655 mov 0,%i0 ret restore call %g2 nop .long 3656 mov 0,%i0 ret restore call %g2 nop .long 3657 mov 0,%i0 ret restore call %g2 nop .long 3658 mov 0,%i0 ret restore call %g2 nop .long 3659 mov 0,%i0 ret restore call %g2 nop .long 3660 mov 0,%i0 ret restore call %g2 nop .long 3661 mov 0,%i0 ret restore call %g2 nop .long 3662 mov 0,%i0 ret restore call %g2 nop .long 3663 mov 0,%i0 ret restore call %g2 nop .long 3664 mov 0,%i0 ret restore call %g2 nop .long 3665 mov 0,%i0 ret restore call %g2 nop .long 3666 mov 0,%i0 ret restore call %g2 nop .long 3667 mov 0,%i0 ret restore call %g2 nop .long 3668 mov 0,%i0 ret restore call %g2 nop .long 3669 mov 0,%i0 ret restore call %g2 nop .long 3670 mov 0,%i0 ret restore call %g2 nop .long 3671 mov 0,%i0 ret restore call %g2 nop .long 3672 mov 0,%i0 ret restore call %g2 nop .long 3673 mov 0,%i0 ret restore call %g2 nop .long 3674 mov 0,%i0 ret restore call %g2 nop .long 3675 mov 0,%i0 ret restore call %g2 nop .long 3676 mov 0,%i0 ret restore call %g2 nop .long 3677 mov 0,%i0 ret restore call %g2 nop .long 3678 mov 0,%i0 ret restore call %g2 nop .long 3679 mov 0,%i0 ret restore call %g2 nop .long 3680 mov 0,%i0 ret restore call %g2 nop .long 3681 mov 0,%i0 ret restore call %g2 nop .long 3682 mov 0,%i0 ret restore call %g2 nop .long 3683 mov 0,%i0 ret restore call %g2 nop .long 3684 mov 0,%i0 ret restore call %g2 nop .long 3685 mov 0,%i0 ret restore call %g2 nop .long 3686 mov 0,%i0 ret restore call %g2 nop .long 3687 mov 0,%i0 ret restore call %g2 nop .long 3688 mov 0,%i0 ret restore call %g2 nop .long 3689 mov 0,%i0 ret restore call %g2 nop .long 3690 mov 0,%i0 ret restore call %g2 nop .long 3691 mov 0,%i0 ret restore call %g2 nop .long 3692 mov 0,%i0 ret restore call %g2 nop .long 3693 mov 0,%i0 ret restore call %g2 nop .long 3694 mov 0,%i0 ret restore call %g2 nop .long 3695 mov 0,%i0 ret restore call %g2 nop .long 3696 mov 0,%i0 ret restore call %g2 nop .long 3697 mov 0,%i0 ret restore call %g2 nop .long 3698 mov 0,%i0 ret restore call %g2 nop .long 3699 mov 0,%i0 ret restore call %g2 nop .long 3700 mov 0,%i0 ret restore call %g2 nop .long 3701 mov 0,%i0 ret restore call %g2 nop .long 3702 mov 0,%i0 ret restore call %g2 nop .long 3703 mov 0,%i0 ret restore call %g2 nop .long 3704 mov 0,%i0 ret restore call %g2 nop .long 3705 mov 0,%i0 ret restore call %g2 nop .long 3706 mov 0,%i0 ret restore call %g2 nop .long 3707 mov 0,%i0 ret restore call %g2 nop .long 3708 mov 0,%i0 ret restore call %g2 nop .long 3709 mov 0,%i0 ret restore call %g2 nop .long 3710 mov 0,%i0 ret restore call %g2 nop .long 3711 mov 0,%i0 ret restore call %g2 nop .long 3712 mov 0,%i0 ret restore call %g2 nop .long 3713 mov 0,%i0 ret restore call %g2 nop .long 3714 mov 0,%i0 ret restore call %g2 nop .long 3715 mov 0,%i0 ret restore call %g2 nop .long 3716 mov 0,%i0 ret restore call %g2 nop .long 3717 mov 0,%i0 ret restore call %g2 nop .long 3718 mov 0,%i0 ret restore call %g2 nop .long 3719 mov 0,%i0 ret restore call %g2 nop .long 3720 mov 0,%i0 ret restore call %g2 nop .long 3721 mov 0,%i0 ret restore call %g2 nop .long 3722 mov 0,%i0 ret restore call %g2 nop .long 3723 mov 0,%i0 ret restore call %g2 nop .long 3724 mov 0,%i0 ret restore call %g2 nop .long 3725 mov 0,%i0 ret restore call %g2 nop .long 3726 mov 0,%i0 ret restore call %g2 nop .long 3727 mov 0,%i0 ret restore call %g2 nop .long 3728 mov 0,%i0 ret restore call %g2 nop .long 3729 mov 0,%i0 ret restore call %g2 nop .long 3730 mov 0,%i0 ret restore call %g2 nop .long 3731 mov 0,%i0 ret restore call %g2 nop .long 3732 mov 0,%i0 ret restore call %g2 nop .long 3733 mov 0,%i0 ret restore call %g2 nop .long 3734 mov 0,%i0 ret restore call %g2 nop .long 3735 mov 0,%i0 ret restore call %g2 nop .long 3736 mov 0,%i0 ret restore call %g2 nop .long 3737 mov 0,%i0 ret restore call %g2 nop .long 3738 mov 0,%i0 ret restore call %g2 nop .long 3739 mov 0,%i0 ret restore call %g2 nop .long 3740 mov 0,%i0 ret restore call %g2 nop .long 3741 mov 0,%i0 ret restore call %g2 nop .long 3742 mov 0,%i0 ret restore call %g2 nop .long 3743 mov 0,%i0 ret restore call %g2 nop .long 3744 mov 0,%i0 ret restore call %g2 nop .long 3745 mov 0,%i0 ret restore call %g2 nop .long 3746 mov 0,%i0 ret restore call %g2 nop .long 3747 mov 0,%i0 ret restore call %g2 nop .long 3748 mov 0,%i0 ret restore call %g2 nop .long 3749 mov 0,%i0 ret restore call %g2 nop .long 3750 mov 0,%i0 ret restore call %g2 nop .long 3751 mov 0,%i0 ret restore call %g2 nop .long 3752 mov 0,%i0 ret restore call %g2 nop .long 3753 mov 0,%i0 ret restore call %g2 nop .long 3754 mov 0,%i0 ret restore call %g2 nop .long 3755 mov 0,%i0 ret restore call %g2 nop .long 3756 mov 0,%i0 ret restore call %g2 nop .long 3757 mov 0,%i0 ret restore call %g2 nop .long 3758 mov 0,%i0 ret restore call %g2 nop .long 3759 mov 0,%i0 ret restore call %g2 nop .long 3760 mov 0,%i0 ret restore call %g2 nop .long 3761 mov 0,%i0 ret restore call %g2 nop .long 3762 mov 0,%i0 ret restore call %g2 nop .long 3763 mov 0,%i0 ret restore call %g2 nop .long 3764 mov 0,%i0 ret restore call %g2 nop .long 3765 mov 0,%i0 ret restore call %g2 nop .long 3766 mov 0,%i0 ret restore call %g2 nop .long 3767 mov 0,%i0 ret restore call %g2 nop .long 3768 mov 0,%i0 ret restore call %g2 nop .long 3769 mov 0,%i0 ret restore call %g2 nop .long 3770 mov 0,%i0 ret restore call %g2 nop .long 3771 mov 0,%i0 ret restore call %g2 nop .long 3772 mov 0,%i0 ret restore call %g2 nop .long 3773 mov 0,%i0 ret restore call %g2 nop .long 3774 mov 0,%i0 ret restore call %g2 nop .long 3775 mov 0,%i0 ret restore call %g2 nop .long 3776 mov 0,%i0 ret restore call %g2 nop .long 3777 mov 0,%i0 ret restore call %g2 nop .long 3778 mov 0,%i0 ret restore call %g2 nop .long 3779 mov 0,%i0 ret restore call %g2 nop .long 3780 mov 0,%i0 ret restore call %g2 nop .long 3781 mov 0,%i0 ret restore call %g2 nop .long 3782 mov 0,%i0 ret restore call %g2 nop .long 3783 mov 0,%i0 ret restore call %g2 nop .long 3784 mov 0,%i0 ret restore call %g2 nop .long 3785 mov 0,%i0 ret restore call %g2 nop .long 3786 mov 0,%i0 ret restore call %g2 nop .long 3787 mov 0,%i0 ret restore call %g2 nop .long 3788 mov 0,%i0 ret restore call %g2 nop .long 3789 mov 0,%i0 ret restore call %g2 nop .long 3790 mov 0,%i0 ret restore call %g2 nop .long 3791 mov 0,%i0 ret restore call %g2 nop .long 3792 mov 0,%i0 ret restore call %g2 nop .long 3793 mov 0,%i0 ret restore call %g2 nop .long 3794 mov 0,%i0 ret restore call %g2 nop .long 3795 mov 0,%i0 ret restore call %g2 nop .long 3796 mov 0,%i0 ret restore call %g2 nop .long 3797 mov 0,%i0 ret restore call %g2 nop .long 3798 mov 0,%i0 ret restore call %g2 nop .long 3799 mov 0,%i0 ret restore call %g2 nop .long 3800 mov 0,%i0 ret restore call %g2 nop .long 3801 mov 0,%i0 ret restore call %g2 nop .long 3802 mov 0,%i0 ret restore call %g2 nop .long 3803 mov 0,%i0 ret restore call %g2 nop .long 3804 mov 0,%i0 ret restore call %g2 nop .long 3805 mov 0,%i0 ret restore call %g2 nop .long 3806 mov 0,%i0 ret restore call %g2 nop .long 3807 mov 0,%i0 ret restore call %g2 nop .long 3808 mov 0,%i0 ret restore call %g2 nop .long 3809 mov 0,%i0 ret restore call %g2 nop .long 3810 mov 0,%i0 ret restore call %g2 nop .long 3811 mov 0,%i0 ret restore call %g2 nop .long 3812 mov 0,%i0 ret restore call %g2 nop .long 3813 mov 0,%i0 ret restore call %g2 nop .long 3814 mov 0,%i0 ret restore call %g2 nop .long 3815 mov 0,%i0 ret restore call %g2 nop .long 3816 mov 0,%i0 ret restore call %g2 nop .long 3817 mov 0,%i0 ret restore call %g2 nop .long 3818 mov 0,%i0 ret restore call %g2 nop .long 3819 mov 0,%i0 ret restore call %g2 nop .long 3820 mov 0,%i0 ret restore call %g2 nop .long 3821 mov 0,%i0 ret restore call %g2 nop .long 3822 mov 0,%i0 ret restore call %g2 nop .long 3823 mov 0,%i0 ret restore call %g2 nop .long 3824 mov 0,%i0 ret restore call %g2 nop .long 3825 mov 0,%i0 ret restore call %g2 nop .long 3826 mov 0,%i0 ret restore call %g2 nop .long 3827 mov 0,%i0 ret restore call %g2 nop .long 3828 mov 0,%i0 ret restore call %g2 nop .long 3829 mov 0,%i0 ret restore call %g2 nop .long 3830 mov 0,%i0 ret restore call %g2 nop .long 3831 mov 0,%i0 ret restore call %g2 nop .long 3832 mov 0,%i0 ret restore call %g2 nop .long 3833 mov 0,%i0 ret restore call %g2 nop .long 3834 mov 0,%i0 ret restore call %g2 nop .long 3835 mov 0,%i0 ret restore call %g2 nop .long 3836 mov 0,%i0 ret restore call %g2 nop .long 3837 mov 0,%i0 ret restore call %g2 nop .long 3838 mov 0,%i0 ret restore call %g2 nop .long 3839 mov 0,%i0 ret restore call %g2 nop .long 3840 mov 0,%i0 ret restore call %g2 nop .long 3841 mov 0,%i0 ret restore call %g2 nop .long 3842 mov 0,%i0 ret restore call %g2 nop .long 3843 mov 0,%i0 ret restore call %g2 nop .long 3844 mov 0,%i0 ret restore call %g2 nop .long 3845 mov 0,%i0 ret restore call %g2 nop .long 3846 mov 0,%i0 ret restore call %g2 nop .long 3847 mov 0,%i0 ret restore call %g2 nop .long 3848 mov 0,%i0 ret restore call %g2 nop .long 3849 mov 0,%i0 ret restore call %g2 nop .long 3850 mov 0,%i0 ret restore call %g2 nop .long 3851 mov 0,%i0 ret restore call %g2 nop .long 3852 mov 0,%i0 ret restore call %g2 nop .long 3853 mov 0,%i0 ret restore call %g2 nop .long 3854 mov 0,%i0 ret restore call %g2 nop .long 3855 mov 0,%i0 ret restore call %g2 nop .long 3856 mov 0,%i0 ret restore call %g2 nop .long 3857 mov 0,%i0 ret restore call %g2 nop .long 3858 mov 0,%i0 ret restore call %g2 nop .long 3859 mov 0,%i0 ret restore call %g2 nop .long 3860 mov 0,%i0 ret restore call %g2 nop .long 3861 mov 0,%i0 ret restore call %g2 nop .long 3862 mov 0,%i0 ret restore call %g2 nop .long 3863 mov 0,%i0 ret restore call %g2 nop .long 3864 mov 0,%i0 ret restore call %g2 nop .long 3865 mov 0,%i0 ret restore call %g2 nop .long 3866 mov 0,%i0 ret restore call %g2 nop .long 3867 mov 0,%i0 ret restore call %g2 nop .long 3868 mov 0,%i0 ret restore call %g2 nop .long 3869 mov 0,%i0 ret restore call %g2 nop .long 3870 mov 0,%i0 ret restore call %g2 nop .long 3871 mov 0,%i0 ret restore call %g2 nop .long 3872 mov 0,%i0 ret restore call %g2 nop .long 3873 mov 0,%i0 ret restore call %g2 nop .long 3874 mov 0,%i0 ret restore call %g2 nop .long 3875 mov 0,%i0 ret restore call %g2 nop .long 3876 mov 0,%i0 ret restore call %g2 nop .long 3877 mov 0,%i0 ret restore call %g2 nop .long 3878 mov 0,%i0 ret restore call %g2 nop .long 3879 mov 0,%i0 ret restore call %g2 nop .long 3880 mov 0,%i0 ret restore call %g2 nop .long 3881 mov 0,%i0 ret restore call %g2 nop .long 3882 mov 0,%i0 ret restore call %g2 nop .long 3883 mov 0,%i0 ret restore call %g2 nop .long 3884 mov 0,%i0 ret restore call %g2 nop .long 3885 mov 0,%i0 ret restore call %g2 nop .long 3886 mov 0,%i0 ret restore call %g2 nop .long 3887 mov 0,%i0 ret restore call %g2 nop .long 3888 mov 0,%i0 ret restore call %g2 nop .long 3889 mov 0,%i0 ret restore call %g2 nop .long 3890 mov 0,%i0 ret restore call %g2 nop .long 3891 mov 0,%i0 ret restore call %g2 nop .long 3892 mov 0,%i0 ret restore call %g2 nop .long 3893 mov 0,%i0 ret restore call %g2 nop .long 3894 mov 0,%i0 ret restore call %g2 nop .long 3895 mov 0,%i0 ret restore call %g2 nop .long 3896 mov 0,%i0 ret restore call %g2 nop .long 3897 mov 0,%i0 ret restore call %g2 nop .long 3898 mov 0,%i0 ret restore call %g2 nop .long 3899 mov 0,%i0 ret restore call %g2 nop .long 3900 mov 0,%i0 ret restore call %g2 nop .long 3901 mov 0,%i0 ret restore call %g2 nop .long 3902 mov 0,%i0 ret restore call %g2 nop .long 3903 mov 0,%i0 ret restore call %g2 nop .long 3904 mov 0,%i0 ret restore call %g2 nop .long 3905 mov 0,%i0 ret restore call %g2 nop .long 3906 mov 0,%i0 ret restore call %g2 nop .long 3907 mov 0,%i0 ret restore call %g2 nop .long 3908 mov 0,%i0 ret restore call %g2 nop .long 3909 mov 0,%i0 ret restore call %g2 nop .long 3910 mov 0,%i0 ret restore call %g2 nop .long 3911 mov 0,%i0 ret restore call %g2 nop .long 3912 mov 0,%i0 ret restore call %g2 nop .long 3913 mov 0,%i0 ret restore call %g2 nop .long 3914 mov 0,%i0 ret restore call %g2 nop .long 3915 mov 0,%i0 ret restore call %g2 nop .long 3916 mov 0,%i0 ret restore call %g2 nop .long 3917 mov 0,%i0 ret restore call %g2 nop .long 3918 mov 0,%i0 ret restore call %g2 nop .long 3919 mov 0,%i0 ret restore call %g2 nop .long 3920 mov 0,%i0 ret restore call %g2 nop .long 3921 mov 0,%i0 ret restore call %g2 nop .long 3922 mov 0,%i0 ret restore call %g2 nop .long 3923 mov 0,%i0 ret restore call %g2 nop .long 3924 mov 0,%i0 ret restore call %g2 nop .long 3925 mov 0,%i0 ret restore call %g2 nop .long 3926 mov 0,%i0 ret restore call %g2 nop .long 3927 mov 0,%i0 ret restore call %g2 nop .long 3928 mov 0,%i0 ret restore call %g2 nop .long 3929 mov 0,%i0 ret restore call %g2 nop .long 3930 mov 0,%i0 ret restore call %g2 nop .long 3931 mov 0,%i0 ret restore call %g2 nop .long 3932 mov 0,%i0 ret restore call %g2 nop .long 3933 mov 0,%i0 ret restore call %g2 nop .long 3934 mov 0,%i0 ret restore call %g2 nop .long 3935 mov 0,%i0 ret restore call %g2 nop .long 3936 mov 0,%i0 ret restore call %g2 nop .long 3937 mov 0,%i0 ret restore call %g2 nop .long 3938 mov 0,%i0 ret restore call %g2 nop .long 3939 mov 0,%i0 ret restore call %g2 nop .long 3940 mov 0,%i0 ret restore call %g2 nop .long 3941 mov 0,%i0 ret restore call %g2 nop .long 3942 mov 0,%i0 ret restore call %g2 nop .long 3943 mov 0,%i0 ret restore call %g2 nop .long 3944 mov 0,%i0 ret restore call %g2 nop .long 3945 mov 0,%i0 ret restore call %g2 nop .long 3946 mov 0,%i0 ret restore call %g2 nop .long 3947 mov 0,%i0 ret restore call %g2 nop .long 3948 mov 0,%i0 ret restore call %g2 nop .long 3949 mov 0,%i0 ret restore call %g2 nop .long 3950 mov 0,%i0 ret restore call %g2 nop .long 3951 mov 0,%i0 ret restore call %g2 nop .long 3952 mov 0,%i0 ret restore call %g2 nop .long 3953 mov 0,%i0 ret restore call %g2 nop .long 3954 mov 0,%i0 ret restore call %g2 nop .long 3955 mov 0,%i0 ret restore call %g2 nop .long 3956 mov 0,%i0 ret restore call %g2 nop .long 3957 mov 0,%i0 ret restore call %g2 nop .long 3958 mov 0,%i0 ret restore call %g2 nop .long 3959 mov 0,%i0 ret restore call %g2 nop .long 3960 mov 0,%i0 ret restore call %g2 nop .long 3961 mov 0,%i0 ret restore call %g2 nop .long 3962 mov 0,%i0 ret restore call %g2 nop .long 3963 mov 0,%i0 ret restore call %g2 nop .long 3964 mov 0,%i0 ret restore call %g2 nop .long 3965 mov 0,%i0 ret restore call %g2 nop .long 3966 mov 0,%i0 ret restore call %g2 nop .long 3967 mov 0,%i0 ret restore call %g2 nop .long 3968 mov 0,%i0 ret restore call %g2 nop .long 3969 mov 0,%i0 ret restore call %g2 nop .long 3970 mov 0,%i0 ret restore call %g2 nop .long 3971 mov 0,%i0 ret restore call %g2 nop .long 3972 mov 0,%i0 ret restore call %g2 nop .long 3973 mov 0,%i0 ret restore call %g2 nop .long 3974 mov 0,%i0 ret restore call %g2 nop .long 3975 mov 0,%i0 ret restore call %g2 nop .long 3976 mov 0,%i0 ret restore call %g2 nop .long 3977 mov 0,%i0 ret restore call %g2 nop .long 3978 mov 0,%i0 ret restore call %g2 nop .long 3979 mov 0,%i0 ret restore call %g2 nop .long 3980 mov 0,%i0 ret restore call %g2 nop .long 3981 mov 0,%i0 ret restore call %g2 nop .long 3982 mov 0,%i0 ret restore call %g2 nop .long 3983 mov 0,%i0 ret restore call %g2 nop .long 3984 mov 0,%i0 ret restore call %g2 nop .long 3985 mov 0,%i0 ret restore call %g2 nop .long 3986 mov 0,%i0 ret restore call %g2 nop .long 3987 mov 0,%i0 ret restore call %g2 nop .long 3988 mov 0,%i0 ret restore call %g2 nop .long 3989 mov 0,%i0 ret restore call %g2 nop .long 3990 mov 0,%i0 ret restore call %g2 nop .long 3991 mov 0,%i0 ret restore call %g2 nop .long 3992 mov 0,%i0 ret restore call %g2 nop .long 3993 mov 0,%i0 ret restore call %g2 nop .long 3994 mov 0,%i0 ret restore call %g2 nop .long 3995 mov 0,%i0 ret restore call %g2 nop .long 3996 mov 0,%i0 ret restore call %g2 nop .long 3997 mov 0,%i0 ret restore call %g2 nop .long 3998 mov 0,%i0 ret restore call %g2 nop .long 3999 mov 0,%i0 ret restore call %g2 nop .long 4000 mov 0,%i0 ret restore call %g2 nop .long 4001 mov 0,%i0 ret restore call %g2 nop .long 4002 mov 0,%i0 ret restore call %g2 nop .long 4003 mov 0,%i0 ret restore call %g2 nop .long 4004 mov 0,%i0 ret restore call %g2 nop .long 4005 mov 0,%i0 ret restore call %g2 nop .long 4006 mov 0,%i0 ret restore call %g2 nop .long 4007 mov 0,%i0 ret restore call %g2 nop .long 4008 mov 0,%i0 ret restore call %g2 nop .long 4009 mov 0,%i0 ret restore call %g2 nop .long 4010 mov 0,%i0 ret restore call %g2 nop .long 4011 mov 0,%i0 ret restore call %g2 nop .long 4012 mov 0,%i0 ret restore call %g2 nop .long 4013 mov 0,%i0 ret restore call %g2 nop .long 4014 mov 0,%i0 ret restore call %g2 nop .long 4015 mov 0,%i0 ret restore call %g2 nop .long 4016 mov 0,%i0 ret restore call %g2 nop .long 4017 mov 0,%i0 ret restore call %g2 nop .long 4018 mov 0,%i0 ret restore call %g2 nop .long 4019 mov 0,%i0 ret restore call %g2 nop .long 4020 mov 0,%i0 ret restore call %g2 nop .long 4021 mov 0,%i0 ret restore call %g2 nop .long 4022 mov 0,%i0 ret restore call %g2 nop .long 4023 mov 0,%i0 ret restore call %g2 nop .long 4024 mov 0,%i0 ret restore call %g2 nop .long 4025 mov 0,%i0 ret restore call %g2 nop .long 4026 mov 0,%i0 ret restore call %g2 nop .long 4027 mov 0,%i0 ret restore call %g2 nop .long 4028 mov 0,%i0 ret restore call %g2 nop .long 4029 mov 0,%i0 ret restore call %g2 nop .long 4030 mov 0,%i0 ret restore call %g2 nop .long 4031 mov 0,%i0 ret restore call %g2 nop .long 4032 mov 0,%i0 ret restore call %g2 nop .long 4033 mov 0,%i0 ret restore call %g2 nop .long 4034 mov 0,%i0 ret restore call %g2 nop .long 4035 mov 0,%i0 ret restore call %g2 nop .long 4036 mov 0,%i0 ret restore call %g2 nop .long 4037 mov 0,%i0 ret restore call %g2 nop .long 4038 mov 0,%i0 ret restore call %g2 nop .long 4039 mov 0,%i0 ret restore call %g2 nop .long 4040 mov 0,%i0 ret restore call %g2 nop .long 4041 mov 0,%i0 ret restore call %g2 nop .long 4042 mov 0,%i0 ret restore call %g2 nop .long 4043 mov 0,%i0 ret restore call %g2 nop .long 4044 mov 0,%i0 ret restore call %g2 nop .long 4045 mov 0,%i0 ret restore call %g2 nop .long 4046 mov 0,%i0 ret restore call %g2 nop .long 4047 mov 0,%i0 ret restore call %g2 nop .long 4048 mov 0,%i0 ret restore call %g2 nop .long 4049 mov 0,%i0 ret restore call %g2 nop .long 4050 mov 0,%i0 ret restore call %g2 nop .long 4051 mov 0,%i0 ret restore call %g2 nop .long 4052 mov 0,%i0 ret restore call %g2 nop .long 4053 mov 0,%i0 ret restore call %g2 nop .long 4054 mov 0,%i0 ret restore call %g2 nop .long 4055 mov 0,%i0 ret restore call %g2 nop .long 4056 mov 0,%i0 ret restore call %g2 nop .long 4057 mov 0,%i0 ret restore call %g2 nop .long 4058 mov 0,%i0 ret restore call %g2 nop .long 4059 mov 0,%i0 ret restore call %g2 nop .long 4060 mov 0,%i0 ret restore call %g2 nop .long 4061 mov 0,%i0 ret restore call %g2 nop .long 4062 mov 0,%i0 ret restore call %g2 nop .long 4063 mov 0,%i0 ret restore call %g2 nop .long 4064 mov 0,%i0 ret restore call %g2 nop .long 4065 mov 0,%i0 ret restore call %g2 nop .long 4066 mov 0,%i0 ret restore call %g2 nop .long 4067 mov 0,%i0 ret restore call %g2 nop .long 4068 mov 0,%i0 ret restore call %g2 nop .long 4069 mov 0,%i0 ret restore call %g2 nop .long 4070 mov 0,%i0 ret restore call %g2 nop .long 4071 mov 0,%i0 ret restore call %g2 nop .long 4072 mov 0,%i0 ret restore call %g2 nop .long 4073 mov 0,%i0 ret restore call %g2 nop .long 4074 mov 0,%i0 ret restore call %g2 nop .long 4075 mov 0,%i0 ret restore call %g2 nop .long 4076 mov 0,%i0 ret restore call %g2 nop .long 4077 mov 0,%i0 ret restore call %g2 nop .long 4078 mov 0,%i0 ret restore call %g2 nop .long 4079 mov 0,%i0 ret restore call %g2 nop .long 4080 mov 0,%i0 ret restore call %g2 nop .long 4081 mov 0,%i0 ret restore call %g2 nop .long 4082 mov 0,%i0 ret restore call %g2 nop .long 4083 mov 0,%i0 ret restore call %g2 nop .long 4084 mov 0,%i0 ret restore call %g2 nop .long 4085 mov 0,%i0 ret restore call %g2 nop .long 4086 mov 0,%i0 ret restore call %g2 nop .long 4087 mov 0,%i0 ret restore call %g2 nop .long 4088 mov 0,%i0 ret restore call %g2 nop .long 4089 mov 0,%i0 ret restore call %g2 nop .long 4090 mov 0,%i0 ret restore call %g2 nop .long 4091 mov 0,%i0 ret restore call %g2 nop .long 4092 mov 0,%i0 ret restore call %g2 nop .long 4093 mov 0,%i0 ret restore call %g2 nop .long 4094 mov 0,%i0 ret restore call %g2 nop .long 4095 mov 0,%i0 ret restore ld [%i0+24], %g3 L(L54): ld [%i0+4], %l0 ld [%g3], %o0 ld [%g3+4], %o1 ld [%g3+8], %o2 ld [%g3+12], %o3 ld [%g3+16], %o4 call %l0, 0 ld [%g3+20], %o5 nop ld [%i0+12], %g3 cmp %g3, 1 be L(L11) mov %o0, %o7 cmp %g3, 2 be L(L52) cmp %g3, 3 be L(L52) cmp %g3, 4 be L(L52) cmp %g3, 5 be L(L51) cmp %g3, 6 be L(L51) cmp %g3, 7 be L(L49) cmp %g3, 8 be L(L49) cmp %g3, 9 be L(L49) cmp %g3, 10 be L(L49) add %g3, -11, %g3 cmp %g3, 1 bgu,a L(L30) ld [%i0+12], %g3 ld [%i0+8], %g3 st %o0, [%g3] b L(L11) st %o1, [%g3+4] L(L30): cmp %g3, 13 bne,a L(L32) ld [%i0+12], %g3 ld [%i0], %g3 andcc %g3, 32, %g0 be L(L33) ld [%i0+8], %g3 fdtos %f0, %f0 L(L33): b L(L11) st %f0, [%g3] L(L32): cmp %g3, 14 bne,a L(L36) ld [%i0+12], %g3 ld [%i0+8], %g3 b L(L11) std %f0, [%g3] L(L36): cmp %g3, 15 be,a L(L55) ld [%i0+8], %g3 ld [%i0+12], %g3 cmp %g3, 16 bne L(L11) nop ld [%i0], %g3 andcc %g3, 2, %g0 be L(L11) nop ld [%i0+16], %g3 cmp %g3, 1 bne L(L42) cmp %g3, 2 L(L52): ld [%i0+8], %g3 b L(L11) stb %o7, [%g3] L(L42): bne,a L(L44) ld [%i0+16], %g3 L(L51): ld [%i0+8], %g3 b L(L11) sth %o7, [%g3] L(L44): cmp %g3, 4 bne L(L11) nop L(L49): ld [%i0+8], %g3 L(L55): st %o7, [%g3] L(L11): ret restore %g0, 0, %o0 L(Lfe1): FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-x86_64-windows.c0000664000000000000000000002055314662613003015471 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for an x86_64 (a.k.a. amd64) with gcc using the Windows ABI ('gcc -mabi=ms'). This calls a C function with an argument list built up using macros defined in avcall.h. x86_64 Argument Passing Conventions on Windows: Documentation is at https://docs.microsoft.com/en-us/cpp/build/calling-convention A summary is at https://en.wikipedia.org/wiki/X86_calling_conventions#x86-64_calling_conventions * Arguments: - Up to 4 words are passed in registers: integer/pointer float/double 1. %rcx %xmm0 2. %rdx %xmm1 3. %r8 %xmm2 4. %r9 %xmm3 - Integer or pointer arguments: The first 4 integer or pointer arguments get passed in integer registers (%rcx, %rdx, %r8, %r9). The remaining ones (as an entire word each) on the stack. - Floating-point arguments: The float/double arguments among the first 4 words are passed in SSE registers (%xmm0..%xmm3), as shown above. The remaining ones (as an entire word each) on the stack. - Structure arguments: Structure args of size 1, 2, 4, 8 bytes are passed like integers. Structure args of other sizes are passed as pointers to caller-allocated temporary locations. * Return value: Types of size 1, 2, 4, 8 bytes are returned in %rax or (for float/double values) in %xmm0. To return a structure of another size, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. The function also returns the pointer. * Call-used registers: rax,rdx,rcx,r8-r11 ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) /*register __avrword iarg1 __asm__("rcx");*/ /*register __avrword iarg2 __asm__("rdx");*/ /*register __avrword iarg3 __asm__("r8");*/ /*register __avrword iarg4 __asm__("r9");*/ register float farg1 __asm__("xmm0"); register float farg2 __asm__("xmm1"); register float farg3 __asm__("xmm2"); register float farg4 __asm__("xmm3"); register double darg1 __asm__("xmm0"); register double darg2 __asm__("xmm1"); register double darg3 __asm__("xmm2"); register double darg4 __asm__("xmm3"); int avcall_call(av_alist* list) { register __avword* sp __asm__("rsp"); /* C names for registers */ register __avrword iret __asm__("rax"); register float fret __asm__("xmm0"); register double dret __asm__("xmm0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; int i; for (i = 4; i < arglen; i++) /* push function args onto stack */ argframe[i-4] = l->args[i]; /* put up to 4 float args into registers */ if (l->farg_mask) { if (l->farg_mask & (1<<0)) farg1 = l->fargs[0]; if (l->farg_mask & (1<<1)) farg2 = l->fargs[1]; if (l->farg_mask & (1<<2)) farg3 = l->fargs[2]; if (l->farg_mask & (1<<3)) farg4 = l->fargs[3]; } /* put up to 4 double args into registers */ if (l->darg_mask) { if (l->darg_mask & (1<<0)) darg1 = l->dargs[0]; if (l->darg_mask & (1<<1)) darg2 = l->dargs[1]; if (l->darg_mask & (1<<2)) darg3 = l->dargs[2]; if (l->darg_mask & (1<<3)) darg4 = l->dargs[3]; } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3]); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3]); } else { __avrword iret; iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size 1, 2, 4, 8 in registers. */ void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 8) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; if (count == 1 || count == 2 || count == 4 || count == 8) { /* 0 < count ≤ sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 2*sizeof(__avrword) */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } #endif } } } return 0; } libffcall-2.5/avcall/avcall-armhf.c0000664000000000000000000001772714662613003014151 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2024 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an ARM with -mfloat-abi=hard with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. ARM Argument Passing Conventions: All arguments, except the first 4 words which are passed in the registers r0, r1, r2, r3, are passed on the stack with word alignment. Doubles take two words. In ABIs where 'double' and 'long long' have alignment 4, they are passed entirely in registers or entirely on the stack (i.e. not the first half in r3 and the second half on the stack). In ABIs where 'double' and 'long long' have alignment 8, they are passed with 2-word alignment in this word sequence (e.g. a 'double' after an 'int' in r0 gets passed in (r2,r3), not in (r1,r2)). This implies that they are passed entirely in registers or entirely on the stack. Structure args are passed as true structures embedded in the argument stack. A structure arg may be allocated partially in registers (r0,...,r3) and partially on the stack, if no previous args already consume stack space. To return a structure, the called function copies the return value to the address supplied in register r0. In hard-float configurations (armhf): Up to 16 floats get passed in the single-float registers s0, s1, ..., s15. A float gets returned in s0. Up to 8 doubles gets passed in the double-float registers d0, ..., d7 (= {s0,s1}, {s2,s3}, ..., {s14,s15}). A double gets returned in d0. The 4 integer args registers and the 16 float args slots are allocated independently: 1) After more than 16 float args, integer args can still be allocated in registers. 2) After more than 4 integer args, float args can still be allocated in registers. Compile this routine with gcc -O (or -O2 or -g -O) to get the right register variables, or use the assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) int avcall_call(av_alist* list) { register unsigned long sp __asm__("r13"); /* C names for registers */ /*register __avrword iret __asm__("r0"); */ register __avrword iret2 __asm__("r1"); register float fret __asm__("s0"); register double dret __asm__("d0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ #if __GNUC__ < 4 /* Enforce 8-bytes-alignment of the stack pointer. We need to do it this way because the old GCC that we use to compile this file does not support the option '-mabi=aapcs'. */ sp &= -8; #endif int arglen = l->aptr - l->args; __avrword i; for (i = 4; i < arglen; i++) /* push function args onto stack */ argframe[i-4] = l->args[i]; /* load float values into floating-point registers */ if ((l->farg_mask >> 0) & 1) __asm__ __volatile__ ("vldr.32 s0,%0" : : "m" (l->fargs[0])); if ((l->farg_mask >> 1) & 1) __asm__ __volatile__ ("vldr.32 s1,%0" : : "m" (l->fargs[1])); if ((l->farg_mask >> 2) & 1) __asm__ __volatile__ ("vldr.32 s2,%0" : : "m" (l->fargs[2])); if ((l->farg_mask >> 3) & 1) __asm__ __volatile__ ("vldr.32 s3,%0" : : "m" (l->fargs[3])); if ((l->farg_mask >> 4) & 1) __asm__ __volatile__ ("vldr.32 s4,%0" : : "m" (l->fargs[4])); if ((l->farg_mask >> 5) & 1) __asm__ __volatile__ ("vldr.32 s5,%0" : : "m" (l->fargs[5])); if ((l->farg_mask >> 6) & 1) __asm__ __volatile__ ("vldr.32 s6,%0" : : "m" (l->fargs[6])); if ((l->farg_mask >> 7) & 1) __asm__ __volatile__ ("vldr.32 s7,%0" : : "m" (l->fargs[7])); if ((l->farg_mask >> 8) & 1) __asm__ __volatile__ ("vldr.32 s8,%0" : : "m" (l->fargs[8])); if ((l->farg_mask >> 9) & 1) __asm__ __volatile__ ("vldr.32 s9,%0" : : "m" (l->fargs[9])); if ((l->farg_mask >> 10) & 1) __asm__ __volatile__ ("vldr.32 s10,%0" : : "m" (l->fargs[10])); if ((l->farg_mask >> 11) & 1) __asm__ __volatile__ ("vldr.32 s11,%0" : : "m" (l->fargs[11])); if ((l->farg_mask >> 12) & 1) __asm__ __volatile__ ("vldr.32 s12,%0" : : "m" (l->fargs[12])); if ((l->farg_mask >> 13) & 1) __asm__ __volatile__ ("vldr.32 s13,%0" : : "m" (l->fargs[13])); if ((l->farg_mask >> 14) & 1) __asm__ __volatile__ ("vldr.32 s14,%0" : : "m" (l->fargs[14])); if ((l->farg_mask >> 15) & 1) __asm__ __volatile__ ("vldr.32 s15,%0" : : "m" (l->fargs[15])); /* load double values into floating-point registers */ if ((l->darg_mask >> 0) & 1) __asm__ __volatile__ ("vldr.64 d0,%0" : : "m" (l->dargs[0])); if ((l->darg_mask >> 1) & 1) __asm__ __volatile__ ("vldr.64 d1,%0" : : "m" (l->dargs[1])); if ((l->darg_mask >> 2) & 1) __asm__ __volatile__ ("vldr.64 d2,%0" : : "m" (l->dargs[2])); if ((l->darg_mask >> 3) & 1) __asm__ __volatile__ ("vldr.64 d3,%0" : : "m" (l->dargs[3])); if ((l->darg_mask >> 4) & 1) __asm__ __volatile__ ("vldr.64 d4,%0" : : "m" (l->dargs[4])); if ((l->darg_mask >> 5) & 1) __asm__ __volatile__ ("vldr.64 d5,%0" : : "m" (l->dargs[5])); if ((l->darg_mask >> 6) & 1) __asm__ __volatile__ ("vldr.64 d6,%0" : : "m" (l->dargs[6])); if ((l->darg_mask >> 7) & 1) __asm__ __volatile__ ("vldr.64 d7,%0" : : "m" (l->dargs[7])); /* call function, pass 4 integer args in registers */ i = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { /* PCS for ARM (http://infocenter.arm.com/help/topic/com.arm.doc.ihi0042b/IHI0042B_aapcs.pdf): page 19: "A Composite Type not larger than 4 bytes is returned in r0." sizeof({char a[3];}) = 3, so we have to use <= sizeof below */ if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { /* can't occur */ RETURN(char, i); } else if (l->rsize == sizeof(short)) { /* can't occur */ RETURN(short, i); } else if (l->rsize <= sizeof(int)) { RETURN(int, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } } } return 0; } libffcall-2.5/avcall/avcall-arm.c0000664000000000000000000001227614662613003013625 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2024 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an Acorn Risc Maschine with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. ARM Argument Passing Conventions: All arguments, except the first 4 words which are passed in the registers r0, r1, r2, r3, are passed on the stack with word alignment. Doubles take two words. In ABIs where 'double' and 'long long' have alignment 4, they are passed entirely in registers or entirely on the stack (i.e. not the first half in r3 and the second half on the stack). In ABIs where 'double' and 'long long' have alignment 8, they are passed with 2-word alignment in this word sequence (e.g. a 'double' after an 'int' in r0 gets passed in (r2,r3), not in (r1,r2)). This implies that they are passed entirely in registers or entirely on the stack. Structure args are passed as true structures embedded in the argument stack. A structure arg may be allocated partially in registers (r0,...,r3) and partially on the stack, if no previous args already consume stack space. To return a structure, the called function copies the return value to the address supplied in register r0. Compile this routine with gcc -O (or -O2 or -g -O) to get the right register variables, or use the assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) int avcall_call(av_alist* list) { register unsigned long sp __asm__("r13"); /* C names for registers */ /*register __avrword iret __asm__("r0"); */ register __avrword iret2 __asm__("r1"); register float fret __asm__("r0"); /* r0 */ register double dret __asm__("r0"); /* r0,r1 */ __av_alist* l = &AV_LIST_INNER(list); #if __GNUC__ >= 4 __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ #else __avword space[__AV_ALIST_WORDS]; /* space for callee's stack frame */ /* Enforce 8-bytes-alignment of the stack pointer. We need to do it this way because the old GCC that we use to compile this file does not support the option '-mabi=aapcs'. */ sp &= -8; __avword* argframe = (__avword*) sp; /* stack offset for argument list */ #endif int arglen = l->aptr - l->args; __avrword i; for (i = 4; i < arglen; i++) /* push function args onto stack */ argframe[i-4] = l->args[i]; /* call function, pass 4 args in registers */ i = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { /* PCS for ARM (http://infocenter.arm.com/help/topic/com.arm.doc.ihi0042b/IHI0042B_aapcs.pdf): page 19: "A Composite Type not larger than 4 bytes is returned in r0." sizeof({char a[3];}) = 3, so we have to use <= sizeof below */ if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { /* can't occur */ RETURN(char, i); } else if (l->rsize == sizeof(short)) { /* can't occur */ RETURN(short, i); } else if (l->rsize <= sizeof(int)) { RETURN(int, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } } } return 0; } libffcall-2.5/avcall/avcall-loongarch64.c0000664000000000000000000003630314662613003015171 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2022 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for LoongArch 64-bit CPU with LP64 ABI. This calls a C function with an argument list built up using macros defined in avcall.h. LoongArch64 argument passing conventions: Up to 8 words are passed in integer registers (r4, ..., r11); remaining words are passed on the stack. Up to 8 float/double arguments are passed in floating point registers (f0, ..., f7), further float/double arguments are passed in integer registers, remaining float/double arguments are passed on the stack. Arguments passed on the stack have 8-bytes alignment. Structure args <= 16 bytes are passed as up to two words in registers (floating-point fields of structures with at most two fields in floating-point registers, other fields in integer registers). Structure args larger than 16 bytes are passed as pointers to caller-made local copies. Integers are returned in r4, r5. Float/double values are returned in f0, f1. Structures <= 16 bytes are returned in registers (floating-point fields of structures with at most two fields in floating-point registers, other fields in integer registers). To return a structure larger than 16 bytes, the caller allocates the space and passes a pointer to it as first argument (i.e. in r4). ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avrword iarg1 __asm__("r4"); register __avrword iarg2 __asm__("r5"); register __avrword iarg3 __asm__("r6"); register __avrword iarg4 __asm__("r7"); register __avrword iarg5 __asm__("r8"); register __avrword iarg6 __asm__("r9"); register __avrword iarg7 __asm__("r10"); register __avrword iarg8 __asm__("r11"); register float farg1 __asm__("f0"); register float farg2 __asm__("f1"); register float farg3 __asm__("f2"); register float farg4 __asm__("f3"); register float farg5 __asm__("f4"); register float farg6 __asm__("f5"); register float farg7 __asm__("f6"); register float farg8 __asm__("f7"); register double darg1 __asm__("f0"); register double darg2 __asm__("f1"); register double darg3 __asm__("f2"); register double darg4 __asm__("f3"); register double darg5 __asm__("f4"); register double darg6 __asm__("f5"); register double darg7 __asm__("f6"); register double darg8 __asm__("f7"); int avcall_call(av_alist* list) { register __avrword iretreg __asm__("r4"); register __avrword iret2reg __asm__("r5"); register double dret __asm__("f0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int fanum = l->fanum; { int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i-8] = l->args[i]; } /* Put up to 8 integer args into registers. */ if (arglen >= 1) { iarg1 = l->args[0]; if (arglen >= 2) { iarg2 = l->args[1]; if (arglen >= 3) { iarg3 = l->args[2]; if (arglen >= 4) { iarg4 = l->args[3]; if (arglen >= 5) { iarg5 = l->args[4]; if (arglen >= 6) { iarg6 = l->args[5]; if (arglen >= 7) { iarg7 = l->args[6]; if (arglen >= 8) { iarg8 = l->args[7]; } } } } } } } } /* Put upto 8 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; if (fanum >= 3) { if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2]; else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2]; if (fanum >= 4) { if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3]; else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3]; if (fanum >= 5) { if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4]; else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4]; if (fanum >= 6) { if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5]; else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5]; if (fanum >= 7) { if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6]; else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6]; if (fanum >= 8) { if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7]; else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7]; } } } } } } } } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { __avrword iret, iret2; iret = (*l->func)(); iret2 = iret2reg; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-s390x-macro.S0000664000000000000000000000755014662622067015024 00000000000000 .file "avcall-s390x.c" .text .align 8 .globl avcall_call .type avcall_call, @function avcall_call: .LFB0: .cfi_startproc stmg %r7,%r15,56(%r15) .cfi_offset 7, -104 .cfi_offset 8, -96 .cfi_offset 9, -88 .cfi_offset 10, -80 .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 larl %r13,.L77 aghi %r15,-176 .cfi_def_cfa_offset 336 lgr %r11,%r15 .cfi_def_cfa_register 11 aghi %r15,-2056 lg %r9,48(%r2) lg %r1,40(%r2) sgr %r1,%r9 srag %r1,%r1,3 stg %r2,168(%r11) stg %r6,160(%r11) ltr %r1,%r1 la %r8,160(%r15) l %r0,64(%r2) l %r7,112(%r2) jle .L6 ahi %r1,-1 llgfr %r1,%r1 aghi %r1,1 lghi %r14,0 .L5: lg %r10,0(%r14,%r9) stg %r10,0(%r14,%r8) aghi %r14,8 brctg %r1,.L5 .L6: ltr %r0,%r0 je .L7 lg %r1,168(%r11) cl %r0,.L78-.L77(%r13) lg %r2,72(%r1) jle .L7 chi %r0,2 lg %r3,80(%r1) je .L7 chi %r0,3 lg %r4,88(%r1) je .L7 chi %r0,4 lg %r5,96(%r1) jne .L72 .L7: ltr %r7,%r7 je .L9 lg %r10,168(%r11) l %r1,120(%r10) tmll %r1,1 je .L10 ld %f0,144(%r10) .L11: cl %r7,.L78-.L77(%r13) jle .L9 tmll %r1,2 lg %r10,168(%r11) jne .L73 tm 119(%r10),2 je .L14 le %f2,128(%r10) .L14: chi %r7,2 je .L9 tmll %r1,4 lg %r10,168(%r11) je .L15 ld %f4,160(%r10) .L16: chi %r7,3 je .L9 tmll %r1,8 lg %r1,168(%r11) jne .L74 tm 119(%r1),8 je .L9 le %f6,136(%r1) .L9: lg %r1,168(%r11) l %r1,24(%r1) chi %r1,13 je .L75 chi %r1,14 je .L76 lg %r10,168(%r11) lg %r1,8(%r10) basr %r14,%r1 l %r1,24(%r10) chi %r1,1 lgr %r0,%r2 je .L19 chi %r1,2 je .L68 chi %r1,3 je .L68 chi %r1,4 je .L68 chi %r1,5 je .L69 chi %r1,6 je .L69 chi %r1,7 je .L70 chi %r1,8 je .L70 lr %r9,%r1 nill %r9,65533 chi %r9,9 je .L67 chi %r1,10 je .L67 chi %r1,12 je .L67 chi %r1,15 je .L67 .L19: lg %r4,288(%r11) lg %r6,160(%r11) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_restore 10 .cfi_restore 9 .cfi_restore 8 .cfi_restore 7 .cfi_def_cfa 15, 160 br %r4 .L10: .cfi_restore_state lg %r10,168(%r11) tm 119(%r10),1 je .L11 le %f0,124(%r10) j .L11 .L68: lg %r1,168(%r11) lghi %r2,0 lg %r1,16(%r1) stc %r0,0(%r1) lg %r4,288(%r11) lg %r6,160(%r11) lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L73: .cfi_restore_state ld %f2,152(%r10) j .L14 .L69: lg %r1,168(%r11) lg %r4,288(%r11) lg %r6,160(%r11) lg %r1,16(%r1) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 sth %r0,0(%r1) br %r4 .L67: .cfi_restore_state lg %r1,168(%r11) lg %r1,16(%r1) stg %r0,0(%r1) j .L19 .L76: lg %r0,168(%r11) lgr %r1,%r0 lgr %r10,%r0 lg %r1,8(%r1) lg %r10,16(%r10) basr %r14,%r1 lg %r4,288(%r11) std %f0,0(%r10) lg %r6,160(%r11) lghi %r2,0 lmg %r7,%r15,232(%r11) .cfi_remember_state .cfi_restore 7 .cfi_restore 8 .cfi_restore 9 .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L75: .cfi_restore_state lg %r0,168(%r11) lgr %r1,%r0 lgr %r10,%r0 lg %r1,8(%r1) lg %r10,16(%r10) basr %r14,%r1 ste %f0,0(%r10) j .L19 .L15: tm 119(%r10),4 je .L16 le %f4,132(%r10) j .L16 .L70: lg %r1,168(%r11) lg %r1,16(%r1) st %r0,0(%r1) j .L19 .L72: lg %r6,104(%r1) j .L7 .L74: ld %f6,168(%r1) j .L9 .section .rodata .align 8 .L77: .L78: .long 1 .align 2 .previous .cfi_endproc .LFE0: .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-powerpc-linux-macro.S0000664000000000000000000000636714662622066016756 00000000000000 .file "avcall-powerpc.c" .section ".text" .align 2 .globl avcall_call .type avcall_call, @function avcall_call: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-1056(1) mflr 0 li 11,0 stw 0,1060(1) addi 8,1,8 stw 30,1048(1) mr 30,3 lwz 0,20(3) lwz 10,24(3) stw 31,1052(1) mr 31,1 subfc 0,10,0 srawi 0,0,2 cmpw 0,11,0 bge- 0,.L71 mtctr 0 .L72: slwi 9,11,2 addi 11,11,1 lwzx 0,9,10 stwx 0,9,8 bdnz .L72 .L71: lwz 9,76(30) subfc 9,30,9 addi 9,9,-80 srawi. 9,9,3 beq- 0,.L8 cmpwi 0,9,1 beq- 0,.L11 cmpwi 0,9,2 beq- 0,.L14 cmpwi 0,9,3 beq- 0,.L17 cmpwi 0,9,4 beq- 0,.L20 cmpwi 0,9,5 beq- 0,.L23 cmpwi 0,9,6 beq- 0,.L26 cmpwi 0,9,7 beq- 0,.L29 .L32: lfd 8,136(30) .L29: lfd 7,128(30) .L26: lfd 6,120(30) .L23: lfd 5,112(30) .L20: lfd 4,104(30) .L17: lfd 3,96(30) .L14: lfd 2,88(30) .L11: lfd 1,80(30) .L8: lwz 0,4(30) lwz 9,68(30) lwz 3,44(30) mtctr 0 lwz 4,48(30) lwz 5,52(30) lwz 6,56(30) lwz 7,60(30) lwz 8,64(30) lwz 10,72(30) crxor 6,6,6 bctrl lwz 9,12(30) cmpwi 0,9,1 beq- 0,.L34 cmpwi 0,9,2 beq- 0,.L75 cmpwi 0,9,3 beq- 0,.L75 cmpwi 0,9,4 beq- 0,.L75 cmpwi 0,9,5 beq- 0,.L74 cmpwi 0,9,6 beq- 0,.L74 cmpwi 0,9,7 beq- 0,.L76 cmpwi 0,9,8 beq- 0,.L76 cmpwi 0,9,9 beq- 0,.L76 cmpwi 0,9,10 beq- 0,.L76 addi 0,9,-11 cmplwi 0,0,1 bgt- 0,.L53 lwz 9,8(30) stw 4,4(9) .L73: stw 3,0(9) .L34: lwz 11,0(1) li 3,0 lwz 0,4(11) lwz 30,-8(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L53: cmpwi 0,9,13 beq- 0,.L77 cmpwi 0,9,14 beq- 0,.L78 cmpwi 0,9,15 beq- 0,.L76 cmpwi 0,9,16 bne+ 0,.L34 lwz 0,0(30) andi. 9,0,512 beq- 0,.L34 lwz 8,16(30) addi 0,8,-1 cmplwi 0,0,7 bgt- 0,.L34 lwz 0,8(30) cmplwi 0,8,4 rlwinm 9,0,0,30,31 rlwinm 5,0,0,0,29 add 8,9,8 bgt- 0,.L64 cmplwi 0,8,4 bgt- 0,.L65 slwi 0,9,3 slwi 10,8,3 subfic 0,0,31 li 11,2 lwz 8,0(5) subfic 10,10,32 slw 11,11,0 slw 9,3,10 li 0,1 xor 9,8,9 slw 0,0,10 subfc 11,0,11 and 9,9,11 xor 8,8,9 stw 8,0(5) b .L34 .L65: slwi 8,8,3 slwi 9,9,3 lwz 6,0(5) subfic 9,9,31 lwz 7,4(5) addi 0,8,-32 li 11,2 subfic 8,8,64 slw 11,11,9 slw 10,3,8 sraw 0,3,0 li 9,-1 xor 0,6,0 xor 10,7,10 addi 11,11,-1 slw 9,9,8 and 0,0,11 and 10,10,9 xor 6,6,0 xor 7,7,10 stw 7,4(5) stw 6,0(5) b .L34 .L64: slwi 0,9,3 cmplwi 0,8,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 12,9,-1 bgt- 0,.L68 slwi 9,8,2 slwi 10,8,3 addi 9,9,-16 subfic 10,10,64 sraw 11,4,9 lwz 8,0(5) lwz 7,4(5) sraw 11,11,9 slw 0,3,10 slw 4,4,10 or 0,0,11 li 9,-1 xor 0,8,0 xor 4,7,4 slw 9,9,10 and 0,0,12 and 4,4,9 xor 8,8,0 xor 7,7,4 stw 8,0(5) stw 7,4(5) b .L34 .L68: slwi 9,8,3 lwz 7,0(5) addi 6,9,-64 lwz 8,8(5) subfic 9,9,96 sraw 11,3,6 slw 10,4,9 li 0,-1 slw 0,0,9 xor 11,7,11 xor 10,8,10 and 11,11,12 and 10,10,0 slw 9,3,9 sraw 4,4,6 xor 7,7,11 or 9,9,4 xor 8,8,10 stw 8,8(5) stw 7,0(5) stw 9,4(5) b .L34 .L76: lwz 9,8(30) b .L73 .L78: lwz 9,8(30) stfd 1,0(9) b .L34 .L77: frsp 0,1 lwz 9,8(30) stfs 0,0(9) b .L34 .L74: lwz 9,8(30) sth 3,0(9) b .L34 .L75: lwz 9,8(30) stb 3,0(9) b .L34 .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-powerpc-aix.s0000664000000000000000000000750314662622066015332 00000000000000 .file "avcall-powerpc.c" .toc .csect .text[PR] .align 2 .globl avcall_call .globl .avcall_call .csect avcall_call[DS] avcall_call: .long .avcall_call, TOC[tc0], 0 .csect .text[PR] .avcall_call: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous mflr 0 stw 0,8(1) stw 30,-8(1) stw 31,-4(1) stw 29,-12(1) stwu 1,-72(1) lwz 0,20(3) mr 30,3 lwz 3,24(3) li 11,8 subfc 0,3,0 srawi 8,0,2 lwz 9,0(1) cmpw 0,11,8 mr 31,1 stwu 9,-1040(1) addi 0,1,71 rlwinm 10,0,0,0,27 bge- 0,L..87 mr 12,3 L..6: slwi 9,11,2 addi 11,11,1 cmpw 0,11,8 lwzx 0,9,12 add 9,9,10 stw 0,-32(9) blt+ 0,L..6 L..86: lwz 9,40(30) subfc 9,30,9 addi 9,9,-44 srawi. 9,9,3 beq- 0,L..8 cmpwi 0,9,1 beq- 0,L..11 cmpwi 0,9,2 beq- 0,L..14 cmpwi 0,9,3 beq- 0,L..17 cmpwi 0,9,4 beq- 0,L..20 cmpwi 0,9,5 beq- 0,L..23 cmpwi 0,9,6 beq- 0,L..26 cmpwi 0,9,7 beq- 0,L..29 cmpwi 0,9,8 beq- 0,L..32 cmpwi 0,9,9 beq- 0,L..35 cmpwi 0,9,10 beq- 0,L..38 cmpwi 0,9,11 beq- 0,L..41 cmpwi 0,9,12 beq- 0,L..44 L..47: lfd 13,140(30) L..44: lfd 12,132(30) L..41: lfd 11,124(30) L..38: lfd 10,116(30) L..35: lfd 9,108(30) L..32: lfd 8,100(30) L..29: lfd 7,92(30) L..26: lfd 6,84(30) L..23: lfd 5,76(30) L..20: lfd 4,68(30) L..17: lfd 3,60(30) L..14: lfd 2,52(30) L..11: lfd 1,44(30) L..8: lwz 29,4(30) lwz 9,24(12) lwz 0,0(29) lwz 10,28(12) lwz 3,0(12) mtctr 0 lwz 4,4(12) lwz 5,8(12) lwz 6,12(12) lwz 7,16(12) lwz 8,20(12) stw 2,20(1) lwz 11,8(29) lwz 2,4(29) bctrl lwz 2,20(1) lwz 9,12(30) cmpwi 0,9,1 beq- 0,L..49 cmpwi 0,9,2 beq- 0,L..90 cmpwi 0,9,3 beq- 0,L..90 cmpwi 0,9,4 beq- 0,L..90 cmpwi 0,9,5 beq- 0,L..89 cmpwi 0,9,6 beq- 0,L..89 cmpwi 0,9,7 beq- 0,L..91 cmpwi 0,9,8 beq- 0,L..91 cmpwi 0,9,9 beq- 0,L..91 cmpwi 0,9,10 beq- 0,L..91 addi 0,9,-11 cmplwi 0,0,1 bgt- 0,L..68 lwz 9,8(30) stw 4,4(9) L..88: stw 3,0(9) L..49: lwz 1,0(1) li 3,0 lwz 0,8(1) lwz 29,-12(1) mtlr 0 lwz 30,-8(1) lwz 31,-4(1) blr L..68: cmpwi 0,9,13 beq- 0,L..92 cmpwi 0,9,14 beq- 0,L..93 cmpwi 0,9,15 beq- 0,L..91 cmpwi 0,9,16 bne+ 0,L..49 lwz 0,0(30) andi. 9,0,512 beq- 0,L..49 lwz 8,16(30) addi 0,8,-1 cmplwi 0,0,7 bgt- 0,L..49 cmplwi 0,8,4 lwz 0,8(30) rlwinm 9,0,0,30,31 rlwinm 5,0,0,0,29 add 8,9,8 bgt- 0,L..79 cmplwi 0,8,4 bgt- 0,L..80 slwi 0,9,3 slwi 10,8,3 subfic 0,0,31 li 11,2 lwz 8,0(5) subfic 10,10,32 slw 11,11,0 li 0,1 slw 9,3,10 slw 0,0,10 xor 9,8,9 subfc 11,0,11 and 9,9,11 xor 8,8,9 stw 8,0(5) b L..49 L..80: slwi 8,8,3 slwi 9,9,3 lwz 6,0(5) lwz 7,4(5) subfic 9,9,31 addi 0,8,-32 li 11,2 subfic 8,8,64 slw 11,11,9 slw 10,3,8 sraw 0,3,0 li 9,-1 xor 0,6,0 xor 10,7,10 addi 11,11,-1 slw 9,9,8 and 0,0,11 and 10,10,9 xor 6,6,0 xor 7,7,10 stw 7,4(5) stw 6,0(5) b L..49 L..79: cmplwi 0,8,8 slwi 0,9,3 subfic 0,0,31 li 9,2 slw 9,9,0 addi 30,9,-1 bgt- 0,L..83 slwi 9,8,2 addi 9,9,-16 slwi 10,8,3 subfic 10,10,64 sraw 11,4,9 lwz 7,0(5) lwz 8,4(5) sraw 11,11,9 slw 0,3,10 or 0,0,11 slw 4,4,10 li 9,-1 xor 0,7,0 xor 4,8,4 slw 9,9,10 and 0,0,30 and 4,4,9 xor 7,7,0 xor 8,8,4 stw 8,4(5) stw 7,0(5) b L..49 L..83: slwi 9,8,3 addi 6,9,-64 lwz 7,0(5) subfic 9,9,96 lwz 8,8(5) slw 10,4,9 sraw 11,3,6 li 0,-1 slw 0,0,9 xor 11,7,11 xor 10,8,10 and 11,11,30 and 10,10,0 slw 9,3,9 sraw 4,4,6 xor 7,7,11 or 9,9,4 xor 8,8,10 stw 8,8(5) stw 7,0(5) stw 9,4(5) b L..49 L..91: lwz 9,8(30) b L..88 L..93: lwz 9,8(30) stfd 1,0(9) b L..49 L..92: lwz 9,8(30) frsp 0,1 stfs 0,0(9) b L..49 L..89: lwz 9,8(30) sth 3,0(9) b L..49 L..90: lwz 9,8(30) stb 3,0(9) b L..49 L..87: lwz 12,24(30) b L..86 LT..avcall_call: .long 0 .byte 0,0,32,97,128,3,1,0 .long 0 .long LT..avcall_call-.avcall_call .short 11 .byte "avcall_call" .byte 31 .align 2 _section_.text: .csect .data[RW],3 .long _section_.text libffcall-2.5/avcall/avcall-armhf-eabi-macro.S0000664000000000000000000001135614662622066016127 00000000000000#include "asm-arm.h" .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .text .align 2 .global C(avcall_call) .syntax unified .arm .fpu vfpv3-d16 .type avcall_call, %function FUNBEGIN(avcall_call) // args = 0, pretend = 0, frame = 0 // frame_needed = 1, uses_anonymous_args = 0 push {r4, r5, fp, lr} mov r4, r0 ldr r0, [r0, $20] ldr ip, [r4, $24] sub r3, sp, $1024 add fp, sp, $12 sub sp, r3, $8 sub r3, r0, ip cmp r3, $19 movgt r2, sp subgt r2, r2, $4 addgt r3, ip, $16 ble L(6) L(5): ldr r1, [r3], $4 cmp r0, r3 str r1, [r2, $4]! bne L(5) L(6): ldr r3, [r4, $48] tst r3, $1 beq L(4) // 89 "avcall-armhf.c" 1 vldr.32 s0,[r4, $56] // 0 "" 2 .arm .syntax unified L(4): tst r3, $2 beq L(7) // 91 "avcall-armhf.c" 1 vldr.32 s1,[r4, $60] // 0 "" 2 .arm .syntax unified L(7): tst r3, $4 beq L(8) // 93 "avcall-armhf.c" 1 vldr.32 s2,[r4, $64] // 0 "" 2 .arm .syntax unified L(8): tst r3, $8 beq L(9) // 95 "avcall-armhf.c" 1 vldr.32 s3,[r4, $68] // 0 "" 2 .arm .syntax unified L(9): tst r3, $16 beq L(10) // 97 "avcall-armhf.c" 1 vldr.32 s4,[r4, $72] // 0 "" 2 .arm .syntax unified L(10): tst r3, $32 beq L(11) // 99 "avcall-armhf.c" 1 vldr.32 s5,[r4, $76] // 0 "" 2 .arm .syntax unified L(11): tst r3, $64 beq L(12) // 101 "avcall-armhf.c" 1 vldr.32 s6,[r4, $80] // 0 "" 2 .arm .syntax unified L(12): tst r3, $128 beq L(13) // 103 "avcall-armhf.c" 1 vldr.32 s7,[r4, $84] // 0 "" 2 .arm .syntax unified L(13): tst r3, $256 beq L(14) // 105 "avcall-armhf.c" 1 vldr.32 s8,[r4, $88] // 0 "" 2 .arm .syntax unified L(14): tst r3, $512 beq L(15) // 107 "avcall-armhf.c" 1 vldr.32 s9,[r4, $92] // 0 "" 2 .arm .syntax unified L(15): tst r3, $1024 beq L(16) // 109 "avcall-armhf.c" 1 vldr.32 s10,[r4, $96] // 0 "" 2 .arm .syntax unified L(16): tst r3, $2048 beq L(17) // 111 "avcall-armhf.c" 1 vldr.32 s11,[r4, $100] // 0 "" 2 .arm .syntax unified L(17): tst r3, $4096 beq L(18) // 113 "avcall-armhf.c" 1 vldr.32 s12,[r4, $104] // 0 "" 2 .arm .syntax unified L(18): tst r3, $8192 beq L(19) // 115 "avcall-armhf.c" 1 vldr.32 s13,[r4, $108] // 0 "" 2 .arm .syntax unified L(19): tst r3, $16384 beq L(20) // 117 "avcall-armhf.c" 1 vldr.32 s14,[r4, $112] // 0 "" 2 .arm .syntax unified L(20): tst r3, $32768 beq L(21) // 119 "avcall-armhf.c" 1 vldr.32 s15,[r4, $116] // 0 "" 2 .arm .syntax unified L(21): ldr r3, [r4, $52] tst r3, $1 beq L(22) // 123 "avcall-armhf.c" 1 vldr.64 d0,[r4, $120] // 0 "" 2 .arm .syntax unified L(22): tst r3, $2 beq L(23) // 125 "avcall-armhf.c" 1 vldr.64 d1,[r4, $128] // 0 "" 2 .arm .syntax unified L(23): tst r3, $4 beq L(24) // 127 "avcall-armhf.c" 1 vldr.64 d2,[r4, $136] // 0 "" 2 .arm .syntax unified L(24): tst r3, $8 beq L(25) // 129 "avcall-armhf.c" 1 vldr.64 d3,[r4, $144] // 0 "" 2 .arm .syntax unified L(25): tst r3, $16 beq L(26) // 131 "avcall-armhf.c" 1 vldr.64 d4,[r4, $152] // 0 "" 2 .arm .syntax unified L(26): tst r3, $32 beq L(27) // 133 "avcall-armhf.c" 1 vldr.64 d5,[r4, $160] // 0 "" 2 .arm .syntax unified L(27): tst r3, $64 beq L(28) // 135 "avcall-armhf.c" 1 vldr.64 d6,[r4, $168] // 0 "" 2 .arm .syntax unified L(28): tst r3, $128 beq L(29) // 137 "avcall-armhf.c" 1 vldr.64 d7,[r4, $176] // 0 "" 2 .arm .syntax unified L(29): ldm ip, {r0, r1, r2, r3} ldr r5, [r4, $4] blx r5 ldrb r3, [r4, $12] // zero_extendqisi2 cmp r3, $1 beq L(30) cmp r3, $2 beq L(126) cmp r3, $3 beq L(126) cmp r3, $4 beq L(126) cmp r3, $5 beq L(128) cmp r3, $6 beq L(128) cmp r3, $7 beq L(129) cmp r3, $8 beq L(129) cmp r3, $9 beq L(129) cmp r3, $10 beq L(129) sub r2, r3, $11 cmp r2, $1 bls L(130) cmp r3, $13 beq L(132) cmp r3, $14 beq L(133) cmp r3, $15 beq L(129) cmp r3, $16 bne L(30) ldr r3, [r4] tst r3, $512 beq L(30) ldr r3, [r4, $16] cmp r3, $1 beq L(126) cmp r3, $2 beq L(128) cmp r3, $4 bls L(129) cmp r3, $8 bne L(30) L(130): ldr r3, [r4, $8] stm r3, {r0, r1} L(30): mov r0, $0 sub sp, fp, $12 // sp needed pop {r4, r5, fp, pc} L(126): ldr r3, [r4, $8] strb r0, [r3] mov r0, $0 sub sp, fp, $12 // sp needed pop {r4, r5, fp, pc} L(129): ldr r3, [r4, $8] str r0, [r3] mov r0, $0 sub sp, fp, $12 // sp needed pop {r4, r5, fp, pc} L(128): ldr r3, [r4, $8] strh r0, [r3] // movhi mov r0, $0 sub sp, fp, $12 // sp needed pop {r4, r5, fp, pc} L(132): ldr r3, [r4, $8] vstr.32 s0, [r3] b L(30) L(133): ldr r3, [r4, $8] vstr.64 d0, [r3] b L(30) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/avcall/avcall-m68k.motorola.S0000664000000000000000000000465414662622065015457 00000000000000#include "asm-m68k.h" .text .align 2 .globl C(avcall_call) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) link.w %a6,#0 movm.l #0x3820,-(%sp) move.l 8(%a6),%a2 lea (-1024,%sp),%sp move.l 24(%a2),%d1 move.l 20(%a2),%d0 sub.l %d1,%d0 asr.l #2,%d0 jble L(52) move.l %sp,%a1 move.l %d1,%a0 move.l %d0,%d2 .align 2 L(6): move.l (%a0)+,(%a1)+ subq.l #1,%d2 jbne L(6) L(52): moveq.l #16,%d0 cmp.l 12(%a2),%d0 jbeq L(57) L(7): move.l 4(%a2),%a0 jsr (%a0) move.l %d0,%d2 move.l %d1,%d3 move.l 12(%a2),%a1 moveq.l #1,%d1 cmp.l %a1,%d1 jbeq L(9) moveq.l #2,%d4 cmp.l %a1,%d4 jbeq L(56) moveq.l #3,%d4 cmp.l %a1,%d4 jbeq L(56) moveq.l #4,%d4 cmp.l %a1,%d4 jbeq L(56) moveq.l #5,%d4 cmp.l %a1,%d4 jbeq L(55) moveq.l #6,%d4 cmp.l %a1,%d4 jbeq L(55) moveq.l #7,%d4 cmp.l %a1,%d4 jbeq L(53) moveq.l #8,%d4 cmp.l %a1,%d4 jbeq L(53) moveq.l #9,%d4 cmp.l %a1,%d4 jbeq L(53) moveq.l #10,%d4 cmp.l %a1,%d4 jbeq L(53) lea (-11,%a1),%a0 moveq.l #1,%d4 cmp.l %a0,%d4 jbcc L(54) moveq.l #13,%d4 cmp.l %a1,%d4 jbeq L(58) moveq.l #14,%d4 cmp.l %a1,%d4 jbeq L(59) moveq.l #15,%d0 cmp.l %a1,%d0 jbeq L(53) moveq.l #16,%d1 cmp.l %a1,%d1 jbne L(9) btst #1,2(%a2) jbeq L(9) move.l 16(%a2),%d0 moveq.l #1,%d4 cmp.l %d0,%d4 jbeq L(56) moveq.l #2,%d1 cmp.l %d0,%d1 jbeq L(55) moveq.l #4,%d4 cmp.l %d0,%d4 jbeq L(53) moveq.l #8,%d1 cmp.l %d0,%d1 jbne L(9) L(54): move.l 8(%a2),%a0 move.l %d2,(%a0) move.l %d3,4(%a0) jbra L(9) .align 2 L(53): move.l 8(%a2),%a0 move.l %d2,(%a0) jbra L(9) .align 2 L(55): move.l 8(%a2),%a0 move.w %d2,(%a0) jbra L(9) .align 2 L(56): move.l 8(%a2),%a0 move.b %d2,(%a0) jbra L(9) .align 2 L(59): btst #6,3(%a2) jbeq L(37) move.l 8(%a2),%a0 fmove.d %fp0,(%a0) jbra L(9) .align 2 L(37): move.l 8(%a2),%a0 move.l %d0,(%a0) move.l %d1,4(%a0) jbra L(9) .align 2 L(58): move.l (%a2),%d2 btst #6,%d2 jbeq L(31) move.l 8(%a2),%a0 fmove.s %fp0,(%a0) jbra L(9) .align 2 L(31): btst #5,%d2 jbeq L(33) move.l 8(%a2),%a0 move.l %d1,-(%sp) move.l %d0,-(%sp) fmove.d (%sp)+,%fp0 fmove.s %fp0,(%a0) jbra L(9) .align 2 L(33): move.l 8(%a2),%a0 move.l %d0,(%a0) jbra L(9) .align 2 L(57): move.l 8(%a2),%a1 jbra L(7) .align 2 L(9): clr.l %d0 movm.l -16(%a6),#0x41c unlk %a6 rts L(fe1): FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-mipsn32.c0000664000000000000000000006044714662613003014344 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an SGI 32-bit MIPS III with "cc -n32", or gcc configured as mips-sgi-irix6. This calls a C function with an argument list built up using macros defined in avcall.h. SGI MIPS new 32-bit Argument Passing Conventions - The entire argument list forms a structure with all the appropriate holes & alignments, and space for this is allocated in the stack frame. - Shorter integers are promoted to long long length (sizeof(long long)=8). - Doubles are 1 longword. - Structure arguments are copies embedded in the arglist structure. - The first 8 longwords of the structure are passed in registers $4...$11, except that float arguments are passed in registers $f12...$f19, and that double arguments and structure elements of type double are passed in registers $f12...$f19. (But varargs functions may expect them in the integer registers and we can't tell whether the function is varargs so we pass them both ways.) Remaining longwords are passed on the stack. No stack space is allocated for the first 8 longwords of the structure. - Structure returns of structures > 16 bytes: pointers to caller-allocated space are passed in as the first argument of the list. - Structure returns of structures <= 16 bytes: in the registers $2 (for the first 8 bytes) and $3 (for the next 8 bytes). A structure of 1 or 2 floats or doubles is returned in $f0 and $f2: the first float or double in $f0, the second float or double in $f2. - Integer/pointer returns are in $2, float/double returns in $f0. - The called function expects to see its own address in $25. This file needs to be compiled with gcc for the asm extensions, but the assembly version of it and the header file seem to work with SGI cc. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) #define OFFSETOF(struct,member) ((int)&(((struct*)0)->member)) int avcall_call(av_alist* list) { register __avword* sp __asm__("$sp"); /* C names for registers */ register float fret __asm__("$f0"); register double dret __asm__("$f0"); /*register __avrword iret1 __asm__("$2"); */ register __avrword iret2 __asm__("$3"); __av_alist* l = &AV_LIST_INNER(list); __avword *argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* big space for child's stack frame */ int arglen = l->aptr - l->args; __avrword iret; int i; if (l->farg_mask) { /* push leading float args */ if (l->farg_mask & (1<<0)) __asm__("lwc1 $f12,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[0])); if (l->farg_mask & (1<<1)) __asm__("lwc1 $f13,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[1])); if (l->farg_mask & (1<<2)) __asm__("lwc1 $f14,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[2])); if (l->farg_mask & (1<<3)) __asm__("lwc1 $f15,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[3])); if (l->farg_mask & (1<<4)) __asm__("lwc1 $f16,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[4])); if (l->farg_mask & (1<<5)) __asm__("lwc1 $f17,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[5])); if (l->farg_mask & (1<<6)) __asm__("lwc1 $f18,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[6])); if (l->farg_mask & (1<<7)) __asm__("lwc1 $f19,%1(%0)" : : "p" (l), "i" OFFSETOF(__av_alist,fargs[7])); } if (l->darg_mask) { /* push leading double args */ __avword* a = l->args; if (l->darg_mask & (1<<0)) __asm__("ldc1 $f12,%1(%0)" : : "p" (a), "i" (0 * sizeof (__avword))); if (l->darg_mask & (1<<1)) __asm__("ldc1 $f13,%1(%0)" : : "p" (a), "i" (1 * sizeof (__avword))); if (l->darg_mask & (1<<2)) __asm__("ldc1 $f14,%1(%0)" : : "p" (a), "i" (2 * sizeof (__avword))); if (l->darg_mask & (1<<3)) __asm__("ldc1 $f15,%1(%0)" : : "p" (a), "i" (3 * sizeof (__avword))); if (l->darg_mask & (1<<4)) __asm__("ldc1 $f16,%1(%0)" : : "p" (a), "i" (4 * sizeof (__avword))); if (l->darg_mask & (1<<5)) __asm__("ldc1 $f17,%1(%0)" : : "p" (a), "i" (5 * sizeof (__avword))); if (l->darg_mask & (1<<6)) __asm__("ldc1 $f18,%1(%0)" : : "p" (a), "i" (6 * sizeof (__avword))); if (l->darg_mask & (1<<7)) __asm__("ldc1 $f19,%1(%0)" : : "p" (a), "i" (7 * sizeof (__avword))); } for (i = 8; i < arglen; i++) /* push excess function args */ argframe[i-8] = l->args[i]; /* call function with 1st 8 args */ __asm__ __volatile__ ("ld $4,%0" : : "m" (l->args[0]) : "$4"); /* arg1 = l->args[0]; */ __asm__ __volatile__ ("ld $5,%0" : : "m" (l->args[1]) : "$5"); /* arg1 = l->args[1]; */ __asm__ __volatile__ ("ld $6,%0" : : "m" (l->args[2]) : "$6"); /* arg1 = l->args[2]; */ __asm__ __volatile__ ("ld $7,%0" : : "m" (l->args[3]) : "$7"); /* arg1 = l->args[3]; */ __asm__ __volatile__ ("ld $8,%0" : : "m" (l->args[4]) : "$8"); /* arg1 = l->args[4]; */ __asm__ __volatile__ ("ld $9,%0" : : "m" (l->args[5]) : "$9"); /* arg1 = l->args[5]; */ __asm__ __volatile__ ("ld $10,%0" : : "m" (l->args[6]) : "$10"); /* arg1 = l->args[6]; */ __asm__ __volatile__ ("ld $11,%0" : : "m" (l->args[7]) : "$11"); /* arg1 = l->args[7]; */ /* Note: The code of this call ought to put the address of the called function in register $25 before the call. */ iret = (*l->func)(); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->flags & __AV_GCC_STRUCT_RETURN) { /* gcc returns structs of size 1,2,4,8 in registers. */ if (l->rsize == sizeof(char)) { RETURN(char, iret); } else if (l->rsize == sizeof(short)) { RETURN(short, iret); } else if (l->rsize == sizeof(int)) { RETURN(int, iret); } else if (l->rsize == sizeof(long long)) { RETURN(long long, iret); } } else { /* cc returns structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); #endif } else if (l->rsize == 2) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); #endif } else if (l->rsize == 3) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); #endif } else if (l->rsize == 4) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); #endif } else if (l->rsize == 5) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); #endif } else if (l->rsize == 6) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); #endif } else if (l->rsize == 7) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); #endif } else if (l->rsize >= 8 && l->rsize <= 16) { #if defined(_MIPSEL) ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); #else ((unsigned char *)raddr)[0] = (unsigned char)(iret>>56); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret); #endif if (l->rsize == 8) { } else if (l->rsize == 9) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); #endif } else if (l->rsize == 10) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); #endif } else if (l->rsize == 11) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); #endif } else if (l->rsize == 12) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); #endif } else if (l->rsize == 13) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); #endif } else if (l->rsize == 14) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); #endif } else if (l->rsize == 15) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); #endif } else if (l->rsize == 16) { #if defined(_MIPSEL) ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); #else ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2>>56); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2); #endif } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ #if defined(_MIPSEL) if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #else if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret >> (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] ^= (wordaddr[1] ^ ((iret << (sizeof(__avrword)*4-start_offset*4) << (sizeof(__avrword)*4-start_offset*4)) | (iret2 >> (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[1] = (iret << (sizeof(__avrword)*8-start_offset*8)) | (iret2 >> (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif #endif } } } } return 0; } libffcall-2.5/avcall/avcall-alpha.c0000664000000000000000000001407614662613003014133 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a DEC Alpha with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. Alpha Argument Passing Conventions The first 6 arguments are passed in registers $16-$21 for integers, in registers $f16-$f21 for floats. From then on, everything is passed on the stack. Everything on the stack is word-aligned. Integers and pointers are returned in $0, floats and doubles in $f0. To return a structure, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. Compile this routine with gcc for the __asm__ extensions and with optimisation on (-O or -O2 or -g -O) so that argframe is set to the correct offset. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) int avcall_call(av_alist* list) { register __avword* sp __asm__("$30"); /* C names for registers */ register long arg1 __asm__("$16"); register long arg2 __asm__("$17"); register long arg3 __asm__("$18"); register long arg4 __asm__("$19"); register long arg5 __asm__("$20"); register long arg6 __asm__("$21"); register double fret __asm__("$f0"); register double farg1 __asm__("$f16"); register double farg2 __asm__("$f17"); register double farg3 __asm__("$f18"); register double farg4 __asm__("$f19"); register double farg5 __asm__("$f20"); register double farg6 __asm__("$f21"); /*register __avrword iret __asm__("$0"); */ register __avrword iret2 __asm__("$1"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = ((unsigned long) l->aptr - (unsigned long) l->args) / sizeof (__avword); __avrword i, i2; for (i = 6; i < arglen; i++) /* push excess function args */ argframe[i-6] = l->args[i]; /* call function with 1st 6 args */ /* we pass the args both in the integer registers and the floating point registers, so we don't have to store the argument types. */ __asm__ __volatile__ ("ldq $16,%0" : : "m" (l->args[0])); /* arg1 = l->args[0]; */ __asm__ __volatile__ ("ldt $f16,%0" : : "m" (l->args[0])); /* farg1 = *(double*) &l->args[0]; */ __asm__ __volatile__ ("ldq $17,%0" : : "m" (l->args[1])); /* arg2 = l->args[1]; */ __asm__ __volatile__ ("ldt $f17,%0" : : "m" (l->args[1])); /* farg2 = *(double*) &l->args[1]; */ __asm__ __volatile__ ("ldq $18,%0" : : "m" (l->args[2])); /* arg3 = l->args[2]; */ __asm__ __volatile__ ("ldt $f18,%0" : : "m" (l->args[2])); /* farg3 = *(double*) &l->args[2]; */ __asm__ __volatile__ ("ldq $19,%0" : : "m" (l->args[3])); /* arg4 = l->args[3]; */ __asm__ __volatile__ ("ldt $f19,%0" : : "m" (l->args[3])); /* farg4 = *(double*) &l->args[3]; */ __asm__ __volatile__ ("ldq $20,%0" : : "m" (l->args[4])); /* arg5 = l->args[4]; */ __asm__ __volatile__ ("ldt $f20,%0" : : "m" (l->args[4])); /* farg5 = *(double*) &l->args[4]; */ __asm__ __volatile__ ("ldq $21,%0" : : "m" (l->args[5])); /* arg6 = l->args[5]; */ __asm__ __volatile__ ("ldt $f21,%0" : : "m" (l->args[5])); /* farg6 = *(double*) &l->args[5]; */ i = (*l->func)(); i2 = iret2; /* this is apparently not needed, but better safe than sorry... */ __asm__ __volatile__ ("" : : : /* clobber */ "$16", "$17", "$18", "$19", "$20", "$21", "$f16","$f17","$f18","$f19","$f20","$f21"); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong) { RETURN(long long, i); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, i); } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, fret); } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { RETURN(char, i); } else if (l->rsize == sizeof(short)) { RETURN(short, i); } else if (l->rsize == sizeof(int)) { RETURN(int, i); } else if (l->rsize == sizeof(long)) { RETURN(long, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = i2; } } } return 0; } libffcall-2.5/avcall/avcall-hppa-macro.S0000664000000000000000000001121714662622066015060 00000000000000#include "asm-hppa.h" .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 GLOBL(avcall_call) DECLARE_FUNCTION(avcall_call) DEF(avcall_call) .PROC .CALLINFO FRAME=128,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,128(%r30) stw %r5,8(%r3) ldo -48(%r30),%r24 ldo 15(%r24),%r21 copy %r19,%r5 stw %r4,12(%r3) copy %r21,%r24 depi 0,31,4,%r24 copy %r26,%r4 stw %r19,-32(%r30) ldo 1104(%r24),%r24 ldw 28(%r26),%r22 ldw 20(%r26),%r20 sub %r22,%r20,%r20 extrs %r20,29,30,%r25 sub %r0,%r25,%r23 comib,<= -4,%r23,L(57) ldo 1088(%r30),%r30 copy %r22,%r29 DEF(L(6)) zdep %r23,29,30,%r20 ldo 1(%r23),%r23 addl %r20,%r29,%r22 addl %r20,%r24,%r20 ldw 0(%r22),%r21 comib,> -4,%r23,L(6) stw %r21,0(%r20) DEF(L(56)) ldw 12(%r4),%r21 ldi 16,%r20 comb,=,n %r20,%r21,L(62) DEF(L(7)) comib,>=,n 0,%r25,L(8) ldw 48(%r4),%r21 extrs,>= %r21,31,1,%r0 fldws -4(%r29),%fr4L DEF(L(9)) comib,>=,n 1,%r25,L(8) extrs,>= %r21,30,1,%r0 fldws -8(%r29),%fr5L DEF(L(11)) ldw 52(%r4),%r22 ldi 2,%r20 and %r22,%r20,%r20 comiclr,= 0,%r20,%r0 fldds -8(%r29),%fr5 DEF(L(12)) comib,>=,n 2,%r25,L(8) extrs,>= %r21,29,1,%r0 fldws -12(%r29),%fr6L DEF(L(14)) comib,>=,n 3,%r25,L(8) extrs,>= %r21,28,1,%r0 fldws -16(%r29),%fr7L DEF(L(16)) ldi 8,%r20 and %r22,%r20,%r20 comiclr,= 0,%r20,%r0 fldds -16(%r29),%fr7 DEF(L(8)) ldw -16(%r29),%r23 ldw -4(%r29),%r26 ldw -8(%r29),%r25 ldw -12(%r29),%r24 ldw 4(%r4),%r22 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 12(%r4),%r21 copy %r5,%r19 comib,= 1,%r21,L(19) copy %r28,%r2 comib,=,n 2,%r21,L(60) comib,=,n 3,%r21,L(60) comib,=,n 4,%r21,L(60) comib,=,n 5,%r21,L(59) comib,=,n 6,%r21,L(59) comib,=,n 7,%r21,L(61) comib,=,n 8,%r21,L(61) comib,=,n 9,%r21,L(61) comib,=,n 10,%r21,L(61) ldo -11(%r21),%r20 comib,<<,n 1,%r20,L(38) ldw 8(%r4),%r20 stw %r29,4(%r20) DEF(L(58)) stw %r2,0(%r20) DEF(L(19)) ldw -20(%r3),%r2 DEF(L(65)) ldi 0,%r28 ldw 8(%r3),%r5 ldw 12(%r3),%r4 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 DEF(L(38)) comib,=,n 13,%r21,L(63) comib,=,n 14,%r21,L(64) comib,=,n 15,%r21,L(61) ldi 16,%r20 comb,<>,n %r20,%r21,L(65) ldw -20(%r3),%r2 ldw 0(%r4),%r20 bb,>=,n %r20,30,L(65) ldw -20(%r3),%r2 ldw 16(%r4),%r22 ldo -1(%r22),%r20 comib,<<,n 7,%r20,L(65) ldw -20(%r3),%r2 ldw 8(%r4),%r20 extru %r20,31,2,%r26 copy %r20,%r4 depi 0,31,2,%r4 comib,<< 4,%r22,L(49) addl %r26,%r22,%r21 comib,<< 4,%r21,L(50) zdep %r21,28,29,%r20 ldo -1(%r20),%r25 zdep %r26,28,29,%r21 mtsar %r25 ldw 0(%r4),%r23 zvdep %r28,32,%r20 mtsar %r21 zvdepi 2,32,%r21 xor %r23,%r20,%r20 mtsar %r25 zvdepi 1,32,%r22 sub %r21,%r22,%r21 and %r20,%r21,%r20 xor %r23,%r20,%r23 b L(19) stw %r23,0(%r4) DEF(L(50)) subi 63,%r20,%r31 zdep %r26,28,29,%r26 ldo -33(%r20),%r20 ldw 0(%r4),%r25 mtsar %r20 ldw 4(%r4),%r24 zvdep %r28,32,%r23 mtsar %r26 zvdepi 2,32,%r22 xor %r24,%r23,%r23 mtsar %r31 ldo -1(%r22),%r22 vextrs %r28,32,%r21 mtsar %r20 zvdepi 1,32,%r20 xor %r25,%r21,%r21 sub %r0,%r20,%r20 and %r21,%r22,%r21 and %r23,%r20,%r23 xor %r25,%r21,%r25 xor %r24,%r23,%r24 stw %r25,0(%r4) b L(19) stw %r24,4(%r4) DEF(L(49)) zdep %r26,28,29,%r26 mtsar %r26 zvdepi 2,32,%r20 comib,<< 8,%r21,L(53) ldo -1(%r20),%r25 zdep %r21,29,30,%r20 subi 47,%r20,%r24 zdep %r21,28,29,%r21 mtsar %r24 ldo -33(%r21),%r26 vextrs %r29,32,%r22 vextrs %r22,32,%r22 mtsar %r26 ldw 0(%r4),%r24 ldw 4(%r4),%r23 zvdep %r28,32,%r20 or %r20,%r22,%r20 zvdep %r29,32,%r29 zvdepi 1,32,%r21 xor %r24,%r20,%r20 xor %r23,%r29,%r29 sub %r0,%r21,%r21 and %r20,%r25,%r20 and %r29,%r21,%r29 xor %r24,%r20,%r24 xor %r23,%r29,%r23 stw %r24,0(%r4) b L(19) stw %r23,4(%r4) DEF(L(53)) zdep %r21,28,29,%r20 ldo -65(%r20),%r31 subi 95,%r20,%r26 ldw 8(%r4),%r23 mtsar %r31 ldw 0(%r4),%r24 zvdep %r29,32,%r22 zvdepi 1,32,%r21 xor %r23,%r22,%r22 mtsar %r26 sub %r0,%r21,%r21 vextrs %r28,32,%r20 and %r22,%r21,%r22 mtsar %r31 xor %r24,%r20,%r20 zvdep %r28,32,%r21 and %r20,%r25,%r20 mtsar %r26 xor %r24,%r20,%r24 vextrs %r29,32,%r29 xor %r23,%r22,%r23 or %r21,%r29,%r21 stw %r23,8(%r4) stw %r24,0(%r4) b L(19) stw %r21,4(%r4) DEF(L(61)) b L(58) ldw 8(%r4),%r20 DEF(L(64)) ldw 8(%r4),%r20 b L(19) fstds %fr4,0(%r20) DEF(L(63)) ldw 8(%r4),%r20 b L(19) fstws %fr4L,0(%r20) DEF(L(59)) ldw 8(%r4),%r20 b L(19) sth %r2,0(%r20) DEF(L(60)) ldw 8(%r4),%r20 b L(19) stb %r2,0(%r20) DEF(L(62)) b L(7) ldw 8(%r4),%r28 DEF(L(57)) b L(56) ldw 28(%r26),%r29 .EXIT .PROCEND DEF(L(fe1)) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-mipsn32el-macro.S0000664000000000000000000002024414662622065015743 00000000000000#include "asm-mips.h" .file 1 "avcall-mipsn32.c" .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,32,$31 .mask 0xd0010000,-8 .fmask 0x00000000,0 lw $5,20($4) lw $12,24($4) lw $2,36($4) addiu $sp,$sp,-32 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp move $16,$4 addiu $sp,$sp,-2064 subu $4,$5,$12 move $3,$sp .set noreorder .set nomacro beq $2,$0,.L2 sra $4,$4,3 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L124 andi $6,$2,0x2 .set macro .set reorder lwc1 $f12,44($16) andi $6,$2,0x2 .L124: .set noreorder .set nomacro beq $6,$0,.L125 andi $6,$2,0x4 .set macro .set reorder lwc1 $f13,48($16) andi $6,$2,0x4 .L125: .set noreorder .set nomacro beq $6,$0,.L126 andi $6,$2,0x8 .set macro .set reorder lwc1 $f14,52($16) andi $6,$2,0x8 .L126: .set noreorder .set nomacro beq $6,$0,.L127 andi $6,$2,0x10 .set macro .set reorder lwc1 $f15,56($16) andi $6,$2,0x10 .L127: .set noreorder .set nomacro beq $6,$0,.L128 andi $6,$2,0x20 .set macro .set reorder lwc1 $f16,60($16) andi $6,$2,0x20 .L128: .set noreorder .set nomacro beq $6,$0,.L129 andi $6,$2,0x40 .set macro .set reorder lwc1 $f17,64($16) andi $6,$2,0x40 .L129: .set noreorder .set nomacro beql $6,$0,.L130 andi $2,$2,0x80 .set macro .set reorder lwc1 $f18,68($16) andi $2,$2,0x80 .L130: bne $2,$0,.L117 .L2: lw $2,40($16) .L123: .set noreorder .set nomacro beql $2,$0,.L122 slt $4,$4,9 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L131 andi $6,$2,0x2 .set macro .set reorder ldc1 $f12,0($12) andi $6,$2,0x2 .L131: .set noreorder .set nomacro beq $6,$0,.L132 andi $6,$2,0x4 .set macro .set reorder ldc1 $f13,8($12) andi $6,$2,0x4 .L132: .set noreorder .set nomacro beq $6,$0,.L133 andi $6,$2,0x8 .set macro .set reorder ldc1 $f14,16($12) andi $6,$2,0x8 .L133: .set noreorder .set nomacro beq $6,$0,.L134 andi $6,$2,0x10 .set macro .set reorder ldc1 $f15,24($12) andi $6,$2,0x10 .L134: .set noreorder .set nomacro beq $6,$0,.L135 andi $6,$2,0x20 .set macro .set reorder ldc1 $f16,32($12) andi $6,$2,0x20 .L135: .set noreorder .set nomacro beq $6,$0,.L136 andi $6,$2,0x40 .set macro .set reorder ldc1 $f17,40($12) andi $6,$2,0x40 .L136: .set noreorder .set nomacro beql $6,$0,.L137 andi $2,$2,0x80 .set macro .set reorder ldc1 $f18,48($12) andi $2,$2,0x80 .L137: bne $2,$0,.L118 slt $4,$4,9 .L122: .set noreorder .set nomacro bne $4,$0,.L22 addiu $2,$12,64 .set macro .set reorder .align 3 .L82: ld $4,0($2) addiu $3,$3,8 addiu $2,$2,8 .set noreorder .set nomacro bne $5,$2,.L82 sd $4,-8($3) .set macro .set reorder .L22: ld $4,0($12) ld $5,8($12) ld $6,16($12) ld $7,24($12) ld $8,32($12) ld $9,40($12) ld $10,48($12) ld $11,56($12) lw $25,4($16) jalr $25 lw $4,12($16) li $5,1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,11 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L120 li $5,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L138 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 lw $5,16($16) .set macro .set reorder lw $3,16($16) li $4,1 .set noreorder .set nomacro beq $3,$4,.L107 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L109 li $4,4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L110 li $4,8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L139 lw $3,8($16) .set macro .set reorder .L19: move $sp,$fp .L138: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L118: ldc1 $f19,56($12) .set noreorder .set nomacro b .L122 slt $4,$4,9 .set macro .set reorder .align 3 .L117: lwc1 $f19,72($16) .set noreorder .set nomacro b .L123 lw $2,40($16) .set macro .set reorder .align 3 .L107: lw $3,8($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L110: lw $3,8($16) sw $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: lw $3,8($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .L120: lw $2,8($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L115: lw $3,8($16) .L139: .set noreorder .set nomacro b .L19 sd $2,0($3) .set macro .set reorder .L119: lw $2,8($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: addiu $4,$5,-1 sltu $4,$4,16 .set noreorder .set nomacro beq $4,$0,.L19 sltu $7,$5,9 .set macro .set reorder lw $6,8($16) li $8,-8 andi $4,$6,0x7 addu $5,$5,$4 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$5,9 .set noreorder .set nomacro beql $3,$0,.L42 ld $10,0($6) .set macro .set reorder sll $5,$5,3 ld $7,0($6) li $3,2 addiu $5,$5,-1 sll $4,$4,3 dsll $5,$3,$5 li $3,1 dsll $3,$3,$4 dsll $4,$2,$4 dsubu $3,$5,$3 xor $2,$4,$7 and $2,$3,$2 xor $2,$2,$7 .set noreorder .set nomacro b .L19 sd $2,0($6) .set macro .set reorder .L41: ld $10,0($6) sll $9,$4,3 dsll $7,$2,$9 li $8,-1 dsll $8,$8,$9 xor $7,$7,$10 and $7,$8,$7 xor $7,$7,$10 sltu $8,$5,17 .set noreorder .set nomacro bne $8,$0,.L121 sd $7,0($6) .set macro .set reorder subu $4,$0,$4 ld $10,16($6) sll $4,$4,3 sll $5,$5,3 addiu $4,$4,64 addiu $5,$5,-129 li $7,2 move $8,$3 dsll $5,$7,$5 dsra $3,$3,$4 daddiu $5,$5,-1 xor $3,$3,$10 dsra $2,$2,$4 dsll $8,$8,$9 and $3,$5,$3 or $2,$2,$8 xor $3,$3,$10 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $9,8($6) sll $3,$5,3 subu $5,$0,$4 addiu $8,$3,-65 sll $4,$4,3 sll $5,$5,3 li $3,2 dsll $7,$2,$4 dsll $3,$3,$8 dsra $2,$2,$5 li $5,-1 dsll $4,$5,$4 daddiu $3,$3,-1 xor $5,$7,$10 xor $2,$2,$9 and $2,$3,$2 and $4,$4,$5 xor $3,$4,$10 xor $2,$2,$9 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L121: subu $7,$0,$4 sll $7,$7,2 addiu $7,$7,32 ld $10,8($6) dsra $4,$2,$7 move $8,$3 sll $3,$5,3 addiu $3,$3,-65 dsra $5,$4,$7 dsll $2,$8,$9 li $4,2 dsll $3,$4,$3 or $2,$5,$2 daddiu $3,$3,-1 xor $2,$2,$10 and $2,$3,$2 xor $2,$2,$10 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-powerpc-linux.s0000664000000000000000000000624714662622066015714 00000000000000 .file "avcall-powerpc.c" .section ".text" .align 2 .globl avcall_call .type avcall_call, @function avcall_call: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-1056(1) mflr 0 li 11,0 stw 0,1060(1) addi 8,1,8 stw 30,1048(1) mr 30,3 lwz 0,20(3) lwz 10,24(3) stw 31,1052(1) mr 31,1 subfc 0,10,0 srawi 0,0,2 cmpw 0,11,0 bge- 0,.L71 mtctr 0 .L72: slwi 9,11,2 addi 11,11,1 lwzx 0,9,10 stwx 0,9,8 bdnz .L72 .L71: lwz 9,76(30) subfc 9,30,9 addi 9,9,-80 srawi. 9,9,3 beq- 0,.L8 cmpwi 0,9,1 beq- 0,.L11 cmpwi 0,9,2 beq- 0,.L14 cmpwi 0,9,3 beq- 0,.L17 cmpwi 0,9,4 beq- 0,.L20 cmpwi 0,9,5 beq- 0,.L23 cmpwi 0,9,6 beq- 0,.L26 cmpwi 0,9,7 beq- 0,.L29 .L32: lfd 8,136(30) .L29: lfd 7,128(30) .L26: lfd 6,120(30) .L23: lfd 5,112(30) .L20: lfd 4,104(30) .L17: lfd 3,96(30) .L14: lfd 2,88(30) .L11: lfd 1,80(30) .L8: lwz 0,4(30) lwz 9,68(30) lwz 3,44(30) mtctr 0 lwz 4,48(30) lwz 5,52(30) lwz 6,56(30) lwz 7,60(30) lwz 8,64(30) lwz 10,72(30) crxor 6,6,6 bctrl lwz 9,12(30) cmpwi 0,9,1 beq- 0,.L34 cmpwi 0,9,2 beq- 0,.L75 cmpwi 0,9,3 beq- 0,.L75 cmpwi 0,9,4 beq- 0,.L75 cmpwi 0,9,5 beq- 0,.L74 cmpwi 0,9,6 beq- 0,.L74 cmpwi 0,9,7 beq- 0,.L76 cmpwi 0,9,8 beq- 0,.L76 cmpwi 0,9,9 beq- 0,.L76 cmpwi 0,9,10 beq- 0,.L76 addi 0,9,-11 cmplwi 0,0,1 bgt- 0,.L53 lwz 9,8(30) stw 4,4(9) .L73: stw 3,0(9) .L34: lwz 11,0(1) li 3,0 lwz 0,4(11) lwz 30,-8(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L53: cmpwi 0,9,13 beq- 0,.L77 cmpwi 0,9,14 beq- 0,.L78 cmpwi 0,9,15 beq- 0,.L76 cmpwi 0,9,16 bne+ 0,.L34 lwz 0,0(30) andi. 9,0,512 beq- 0,.L34 lwz 8,16(30) addi 0,8,-1 cmplwi 0,0,7 bgt- 0,.L34 lwz 0,8(30) cmplwi 0,8,4 rlwinm 9,0,0,30,31 rlwinm 5,0,0,0,29 add 8,9,8 bgt- 0,.L64 cmplwi 0,8,4 bgt- 0,.L65 slwi 0,9,3 slwi 10,8,3 subfic 0,0,31 li 11,2 lwz 8,0(5) subfic 10,10,32 slw 11,11,0 slw 9,3,10 li 0,1 xor 9,8,9 slw 0,0,10 subfc 11,0,11 and 9,9,11 xor 8,8,9 stw 8,0(5) b .L34 .L65: slwi 8,8,3 slwi 9,9,3 lwz 6,0(5) subfic 9,9,31 lwz 7,4(5) addi 0,8,-32 li 11,2 subfic 8,8,64 slw 11,11,9 slw 10,3,8 sraw 0,3,0 li 9,-1 xor 0,6,0 xor 10,7,10 addi 11,11,-1 slw 9,9,8 and 0,0,11 and 10,10,9 xor 6,6,0 xor 7,7,10 stw 7,4(5) stw 6,0(5) b .L34 .L64: slwi 0,9,3 cmplwi 0,8,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 12,9,-1 bgt- 0,.L68 slwi 9,8,2 slwi 10,8,3 addi 9,9,-16 subfic 10,10,64 sraw 11,4,9 lwz 8,0(5) lwz 7,4(5) sraw 11,11,9 slw 0,3,10 slw 4,4,10 or 0,0,11 li 9,-1 xor 0,8,0 xor 4,7,4 slw 9,9,10 and 0,0,12 and 4,4,9 xor 8,8,0 xor 7,7,4 stw 8,0(5) stw 7,4(5) b .L34 .L68: slwi 9,8,3 lwz 7,0(5) addi 6,9,-64 lwz 8,8(5) subfic 9,9,96 sraw 11,3,6 slw 10,4,9 li 0,-1 slw 0,0,9 xor 11,7,11 xor 10,8,10 and 11,11,12 and 10,10,0 slw 9,3,9 sraw 4,4,6 xor 7,7,11 or 9,9,4 xor 8,8,10 stw 8,8(5) stw 7,0(5) stw 9,4(5) b .L34 .L76: lwz 9,8(30) b .L73 .L78: lwz 9,8(30) stfd 1,0(9) b .L34 .L77: frsp 0,1 lwz 9,8(30) stfs 0,0(9) b .L34 .L74: lwz 9,8(30) sth 3,0(9) b .L34 .L75: lwz 9,8(30) stb 3,0(9) b .L34 .size avcall_call, .-avcall_call .section .note.GNU-stack,"",@progbits .ident "GCC: (GNU) 3.3.6" libffcall-2.5/avcall/avcall-riscv64-lp64d-macro.S0000664000000000000000000001030114662622067016351 00000000000000 .file "avcall-riscv64.c" .option pic .text .align 1 .globl avcall_call .type avcall_call, @function avcall_call: add sp,sp,-64 sd s0,48(sp) sd s1,40(sp) sd ra,56(sp) sd s2,32(sp) sd s3,24(sp) sd s4,16(sp) sd s5,8(sp) sd s6,0(sp) add s0,sp,64 ld t6,48(a0) ld t3,40(a0) li t1,-4096 add t1,t1,2032 sub t3,t3,t6 sra t3,t3,3 sext.w t0,t3 li t4,8 mv s1,a0 add sp,sp,t1 lw t2,64(a0) ble t0,t4,.L2 addw t3,t3,-9 sll t3,t3,32 srl t3,t3,29 mv t1,sp add t3,t3,8 add t4,t6,64 add t3,t1,t3 .L3: ld t5,0(t4) add t1,t1,8 add t4,t4,8 sd t5,-8(t1) bne t3,t1,.L3 .L4: li t1,1 ld a0,0(t6) beq t0,t1,.L5 li t1,2 ld a1,8(t6) beq t0,t1,.L5 li t1,3 ld a2,16(t6) beq t0,t1,.L5 li t1,4 ld a3,24(t6) beq t0,t1,.L5 li t1,5 ld a4,32(t6) beq t0,t1,.L5 li t1,6 ld a5,40(t6) beq t0,t1,.L5 li t1,7 ld a6,48(t6) beq t0,t1,.L5 ld a7,56(t6) .L5: beqz t2,.L8 lw t1,72(s1) and t3,t1,1 beqz t3,.L9 fld fa0,112(s1) .L10: li t3,1 bleu t2,t3,.L8 and t3,t1,2 bnez t3,.L77 lw t3,68(s1) and t3,t3,2 beqz t3,.L13 flw fa1,80(s1) .L13: li t3,2 beq t2,t3,.L8 and t3,t1,4 beqz t3,.L14 fld fa2,128(s1) .L15: li t3,3 beq t2,t3,.L8 and t3,t1,8 bnez t3,.L78 lw t3,68(s1) and t3,t3,8 beqz t3,.L17 flw fa3,88(s1) .L17: li t3,4 beq t2,t3,.L8 and t3,t1,16 beqz t3,.L18 fld fa4,144(s1) .L19: li t3,5 beq t2,t3,.L8 and t3,t1,32 beqz t3,.L20 fld fa5,152(s1) .L21: li t3,6 beq t2,t3,.L8 and t3,t1,64 beqz t3,.L22 fld fa6,160(s1) .L23: li t3,7 beq t2,t3,.L8 and t1,t1,128 beqz t1,.L24 fld fa7,168(s1) .L8: lw t1,24(s1) li t3,13 ld t4,8(s1) bne t1,t3,.L25 ld s1,16(s1) jalr t4 fsw fa0,0(s1) .L26: add sp,s0,-64 ld ra,56(sp) li a0,0 ld s0,48(sp) ld s1,40(sp) ld s2,32(sp) ld s3,24(sp) ld s4,16(sp) ld s5,8(sp) ld s6,0(sp) add sp,sp,64 jr ra .L9: lw t3,68(s1) and t3,t3,1 beqz t3,.L10 flw fa0,76(s1) j .L10 .L25: li t3,14 beq t1,t3,.L79 jalr t4 lw t1,24(s1) li t4,1 mv t3,a0 beq t1,t4,.L26 li t4,2 beq t1,t4,.L71 li t4,3 beq t1,t4,.L71 li t4,4 beq t1,t4,.L71 li t4,5 beq t1,t4,.L72 li t4,6 beq t1,t4,.L72 li t4,7 beq t1,t4,.L73 li t4,8 beq t1,t4,.L73 and t4,t1,-3 li t6,9 beq t4,t6,.L75 addw t4,t1,-10 and t4,t4,-3 sext.w t4,t4 beqz t4,.L75 li t6,15 beq t1,t6,.L75 li t4,16 bne t1,t4,.L26 lw t4,0(s1) and t4,t4,512 beqz t4,.L26 ld s6,32(s1) add t4,s6,-1 bgtu t4,t6,.L26 ld t6,16(s1) li t4,1 li s4,8 and s1,t6,7 and t6,t6,-8 sext.w s3,s1 ld t0,0(t6) sll s5,s3,3 add s1,s6,s1 sll t2,a0,s5 sll t4,t4,s5 xor t2,t2,t0 sllw s2,s1,3 bgtu s6,s4,.L38 bgtu s1,s4,.L39 addw s2,s2,-1 li t1,2 sll t1,t1,s2 sub t1,t1,t4 and t1,t1,t2 xor t1,t1,t0 sd t1,0(t6) j .L26 .L77: fld fa1,120(s1) j .L13 .L79: ld s1,16(s1) jalr t4 fsd fa0,0(s1) j .L26 .L71: ld t1,16(s1) sb t3,0(t1) j .L26 .L2: blez t0,.L5 j .L4 .L14: lw t3,68(s1) and t3,t3,4 beqz t3,.L15 flw fa2,84(s1) j .L15 .L78: fld fa3,136(s1) j .L17 .L72: ld t1,16(s1) sh t3,0(t1) j .L26 .L18: lw t3,68(s1) and t3,t3,16 beqz t3,.L19 flw fa4,92(s1) j .L19 .L73: ld t1,16(s1) sw t3,0(t1) j .L26 .L20: lw t3,68(s1) and t3,t3,32 beqz t3,.L21 flw fa5,96(s1) j .L21 .L75: ld t1,16(s1) sd t3,0(t1) j .L26 .L22: lw t3,68(s1) and t3,t3,64 beqz t3,.L23 flw fa6,100(s1) j .L23 .L24: lw t1,68(s1) and t1,t1,128 beqz t1,.L8 flw fa7,104(s1) j .L8 .L39: li t1,-8 mulw t1,t1,s3 ld s1,8(t6) addw s2,s2,-65 li t5,2 sll t5,t5,s2 sub t4,zero,t4 add t5,t5,-1 and t4,t4,t2 xor t4,t4,t0 sd t4,0(t6) sra t1,a0,t1 xor t1,t1,s1 and t1,t1,t5 xor t1,t1,s1 sd t1,8(t6) j .L26 .L38: sub t4,zero,t4 and t4,t4,t2 xor t4,t4,t0 sd t4,0(t6) sll t2,a1,s5 bleu s1,t1,.L80 li t1,-8 mulw t1,t1,s3 ld s1,16(t6) addw t4,s2,-129 li t0,2 sll t0,t0,t4 add t0,t0,-1 addw t1,t1,64 sra t4,a1,t1 xor t4,t4,s1 sra t1,a0,t1 and t3,t0,t4 or t1,t1,t2 xor t3,t3,s1 sd t1,8(t6) sd t3,16(t6) j .L26 .L80: li t1,-4 mulw t1,t1,s3 addw t4,s2,-65 li t5,2 sll t5,t5,t4 ld t0,8(t6) add t5,t5,-1 addw t4,t1,32 sra t1,a0,t4 sra t1,t1,t4 or t1,t1,t2 xor t1,t1,t0 and t1,t1,t5 xor t1,t1,t0 sd t1,8(t6) j .L26 .size avcall_call, .-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-i386-linux.s0000664000000000000000000000375214662622065014723 00000000000000 .file "avcall-i386.c" .text .align 2 .p2align 2,,3 .globl avcall_call .type avcall_call,@function avcall_call: pushl %ebp movl %esp, %ebp pushl %edi pushl %esi movl 8(%ebp), %eax movl 20(%eax), %edx movl 24(%eax), %eax subl %eax, %edx sarl $2, %edx xorl %esi, %esi subl $1024, %esp cmpl %edx, %esi movl %esp, %edi jge .L45 movl %eax, %ecx .p2align 2,,3 .L6: movl (%ecx,%esi,4), %eax movl %eax, (%edi,%esi,4) incl %esi cmpl %edx, %esi jl .L6 .L45: movl 8(%ebp), %edx movl 12(%edx), %eax cmpl $13, %eax je .L55 cmpl $14, %eax je .L56 movl 8(%ebp), %ecx call *4(%ecx) movl %eax, %esi movl 8(%ebp), %eax movl 12(%eax), %ecx cmpl $1, %ecx je .L8 cmpl $2, %ecx je .L57 cmpl $3, %ecx je .L53 cmpl $4, %ecx je .L53 cmpl $5, %ecx je .L54 cmpl $6, %ecx je .L58 cmpl $7, %ecx je .L52 cmpl $8, %ecx je .L46 cmpl $9, %ecx je .L52 cmpl $10, %ecx je .L46 leal -11(%ecx), %eax cmpl $1, %eax jbe .L47 cmpl $15, %ecx je .L46 cmpl $16, %ecx je .L59 .p2align 2,,3 .L8: leal -8(%ebp), %esp popl %esi xorl %eax, %eax popl %edi leave ret .L59: movl 8(%ebp), %ecx testb $2, 1(%ecx) je .L8 movl 16(%ecx), %eax cmpl $1, %eax je .L50 cmpl $2, %eax je .L54 cmpl $4, %eax je .L46 cmpl $8, %eax jne .L8 .L47: movl 8(%ebp), %ecx movl 8(%ecx), %eax movl %esi, (%eax) movl %edx, 4(%eax) jmp .L8 .L46: movl 8(%ebp), %edx movl 8(%edx), %eax .L48: movl %esi, (%eax) jmp .L8 .L54: movl 8(%ebp), %ecx movl 8(%ecx), %eax .L49: movw %si, (%eax) jmp .L8 .L50: movl 8(%ecx), %eax .L51: movl %esi, %edx movb %dl, (%eax) jmp .L8 .L52: movl 8(%ebp), %ecx movl 8(%ecx), %eax jmp .L48 .L58: movl 8(%ebp), %edx movl 8(%edx), %eax jmp .L49 .L53: movl 8(%ebp), %ecx jmp .L50 .L57: movl 8(%eax), %eax jmp .L51 .L56: movl 8(%ebp), %eax call *4(%eax) movl 8(%ebp), %edx movl 8(%edx), %eax fstpl (%eax) jmp .L8 .L55: call *4(%edx) movl 8(%ebp), %ecx movl 8(%ecx), %eax fstps (%eax) jmp .L8 .Lfe1: .size avcall_call,.Lfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/avcall-ia64-linux.s0000664000000000000000000003375314662703327015002 00000000000000 .file "avcall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .global avcall_call# .proc avcall_call# avcall_call: .prologue 14, 34 .mmi .save ar.pfs, r35 alloc r35 = ar.pfs, 1, 6, 8, 0 adds r14 = 40, r32 adds r20 = 48, r32 .mmi adds r16 = 64, r32 .vframe r36 mov r36 = r12 adds r21 = 72, r32 ;; .mmb ld8 r15 = [r14] ld8 r17 = [r20] nop 0 .mii adds r12 = -2064, r12 .save ar.lc, r38 mov r38 = ar.lc mov r37 = r1 ;; .mmb sub r15 = r15, r17 ld8 r14 = [r16] nop 0 .mii adds r19 = 16, r12 .save rp, r34 mov r34 = b0 .body ;; shr.u r15 = r15, 3 .mmi sub r14 = r14, r21 ;; nop 0 shr.u r18 = r14, 3 .mmb nop 0 cmp4.ge p6, p7 = 8, r15 (p6) br.cond.dptk .L2 .mii sub r14 = 8, r15 addl r16 = 8, r0 ;; andcm r14 = -1, r14 ;; .mii nop 0 addp4 r14 = r14, r0 ;; mov ar.lc = r14 .L4: .mii nop 0 sxt4 r14 = r16 adds r16 = 1, r16 ;; .mmi shladd r14 = r14, 3, r0 ;; add r15 = r17, r14 add r14 = r19, r14 ;; .mmb adds r14 = -64, r14 ld8 r15 = [r15] nop 0 ;; .mfb st8 [r14] = r15 nop 0 br.cloop.sptk.few .L4 .L2: .mmi adds r33 = 24, r32 ;; ld4 r15 = [r33] nop 0 ;; .mii nop 0 cmp4.ne p6, p7 = 16, r15 ;; (p7) adds r14 = 16, r32 ;; .mfi (p7) ld8 r8 = [r14] nop 0 cmp4.ge p6, p7 = 0, r18 .mfb adds r14 = 80, r32 nop 0 (p6) br.cond.dpnt .L7 ;; .mmb nop 0 cmp4.ge p6, p7 = 1, r18 nop 0 .mfb ldfd f8 = [r21] nop 0 (p6) br.cond.dpnt .L7 ;; .mmb nop 0 cmp4.ge p6, p7 = 2, r18 nop 0 .mfb ldfd f9 = [r14] nop 0 (p7) br.cond.dptk .L68 ;; .L7: .mib nop 0 cmp4.ne p6, p7 = 13, r15 (p7) br.cond.dpnt .L69 ;; .L16: .mib cmp4.ne p6, p7 = 14, r15 adds r15 = 8, r32 (p7) br.cond.dpnt .L70 .mmb nop 0 ld8 r14 = [r20] nop 0 ;; .mmi ld8 r15 = [r15] adds r16 = 8, r14 adds r17 = 16, r14 .mmi adds r18 = 24, r14 adds r19 = 32, r14 adds r20 = 40, r14 .mmi nop 0 adds r21 = 48, r14 adds r22 = 56, r14 .mmi ld8 r39 = [r14] ;; ld8 r14 = [r15], 8 nop 0 .mii ld8 r40 = [r16] nop 0 ;; mov b6 = r14 .mmb ld8 r1 = [r15] ld8 r41 = [r17] nop 0 .mmb ld8 r42 = [r18] ld8 r43 = [r19] nop 0 .mmb ld8 r44 = [r20] ld8 r45 = [r21] nop 0 .mbb ld8 r46 = [r22] nop 0 br.call.sptk.many b0 = b6 ;; .mmi mov r1 = r37 ld4 r14 = [r33] mov r28 = r8 ;; .mfb cmp4.eq p6, p7 = 1, r14 nop 0 (p6) br.cond.dpnt .L18 ;; .mfb cmp4.ne p6, p7 = 2, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 3, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 4, r14 nop 0 (p7) br.cond.dpnt .L62 ;; .mfb cmp4.ne p6, p7 = 5, r14 nop 0 (p7) br.cond.dpnt .L63 ;; .mfb cmp4.ne p6, p7 = 6, r14 nop 0 (p7) br.cond.dpnt .L63 ;; .mfb cmp4.ne p6, p7 = 7, r14 nop 0 (p7) br.cond.dpnt .L64 ;; .mfb cmp4.ne p6, p7 = 8, r14 nop 0 (p7) br.cond.dpnt .L64 ;; .mii nop 0 cmp4.ne p6, p7 = 9, r14 ;; nop 0 .mfb cmp4.ne.and.orcm p6, p7 = 11, r14 nop 0 (p7) br.cond.dptk .L66 ;; .mii nop 0 cmp4.ne p6, p7 = 10, r14 ;; nop 0 .mfb cmp4.ne.and.orcm p6, p7 = 12, r14 nop 0 (p7) br.cond.dptk .L66 ;; .mfb cmp4.ne p6, p7 = 15, r14 nop 0 (p7) br.cond.dpnt .L66 ;; .mib nop 0 cmp4.ne p6, p7 = 16, r14 (p6) br.cond.dptk .L18 .mmi ld4 r14 = [r32] ;; nop 0 tbit.z p6, p7 = r14, 9 .mfb adds r14 = 32, r32 nop 0 (p6) br.cond.dpnt .L18 ;; .mmi ld8 r19 = [r14] ;; adds r14 = -1, r19 nop 0 ;; .mib cmp.ltu p6, p7 = 31, r14 adds r14 = 16, r32 (p6) br.cond.dpnt .L18 ;; .mii ld8 r14 = [r14] cmp.ltu p6, p7 = 8, r19 ;; and r17 = 7, r14 .mii nop 0 and r27 = -8, r14 ;; nop 0 .mfb add r23 = r19, r17 nop 0 (p6) br.cond.dptk .L45 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r23 (p6) br.cond.dptk .L47 .mmi shladd r15 = r23, 3, r0 addl r14 = 2, r0 shladd r18 = r17, 3, r0 .mmi ld8 r17 = [r27] ;; adds r15 = -1, r15 nop 0 ;; .mii nop 0 sxt4 r15 = r15 ;; shl r14 = r14, r15 .mii addl r15 = 1, r0 shl r16 = r8, r18 ;; shl r15 = r15, r18 .mii nop 0 xor r16 = r16, r17 ;; sub r14 = r14, r15 ;; .mmi and r14 = r16, r14 ;; xor r17 = r14, r17 nop 0 ;; .mfb st8 [r27] = r17 nop 0 nop 0 .L18: .mfi mov r8 = r0 nop 0 mov b0 = r34 .mmi nop 0 .label_state 1 .restore sp mov r12 = r36 mov ar.pfs = r35 .mib nop 0 mov ar.lc = r38 br.ret.sptk.many b0 .L68: .body .copy_state 1 .mfi adds r14 = 88, r32 nop 0 cmp4.ge p6, p7 = 3, r18 ;; .mfb ldfd f10 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 96, r32 nop 0 cmp4.ge p6, p7 = 4, r18 ;; .mfb ldfd f11 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 104, r32 nop 0 cmp4.ge p6, p7 = 5, r18 ;; .mfb ldfd f12 = [r14] nop 0 (p6) br.cond.dptk .L7 .mfi adds r14 = 112, r32 nop 0 cmp4.ge p6, p7 = 6, r18 ;; .mfb ldfd f13 = [r14] nop 0 (p6) br.cond.dptk .L7 .mii adds r14 = 120, r32 cmp4.ge p6, p7 = 7, r18 ;; nop 0 .mii ldfd f14 = [r14] (p7) adds r14 = 128, r32 ;; nop 0 .mmb (p7) ldfd f15 = [r14] cmp4.ne p6, p7 = 13, r15 (p6) br.cond.dptk .L16 .L69: .mmb adds r16 = 8, r32 adds r15 = 16, r32 nop 0 .mfi ld8 r14 = [r20] nop 0 mov ar.lc = r38 ;; .mmi ld8 r33 = [r15] ld8 r15 = [r16] adds r17 = 8, r14 .mmi adds r18 = 16, r14 adds r19 = 24, r14 adds r20 = 32, r14 .mmi adds r21 = 40, r14 adds r22 = 48, r14 adds r23 = 56, r14 .mii ld8 r39 = [r14] nop 0 ;; nop 0 .mmb ld8 r14 = [r15], 8 ld8 r40 = [r17] nop 0 ;; .mmi ld8 r1 = [r15] ld8 r41 = [r18] mov b6 = r14 .mmb ld8 r42 = [r19] ld8 r43 = [r20] nop 0 .mmb ld8 r44 = [r21] ld8 r45 = [r22] nop 0 .mbb ld8 r46 = [r23] nop 0 br.call.sptk.many b0 = b6 ;; .mmb .label_state 2 .restore sp mov r12 = r36 mov r8 = r0 nop 0 .mmi mov r1 = r37 stfs [r33] = f8 mov b0 = r34 .mib nop 0 mov ar.pfs = r35 br.ret.sptk.many b0 ;; .L62: .body .copy_state 2 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 3 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st1 [r14] = r28 nop 0 br.ret.sptk.many b0 .L70: .body .copy_state 3 .mmb adds r16 = 8, r32 adds r15 = 16, r32 nop 0 .mfi ld8 r14 = [r20] nop 0 mov ar.lc = r38 ;; .mmi ld8 r33 = [r15] ld8 r15 = [r16] adds r17 = 8, r14 .mmi adds r18 = 16, r14 adds r19 = 24, r14 adds r20 = 32, r14 .mmi adds r21 = 40, r14 adds r22 = 48, r14 adds r23 = 56, r14 .mii ld8 r39 = [r14] nop 0 ;; nop 0 .mmb ld8 r14 = [r15], 8 ld8 r40 = [r17] nop 0 ;; .mmi ld8 r1 = [r15] ld8 r41 = [r18] mov b6 = r14 .mmb ld8 r42 = [r19] ld8 r43 = [r20] nop 0 .mmb ld8 r44 = [r21] ld8 r45 = [r22] nop 0 .mbb ld8 r46 = [r23] nop 0 br.call.sptk.many b0 = b6 ;; .mmb .label_state 4 .restore sp mov r12 = r36 mov r8 = r0 nop 0 .mmi mov r1 = r37 stfd [r33] = f8 mov b0 = r34 .mib nop 0 mov ar.pfs = r35 br.ret.sptk.many b0 ;; .L63: .body .copy_state 4 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 5 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st2 [r14] = r28 nop 0 br.ret.sptk.many b0 .L64: .body .copy_state 5 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 6 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st4 [r14] = r28 nop 0 br.ret.sptk.many b0 .L66: .body .copy_state 6 .mmi adds r14 = 16, r32 mov r8 = r0 mov b0 = r34 .mmi .label_state 7 .restore sp mov r12 = r36 ;; ld8 r14 = [r14] mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; nop 0 .mfb st8 [r14] = r28 nop 0 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mib nop 0 cmp.ltu p6, p7 = 16, r19 (p6) br.cond.dptk .L49 ;; .mfi shladd r20 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 16, r23 ;; nop 0 .mii mov r19 = r20 shl r15 = r8, r20 shl r14 = r14, r20 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L51 .mmi shladd r17 = r17, 2, r0 shladd r16 = r23, 3, r0 addl r15 = 2, r0 .mmi adds r19 = 8, r27 .label_state 8 .restore sp mov r12 = r36 shl r20 = r9, r20 ;; .mmb sub r17 = 32, r17 adds r16 = -65, r16 nop 0 .mii ld8 r18 = [r19] mov b0 = r34 mov ar.pfs = r35 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r17 = r17 .mib nop 0 mov ar.lc = r38 nop 0 ;; .mii nop 0 shr r14 = r8, r17 shl r15 = r15, r16 .mmi mov r8 = r0 ;; nop 0 shr r14 = r14, r17 .mii nop 0 adds r15 = -1, r15 ;; or r14 = r20, r14 ;; .mii nop 0 xor r14 = r14, r18 ;; and r15 = r14, r15 ;; .mii nop 0 xor r18 = r15, r18 ;; nop 0 .mfb st8 [r19] = r18 nop 0 br.ret.sptk.many b0 .L47: .body .copy_state 8 .mmi shladd r14 = r23, 3, r0 addl r15 = 2, r0 mov b0 = r34 .mmi shladd r18 = r17, 3, r0 ld8 r19 = [r27] .label_state 9 .restore sp mov r12 = r36 ;; .mmi adds r14 = -65, r14 sub r16 = 64, r18 mov ar.pfs = r35 .mii nop 0 mov ar.lc = r38 ;; sxt4 r14 = r14 .mii nop 0 shl r17 = r8, r18 ;; shl r15 = r15, r14 .mii addl r14 = -1, r0 sxt4 r16 = r16 ;; shr r16 = r8, r16 .mii mov r8 = r0 xor r17 = r17, r19 shl r14 = r14, r18 .mii nop 0 adds r15 = -1, r15 ;; and r14 = r17, r14 ;; .mmi xor r19 = r14, r19 ;; st8 [r27] = r19, 8 nop 0 ;; .mmi ld8 r14 = [r27] ;; xor r16 = r16, r14 nop 0 ;; .mmi and r15 = r16, r15 ;; xor r14 = r15, r14 nop 0 ;; .mfb st8 [r27] = r14 nop 0 br.ret.sptk.many b0 .L49: .body .copy_state 9 .mib nop 0 cmp.ltu p6, p7 = 24, r19 (p6) br.cond.dptk .L53 ;; .mfi shladd r19 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 24, r23 ;; nop 0 .mii mov r29 = r19 shl r15 = r8, r19 shl r14 = r14, r19 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L55 .mmi shladd r14 = r17, 2, r0 shladd r18 = r23, 3, r0 addl r16 = 2, r0 .mmi adds r22 = 16, r27 adds r20 = 8, r27 shl r21 = r10, r29 ;; .mmi sub r14 = 32, r14 adds r18 = -65, r18 mov b0 = r34 .mii .label_state 10 .restore sp mov r12 = r36 shl r19 = r9, r29 mov ar.pfs = r35 ;; .mii nop 0 sxt4 r18 = r18 sxt4 r14 = r14 .mib nop 0 mov ar.lc = r38 nop 0 ;; .mii nop 0 shr r15 = r9, r14 shr r17 = r8, r14 .mii mov r8 = r0 nop 0 shl r16 = r16, r18 ;; .mii nop 0 shr r15 = r15, r14 shr r17 = r17, r14 .mii ld8 r14 = [r22] nop 0 adds r16 = -1, r16 ;; .mii or r15 = r21, r15 or r17 = r19, r17 ;; xor r15 = r15, r14 .mmi st8 [r20] = r17 ;; and r16 = r15, r16 nop 0 ;; .mii nop 0 xor r14 = r16, r14 ;; nop 0 .mfb st8 [r22] = r14 nop 0 br.ret.sptk.many b0 .L51: .body .copy_state 10 .mmi shladd r15 = r23, 3, r0 addl r14 = 2, r0 sub r17 = 64, r20 .mmi adds r21 = 16, r27 adds r20 = 8, r27 shl r19 = r9, r19 ;; .mii adds r15 = -129, r15 mov b0 = r34 sxt4 r17 = r17 .mmi .label_state 11 .restore sp mov r12 = r36 nop 0 mov ar.pfs = r35 ;; .mii nop 0 shr r18 = r9, r17 sxt4 r15 = r15 ;; .mii nop 0 shl r14 = r14, r15 shr r16 = r8, r17 .mmi ld8 r15 = [r21] mov r8 = r0 mov ar.lc = r38 ;; .mii xor r18 = r18, r15 adds r14 = -1, r14 or r16 = r19, r16 ;; .mmb and r14 = r18, r14 st8 [r20] = r16 nop 0 ;; .mii nop 0 xor r15 = r14, r15 ;; nop 0 .mfb st8 [r21] = r15 nop 0 br.ret.sptk.many b0 .L55: .body .copy_state 11 .mmi shladd r14 = r23, 3, r0 addl r15 = 2, r0 sub r16 = 64, r19 .mmi adds r24 = 24, r27 adds r22 = 8, r27 shl r21 = r10, r29 ;; .mii adds r14 = -129, r14 sxt4 r16 = r16 shl r20 = r9, r29 .mmi adds r23 = 16, r27 .label_state 12 .restore sp mov r12 = r36 mov b0 = r34 ;; .mii nop 0 shr r18 = r10, r16 sxt4 r14 = r14 ;; .mii nop 0 shl r15 = r15, r14 shr r19 = r8, r16 .mmi ld8 r14 = [r24] mov r8 = r0 mov ar.pfs = r35 .mib nop 0 shr r17 = r9, r16 nop 0 ;; .mii xor r18 = r18, r14 mov ar.lc = r38 adds r15 = -1, r15 .mmi or r19 = r20, r19 ;; and r15 = r18, r15 or r17 = r21, r17 .mii st8 [r22] = r19 nop 0 ;; xor r14 = r15, r14 .mmb nop 0 st8 [r23] = r17 nop 0 ;; .mfb st8 [r24] = r14 nop 0 br.ret.sptk.many b0 .L53: .body .copy_state 12 .mfi shladd r18 = r17, 3, r0 nop 0 addl r14 = -1, r0 .mii ld8 r16 = [r27] cmp.ltu p6, p7 = 32, r23 ;; nop 0 .mii mov r29 = r18 shl r15 = r8, r18 shl r14 = r14, r18 ;; .mmi xor r15 = r15, r16 ;; and r14 = r15, r14 nop 0 ;; .mii nop 0 xor r16 = r14, r16 ;; nop 0 .mfb st8 [r27] = r16 nop 0 (p6) br.cond.dptk .L57 .mmi shladd r14 = r17, 2, r0 addl r15 = 2, r0 shl r20 = r10, r18 .mmi shladd r18 = r23, 3, r0 adds r23 = 24, r27 shl r19 = r9, r29 ;; .mmi sub r14 = 32, r14 adds r18 = -65, r18 mov b0 = r34 .mmi adds r21 = 8, r27 adds r22 = 16, r27 .label_state 13 .restore sp mov r12 = r36 .mii nop 0 mov ar.pfs = r35 ;; sxt4 r18 = r18 .mii nop 0 sxt4 r14 = r14 mov ar.lc = r38 ;; .mii nop 0 shr r16 = r8, r14 shr r17 = r9, r14 .mii mov r8 = r0 nop 0 shl r15 = r15, r18 ;; .mii nop 0 shr r16 = r16, r14 shr r17 = r17, r14 .mii ld8 r14 = [r23] adds r15 = -1, r15 ;; or r16 = r19, r16 .mmi or r17 = r20, r17 ;; st8 [r21] = r16 xor r16 = r14, r16 .mmi st8 [r22] = r17 ;; and r15 = r16, r15 nop 0 ;; .mii nop 0 xor r14 = r15, r14 ;; nop 0 .mfb st8 [r23] = r14 nop 0 br.ret.sptk.many b0 .L57: .body .copy_state 13 .mmi shladd r16 = r23, 3, r0 addl r15 = 2, r0 sub r14 = 64, r18 .mmi adds r24 = 8, r27 adds r25 = 16, r27 adds r26 = 24, r27 ;; .mmi nop 0 adds r16 = -129, r16 sxt4 r14 = r14 .mmi adds r27 = 32, r27 .restore sp mov r12 = r36 shl r23 = r11, r29 ;; .mii nop 0 sxt4 r16 = r16 shr r22 = r11, r14 ;; .mii nop 0 shl r15 = r15, r16 shr r17 = r8, r14 .mii mov r8 = r0 shr r18 = r9, r14 shr r19 = r10, r14 .mii ld8 r14 = [r27] shl r20 = r9, r29 shl r21 = r10, r29 ;; .mmi xor r22 = r22, r14 adds r15 = -1, r15 mov b0 = r34 ;; .mmi and r15 = r22, r15 or r19 = r23, r19 mov ar.pfs = r35 .mmi or r17 = r20, r17 or r18 = r21, r18 mov ar.lc = r38 ;; .mmb xor r14 = r15, r14 st8 [r24] = r17 nop 0 .mmb st8 [r25] = r18 st8 [r26] = r19 nop 0 ;; .mfb st8 [r27] = r14 nop 0 br.ret.sptk.many b0 .endp avcall_call# .ident "GCC: (GNU) 4.0.1" libffcall-2.5/avcall/avcall-mipsn32eb-linux.s0000664000000000000000000002275314662622065016036 00000000000000 .file 1 "avcall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,32,$31 # vars= 0, regs= 4/0, args= 0, gp= 0 .mask 0xd0010000,-8 .fmask 0x00000000,0 lw $5,20($4) lw $12,24($4) lw $2,36($4) addiu $sp,$sp,-32 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp move $16,$4 addiu $sp,$sp,-2064 subu $4,$5,$12 move $3,$sp .set noreorder .set nomacro beq $2,$0,.L2 sra $4,$4,3 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L124 andi $6,$2,0x2 .set macro .set reorder #APP # 78 "avcall-mipsn32.c" 1 lwc1 $f12,44($16) # 0 "" 2 #NO_APP andi $6,$2,0x2 .L124: .set noreorder .set nomacro beq $6,$0,.L125 andi $6,$2,0x4 .set macro .set reorder #APP # 80 "avcall-mipsn32.c" 1 lwc1 $f13,48($16) # 0 "" 2 #NO_APP andi $6,$2,0x4 .L125: .set noreorder .set nomacro beq $6,$0,.L126 andi $6,$2,0x8 .set macro .set reorder #APP # 82 "avcall-mipsn32.c" 1 lwc1 $f14,52($16) # 0 "" 2 #NO_APP andi $6,$2,0x8 .L126: .set noreorder .set nomacro beq $6,$0,.L127 andi $6,$2,0x10 .set macro .set reorder #APP # 84 "avcall-mipsn32.c" 1 lwc1 $f15,56($16) # 0 "" 2 #NO_APP andi $6,$2,0x10 .L127: .set noreorder .set nomacro beq $6,$0,.L128 andi $6,$2,0x20 .set macro .set reorder #APP # 86 "avcall-mipsn32.c" 1 lwc1 $f16,60($16) # 0 "" 2 #NO_APP andi $6,$2,0x20 .L128: .set noreorder .set nomacro beq $6,$0,.L129 andi $6,$2,0x40 .set macro .set reorder #APP # 88 "avcall-mipsn32.c" 1 lwc1 $f17,64($16) # 0 "" 2 #NO_APP andi $6,$2,0x40 .L129: .set noreorder .set nomacro beql $6,$0,.L130 andi $2,$2,0x80 .set macro .set reorder #APP # 90 "avcall-mipsn32.c" 1 lwc1 $f18,68($16) # 0 "" 2 #NO_APP andi $2,$2,0x80 .L130: bne $2,$0,.L117 .L2: lw $2,40($16) .L123: .set noreorder .set nomacro beql $2,$0,.L122 slt $4,$4,9 .set macro .set reorder andi $6,$2,0x1 .set noreorder .set nomacro beq $6,$0,.L131 andi $6,$2,0x2 .set macro .set reorder #APP # 98 "avcall-mipsn32.c" 1 ldc1 $f12,0($12) # 0 "" 2 #NO_APP andi $6,$2,0x2 .L131: .set noreorder .set nomacro beq $6,$0,.L132 andi $6,$2,0x4 .set macro .set reorder #APP # 100 "avcall-mipsn32.c" 1 ldc1 $f13,8($12) # 0 "" 2 #NO_APP andi $6,$2,0x4 .L132: .set noreorder .set nomacro beq $6,$0,.L133 andi $6,$2,0x8 .set macro .set reorder #APP # 102 "avcall-mipsn32.c" 1 ldc1 $f14,16($12) # 0 "" 2 #NO_APP andi $6,$2,0x8 .L133: .set noreorder .set nomacro beq $6,$0,.L134 andi $6,$2,0x10 .set macro .set reorder #APP # 104 "avcall-mipsn32.c" 1 ldc1 $f15,24($12) # 0 "" 2 #NO_APP andi $6,$2,0x10 .L134: .set noreorder .set nomacro beq $6,$0,.L135 andi $6,$2,0x20 .set macro .set reorder #APP # 106 "avcall-mipsn32.c" 1 ldc1 $f16,32($12) # 0 "" 2 #NO_APP andi $6,$2,0x20 .L135: .set noreorder .set nomacro beq $6,$0,.L136 andi $6,$2,0x40 .set macro .set reorder #APP # 108 "avcall-mipsn32.c" 1 ldc1 $f17,40($12) # 0 "" 2 #NO_APP andi $6,$2,0x40 .L136: .set noreorder .set nomacro beql $6,$0,.L137 andi $2,$2,0x80 .set macro .set reorder #APP # 110 "avcall-mipsn32.c" 1 ldc1 $f18,48($12) # 0 "" 2 #NO_APP andi $2,$2,0x80 .L137: bne $2,$0,.L118 slt $4,$4,9 .L122: .set noreorder .set nomacro bne $4,$0,.L22 addiu $2,$12,64 .set macro .set reorder .align 3 .L82: ld $4,0($2) addiu $3,$3,8 addiu $2,$2,8 .set noreorder .set nomacro bne $5,$2,.L82 sd $4,-8($3) .set macro .set reorder .L22: #APP # 119 "avcall-mipsn32.c" 1 ld $4,0($12) # 0 "" 2 # 120 "avcall-mipsn32.c" 1 ld $5,8($12) # 0 "" 2 # 121 "avcall-mipsn32.c" 1 ld $6,16($12) # 0 "" 2 # 122 "avcall-mipsn32.c" 1 ld $7,24($12) # 0 "" 2 # 123 "avcall-mipsn32.c" 1 ld $8,32($12) # 0 "" 2 # 124 "avcall-mipsn32.c" 1 ld $9,40($12) # 0 "" 2 # 125 "avcall-mipsn32.c" 1 ld $10,48($12) # 0 "" 2 # 126 "avcall-mipsn32.c" 1 ld $11,56($12) # 0 "" 2 #NO_APP lw $25,4($16) jalr $25 lw $4,12($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L107 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,11 # 0xb .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L115 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L120 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L110 li $5,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L138 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 lw $4,16($16) .set macro .set reorder lw $3,16($16) li $4,1 # 0x1 .set noreorder .set nomacro beq $3,$4,.L107 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L109 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L110 li $4,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L139 lw $3,8($16) .set macro .set reorder .L19: move $sp,$fp .L138: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L118: #APP # 112 "avcall-mipsn32.c" 1 ldc1 $f19,56($12) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L122 slt $4,$4,9 .set macro .set reorder .align 3 .L117: #APP # 92 "avcall-mipsn32.c" 1 lwc1 $f19,72($16) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L123 lw $2,40($16) .set macro .set reorder .align 3 .L107: lw $3,8($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L110: lw $3,8($16) sw $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: lw $3,8($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,32 .set macro .set reorder .L120: lw $2,8($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L115: lw $3,8($16) .L139: .set noreorder .set nomacro b .L19 sd $2,0($3) .set macro .set reorder .L119: lw $2,8($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: addiu $5,$4,-1 sltu $5,$5,16 .set noreorder .set nomacro beq $5,$0,.L19 sltu $8,$4,9 .set macro .set reorder lw $6,8($16) li $7,-8 # 0xfffffffffffffff8 andi $5,$6,0x7 and $7,$6,$7 .set noreorder .set nomacro beq $8,$0,.L41 addu $4,$4,$5 .set macro .set reorder sltu $3,$4,9 .set noreorder .set nomacro beq $3,$0,.L42 subu $6,$0,$5 .set macro .set reorder subu $3,$0,$5 sll $3,$3,3 ld $8,0($7) addiu $3,$3,63 subu $4,$0,$4 li $6,2 # 0x2 dsll $6,$6,$3 sll $4,$4,3 sll $5,$5,3 li $3,1 # 0x1 dsll $3,$3,$4 dsra $2,$2,$5 dsubu $3,$6,$3 xor $2,$2,$8 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,0($7) .set macro .set reorder .L41: subu $9,$0,$5 ld $11,0($7) sll $10,$9,3 addiu $6,$10,63 sll $5,$5,3 li $8,2 # 0x2 dsll $8,$8,$6 dsra $6,$2,$5 daddiu $8,$8,-1 xor $6,$6,$11 and $6,$8,$6 xor $6,$6,$11 sltu $8,$4,17 .set noreorder .set nomacro bne $8,$0,.L121 sd $6,0($7) .set macro .set reorder ld $11,16($7) addiu $6,$10,64 subu $4,$0,$4 move $8,$3 dsll $9,$3,$6 sll $4,$4,3 li $3,-1 # 0xffffffffffffffff dsll $4,$3,$4 xor $3,$9,$11 dsll $2,$2,$6 dsra $5,$8,$5 and $3,$4,$3 or $2,$2,$5 xor $3,$3,$11 sd $2,8($7) .set noreorder .set nomacro b .L19 sd $3,16($7) .set macro .set reorder .L42: ld $9,0($7) ld $8,8($7) sll $6,$6,3 addiu $10,$6,63 sll $3,$5,3 subu $4,$0,$4 li $5,2 # 0x2 dsra $3,$2,$3 dsll $5,$5,$10 dsll $2,$2,$6 sll $4,$4,3 li $6,-1 # 0xffffffffffffffff daddiu $5,$5,-1 xor $3,$3,$9 dsll $4,$6,$4 xor $2,$2,$8 and $3,$5,$3 and $2,$4,$2 xor $3,$3,$9 xor $2,$2,$8 sd $3,0($7) .set noreorder .set nomacro b .L19 sd $2,8($7) .set macro .set reorder .L121: sll $6,$9,2 addiu $6,$6,32 ld $8,8($7) dsll $2,$2,$6 dsll $6,$2,$6 dsra $3,$3,$5 subu $2,$0,$4 or $3,$6,$3 sll $2,$2,3 li $5,-1 # 0xffffffffffffffff xor $3,$3,$8 dsll $2,$5,$2 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,8($7) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/avcall-mips64el-linux.s0000664000000000000000000002300614662622066015670 00000000000000 .file 1 "avcall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,32,$31 # vars= 0, regs= 4/0, args= 0, gp= 0 .mask 0xd0010000,-8 .fmask 0x00000000,0 ld $2,40($4) ld $12,48($4) lw $3,68($4) daddiu $sp,$sp,-32 dsubu $6,$2,$12 dsra $6,$6,3 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp daddiu $sp,$sp,-2064 move $16,$4 sll $6,$6,0 .set noreorder .set nomacro beq $3,$0,.L2 move $2,$sp .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L123 andi $4,$3,0x2 .set macro .set reorder #APP # 77 "avcall-mips64.c" 1 lwc1 $f12,76($16) # 0 "" 2 #NO_APP andi $4,$3,0x2 .L123: .set noreorder .set nomacro beq $4,$0,.L124 andi $4,$3,0x4 .set macro .set reorder #APP # 79 "avcall-mips64.c" 1 lwc1 $f13,80($16) # 0 "" 2 #NO_APP andi $4,$3,0x4 .L124: .set noreorder .set nomacro beq $4,$0,.L125 andi $4,$3,0x8 .set macro .set reorder #APP # 81 "avcall-mips64.c" 1 lwc1 $f14,84($16) # 0 "" 2 #NO_APP andi $4,$3,0x8 .L125: .set noreorder .set nomacro beq $4,$0,.L126 andi $4,$3,0x10 .set macro .set reorder #APP # 83 "avcall-mips64.c" 1 lwc1 $f15,88($16) # 0 "" 2 #NO_APP andi $4,$3,0x10 .L126: .set noreorder .set nomacro beq $4,$0,.L127 andi $4,$3,0x20 .set macro .set reorder #APP # 85 "avcall-mips64.c" 1 lwc1 $f16,92($16) # 0 "" 2 #NO_APP andi $4,$3,0x20 .L127: .set noreorder .set nomacro beq $4,$0,.L128 andi $4,$3,0x40 .set macro .set reorder #APP # 87 "avcall-mips64.c" 1 lwc1 $f17,96($16) # 0 "" 2 #NO_APP andi $4,$3,0x40 .L128: .set noreorder .set nomacro beql $4,$0,.L129 andi $3,$3,0x80 .set macro .set reorder #APP # 89 "avcall-mips64.c" 1 lwc1 $f18,100($16) # 0 "" 2 #NO_APP andi $3,$3,0x80 .L129: bne $3,$0,.L116 .L2: lw $3,72($16) .L122: .set noreorder .set nomacro beql $3,$0,.L121 slt $3,$6,9 .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L130 andi $4,$3,0x2 .set macro .set reorder #APP # 97 "avcall-mips64.c" 1 ldc1 $f12,0($12) # 0 "" 2 #NO_APP andi $4,$3,0x2 .L130: .set noreorder .set nomacro beq $4,$0,.L131 andi $4,$3,0x4 .set macro .set reorder #APP # 99 "avcall-mips64.c" 1 ldc1 $f13,8($12) # 0 "" 2 #NO_APP andi $4,$3,0x4 .L131: .set noreorder .set nomacro beq $4,$0,.L132 andi $4,$3,0x8 .set macro .set reorder #APP # 101 "avcall-mips64.c" 1 ldc1 $f14,16($12) # 0 "" 2 #NO_APP andi $4,$3,0x8 .L132: .set noreorder .set nomacro beq $4,$0,.L133 andi $4,$3,0x10 .set macro .set reorder #APP # 103 "avcall-mips64.c" 1 ldc1 $f15,24($12) # 0 "" 2 #NO_APP andi $4,$3,0x10 .L133: .set noreorder .set nomacro beq $4,$0,.L134 andi $4,$3,0x20 .set macro .set reorder #APP # 105 "avcall-mips64.c" 1 ldc1 $f16,32($12) # 0 "" 2 #NO_APP andi $4,$3,0x20 .L134: .set noreorder .set nomacro beq $4,$0,.L135 andi $4,$3,0x40 .set macro .set reorder #APP # 107 "avcall-mips64.c" 1 ldc1 $f17,40($12) # 0 "" 2 #NO_APP andi $4,$3,0x40 .L135: .set noreorder .set nomacro beql $4,$0,.L136 andi $3,$3,0x80 .set macro .set reorder #APP # 109 "avcall-mips64.c" 1 ldc1 $f18,48($12) # 0 "" 2 #NO_APP andi $3,$3,0x80 .L136: bne $3,$0,.L117 slt $3,$6,9 .L121: .set noreorder .set nomacro bne $3,$0,.L22 daddiu $4,$12,64 .set macro .set reorder li $3,8 # 0x8 .align 3 .L21: ld $5,0($4) addiu $3,$3,1 daddiu $4,$4,8 sd $5,0($2) .set noreorder .set nomacro bne $6,$3,.L21 daddiu $2,$2,8 .set macro .set reorder .L22: #APP # 118 "avcall-mips64.c" 1 ld $4,0($12) # 0 "" 2 # 119 "avcall-mips64.c" 1 ld $5,8($12) # 0 "" 2 # 120 "avcall-mips64.c" 1 ld $6,16($12) # 0 "" 2 # 121 "avcall-mips64.c" 1 ld $7,24($12) # 0 "" 2 # 122 "avcall-mips64.c" 1 ld $8,32($12) # 0 "" 2 # 123 "avcall-mips64.c" 1 ld $9,40($12) # 0 "" 2 # 124 "avcall-mips64.c" 1 ld $10,48($12) # 0 "" 2 # 125 "avcall-mips64.c" 1 ld $11,56($12) # 0 "" 2 #NO_APP ld $25,8($16) jalr $25 lw $4,24($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,11 # 0xb .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L118 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L137 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 ld $5,32($16) .set macro .set reorder ld $3,32($16) li $4,1 # 0x1 .set noreorder .set nomacro beq $3,$4,.L106 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L108 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L111 li $4,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L138 ld $3,16($16) .set macro .set reorder .L19: move $sp,$fp .L137: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L117: #APP # 111 "avcall-mips64.c" 1 ldc1 $f19,56($12) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L121 slt $3,$6,9 .set macro .set reorder .align 3 .L116: #APP # 91 "avcall-mips64.c" 1 lwc1 $f19,104($16) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L122 lw $3,72($16) .set macro .set reorder .align 3 .L106: ld $3,16($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L111: ld $3,16($16) .set noreorder .set nomacro b .L19 sw $2,0($3) .set macro .set reorder .align 3 .L108: ld $3,16($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: ld $3,16($16) .align 3 .L138: sd $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L119: ld $2,16($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L118: ld $2,16($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: daddiu $4,$5,-1 sltu $4,$4,16 .set noreorder .set nomacro beq $4,$0,.L19 sltu $7,$5,9 .set macro .set reorder ld $6,16($16) li $8,-8 # 0xfffffffffffffff8 andi $4,$6,0x7 daddu $5,$5,$4 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$5,9 .set noreorder .set nomacro beq $3,$0,.L42 dsll $3,$5,3 .set macro .set reorder daddiu $3,$3,-1 ld $7,0($6) li $5,2 # 0x2 sll $3,$3,0 sll $4,$4,3 dsll $3,$5,$3 li $5,1 # 0x1 dsll $5,$5,$4 dsll $4,$2,$4 dsubu $3,$3,$5 xor $4,$4,$7 and $4,$3,$4 xor $4,$4,$7 .set noreorder .set nomacro b .L19 sd $4,0($6) .set macro .set reorder .L41: ld $10,0($6) sll $8,$4,3 dsll $7,$2,$8 li $9,-1 # 0xffffffffffffffff dsll $9,$9,$8 xor $7,$7,$10 and $7,$9,$7 xor $7,$7,$10 sltu $9,$5,17 subu $4,$0,$4 .set noreorder .set nomacro bne $9,$0,.L120 sd $7,0($6) .set macro .set reorder dsll $5,$5,3 ld $10,16($6) sll $4,$4,3 daddiu $5,$5,-129 addiu $4,$4,64 sll $5,$5,0 li $7,2 # 0x2 move $9,$3 dsll $5,$7,$5 dsra $3,$3,$4 daddiu $5,$5,-1 xor $3,$3,$10 dsra $2,$2,$4 dsll $8,$9,$8 and $3,$5,$3 or $2,$2,$8 xor $3,$3,$10 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $10,0($6) ld $9,8($6) subu $7,$0,$4 daddiu $3,$3,-65 sll $4,$4,3 li $5,2 # 0x2 sll $3,$3,0 sll $7,$7,3 dsll $8,$2,$4 dsll $3,$5,$3 dsra $2,$2,$7 li $5,-1 # 0xffffffffffffffff dsll $4,$5,$4 daddiu $3,$3,-1 xor $5,$8,$10 xor $2,$2,$9 and $2,$3,$2 and $4,$4,$5 xor $3,$4,$10 xor $2,$2,$9 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L120: sll $4,$4,2 addiu $4,$4,32 dsll $5,$5,3 ld $7,8($6) dsra $2,$2,$4 daddiu $5,$5,-65 dsra $4,$2,$4 dsll $3,$3,$8 sll $5,$5,0 li $2,2 # 0x2 or $3,$4,$3 dsll $2,$2,$5 xor $3,$3,$7 daddiu $2,$2,-1 and $2,$3,$2 xor $2,$2,$7 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/minitests.c0000664000000000000000000000136614662613003013623 00000000000000/* * Copyright 1999-2001 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define SKIP_EXTRA_STRUCTS #include "tests.c" libffcall-2.5/avcall/avcall-m68k-sun.s0000664000000000000000000000345514662622065014465 00000000000000#NO_APP .text .even .globl _avcall_call _avcall_call: link a6,#0 moveml #0x3820,sp@- movel a6@(8),a2 lea sp@(-1024),sp movel a2@(24),d1 movel a2@(20),d0 subl d1,d0 asrl #2,d0 jle L52 movel sp,a1 movel d1,a0 movel d0,d2 .even L6: movel a0@+,a1@+ subql #1,d2 jne L6 L52: moveq #16,d0 cmpl a2@(12),d0 jeq L57 L7: movel a2@(4),a0 jsr a0@ movel d0,d2 movel d1,d3 movel a2@(12),a1 moveq #1,d1 cmpl a1,d1 jeq L9 moveq #2,d4 cmpl a1,d4 jeq L56 moveq #3,d4 cmpl a1,d4 jeq L56 moveq #4,d4 cmpl a1,d4 jeq L56 moveq #5,d4 cmpl a1,d4 jeq L55 moveq #6,d4 cmpl a1,d4 jeq L55 moveq #7,d4 cmpl a1,d4 jeq L53 moveq #8,d4 cmpl a1,d4 jeq L53 moveq #9,d4 cmpl a1,d4 jeq L53 moveq #10,d4 cmpl a1,d4 jeq L53 lea a1@(-11),a0 moveq #1,d4 cmpl a0,d4 jcc L54 moveq #13,d4 cmpl a1,d4 jeq L58 moveq #14,d4 cmpl a1,d4 jeq L59 moveq #15,d0 cmpl a1,d0 jeq L53 moveq #16,d1 cmpl a1,d1 jne L9 btst #1,a2@(2) jeq L9 movel a2@(16),d0 moveq #1,d4 cmpl d0,d4 jeq L56 moveq #2,d1 cmpl d0,d1 jeq L55 moveq #4,d4 cmpl d0,d4 jeq L53 moveq #8,d1 cmpl d0,d1 jne L9 L54: movel a2@(8),a0 movel d2,a0@ movel d3,a0@(4) jra L9 .even L53: movel a2@(8),a0 movel d2,a0@ jra L9 .even L55: movel a2@(8),a0 movew d2,a0@ jra L9 .even L56: movel a2@(8),a0 moveb d2,a0@ jra L9 .even L59: btst #6,a2@(3) jeq L37 movel a2@(8),a0 fmoved fp0,a0@ jra L9 .even L37: movel a2@(8),a0 movel d0,a0@ movel d1,a0@(4) jra L9 .even L58: movel a2@,d2 btst #6,d2 jeq L31 movel a2@(8),a0 fmoves fp0,a0@ jra L9 .even L31: btst #5,d2 jeq L33 movel a2@(8),a0 movel d1,sp@- movel d0,sp@- fmoved sp@+,fp0 fmoves fp0,a0@ jra L9 .even L33: movel a2@(8),a0 movel d0,a0@ jra L9 .even L57: #APP movel a2@(8),a1 #NO_APP jra L7 .even L9: clrl d0 moveml a6@(-16),#0x41c unlk a6 rts libffcall-2.5/avcall/PLATFORMS0000664000000000000000000001314614171044764012740 00000000000000Supported CPUs: (Put the GNU config.guess values here.) CPU GNU config.guess value machine OS i386 i486-unknown-linux (gcc) i386/486/586 Linux i686-unknown-gnu0.9 (gcc) i686 GNU Hurd i386-unknown-sysv4.0 (gcc, i386 Consensys /usr/bin/cc, /usr/ucb/cc) i386-pc-solaris2.6 (gcc) i386/486/586 Solaris i386-pc-solaris2.10 (gcc, cc) i386/486/586 Solaris i486-unknown-sco3.2v4.2 (gcc, cc -Of) i386/486/586 SCO i386-pc-cygwin32 (gcc) i386/486/586 Cygwin32 i386-w64-mingw32 (gcc, MSVC 14) i386/486/586 Win32 i586-unknown-freebsd11.0 (cc) i386/486/586 FreeBSD 11 i386-unknown-dragonfly3.8 (gcc) i386/486/586 DragonFly BSD i386-unknown-netbsdelf7.0 (gcc) i386/486/586 NetBSD 7 i386-unknown-openbsd6.0 (gcc) i386/486/586 OpenBSD 6 i586-pc-haiku (gcc-x86) i586 Haiku 2017 i386-pc-minix (clang) i386/486/586 Minix 3.3 m68k m68k-sun-sunos4.0 (cc) Sun3 SunOS 4.0.3 m68k-unknown-linux (gcc) emulated Linux mips mips-sgi-irix4.0.5 (gcc, SGI mips Irix 4.0.x cc -ansi, cc -D__STDC__, cc -cckr) mips-sgi-irix5.2 (gcc, cc -ansi, ...) SGI mips Irix 5.2 mips-sgi-irix5.3 (gcc, cc -ansi, ...) SGI mips Irix 5.3 mips-sgi-irix6.2 (cc -32) SGI mips3 Irix 6.2 mips-sgi-irix6.4 (cc -32, -n32, -64) SGI mips3 Irix 6.4 mips-sgi-irix6.5 (cc -32, -n32, SGI mips3 Irix 6.5 gcc -mabi=n32) mips-unknown-linux (gcc -mabi=32) emulated Linux mips64-unknown-linux (gcc -mabi=n32,64)emulated Linux sparc sparc-sun-sunos4.1.1 (gcc, cc) Sun4 Sparc SunOS 4.x sparc-sun-solaris2.3 (gcc) Sun4 Sparc SunOS 5.x sparc-sun-solaris2.4 (gcc, cc) Sun4 Sparc SunOS 5.x sparc-sun-solaris2.10 (gcc, cc) Sun4 Sparc Solaris 10 sparc64-sun-solaris2.10 (gcc -m64, Sun4 Sparc Solaris 10 cc -xarch=generic64) sparc-unknown-linux (gcc) emulated Linux sparc64-unknown-linux (gcc) emulated Linux sparc-unknown-netbsdelf7.1 (gcc) emulated NetBSD 7.1 sparc64-unknown-netbsd8.0 (gcc) emulated NetBSD 8.0 alpha alpha-dec-osf3.0 (gcc, cc) DEC Alpha OSF/1 3.0 alpha-dec-osf4.0 (gcc, cc) DEC Alpha OSF/1 4.0 alphaev67-unknown-linux (gcc) emulated Linux hppa hppa1.0-hp-hpux8.00 (gcc, HP 9000/8xx HP-UX 8.0x cc, c89, cc -Aa) hppa1.1-hp-hpux9.05 (cc) HP 9000/8xx HP-UX 9.0x hppa1.1-hp-hpux10.01 (cc) HP 9000/8xx HP-UX 10.0x hppa2.0-hp-hpux10.20 (cc +DA1.1) HP 9000/8xx HP-UX 10.20 hppa2.0w-hp-hpux11.31 (cc) HP 9000/8xx HP-UX 11.31 hppa-unknown-linux (gcc) emulated Linux hppa64 hppa64-hp-hpux11.31 (cc +DD64) HP 9000/8xx HP-UX 11.31 arm armv5tejl-unknown-linux (gcc) emulated Linux armv6l-unknown-linux (gcc) emulated Linux armv7l-unknown-linux (gcc) emulated Linux arm64 aarch64-unknown-linux (gcc) APM X-Gene Linux aarch64-apple-darwin20.4.0 (cc) Mac mini macOS 11 powerpc powerpc-ibm-aix4.1.4.0 (cc) IBM RS/6000 AIX 4.1.4 powerpc-ibm-aix7.1.3.0 (xlc, gcc) IBM POWER AIX 7.1.3 powerpc-unknown-linux (gcc) Apple PPC LinuxPPC powerpc-apple-darwin6.8 (gcc) Apple PPC MacOS X powerpc-apple-darwin9.8.0 (gcc) Apple PPC MacOS X powerpc64 powerpc-ibm-aix7.1.3.0 (gcc -maix64, IBM POWER AIX 7.1.3 xlc -q64) powerpc64-unknown-linux (gcc -m64) IBM POWER Linux powerpc64le-unknown-linux (gcc) IBM POWER Linux ia64 ia64-unknown-linux (gcc) Intel Linux x86_64 x86_64-suse-linux (gcc) AMD64 Linux x86_64-unknown-linux (gcc -mx32) AMD64 Linux x86_64-pc-solaris2.10 (gcc -m64) AMD64 Solaris x86_64-pc-solaris2.10 (cc -xarch=generic64) AMD64 Solaris x86_64-pc-cygwin (gcc) AMD64 Windows 10 x86_64-w64-mingw32 (gcc, MSVC 14) AMD64 Windows 10 x86_64-unknown-freebsd11.0 (cc) AMD64 FreeBSD 11 x86_64-unknown-netbsd7.0 (gcc) AMD64 NetBSD 7 x86_64-unknown-openbsd6.0 (gcc) AMD64 OpenBSD 6 s390 s390x-ibm-linux (gcc -m31) emulated Linux s390x s390x-ibm-linux (gcc) emulated Linux riscv32 riscv32-unknown-linux (gcc -mabi=ilp32d) emulated Linux riscv64 riscv64-unknown-linux (gcc -mabi=lp64d) emulated Linux loongarch64 loongarch64-unknown-linux (gcc) Loongson Linux libffcall-2.5/avcall/avcall-i386-msvc.c0000664000000000000000000000757114662622065014517 00000000000000#include "asm-i386.h" TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(avcall_call)) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(edi)) INSN1(push,l ,R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN2(mov,l ,X4 MEM_DISP(eax,20), R(edx)) INSN2(mov,l ,X4 MEM_DISP(eax,24), R(eax)) INSN2(sub,l ,R(eax), R(edx)) INSN2(sar,l ,NUM(2), R(edx)) INSN2(xor,l ,R(esi), R(esi)) INSN2(sub,l ,NUM(1024), R(esp)) INSN2(cmp,l ,R(edx), R(esi)) INSN2(mov,l ,R(esp), R(edi)) INSN1(jge,_ ,L(45)) INSN2(mov,l ,R(eax), R(ecx)) P2ALIGN(2,3) L(6): INSN2(mov,l ,X4 MEM_SHINDEX(ecx,esi,4), R(eax)) INSN2(mov,l ,R(eax),X4 MEM_SHINDEX(edi,esi,4)) INSN1(inc,l ,R(esi)) INSN2(cmp,l ,R(edx), R(esi)) INSN1(jl,_ ,L(6)) L(45): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,12), R(eax)) INSN2(cmp,l ,NUM(13), R(eax)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(14), R(eax)) INSN1(je,_ ,L(56)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN1(call,_ ,INDIR(X4 MEM_DISP(ecx,4))) INSN2(mov,l ,R(eax), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN2(mov,l ,X4 MEM_DISP(eax,12), R(ecx)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(8)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(57)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(58)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(10), R(ecx)) INSN1(je,_ ,L(46)) INSN2(lea,l ,X4 MEM_DISP(ecx,-11), R(eax)) INSN2(cmp,l ,NUM(1), R(eax)) INSN1(jbe,_ ,L(47)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(16), R(ecx)) INSN1(je,_ ,L(59)) P2ALIGN(2,3) L(8): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,l ,R(edi)) leave ret L(59): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(test,b ,NUM(2),X1 MEM_DISP(ecx,1)) INSN1(je,_ ,L(8)) INSN2(mov,l ,X4 MEM_DISP(ecx,16), R(eax)) INSN2(cmp,l ,NUM(1), R(eax)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(2), R(eax)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(4), R(eax)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(8), R(eax)) INSN1(jne,_ ,L(8)) L(47): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN2(mov,l ,R(esi),X4 MEM(eax)) INSN2(mov,l ,R(edx),X4 MEM_DISP(eax,4)) INSN1(jmp,_ ,L(8)) L(46): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) L(48): INSN2(mov,l ,R(esi),X4 MEM(eax)) INSN1(jmp,_ ,L(8)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) L(49): INSN2(mov,w ,R(si),X2 MEM(eax)) INSN1(jmp,_ ,L(8)) L(50): INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) L(51): INSN2(mov,l ,R(esi), R(edx)) INSN2(mov,b ,R(dl),X1 MEM(eax)) INSN1(jmp,_ ,L(8)) L(52): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN1(jmp,_ ,L(48)) L(58): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) INSN1(jmp,_ ,L(49)) L(53): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN1(jmp,_ ,L(50)) L(57): INSN2(mov,l ,X4 MEM_DISP(eax,8), R(eax)) INSN1(jmp,_ ,L(51)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN1(call,_ ,INDIR(X4 MEM_DISP(eax,4))) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) INSN1(fstp,l ,X8 MEM(eax)) INSN1(jmp,_ ,L(8)) L(55): INSN1(call,_ ,INDIR(X4 MEM_DISP(edx,4))) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN1(fstp,s ,X4 MEM(eax)) INSN1(jmp,_ ,L(8)) L(fe1): FUNEND(avcall_call,L(fe1)-avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-arm64-macro.S0000664000000000000000000001167114662622066015065 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) stp x29, x30, [sp, -48]! add x29, sp, 0 ldp x11, x12, [x0, 40] stp x19, x20, [sp, 16] sub x11, x11, x12 ldr w15, [x0, 64] asr x10, x11, 3 ldr w14, [x0, 136] cmp w10, wzr mov x19, x0 str d8, [sp, 32] sub sp, sp, $2064 ble L(6) mov x13, sp mov x9, 0 mov w11, w10 .p2align 2 L(86): ldr x10, [x12, x9, lsl 3] str x10, [x13, x9, lsl 3] add x9, x9, 1 cmp w11, w9 bgt L(86) L(6): cbz w15, L(7) cmp w15, 1 ldr x0, [x19, 72] bls L(7) cmp w15, 2 ldr x1, [x19, 80] beq L(7) cmp w15, 3 ldr x2, [x19, 88] beq L(7) cmp w15, 4 ldr x3, [x19, 96] beq L(7) cmp w15, 5 ldr x4, [x19, 104] beq L(7) cmp w15, 6 ldr x5, [x19, 112] beq L(7) cmp w15, 7 ldr x6, [x19, 120] beq L(7) ldr x7, [x19, 128] .p2align 2 L(7): cbz w14, L(9) ldr w9, [x19, 144] tbz x9, 0, L(10) ldr d0, [x19, 184] L(11): cmp w14, 1 bls L(9) tbnz x9, 1, L(119) ldr w10, [x19, 140] tbz x10, 1, L(14) ldr s1, [x19, 152] L(14): cmp w14, 2 beq L(9) tbz x9, 2, L(15) ldr d2, [x19, 200] L(16): cmp w14, 3 beq L(9) tbnz x9, 3, L(120) ldr w10, [x19, 140] tbz x10, 3, L(18) ldr s3, [x19, 160] L(18): cmp w14, 4 beq L(9) tbz x9, 4, L(19) ldr d4, [x19, 216] L(20): cmp w14, 5 beq L(9) tbz x9, 5, L(21) ldr d5, [x19, 224] L(22): cmp w14, 6 beq L(9) tbz x9, 6, L(23) ldr d6, [x19, 232] L(24): cmp w14, 7 beq L(9) tbz x9, 7, L(25) ldr d7, [x19, 240] .p2align 2 L(9): ldr w9, [x19, 24] cmp w9, 13 beq L(121) cmp w9, 14 beq L(122) ldr x9, [x19, 8] blr x9 mov x16, x0 ldr w9, [x19, 24] cmp w9, 1 beq L(27) cmp w9, 2 beq L(113) cmp w9, 3 beq L(113) cmp w9, 4 beq L(113) cmp w9, 5 beq L(114) cmp w9, 6 beq L(114) cmp w9, 7 beq L(115) cmp w9, 8 beq L(115) and w12, w9, -3 cmp w12, 9 beq L(117) sub w12, w9, $10 tst w12, -3 beq L(117) cmp w9, 15 beq L(117) cmp w9, 16 bne L(27) ldr w9, [x19] tbz x9, 9, L(27) ldr x12, [x19, 32] sub x9, x12, $1 cmp x9, 15 bhi L(27) ldr x13, [x19, 16] cmp x12, 8 and x9, x13, 7 and x13, x13, -8 add x12, x12, x9 bhi L(39) cmp x12, 8 lsl w11, w12, 3 bhi L(40) lsl w9, w9, 3 mov x12, 2 mov x14, 1 sub w11, w11, $1 lsl x14, x14, x9 lsl x11, x12, x11 lsl x9, x0, x9 sub x10, x11, x14 ldr d17, [x13] fmov d16, x10 fmov d8, x9 bif v8.8b, v17.8b, v16.8b str d8, [x13] L(27): add sp, x29, 0 ldr d8, [sp, 32] mov w0, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret .p2align 3 L(10): ldr w10, [x19, 140] tbz x10, 0, L(11) ldr s0, [x19, 148] b L(11) .p2align 3 L(113): ldr x9, [x19, 16] mov w0, 0 strb w16, [x9] ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret .p2align 3 L(119): ldr d1, [x19, 192] b L(14) .p2align 3 L(114): ldr x9, [x19, 16] mov w0, 0 strh w16, [x9] ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret L(117): ldr x9, [x19, 16] str x16, [x9] b L(27) .p2align 3 L(122): ldp x9, x20, [x19, 8] blr x9 str d0, [x20] mov w0, 0 ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret L(121): ldp x9, x20, [x19, 8] blr x9 str s0, [x20] b L(27) L(15): ldr w10, [x19, 140] tbz x10, 2, L(16) ldr s2, [x19, 156] b L(16) L(115): ldr x9, [x19, 16] str w16, [x9] b L(27) L(120): ldr d3, [x19, 208] b L(18) L(19): ldr w10, [x19, 140] tbz x10, 4, L(20) ldr s4, [x19, 164] b L(20) L(21): ldr w10, [x19, 140] tbz x10, 5, L(22) ldr s5, [x19, 168] b L(22) L(23): ldr w10, [x19, 140] tbz x10, 6, L(24) ldr s6, [x19, 172] b L(24) L(25): ldr w9, [x19, 140] tbz x9, 7, L(9) ldr s7, [x19, 176] b L(9) L(39): lsl w14, w9, 3 cmp x12, 16 movi d16, -1 lsl x15, x0, x14 dup v8.8b, w14 fmov d17, x15 ushl d16, d16, d8 ldr d8, [x13] bsl v16.8b, v17.8b, v8.8b str d16, [x13] bls L(123) lsl w12, w12, 3 mov x15, 2 neg w9, w9, lsl 3 sub w12, w12, $129 add w9, w9, 64 lsl x12, x15, x12 asr x11, x1, x9 asr x10, x0, x9 sub x9, x12, $1 ldr d17, [x13, 16] fmov d16, x11 lsl x14, x1, x14 fmov d8, x9 orr x10, x10, x14 bif v16.8b, v17.8b, v8.8b fmov x11, d16 stp x10, x11, [x13, 8] b L(27) L(40): lsl w14, w9, 3 neg w9, w9, lsl 3 movi d16, -1 add w10, w9, 64 dup v8.8b, w14 lsl x9, x0, x14 ldp d17, d18, [x13] mov x12, 2 sub w11, w11, $65 lsl x11, x12, x11 ushl d16, d16, d8 fmov d8, x9 asr x9, x0, x10 sub x10, x11, $1 bsl v16.8b, v8.8b, v17.8b fmov d8, x10 fmov d17, x9 str d16, [x13] bif v17.8b, v18.8b, v8.8b str d17, [x13, 8] b L(27) L(123): neg w9, w9, lsl 2 lsl w12, w12, 3 add w9, w9, 32 mov x15, 2 sub w12, w12, $65 lsl x11, x1, x14 lsl x12, x15, x12 asr x14, x0, x9 asr x10, x14, x9 sub x9, x12, $1 ldr d17, [x13, 8] fmov d8, x9 orr x9, x10, x11 fmov d16, x9 bif v16.8b, v17.8b, v8.8b str d16, [x13, 8] b L(27) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/avcall/avcall-sparc64-linux.s0000664000000000000000000002136414662622066015514 00000000000000 .file "avcall-sparc64.c" .section ".text" .align 4 .global avcall_call .type avcall_call, #function .proc 04 avcall_call: .register %g2, #scratch .register %g3, #scratch save %sp, -192, %sp ldx [%i0+48], %g2 ldx [%i0+40], %g1 lduw [%i0+68], %g3 sub %g1, %g2, %g1 cmp %g3, 0 be,pt %icc, .LL2 srlx %g1, 3, %o7 andcc %g3, 1, %g0 bne,pt %xcc, .LL97 andcc %g3, 2, %g0 bne,pt %xcc, .LL98 andcc %g3, 4, %g0 .LL133: bne,pt %xcc, .LL99 andcc %g3, 8, %g0 .LL132: bne,pt %xcc, .LL100 andcc %g3, 16, %g0 .LL131: bne,pt %xcc, .LL101 andcc %g3, 32, %g0 .LL130: bne,pt %xcc, .LL102 andcc %g3, 64, %g0 .LL129: bne,pt %xcc, .LL103 andcc %g3, 128, %g0 .LL128: bne,pt %xcc, .LL104 andcc %g3, 256, %g0 .LL127: bne,pt %xcc, .LL105 andcc %g3, 512, %g0 .LL126: bne,pt %xcc, .LL106 andcc %g3, 1024, %g0 .LL125: bne,pt %xcc, .LL107 andcc %g3, 2048, %g0 .LL124: bne,pt %xcc, .LL108 sethi %hi(4096), %g1 .LL123: andcc %g3, %g1, %g0 bne,pt %icc, .LL109 sethi %hi(8192), %g1 .LL122: andcc %g3, %g1, %g0 bne,pt %icc, .LL110 sethi %hi(16384), %g1 .LL121: andcc %g3, %g1, %g0 bne,pt %icc, .LL111 sethi %hi(32768), %g1 .LL120: andcc %g3, %g1, %g0 bne,pt %icc, .LL112 nop .LL2: cmp %o7, 6 .LL119: bg,pn %icc, .LL117 add %o7, -6, %g1 ldx [%i0+48], %g3 .LL118: ldx [%g3+40], %o5 .LL116: ldx [%i0+8], %g1 ldx [%g3], %o0 ldx [%g3+8], %o1 ldx [%g3+16], %o2 ldx [%g3+24], %o3 call %g1, 0 ldx [%g3+32], %o4 mov %o0, %l3 nop lduw [%i0+24], %g1 cmp %g1, 1 be,pn %icc, .LL38 cmp %g1, 2 be,pn %icc, .LL89 cmp %g1, 3 be,pn %icc, .LL89 cmp %g1, 4 be,pn %icc, .LL89 cmp %g1, 5 be,pn %icc, .LL90 cmp %g1, 6 be,pn %icc, .LL90 cmp %g1, 7 be,pn %icc, .LL91 cmp %g1, 8 be,pn %icc, .LL91 cmp %g1, 9 be,pn %icc, .LL95 cmp %g1, 10 be,pn %icc, .LL95 cmp %g1, 11 be,pn %icc, .LL95 cmp %g1, 12 be,pn %icc, .LL95 cmp %g1, 13 be,pn %icc, .LL114 cmp %g1, 14 be,pn %icc, .LL115 cmp %g1, 15 be,pn %icc, .LL95 cmp %g1, 16 bne,pt %icc, .LL38 nop lduw [%i0], %g1 andcc %g1, 512, %g0 be,pn %xcc, .LL38 nop ldx [%i0+32], %g2 add %g2, -1, %g1 cmp %g1, 31 bgu,pn %xcc, .LL38 cmp %g2, 8 ldx [%i0+16], %g1 and %g1, 7, %g5 and %g1, -8, %i0 bgu,pt %xcc, .LL71 add %g2, %g5, %g4 cmp %g4, 8 bgu,pt %xcc, .LL73 sllx %g5, 3, %g2 sllx %g5, 3, %g3 sllx %g4, 3, %g4 ldx [%i0], %g5 srax %o0, %g3, %o7 sub %g0, %g4, %g4 xor %g5, %o7, %o7 xnor %g0, %g3, %g3 mov 2, %g1 mov 1, %g2 sllx %g1, %g3, %g1 sllx %g2, %g4, %g2 sub %g1, %g2, %g1 and %g1, %o7, %g1 xor %g5, %g1, %g5 ba,pt %xcc, .LL38 stx %g5, [%i0] .LL89: ldx [%i0+16], %g1 stb %l3, [%g1] .LL38: return %i7+8 mov 0, %o0 .LL112: ldd [%g2+120],%f30 cmp %o7, 6 ble,a,pt %icc, .LL118 ldx [%i0+48], %g3 add %o7, -6, %g1 .LL117: sra %g1, 0, %g1 sllx %g1, 3, %g1 add %g1, 15, %g1 and %g1, -16, %g1 mov 6, %g4 sub %sp, %g1, %sp ldx [%i0+48], %g3 add %sp, 2238, %g1 and %g1, -16, %g1 add %g1, -48, %g5 .LL37: sra %g4, 0, %g1 add %g4, 1, %g4 sllx %g1, 3, %g1 cmp %o7, %g4 ldx [%g1+%g3], %g2 bne,pt %icc, .LL37 stx %g2, [%g5+%g1] ba,pt %xcc, .LL116 ldx [%g3+40], %o5 .LL111: ldd [%g2+112],%f28 sethi %hi(32768), %g1 andcc %g3, %g1, %g0 be,pt %icc, .LL119 cmp %o7, 6 ba,pt %xcc, .LL112 nop .LL110: ldd [%g2+104],%f26 sethi %hi(16384), %g1 andcc %g3, %g1, %g0 be,pt %icc, .LL120 sethi %hi(32768), %g1 ba,pt %xcc, .LL111 nop .LL109: ldd [%g2+96],%f24 sethi %hi(8192), %g1 andcc %g3, %g1, %g0 be,pt %icc, .LL121 sethi %hi(16384), %g1 ba,pt %xcc, .LL110 nop .LL108: ldd [%g2+88],%f22 sethi %hi(4096), %g1 andcc %g3, %g1, %g0 be,pt %icc, .LL122 sethi %hi(8192), %g1 ba,pt %xcc, .LL109 nop .LL107: ldd [%g2+80],%f20 andcc %g3, 2048, %g0 be,pt %xcc, .LL123 sethi %hi(4096), %g1 ba,pt %xcc, .LL108 nop .LL106: ldd [%g2+72],%f18 andcc %g3, 1024, %g0 be,pt %xcc, .LL124 andcc %g3, 2048, %g0 ba,pt %xcc, .LL107 nop .LL105: ldd [%g2+64],%f16 andcc %g3, 512, %g0 be,pt %xcc, .LL125 andcc %g3, 1024, %g0 ba,pt %xcc, .LL106 nop .LL104: ldd [%g2+56],%f14 andcc %g3, 256, %g0 be,pt %xcc, .LL126 andcc %g3, 512, %g0 ba,pt %xcc, .LL105 nop .LL103: ldd [%g2+48],%f12 andcc %g3, 128, %g0 be,pt %xcc, .LL127 andcc %g3, 256, %g0 ba,pt %xcc, .LL104 nop .LL102: ldd [%g2+40],%f10 andcc %g3, 64, %g0 be,pt %xcc, .LL128 andcc %g3, 128, %g0 ba,pt %xcc, .LL103 nop .LL101: ldd [%g2+32],%f8 andcc %g3, 32, %g0 be,pt %xcc, .LL129 andcc %g3, 64, %g0 ba,pt %xcc, .LL102 nop .LL100: ldd [%g2+24],%f6 andcc %g3, 16, %g0 be,pt %xcc, .LL130 andcc %g3, 32, %g0 ba,pt %xcc, .LL101 nop .LL99: ldd [%g2+16],%f4 andcc %g3, 8, %g0 be,pt %xcc, .LL131 andcc %g3, 16, %g0 ba,pt %xcc, .LL100 nop .LL98: ldd [%g2+8],%f2 andcc %g3, 4, %g0 be,pt %xcc, .LL132 andcc %g3, 8, %g0 ba,pt %xcc, .LL99 nop .LL97: ldd [%g2+0],%f0 andcc %g3, 2, %g0 be,pt %xcc, .LL133 andcc %g3, 4, %g0 ba,pt %xcc, .LL98 nop .LL90: ldx [%i0+16], %g1 sth %l3, [%g1] return %i7+8 mov 0, %o0 .LL95: ldx [%i0+16], %g1 ba,pt %xcc, .LL38 stx %l3, [%g1] .LL91: ldx [%i0+16], %g1 ba,pt %xcc, .LL38 st %l3, [%g1] .LL114: ldx [%i0+16], %g1 ba,pt %xcc, .LL38 st %f0, [%g1] .LL115: ldx [%i0+16], %g1 ba,pt %xcc, .LL38 std %f0, [%g1] .LL71: cmp %g2, 16 bgu,pt %xcc, .LL75 cmp %g2, 24 sll %g5, 3, %l2 xnor %g0, %l2, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 16 sllx %g1, %g2, %g1 srax %o0, %l2, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, .LL77 stx %g3, [%i0] sllx %g5, 2, %g5 mov 32, %g2 sub %g2, %g5, %g2 ldx [%i0+8], %g3 sllx %o0, %g2, %g1 sllx %g4, 3, %g4 sllx %g1, %g2, %g1 srax %o1, %l2, %o7 sub %g0, %g4, %g4 or %g1, %o7, %g1 mov -1, %g2 xor %g3, %g1, %g1 sllx %g2, %g4, %g2 and %g2, %g1, %g2 xor %g3, %g2, %g3 ba,pt %xcc, .LL38 stx %g3, [%i0+8] .LL73: sllx %g4, 3, %l0 ldx [%i0], %g5 srax %o0, %g2, %g4 sub %g0, %g2, %g3 xor %g5, %g4, %g4 xnor %g0, %g2, %g2 mov 2, %g1 sllx %g1, %g2, %g1 add %g1, -1, %g1 and %g1, %g4, %g1 ldx [%i0+8], %o7 xor %g5, %g1, %g5 sub %g0, %l0, %l0 sllx %o0, %g3, %g3 mov -1, %g1 xor %o7, %g3, %g3 sllx %g1, %l0, %g1 stx %g5, [%i0] and %g1, %g3, %g1 xor %o7, %g1, %o7 ba,pt %xcc, .LL38 stx %o7, [%i0+8] .LL77: srax %o1, %l2, %g5 mov 64, %g1 sub %g1, %l2, %g1 sllx %o1, %g1, %g2 sllx %o0, %g1, %g1 or %g1, %g5, %g1 sllx %g4, 3, %g3 stx %g1, [%i0+8] ldx [%i0+16], %g4 sub %g0, %g3, %g3 xor %g4, %g2, %g2 mov -1, %g1 sllx %g1, %g3, %g1 and %g1, %g2, %g1 xor %g4, %g1, %g4 ba,pt %xcc, .LL38 stx %g4, [%i0+16] .LL75: bgu,pt %xcc, .LL79 sll %g5, 3, %l4 sll %g5, 3, %l2 xnor %g0, %l2, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 24 sllx %g1, %g2, %g1 srax %o0, %l2, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, .LL81 stx %g3, [%i0] sllx %g5, 2, %g2 mov 32, %g1 sub %g1, %g2, %g1 ldx [%i0+16], %o7 sllx %g4, 3, %g5 sllx %o0, %g1, %g3 sllx %o1, %g1, %g2 sllx %g3, %g1, %g3 sllx %g2, %g1, %g2 srax %o2, %l2, %l0 sub %g0, %g5, %g5 or %g2, %l0, %g2 srax %o1, %l2, %g4 xor %o7, %g2, %g2 or %g3, %g4, %g3 mov -1, %g1 stx %g3, [%i0+8] sllx %g1, %g5, %g1 and %g1, %g2, %g1 xor %o7, %g1, %o7 ba,pt %xcc, .LL38 stx %o7, [%i0+16] .LL79: xnor %g0, %l4, %g2 ldx [%i0], %g3 mov 2, %g1 cmp %g4, 32 sllx %g1, %g2, %g1 srax %o0, %l4, %g2 add %g1, -1, %g1 xor %g3, %g2, %g2 and %g1, %g2, %g1 xor %g3, %g1, %g3 bgu,pt %xcc, .LL83 stx %g3, [%i0] sllx %g5, 2, %g2 mov 32, %g1 sub %g1, %g2, %g1 ldx [%i0+24], %l0 sllx %g4, 3, %l1 sllx %o0, %g1, %g3 sllx %o1, %g1, %g4 sllx %g3, %g1, %g3 sllx %g4, %g1, %g4 sllx %o2, %g1, %g2 srax %o3, %l4, %l2 sllx %g2, %g1, %g2 sub %g0, %l1, %l1 or %g2, %l2, %g2 srax %o1, %l4, %g5 xor %l0, %g2, %g2 or %g3, %g5, %g3 srax %o2, %l4, %o7 mov -1, %g1 or %g4, %o7, %g4 sllx %g1, %l1, %g1 stx %g3, [%i0+8] and %g1, %g2, %g1 stx %g4, [%i0+16] xor %l0, %g1, %l0 ba,pt %xcc, .LL38 stx %l0, [%i0+24] .LL81: sllx %g4, 3, %g5 srax %o2, %l2, %l0 mov 64, %g1 sub %g1, %l2, %g1 sllx %o2, %g1, %g4 sllx %o0, %g1, %g2 sllx %o1, %g1, %g1 or %g1, %l0, %g1 ldx [%i0+24], %o7 sub %g0, %g5, %g5 xor %o7, %g4, %g4 stx %g1, [%i0+16] srax %o1, %l2, %g3 mov -1, %g1 or %g2, %g3, %g2 sllx %g1, %g5, %g1 stx %g2, [%i0+8] and %g1, %g4, %g1 xor %o7, %g1, %o7 ba,pt %xcc, .LL38 stx %o7, [%i0+24] .LL83: srax %o3, %l4, %l2 mov 64, %g1 sub %g1, %l4, %g1 sllx %o3, %g1, %o7 sllx %o0, %g1, %g2 sllx %o1, %g1, %g3 sllx %o2, %g1, %g1 or %g1, %l2, %g1 ldx [%i0+32], %l0 sllx %g4, 3, %l1 xor %l0, %o7, %o7 sub %g0, %l1, %l1 stx %g1, [%i0+24] srax %o1, %l4, %g4 srax %o2, %l4, %g5 or %g2, %g4, %g2 or %g3, %g5, %g3 mov -1, %g1 stx %g2, [%i0+8] sllx %g1, %l1, %g1 stx %g3, [%i0+16] and %g1, %o7, %g1 xor %l0, %g1, %l0 ba,pt %xcc, .LL38 stx %l0, [%i0+32] .size avcall_call, .-avcall_call .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/avcall/avcall.html0000664000000000000000000002522513146127475013601 00000000000000 AVCALL manual page

AVCALL manual page

Name

 avcall - build a C argument list incrementally and call a C function on it.

Synopsis

 
#include <avcall.h>
av_alist alist;
av_start_type (alist, &func, [[return_type,] &return_value]);
av_type (alist, [arg_type,] value);
av_call(alist);

Description

 This set of macros builds an argument list for a C function and calls the function on it. It significantly reduces the amount of ‘glue’ code required for parsers, debuggers, imbedded interpreters, C extensions to application programs and other situations where collections of functions need to be called on lists of externally- supplied arguments.

Function calling conventions differ considerably on different machines and avcall attempts to provide some degree of isolation from such architecture dependencies.

The interface is like stdarg(3) in reverse. All of the macros return 0 for success, < 0 for failure (e.g., argument list overflow or type-not-supported).

  1. #include <avcall.h> and declare the argument list structure av_alist alist;

  2. Set any special flags. This is architecture and compiler dependent. Compiler options that affect passing conventions may need to be flagged by #defines before the #include <avcall.h> statement. However, the configure script should have determined which #defines are needed and put them at the top of avcall.h.

  3. Initialize the alist with the function address and return value pointer (if any). There is a separate macro for each simple return type ([u]char, [u]short, [u]int, [u]long, [u]longlong, float, double, where ‘u’ indicates ‘unsigned’). The macros for functions returning structures or pointers require an explicit type argument.

    E.g., 

    av_start_int (alist, &func, &int_return);
av_start_double (alist, &func, &double_return);
av_start_void (alist, &func);
av_start_struct (alist, &func, struct_type, splittable, &struct_return);
av_start_ptr (alist, &func, pointer_type, &pointer_return);
    The splittable flag specifies whether the struct_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: 
    av_word_splittable_1 (type1)
av_word_splittable_2 (type1, type2)
av_word_splittable_3 (type1, type2, type3)
av_word_splittable_4 (type1, type2, type3, type4)
    For a struct with three slots 
    struct { type1 id1; type2 id2; type3 id3; }
    you can specify splittable as av_word_splittable_3 (type1, type2, type3).

  4. Push the arguments on to the list in order. Again there is a macro for each simple built-in type, and the macros for structure and pointer arguments require an extra type argument: 
    av_int (alist, int_value);
av_double (alist, double_value);
av_struct (alist, struct_or_union_type, struct_value);
av_ptr (alist, pointer_type, pointer_value);
  5. Call the function, set the return value, and tidy up: av_call (alist);

Notes
  1. Functions whose first declaration is in Kernighan & Ritchie style (i.e., without a typed argument list) MUST use default K&R C expression promotions (char and short to int, float to double) whether they are compiled by a K&R or an ANSI compiler, because the true argument types may not be known at the call point. Such functions typically back-convert their arguments to the declared types on function entry. (In fact, the only way to pass a true char, short or float in K&R C is by an explicit cast: func((char)c,(float)f) ). Similarly, some K&R compilers (such as Sun cc on the sparc) actually return a float as a double.

    Hence, for arguments of functions declared in K&R style you should use av_int() and av_double() rather than av_char(), av_short() or av_float(). If you use a K&R compiler, the avcall header files may be able to detect this and define av_float(), etc, appropriately, but with an ANSI compiler there is no way avcall can know how a function was declared, so you have to correct the argument types yourself.

  2. The explicit type arguments of the av_struct() and av_ptr() macros are typically used to calculate size, alignment, and passing conventions. This may not be sufficient for some machines with unusual structure and pointer handling: in this case additional av_start_type() and av_type() macros may be defined.

  3. The macros av_start_longlong(), av_start_ulonglong(), av_longlong() and av_ulonglong() work only if the C compiler has a working long long 64-bit integer type.

  4. The struct types used in av_start_struct() and av_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported.

See also

 stdarg(3), varargs(3).

Bugs
  • The current implementations have been tested on a selection of common cases but there are probably still many bugs.
  • There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments.
  • The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in registers and struct { char a[3]; } in memory, although both types have the same size and the same alignment.

Non-Bugs

 All information is passed in CPU registers and the stack. The avcall package is therefore multithread-safe.

Porting AVCALL

 Ports, bug-fixes, and suggestions are most welcome. The macros required for argument pushing are pretty grungy, but it does seem to be possible to port avcall to a range of machines. Ports to non-standard or non-32-bit machines are especially welcome so we can sort the interface out before it's too late.

Knowledge about argument passing conventions can be found in the gcc source, file gcc-2.6.3/config/cpu/cpu.h, section "Stack layout; function entry, exit and calling."

Some of the grunge is usually handled by a C or assembly level glue routine that actually pushes the arguments, calls the function and unpacks any return value. This is called avcall_call(). A precompiled assembler version for people without gcc is also made available. The routine should ideally have flags for the passing conventions of other compilers.

Many of the current routines waste a lot of stack space and generally do hairy things to stack frames - a bit more assembly code would probably help things along quite a bit here.

Author

Bill Triggs <Bill.Triggs@inrialpes.fr>, <Bill.Triggs@imag.fr>.

Acknowledgements

 Some initial ideas were stolen from the C interface to the Zelk extensions to Oliver Laumann's Elk scheme interpreter by J.P.Lewis, NEC C&C Research, <zilla@ccrl.nj.nec.com> (for Sun4 & SGI), and Roy Featherstone's <roy@robots.oxford.ac.uk> personal C interface library for Sun3, Sun4 & SGI. I also looked at the machine-dependent parts of the GCC and GDB distributions, and put the gcc asm() extensions to good use. Thanks guys!

This work was partly supported by EC-ESPRIT Basic Research Action SECOND.

AVCALL manual page
Bruno Haible <bruno@clisp.org>

Last modified: 14 January 2001. libffcall-2.5/avcall/avcall-arm64-macos-macro.S0000664000000000000000000001167114662622066016165 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) stp x29, x30, [sp, -48]! add x29, sp, 0 ldp x11, x12, [x0, 40] stp x19, x20, [sp, 16] sub x11, x11, x12 ldr w15, [x0, 64] asr x10, x11, 2 ldr w14, [x0, 136] cmp w10, wzr mov x19, x0 str d8, [sp, 32] sub sp, sp, $1040 ble L(6) mov x13, sp mov x9, 0 mov w11, w10 .p2align 2 L(86): ldr w10, [x12, x9, lsl 2] str w10, [x13, x9, lsl 2] add x9, x9, 1 cmp w11, w9 bgt L(86) L(6): cbz w15, L(7) cmp w15, 1 ldr x0, [x19, 72] bls L(7) cmp w15, 2 ldr x1, [x19, 80] beq L(7) cmp w15, 3 ldr x2, [x19, 88] beq L(7) cmp w15, 4 ldr x3, [x19, 96] beq L(7) cmp w15, 5 ldr x4, [x19, 104] beq L(7) cmp w15, 6 ldr x5, [x19, 112] beq L(7) cmp w15, 7 ldr x6, [x19, 120] beq L(7) ldr x7, [x19, 128] .p2align 2 L(7): cbz w14, L(9) ldr w9, [x19, 144] tbz x9, 0, L(10) ldr d0, [x19, 184] L(11): cmp w14, 1 bls L(9) tbnz x9, 1, L(119) ldr w10, [x19, 140] tbz x10, 1, L(14) ldr s1, [x19, 152] L(14): cmp w14, 2 beq L(9) tbz x9, 2, L(15) ldr d2, [x19, 200] L(16): cmp w14, 3 beq L(9) tbnz x9, 3, L(120) ldr w10, [x19, 140] tbz x10, 3, L(18) ldr s3, [x19, 160] L(18): cmp w14, 4 beq L(9) tbz x9, 4, L(19) ldr d4, [x19, 216] L(20): cmp w14, 5 beq L(9) tbz x9, 5, L(21) ldr d5, [x19, 224] L(22): cmp w14, 6 beq L(9) tbz x9, 6, L(23) ldr d6, [x19, 232] L(24): cmp w14, 7 beq L(9) tbz x9, 7, L(25) ldr d7, [x19, 240] .p2align 2 L(9): ldr w9, [x19, 24] cmp w9, 13 beq L(121) cmp w9, 14 beq L(122) ldr x9, [x19, 8] blr x9 mov x16, x0 ldr w9, [x19, 24] cmp w9, 1 beq L(27) cmp w9, 2 beq L(113) cmp w9, 3 beq L(113) cmp w9, 4 beq L(113) cmp w9, 5 beq L(114) cmp w9, 6 beq L(114) cmp w9, 7 beq L(115) cmp w9, 8 beq L(115) and w12, w9, -3 cmp w12, 9 beq L(117) sub w12, w9, $10 tst w12, -3 beq L(117) cmp w9, 15 beq L(117) cmp w9, 16 bne L(27) ldr w9, [x19] tbz x9, 9, L(27) ldr x12, [x19, 32] sub x9, x12, $1 cmp x9, 15 bhi L(27) ldr x13, [x19, 16] cmp x12, 8 and x9, x13, 7 and x13, x13, -8 add x12, x12, x9 bhi L(39) cmp x12, 8 lsl w11, w12, 3 bhi L(40) lsl w9, w9, 3 mov x12, 2 mov x14, 1 sub w11, w11, $1 lsl x14, x14, x9 lsl x11, x12, x11 lsl x9, x0, x9 sub x10, x11, x14 ldr d17, [x13] fmov d16, x10 fmov d8, x9 bif v8.8b, v17.8b, v16.8b str d8, [x13] L(27): add sp, x29, 0 ldr d8, [sp, 32] mov w0, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret .p2align 3 L(10): ldr w10, [x19, 140] tbz x10, 0, L(11) ldr s0, [x19, 148] b L(11) .p2align 3 L(113): ldr x9, [x19, 16] mov w0, 0 strb w16, [x9] ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret .p2align 3 L(119): ldr d1, [x19, 192] b L(14) .p2align 3 L(114): ldr x9, [x19, 16] mov w0, 0 strh w16, [x9] ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret L(117): ldr x9, [x19, 16] str x16, [x9] b L(27) .p2align 3 L(122): ldp x9, x20, [x19, 8] blr x9 str d0, [x20] mov w0, 0 ldr d8, [x29, 32] add sp, x29, 0 ldp x19, x20, [sp, 16] ldp x29, x30, [sp], 48 ret L(121): ldp x9, x20, [x19, 8] blr x9 str s0, [x20] b L(27) L(15): ldr w10, [x19, 140] tbz x10, 2, L(16) ldr s2, [x19, 156] b L(16) L(115): ldr x9, [x19, 16] str w16, [x9] b L(27) L(120): ldr d3, [x19, 208] b L(18) L(19): ldr w10, [x19, 140] tbz x10, 4, L(20) ldr s4, [x19, 164] b L(20) L(21): ldr w10, [x19, 140] tbz x10, 5, L(22) ldr s5, [x19, 168] b L(22) L(23): ldr w10, [x19, 140] tbz x10, 6, L(24) ldr s6, [x19, 172] b L(24) L(25): ldr w9, [x19, 140] tbz x9, 7, L(9) ldr s7, [x19, 176] b L(9) L(39): lsl w14, w9, 3 cmp x12, 16 movi d16, -1 lsl x15, x0, x14 dup v8.8b, w14 fmov d17, x15 ushl d16, d16, d8 ldr d8, [x13] bsl v16.8b, v17.8b, v8.8b str d16, [x13] bls L(123) lsl w12, w12, 3 mov x15, 2 neg w9, w9, lsl 3 sub w12, w12, $129 add w9, w9, 64 lsl x12, x15, x12 asr x11, x1, x9 asr x10, x0, x9 sub x9, x12, $1 ldr d17, [x13, 16] fmov d16, x11 lsl x14, x1, x14 fmov d8, x9 orr x10, x10, x14 bif v16.8b, v17.8b, v8.8b fmov x11, d16 stp x10, x11, [x13, 8] b L(27) L(40): lsl w14, w9, 3 neg w9, w9, lsl 3 movi d16, -1 add w10, w9, 64 dup v8.8b, w14 lsl x9, x0, x14 ldp d17, d18, [x13] mov x12, 2 sub w11, w11, $65 lsl x11, x12, x11 ushl d16, d16, d8 fmov d8, x9 asr x9, x0, x10 sub x10, x11, $1 bsl v16.8b, v8.8b, v17.8b fmov d8, x10 fmov d17, x9 str d16, [x13] bif v17.8b, v18.8b, v8.8b str d17, [x13, 8] b L(27) L(123): neg w9, w9, lsl 2 lsl w12, w12, 3 add w9, w9, 32 mov x15, 2 sub w12, w12, $65 lsl x11, x1, x14 lsl x12, x15, x12 asr x14, x0, x9 asr x10, x14, x9 sub x9, x12, $1 ldr d17, [x13, 8] fmov d8, x9 orr x9, x10, x11 fmov d16, x9 bif v16.8b, v17.8b, v8.8b str d16, [x13, 8] b L(27) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/avcall/avcall-arm-eabi-macro.S0000664000000000000000000000413014662622066015601 00000000000000#include "asm-arm.h" .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .text .align 2 .global C(avcall_call) .syntax unified .arm .fpu softvfp .type avcall_call, %function FUNBEGIN(avcall_call) // Function supports interworking. // args = 0, pretend = 0, frame = 0 // frame_needed = 1, uses_anonymous_args = 0 push {r4, r5, fp, lr} mov r4, r0 ldr r0, [r0, $20] ldr ip, [r4, $24] sub r3, sp, $1024 sub r2, r0, ip cmp r2, $19 add fp, sp, $12 sub sp, r3, $8 movgt r2, sp addgt r3, ip, $16 subgt r2, r2, $4 ble L(6) L(5): ldr r1, [r3], $4 cmp r0, r3 str r1, [r2, $4]! bne L(5) L(6): ldm ip, {r0, r1, r2, r3} ldr r5, [r4, $4] mov lr, pc bx r5 ldr r3, [r4, $12] cmp r3, $1 mov r2, r0 beq L(3) cmp r3, $2 beq L(34) cmp r3, $3 beq L(34) cmp r3, $4 beq L(34) cmp r3, $5 beq L(36) cmp r3, $6 beq L(36) cmp r3, $7 beq L(37) cmp r3, $8 beq L(37) cmp r3, $9 beq L(37) cmp r3, $10 beq L(37) sub ip, r3, $11 cmp ip, $1 bls L(38) cmp r3, $13 beq L(40) cmp r3, $14 beq L(41) cmp r3, $15 beq L(37) cmp r3, $16 bne L(3) ldr r3, [r4] tst r3, $512 beq L(3) ldr r3, [r4, $16] cmp r3, $1 beq L(34) cmp r3, $2 beq L(36) cmp r3, $4 bls L(37) cmp r3, $8 bne L(3) L(38): ldr r3, [r4, $8] str r2, [r3] str r1, [r3, $4] L(3): mov r0, $0 sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} bx lr L(34): mov r0, $0 ldr r3, [r4, $8] strb r2, [r3] sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} bx lr L(37): mov r0, $0 ldr r3, [r4, $8] str r2, [r3] sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} bx lr L(36): mov r0, $0 ldr r3, [r4, $8] strh r2, [r3] // movhi sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} bx lr L(40): ldr r3, [r4, $8] str r0, [r3] // float b L(3) L(41): ldr r3, [r4, $8] stm r3, {r0-r1} b L(3) FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/avcall/avcall-x86_64-macro.S0000664000000000000000000004312314662622067015070 00000000000000#include "asm-x86_64.h" TEXT() P2ALIGN(4,15) GLOBL(C(avcall_call)) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) L(FB2): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN1(push,q ,R(r13)) L(CFI2): INSN1(push,q ,R(r12)) L(CFI3): INSN1(push,q ,R(rbx)) L(CFI4): INSN2(mov,q ,R(rdi), R(rbx)) INSN2(lea,q ,X8 MEM_DISP(rbx,128), R(rdx)) INSN2(sub,q ,NUM(2072), R(rsp)) L(CFI5): INSN2(mov,q ,X8 MEM_DISP(rdi,40), R(rax)) INSN2(mov,q ,X8 MEM_DISP(rdi,48), R(r8)) INSN2(lea,q ,X8 MEM_DISP(rsp,15), R(rsi)) INSN2(sub,q ,R(r8), R(rax)) INSN2(and,q ,NUM(-16), R(rsi)) INSN2(mov,q ,R(rax), R(rdi)) INSN2(mov,q ,X8 MEM_DISP(rbx,120), R(rax)) INSN2(shr,q ,NUM(3), R(rdi)) INSN2(sub,q ,R(rdx), R(rax)) INSN2(mov,q ,R(rax), R(r9)) INSN2(shr,q ,NUM(3), R(r9)) INSN2(test,l ,R(edi), R(edi)) INSN1(jle,_ ,L(2)) INSN2(xor,l ,R(ecx), R(ecx)) INSN2(xor,l ,R(edx), R(edx)) P2ALIGN(4,7) L(4): INSN2(mov,q ,X8 MEM_INDEX(rdx,r8), R(rax)) INSN1(inc,l ,R(ecx)) INSN2(mov,q ,R(rax),X8 MEM_INDEX(rsi,rdx)) INSN2(add,q ,NUM(8), R(rdx)) INSN2(cmp,l ,R(ecx), R(edi)) INSN1(jne,_ ,L(4)) L(2): INSN2(mov,l ,X4 MEM_DISP(rbx,24), R(eax)) INSN2(cmp,l ,NUM(13), R(eax)) INSN1(je,_ ,L(124)) INSN2(cmp,l ,NUM(14), R(eax)) INSN1(je,_ ,L(125)) INSN2(cmp,l ,NUM(7), R(r9d)) INSN2(mov,q ,X8 MEM_DISP(rbx,8), R(r12)) INSN1(jle,_ ,L(58)) INSN2(movlp,d ,X8 MEM_DISP(rbx,184), R(xmm10)) L(60): INSN2(mov,q ,X8 MEM_DISP(rbx,176), R(r9)) L(63): INSN2(mov,q ,X8 MEM_DISP(rbx,168), R(r11)) L(66): INSN2(mov,q ,X8 MEM_DISP(rbx,160), R(r10)) L(69): INSN2(movlp,d ,X8 MEM_DISP(rbx,152), R(xmm8)) L(72): INSN2(mov,q ,X8 MEM_DISP(rbx,144), R(rax)) L(75): INSN2(mov,q ,X8 MEM_DISP(rbx,136), R(r8)) L(78): INSN2(movlp,d ,X8 MEM_DISP(rbx,128), R(xmm9)) L(81): INSN2(mov,q ,X8 MEM_DISP(rbx,88), R(rdx)) INSN2(mov,q ,X8 MEM_DISP(rbx,96), R(rcx)) INSN2S(movs,d ,R(xmm10), R(xmm7)) INSN2(mov,q ,X8 MEM_DISP(rbx,80), R(rsi)) INSN2(mov,q ,X8 MEM_DISP(rbx,72), R(rdi)) INSN2S(movs,d ,R(xmm8), R(xmm3)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm9), R(xmm0)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm6)) INSN2(mov,q ,R(r11),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm5)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm4)) INSN2(mov,q ,R(rax),X8 MEM_DISP(rbp,-32)) INSN2(mov,l ,NUM(8), R(eax)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm2)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm1)) INSN2(mov,q ,X8 MEM_DISP(rbx,112), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rbx,104), R(r8)) INSN1(call,_ ,INDIR(R(r12))) INSN2(mov,q ,R(rax), R(r8)) INSN2(mov,l ,X4 MEM_DISP(rbx,24), R(eax)) INSN2(mov,q ,R(rdx), R(r9)) INSN2(cmp,l ,NUM(1), R(eax)) INSN1(je,_ ,L(31)) INSN2(cmp,l ,NUM(2), R(eax)) INSN1(je,_ ,L(119)) INSN2(cmp,l ,NUM(3), R(eax)) INSN1(je,_ ,L(119)) INSN2(cmp,l ,NUM(4), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(119)) INSN2(cmp,l ,NUM(5), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(120)) INSN2(cmp,l ,NUM(6), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(120)) INSN2(cmp,l ,NUM(7), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(121)) INSN2(cmp,l ,NUM(8), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(121)) INSN2(cmp,l ,NUM(9), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(122)) INSN2(cmp,l ,NUM(10), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(122)) INSN2(cmp,l ,NUM(11), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(122)) INSN2(cmp,l ,NUM(12), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(122)) INSN2(cmp,l ,NUM(15), R(eax)) P2ALIGN(4,5) INSN1(je,_ ,L(122)) INSN2(cmp,l ,NUM(16), R(eax)) P2ALIGN(4,5) INSN1(jne,_ ,L(31)) INSN2(test,b ,NUM(2),X1 MEM_DISP(rbx,1)) P2ALIGN(4,5) INSN1(je,_ ,L(31)) INSN2(mov,q ,X8 MEM_DISP(rbx,32), R(rdx)) INSN2(lea,q ,X8 MEM_DISP(rdx,-1), R(rax)) INSN2(cmp,q ,NUM(15), R(rax)) INSN1(ja,_ ,L(31)) INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rax)) INSN2(mov,q ,R(rax), R(r10)) INSN2(mov,q ,R(rax), R(rdi)) INSN2(and,l ,NUM(7), R(edi)) INSN2(and,q ,NUM(-8), R(r10)) INSN2(cmp,q ,NUM(8), R(rdx)) INSN2(lea,q ,X8 MEM_INDEX(rdx,rdi), R(r11)) INSN1(ja,_ ,L(110)) INSN2(cmp,q ,NUM(8), R(r11)) INSN1(ja,_ ,L(112)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,r11,8), R(ecx)) INSN2(mov,q ,X8 MEM(r10), R(rsi)) INSN2(sal,l ,NUM(3), R(edi)) INSN2(mov,l ,NUM(2), R(edx)) INSN2(mov,l ,NUM(1), R(eax)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(sal,q ,R(cl), R(rax)) INSN2(sal,q ,R(cl), R(r8)) INSN2(xor,q ,R(rsi), R(r8)) INSN2(sub,q ,R(rax), R(rdx)) INSN2(and,q ,R(r8), R(rdx)) INSN2(xor,q ,R(rdx), R(rsi)) INSN2(mov,q ,R(rsi),X8 MEM(r10)) INSN1(jmp,_ ,L(31)) P2ALIGN(4,7) L(58): INSN1(je,_ ,L(126)) INSN2(cmp,l ,NUM(5), R(r9d)) INSN1(jle,_ ,L(64)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) P2ALIGN(4,3) INSN1(jmp,_ ,L(63)) L(119): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rax)) INSN2(mov,b ,R(r8b),X1 MEM(rax)) L(31): INSN2(lea,q ,X8 MEM_DISP(rbp,-24), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) INSN1(pop,q ,R(r12)) INSN1(pop,q ,R(r13)) leave ret L(124): INSN2(cmp,l ,NUM(7), R(r9d)) INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(r13)) INSN2(mov,q ,X8 MEM_DISP(rbx,8), R(r12)) INSN1(jle,_ ,L(7)) INSN2(movlp,d ,X8 MEM_DISP(rbx,184), R(xmm10)) L(9): INSN2(mov,q ,X8 MEM_DISP(rbx,176), R(r9)) L(12): INSN2(mov,q ,X8 MEM_DISP(rbx,168), R(r11)) L(15): INSN2(mov,q ,X8 MEM_DISP(rbx,160), R(r10)) L(18): INSN2(movlp,d ,X8 MEM_DISP(rbx,152), R(xmm8)) L(21): INSN2(mov,q ,X8 MEM_DISP(rbx,144), R(rax)) L(24): INSN2(mov,q ,X8 MEM_DISP(rbx,136), R(r8)) L(27): INSN2(movlp,d ,X8 MEM_DISP(rbx,128), R(xmm9)) L(30): INSN2(mov,q ,X8 MEM_DISP(rbx,96), R(rcx)) INSN2(mov,q ,X8 MEM_DISP(rbx,88), R(rdx)) INSN2S(movs,d ,R(xmm10), R(xmm7)) INSN2(mov,q ,X8 MEM_DISP(rbx,80), R(rsi)) INSN2(mov,q ,X8 MEM_DISP(rbx,72), R(rdi)) INSN2S(movs,d ,R(xmm8), R(xmm3)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm9), R(xmm0)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm6)) INSN2(mov,q ,R(r11),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm5)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm4)) INSN2(mov,q ,R(rax),X8 MEM_DISP(rbp,-32)) INSN2(mov,l ,NUM(8), R(eax)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm2)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm1)) INSN2(mov,q ,X8 MEM_DISP(rbx,112), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rbx,104), R(r8)) INSN1(call,_ ,INDIR(R(r12))) INSN2S(movs,s ,R(xmm0),X4 MEM(r13)) INSN2(lea,q ,X8 MEM_DISP(rbp,-24), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) INSN1(pop,q ,R(r12)) INSN1(pop,q ,R(r13)) leave ret L(125): INSN2(cmp,l ,NUM(7), R(r9d)) INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(r13)) INSN2(mov,q ,X8 MEM_DISP(rbx,8), R(r12)) INSN1(jle,_ ,L(34)) INSN2(movlp,d ,X8 MEM_DISP(rbx,184), R(xmm10)) L(36): INSN2(mov,q ,X8 MEM_DISP(rbx,176), R(r10)) L(39): INSN2(mov,q ,X8 MEM_DISP(rbx,168), R(r11)) L(42): INSN2(mov,q ,X8 MEM_DISP(rbx,160), R(r9)) L(45): INSN2(movlp,d ,X8 MEM_DISP(rbx,152), R(xmm8)) L(48): INSN2(mov,q ,X8 MEM_DISP(rbx,144), R(rax)) L(51): INSN2(mov,q ,X8 MEM_DISP(rbx,136), R(r8)) L(54): INSN2(movlp,d ,X8 MEM_DISP(rbx,128), R(xmm9)) L(57): INSN2(mov,q ,X8 MEM_DISP(rbx,96), R(rcx)) INSN2(mov,q ,X8 MEM_DISP(rbx,88), R(rdx)) INSN2S(movs,d ,R(xmm10), R(xmm7)) INSN2(mov,q ,X8 MEM_DISP(rbx,80), R(rsi)) INSN2(mov,q ,X8 MEM_DISP(rbx,72), R(rdi)) INSN2S(movs,d ,R(xmm8), R(xmm3)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm9), R(xmm0)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm6)) INSN2(mov,q ,R(r11),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm5)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm4)) INSN2(mov,q ,R(rax),X8 MEM_DISP(rbp,-32)) INSN2(mov,l ,NUM(8), R(eax)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm2)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm1)) INSN2(mov,q ,X8 MEM_DISP(rbx,112), R(r9)) INSN2(mov,q ,X8 MEM_DISP(rbx,104), R(r8)) INSN1(call,_ ,INDIR(R(r12))) INSN2S(movs,d ,R(xmm0),X8 MEM(r13)) INSN2(lea,q ,X8 MEM_DISP(rbp,-24), R(rsp)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,q ,R(rbx)) INSN1(pop,q ,R(r12)) INSN1(pop,q ,R(r13)) leave ret L(7): INSN1(jne,_ ,L(10)) INSN2(xorp,d ,R(xmm10), R(xmm10)) INSN1(jmp,_ ,L(9)) L(126): INSN2(xorp,d ,R(xmm10), R(xmm10)) P2ALIGN(4,7) INSN1(jmp,_ ,L(60)) L(34): P2ALIGN(4,7) INSN1(jne,_ ,L(37)) INSN2(xorp,d ,R(xmm10), R(xmm10)) P2ALIGN(4,7) INSN1(jmp,_ ,L(36)) L(120): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rax)) INSN2(mov,w ,R(r8w),X2 MEM(rax)) P2ALIGN(4,5) INSN1(jmp,_ ,L(31)) L(10): INSN2(cmp,l ,NUM(5), R(r9d)) P2ALIGN(4,3) INSN1(jg,_ ,L(127)) P2ALIGN(4,5) INSN1(jne,_ ,L(16)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(15)) L(64): P2ALIGN(4,3) INSN1(je,_ ,L(128)) INSN2(cmp,l ,NUM(3), R(r9d)) INSN1(jle,_ ,L(70)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(69)) L(37): INSN2(cmp,l ,NUM(5), R(r9d)) INSN1(jg,_ ,L(129)) INSN1(jne,_ ,L(43)) INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r10), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(42)) L(127): INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(12)) L(128): INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(66)) L(129): INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(39)) L(121): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rax)) INSN2(mov,l ,R(r8d),X4 MEM(rax)) INSN1(jmp,_ ,L(31)) L(122): INSN2(mov,q ,X8 MEM_DISP(rbx,16), R(rax)) INSN2(mov,q ,R(r8),X8 MEM(rax)) INSN1(jmp,_ ,L(31)) L(16): INSN2(cmp,l ,NUM(3), R(r9d)) INSN1(jle,_ ,L(19)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(18)) L(70): INSN1(jne,_ ,L(73)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(72)) L(43): INSN2(cmp,l ,NUM(3), R(r9d)) INSN1(jle,_ ,L(46)) INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r10), R(r9)) INSN2(mov,q ,R(r10), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN1(jmp,_ ,L(45)) L(19): INSN1(jne,_ ,L(22)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(21)) L(73): INSN2(cmp,l ,NUM(1), R(r9d)) INSN1(jle,_ ,L(76)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r9), R(rax)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(75)) L(46): INSN1(jne,_ ,L(49)) INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r10), R(r9)) INSN2(mov,q ,R(r10), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(48)) L(22): INSN2(cmp,l ,NUM(1), R(r9d)) INSN1(jle,_ ,L(25)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r9), R(rax)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(24)) L(49): INSN2(cmp,l ,NUM(1), R(r9d)) INSN1(jle,_ ,L(52)) INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r10), R(r9)) INSN2(mov,q ,R(r10), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r10), R(rax)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(51)) L(76): INSN1(jne,_ ,L(130)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r9), R(rax)) INSN2(mov,q ,R(r9), R(r8)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(78)) L(25): INSN1(jne,_ ,L(131)) INSN2(xor,l ,R(r9d), R(r9d)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r9), R(rax)) INSN2(mov,q ,R(r9), R(r8)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(27)) L(110): INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,rdi,8), R(r12)) INSN2(mov,q ,X8 MEM(r10), R(rsi)) INSN2(mov,q ,R(r8), R(rax)) INSN2(mov,q ,NUM(-1), R(rdx)) INSN2(mov,l ,R(r12d), R(ecx)) INSN2(sal,q ,R(cl), R(rax)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(xor,q ,R(rsi), R(rax)) INSN2(and,q ,R(rax), R(rdx)) INSN2(xor,q ,R(rdx), R(rsi)) INSN2(cmp,q ,NUM(16), R(r11)) INSN2(mov,q ,R(rsi),X8 MEM(r10)) INSN1(ja,_ ,L(114)) INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,rdi,4), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(edx)) INSN2(mov,l ,NUM(32), R(edi)) INSN2(mov,q ,X8 MEM_DISP(r10,8), R(rsi)) INSN2(sub,l ,R(eax), R(edi)) INSN2(mov,l ,R(edx), R(ecx)) INSN2(mov,l ,NUM(2), R(eax)) INSN2(sal,q ,R(cl), R(rax)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(sar,q ,R(cl), R(r8)) INSN1(dec,q ,R(rax)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,R(r12d), R(ecx)) INSN2(sal,q ,R(cl), R(r9)) INSN2(or,q ,R(r9), R(r8)) INSN2(xor,q ,R(rsi), R(r8)) INSN2(and,q ,R(r8), R(rax)) INSN2(xor,q ,R(rax), R(rsi)) INSN2(mov,q ,R(rsi),X8 MEM_DISP(r10,8)) INSN1(jmp,_ ,L(31)) L(112): INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,rdi,8), R(rsi)) INSN2(mov,q ,X8 MEM(r10), R(rdx)) INSN2(mov,q ,R(r8), R(rbx)) INSN2(mov,q ,NUM(-1), R(rax)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(rbx)) INSN2(sal,q ,R(cl), R(rax)) INSN2(mov,q ,R(rbx), R(rcx)) INSN2(xor,q ,R(rdx), R(rcx)) INSN2(and,q ,R(rcx), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(ecx)) INSN2(xor,q ,R(rax), R(rdx)) INSN2(mov,l ,NUM(2), R(eax)) INSN2(sal,q ,R(cl), R(rax)) INSN2(mov,q ,R(rdx),X8 MEM(r10)) INSN2(mov,l ,NUM(64), R(ecx)) INSN2(mov,q ,X8 MEM_DISP(r10,8), R(rdx)) INSN2(sub,l ,R(esi), R(ecx)) INSN1(dec,q ,R(rax)) INSN2(sar,q ,R(cl), R(r8)) INSN2(xor,q ,R(rdx), R(r8)) INSN2(and,q ,R(r8), R(rax)) INSN2(xor,q ,R(rax), R(rdx)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(r10,8)) INSN1(jmp,_ ,L(31)) L(52): INSN1(jne,_ ,L(132)) INSN2(xor,l ,R(r10d), R(r10d)) INSN2(mov,q ,R(r10),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,R(r10), R(r9)) INSN2(mov,q ,R(r10), R(r11)) INSN2(movlp,d ,X8 MEM_DISP(rbp,-32), R(xmm10)) INSN2(mov,q ,R(r10), R(rax)) INSN2(mov,q ,R(r10), R(r8)) INSN2S(movs,d ,R(xmm10), R(xmm8)) INSN1(jmp,_ ,L(54)) L(130): INSN2(xorp,d ,R(xmm9), R(xmm9)) INSN2S(movs,d ,R(xmm9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,X8 MEM_DISP(rbp,-32), R(r9)) INSN2S(movs,d ,R(xmm9), R(xmm10)) INSN2S(movs,d ,R(xmm9), R(xmm8)) INSN2(mov,q ,R(r9), R(r11)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(rax)) INSN2(mov,q ,R(r9), R(r8)) INSN1(jmp,_ ,L(81)) L(114): INSN2(mov,l ,NUM(64), R(esi)) INSN2(mov,q ,R(r9), R(rax)) INSN2(mov,q ,X8 MEM_DISP(r10,16), R(rdx)) INSN2(sub,l ,R(r12d), R(esi)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,R(r12d), R(ecx)) INSN2(sal,q ,R(cl), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-129,r11,8), R(ecx)) INSN2(or,q ,R(r8), R(rax)) INSN2(mov,q ,R(rax),X8 MEM_DISP(r10,8)) INSN2(mov,l ,NUM(2), R(eax)) INSN2(sal,q ,R(cl), R(rax)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sar,q ,R(cl), R(r9)) INSN1(dec,q ,R(rax)) INSN2(xor,q ,R(rdx), R(r9)) INSN2(and,q ,R(r9), R(rax)) INSN2(xor,q ,R(rax), R(rdx)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(r10,16)) INSN1(jmp,_ ,L(31)) L(131): INSN2(xorp,d ,R(xmm9), R(xmm9)) INSN2S(movs,d ,R(xmm9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,X8 MEM_DISP(rbp,-32), R(r9)) INSN2S(movs,d ,R(xmm9), R(xmm10)) INSN2S(movs,d ,R(xmm9), R(xmm8)) INSN2(mov,q ,R(r9), R(r11)) INSN2(mov,q ,R(r9), R(r10)) INSN2(mov,q ,R(r9), R(rax)) INSN2(mov,q ,R(r9), R(r8)) INSN1(jmp,_ ,L(30)) L(132): INSN2(xorp,d ,R(xmm9), R(xmm9)) INSN2S(movs,d ,R(xmm9),X8 MEM_DISP(rbp,-32)) INSN2(mov,q ,X8 MEM_DISP(rbp,-32), R(r10)) INSN2S(movs,d ,R(xmm9), R(xmm10)) INSN2S(movs,d ,R(xmm9), R(xmm8)) INSN2(mov,q ,R(r10), R(r11)) INSN2(mov,q ,R(r10), R(r9)) INSN2(mov,q ,R(r10), R(rax)) INSN2(mov,q ,R(r10), R(r8)) INSN1(jmp,_ ,L(57)) L(FE2): FUNEND(avcall_call, .-avcall_call) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0x0 .byte 0x1 .string "zR" .uleb128 0x1 .sleb128 -8 .byte 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB2)-. .long L(FE2)-.LFB2 .uleb128 0x0 .byte 0x4 .long L(CFI0)-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI4)-.LCFI1 .byte 0x83 .uleb128 0x5 .byte 0x8c .uleb128 0x4 .byte 0x8d .uleb128 0x3 .align 8 L(EFDE1): #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/tests.c0000664000000000000000000010275614662613003012753 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2019 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Some test routines for avcall foreign function interface. The coverage is entirely random, this just contains some of the things that I think are likely to break. We really need to add some more pointer (void* / char* / func*) tests and some varargs ones, and also try to test structure alignment more throughly. ----------------------------------------------------------------------*/ #include #include #include #include "avcall.h" #include "testcases.c" #if defined(__hppa__) && defined(__GNUC__) #if (__GNUC__ == 2 && __GNUC_MINOR__ < 6) /* gcc-2.5.2 bugs prevent the T test from working. */ #define SKIP_T #endif #endif #if defined(__m68k__) && defined(__GNUC__) /* "gcc-2.6.3 -freg-struct-return" returns T = struct { char c[3]; } (which * has size 4 !) in memory, in contrast to struct { char a,b,c; } and * struct { char c[4]; } and struct { char a,b,c,d; } which have the same * size and the same alignment but are returned in registers. I don't know why. */ #define SKIP_T #endif /* * The way we run these tests - first call the function directly, then * through av_call() - there is the danger that arguments or results seem * to be passed correctly, but what we are seeing are in fact the vestiges * (traces) or the previous call. This may seriously fake the test. * Avoid this by clearing the registers between the first and the second call. */ long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h, long i, long j, long k, long l, long m, long n, long o, long p) { return 0; } float clear_traces_f (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p) { return 0.0; } double clear_traces_d (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, double n, double o, double p) { return 0.0; } J clear_traces_J (void) { J j; j.l1 = j.l2 = 0; return j; } void clear_traces (void) { clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0); clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_J(); } void void_tests (void) { av_alist a; v_v(); clear_traces(); av_start_void(a,v_v); av_call(a); return; } void int_tests (void) { av_alist a; int ir; ir = i_v(); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_v,&ir); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i(i1); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i,&ir); av_int(a,i1); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i2(i1,i2); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i2,&ir); av_int(a,i1); av_int(a,i2); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i4(i1,i2,i3,i4); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i4,&ir); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_int(a,i4); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i8,&ir); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_int(a,i4); av_int(a,i5); av_int(a,i6); av_int(a,i7); av_int(a,i8); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i16,&ir); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_int(a,i4); av_int(a,i5); av_int(a,i6); av_int(a,i7); av_int(a,i8); av_int(a,i9); av_int(a,i10); av_int(a,i11); av_int(a,i12); av_int(a,i13); av_int(a,i14); av_int(a,i15); av_int(a,i16); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); av_start_int(a,i_i32,&ir); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_int(a,i4); av_int(a,i5); av_int(a,i6); av_int(a,i7); av_int(a,i8); av_int(a,i9); av_int(a,i10); av_int(a,i11); av_int(a,i12); av_int(a,i13); av_int(a,i14); av_int(a,i15); av_int(a,i16); av_int(a,i17); av_int(a,i18); av_int(a,i19); av_int(a,i20); av_int(a,i21); av_int(a,i22); av_int(a,i23); av_int(a,i24); av_int(a,i25); av_int(a,i26); av_int(a,i27); av_int(a,i28); av_int(a,i29); av_int(a,i30); av_int(a,i31); av_int(a,i32); av_call(a); fprintf(out,"->%d\n",ir); fflush(out); return; } void float_tests (void) { av_alist a; float fr; fr = f_f(f1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f,&fr); av_float(a,f1); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2(f1,f2); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f2,&fr); av_float(a,f1); av_float(a,f2); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4(f1,f2,f3,f4); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f4,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f8,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f16,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_float(a,f9); av_float(a,f10); av_float(a,f11); av_float(a,f12); av_float(a,f13); av_float(a,f14); av_float(a,f15); av_float(a,f16); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f24,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_float(a,f9); av_float(a,f10); av_float(a,f11); av_float(a,f12); av_float(a,f13); av_float(a,f14); av_float(a,f15); av_float(a,f16); av_float(a,f17); av_float(a,f18); av_float(a,f19); av_float(a,f20); av_float(a,f21); av_float(a,f22); av_float(a,f23); av_float(a,f24); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); } void double_tests (void) { av_alist a; double dr; dr = d_d(d1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d,&dr); av_double(a,d1); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2(d1,d2); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d2,&dr); av_double(a,d1); av_double(a,d2); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4(d1,d2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d4,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d8,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d16,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_double(a,d9); av_double(a,d10); av_double(a,d11); av_double(a,d12); av_double(a,d13); av_double(a,d14); av_double(a,d15); av_double(a,d16); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); return; } void pointer_tests (void) { av_alist a; void* vpr; vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4); fprintf(out,"->0x%p\n",vpr); fflush(out); vpr = 0; clear_traces(); av_start_ptr(a,vp_vpdpcpsp,void*,&vpr); av_ptr(a,void*,&uc1); av_ptr(a,double*,&d2); av_ptr(a,char*,str3); av_ptr(a,Int*,&I4); av_call(a); fprintf(out,"->0x%p\n",vpr); fflush(out); return; } void mixed_number_tests (void) { av_alist a; uchar ucr; ushort usr; float fr; double dr; long long llr; /* Unsigned types. */ ucr = uc_ucsil(uc1,us2,ui3,ul4); fprintf(out,"->%u\n",ucr); fflush(out); ucr = 0; clear_traces(); av_start_uchar(a,uc_ucsil,&ucr); av_uchar(a,uc1); av_ushort(a,us2); av_uint(a,ui3); av_ulong(a,ul4); av_call(a); fprintf(out,"->%u\n",ucr); fflush(out); /* Mixed int & float types. */ dr = d_iidd(i1,i2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_iidd,&dr); av_int(a,i1); av_int(a,i2); av_double(a,d3); av_double(a,d4); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_iiidi(i1,i2,i3,d4,i5); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_iiidi,&dr); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_double(a,d4); av_int(a,i5); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_idid(i1,d2,i3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_idid,&dr); av_int(a,i1); av_double(a,d2); av_int(a,i3); av_double(a,d4); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_fdi(f1,d2,i3); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_fdi,&dr); av_float(a,f1); av_double(a,d2); av_int(a,i3); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); usr = us_cdcd(c1,d2,c3,d4); fprintf(out,"->%u\n",usr); fflush(out); usr = 0; clear_traces(); av_start_ushort(a,us_cdcd,&usr); av_char(a,c1); av_double(a,d2); av_char(a,c3); av_double(a,d4); av_call(a); fprintf(out,"->%u\n",usr); fflush(out); /* Long long types. */ llr = ll_iiilli(i1,i2,i3,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_iiilli,&llr); av_int(a,i1); av_int(a,i2); av_int(a,i3); av_longlong(a,ll1); av_int(a,i13); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_flli(f13,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_flli,&llr); av_float(a,f13); av_longlong(a,ll1); av_int(a,i13); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); fr = f_fi(f1,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_fi,&fr); av_float(a,f1); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2i(f1,f2,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f2i,&fr); av_float(a,f1); av_float(a,f2); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f3i(f1,f2,f3,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f3i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4i(f1,f2,f3,f4,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f4i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f7i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f8i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f12i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_float(a,f9); av_float(a,f10); av_float(a,f11); av_float(a,f12); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f13i,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_float(a,f9); av_float(a,f10); av_float(a,f11); av_float(a,f12); av_float(a,f13); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); dr = d_di(d1,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_di,&dr); av_double(a,d1); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2i(d1,d2,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d2i,&dr); av_double(a,d1); av_double(a,d2); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d3i(d1,d2,d3,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d3i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4i(d1,d2,d3,d4,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d4i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d7i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d8i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d12i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_double(a,d9); av_double(a,d10); av_double(a,d11); av_double(a,d12); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d13i,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_double(a,d9); av_double(a,d10); av_double(a,d11); av_double(a,d12); av_double(a,d13); av_int(a,i9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); return; } void small_structure_return_tests (void) { av_alist a; { Size1 r = S1_v(); fprintf(out,"->{%c}\n",r.x1); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S1_v,Size1,1,&r); av_call(a); fprintf(out,"->{%c}\n",r.x1); fflush(out); } { Size2 r = S2_v(); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S2_v,Size2,1,&r); av_call(a); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); } { Size3 r = S3_v(); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S3_v,Size3,1,&r); av_call(a); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); } { Size4 r = S4_v(); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S4_v,Size4,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); } { Size7 r = S7_v(); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S7_v,Size7,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); } { Size8 r = S8_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S8_v,Size8,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); } { Size12 r = S12_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S12_v,Size12,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); } { Size15 r = S15_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S15_v,Size15,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); } { Size16 r = S16_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); av_start_struct(a,S16_v,Size16,1,&r); av_call(a); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); } } void structure_tests (void) { av_alist a; Int Ir; Char Cr; Float Fr; Double Dr; J Jr; T Tr; X Xr; Ir = I_III(I1,I2,I3); fprintf(out,"->{%d}\n",Ir.x); fflush(out); Ir.x = 0; clear_traces(); av_start_struct(a,I_III,Int,1,&Ir); av_struct(a,Int,I1); av_struct(a,Int,I2); av_struct(a,Int,I3); av_call(a); fprintf(out,"->{%d}\n",Ir.x); fflush(out); #ifndef SKIP_EXTRA_STRUCTS Cr = C_CdC(C1,d2,C3); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Cr.x = '\0'; clear_traces(); av_start_struct(a,C_CdC,Char,1,&Cr); av_struct(a,Char,C1); av_double(a,d2); av_struct(a,Char,C3); av_call(a); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Fr = F_Ffd(F1,f2,d3); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Fr.x = 0.0; clear_traces(); av_start_struct(a,F_Ffd,Float,av_word_splittable_1(float),&Fr); av_struct(a,Float,F1); av_float(a,f2); av_double(a,d3); av_call(a); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Dr = D_fDd(f1,D2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); av_start_struct(a,D_fDd,Double,av_word_splittable_1(double),&Dr); av_float(a,f1); av_struct(a,Double,D2); av_double(a,d3); av_call(a); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr = D_Dfd(D1,f2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); av_start_struct(a,D_Dfd,Double,av_word_splittable_1(double),&Dr); av_struct(a,Double,D1); av_float(a,f2); av_double(a,d3); av_call(a); fprintf(out,"->{%g}\n",Dr.x); fflush(out); #endif Jr = J_JiJ(J1,i2,J2); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); Jr.l1 = Jr.l2 = 0; clear_traces(); av_start_struct(a,J_JiJ,J,av_word_splittable_2(long,long),&Jr); av_struct(a,J,J1); av_int(a,i2); av_struct(a,J,J2); av_call(a); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); #ifndef SKIP_EXTRA_STRUCTS #ifndef SKIP_T Tr = T_TcT(T1,' ',T2); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces(); av_start_struct(a,T_TcT,T,1,&Tr); av_struct(a,T,T1); av_char(a,' '); av_struct(a,T,T2); av_call(a); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); #endif Xr = X_BcdB(B1,c2,d3,B2); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); Xr.c[0]=Xr.c1='\0'; clear_traces(); av_start_struct(a,X_BcdB,X,0,&Xr); av_struct(a,B,B1); av_char(a,c2); av_double(a,d3); av_struct(a,B,B2); av_call(a); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); #endif return; } void gpargs_boundary_tests (void) { av_alist a; long lr; long long llr; float fr; double dr; lr = l_l0J(J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l0J,&lr); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1J(l1,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l1J,&lr); av_long(a,l1); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2J(l1,l2,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l2J,&lr); av_long(a,l1); av_long(a,l2); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3J(l1,l2,l3,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l3J,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4J(l1,l2,l3,l4,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l4J,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5J(l1,l2,l3,l4,l5,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l5J,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l6J,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l7J,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_long(a,l7); av_struct(a,J,J1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l0K(K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l0K,&lr); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1K(l1,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l1K,&lr); av_long(a,l1); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2K(l1,l2,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l2K,&lr); av_long(a,l1); av_long(a,l2); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3K(l1,l2,l3,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l3K,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4K(l1,l2,l3,l4,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l4K,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5K(l1,l2,l3,l4,l5,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l5K,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); av_start_long(a,l_l6K,&lr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_struct(a,K,K1); av_long(a,l9); av_call(a); fprintf(out,"->%ld\n",lr); fflush(out); fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); av_start_float(a,f_f17l3L,&fr); av_float(a,f1); av_float(a,f2); av_float(a,f3); av_float(a,f4); av_float(a,f5); av_float(a,f6); av_float(a,f7); av_float(a,f8); av_float(a,f9); av_float(a,f10); av_float(a,f11); av_float(a,f12); av_float(a,f13); av_float(a,f14); av_float(a,f15); av_float(a,f16); av_float(a,f17); av_long(a,l6); av_long(a,l7); av_long(a,l8); av_struct(a,L,L1); av_call(a); fprintf(out,"->%g\n",fr); fflush(out); dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_d17l3L,&dr); av_double(a,d1); av_double(a,d2); av_double(a,d3); av_double(a,d4); av_double(a,d5); av_double(a,d6); av_double(a,d7); av_double(a,d8); av_double(a,d9); av_double(a,d10); av_double(a,d11); av_double(a,d12); av_double(a,d13); av_double(a,d14); av_double(a,d15); av_double(a,d16); av_double(a,d17); av_long(a,l6); av_long(a,l7); av_long(a,l8); av_struct(a,L,L1); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); llr = ll_l2ll(l1,l2,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l2ll,&llr); av_long(a,l1); av_long(a,l2); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l3ll(l1,l2,l3,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l3ll,&llr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l4ll(l1,l2,l3,l4,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l4ll,&llr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l5ll,&llr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l6ll,&llr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); av_start_longlong(a,ll_l7ll,&llr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_long(a,l7); av_longlong(a,ll1); av_long(a,l9); av_call(a); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); dr = d_l2d(l1,l2,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l2d,&dr); av_long(a,l1); av_long(a,l2); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l3d(l1,l2,l3,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l3d,&dr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l4d(l1,l2,l3,l4,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l4d,&dr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l5d(l1,l2,l3,l4,l5,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l5d,&dr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l6d(l1,l2,l3,l4,l5,l6,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l6d,&dr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,d2,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); av_start_double(a,d_l7d,&dr); av_long(a,l1); av_long(a,l2); av_long(a,l3); av_long(a,l4); av_long(a,l5); av_long(a,l6); av_long(a,l7); av_double(a,d2); av_long(a,l9); av_call(a); fprintf(out,"->%g\n",dr); fflush(out); return; } /* Verify that structs larger than 2 words are really passed by value, not accidentally by reference. */ void by_value_tests (void) { av_alist a; K k; k.l1 = l1; k.l2 = l2; k.l3 = l3; k.l4 = l4; fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); clear_traces(); av_start_void(a,v_clobber_K); av_struct(a,K,k); av_call(a); fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); } int main (void) { out = stdout; void_tests(); int_tests(); float_tests(); double_tests(); pointer_tests(); mixed_number_tests(); small_structure_return_tests(); structure_tests(); gpargs_boundary_tests(); by_value_tests(); exit(0); } libffcall-2.5/avcall/avcall-ia64.c0000664000000000000000000003541614662703167013625 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2024 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for a Intel IA-64 in little-endian mode with gcc. This calls a C function with an argument list built up using macros defined in avcall.h. IA-64 64-bit Argument Passing Conventions: The argument sequence is mapped linearly on the registers r32,...,r39, and continued on the stack, in [r12+16], [r12+24], ... Items in this sequence are word-aligned. In gcc < 3.0, structures larger than a single word are even two-word-aligned. Integer/pointer arguments are passed in the allocated slots (registers or stack slots). The first 8 float/double arguments are passed in registers f8,...,f15 instead, but their slots are kept allocated. Structure args are passed like multiple integer arguments; except that structures consisting only of floats or only of doubles are passed like multiple float arguments or multiple double arguments, respectively. Integers and pointers are returned in r8, floats and doubles in f8. Structures consisting only of at most 8 floats or only of at most 8 doubles are returned in f8,...,f15. Other than that, structures of size <= 32 bytes are returned in r8,...,r11, as if these were 4 contiguous words in memory. Larger structures are returned in memory; the caller passes the address of the target memory area in r8, and it is returned unmodified in r8. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avword* sret __asm__("r8"); /* structure return pointer */ /*register __avrword iret __asm__("r8");*/ register __avrword iret2 __asm__("r9"); register __avrword iret3 __asm__("r10"); register __avrword iret4 __asm__("r11"); /*register float fret __asm__("f8");*/ /*register double dret __asm__("f8");*/ register double farg1 __asm__("f8"); register double farg2 __asm__("f9"); register double farg3 __asm__("f10"); register double farg4 __asm__("f11"); register double farg5 __asm__("f12"); register double farg6 __asm__("f13"); register double farg7 __asm__("f14"); register double farg8 __asm__("f15"); int avcall_call(av_alist* list) { register __avword* sp __asm__("r12"); /* C names for registers */ __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; int farglen = l->faptr - l->fargs; __avrword iret; { int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i-8] = l->args[i]; } /* struct return address */ if (l->rtype == __AVstruct) sret = l->raddr; /* put max. 8 double args in registers */ if (farglen > 0) { farg1 = l->fargs[0]; if (farglen > 1) { farg2 = l->fargs[1]; if (farglen > 2) { farg3 = l->fargs[2]; if (farglen > 3) { farg4 = l->fargs[3]; if (farglen > 4) { farg5 = l->fargs[4]; if (farglen > 5) { farg6 = l->fargs[5]; if (farglen > 6) { farg7 = l->fargs[6]; if (farglen > 7) farg8 = l->fargs[7]; } } } } } } } /* call function, pass 8 integer and 8 double args in registers */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5], l->args[6], l->args[7]); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5], l->args[6], l->args[7]); } else { iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5], l->args[6], l->args[7]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 32 in registers. */ if (l->rsize > 0 && l->rsize <= 32) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize >= 1) ((unsigned char *)raddr)[0] = (unsigned char)(iret); if (l->rsize >= 2) ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); if (l->rsize >= 3) ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); if (l->rsize >= 4) ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); if (l->rsize >= 5) ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); if (l->rsize >= 6) ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); if (l->rsize >= 7) ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); if (l->rsize >= 8) ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize >= 9) { ((unsigned char *)raddr)[8] = (unsigned char)(iret2); if (l->rsize >= 10) ((unsigned char *)raddr)[9] = (unsigned char)(iret2>>8); if (l->rsize >= 11) ((unsigned char *)raddr)[10] = (unsigned char)(iret2>>16); if (l->rsize >= 12) ((unsigned char *)raddr)[11] = (unsigned char)(iret2>>24); if (l->rsize >= 13) ((unsigned char *)raddr)[12] = (unsigned char)(iret2>>32); if (l->rsize >= 14) ((unsigned char *)raddr)[13] = (unsigned char)(iret2>>40); if (l->rsize >= 15) ((unsigned char *)raddr)[14] = (unsigned char)(iret2>>48); if (l->rsize >= 16) ((unsigned char *)raddr)[15] = (unsigned char)(iret2>>56); if (l->rsize >= 17) { ((unsigned char *)raddr)[16] = (unsigned char)(iret3); if (l->rsize >= 18) ((unsigned char *)raddr)[17] = (unsigned char)(iret3>>8); if (l->rsize >= 19) ((unsigned char *)raddr)[18] = (unsigned char)(iret3>>16); if (l->rsize >= 20) ((unsigned char *)raddr)[19] = (unsigned char)(iret3>>24); if (l->rsize >= 21) ((unsigned char *)raddr)[20] = (unsigned char)(iret3>>32); if (l->rsize >= 22) ((unsigned char *)raddr)[21] = (unsigned char)(iret3>>40); if (l->rsize >= 23) ((unsigned char *)raddr)[22] = (unsigned char)(iret3>>48); if (l->rsize >= 24) ((unsigned char *)raddr)[23] = (unsigned char)(iret3>>56); if (l->rsize >= 25) { ((unsigned char *)raddr)[24] = (unsigned char)(iret4); if (l->rsize >= 26) ((unsigned char *)raddr)[25] = (unsigned char)(iret4>>8); if (l->rsize >= 27) ((unsigned char *)raddr)[26] = (unsigned char)(iret4>>16); if (l->rsize >= 28) ((unsigned char *)raddr)[27] = (unsigned char)(iret4>>24); if (l->rsize >= 29) ((unsigned char *)raddr)[28] = (unsigned char)(iret4>>32); if (l->rsize >= 30) ((unsigned char *)raddr)[29] = (unsigned char)(iret4>>40); if (l->rsize >= 31) ((unsigned char *)raddr)[30] = (unsigned char)(iret4>>48); if (l->rsize >= 32) ((unsigned char *)raddr)[31] = (unsigned char)(iret4>>56); } } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 4*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else if (count <= 2*sizeof(__avrword)) { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } else if (count <= 3*sizeof(__avrword)) { /* Use iret, iret2, iret3. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 3*sizeof(__avrword)) { /* 2*sizeof(__avrword) < end_offset ≤ 3*sizeof(__avrword) */ __avrword mask2 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ ((iret2 >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret3 << (start_offset*8)))) & mask2; } else { /* 3*sizeof(__avrword) < end_offset < 4*sizeof(__avrword), start_offset > 0 */ __avrword mask3 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] = (iret2 >> (sizeof(__avrword)*8-start_offset*8)) | (iret3 << (start_offset*8)); wordaddr[3] ^= (wordaddr[3] ^ (iret3 >> (sizeof(__avrword)*8-start_offset*8))) & mask3; } } else { /* Use iret, iret2, iret3, iret4. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 4*sizeof(__avrword)) { /* 3*sizeof(__avrword) < end_offset ≤ 4*sizeof(__avrword) */ __avrword mask3 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)); wordaddr[2] = (iret2 >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret3 << (start_offset*8)); wordaddr[3] ^= (wordaddr[3] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask3; } else { /* 4*sizeof(__avrword) < end_offset < 5*sizeof(__avrword), start_offset > 0 */ __avrword mask4 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] = (iret2 >> (sizeof(__avrword)*8-start_offset*8)) | (iret3 << (start_offset*8)); wordaddr[3] = (iret3 >> (sizeof(__avrword)*8-start_offset*8)) | (iret4 << (start_offset*8)); wordaddr[4] ^= (wordaddr[4] ^ (iret4 >> (sizeof(__avrword)*8-start_offset*8))) & mask4; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall.h0000664000000000000000000005265614662613237013074 00000000000000/* * Copyright 1993-1995 Bill Triggs * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _AVCALL_H #define _AVCALL_H /*---------------------------------------------------------------------- av_call() foreign function interface. Varargs-style macros to build a C argument list incrementally and call a function on it. ----------------------------------------------------------------------*/ #include #include "ffcall-version.h" #include "ffcall-abi.h" /* Max # words in argument-list and temporary structure storage. * If defined(__hppa__) && !defined(__hppa64__), this must be a multiple of 2. */ #ifndef __AV_ALIST_WORDS #define __AV_ALIST_WORDS 256 #endif /* Determine whether the current ABI is LLP64 ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */ #if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__) #define __AV_LLP64 1 #endif /* Determine the alignment of a type at compile time. */ #if defined(__GNUC__) || defined(__IBM__ALIGNOF__) #define __AV_alignof __alignof__ #elif defined(__cplusplus) template struct __AV_alignof_helper { char __slot1; type __slot2; }; #define __AV_alignof(type) offsetof (__AV_alignof_helper, __slot2) #elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */ #define __AV_alignof __builtin_alignof #else #define __AV_offsetof(type,ident) ((unsigned long)&(((type*)0)->ident)) #define __AV_alignof(type) __AV_offsetof(struct { char __slot1; type __slot2; }, __slot2) #endif #ifdef __cplusplus extern "C" { #endif /* __avword represents a single word that can be pushed on the stack. * __avrword represents a general-purpose register. */ #if defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) typedef int __avword; typedef long __avrword; #elif defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__AV_LLP64) typedef long long __avword; typedef long long __avrword; #else typedef long __avword; typedef long __avrword; #endif /* C builtin types. */ enum __AVtype { __AVword, /* just a dummy, for binary backward compatibility */ __AVvoid, __AVchar, __AVschar, __AVuchar, __AVshort, __AVushort, __AVint, __AVuint, __AVlong, __AVulong, __AVlonglong, __AVulonglong, __AVfloat, __AVdouble, __AVvoidp, __AVstruct }; enum __AV_alist_flags { /* how to return structs */ /* There are basically 3 ways to return structs: * a. The called function returns a pointer to static data. Not reentrant. * Not supported any more. * b. The caller passes the return structure address in a dedicated register * or as a first (or last), invisible argument. The called function stores * its result there. * c. Like b, and the called function also returns the return structure * address in the return value register. (This is not very distinguishable * from b.) * Independently of this, * r. small structures (<= 4 or <= 8 bytes) may be returned in the return * value register(s), or * m. even small structures are passed in memory. */ /* gcc-2.6.3 employs the following strategy: * - If PCC_STATIC_STRUCT_RETURN is defined in the machine description * it uses method a, else method c. * - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description) * it uses method m, else (either by -freg-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description) * method r. */ __AV_SMALL_STRUCT_RETURN = 1<<1, /* r: special case for small structs */ __AV_GCC_STRUCT_RETURN = 1<<2, /* consider 8 byte structs as small */ #if defined(__sparc__) && !defined(__sparc64__) __AV_SUNCC_STRUCT_RETURN = 1<<3, __AV_SUNPROCC_STRUCT_RETURN = 1<<4, #endif #if defined(__i386__) __AV_MSVC_STRUCT_RETURN = 1<<4, #endif /* the default way to return structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another struct returning convention, * just #define __AV_STRUCT_RETURN ... * before or after #including . */ #ifndef __AV_STRUCT_RETURN __AV_STRUCT_RETURN = #if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */ __AV_SUNPROCC_STRUCT_RETURN, #else #if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || (defined(__powerpc__) && !defined(__powerpc64__) && (defined(__FreeBSD__) || defined(__DragonFly__) || defined(__NetBSD__))) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) __AV_SMALL_STRUCT_RETURN | #endif #if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3))) __AV_GCC_STRUCT_RETURN | #endif #if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */ __AV_MSVC_STRUCT_RETURN | #endif 0, #endif #endif /* how to return floats */ #if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) __AV_SUNCC_FLOAT_RETURN = 1<<5, #endif #if defined(__m68k__) __AV_FREG_FLOAT_RETURN = 1<<6, #endif /* the default way to return floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float returning convention, * just #define __AV_FLOAT_RETURN ... * before or after #including . */ #ifndef __AV_FLOAT_RETURN #if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* Sun cc or CC */ __AV_FLOAT_RETURN = __AV_SUNCC_FLOAT_RETURN, #elif defined(__m68k__) __AV_FLOAT_RETURN = __AV_FREG_FLOAT_RETURN, #else __AV_FLOAT_RETURN = 0, #endif #endif /* how to pass structs */ #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) __AV_SGICC_STRUCT_ARGS = 1<<7, #endif #if defined(__powerpc__) || defined(__powerpc64__) __AV_AIXCC_STRUCT_ARGS = 1<<7, #endif #if defined(__ia64__) __AV_OLDGCC_STRUCT_ARGS = 1<<7, #endif /* the default way to pass structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another struct passing convention, * just #define __AV_STRUCT_ARGS ... * before or after #including . */ #ifndef __AV_STRUCT_ARGS #if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */ __AV_STRUCT_ARGS = __AV_SGICC_STRUCT_ARGS, #else #if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */ __AV_STRUCT_ARGS = __AV_SGICC_STRUCT_ARGS, #else #if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */ __AV_STRUCT_ARGS = __AV_AIXCC_STRUCT_ARGS, #else #if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc, xlclang */ __AV_STRUCT_ARGS = __AV_AIXCC_STRUCT_ARGS, #else #if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3)) __AV_STRUCT_ARGS = __AV_OLDGCC_STRUCT_ARGS, #else __AV_STRUCT_ARGS = 0, #endif #endif #endif #endif #endif #endif /* how to pass floats */ /* ANSI C compilers and GNU gcc pass floats as floats. * K&R C compilers pass floats as doubles. We don't support them any more. */ #if defined(__powerpc64__) __AV_AIXCC_FLOAT_ARGS = 1<<8, /* pass floats in the low 4 bytes of an 8-bytes word */ #endif /* the default way to pass floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float passing convention, * just #define __AV_FLOAT_ARGS ... * before or after #including . */ #ifndef __AV_FLOAT_ARGS #if defined(__powerpc64__) && defined(_AIX) && (defined(__ibmxl__) || !defined(__GNUC__)) /* AIX 64-bit xlc, xlclang */ __AV_FLOAT_ARGS = __AV_AIXCC_FLOAT_ARGS, #else __AV_FLOAT_ARGS = 0, #endif #endif /* how to pass and return small integer arguments */ __AV_ANSI_INTEGERS = 0, /* no promotions */ __AV_TRADITIONAL_INTEGERS = 0, /* promote [u]char, [u]short to [u]int */ /* Fortunately these two methods are compatible. Our macros work with both. */ /* stack cleanup policy */ __AV_CDECL_CLEANUP = 0, /* caller pops args after return */ __AV_STDCALL_CLEANUP = 0, /* callee pops args before return */ /* currently only supported on __i386__ */ #ifndef __AV_CLEANUP __AV_CLEANUP = __AV_CDECL_CLEANUP, #endif /* These are for internal use only */ #if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__) || defined(__loongarch64__) __AV_REGISTER_STRUCT_RETURN = 1<<9, #endif __AV_flag_for_broken_compilers_that_dont_like_trailing_commas }; #ifdef _AVCALL_INTERNAL_H #include "avcall-alist.h" #endif /* An upper bound for sizeof(__av_alist). The total size of the __av_alist fields, ignoring alignment of fields, varies from 40 bytes (for __i386__, __m68k__, __sparc__, __hppa__, __arm__) to 232 bytes (for __arm64__). */ #define __AV_ALIST_SIZE_BOUND 256 typedef struct { /* First part: Fixed size __av_alist. */ union { char _av_m_room[__AV_ALIST_SIZE_BOUND]; #ifdef _AVCALL_INTERNAL_H __av_alist _av_m_alist; #endif /* GNU clisp pokes in internals of the alist! When used by GNU clisp, assume a C compiler that supports anonymous unions (GCC or an ISO C 11 compiler). */ #ifdef LISPFUN int flags; #endif /* For alignment. */ long align1; double align2; long long align3; long double align4; } #ifndef LISPFUN _av_alist_head #endif ; /* Second part: An array whose size depends on __AV_ALIST_WORDS. */ union { __avword _av_m_args[__AV_ALIST_WORDS]; /* For alignment. */ long align1; double align2; long long align3; long double align4; } _av_alist_flexarray; } av_alist; /* Delayed overflow detection */ extern int avcall_overflown (av_alist* /* LIST */); #define av_overflown(LIST) avcall_overflown(&(LIST)) /* * av_start_ macros which specify the return type */ #define __AV_START_FLAGS \ __AV_STRUCT_RETURN | __AV_FLOAT_RETURN | __AV_STRUCT_ARGS | __AV_FLOAT_ARGS | __AV_CLEANUP extern void avcall_start (av_alist* /* LIST */, __avword* /* LIST_ARGS */, __avword* /* LIST_ARGS_END */, __avrword(* /* FUNC */)(), void* /* RADDR */, int /* RETTYPE */, int /* FLAGS */); #define av_start_void(LIST,FUNC) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),0, __AVvoid, __AV_START_FLAGS) #define av_start_char(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVchar, __AV_START_FLAGS) #define av_start_schar(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVschar, __AV_START_FLAGS) #define av_start_uchar(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVuchar, __AV_START_FLAGS) #define av_start_short(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVshort, __AV_START_FLAGS) #define av_start_ushort(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVushort, __AV_START_FLAGS) #define av_start_int(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVint, __AV_START_FLAGS) #define av_start_uint(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVuint, __AV_START_FLAGS) #define av_start_long(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVlong, __AV_START_FLAGS) #define av_start_ulong(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVulong, __AV_START_FLAGS) #define av_start_longlong(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVlonglong, __AV_START_FLAGS) #define av_start_ulonglong(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVulonglong,__AV_START_FLAGS) #define av_start_float(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVfloat, __AV_START_FLAGS) #define av_start_double(LIST,FUNC,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVdouble, __AV_START_FLAGS) #define av_start_ptr(LIST,FUNC,TYPE,RADDR) \ avcall_start(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),RADDR,__AVvoidp, __AV_START_FLAGS) extern void avcall_start_struct (av_alist* /* LIST */, __avword* /* LIST_ARGS */, __avword* /* LIST_ARGS_END */, __avrword(* /* FUNC */)(), size_t /* TYPE_SIZE */, int /* TYPE_SPLITTABLE */, void* /* RADDR */, int /* FLAGS */); #define av_start_struct(LIST,FUNC,TYPE,TYPE_SPLITTABLE,RADDR) \ _av_start_struct(LIST,FUNC,sizeof(TYPE),TYPE_SPLITTABLE,RADDR) /* Undocumented, but used by GNU clisp. */ #define _av_start_struct(LIST,FUNC,TYPE_SIZE,TYPE_SPLITTABLE,RADDR) \ avcall_start_struct(&(LIST),(LIST)._av_alist_flexarray._av_m_args,&(LIST)._av_alist_flexarray._av_m_args[__AV_ALIST_WORDS],(__avrword(*)())(FUNC),TYPE_SIZE,TYPE_SPLITTABLE,RADDR,__AV_START_FLAGS) /* * av_ macros which specify the argument and its type */ /* integer argument types */ extern int avcall_arg_int (av_alist* /* LIST */, int /* VAL */); extern int avcall_arg_uint (av_alist* /* LIST */, unsigned int /* VAL */); #define av_char(LIST,VAL) avcall_arg_int(&(LIST),(char)(VAL)) #define av_schar(LIST,VAL) avcall_arg_int(&(LIST),(signed char)(VAL)) #define av_short(LIST,VAL) avcall_arg_int(&(LIST),(short)(VAL)) #define av_int(LIST,VAL) avcall_arg_int(&(LIST),(int)(VAL)) #define av_uchar(LIST,VAL) avcall_arg_uint(&(LIST),(unsigned char)(VAL)) #define av_ushort(LIST,VAL) avcall_arg_uint(&(LIST),(unsigned short)(VAL)) #define av_uint(LIST,VAL) avcall_arg_uint(&(LIST),(unsigned int)(VAL)) extern int avcall_arg_long (av_alist* /* LIST */, long /* VAL */); extern int avcall_arg_ulong (av_alist* /* LIST */, unsigned long /* VAL */); #define av_long(LIST,VAL) avcall_arg_long(&(LIST),(long)(VAL)) #define av_ulong(LIST,VAL) avcall_arg_ulong(&(LIST),(unsigned long)(VAL)) extern int avcall_arg_ptr (av_alist* /* LIST */, void* /* VAL */); #define av_ptr(LIST,TYPE,VAL) avcall_arg_ptr(&(LIST),(TYPE)(VAL)) extern int avcall_arg_longlong (av_alist* /* LIST */, long long /* VAL */); extern int avcall_arg_ulonglong (av_alist* /* LIST */, unsigned long long /* VAL */); #define av_longlong(LIST,VAL) avcall_arg_longlong(&(LIST),VAL) #define av_ulonglong(LIST,VAL) avcall_arg_ulonglong(&(LIST),VAL) /* floating-point argument types */ extern int avcall_arg_float (av_alist* /* LIST */, float /* VAL */); #define av_float(LIST,VAL) avcall_arg_float(&(LIST),VAL) extern int avcall_arg_double (av_alist* /* LIST */, double /* VAL */); #define av_double(LIST,VAL) avcall_arg_double(&(LIST),VAL) /* * structure argument types */ extern int avcall_arg_struct (av_alist* /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */); #define av_struct(LIST,TYPE,VAL) \ avcall_arg_struct(&(LIST),sizeof(TYPE),__AV_alignof(TYPE),&(VAL)) /* _av_struct() is like av_struct(), except that you pass the type's size and alignment * and the value's address instead of the type and the value themselves. * Undocumented, but used by GNU clisp. */ #define _av_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) \ avcall_arg_struct(&(LIST),TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) /* * calling the function */ extern int avcall_call (av_alist* /* LIST */); #define av_call(LIST) avcall_call(&(LIST)) /* Determine whether a struct type is word-splittable, i.e. whether each of * its components fit into a register. * The entire computation is done at compile time. */ #define av_word_splittable_1(slot1) \ (__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) #define av_word_splittable_2(slot1,slot2) \ ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \ && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \ ) #define av_word_splittable_3(slot1,slot2,slot3) \ ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \ && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \ && (__av_offset3(slot1,slot2,slot3)/sizeof(__avword) == (__av_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__avword)) \ ) #define av_word_splittable_4(slot1,slot2,slot3,slot4) \ ((__av_offset1(slot1)/sizeof(__avword) == (__av_offset1(slot1)+sizeof(slot1)-1)/sizeof(__avword)) \ && (__av_offset2(slot1,slot2)/sizeof(__avword) == (__av_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__avword)) \ && (__av_offset3(slot1,slot2,slot3)/sizeof(__avword) == (__av_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__avword)) \ && (__av_offset4(slot1,slot2,slot3,slot4)/sizeof(__avword) == (__av_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__avword)) \ ) #define __av_offset1(slot1) \ 0 #define __av_offset2(slot1,slot2) \ ((__av_offset1(slot1)+sizeof(slot1)+__AV_alignof(slot2)-1) & -(long)__AV_alignof(slot2)) #define __av_offset3(slot1,slot2,slot3) \ ((__av_offset2(slot1,slot2)+sizeof(slot2)+__AV_alignof(slot3)-1) & -(long)__AV_alignof(slot3)) #define __av_offset4(slot1,slot2,slot3,slot4) \ ((__av_offset3(slot1,slot2,slot3)+sizeof(slot3)+__AV_alignof(slot4)-1) & -(long)__AV_alignof(slot4)) #ifdef __cplusplus } #endif #endif /* _AVCALL_H */ libffcall-2.5/avcall/avcall-mipsel-linux.s0000664000000000000000000001073714662622065015524 00000000000000 .file 1 "avcall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,40,$31 # vars= 0, regs= 3/0, args= 16, gp= 8 .mask 0xc0010000,-4 .fmask 0x00000000,0 lw $6,40($4) lw $5,20($4) lw $8,24($4) addiu $sp,$sp,-40 andi $2,$6,0x1 sw $fp,32($sp) sw $16,28($sp) move $fp,$sp sw $31,36($sp) move $16,$4 addiu $sp,$sp,-1032 subu $4,$5,$8 move $3,$sp .set noreorder .set nomacro beq $2,$0,$L2 sra $4,$4,2 .set macro .set reorder #APP # 76 "avcall-mips.c" 1 l.s $f12,48($16) # 0 "" 2 #NO_APP $L2: lw $2,44($16) andi $7,$2,0x1 .set noreorder .set nomacro beql $7,$0,$L54 andi $6,$6,0x2 .set macro .set reorder #APP # 78 "avcall-mips.c" 1 l.d $f12,56($16) # 0 "" 2 #NO_APP andi $6,$6,0x2 $L54: .set noreorder .set nomacro beql $6,$0,$L55 andi $2,$2,0x2 .set macro .set reorder #APP # 80 "avcall-mips.c" 1 l.s $f14,52($16) # 0 "" 2 #NO_APP andi $2,$2,0x2 $L55: .set noreorder .set nomacro beql $2,$0,$L56 slt $4,$4,5 .set macro .set reorder #APP # 82 "avcall-mips.c" 1 l.d $f14,64($16) # 0 "" 2 #NO_APP slt $4,$4,5 $L56: addiu $2,$8,16 .set noreorder .set nomacro bne $4,$0,$L10 addiu $3,$3,16 .set macro .set reorder $L36: lw $4,0($2) addiu $3,$3,4 addiu $2,$2,4 .set noreorder .set nomacro bne $5,$2,$L36 sw $4,-4($3) .set macro .set reorder $L10: lw $5,4($8) lw $4,0($8) lw $25,4($16) lw $7,12($8) .set noreorder .set nomacro jalr $25 lw $6,8($8) .set macro .set reorder lw $4,12($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,$L7 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 addiu $5,$4,-11 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bnel $5,$0,$L51 lw $4,8($16) .set macro .set reorder li $3,13 # 0xd .set noreorder .set nomacro beq $4,$3,$L52 li $3,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L53 li $3,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L49 li $3,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$3,$L57 move $sp,$fp .set macro .set reorder lw $3,0($16) andi $3,$3,0x2 .set noreorder .set nomacro beq $3,$0,$L7 li $4,1 # 0x1 .set macro .set reorder lw $3,16($16) .set noreorder .set nomacro beq $3,$4,$L47 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,$L48 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,$L58 lw $3,8($16) .set macro .set reorder $L7: move $sp,$fp $L57: lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L47: lw $3,8($16) sb $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L49: lw $3,8($16) $L58: sw $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L48: lw $3,8($16) sh $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L51: sw $2,0($4) .set noreorder .set nomacro b $L7 sw $3,4($4) .set macro .set reorder $L52: lw $2,8($16) .set noreorder .set nomacro b $L7 swc1 $f0,0($2) .set macro .set reorder $L53: lw $2,8($16) .set noreorder .set nomacro b $L7 sdc1 $f0,0($2) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/avcall-riscv64.c0000664000000000000000000003437414662613003014351 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for a Linux riscv64 with LP64 ABI. This calls a C function with an argument list built up using macros defined in avcall.h. RISC-V Argument Passing Conventions are documented in https://people.eecs.berkeley.edu/~krste/papers/riscv-spec-v2.1.pdf chapter 20. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register __avrword iarg1 __asm__("a0"); register __avrword iarg2 __asm__("a1"); register __avrword iarg3 __asm__("a2"); register __avrword iarg4 __asm__("a3"); register __avrword iarg5 __asm__("a4"); register __avrword iarg6 __asm__("a5"); register __avrword iarg7 __asm__("a6"); register __avrword iarg8 __asm__("a7"); register float farg1 __asm__("fa0"); register float farg2 __asm__("fa1"); register float farg3 __asm__("fa2"); register float farg4 __asm__("fa3"); register float farg5 __asm__("fa4"); register float farg6 __asm__("fa5"); register float farg7 __asm__("fa6"); register float farg8 __asm__("fa7"); register double darg1 __asm__("fa0"); register double darg2 __asm__("fa1"); register double darg3 __asm__("fa2"); register double darg4 __asm__("fa3"); register double darg5 __asm__("fa4"); register double darg6 __asm__("fa5"); register double darg7 __asm__("fa6"); register double darg8 __asm__("fa7"); int avcall_call(av_alist* list) { register __avrword iretreg __asm__("a0"); register __avrword iret2reg __asm__("a1"); register double dret __asm__("fa0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int fanum = l->fanum; { int i; for (i = 8; i < arglen; i++) /* push function args onto stack */ argframe[i-8] = l->args[i]; } /* Put up to 8 integer args into registers. */ if (arglen >= 1) { iarg1 = l->args[0]; if (arglen >= 2) { iarg2 = l->args[1]; if (arglen >= 3) { iarg3 = l->args[2]; if (arglen >= 4) { iarg4 = l->args[3]; if (arglen >= 5) { iarg5 = l->args[4]; if (arglen >= 6) { iarg6 = l->args[5]; if (arglen >= 7) { iarg7 = l->args[6]; if (arglen >= 8) { iarg8 = l->args[7]; } } } } } } } } /* Put upto 8 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; if (fanum >= 3) { if (l->darg_mask & (1 << 2)) darg3 = l->dargs[2]; else if (l->farg_mask & (1 << 2)) farg3 = l->fargs[2]; if (fanum >= 4) { if (l->darg_mask & (1 << 3)) darg4 = l->dargs[3]; else if (l->farg_mask & (1 << 3)) farg4 = l->fargs[3]; if (fanum >= 5) { if (l->darg_mask & (1 << 4)) darg5 = l->dargs[4]; else if (l->farg_mask & (1 << 4)) farg5 = l->fargs[4]; if (fanum >= 6) { if (l->darg_mask & (1 << 5)) darg6 = l->dargs[5]; else if (l->farg_mask & (1 << 5)) farg6 = l->fargs[5]; if (fanum >= 7) { if (l->darg_mask & (1 << 6)) darg7 = l->dargs[6]; else if (l->farg_mask & (1 << 6)) farg7 = l->fargs[6]; if (fanum >= 8) { if (l->darg_mask & (1 << 7)) darg8 = l->dargs[7]; else if (l->farg_mask & (1 << 7)) farg8 = l->fargs[7]; } } } } } } } } /* Call function. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(); } else { __avrword iret, iret2; iret = (*l->func)(); iret2 = iret2reg; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong || l->rtype == __AVlonglong) { RETURN(long, iret); } else if (l->rtype == __AVulong || l->rtype == __AVulonglong) { RETURN(unsigned long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-powerpc.c0000664000000000000000000003103214662613003014514 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2024 Bruno Haible Copyright 2000 Adam Fedor Copyright 2004 Paul Guyot This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- !!! THIS ROUTINE MUST BE COMPILED gcc -O !!! Foreign function interface for an IBM RS/6000 with gcc This calls a C function with an argument list built up using macros defined in avcall.h. RS6000 Argument Passing Conventions: All arguments, except the first 8 words, are passed on the stack with word alignment. Doubles take two words. The first 13 doubles and floats are also passed in floating-point-registers. To return a structure, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. Differences between AIX and SysV.4 argument passing conventions: - AIX: the first 13 doubles and floats are passed in FP registers, and when they do, there is still room allocated for them in the argument sequence (integer regs or stack). SysV.4: the first 8 doubles and floats are passed in FP registers, and no room is allocated for them in the argument sequence. - AIX: Structures are passed in the argument sequence. SysV.4: Structures are passed by reference: only a pointer appears in the argument sequence. - AIX: Long longs are only word aligned. SysV.4: Long longs are two-word aligned, both when passed in registers (pairs: 3/4, 5/6, 7/8, 9/10) and when passed on the stack. (Recall that the stack is always 8-byte aligned). Compile this routine with gcc -O (or -O2 -fno-omit-frame-pointer or -g -O) to get the right register variables. For other compilers use the pre-compiled assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ #define STACK_OFFSET 14 #else /* __powerpc_sysv4__ */ #define STACK_OFFSET 2 #endif #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register double farg1 __asm__("fr1"); register double farg2 __asm__("fr2"); register double farg3 __asm__("fr3"); register double farg4 __asm__("fr4"); register double farg5 __asm__("fr5"); register double farg6 __asm__("fr6"); register double farg7 __asm__("fr7"); register double farg8 __asm__("fr8"); register double farg9 __asm__("fr9"); register double farg10 __asm__("fr10"); register double farg11 __asm__("fr11"); register double farg12 __asm__("fr12"); register double farg13 __asm__("fr13"); int avcall_call(av_alist* list) { register __avword* sp __asm__("r1"); /* C names for registers */ /*register __avrword iret __asm__("r3"); */ register __avrword iret2 __asm__("r4"); register float fret __asm__("fr1"); register double dret __asm__("fr1"); __av_alist* l = &AV_LIST_INNER(list); #if defined(_AIX) /* for some reason, this does not work on Mac OS X and Linux! */ __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ #else __avword space[__AV_ALIST_WORDS]; /* space for callee's stack frame */ __avword* argframe = sp + STACK_OFFSET;/* stack offset for argument list */ #endif int arglen = l->aptr - l->args; __avrword iret; int i; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ int farglen = 0; for (i = (8-farglen); i < arglen; i++) /* push function args onto stack */ argframe[i-8+farglen] = l->args[i]; #else /* __powerpc_sysv4__ */ for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; #endif /* pass first 13 floating-point args in registers */ arglen = l->faptr - l->fargs; if (arglen == 0) goto fargs0; else if (arglen == 1) goto fargs1; else if (arglen == 2) goto fargs2; else if (arglen == 3) goto fargs3; else if (arglen == 4) goto fargs4; else if (arglen == 5) goto fargs5; else if (arglen == 6) goto fargs6; else if (arglen == 7) goto fargs7; else if (arglen == 8) goto fargs8; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ else if (arglen == 9) goto fargs9; else if (arglen == 10) goto fargs10; else if (arglen == 11) goto fargs11; else if (arglen == 12) goto fargs12; else if (arglen == 13) goto fargs13; fargs13: farg13 = l->fargs[12]; fargs12: farg12 = l->fargs[11]; fargs11: farg11 = l->fargs[10]; fargs10: farg10 = l->fargs[9]; fargs9: farg9 = l->fargs[8]; #endif fargs8: farg8 = l->fargs[7]; fargs7: farg7 = l->fargs[6]; fargs6: farg6 = l->fargs[5]; fargs5: farg5 = l->fargs[4]; fargs4: farg4 = l->fargs[3]; fargs3: farg3 = l->fargs[2]; fargs2: farg2 = l->fargs[1]; fargs1: farg1 = l->fargs[0]; fargs0: ; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ /* call function, pass 8 args in registers */ iret = (*l->func)(l->args[0], l->args[1], l->args[2], l->args[3], l->args[4], l->args[5], l->args[6], l->args[7]); #else /* __powerpc_sysv4__ */ iret = (*l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3], l->iargs[4], l->iargs[5], l->iargs[6], l->iargs[7]); #endif /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = iret; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* On Linux, AIX, only structs of sizes 1, 2, 4, 8 can be returned in registers. But on FreeBSD, NetBSD, structs of any size <= 8 are returned in registers. */ if (l->rsize > 0 && l->rsize <= 8) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[1] = (unsigned char)(iret); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[3] = (unsigned char)(iret); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[4] = (unsigned char)(iret2); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[1] = (unsigned char)(iret); ((unsigned char *)raddr)[2] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[5] = (unsigned char)(iret2); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret); ((unsigned char *)raddr)[3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[6] = (unsigned char)(iret2); } else if (l->rsize == 8) { ((unsigned char *)raddr)[0] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[3] = (unsigned char)(iret); ((unsigned char *)raddr)[4] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[5] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[6] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[7] = (unsigned char)(iret2); } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - ((__avrword)1 << (sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (sizeof(__avrword)*8-end_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-sizeof(__avrword)*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret << (2*sizeof(__avrword)*8-end_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = ((__avrword)2 << (sizeof(__avrword)*8-start_offset*8-1)) - 1; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = - ((__avrword)1 << (2*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ ((iret << (2*sizeof(__avrword)*8-end_offset*8)) | (iret2 >> (end_offset*4-sizeof(__avrword)*4) >> (end_offset*4-sizeof(__avrword)*4)))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret2 << (2*sizeof(__avrword)*8-end_offset*8))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = - ((__avrword)1 << (3*sizeof(__avrword)*8-end_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret >> (end_offset*8-2*sizeof(__avrword)*8))) & mask0; wordaddr[1] = (iret << (3*sizeof(__avrword)*8-end_offset*8)) | (iret2 >> (end_offset*8-2*sizeof(__avrword)*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 << (3*sizeof(__avrword)*8-end_offset*8))) & mask2; } } #endif } } } return 0; } libffcall-2.5/avcall/avcall-arm-old-macro.S0000664000000000000000000000334114662622066015462 00000000000000#include "asm-arm.h" .text .align 2 .global C(avcall_call) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) // args = 0, pretend = 0, frame = 1024 // frame_needed = 1, uses_anonymous_args = 0 mov ip, sp stmfd sp!, {r4, r5, fp, ip, lr, pc} sub fp, ip, $-4294967292 sub sp, sp, $1024 add r2, r0, $20 ldmia r2, {r2, r3} sub r3, r2, r3 mov ip, $4 mov r1, r3, asr $2 cmp ip, r1 mov r5, r0 bic sp, sp, $7 ldr r4, [r0, $24] bge L(45) add r2, sp, $16 L(6): ldr r3, [r4, ip, asl $2] add ip, ip, $1 cmp ip, r1 str r3, [r2, $-16] add r2, r2, $4 blt L(6) L(45): ldmia r4, {r0, r1, r2, r3} // phole ldm mov lr, pc ldr pc, [r5, $4] ldr r2, [r5, $12] cmp r2, $1 mov ip, r0 beq L(8) cmp r2, $2 beq L(48) cmp r2, $3 beq L(48) cmp r2, $4 beq L(48) cmp r2, $5 beq L(47) cmp r2, $6 beq L(47) cmp r2, $7 beq L(54) cmp r2, $8 beq L(54) cmp r2, $9 beq L(54) cmp r2, $10 beq L(54) sub r3, r2, $11 cmp r3, $1 bls L(53) cmp r2, $13 ldreq r3, [r5, $8] streq r0, [r3, $0] // float beq L(8) cmp r2, $14 ldreq r3, [r5, $8] stmeqia r3, {r0-r1} // double beq L(8) cmp r2, $15 beq L(54) cmp r2, $16 beq L(55) L(8): mov r0, $0 ldmea fp, {r4, r5, fp, sp, pc} L(55): ldr r3, [r5, $0] tst r3, $512 beq L(8) ldr r3, [r5, $16] cmp r3, $1 beq L(48) cmp r3, $2 beq L(47) cmp r3, $4 bhi L(41) L(54): ldr r3, [r5, $8] L(46): str ip, [r3, $0] b L(8) L(41): cmp r3, $8 bne L(8) L(53): ldr r3, [r5, $8] str r1, [r3, $4] b L(46) L(47): ldr r3, [r5, $8] strh ip, [r3, $0] // movhi b L(8) L(48): ldr r3, [r5, $8] strb ip, [r3, $0] b L(8) L(fe1): FUNEND(avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/avcall/avcall-m68k-linux.s0000664000000000000000000000442014662622065015010 00000000000000 .file "avcall-m68k.c" .text .align 2 .globl avcall_call .type avcall_call,@function avcall_call: link.w %a6,#0 movm.l #0x3820,-(%sp) move.l 8(%a6),%a2 lea (-1024,%sp),%sp move.l 24(%a2),%d1 move.l 20(%a2),%d0 sub.l %d1,%d0 asr.l #2,%d0 jble .L52 move.l %sp,%a1 move.l %d1,%a0 move.l %d0,%d2 .align 2 .L6: move.l (%a0)+,(%a1)+ subq.l #1,%d2 jbne .L6 .L52: moveq.l #16,%d0 cmp.l 12(%a2),%d0 jbeq .L57 .L7: move.l 4(%a2),%a0 jsr (%a0) move.l %d0,%d2 move.l %d1,%d3 move.l 12(%a2),%a1 moveq.l #1,%d1 cmp.l %a1,%d1 jbeq .L9 moveq.l #2,%d4 cmp.l %a1,%d4 jbeq .L56 moveq.l #3,%d4 cmp.l %a1,%d4 jbeq .L56 moveq.l #4,%d4 cmp.l %a1,%d4 jbeq .L56 moveq.l #5,%d4 cmp.l %a1,%d4 jbeq .L55 moveq.l #6,%d4 cmp.l %a1,%d4 jbeq .L55 moveq.l #7,%d4 cmp.l %a1,%d4 jbeq .L53 moveq.l #8,%d4 cmp.l %a1,%d4 jbeq .L53 moveq.l #9,%d4 cmp.l %a1,%d4 jbeq .L53 moveq.l #10,%d4 cmp.l %a1,%d4 jbeq .L53 lea (-11,%a1),%a0 moveq.l #1,%d4 cmp.l %a0,%d4 jbcc .L54 moveq.l #13,%d4 cmp.l %a1,%d4 jbeq .L58 moveq.l #14,%d4 cmp.l %a1,%d4 jbeq .L59 moveq.l #15,%d0 cmp.l %a1,%d0 jbeq .L53 moveq.l #16,%d1 cmp.l %a1,%d1 jbne .L9 btst #1,2(%a2) jbeq .L9 move.l 16(%a2),%d0 moveq.l #1,%d4 cmp.l %d0,%d4 jbeq .L56 moveq.l #2,%d1 cmp.l %d0,%d1 jbeq .L55 moveq.l #4,%d4 cmp.l %d0,%d4 jbeq .L53 moveq.l #8,%d1 cmp.l %d0,%d1 jbne .L9 .L54: move.l 8(%a2),%a0 move.l %d2,(%a0) move.l %d3,4(%a0) jbra .L9 .align 2 .L53: move.l 8(%a2),%a0 move.l %d2,(%a0) jbra .L9 .align 2 .L55: move.l 8(%a2),%a0 move.w %d2,(%a0) jbra .L9 .align 2 .L56: move.l 8(%a2),%a0 move.b %d2,(%a0) jbra .L9 .align 2 .L59: btst #6,3(%a2) jbeq .L37 move.l 8(%a2),%a0 fmove.d %fp0,(%a0) jbra .L9 .align 2 .L37: move.l 8(%a2),%a0 move.l %d0,(%a0) move.l %d1,4(%a0) jbra .L9 .align 2 .L58: move.l (%a2),%d2 btst #6,%d2 jbeq .L31 move.l 8(%a2),%a0 fmove.s %fp0,(%a0) jbra .L9 .align 2 .L31: btst #5,%d2 jbeq .L33 move.l 8(%a2),%a0 move.l %d1,-(%sp) move.l %d0,-(%sp) fmove.d (%sp)+,%fp0 fmove.s %fp0,(%a0) jbra .L9 .align 2 .L33: move.l 8(%a2),%a0 move.l %d0,(%a0) jbra .L9 .align 2 .L57: #APP move.l 8(%a2),%a1 #NO_APP jbra .L7 .align 2 .L9: clr.l %d0 movm.l -16(%a6),#0x41c unlk %a6 rts .Lfe1: .size avcall_call,.Lfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/Makefile.maint0000664000000000000000000000065013153072134014200 00000000000000# maintainer -*-Makefile-*- LN = ln -s RM = rm -f # ==================== Easily regeneratable files ==================== ROFF_MAN = groff -Tutf8 -mandoc all : avcall.man \ avcall-i386-msvc.c avcall.man : avcall.3 $(ROFF_MAN) avcall.3 > avcall.man avcall-i386-msvc.c : avcall-i386-macro.S cp -p avcall-i386-macro.S avcall-i386-msvc.c totally-clean : force $(RM) avcall.man $(RM) avcall-i386-msvc.c force : libffcall-2.5/avcall/avcall-s390.c0000664000000000000000000001070114662613003013533 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible Copyright 2001 Gerhard Tonn This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for an IBM S/390 with gcc This calls a C function with an argument list built up using macros defined in avcall.h. S390 Argument Passing Conventions: All arguments, except the first 5 words, are passed on the stack with word alignment. Doubles take two words. The first 2 doubles and floats are also passed in floating-point-registers. To return a structure, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. Compile this routine with gcc -O2 to get the right register variables. For other compilers use the pre-compiled assembler version. ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) register float farg1 __asm__("f0"); register float farg2 __asm__("f2"); register double darg1 __asm__("f0"); register double darg2 __asm__("f2"); int avcall_call(av_alist* list) { register __avword* sp __asm__("r15"); /* C names for registers */ /*register __avrword iret __asm__("r2"); */ register __avrword iret2 __asm__("r3"); register float fret __asm__("f0"); register double dret __asm__("f0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; unsigned int fanum = l->fanum; __avrword i; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; /* Put upto 2 floating-point args into registers. */ if (fanum >= 1) { if (l->darg_mask & (1 << 0)) darg1 = l->dargs[0]; else if (l->farg_mask & (1 << 0)) farg1 = l->fargs[0]; if (fanum >= 2) { if (l->darg_mask & (1 << 1)) darg2 = l->dargs[1]; else if (l->farg_mask & (1 << 1)) farg2 = l->fargs[1]; } } /* call function, pass 5 args in registers */ i = (*l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3], l->iargs[4]); /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, i); } else if (l->rtype == __AVschar) { RETURN(signed char, i); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, i); } else if (l->rtype == __AVshort) { RETURN(short, i); } else if (l->rtype == __AVushort) { RETURN(unsigned short, i); } else if (l->rtype == __AVint) { RETURN(int, i); } else if (l->rtype == __AVuint) { RETURN(unsigned int, i); } else if (l->rtype == __AVlong) { RETURN(long, i); } else if (l->rtype == __AVulong) { RETURN(unsigned long, i); } else if (l->rtype == __AVlonglong || l->rtype == __AVulonglong) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } else if (l->rtype == __AVfloat) { RETURN(float, fret); } else if (l->rtype == __AVdouble) { RETURN(double, dret); } else if (l->rtype == __AVvoidp) { RETURN(void*, i); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { if (l->rsize == sizeof(char)) { RETURN(char, i); } else if (l->rsize == sizeof(short)) { RETURN(short, i); } else if (l->rsize == sizeof(int)) { RETURN(int, i); } else if (l->rsize == 2*sizeof(__avrword)) { void* raddr = l->raddr; ((__avrword*)raddr)[0] = i; ((__avrword*)raddr)[1] = iret2; } } } return 0; } libffcall-2.5/avcall/avcall-sparc-solaris.s0000664000000000000000000064250414662622066015664 00000000000000 .file "avcall-sparc.c" .section ".text" .align 4 .LLGETPC0: retl add %o7, %l7, %l7 .align 4 .global avcall_call .type avcall_call,#function .proc 04 avcall_call: !#PROLOGUE# 0 save %sp, -1128, %sp sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call .LLGETPC0 add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 add %sp, 68, %l1 ld [%i0+20], %o7 ld [%i0+24], %g3 sub %o7, %g3, %g1 ld [%i0+12], %g3 cmp %g3, 16 bne .LL2 sra %g1, 2, %g1 ld [%i0+8], %g3 st %g3, [%sp+64] .LL2: mov 6, %l0 cmp %l0, %g1 bge,a .LL53 ld [%i0+12], %g3 ld [%i0+24], %g4 .LL7: sll %l0, 2, %o7 ld [%g4+%o7], %g3 add %l0, 1, %l0 cmp %l0, %g1 bl .LL7 st %g3, [%l1+%o7] ld [%i0+12], %g3 .LL53: cmp %g3, 16 bne,a .LL54 ld [%i0+24], %g3 ld [%i0], %g3 andcc %g3, 16, %g0 be,a .LL54 ld [%i0+24], %g3 ld [%i0+16], %g3 sll %g3, 1, %o7 add %o7, %g3, %o7 sll %o7, 3, %o7 sethi %hi(_GLOBAL_OFFSET_TABLE_-(.LL9-.)), %g3 or %g3, %lo(_GLOBAL_OFFSET_TABLE_-(.LL9-.)), %g3 sub %l7, %g3, %g3 add %o7, %g3, %o7 ld [%i0+24], %g3 ld [%g3],%o0 ld [%g3+4],%o1 ld [%g3+8],%o2 ld [%g3+12],%o3 ld [%g3+16],%o4 ld [%g3+20],%o5 ld [%i0+4], %g2 jmp %o7 nop .LL9: call %g2 nop .long 0 mov 0,%i0 ret restore call %g2 nop .long 1 mov 0,%i0 ret restore call %g2 nop .long 2 mov 0,%i0 ret restore call %g2 nop .long 3 mov 0,%i0 ret restore call %g2 nop .long 4 mov 0,%i0 ret restore call %g2 nop .long 5 mov 0,%i0 ret restore call %g2 nop .long 6 mov 0,%i0 ret restore call %g2 nop .long 7 mov 0,%i0 ret restore call %g2 nop .long 8 mov 0,%i0 ret restore call %g2 nop .long 9 mov 0,%i0 ret restore call %g2 nop .long 10 mov 0,%i0 ret restore call %g2 nop .long 11 mov 0,%i0 ret restore call %g2 nop .long 12 mov 0,%i0 ret restore call %g2 nop .long 13 mov 0,%i0 ret restore call %g2 nop .long 14 mov 0,%i0 ret restore call %g2 nop .long 15 mov 0,%i0 ret restore call %g2 nop .long 16 mov 0,%i0 ret restore call %g2 nop .long 17 mov 0,%i0 ret restore call %g2 nop .long 18 mov 0,%i0 ret restore call %g2 nop .long 19 mov 0,%i0 ret restore call %g2 nop .long 20 mov 0,%i0 ret restore call %g2 nop .long 21 mov 0,%i0 ret restore call %g2 nop .long 22 mov 0,%i0 ret restore call %g2 nop .long 23 mov 0,%i0 ret restore call %g2 nop .long 24 mov 0,%i0 ret restore call %g2 nop .long 25 mov 0,%i0 ret restore call %g2 nop .long 26 mov 0,%i0 ret restore call %g2 nop .long 27 mov 0,%i0 ret restore call %g2 nop .long 28 mov 0,%i0 ret restore call %g2 nop .long 29 mov 0,%i0 ret restore call %g2 nop .long 30 mov 0,%i0 ret restore call %g2 nop .long 31 mov 0,%i0 ret restore call %g2 nop .long 32 mov 0,%i0 ret restore call %g2 nop .long 33 mov 0,%i0 ret restore call %g2 nop .long 34 mov 0,%i0 ret restore call %g2 nop .long 35 mov 0,%i0 ret restore call %g2 nop .long 36 mov 0,%i0 ret restore call %g2 nop .long 37 mov 0,%i0 ret restore call %g2 nop .long 38 mov 0,%i0 ret restore call %g2 nop .long 39 mov 0,%i0 ret restore call %g2 nop .long 40 mov 0,%i0 ret restore call %g2 nop .long 41 mov 0,%i0 ret restore call %g2 nop .long 42 mov 0,%i0 ret restore call %g2 nop .long 43 mov 0,%i0 ret restore call %g2 nop .long 44 mov 0,%i0 ret restore call %g2 nop .long 45 mov 0,%i0 ret restore call %g2 nop .long 46 mov 0,%i0 ret restore call %g2 nop .long 47 mov 0,%i0 ret restore call %g2 nop .long 48 mov 0,%i0 ret restore call %g2 nop .long 49 mov 0,%i0 ret restore call %g2 nop .long 50 mov 0,%i0 ret restore call %g2 nop .long 51 mov 0,%i0 ret restore call %g2 nop .long 52 mov 0,%i0 ret restore call %g2 nop .long 53 mov 0,%i0 ret restore call %g2 nop .long 54 mov 0,%i0 ret restore call %g2 nop .long 55 mov 0,%i0 ret restore call %g2 nop .long 56 mov 0,%i0 ret restore call %g2 nop .long 57 mov 0,%i0 ret restore call %g2 nop .long 58 mov 0,%i0 ret restore call %g2 nop .long 59 mov 0,%i0 ret restore call %g2 nop .long 60 mov 0,%i0 ret restore call %g2 nop .long 61 mov 0,%i0 ret restore call %g2 nop .long 62 mov 0,%i0 ret restore call %g2 nop .long 63 mov 0,%i0 ret restore call %g2 nop .long 64 mov 0,%i0 ret restore call %g2 nop .long 65 mov 0,%i0 ret restore call %g2 nop .long 66 mov 0,%i0 ret restore call %g2 nop .long 67 mov 0,%i0 ret restore call %g2 nop .long 68 mov 0,%i0 ret restore call %g2 nop .long 69 mov 0,%i0 ret restore call %g2 nop .long 70 mov 0,%i0 ret restore call %g2 nop .long 71 mov 0,%i0 ret restore call %g2 nop .long 72 mov 0,%i0 ret restore call %g2 nop .long 73 mov 0,%i0 ret restore call %g2 nop .long 74 mov 0,%i0 ret restore call %g2 nop .long 75 mov 0,%i0 ret restore call %g2 nop .long 76 mov 0,%i0 ret restore call %g2 nop .long 77 mov 0,%i0 ret restore call %g2 nop .long 78 mov 0,%i0 ret restore call %g2 nop .long 79 mov 0,%i0 ret restore call %g2 nop .long 80 mov 0,%i0 ret restore call %g2 nop .long 81 mov 0,%i0 ret restore call %g2 nop .long 82 mov 0,%i0 ret restore call %g2 nop .long 83 mov 0,%i0 ret restore call %g2 nop .long 84 mov 0,%i0 ret restore call %g2 nop .long 85 mov 0,%i0 ret restore call %g2 nop .long 86 mov 0,%i0 ret restore call %g2 nop .long 87 mov 0,%i0 ret restore call %g2 nop .long 88 mov 0,%i0 ret restore call %g2 nop .long 89 mov 0,%i0 ret restore call %g2 nop .long 90 mov 0,%i0 ret restore call %g2 nop .long 91 mov 0,%i0 ret restore call %g2 nop .long 92 mov 0,%i0 ret restore call %g2 nop .long 93 mov 0,%i0 ret restore call %g2 nop .long 94 mov 0,%i0 ret restore call %g2 nop .long 95 mov 0,%i0 ret restore call %g2 nop .long 96 mov 0,%i0 ret restore call %g2 nop .long 97 mov 0,%i0 ret restore call %g2 nop .long 98 mov 0,%i0 ret restore call %g2 nop .long 99 mov 0,%i0 ret restore call %g2 nop .long 100 mov 0,%i0 ret restore call %g2 nop .long 101 mov 0,%i0 ret restore call %g2 nop .long 102 mov 0,%i0 ret restore call %g2 nop .long 103 mov 0,%i0 ret restore call %g2 nop .long 104 mov 0,%i0 ret restore call %g2 nop .long 105 mov 0,%i0 ret restore call %g2 nop .long 106 mov 0,%i0 ret restore call %g2 nop .long 107 mov 0,%i0 ret restore call %g2 nop .long 108 mov 0,%i0 ret restore call %g2 nop .long 109 mov 0,%i0 ret restore call %g2 nop .long 110 mov 0,%i0 ret restore call %g2 nop .long 111 mov 0,%i0 ret restore call %g2 nop .long 112 mov 0,%i0 ret restore call %g2 nop .long 113 mov 0,%i0 ret restore call %g2 nop .long 114 mov 0,%i0 ret restore call %g2 nop .long 115 mov 0,%i0 ret restore call %g2 nop .long 116 mov 0,%i0 ret restore call %g2 nop .long 117 mov 0,%i0 ret restore call %g2 nop .long 118 mov 0,%i0 ret restore call %g2 nop .long 119 mov 0,%i0 ret restore call %g2 nop .long 120 mov 0,%i0 ret restore call %g2 nop .long 121 mov 0,%i0 ret restore call %g2 nop .long 122 mov 0,%i0 ret restore call %g2 nop .long 123 mov 0,%i0 ret restore call %g2 nop .long 124 mov 0,%i0 ret restore call %g2 nop .long 125 mov 0,%i0 ret restore call %g2 nop .long 126 mov 0,%i0 ret restore call %g2 nop .long 127 mov 0,%i0 ret restore call %g2 nop .long 128 mov 0,%i0 ret restore call %g2 nop .long 129 mov 0,%i0 ret restore call %g2 nop .long 130 mov 0,%i0 ret restore call %g2 nop .long 131 mov 0,%i0 ret restore call %g2 nop .long 132 mov 0,%i0 ret restore call %g2 nop .long 133 mov 0,%i0 ret restore call %g2 nop .long 134 mov 0,%i0 ret restore call %g2 nop .long 135 mov 0,%i0 ret restore call %g2 nop .long 136 mov 0,%i0 ret restore call %g2 nop .long 137 mov 0,%i0 ret restore call %g2 nop .long 138 mov 0,%i0 ret restore call %g2 nop .long 139 mov 0,%i0 ret restore call %g2 nop .long 140 mov 0,%i0 ret restore call %g2 nop .long 141 mov 0,%i0 ret restore call %g2 nop .long 142 mov 0,%i0 ret restore call %g2 nop .long 143 mov 0,%i0 ret restore call %g2 nop .long 144 mov 0,%i0 ret restore call %g2 nop .long 145 mov 0,%i0 ret restore call %g2 nop .long 146 mov 0,%i0 ret restore call %g2 nop .long 147 mov 0,%i0 ret restore call %g2 nop .long 148 mov 0,%i0 ret restore call %g2 nop .long 149 mov 0,%i0 ret restore call %g2 nop .long 150 mov 0,%i0 ret restore call %g2 nop .long 151 mov 0,%i0 ret restore call %g2 nop .long 152 mov 0,%i0 ret restore call %g2 nop .long 153 mov 0,%i0 ret restore call %g2 nop .long 154 mov 0,%i0 ret restore call %g2 nop .long 155 mov 0,%i0 ret restore call %g2 nop .long 156 mov 0,%i0 ret restore call %g2 nop .long 157 mov 0,%i0 ret restore call %g2 nop .long 158 mov 0,%i0 ret restore call %g2 nop .long 159 mov 0,%i0 ret restore call %g2 nop .long 160 mov 0,%i0 ret restore call %g2 nop .long 161 mov 0,%i0 ret restore call %g2 nop .long 162 mov 0,%i0 ret restore call %g2 nop .long 163 mov 0,%i0 ret restore call %g2 nop .long 164 mov 0,%i0 ret restore call %g2 nop .long 165 mov 0,%i0 ret restore call %g2 nop .long 166 mov 0,%i0 ret restore call %g2 nop .long 167 mov 0,%i0 ret restore call %g2 nop .long 168 mov 0,%i0 ret restore call %g2 nop .long 169 mov 0,%i0 ret restore call %g2 nop .long 170 mov 0,%i0 ret restore call %g2 nop .long 171 mov 0,%i0 ret restore call %g2 nop .long 172 mov 0,%i0 ret restore call %g2 nop .long 173 mov 0,%i0 ret restore call %g2 nop .long 174 mov 0,%i0 ret restore call %g2 nop .long 175 mov 0,%i0 ret restore call %g2 nop .long 176 mov 0,%i0 ret restore call %g2 nop .long 177 mov 0,%i0 ret restore call %g2 nop .long 178 mov 0,%i0 ret restore call %g2 nop .long 179 mov 0,%i0 ret restore call %g2 nop .long 180 mov 0,%i0 ret restore call %g2 nop .long 181 mov 0,%i0 ret restore call %g2 nop .long 182 mov 0,%i0 ret restore call %g2 nop .long 183 mov 0,%i0 ret restore call %g2 nop .long 184 mov 0,%i0 ret restore call %g2 nop .long 185 mov 0,%i0 ret restore call %g2 nop .long 186 mov 0,%i0 ret restore call %g2 nop .long 187 mov 0,%i0 ret restore call %g2 nop .long 188 mov 0,%i0 ret restore call %g2 nop .long 189 mov 0,%i0 ret restore call %g2 nop .long 190 mov 0,%i0 ret restore call %g2 nop .long 191 mov 0,%i0 ret restore call %g2 nop .long 192 mov 0,%i0 ret restore call %g2 nop .long 193 mov 0,%i0 ret restore call %g2 nop .long 194 mov 0,%i0 ret restore call %g2 nop .long 195 mov 0,%i0 ret restore call %g2 nop .long 196 mov 0,%i0 ret restore call %g2 nop .long 197 mov 0,%i0 ret restore call %g2 nop .long 198 mov 0,%i0 ret restore call %g2 nop .long 199 mov 0,%i0 ret restore call %g2 nop .long 200 mov 0,%i0 ret restore call %g2 nop .long 201 mov 0,%i0 ret restore call %g2 nop .long 202 mov 0,%i0 ret restore call %g2 nop .long 203 mov 0,%i0 ret restore call %g2 nop .long 204 mov 0,%i0 ret restore call %g2 nop .long 205 mov 0,%i0 ret restore call %g2 nop .long 206 mov 0,%i0 ret restore call %g2 nop .long 207 mov 0,%i0 ret restore call %g2 nop .long 208 mov 0,%i0 ret restore call %g2 nop .long 209 mov 0,%i0 ret restore call %g2 nop .long 210 mov 0,%i0 ret restore call %g2 nop .long 211 mov 0,%i0 ret restore call %g2 nop .long 212 mov 0,%i0 ret restore call %g2 nop .long 213 mov 0,%i0 ret restore call %g2 nop .long 214 mov 0,%i0 ret restore call %g2 nop .long 215 mov 0,%i0 ret restore call %g2 nop .long 216 mov 0,%i0 ret restore call %g2 nop .long 217 mov 0,%i0 ret restore call %g2 nop .long 218 mov 0,%i0 ret restore call %g2 nop .long 219 mov 0,%i0 ret restore call %g2 nop .long 220 mov 0,%i0 ret restore call %g2 nop .long 221 mov 0,%i0 ret restore call %g2 nop .long 222 mov 0,%i0 ret restore call %g2 nop .long 223 mov 0,%i0 ret restore call %g2 nop .long 224 mov 0,%i0 ret restore call %g2 nop .long 225 mov 0,%i0 ret restore call %g2 nop .long 226 mov 0,%i0 ret restore call %g2 nop .long 227 mov 0,%i0 ret restore call %g2 nop .long 228 mov 0,%i0 ret restore call %g2 nop .long 229 mov 0,%i0 ret restore call %g2 nop .long 230 mov 0,%i0 ret restore call %g2 nop .long 231 mov 0,%i0 ret restore call %g2 nop .long 232 mov 0,%i0 ret restore call %g2 nop .long 233 mov 0,%i0 ret restore call %g2 nop .long 234 mov 0,%i0 ret restore call %g2 nop .long 235 mov 0,%i0 ret restore call %g2 nop .long 236 mov 0,%i0 ret restore call %g2 nop .long 237 mov 0,%i0 ret restore call %g2 nop .long 238 mov 0,%i0 ret restore call %g2 nop .long 239 mov 0,%i0 ret restore call %g2 nop .long 240 mov 0,%i0 ret restore call %g2 nop .long 241 mov 0,%i0 ret restore call %g2 nop .long 242 mov 0,%i0 ret restore call %g2 nop .long 243 mov 0,%i0 ret restore call %g2 nop .long 244 mov 0,%i0 ret restore call %g2 nop .long 245 mov 0,%i0 ret restore call %g2 nop .long 246 mov 0,%i0 ret restore call %g2 nop .long 247 mov 0,%i0 ret restore call %g2 nop .long 248 mov 0,%i0 ret restore call %g2 nop .long 249 mov 0,%i0 ret restore call %g2 nop .long 250 mov 0,%i0 ret restore call %g2 nop .long 251 mov 0,%i0 ret restore call %g2 nop .long 252 mov 0,%i0 ret restore call %g2 nop .long 253 mov 0,%i0 ret restore call %g2 nop .long 254 mov 0,%i0 ret restore call %g2 nop .long 255 mov 0,%i0 ret restore call %g2 nop .long 256 mov 0,%i0 ret restore call %g2 nop .long 257 mov 0,%i0 ret restore call %g2 nop .long 258 mov 0,%i0 ret restore call %g2 nop .long 259 mov 0,%i0 ret restore call %g2 nop .long 260 mov 0,%i0 ret restore call %g2 nop .long 261 mov 0,%i0 ret restore call %g2 nop .long 262 mov 0,%i0 ret restore call %g2 nop .long 263 mov 0,%i0 ret restore call %g2 nop .long 264 mov 0,%i0 ret restore call %g2 nop .long 265 mov 0,%i0 ret restore call %g2 nop .long 266 mov 0,%i0 ret restore call %g2 nop .long 267 mov 0,%i0 ret restore call %g2 nop .long 268 mov 0,%i0 ret restore call %g2 nop .long 269 mov 0,%i0 ret restore call %g2 nop .long 270 mov 0,%i0 ret restore call %g2 nop .long 271 mov 0,%i0 ret restore call %g2 nop .long 272 mov 0,%i0 ret restore call %g2 nop .long 273 mov 0,%i0 ret restore call %g2 nop .long 274 mov 0,%i0 ret restore call %g2 nop .long 275 mov 0,%i0 ret restore call %g2 nop .long 276 mov 0,%i0 ret restore call %g2 nop .long 277 mov 0,%i0 ret restore call %g2 nop .long 278 mov 0,%i0 ret restore call %g2 nop .long 279 mov 0,%i0 ret restore call %g2 nop .long 280 mov 0,%i0 ret restore call %g2 nop .long 281 mov 0,%i0 ret restore call %g2 nop .long 282 mov 0,%i0 ret restore call %g2 nop .long 283 mov 0,%i0 ret restore call %g2 nop .long 284 mov 0,%i0 ret restore call %g2 nop .long 285 mov 0,%i0 ret restore call %g2 nop .long 286 mov 0,%i0 ret restore call %g2 nop .long 287 mov 0,%i0 ret restore call %g2 nop .long 288 mov 0,%i0 ret restore call %g2 nop .long 289 mov 0,%i0 ret restore call %g2 nop .long 290 mov 0,%i0 ret restore call %g2 nop .long 291 mov 0,%i0 ret restore call %g2 nop .long 292 mov 0,%i0 ret restore call %g2 nop .long 293 mov 0,%i0 ret restore call %g2 nop .long 294 mov 0,%i0 ret restore call %g2 nop .long 295 mov 0,%i0 ret restore call %g2 nop .long 296 mov 0,%i0 ret restore call %g2 nop .long 297 mov 0,%i0 ret restore call %g2 nop .long 298 mov 0,%i0 ret restore call %g2 nop .long 299 mov 0,%i0 ret restore call %g2 nop .long 300 mov 0,%i0 ret restore call %g2 nop .long 301 mov 0,%i0 ret restore call %g2 nop .long 302 mov 0,%i0 ret restore call %g2 nop .long 303 mov 0,%i0 ret restore call %g2 nop .long 304 mov 0,%i0 ret restore call %g2 nop .long 305 mov 0,%i0 ret restore call %g2 nop .long 306 mov 0,%i0 ret restore call %g2 nop .long 307 mov 0,%i0 ret restore call %g2 nop .long 308 mov 0,%i0 ret restore call %g2 nop .long 309 mov 0,%i0 ret restore call %g2 nop .long 310 mov 0,%i0 ret restore call %g2 nop .long 311 mov 0,%i0 ret restore call %g2 nop .long 312 mov 0,%i0 ret restore call %g2 nop .long 313 mov 0,%i0 ret restore call %g2 nop .long 314 mov 0,%i0 ret restore call %g2 nop .long 315 mov 0,%i0 ret restore call %g2 nop .long 316 mov 0,%i0 ret restore call %g2 nop .long 317 mov 0,%i0 ret restore call %g2 nop .long 318 mov 0,%i0 ret restore call %g2 nop .long 319 mov 0,%i0 ret restore call %g2 nop .long 320 mov 0,%i0 ret restore call %g2 nop .long 321 mov 0,%i0 ret restore call %g2 nop .long 322 mov 0,%i0 ret restore call %g2 nop .long 323 mov 0,%i0 ret restore call %g2 nop .long 324 mov 0,%i0 ret restore call %g2 nop .long 325 mov 0,%i0 ret restore call %g2 nop .long 326 mov 0,%i0 ret restore call %g2 nop .long 327 mov 0,%i0 ret restore call %g2 nop .long 328 mov 0,%i0 ret restore call %g2 nop .long 329 mov 0,%i0 ret restore call %g2 nop .long 330 mov 0,%i0 ret restore call %g2 nop .long 331 mov 0,%i0 ret restore call %g2 nop .long 332 mov 0,%i0 ret restore call %g2 nop .long 333 mov 0,%i0 ret restore call %g2 nop .long 334 mov 0,%i0 ret restore call %g2 nop .long 335 mov 0,%i0 ret restore call %g2 nop .long 336 mov 0,%i0 ret restore call %g2 nop .long 337 mov 0,%i0 ret restore call %g2 nop .long 338 mov 0,%i0 ret restore call %g2 nop .long 339 mov 0,%i0 ret restore call %g2 nop .long 340 mov 0,%i0 ret restore call %g2 nop .long 341 mov 0,%i0 ret restore call %g2 nop .long 342 mov 0,%i0 ret restore call %g2 nop .long 343 mov 0,%i0 ret restore call %g2 nop .long 344 mov 0,%i0 ret restore call %g2 nop .long 345 mov 0,%i0 ret restore call %g2 nop .long 346 mov 0,%i0 ret restore call %g2 nop .long 347 mov 0,%i0 ret restore call %g2 nop .long 348 mov 0,%i0 ret restore call %g2 nop .long 349 mov 0,%i0 ret restore call %g2 nop .long 350 mov 0,%i0 ret restore call %g2 nop .long 351 mov 0,%i0 ret restore call %g2 nop .long 352 mov 0,%i0 ret restore call %g2 nop .long 353 mov 0,%i0 ret restore call %g2 nop .long 354 mov 0,%i0 ret restore call %g2 nop .long 355 mov 0,%i0 ret restore call %g2 nop .long 356 mov 0,%i0 ret restore call %g2 nop .long 357 mov 0,%i0 ret restore call %g2 nop .long 358 mov 0,%i0 ret restore call %g2 nop .long 359 mov 0,%i0 ret restore call %g2 nop .long 360 mov 0,%i0 ret restore call %g2 nop .long 361 mov 0,%i0 ret restore call %g2 nop .long 362 mov 0,%i0 ret restore call %g2 nop .long 363 mov 0,%i0 ret restore call %g2 nop .long 364 mov 0,%i0 ret restore call %g2 nop .long 365 mov 0,%i0 ret restore call %g2 nop .long 366 mov 0,%i0 ret restore call %g2 nop .long 367 mov 0,%i0 ret restore call %g2 nop .long 368 mov 0,%i0 ret restore call %g2 nop .long 369 mov 0,%i0 ret restore call %g2 nop .long 370 mov 0,%i0 ret restore call %g2 nop .long 371 mov 0,%i0 ret restore call %g2 nop .long 372 mov 0,%i0 ret restore call %g2 nop .long 373 mov 0,%i0 ret restore call %g2 nop .long 374 mov 0,%i0 ret restore call %g2 nop .long 375 mov 0,%i0 ret restore call %g2 nop .long 376 mov 0,%i0 ret restore call %g2 nop .long 377 mov 0,%i0 ret restore call %g2 nop .long 378 mov 0,%i0 ret restore call %g2 nop .long 379 mov 0,%i0 ret restore call %g2 nop .long 380 mov 0,%i0 ret restore call %g2 nop .long 381 mov 0,%i0 ret restore call %g2 nop .long 382 mov 0,%i0 ret restore call %g2 nop .long 383 mov 0,%i0 ret restore call %g2 nop .long 384 mov 0,%i0 ret restore call %g2 nop .long 385 mov 0,%i0 ret restore call %g2 nop .long 386 mov 0,%i0 ret restore call %g2 nop .long 387 mov 0,%i0 ret restore call %g2 nop .long 388 mov 0,%i0 ret restore call %g2 nop .long 389 mov 0,%i0 ret restore call %g2 nop .long 390 mov 0,%i0 ret restore call %g2 nop .long 391 mov 0,%i0 ret restore call %g2 nop .long 392 mov 0,%i0 ret restore call %g2 nop .long 393 mov 0,%i0 ret restore call %g2 nop .long 394 mov 0,%i0 ret restore call %g2 nop .long 395 mov 0,%i0 ret restore call %g2 nop .long 396 mov 0,%i0 ret restore call %g2 nop .long 397 mov 0,%i0 ret restore call %g2 nop .long 398 mov 0,%i0 ret restore call %g2 nop .long 399 mov 0,%i0 ret restore call %g2 nop .long 400 mov 0,%i0 ret restore call %g2 nop .long 401 mov 0,%i0 ret restore call %g2 nop .long 402 mov 0,%i0 ret restore call %g2 nop .long 403 mov 0,%i0 ret restore call %g2 nop .long 404 mov 0,%i0 ret restore call %g2 nop .long 405 mov 0,%i0 ret restore call %g2 nop .long 406 mov 0,%i0 ret restore call %g2 nop .long 407 mov 0,%i0 ret restore call %g2 nop .long 408 mov 0,%i0 ret restore call %g2 nop .long 409 mov 0,%i0 ret restore call %g2 nop .long 410 mov 0,%i0 ret restore call %g2 nop .long 411 mov 0,%i0 ret restore call %g2 nop .long 412 mov 0,%i0 ret restore call %g2 nop .long 413 mov 0,%i0 ret restore call %g2 nop .long 414 mov 0,%i0 ret restore call %g2 nop .long 415 mov 0,%i0 ret restore call %g2 nop .long 416 mov 0,%i0 ret restore call %g2 nop .long 417 mov 0,%i0 ret restore call %g2 nop .long 418 mov 0,%i0 ret restore call %g2 nop .long 419 mov 0,%i0 ret restore call %g2 nop .long 420 mov 0,%i0 ret restore call %g2 nop .long 421 mov 0,%i0 ret restore call %g2 nop .long 422 mov 0,%i0 ret restore call %g2 nop .long 423 mov 0,%i0 ret restore call %g2 nop .long 424 mov 0,%i0 ret restore call %g2 nop .long 425 mov 0,%i0 ret restore call %g2 nop .long 426 mov 0,%i0 ret restore call %g2 nop .long 427 mov 0,%i0 ret restore call %g2 nop .long 428 mov 0,%i0 ret restore call %g2 nop .long 429 mov 0,%i0 ret restore call %g2 nop .long 430 mov 0,%i0 ret restore call %g2 nop .long 431 mov 0,%i0 ret restore call %g2 nop .long 432 mov 0,%i0 ret restore call %g2 nop .long 433 mov 0,%i0 ret restore call %g2 nop .long 434 mov 0,%i0 ret restore call %g2 nop .long 435 mov 0,%i0 ret restore call %g2 nop .long 436 mov 0,%i0 ret restore call %g2 nop .long 437 mov 0,%i0 ret restore call %g2 nop .long 438 mov 0,%i0 ret restore call %g2 nop .long 439 mov 0,%i0 ret restore call %g2 nop .long 440 mov 0,%i0 ret restore call %g2 nop .long 441 mov 0,%i0 ret restore call %g2 nop .long 442 mov 0,%i0 ret restore call %g2 nop .long 443 mov 0,%i0 ret restore call %g2 nop .long 444 mov 0,%i0 ret restore call %g2 nop .long 445 mov 0,%i0 ret restore call %g2 nop .long 446 mov 0,%i0 ret restore call %g2 nop .long 447 mov 0,%i0 ret restore call %g2 nop .long 448 mov 0,%i0 ret restore call %g2 nop .long 449 mov 0,%i0 ret restore call %g2 nop .long 450 mov 0,%i0 ret restore call %g2 nop .long 451 mov 0,%i0 ret restore call %g2 nop .long 452 mov 0,%i0 ret restore call %g2 nop .long 453 mov 0,%i0 ret restore call %g2 nop .long 454 mov 0,%i0 ret restore call %g2 nop .long 455 mov 0,%i0 ret restore call %g2 nop .long 456 mov 0,%i0 ret restore call %g2 nop .long 457 mov 0,%i0 ret restore call %g2 nop .long 458 mov 0,%i0 ret restore call %g2 nop .long 459 mov 0,%i0 ret restore call %g2 nop .long 460 mov 0,%i0 ret restore call %g2 nop .long 461 mov 0,%i0 ret restore call %g2 nop .long 462 mov 0,%i0 ret restore call %g2 nop .long 463 mov 0,%i0 ret restore call %g2 nop .long 464 mov 0,%i0 ret restore call %g2 nop .long 465 mov 0,%i0 ret restore call %g2 nop .long 466 mov 0,%i0 ret restore call %g2 nop .long 467 mov 0,%i0 ret restore call %g2 nop .long 468 mov 0,%i0 ret restore call %g2 nop .long 469 mov 0,%i0 ret restore call %g2 nop .long 470 mov 0,%i0 ret restore call %g2 nop .long 471 mov 0,%i0 ret restore call %g2 nop .long 472 mov 0,%i0 ret restore call %g2 nop .long 473 mov 0,%i0 ret restore call %g2 nop .long 474 mov 0,%i0 ret restore call %g2 nop .long 475 mov 0,%i0 ret restore call %g2 nop .long 476 mov 0,%i0 ret restore call %g2 nop .long 477 mov 0,%i0 ret restore call %g2 nop .long 478 mov 0,%i0 ret restore call %g2 nop .long 479 mov 0,%i0 ret restore call %g2 nop .long 480 mov 0,%i0 ret restore call %g2 nop .long 481 mov 0,%i0 ret restore call %g2 nop .long 482 mov 0,%i0 ret restore call %g2 nop .long 483 mov 0,%i0 ret restore call %g2 nop .long 484 mov 0,%i0 ret restore call %g2 nop .long 485 mov 0,%i0 ret restore call %g2 nop .long 486 mov 0,%i0 ret restore call %g2 nop .long 487 mov 0,%i0 ret restore call %g2 nop .long 488 mov 0,%i0 ret restore call %g2 nop .long 489 mov 0,%i0 ret restore call %g2 nop .long 490 mov 0,%i0 ret restore call %g2 nop .long 491 mov 0,%i0 ret restore call %g2 nop .long 492 mov 0,%i0 ret restore call %g2 nop .long 493 mov 0,%i0 ret restore call %g2 nop .long 494 mov 0,%i0 ret restore call %g2 nop .long 495 mov 0,%i0 ret restore call %g2 nop .long 496 mov 0,%i0 ret restore call %g2 nop .long 497 mov 0,%i0 ret restore call %g2 nop .long 498 mov 0,%i0 ret restore call %g2 nop .long 499 mov 0,%i0 ret restore call %g2 nop .long 500 mov 0,%i0 ret restore call %g2 nop .long 501 mov 0,%i0 ret restore call %g2 nop .long 502 mov 0,%i0 ret restore call %g2 nop .long 503 mov 0,%i0 ret restore call %g2 nop .long 504 mov 0,%i0 ret restore call %g2 nop .long 505 mov 0,%i0 ret restore call %g2 nop .long 506 mov 0,%i0 ret restore call %g2 nop .long 507 mov 0,%i0 ret restore call %g2 nop .long 508 mov 0,%i0 ret restore call %g2 nop .long 509 mov 0,%i0 ret restore call %g2 nop .long 510 mov 0,%i0 ret restore call %g2 nop .long 511 mov 0,%i0 ret restore call %g2 nop .long 512 mov 0,%i0 ret restore call %g2 nop .long 513 mov 0,%i0 ret restore call %g2 nop .long 514 mov 0,%i0 ret restore call %g2 nop .long 515 mov 0,%i0 ret restore call %g2 nop .long 516 mov 0,%i0 ret restore call %g2 nop .long 517 mov 0,%i0 ret restore call %g2 nop .long 518 mov 0,%i0 ret restore call %g2 nop .long 519 mov 0,%i0 ret restore call %g2 nop .long 520 mov 0,%i0 ret restore call %g2 nop .long 521 mov 0,%i0 ret restore call %g2 nop .long 522 mov 0,%i0 ret restore call %g2 nop .long 523 mov 0,%i0 ret restore call %g2 nop .long 524 mov 0,%i0 ret restore call %g2 nop .long 525 mov 0,%i0 ret restore call %g2 nop .long 526 mov 0,%i0 ret restore call %g2 nop .long 527 mov 0,%i0 ret restore call %g2 nop .long 528 mov 0,%i0 ret restore call %g2 nop .long 529 mov 0,%i0 ret restore call %g2 nop .long 530 mov 0,%i0 ret restore call %g2 nop .long 531 mov 0,%i0 ret restore call %g2 nop .long 532 mov 0,%i0 ret restore call %g2 nop .long 533 mov 0,%i0 ret restore call %g2 nop .long 534 mov 0,%i0 ret restore call %g2 nop .long 535 mov 0,%i0 ret restore call %g2 nop .long 536 mov 0,%i0 ret restore call %g2 nop .long 537 mov 0,%i0 ret restore call %g2 nop .long 538 mov 0,%i0 ret restore call %g2 nop .long 539 mov 0,%i0 ret restore call %g2 nop .long 540 mov 0,%i0 ret restore call %g2 nop .long 541 mov 0,%i0 ret restore call %g2 nop .long 542 mov 0,%i0 ret restore call %g2 nop .long 543 mov 0,%i0 ret restore call %g2 nop .long 544 mov 0,%i0 ret restore call %g2 nop .long 545 mov 0,%i0 ret restore call %g2 nop .long 546 mov 0,%i0 ret restore call %g2 nop .long 547 mov 0,%i0 ret restore call %g2 nop .long 548 mov 0,%i0 ret restore call %g2 nop .long 549 mov 0,%i0 ret restore call %g2 nop .long 550 mov 0,%i0 ret restore call %g2 nop .long 551 mov 0,%i0 ret restore call %g2 nop .long 552 mov 0,%i0 ret restore call %g2 nop .long 553 mov 0,%i0 ret restore call %g2 nop .long 554 mov 0,%i0 ret restore call %g2 nop .long 555 mov 0,%i0 ret restore call %g2 nop .long 556 mov 0,%i0 ret restore call %g2 nop .long 557 mov 0,%i0 ret restore call %g2 nop .long 558 mov 0,%i0 ret restore call %g2 nop .long 559 mov 0,%i0 ret restore call %g2 nop .long 560 mov 0,%i0 ret restore call %g2 nop .long 561 mov 0,%i0 ret restore call %g2 nop .long 562 mov 0,%i0 ret restore call %g2 nop .long 563 mov 0,%i0 ret restore call %g2 nop .long 564 mov 0,%i0 ret restore call %g2 nop .long 565 mov 0,%i0 ret restore call %g2 nop .long 566 mov 0,%i0 ret restore call %g2 nop .long 567 mov 0,%i0 ret restore call %g2 nop .long 568 mov 0,%i0 ret restore call %g2 nop .long 569 mov 0,%i0 ret restore call %g2 nop .long 570 mov 0,%i0 ret restore call %g2 nop .long 571 mov 0,%i0 ret restore call %g2 nop .long 572 mov 0,%i0 ret restore call %g2 nop .long 573 mov 0,%i0 ret restore call %g2 nop .long 574 mov 0,%i0 ret restore call %g2 nop .long 575 mov 0,%i0 ret restore call %g2 nop .long 576 mov 0,%i0 ret restore call %g2 nop .long 577 mov 0,%i0 ret restore call %g2 nop .long 578 mov 0,%i0 ret restore call %g2 nop .long 579 mov 0,%i0 ret restore call %g2 nop .long 580 mov 0,%i0 ret restore call %g2 nop .long 581 mov 0,%i0 ret restore call %g2 nop .long 582 mov 0,%i0 ret restore call %g2 nop .long 583 mov 0,%i0 ret restore call %g2 nop .long 584 mov 0,%i0 ret restore call %g2 nop .long 585 mov 0,%i0 ret restore call %g2 nop .long 586 mov 0,%i0 ret restore call %g2 nop .long 587 mov 0,%i0 ret restore call %g2 nop .long 588 mov 0,%i0 ret restore call %g2 nop .long 589 mov 0,%i0 ret restore call %g2 nop .long 590 mov 0,%i0 ret restore call %g2 nop .long 591 mov 0,%i0 ret restore call %g2 nop .long 592 mov 0,%i0 ret restore call %g2 nop .long 593 mov 0,%i0 ret restore call %g2 nop .long 594 mov 0,%i0 ret restore call %g2 nop .long 595 mov 0,%i0 ret restore call %g2 nop .long 596 mov 0,%i0 ret restore call %g2 nop .long 597 mov 0,%i0 ret restore call %g2 nop .long 598 mov 0,%i0 ret restore call %g2 nop .long 599 mov 0,%i0 ret restore call %g2 nop .long 600 mov 0,%i0 ret restore call %g2 nop .long 601 mov 0,%i0 ret restore call %g2 nop .long 602 mov 0,%i0 ret restore call %g2 nop .long 603 mov 0,%i0 ret restore call %g2 nop .long 604 mov 0,%i0 ret restore call %g2 nop .long 605 mov 0,%i0 ret restore call %g2 nop .long 606 mov 0,%i0 ret restore call %g2 nop .long 607 mov 0,%i0 ret restore call %g2 nop .long 608 mov 0,%i0 ret restore call %g2 nop .long 609 mov 0,%i0 ret restore call %g2 nop .long 610 mov 0,%i0 ret restore call %g2 nop .long 611 mov 0,%i0 ret restore call %g2 nop .long 612 mov 0,%i0 ret restore call %g2 nop .long 613 mov 0,%i0 ret restore call %g2 nop .long 614 mov 0,%i0 ret restore call %g2 nop .long 615 mov 0,%i0 ret restore call %g2 nop .long 616 mov 0,%i0 ret restore call %g2 nop .long 617 mov 0,%i0 ret restore call %g2 nop .long 618 mov 0,%i0 ret restore call %g2 nop .long 619 mov 0,%i0 ret restore call %g2 nop .long 620 mov 0,%i0 ret restore call %g2 nop .long 621 mov 0,%i0 ret restore call %g2 nop .long 622 mov 0,%i0 ret restore call %g2 nop .long 623 mov 0,%i0 ret restore call %g2 nop .long 624 mov 0,%i0 ret restore call %g2 nop .long 625 mov 0,%i0 ret restore call %g2 nop .long 626 mov 0,%i0 ret restore call %g2 nop .long 627 mov 0,%i0 ret restore call %g2 nop .long 628 mov 0,%i0 ret restore call %g2 nop .long 629 mov 0,%i0 ret restore call %g2 nop .long 630 mov 0,%i0 ret restore call %g2 nop .long 631 mov 0,%i0 ret restore call %g2 nop .long 632 mov 0,%i0 ret restore call %g2 nop .long 633 mov 0,%i0 ret restore call %g2 nop .long 634 mov 0,%i0 ret restore call %g2 nop .long 635 mov 0,%i0 ret restore call %g2 nop .long 636 mov 0,%i0 ret restore call %g2 nop .long 637 mov 0,%i0 ret restore call %g2 nop .long 638 mov 0,%i0 ret restore call %g2 nop .long 639 mov 0,%i0 ret restore call %g2 nop .long 640 mov 0,%i0 ret restore call %g2 nop .long 641 mov 0,%i0 ret restore call %g2 nop .long 642 mov 0,%i0 ret restore call %g2 nop .long 643 mov 0,%i0 ret restore call %g2 nop .long 644 mov 0,%i0 ret restore call %g2 nop .long 645 mov 0,%i0 ret restore call %g2 nop .long 646 mov 0,%i0 ret restore call %g2 nop .long 647 mov 0,%i0 ret restore call %g2 nop .long 648 mov 0,%i0 ret restore call %g2 nop .long 649 mov 0,%i0 ret restore call %g2 nop .long 650 mov 0,%i0 ret restore call %g2 nop .long 651 mov 0,%i0 ret restore call %g2 nop .long 652 mov 0,%i0 ret restore call %g2 nop .long 653 mov 0,%i0 ret restore call %g2 nop .long 654 mov 0,%i0 ret restore call %g2 nop .long 655 mov 0,%i0 ret restore call %g2 nop .long 656 mov 0,%i0 ret restore call %g2 nop .long 657 mov 0,%i0 ret restore call %g2 nop .long 658 mov 0,%i0 ret restore call %g2 nop .long 659 mov 0,%i0 ret restore call %g2 nop .long 660 mov 0,%i0 ret restore call %g2 nop .long 661 mov 0,%i0 ret restore call %g2 nop .long 662 mov 0,%i0 ret restore call %g2 nop .long 663 mov 0,%i0 ret restore call %g2 nop .long 664 mov 0,%i0 ret restore call %g2 nop .long 665 mov 0,%i0 ret restore call %g2 nop .long 666 mov 0,%i0 ret restore call %g2 nop .long 667 mov 0,%i0 ret restore call %g2 nop .long 668 mov 0,%i0 ret restore call %g2 nop .long 669 mov 0,%i0 ret restore call %g2 nop .long 670 mov 0,%i0 ret restore call %g2 nop .long 671 mov 0,%i0 ret restore call %g2 nop .long 672 mov 0,%i0 ret restore call %g2 nop .long 673 mov 0,%i0 ret restore call %g2 nop .long 674 mov 0,%i0 ret restore call %g2 nop .long 675 mov 0,%i0 ret restore call %g2 nop .long 676 mov 0,%i0 ret restore call %g2 nop .long 677 mov 0,%i0 ret restore call %g2 nop .long 678 mov 0,%i0 ret restore call %g2 nop .long 679 mov 0,%i0 ret restore call %g2 nop .long 680 mov 0,%i0 ret restore call %g2 nop .long 681 mov 0,%i0 ret restore call %g2 nop .long 682 mov 0,%i0 ret restore call %g2 nop .long 683 mov 0,%i0 ret restore call %g2 nop .long 684 mov 0,%i0 ret restore call %g2 nop .long 685 mov 0,%i0 ret restore call %g2 nop .long 686 mov 0,%i0 ret restore call %g2 nop .long 687 mov 0,%i0 ret restore call %g2 nop .long 688 mov 0,%i0 ret restore call %g2 nop .long 689 mov 0,%i0 ret restore call %g2 nop .long 690 mov 0,%i0 ret restore call %g2 nop .long 691 mov 0,%i0 ret restore call %g2 nop .long 692 mov 0,%i0 ret restore call %g2 nop .long 693 mov 0,%i0 ret restore call %g2 nop .long 694 mov 0,%i0 ret restore call %g2 nop .long 695 mov 0,%i0 ret restore call %g2 nop .long 696 mov 0,%i0 ret restore call %g2 nop .long 697 mov 0,%i0 ret restore call %g2 nop .long 698 mov 0,%i0 ret restore call %g2 nop .long 699 mov 0,%i0 ret restore call %g2 nop .long 700 mov 0,%i0 ret restore call %g2 nop .long 701 mov 0,%i0 ret restore call %g2 nop .long 702 mov 0,%i0 ret restore call %g2 nop .long 703 mov 0,%i0 ret restore call %g2 nop .long 704 mov 0,%i0 ret restore call %g2 nop .long 705 mov 0,%i0 ret restore call %g2 nop .long 706 mov 0,%i0 ret restore call %g2 nop .long 707 mov 0,%i0 ret restore call %g2 nop .long 708 mov 0,%i0 ret restore call %g2 nop .long 709 mov 0,%i0 ret restore call %g2 nop .long 710 mov 0,%i0 ret restore call %g2 nop .long 711 mov 0,%i0 ret restore call %g2 nop .long 712 mov 0,%i0 ret restore call %g2 nop .long 713 mov 0,%i0 ret restore call %g2 nop .long 714 mov 0,%i0 ret restore call %g2 nop .long 715 mov 0,%i0 ret restore call %g2 nop .long 716 mov 0,%i0 ret restore call %g2 nop .long 717 mov 0,%i0 ret restore call %g2 nop .long 718 mov 0,%i0 ret restore call %g2 nop .long 719 mov 0,%i0 ret restore call %g2 nop .long 720 mov 0,%i0 ret restore call %g2 nop .long 721 mov 0,%i0 ret restore call %g2 nop .long 722 mov 0,%i0 ret restore call %g2 nop .long 723 mov 0,%i0 ret restore call %g2 nop .long 724 mov 0,%i0 ret restore call %g2 nop .long 725 mov 0,%i0 ret restore call %g2 nop .long 726 mov 0,%i0 ret restore call %g2 nop .long 727 mov 0,%i0 ret restore call %g2 nop .long 728 mov 0,%i0 ret restore call %g2 nop .long 729 mov 0,%i0 ret restore call %g2 nop .long 730 mov 0,%i0 ret restore call %g2 nop .long 731 mov 0,%i0 ret restore call %g2 nop .long 732 mov 0,%i0 ret restore call %g2 nop .long 733 mov 0,%i0 ret restore call %g2 nop .long 734 mov 0,%i0 ret restore call %g2 nop .long 735 mov 0,%i0 ret restore call %g2 nop .long 736 mov 0,%i0 ret restore call %g2 nop .long 737 mov 0,%i0 ret restore call %g2 nop .long 738 mov 0,%i0 ret restore call %g2 nop .long 739 mov 0,%i0 ret restore call %g2 nop .long 740 mov 0,%i0 ret restore call %g2 nop .long 741 mov 0,%i0 ret restore call %g2 nop .long 742 mov 0,%i0 ret restore call %g2 nop .long 743 mov 0,%i0 ret restore call %g2 nop .long 744 mov 0,%i0 ret restore call %g2 nop .long 745 mov 0,%i0 ret restore call %g2 nop .long 746 mov 0,%i0 ret restore call %g2 nop .long 747 mov 0,%i0 ret restore call %g2 nop .long 748 mov 0,%i0 ret restore call %g2 nop .long 749 mov 0,%i0 ret restore call %g2 nop .long 750 mov 0,%i0 ret restore call %g2 nop .long 751 mov 0,%i0 ret restore call %g2 nop .long 752 mov 0,%i0 ret restore call %g2 nop .long 753 mov 0,%i0 ret restore call %g2 nop .long 754 mov 0,%i0 ret restore call %g2 nop .long 755 mov 0,%i0 ret restore call %g2 nop .long 756 mov 0,%i0 ret restore call %g2 nop .long 757 mov 0,%i0 ret restore call %g2 nop .long 758 mov 0,%i0 ret restore call %g2 nop .long 759 mov 0,%i0 ret restore call %g2 nop .long 760 mov 0,%i0 ret restore call %g2 nop .long 761 mov 0,%i0 ret restore call %g2 nop .long 762 mov 0,%i0 ret restore call %g2 nop .long 763 mov 0,%i0 ret restore call %g2 nop .long 764 mov 0,%i0 ret restore call %g2 nop .long 765 mov 0,%i0 ret restore call %g2 nop .long 766 mov 0,%i0 ret restore call %g2 nop .long 767 mov 0,%i0 ret restore call %g2 nop .long 768 mov 0,%i0 ret restore call %g2 nop .long 769 mov 0,%i0 ret restore call %g2 nop .long 770 mov 0,%i0 ret restore call %g2 nop .long 771 mov 0,%i0 ret restore call %g2 nop .long 772 mov 0,%i0 ret restore call %g2 nop .long 773 mov 0,%i0 ret restore call %g2 nop .long 774 mov 0,%i0 ret restore call %g2 nop .long 775 mov 0,%i0 ret restore call %g2 nop .long 776 mov 0,%i0 ret restore call %g2 nop .long 777 mov 0,%i0 ret restore call %g2 nop .long 778 mov 0,%i0 ret restore call %g2 nop .long 779 mov 0,%i0 ret restore call %g2 nop .long 780 mov 0,%i0 ret restore call %g2 nop .long 781 mov 0,%i0 ret restore call %g2 nop .long 782 mov 0,%i0 ret restore call %g2 nop .long 783 mov 0,%i0 ret restore call %g2 nop .long 784 mov 0,%i0 ret restore call %g2 nop .long 785 mov 0,%i0 ret restore call %g2 nop .long 786 mov 0,%i0 ret restore call %g2 nop .long 787 mov 0,%i0 ret restore call %g2 nop .long 788 mov 0,%i0 ret restore call %g2 nop .long 789 mov 0,%i0 ret restore call %g2 nop .long 790 mov 0,%i0 ret restore call %g2 nop .long 791 mov 0,%i0 ret restore call %g2 nop .long 792 mov 0,%i0 ret restore call %g2 nop .long 793 mov 0,%i0 ret restore call %g2 nop .long 794 mov 0,%i0 ret restore call %g2 nop .long 795 mov 0,%i0 ret restore call %g2 nop .long 796 mov 0,%i0 ret restore call %g2 nop .long 797 mov 0,%i0 ret restore call %g2 nop .long 798 mov 0,%i0 ret restore call %g2 nop .long 799 mov 0,%i0 ret restore call %g2 nop .long 800 mov 0,%i0 ret restore call %g2 nop .long 801 mov 0,%i0 ret restore call %g2 nop .long 802 mov 0,%i0 ret restore call %g2 nop .long 803 mov 0,%i0 ret restore call %g2 nop .long 804 mov 0,%i0 ret restore call %g2 nop .long 805 mov 0,%i0 ret restore call %g2 nop .long 806 mov 0,%i0 ret restore call %g2 nop .long 807 mov 0,%i0 ret restore call %g2 nop .long 808 mov 0,%i0 ret restore call %g2 nop .long 809 mov 0,%i0 ret restore call %g2 nop .long 810 mov 0,%i0 ret restore call %g2 nop .long 811 mov 0,%i0 ret restore call %g2 nop .long 812 mov 0,%i0 ret restore call %g2 nop .long 813 mov 0,%i0 ret restore call %g2 nop .long 814 mov 0,%i0 ret restore call %g2 nop .long 815 mov 0,%i0 ret restore call %g2 nop .long 816 mov 0,%i0 ret restore call %g2 nop .long 817 mov 0,%i0 ret restore call %g2 nop .long 818 mov 0,%i0 ret restore call %g2 nop .long 819 mov 0,%i0 ret restore call %g2 nop .long 820 mov 0,%i0 ret restore call %g2 nop .long 821 mov 0,%i0 ret restore call %g2 nop .long 822 mov 0,%i0 ret restore call %g2 nop .long 823 mov 0,%i0 ret restore call %g2 nop .long 824 mov 0,%i0 ret restore call %g2 nop .long 825 mov 0,%i0 ret restore call %g2 nop .long 826 mov 0,%i0 ret restore call %g2 nop .long 827 mov 0,%i0 ret restore call %g2 nop .long 828 mov 0,%i0 ret restore call %g2 nop .long 829 mov 0,%i0 ret restore call %g2 nop .long 830 mov 0,%i0 ret restore call %g2 nop .long 831 mov 0,%i0 ret restore call %g2 nop .long 832 mov 0,%i0 ret restore call %g2 nop .long 833 mov 0,%i0 ret restore call %g2 nop .long 834 mov 0,%i0 ret restore call %g2 nop .long 835 mov 0,%i0 ret restore call %g2 nop .long 836 mov 0,%i0 ret restore call %g2 nop .long 837 mov 0,%i0 ret restore call %g2 nop .long 838 mov 0,%i0 ret restore call %g2 nop .long 839 mov 0,%i0 ret restore call %g2 nop .long 840 mov 0,%i0 ret restore call %g2 nop .long 841 mov 0,%i0 ret restore call %g2 nop .long 842 mov 0,%i0 ret restore call %g2 nop .long 843 mov 0,%i0 ret restore call %g2 nop .long 844 mov 0,%i0 ret restore call %g2 nop .long 845 mov 0,%i0 ret restore call %g2 nop .long 846 mov 0,%i0 ret restore call %g2 nop .long 847 mov 0,%i0 ret restore call %g2 nop .long 848 mov 0,%i0 ret restore call %g2 nop .long 849 mov 0,%i0 ret restore call %g2 nop .long 850 mov 0,%i0 ret restore call %g2 nop .long 851 mov 0,%i0 ret restore call %g2 nop .long 852 mov 0,%i0 ret restore call %g2 nop .long 853 mov 0,%i0 ret restore call %g2 nop .long 854 mov 0,%i0 ret restore call %g2 nop .long 855 mov 0,%i0 ret restore call %g2 nop .long 856 mov 0,%i0 ret restore call %g2 nop .long 857 mov 0,%i0 ret restore call %g2 nop .long 858 mov 0,%i0 ret restore call %g2 nop .long 859 mov 0,%i0 ret restore call %g2 nop .long 860 mov 0,%i0 ret restore call %g2 nop .long 861 mov 0,%i0 ret restore call %g2 nop .long 862 mov 0,%i0 ret restore call %g2 nop .long 863 mov 0,%i0 ret restore call %g2 nop .long 864 mov 0,%i0 ret restore call %g2 nop .long 865 mov 0,%i0 ret restore call %g2 nop .long 866 mov 0,%i0 ret restore call %g2 nop .long 867 mov 0,%i0 ret restore call %g2 nop .long 868 mov 0,%i0 ret restore call %g2 nop .long 869 mov 0,%i0 ret restore call %g2 nop .long 870 mov 0,%i0 ret restore call %g2 nop .long 871 mov 0,%i0 ret restore call %g2 nop .long 872 mov 0,%i0 ret restore call %g2 nop .long 873 mov 0,%i0 ret restore call %g2 nop .long 874 mov 0,%i0 ret restore call %g2 nop .long 875 mov 0,%i0 ret restore call %g2 nop .long 876 mov 0,%i0 ret restore call %g2 nop .long 877 mov 0,%i0 ret restore call %g2 nop .long 878 mov 0,%i0 ret restore call %g2 nop .long 879 mov 0,%i0 ret restore call %g2 nop .long 880 mov 0,%i0 ret restore call %g2 nop .long 881 mov 0,%i0 ret restore call %g2 nop .long 882 mov 0,%i0 ret restore call %g2 nop .long 883 mov 0,%i0 ret restore call %g2 nop .long 884 mov 0,%i0 ret restore call %g2 nop .long 885 mov 0,%i0 ret restore call %g2 nop .long 886 mov 0,%i0 ret restore call %g2 nop .long 887 mov 0,%i0 ret restore call %g2 nop .long 888 mov 0,%i0 ret restore call %g2 nop .long 889 mov 0,%i0 ret restore call %g2 nop .long 890 mov 0,%i0 ret restore call %g2 nop .long 891 mov 0,%i0 ret restore call %g2 nop .long 892 mov 0,%i0 ret restore call %g2 nop .long 893 mov 0,%i0 ret restore call %g2 nop .long 894 mov 0,%i0 ret restore call %g2 nop .long 895 mov 0,%i0 ret restore call %g2 nop .long 896 mov 0,%i0 ret restore call %g2 nop .long 897 mov 0,%i0 ret restore call %g2 nop .long 898 mov 0,%i0 ret restore call %g2 nop .long 899 mov 0,%i0 ret restore call %g2 nop .long 900 mov 0,%i0 ret restore call %g2 nop .long 901 mov 0,%i0 ret restore call %g2 nop .long 902 mov 0,%i0 ret restore call %g2 nop .long 903 mov 0,%i0 ret restore call %g2 nop .long 904 mov 0,%i0 ret restore call %g2 nop .long 905 mov 0,%i0 ret restore call %g2 nop .long 906 mov 0,%i0 ret restore call %g2 nop .long 907 mov 0,%i0 ret restore call %g2 nop .long 908 mov 0,%i0 ret restore call %g2 nop .long 909 mov 0,%i0 ret restore call %g2 nop .long 910 mov 0,%i0 ret restore call %g2 nop .long 911 mov 0,%i0 ret restore call %g2 nop .long 912 mov 0,%i0 ret restore call %g2 nop .long 913 mov 0,%i0 ret restore call %g2 nop .long 914 mov 0,%i0 ret restore call %g2 nop .long 915 mov 0,%i0 ret restore call %g2 nop .long 916 mov 0,%i0 ret restore call %g2 nop .long 917 mov 0,%i0 ret restore call %g2 nop .long 918 mov 0,%i0 ret restore call %g2 nop .long 919 mov 0,%i0 ret restore call %g2 nop .long 920 mov 0,%i0 ret restore call %g2 nop .long 921 mov 0,%i0 ret restore call %g2 nop .long 922 mov 0,%i0 ret restore call %g2 nop .long 923 mov 0,%i0 ret restore call %g2 nop .long 924 mov 0,%i0 ret restore call %g2 nop .long 925 mov 0,%i0 ret restore call %g2 nop .long 926 mov 0,%i0 ret restore call %g2 nop .long 927 mov 0,%i0 ret restore call %g2 nop .long 928 mov 0,%i0 ret restore call %g2 nop .long 929 mov 0,%i0 ret restore call %g2 nop .long 930 mov 0,%i0 ret restore call %g2 nop .long 931 mov 0,%i0 ret restore call %g2 nop .long 932 mov 0,%i0 ret restore call %g2 nop .long 933 mov 0,%i0 ret restore call %g2 nop .long 934 mov 0,%i0 ret restore call %g2 nop .long 935 mov 0,%i0 ret restore call %g2 nop .long 936 mov 0,%i0 ret restore call %g2 nop .long 937 mov 0,%i0 ret restore call %g2 nop .long 938 mov 0,%i0 ret restore call %g2 nop .long 939 mov 0,%i0 ret restore call %g2 nop .long 940 mov 0,%i0 ret restore call %g2 nop .long 941 mov 0,%i0 ret restore call %g2 nop .long 942 mov 0,%i0 ret restore call %g2 nop .long 943 mov 0,%i0 ret restore call %g2 nop .long 944 mov 0,%i0 ret restore call %g2 nop .long 945 mov 0,%i0 ret restore call %g2 nop .long 946 mov 0,%i0 ret restore call %g2 nop .long 947 mov 0,%i0 ret restore call %g2 nop .long 948 mov 0,%i0 ret restore call %g2 nop .long 949 mov 0,%i0 ret restore call %g2 nop .long 950 mov 0,%i0 ret restore call %g2 nop .long 951 mov 0,%i0 ret restore call %g2 nop .long 952 mov 0,%i0 ret restore call %g2 nop .long 953 mov 0,%i0 ret restore call %g2 nop .long 954 mov 0,%i0 ret restore call %g2 nop .long 955 mov 0,%i0 ret restore call %g2 nop .long 956 mov 0,%i0 ret restore call %g2 nop .long 957 mov 0,%i0 ret restore call %g2 nop .long 958 mov 0,%i0 ret restore call %g2 nop .long 959 mov 0,%i0 ret restore call %g2 nop .long 960 mov 0,%i0 ret restore call %g2 nop .long 961 mov 0,%i0 ret restore call %g2 nop .long 962 mov 0,%i0 ret restore call %g2 nop .long 963 mov 0,%i0 ret restore call %g2 nop .long 964 mov 0,%i0 ret restore call %g2 nop .long 965 mov 0,%i0 ret restore call %g2 nop .long 966 mov 0,%i0 ret restore call %g2 nop .long 967 mov 0,%i0 ret restore call %g2 nop .long 968 mov 0,%i0 ret restore call %g2 nop .long 969 mov 0,%i0 ret restore call %g2 nop .long 970 mov 0,%i0 ret restore call %g2 nop .long 971 mov 0,%i0 ret restore call %g2 nop .long 972 mov 0,%i0 ret restore call %g2 nop .long 973 mov 0,%i0 ret restore call %g2 nop .long 974 mov 0,%i0 ret restore call %g2 nop .long 975 mov 0,%i0 ret restore call %g2 nop .long 976 mov 0,%i0 ret restore call %g2 nop .long 977 mov 0,%i0 ret restore call %g2 nop .long 978 mov 0,%i0 ret restore call %g2 nop .long 979 mov 0,%i0 ret restore call %g2 nop .long 980 mov 0,%i0 ret restore call %g2 nop .long 981 mov 0,%i0 ret restore call %g2 nop .long 982 mov 0,%i0 ret restore call %g2 nop .long 983 mov 0,%i0 ret restore call %g2 nop .long 984 mov 0,%i0 ret restore call %g2 nop .long 985 mov 0,%i0 ret restore call %g2 nop .long 986 mov 0,%i0 ret restore call %g2 nop .long 987 mov 0,%i0 ret restore call %g2 nop .long 988 mov 0,%i0 ret restore call %g2 nop .long 989 mov 0,%i0 ret restore call %g2 nop .long 990 mov 0,%i0 ret restore call %g2 nop .long 991 mov 0,%i0 ret restore call %g2 nop .long 992 mov 0,%i0 ret restore call %g2 nop .long 993 mov 0,%i0 ret restore call %g2 nop .long 994 mov 0,%i0 ret restore call %g2 nop .long 995 mov 0,%i0 ret restore call %g2 nop .long 996 mov 0,%i0 ret restore call %g2 nop .long 997 mov 0,%i0 ret restore call %g2 nop .long 998 mov 0,%i0 ret restore call %g2 nop .long 999 mov 0,%i0 ret restore call %g2 nop .long 1000 mov 0,%i0 ret restore call %g2 nop .long 1001 mov 0,%i0 ret restore call %g2 nop .long 1002 mov 0,%i0 ret restore call %g2 nop .long 1003 mov 0,%i0 ret restore call %g2 nop .long 1004 mov 0,%i0 ret restore call %g2 nop .long 1005 mov 0,%i0 ret restore call %g2 nop .long 1006 mov 0,%i0 ret restore call %g2 nop .long 1007 mov 0,%i0 ret restore call %g2 nop .long 1008 mov 0,%i0 ret restore call %g2 nop .long 1009 mov 0,%i0 ret restore call %g2 nop .long 1010 mov 0,%i0 ret restore call %g2 nop .long 1011 mov 0,%i0 ret restore call %g2 nop .long 1012 mov 0,%i0 ret restore call %g2 nop .long 1013 mov 0,%i0 ret restore call %g2 nop .long 1014 mov 0,%i0 ret restore call %g2 nop .long 1015 mov 0,%i0 ret restore call %g2 nop .long 1016 mov 0,%i0 ret restore call %g2 nop .long 1017 mov 0,%i0 ret restore call %g2 nop .long 1018 mov 0,%i0 ret restore call %g2 nop .long 1019 mov 0,%i0 ret restore call %g2 nop .long 1020 mov 0,%i0 ret restore call %g2 nop .long 1021 mov 0,%i0 ret restore call %g2 nop .long 1022 mov 0,%i0 ret restore call %g2 nop .long 1023 mov 0,%i0 ret restore call %g2 nop .long 1024 mov 0,%i0 ret restore call %g2 nop .long 1025 mov 0,%i0 ret restore call %g2 nop .long 1026 mov 0,%i0 ret restore call %g2 nop .long 1027 mov 0,%i0 ret restore call %g2 nop .long 1028 mov 0,%i0 ret restore call %g2 nop .long 1029 mov 0,%i0 ret restore call %g2 nop .long 1030 mov 0,%i0 ret restore call %g2 nop .long 1031 mov 0,%i0 ret restore call %g2 nop .long 1032 mov 0,%i0 ret restore call %g2 nop .long 1033 mov 0,%i0 ret restore call %g2 nop .long 1034 mov 0,%i0 ret restore call %g2 nop .long 1035 mov 0,%i0 ret restore call %g2 nop .long 1036 mov 0,%i0 ret restore call %g2 nop .long 1037 mov 0,%i0 ret restore call %g2 nop .long 1038 mov 0,%i0 ret restore call %g2 nop .long 1039 mov 0,%i0 ret restore call %g2 nop .long 1040 mov 0,%i0 ret restore call %g2 nop .long 1041 mov 0,%i0 ret restore call %g2 nop .long 1042 mov 0,%i0 ret restore call %g2 nop .long 1043 mov 0,%i0 ret restore call %g2 nop .long 1044 mov 0,%i0 ret restore call %g2 nop .long 1045 mov 0,%i0 ret restore call %g2 nop .long 1046 mov 0,%i0 ret restore call %g2 nop .long 1047 mov 0,%i0 ret restore call %g2 nop .long 1048 mov 0,%i0 ret restore call %g2 nop .long 1049 mov 0,%i0 ret restore call %g2 nop .long 1050 mov 0,%i0 ret restore call %g2 nop .long 1051 mov 0,%i0 ret restore call %g2 nop .long 1052 mov 0,%i0 ret restore call %g2 nop .long 1053 mov 0,%i0 ret restore call %g2 nop .long 1054 mov 0,%i0 ret restore call %g2 nop .long 1055 mov 0,%i0 ret restore call %g2 nop .long 1056 mov 0,%i0 ret restore call %g2 nop .long 1057 mov 0,%i0 ret restore call %g2 nop .long 1058 mov 0,%i0 ret restore call %g2 nop .long 1059 mov 0,%i0 ret restore call %g2 nop .long 1060 mov 0,%i0 ret restore call %g2 nop .long 1061 mov 0,%i0 ret restore call %g2 nop .long 1062 mov 0,%i0 ret restore call %g2 nop .long 1063 mov 0,%i0 ret restore call %g2 nop .long 1064 mov 0,%i0 ret restore call %g2 nop .long 1065 mov 0,%i0 ret restore call %g2 nop .long 1066 mov 0,%i0 ret restore call %g2 nop .long 1067 mov 0,%i0 ret restore call %g2 nop .long 1068 mov 0,%i0 ret restore call %g2 nop .long 1069 mov 0,%i0 ret restore call %g2 nop .long 1070 mov 0,%i0 ret restore call %g2 nop .long 1071 mov 0,%i0 ret restore call %g2 nop .long 1072 mov 0,%i0 ret restore call %g2 nop .long 1073 mov 0,%i0 ret restore call %g2 nop .long 1074 mov 0,%i0 ret restore call %g2 nop .long 1075 mov 0,%i0 ret restore call %g2 nop .long 1076 mov 0,%i0 ret restore call %g2 nop .long 1077 mov 0,%i0 ret restore call %g2 nop .long 1078 mov 0,%i0 ret restore call %g2 nop .long 1079 mov 0,%i0 ret restore call %g2 nop .long 1080 mov 0,%i0 ret restore call %g2 nop .long 1081 mov 0,%i0 ret restore call %g2 nop .long 1082 mov 0,%i0 ret restore call %g2 nop .long 1083 mov 0,%i0 ret restore call %g2 nop .long 1084 mov 0,%i0 ret restore call %g2 nop .long 1085 mov 0,%i0 ret restore call %g2 nop .long 1086 mov 0,%i0 ret restore call %g2 nop .long 1087 mov 0,%i0 ret restore call %g2 nop .long 1088 mov 0,%i0 ret restore call %g2 nop .long 1089 mov 0,%i0 ret restore call %g2 nop .long 1090 mov 0,%i0 ret restore call %g2 nop .long 1091 mov 0,%i0 ret restore call %g2 nop .long 1092 mov 0,%i0 ret restore call %g2 nop .long 1093 mov 0,%i0 ret restore call %g2 nop .long 1094 mov 0,%i0 ret restore call %g2 nop .long 1095 mov 0,%i0 ret restore call %g2 nop .long 1096 mov 0,%i0 ret restore call %g2 nop .long 1097 mov 0,%i0 ret restore call %g2 nop .long 1098 mov 0,%i0 ret restore call %g2 nop .long 1099 mov 0,%i0 ret restore call %g2 nop .long 1100 mov 0,%i0 ret restore call %g2 nop .long 1101 mov 0,%i0 ret restore call %g2 nop .long 1102 mov 0,%i0 ret restore call %g2 nop .long 1103 mov 0,%i0 ret restore call %g2 nop .long 1104 mov 0,%i0 ret restore call %g2 nop .long 1105 mov 0,%i0 ret restore call %g2 nop .long 1106 mov 0,%i0 ret restore call %g2 nop .long 1107 mov 0,%i0 ret restore call %g2 nop .long 1108 mov 0,%i0 ret restore call %g2 nop .long 1109 mov 0,%i0 ret restore call %g2 nop .long 1110 mov 0,%i0 ret restore call %g2 nop .long 1111 mov 0,%i0 ret restore call %g2 nop .long 1112 mov 0,%i0 ret restore call %g2 nop .long 1113 mov 0,%i0 ret restore call %g2 nop .long 1114 mov 0,%i0 ret restore call %g2 nop .long 1115 mov 0,%i0 ret restore call %g2 nop .long 1116 mov 0,%i0 ret restore call %g2 nop .long 1117 mov 0,%i0 ret restore call %g2 nop .long 1118 mov 0,%i0 ret restore call %g2 nop .long 1119 mov 0,%i0 ret restore call %g2 nop .long 1120 mov 0,%i0 ret restore call %g2 nop .long 1121 mov 0,%i0 ret restore call %g2 nop .long 1122 mov 0,%i0 ret restore call %g2 nop .long 1123 mov 0,%i0 ret restore call %g2 nop .long 1124 mov 0,%i0 ret restore call %g2 nop .long 1125 mov 0,%i0 ret restore call %g2 nop .long 1126 mov 0,%i0 ret restore call %g2 nop .long 1127 mov 0,%i0 ret restore call %g2 nop .long 1128 mov 0,%i0 ret restore call %g2 nop .long 1129 mov 0,%i0 ret restore call %g2 nop .long 1130 mov 0,%i0 ret restore call %g2 nop .long 1131 mov 0,%i0 ret restore call %g2 nop .long 1132 mov 0,%i0 ret restore call %g2 nop .long 1133 mov 0,%i0 ret restore call %g2 nop .long 1134 mov 0,%i0 ret restore call %g2 nop .long 1135 mov 0,%i0 ret restore call %g2 nop .long 1136 mov 0,%i0 ret restore call %g2 nop .long 1137 mov 0,%i0 ret restore call %g2 nop .long 1138 mov 0,%i0 ret restore call %g2 nop .long 1139 mov 0,%i0 ret restore call %g2 nop .long 1140 mov 0,%i0 ret restore call %g2 nop .long 1141 mov 0,%i0 ret restore call %g2 nop .long 1142 mov 0,%i0 ret restore call %g2 nop .long 1143 mov 0,%i0 ret restore call %g2 nop .long 1144 mov 0,%i0 ret restore call %g2 nop .long 1145 mov 0,%i0 ret restore call %g2 nop .long 1146 mov 0,%i0 ret restore call %g2 nop .long 1147 mov 0,%i0 ret restore call %g2 nop .long 1148 mov 0,%i0 ret restore call %g2 nop .long 1149 mov 0,%i0 ret restore call %g2 nop .long 1150 mov 0,%i0 ret restore call %g2 nop .long 1151 mov 0,%i0 ret restore call %g2 nop .long 1152 mov 0,%i0 ret restore call %g2 nop .long 1153 mov 0,%i0 ret restore call %g2 nop .long 1154 mov 0,%i0 ret restore call %g2 nop .long 1155 mov 0,%i0 ret restore call %g2 nop .long 1156 mov 0,%i0 ret restore call %g2 nop .long 1157 mov 0,%i0 ret restore call %g2 nop .long 1158 mov 0,%i0 ret restore call %g2 nop .long 1159 mov 0,%i0 ret restore call %g2 nop .long 1160 mov 0,%i0 ret restore call %g2 nop .long 1161 mov 0,%i0 ret restore call %g2 nop .long 1162 mov 0,%i0 ret restore call %g2 nop .long 1163 mov 0,%i0 ret restore call %g2 nop .long 1164 mov 0,%i0 ret restore call %g2 nop .long 1165 mov 0,%i0 ret restore call %g2 nop .long 1166 mov 0,%i0 ret restore call %g2 nop .long 1167 mov 0,%i0 ret restore call %g2 nop .long 1168 mov 0,%i0 ret restore call %g2 nop .long 1169 mov 0,%i0 ret restore call %g2 nop .long 1170 mov 0,%i0 ret restore call %g2 nop .long 1171 mov 0,%i0 ret restore call %g2 nop .long 1172 mov 0,%i0 ret restore call %g2 nop .long 1173 mov 0,%i0 ret restore call %g2 nop .long 1174 mov 0,%i0 ret restore call %g2 nop .long 1175 mov 0,%i0 ret restore call %g2 nop .long 1176 mov 0,%i0 ret restore call %g2 nop .long 1177 mov 0,%i0 ret restore call %g2 nop .long 1178 mov 0,%i0 ret restore call %g2 nop .long 1179 mov 0,%i0 ret restore call %g2 nop .long 1180 mov 0,%i0 ret restore call %g2 nop .long 1181 mov 0,%i0 ret restore call %g2 nop .long 1182 mov 0,%i0 ret restore call %g2 nop .long 1183 mov 0,%i0 ret restore call %g2 nop .long 1184 mov 0,%i0 ret restore call %g2 nop .long 1185 mov 0,%i0 ret restore call %g2 nop .long 1186 mov 0,%i0 ret restore call %g2 nop .long 1187 mov 0,%i0 ret restore call %g2 nop .long 1188 mov 0,%i0 ret restore call %g2 nop .long 1189 mov 0,%i0 ret restore call %g2 nop .long 1190 mov 0,%i0 ret restore call %g2 nop .long 1191 mov 0,%i0 ret restore call %g2 nop .long 1192 mov 0,%i0 ret restore call %g2 nop .long 1193 mov 0,%i0 ret restore call %g2 nop .long 1194 mov 0,%i0 ret restore call %g2 nop .long 1195 mov 0,%i0 ret restore call %g2 nop .long 1196 mov 0,%i0 ret restore call %g2 nop .long 1197 mov 0,%i0 ret restore call %g2 nop .long 1198 mov 0,%i0 ret restore call %g2 nop .long 1199 mov 0,%i0 ret restore call %g2 nop .long 1200 mov 0,%i0 ret restore call %g2 nop .long 1201 mov 0,%i0 ret restore call %g2 nop .long 1202 mov 0,%i0 ret restore call %g2 nop .long 1203 mov 0,%i0 ret restore call %g2 nop .long 1204 mov 0,%i0 ret restore call %g2 nop .long 1205 mov 0,%i0 ret restore call %g2 nop .long 1206 mov 0,%i0 ret restore call %g2 nop .long 1207 mov 0,%i0 ret restore call %g2 nop .long 1208 mov 0,%i0 ret restore call %g2 nop .long 1209 mov 0,%i0 ret restore call %g2 nop .long 1210 mov 0,%i0 ret restore call %g2 nop .long 1211 mov 0,%i0 ret restore call %g2 nop .long 1212 mov 0,%i0 ret restore call %g2 nop .long 1213 mov 0,%i0 ret restore call %g2 nop .long 1214 mov 0,%i0 ret restore call %g2 nop .long 1215 mov 0,%i0 ret restore call %g2 nop .long 1216 mov 0,%i0 ret restore call %g2 nop .long 1217 mov 0,%i0 ret restore call %g2 nop .long 1218 mov 0,%i0 ret restore call %g2 nop .long 1219 mov 0,%i0 ret restore call %g2 nop .long 1220 mov 0,%i0 ret restore call %g2 nop .long 1221 mov 0,%i0 ret restore call %g2 nop .long 1222 mov 0,%i0 ret restore call %g2 nop .long 1223 mov 0,%i0 ret restore call %g2 nop .long 1224 mov 0,%i0 ret restore call %g2 nop .long 1225 mov 0,%i0 ret restore call %g2 nop .long 1226 mov 0,%i0 ret restore call %g2 nop .long 1227 mov 0,%i0 ret restore call %g2 nop .long 1228 mov 0,%i0 ret restore call %g2 nop .long 1229 mov 0,%i0 ret restore call %g2 nop .long 1230 mov 0,%i0 ret restore call %g2 nop .long 1231 mov 0,%i0 ret restore call %g2 nop .long 1232 mov 0,%i0 ret restore call %g2 nop .long 1233 mov 0,%i0 ret restore call %g2 nop .long 1234 mov 0,%i0 ret restore call %g2 nop .long 1235 mov 0,%i0 ret restore call %g2 nop .long 1236 mov 0,%i0 ret restore call %g2 nop .long 1237 mov 0,%i0 ret restore call %g2 nop .long 1238 mov 0,%i0 ret restore call %g2 nop .long 1239 mov 0,%i0 ret restore call %g2 nop .long 1240 mov 0,%i0 ret restore call %g2 nop .long 1241 mov 0,%i0 ret restore call %g2 nop .long 1242 mov 0,%i0 ret restore call %g2 nop .long 1243 mov 0,%i0 ret restore call %g2 nop .long 1244 mov 0,%i0 ret restore call %g2 nop .long 1245 mov 0,%i0 ret restore call %g2 nop .long 1246 mov 0,%i0 ret restore call %g2 nop .long 1247 mov 0,%i0 ret restore call %g2 nop .long 1248 mov 0,%i0 ret restore call %g2 nop .long 1249 mov 0,%i0 ret restore call %g2 nop .long 1250 mov 0,%i0 ret restore call %g2 nop .long 1251 mov 0,%i0 ret restore call %g2 nop .long 1252 mov 0,%i0 ret restore call %g2 nop .long 1253 mov 0,%i0 ret restore call %g2 nop .long 1254 mov 0,%i0 ret restore call %g2 nop .long 1255 mov 0,%i0 ret restore call %g2 nop .long 1256 mov 0,%i0 ret restore call %g2 nop .long 1257 mov 0,%i0 ret restore call %g2 nop .long 1258 mov 0,%i0 ret restore call %g2 nop .long 1259 mov 0,%i0 ret restore call %g2 nop .long 1260 mov 0,%i0 ret restore call %g2 nop .long 1261 mov 0,%i0 ret restore call %g2 nop .long 1262 mov 0,%i0 ret restore call %g2 nop .long 1263 mov 0,%i0 ret restore call %g2 nop .long 1264 mov 0,%i0 ret restore call %g2 nop .long 1265 mov 0,%i0 ret restore call %g2 nop .long 1266 mov 0,%i0 ret restore call %g2 nop .long 1267 mov 0,%i0 ret restore call %g2 nop .long 1268 mov 0,%i0 ret restore call %g2 nop .long 1269 mov 0,%i0 ret restore call %g2 nop .long 1270 mov 0,%i0 ret restore call %g2 nop .long 1271 mov 0,%i0 ret restore call %g2 nop .long 1272 mov 0,%i0 ret restore call %g2 nop .long 1273 mov 0,%i0 ret restore call %g2 nop .long 1274 mov 0,%i0 ret restore call %g2 nop .long 1275 mov 0,%i0 ret restore call %g2 nop .long 1276 mov 0,%i0 ret restore call %g2 nop .long 1277 mov 0,%i0 ret restore call %g2 nop .long 1278 mov 0,%i0 ret restore call %g2 nop .long 1279 mov 0,%i0 ret restore call %g2 nop .long 1280 mov 0,%i0 ret restore call %g2 nop .long 1281 mov 0,%i0 ret restore call %g2 nop .long 1282 mov 0,%i0 ret restore call %g2 nop .long 1283 mov 0,%i0 ret restore call %g2 nop .long 1284 mov 0,%i0 ret restore call %g2 nop .long 1285 mov 0,%i0 ret restore call %g2 nop .long 1286 mov 0,%i0 ret restore call %g2 nop .long 1287 mov 0,%i0 ret restore call %g2 nop .long 1288 mov 0,%i0 ret restore call %g2 nop .long 1289 mov 0,%i0 ret restore call %g2 nop .long 1290 mov 0,%i0 ret restore call %g2 nop .long 1291 mov 0,%i0 ret restore call %g2 nop .long 1292 mov 0,%i0 ret restore call %g2 nop .long 1293 mov 0,%i0 ret restore call %g2 nop .long 1294 mov 0,%i0 ret restore call %g2 nop .long 1295 mov 0,%i0 ret restore call %g2 nop .long 1296 mov 0,%i0 ret restore call %g2 nop .long 1297 mov 0,%i0 ret restore call %g2 nop .long 1298 mov 0,%i0 ret restore call %g2 nop .long 1299 mov 0,%i0 ret restore call %g2 nop .long 1300 mov 0,%i0 ret restore call %g2 nop .long 1301 mov 0,%i0 ret restore call %g2 nop .long 1302 mov 0,%i0 ret restore call %g2 nop .long 1303 mov 0,%i0 ret restore call %g2 nop .long 1304 mov 0,%i0 ret restore call %g2 nop .long 1305 mov 0,%i0 ret restore call %g2 nop .long 1306 mov 0,%i0 ret restore call %g2 nop .long 1307 mov 0,%i0 ret restore call %g2 nop .long 1308 mov 0,%i0 ret restore call %g2 nop .long 1309 mov 0,%i0 ret restore call %g2 nop .long 1310 mov 0,%i0 ret restore call %g2 nop .long 1311 mov 0,%i0 ret restore call %g2 nop .long 1312 mov 0,%i0 ret restore call %g2 nop .long 1313 mov 0,%i0 ret restore call %g2 nop .long 1314 mov 0,%i0 ret restore call %g2 nop .long 1315 mov 0,%i0 ret restore call %g2 nop .long 1316 mov 0,%i0 ret restore call %g2 nop .long 1317 mov 0,%i0 ret restore call %g2 nop .long 1318 mov 0,%i0 ret restore call %g2 nop .long 1319 mov 0,%i0 ret restore call %g2 nop .long 1320 mov 0,%i0 ret restore call %g2 nop .long 1321 mov 0,%i0 ret restore call %g2 nop .long 1322 mov 0,%i0 ret restore call %g2 nop .long 1323 mov 0,%i0 ret restore call %g2 nop .long 1324 mov 0,%i0 ret restore call %g2 nop .long 1325 mov 0,%i0 ret restore call %g2 nop .long 1326 mov 0,%i0 ret restore call %g2 nop .long 1327 mov 0,%i0 ret restore call %g2 nop .long 1328 mov 0,%i0 ret restore call %g2 nop .long 1329 mov 0,%i0 ret restore call %g2 nop .long 1330 mov 0,%i0 ret restore call %g2 nop .long 1331 mov 0,%i0 ret restore call %g2 nop .long 1332 mov 0,%i0 ret restore call %g2 nop .long 1333 mov 0,%i0 ret restore call %g2 nop .long 1334 mov 0,%i0 ret restore call %g2 nop .long 1335 mov 0,%i0 ret restore call %g2 nop .long 1336 mov 0,%i0 ret restore call %g2 nop .long 1337 mov 0,%i0 ret restore call %g2 nop .long 1338 mov 0,%i0 ret restore call %g2 nop .long 1339 mov 0,%i0 ret restore call %g2 nop .long 1340 mov 0,%i0 ret restore call %g2 nop .long 1341 mov 0,%i0 ret restore call %g2 nop .long 1342 mov 0,%i0 ret restore call %g2 nop .long 1343 mov 0,%i0 ret restore call %g2 nop .long 1344 mov 0,%i0 ret restore call %g2 nop .long 1345 mov 0,%i0 ret restore call %g2 nop .long 1346 mov 0,%i0 ret restore call %g2 nop .long 1347 mov 0,%i0 ret restore call %g2 nop .long 1348 mov 0,%i0 ret restore call %g2 nop .long 1349 mov 0,%i0 ret restore call %g2 nop .long 1350 mov 0,%i0 ret restore call %g2 nop .long 1351 mov 0,%i0 ret restore call %g2 nop .long 1352 mov 0,%i0 ret restore call %g2 nop .long 1353 mov 0,%i0 ret restore call %g2 nop .long 1354 mov 0,%i0 ret restore call %g2 nop .long 1355 mov 0,%i0 ret restore call %g2 nop .long 1356 mov 0,%i0 ret restore call %g2 nop .long 1357 mov 0,%i0 ret restore call %g2 nop .long 1358 mov 0,%i0 ret restore call %g2 nop .long 1359 mov 0,%i0 ret restore call %g2 nop .long 1360 mov 0,%i0 ret restore call %g2 nop .long 1361 mov 0,%i0 ret restore call %g2 nop .long 1362 mov 0,%i0 ret restore call %g2 nop .long 1363 mov 0,%i0 ret restore call %g2 nop .long 1364 mov 0,%i0 ret restore call %g2 nop .long 1365 mov 0,%i0 ret restore call %g2 nop .long 1366 mov 0,%i0 ret restore call %g2 nop .long 1367 mov 0,%i0 ret restore call %g2 nop .long 1368 mov 0,%i0 ret restore call %g2 nop .long 1369 mov 0,%i0 ret restore call %g2 nop .long 1370 mov 0,%i0 ret restore call %g2 nop .long 1371 mov 0,%i0 ret restore call %g2 nop .long 1372 mov 0,%i0 ret restore call %g2 nop .long 1373 mov 0,%i0 ret restore call %g2 nop .long 1374 mov 0,%i0 ret restore call %g2 nop .long 1375 mov 0,%i0 ret restore call %g2 nop .long 1376 mov 0,%i0 ret restore call %g2 nop .long 1377 mov 0,%i0 ret restore call %g2 nop .long 1378 mov 0,%i0 ret restore call %g2 nop .long 1379 mov 0,%i0 ret restore call %g2 nop .long 1380 mov 0,%i0 ret restore call %g2 nop .long 1381 mov 0,%i0 ret restore call %g2 nop .long 1382 mov 0,%i0 ret restore call %g2 nop .long 1383 mov 0,%i0 ret restore call %g2 nop .long 1384 mov 0,%i0 ret restore call %g2 nop .long 1385 mov 0,%i0 ret restore call %g2 nop .long 1386 mov 0,%i0 ret restore call %g2 nop .long 1387 mov 0,%i0 ret restore call %g2 nop .long 1388 mov 0,%i0 ret restore call %g2 nop .long 1389 mov 0,%i0 ret restore call %g2 nop .long 1390 mov 0,%i0 ret restore call %g2 nop .long 1391 mov 0,%i0 ret restore call %g2 nop .long 1392 mov 0,%i0 ret restore call %g2 nop .long 1393 mov 0,%i0 ret restore call %g2 nop .long 1394 mov 0,%i0 ret restore call %g2 nop .long 1395 mov 0,%i0 ret restore call %g2 nop .long 1396 mov 0,%i0 ret restore call %g2 nop .long 1397 mov 0,%i0 ret restore call %g2 nop .long 1398 mov 0,%i0 ret restore call %g2 nop .long 1399 mov 0,%i0 ret restore call %g2 nop .long 1400 mov 0,%i0 ret restore call %g2 nop .long 1401 mov 0,%i0 ret restore call %g2 nop .long 1402 mov 0,%i0 ret restore call %g2 nop .long 1403 mov 0,%i0 ret restore call %g2 nop .long 1404 mov 0,%i0 ret restore call %g2 nop .long 1405 mov 0,%i0 ret restore call %g2 nop .long 1406 mov 0,%i0 ret restore call %g2 nop .long 1407 mov 0,%i0 ret restore call %g2 nop .long 1408 mov 0,%i0 ret restore call %g2 nop .long 1409 mov 0,%i0 ret restore call %g2 nop .long 1410 mov 0,%i0 ret restore call %g2 nop .long 1411 mov 0,%i0 ret restore call %g2 nop .long 1412 mov 0,%i0 ret restore call %g2 nop .long 1413 mov 0,%i0 ret restore call %g2 nop .long 1414 mov 0,%i0 ret restore call %g2 nop .long 1415 mov 0,%i0 ret restore call %g2 nop .long 1416 mov 0,%i0 ret restore call %g2 nop .long 1417 mov 0,%i0 ret restore call %g2 nop .long 1418 mov 0,%i0 ret restore call %g2 nop .long 1419 mov 0,%i0 ret restore call %g2 nop .long 1420 mov 0,%i0 ret restore call %g2 nop .long 1421 mov 0,%i0 ret restore call %g2 nop .long 1422 mov 0,%i0 ret restore call %g2 nop .long 1423 mov 0,%i0 ret restore call %g2 nop .long 1424 mov 0,%i0 ret restore call %g2 nop .long 1425 mov 0,%i0 ret restore call %g2 nop .long 1426 mov 0,%i0 ret restore call %g2 nop .long 1427 mov 0,%i0 ret restore call %g2 nop .long 1428 mov 0,%i0 ret restore call %g2 nop .long 1429 mov 0,%i0 ret restore call %g2 nop .long 1430 mov 0,%i0 ret restore call %g2 nop .long 1431 mov 0,%i0 ret restore call %g2 nop .long 1432 mov 0,%i0 ret restore call %g2 nop .long 1433 mov 0,%i0 ret restore call %g2 nop .long 1434 mov 0,%i0 ret restore call %g2 nop .long 1435 mov 0,%i0 ret restore call %g2 nop .long 1436 mov 0,%i0 ret restore call %g2 nop .long 1437 mov 0,%i0 ret restore call %g2 nop .long 1438 mov 0,%i0 ret restore call %g2 nop .long 1439 mov 0,%i0 ret restore call %g2 nop .long 1440 mov 0,%i0 ret restore call %g2 nop .long 1441 mov 0,%i0 ret restore call %g2 nop .long 1442 mov 0,%i0 ret restore call %g2 nop .long 1443 mov 0,%i0 ret restore call %g2 nop .long 1444 mov 0,%i0 ret restore call %g2 nop .long 1445 mov 0,%i0 ret restore call %g2 nop .long 1446 mov 0,%i0 ret restore call %g2 nop .long 1447 mov 0,%i0 ret restore call %g2 nop .long 1448 mov 0,%i0 ret restore call %g2 nop .long 1449 mov 0,%i0 ret restore call %g2 nop .long 1450 mov 0,%i0 ret restore call %g2 nop .long 1451 mov 0,%i0 ret restore call %g2 nop .long 1452 mov 0,%i0 ret restore call %g2 nop .long 1453 mov 0,%i0 ret restore call %g2 nop .long 1454 mov 0,%i0 ret restore call %g2 nop .long 1455 mov 0,%i0 ret restore call %g2 nop .long 1456 mov 0,%i0 ret restore call %g2 nop .long 1457 mov 0,%i0 ret restore call %g2 nop .long 1458 mov 0,%i0 ret restore call %g2 nop .long 1459 mov 0,%i0 ret restore call %g2 nop .long 1460 mov 0,%i0 ret restore call %g2 nop .long 1461 mov 0,%i0 ret restore call %g2 nop .long 1462 mov 0,%i0 ret restore call %g2 nop .long 1463 mov 0,%i0 ret restore call %g2 nop .long 1464 mov 0,%i0 ret restore call %g2 nop .long 1465 mov 0,%i0 ret restore call %g2 nop .long 1466 mov 0,%i0 ret restore call %g2 nop .long 1467 mov 0,%i0 ret restore call %g2 nop .long 1468 mov 0,%i0 ret restore call %g2 nop .long 1469 mov 0,%i0 ret restore call %g2 nop .long 1470 mov 0,%i0 ret restore call %g2 nop .long 1471 mov 0,%i0 ret restore call %g2 nop .long 1472 mov 0,%i0 ret restore call %g2 nop .long 1473 mov 0,%i0 ret restore call %g2 nop .long 1474 mov 0,%i0 ret restore call %g2 nop .long 1475 mov 0,%i0 ret restore call %g2 nop .long 1476 mov 0,%i0 ret restore call %g2 nop .long 1477 mov 0,%i0 ret restore call %g2 nop .long 1478 mov 0,%i0 ret restore call %g2 nop .long 1479 mov 0,%i0 ret restore call %g2 nop .long 1480 mov 0,%i0 ret restore call %g2 nop .long 1481 mov 0,%i0 ret restore call %g2 nop .long 1482 mov 0,%i0 ret restore call %g2 nop .long 1483 mov 0,%i0 ret restore call %g2 nop .long 1484 mov 0,%i0 ret restore call %g2 nop .long 1485 mov 0,%i0 ret restore call %g2 nop .long 1486 mov 0,%i0 ret restore call %g2 nop .long 1487 mov 0,%i0 ret restore call %g2 nop .long 1488 mov 0,%i0 ret restore call %g2 nop .long 1489 mov 0,%i0 ret restore call %g2 nop .long 1490 mov 0,%i0 ret restore call %g2 nop .long 1491 mov 0,%i0 ret restore call %g2 nop .long 1492 mov 0,%i0 ret restore call %g2 nop .long 1493 mov 0,%i0 ret restore call %g2 nop .long 1494 mov 0,%i0 ret restore call %g2 nop .long 1495 mov 0,%i0 ret restore call %g2 nop .long 1496 mov 0,%i0 ret restore call %g2 nop .long 1497 mov 0,%i0 ret restore call %g2 nop .long 1498 mov 0,%i0 ret restore call %g2 nop .long 1499 mov 0,%i0 ret restore call %g2 nop .long 1500 mov 0,%i0 ret restore call %g2 nop .long 1501 mov 0,%i0 ret restore call %g2 nop .long 1502 mov 0,%i0 ret restore call %g2 nop .long 1503 mov 0,%i0 ret restore call %g2 nop .long 1504 mov 0,%i0 ret restore call %g2 nop .long 1505 mov 0,%i0 ret restore call %g2 nop .long 1506 mov 0,%i0 ret restore call %g2 nop .long 1507 mov 0,%i0 ret restore call %g2 nop .long 1508 mov 0,%i0 ret restore call %g2 nop .long 1509 mov 0,%i0 ret restore call %g2 nop .long 1510 mov 0,%i0 ret restore call %g2 nop .long 1511 mov 0,%i0 ret restore call %g2 nop .long 1512 mov 0,%i0 ret restore call %g2 nop .long 1513 mov 0,%i0 ret restore call %g2 nop .long 1514 mov 0,%i0 ret restore call %g2 nop .long 1515 mov 0,%i0 ret restore call %g2 nop .long 1516 mov 0,%i0 ret restore call %g2 nop .long 1517 mov 0,%i0 ret restore call %g2 nop .long 1518 mov 0,%i0 ret restore call %g2 nop .long 1519 mov 0,%i0 ret restore call %g2 nop .long 1520 mov 0,%i0 ret restore call %g2 nop .long 1521 mov 0,%i0 ret restore call %g2 nop .long 1522 mov 0,%i0 ret restore call %g2 nop .long 1523 mov 0,%i0 ret restore call %g2 nop .long 1524 mov 0,%i0 ret restore call %g2 nop .long 1525 mov 0,%i0 ret restore call %g2 nop .long 1526 mov 0,%i0 ret restore call %g2 nop .long 1527 mov 0,%i0 ret restore call %g2 nop .long 1528 mov 0,%i0 ret restore call %g2 nop .long 1529 mov 0,%i0 ret restore call %g2 nop .long 1530 mov 0,%i0 ret restore call %g2 nop .long 1531 mov 0,%i0 ret restore call %g2 nop .long 1532 mov 0,%i0 ret restore call %g2 nop .long 1533 mov 0,%i0 ret restore call %g2 nop .long 1534 mov 0,%i0 ret restore call %g2 nop .long 1535 mov 0,%i0 ret restore call %g2 nop .long 1536 mov 0,%i0 ret restore call %g2 nop .long 1537 mov 0,%i0 ret restore call %g2 nop .long 1538 mov 0,%i0 ret restore call %g2 nop .long 1539 mov 0,%i0 ret restore call %g2 nop .long 1540 mov 0,%i0 ret restore call %g2 nop .long 1541 mov 0,%i0 ret restore call %g2 nop .long 1542 mov 0,%i0 ret restore call %g2 nop .long 1543 mov 0,%i0 ret restore call %g2 nop .long 1544 mov 0,%i0 ret restore call %g2 nop .long 1545 mov 0,%i0 ret restore call %g2 nop .long 1546 mov 0,%i0 ret restore call %g2 nop .long 1547 mov 0,%i0 ret restore call %g2 nop .long 1548 mov 0,%i0 ret restore call %g2 nop .long 1549 mov 0,%i0 ret restore call %g2 nop .long 1550 mov 0,%i0 ret restore call %g2 nop .long 1551 mov 0,%i0 ret restore call %g2 nop .long 1552 mov 0,%i0 ret restore call %g2 nop .long 1553 mov 0,%i0 ret restore call %g2 nop .long 1554 mov 0,%i0 ret restore call %g2 nop .long 1555 mov 0,%i0 ret restore call %g2 nop .long 1556 mov 0,%i0 ret restore call %g2 nop .long 1557 mov 0,%i0 ret restore call %g2 nop .long 1558 mov 0,%i0 ret restore call %g2 nop .long 1559 mov 0,%i0 ret restore call %g2 nop .long 1560 mov 0,%i0 ret restore call %g2 nop .long 1561 mov 0,%i0 ret restore call %g2 nop .long 1562 mov 0,%i0 ret restore call %g2 nop .long 1563 mov 0,%i0 ret restore call %g2 nop .long 1564 mov 0,%i0 ret restore call %g2 nop .long 1565 mov 0,%i0 ret restore call %g2 nop .long 1566 mov 0,%i0 ret restore call %g2 nop .long 1567 mov 0,%i0 ret restore call %g2 nop .long 1568 mov 0,%i0 ret restore call %g2 nop .long 1569 mov 0,%i0 ret restore call %g2 nop .long 1570 mov 0,%i0 ret restore call %g2 nop .long 1571 mov 0,%i0 ret restore call %g2 nop .long 1572 mov 0,%i0 ret restore call %g2 nop .long 1573 mov 0,%i0 ret restore call %g2 nop .long 1574 mov 0,%i0 ret restore call %g2 nop .long 1575 mov 0,%i0 ret restore call %g2 nop .long 1576 mov 0,%i0 ret restore call %g2 nop .long 1577 mov 0,%i0 ret restore call %g2 nop .long 1578 mov 0,%i0 ret restore call %g2 nop .long 1579 mov 0,%i0 ret restore call %g2 nop .long 1580 mov 0,%i0 ret restore call %g2 nop .long 1581 mov 0,%i0 ret restore call %g2 nop .long 1582 mov 0,%i0 ret restore call %g2 nop .long 1583 mov 0,%i0 ret restore call %g2 nop .long 1584 mov 0,%i0 ret restore call %g2 nop .long 1585 mov 0,%i0 ret restore call %g2 nop .long 1586 mov 0,%i0 ret restore call %g2 nop .long 1587 mov 0,%i0 ret restore call %g2 nop .long 1588 mov 0,%i0 ret restore call %g2 nop .long 1589 mov 0,%i0 ret restore call %g2 nop .long 1590 mov 0,%i0 ret restore call %g2 nop .long 1591 mov 0,%i0 ret restore call %g2 nop .long 1592 mov 0,%i0 ret restore call %g2 nop .long 1593 mov 0,%i0 ret restore call %g2 nop .long 1594 mov 0,%i0 ret restore call %g2 nop .long 1595 mov 0,%i0 ret restore call %g2 nop .long 1596 mov 0,%i0 ret restore call %g2 nop .long 1597 mov 0,%i0 ret restore call %g2 nop .long 1598 mov 0,%i0 ret restore call %g2 nop .long 1599 mov 0,%i0 ret restore call %g2 nop .long 1600 mov 0,%i0 ret restore call %g2 nop .long 1601 mov 0,%i0 ret restore call %g2 nop .long 1602 mov 0,%i0 ret restore call %g2 nop .long 1603 mov 0,%i0 ret restore call %g2 nop .long 1604 mov 0,%i0 ret restore call %g2 nop .long 1605 mov 0,%i0 ret restore call %g2 nop .long 1606 mov 0,%i0 ret restore call %g2 nop .long 1607 mov 0,%i0 ret restore call %g2 nop .long 1608 mov 0,%i0 ret restore call %g2 nop .long 1609 mov 0,%i0 ret restore call %g2 nop .long 1610 mov 0,%i0 ret restore call %g2 nop .long 1611 mov 0,%i0 ret restore call %g2 nop .long 1612 mov 0,%i0 ret restore call %g2 nop .long 1613 mov 0,%i0 ret restore call %g2 nop .long 1614 mov 0,%i0 ret restore call %g2 nop .long 1615 mov 0,%i0 ret restore call %g2 nop .long 1616 mov 0,%i0 ret restore call %g2 nop .long 1617 mov 0,%i0 ret restore call %g2 nop .long 1618 mov 0,%i0 ret restore call %g2 nop .long 1619 mov 0,%i0 ret restore call %g2 nop .long 1620 mov 0,%i0 ret restore call %g2 nop .long 1621 mov 0,%i0 ret restore call %g2 nop .long 1622 mov 0,%i0 ret restore call %g2 nop .long 1623 mov 0,%i0 ret restore call %g2 nop .long 1624 mov 0,%i0 ret restore call %g2 nop .long 1625 mov 0,%i0 ret restore call %g2 nop .long 1626 mov 0,%i0 ret restore call %g2 nop .long 1627 mov 0,%i0 ret restore call %g2 nop .long 1628 mov 0,%i0 ret restore call %g2 nop .long 1629 mov 0,%i0 ret restore call %g2 nop .long 1630 mov 0,%i0 ret restore call %g2 nop .long 1631 mov 0,%i0 ret restore call %g2 nop .long 1632 mov 0,%i0 ret restore call %g2 nop .long 1633 mov 0,%i0 ret restore call %g2 nop .long 1634 mov 0,%i0 ret restore call %g2 nop .long 1635 mov 0,%i0 ret restore call %g2 nop .long 1636 mov 0,%i0 ret restore call %g2 nop .long 1637 mov 0,%i0 ret restore call %g2 nop .long 1638 mov 0,%i0 ret restore call %g2 nop .long 1639 mov 0,%i0 ret restore call %g2 nop .long 1640 mov 0,%i0 ret restore call %g2 nop .long 1641 mov 0,%i0 ret restore call %g2 nop .long 1642 mov 0,%i0 ret restore call %g2 nop .long 1643 mov 0,%i0 ret restore call %g2 nop .long 1644 mov 0,%i0 ret restore call %g2 nop .long 1645 mov 0,%i0 ret restore call %g2 nop .long 1646 mov 0,%i0 ret restore call %g2 nop .long 1647 mov 0,%i0 ret restore call %g2 nop .long 1648 mov 0,%i0 ret restore call %g2 nop .long 1649 mov 0,%i0 ret restore call %g2 nop .long 1650 mov 0,%i0 ret restore call %g2 nop .long 1651 mov 0,%i0 ret restore call %g2 nop .long 1652 mov 0,%i0 ret restore call %g2 nop .long 1653 mov 0,%i0 ret restore call %g2 nop .long 1654 mov 0,%i0 ret restore call %g2 nop .long 1655 mov 0,%i0 ret restore call %g2 nop .long 1656 mov 0,%i0 ret restore call %g2 nop .long 1657 mov 0,%i0 ret restore call %g2 nop .long 1658 mov 0,%i0 ret restore call %g2 nop .long 1659 mov 0,%i0 ret restore call %g2 nop .long 1660 mov 0,%i0 ret restore call %g2 nop .long 1661 mov 0,%i0 ret restore call %g2 nop .long 1662 mov 0,%i0 ret restore call %g2 nop .long 1663 mov 0,%i0 ret restore call %g2 nop .long 1664 mov 0,%i0 ret restore call %g2 nop .long 1665 mov 0,%i0 ret restore call %g2 nop .long 1666 mov 0,%i0 ret restore call %g2 nop .long 1667 mov 0,%i0 ret restore call %g2 nop .long 1668 mov 0,%i0 ret restore call %g2 nop .long 1669 mov 0,%i0 ret restore call %g2 nop .long 1670 mov 0,%i0 ret restore call %g2 nop .long 1671 mov 0,%i0 ret restore call %g2 nop .long 1672 mov 0,%i0 ret restore call %g2 nop .long 1673 mov 0,%i0 ret restore call %g2 nop .long 1674 mov 0,%i0 ret restore call %g2 nop .long 1675 mov 0,%i0 ret restore call %g2 nop .long 1676 mov 0,%i0 ret restore call %g2 nop .long 1677 mov 0,%i0 ret restore call %g2 nop .long 1678 mov 0,%i0 ret restore call %g2 nop .long 1679 mov 0,%i0 ret restore call %g2 nop .long 1680 mov 0,%i0 ret restore call %g2 nop .long 1681 mov 0,%i0 ret restore call %g2 nop .long 1682 mov 0,%i0 ret restore call %g2 nop .long 1683 mov 0,%i0 ret restore call %g2 nop .long 1684 mov 0,%i0 ret restore call %g2 nop .long 1685 mov 0,%i0 ret restore call %g2 nop .long 1686 mov 0,%i0 ret restore call %g2 nop .long 1687 mov 0,%i0 ret restore call %g2 nop .long 1688 mov 0,%i0 ret restore call %g2 nop .long 1689 mov 0,%i0 ret restore call %g2 nop .long 1690 mov 0,%i0 ret restore call %g2 nop .long 1691 mov 0,%i0 ret restore call %g2 nop .long 1692 mov 0,%i0 ret restore call %g2 nop .long 1693 mov 0,%i0 ret restore call %g2 nop .long 1694 mov 0,%i0 ret restore call %g2 nop .long 1695 mov 0,%i0 ret restore call %g2 nop .long 1696 mov 0,%i0 ret restore call %g2 nop .long 1697 mov 0,%i0 ret restore call %g2 nop .long 1698 mov 0,%i0 ret restore call %g2 nop .long 1699 mov 0,%i0 ret restore call %g2 nop .long 1700 mov 0,%i0 ret restore call %g2 nop .long 1701 mov 0,%i0 ret restore call %g2 nop .long 1702 mov 0,%i0 ret restore call %g2 nop .long 1703 mov 0,%i0 ret restore call %g2 nop .long 1704 mov 0,%i0 ret restore call %g2 nop .long 1705 mov 0,%i0 ret restore call %g2 nop .long 1706 mov 0,%i0 ret restore call %g2 nop .long 1707 mov 0,%i0 ret restore call %g2 nop .long 1708 mov 0,%i0 ret restore call %g2 nop .long 1709 mov 0,%i0 ret restore call %g2 nop .long 1710 mov 0,%i0 ret restore call %g2 nop .long 1711 mov 0,%i0 ret restore call %g2 nop .long 1712 mov 0,%i0 ret restore call %g2 nop .long 1713 mov 0,%i0 ret restore call %g2 nop .long 1714 mov 0,%i0 ret restore call %g2 nop .long 1715 mov 0,%i0 ret restore call %g2 nop .long 1716 mov 0,%i0 ret restore call %g2 nop .long 1717 mov 0,%i0 ret restore call %g2 nop .long 1718 mov 0,%i0 ret restore call %g2 nop .long 1719 mov 0,%i0 ret restore call %g2 nop .long 1720 mov 0,%i0 ret restore call %g2 nop .long 1721 mov 0,%i0 ret restore call %g2 nop .long 1722 mov 0,%i0 ret restore call %g2 nop .long 1723 mov 0,%i0 ret restore call %g2 nop .long 1724 mov 0,%i0 ret restore call %g2 nop .long 1725 mov 0,%i0 ret restore call %g2 nop .long 1726 mov 0,%i0 ret restore call %g2 nop .long 1727 mov 0,%i0 ret restore call %g2 nop .long 1728 mov 0,%i0 ret restore call %g2 nop .long 1729 mov 0,%i0 ret restore call %g2 nop .long 1730 mov 0,%i0 ret restore call %g2 nop .long 1731 mov 0,%i0 ret restore call %g2 nop .long 1732 mov 0,%i0 ret restore call %g2 nop .long 1733 mov 0,%i0 ret restore call %g2 nop .long 1734 mov 0,%i0 ret restore call %g2 nop .long 1735 mov 0,%i0 ret restore call %g2 nop .long 1736 mov 0,%i0 ret restore call %g2 nop .long 1737 mov 0,%i0 ret restore call %g2 nop .long 1738 mov 0,%i0 ret restore call %g2 nop .long 1739 mov 0,%i0 ret restore call %g2 nop .long 1740 mov 0,%i0 ret restore call %g2 nop .long 1741 mov 0,%i0 ret restore call %g2 nop .long 1742 mov 0,%i0 ret restore call %g2 nop .long 1743 mov 0,%i0 ret restore call %g2 nop .long 1744 mov 0,%i0 ret restore call %g2 nop .long 1745 mov 0,%i0 ret restore call %g2 nop .long 1746 mov 0,%i0 ret restore call %g2 nop .long 1747 mov 0,%i0 ret restore call %g2 nop .long 1748 mov 0,%i0 ret restore call %g2 nop .long 1749 mov 0,%i0 ret restore call %g2 nop .long 1750 mov 0,%i0 ret restore call %g2 nop .long 1751 mov 0,%i0 ret restore call %g2 nop .long 1752 mov 0,%i0 ret restore call %g2 nop .long 1753 mov 0,%i0 ret restore call %g2 nop .long 1754 mov 0,%i0 ret restore call %g2 nop .long 1755 mov 0,%i0 ret restore call %g2 nop .long 1756 mov 0,%i0 ret restore call %g2 nop .long 1757 mov 0,%i0 ret restore call %g2 nop .long 1758 mov 0,%i0 ret restore call %g2 nop .long 1759 mov 0,%i0 ret restore call %g2 nop .long 1760 mov 0,%i0 ret restore call %g2 nop .long 1761 mov 0,%i0 ret restore call %g2 nop .long 1762 mov 0,%i0 ret restore call %g2 nop .long 1763 mov 0,%i0 ret restore call %g2 nop .long 1764 mov 0,%i0 ret restore call %g2 nop .long 1765 mov 0,%i0 ret restore call %g2 nop .long 1766 mov 0,%i0 ret restore call %g2 nop .long 1767 mov 0,%i0 ret restore call %g2 nop .long 1768 mov 0,%i0 ret restore call %g2 nop .long 1769 mov 0,%i0 ret restore call %g2 nop .long 1770 mov 0,%i0 ret restore call %g2 nop .long 1771 mov 0,%i0 ret restore call %g2 nop .long 1772 mov 0,%i0 ret restore call %g2 nop .long 1773 mov 0,%i0 ret restore call %g2 nop .long 1774 mov 0,%i0 ret restore call %g2 nop .long 1775 mov 0,%i0 ret restore call %g2 nop .long 1776 mov 0,%i0 ret restore call %g2 nop .long 1777 mov 0,%i0 ret restore call %g2 nop .long 1778 mov 0,%i0 ret restore call %g2 nop .long 1779 mov 0,%i0 ret restore call %g2 nop .long 1780 mov 0,%i0 ret restore call %g2 nop .long 1781 mov 0,%i0 ret restore call %g2 nop .long 1782 mov 0,%i0 ret restore call %g2 nop .long 1783 mov 0,%i0 ret restore call %g2 nop .long 1784 mov 0,%i0 ret restore call %g2 nop .long 1785 mov 0,%i0 ret restore call %g2 nop .long 1786 mov 0,%i0 ret restore call %g2 nop .long 1787 mov 0,%i0 ret restore call %g2 nop .long 1788 mov 0,%i0 ret restore call %g2 nop .long 1789 mov 0,%i0 ret restore call %g2 nop .long 1790 mov 0,%i0 ret restore call %g2 nop .long 1791 mov 0,%i0 ret restore call %g2 nop .long 1792 mov 0,%i0 ret restore call %g2 nop .long 1793 mov 0,%i0 ret restore call %g2 nop .long 1794 mov 0,%i0 ret restore call %g2 nop .long 1795 mov 0,%i0 ret restore call %g2 nop .long 1796 mov 0,%i0 ret restore call %g2 nop .long 1797 mov 0,%i0 ret restore call %g2 nop .long 1798 mov 0,%i0 ret restore call %g2 nop .long 1799 mov 0,%i0 ret restore call %g2 nop .long 1800 mov 0,%i0 ret restore call %g2 nop .long 1801 mov 0,%i0 ret restore call %g2 nop .long 1802 mov 0,%i0 ret restore call %g2 nop .long 1803 mov 0,%i0 ret restore call %g2 nop .long 1804 mov 0,%i0 ret restore call %g2 nop .long 1805 mov 0,%i0 ret restore call %g2 nop .long 1806 mov 0,%i0 ret restore call %g2 nop .long 1807 mov 0,%i0 ret restore call %g2 nop .long 1808 mov 0,%i0 ret restore call %g2 nop .long 1809 mov 0,%i0 ret restore call %g2 nop .long 1810 mov 0,%i0 ret restore call %g2 nop .long 1811 mov 0,%i0 ret restore call %g2 nop .long 1812 mov 0,%i0 ret restore call %g2 nop .long 1813 mov 0,%i0 ret restore call %g2 nop .long 1814 mov 0,%i0 ret restore call %g2 nop .long 1815 mov 0,%i0 ret restore call %g2 nop .long 1816 mov 0,%i0 ret restore call %g2 nop .long 1817 mov 0,%i0 ret restore call %g2 nop .long 1818 mov 0,%i0 ret restore call %g2 nop .long 1819 mov 0,%i0 ret restore call %g2 nop .long 1820 mov 0,%i0 ret restore call %g2 nop .long 1821 mov 0,%i0 ret restore call %g2 nop .long 1822 mov 0,%i0 ret restore call %g2 nop .long 1823 mov 0,%i0 ret restore call %g2 nop .long 1824 mov 0,%i0 ret restore call %g2 nop .long 1825 mov 0,%i0 ret restore call %g2 nop .long 1826 mov 0,%i0 ret restore call %g2 nop .long 1827 mov 0,%i0 ret restore call %g2 nop .long 1828 mov 0,%i0 ret restore call %g2 nop .long 1829 mov 0,%i0 ret restore call %g2 nop .long 1830 mov 0,%i0 ret restore call %g2 nop .long 1831 mov 0,%i0 ret restore call %g2 nop .long 1832 mov 0,%i0 ret restore call %g2 nop .long 1833 mov 0,%i0 ret restore call %g2 nop .long 1834 mov 0,%i0 ret restore call %g2 nop .long 1835 mov 0,%i0 ret restore call %g2 nop .long 1836 mov 0,%i0 ret restore call %g2 nop .long 1837 mov 0,%i0 ret restore call %g2 nop .long 1838 mov 0,%i0 ret restore call %g2 nop .long 1839 mov 0,%i0 ret restore call %g2 nop .long 1840 mov 0,%i0 ret restore call %g2 nop .long 1841 mov 0,%i0 ret restore call %g2 nop .long 1842 mov 0,%i0 ret restore call %g2 nop .long 1843 mov 0,%i0 ret restore call %g2 nop .long 1844 mov 0,%i0 ret restore call %g2 nop .long 1845 mov 0,%i0 ret restore call %g2 nop .long 1846 mov 0,%i0 ret restore call %g2 nop .long 1847 mov 0,%i0 ret restore call %g2 nop .long 1848 mov 0,%i0 ret restore call %g2 nop .long 1849 mov 0,%i0 ret restore call %g2 nop .long 1850 mov 0,%i0 ret restore call %g2 nop .long 1851 mov 0,%i0 ret restore call %g2 nop .long 1852 mov 0,%i0 ret restore call %g2 nop .long 1853 mov 0,%i0 ret restore call %g2 nop .long 1854 mov 0,%i0 ret restore call %g2 nop .long 1855 mov 0,%i0 ret restore call %g2 nop .long 1856 mov 0,%i0 ret restore call %g2 nop .long 1857 mov 0,%i0 ret restore call %g2 nop .long 1858 mov 0,%i0 ret restore call %g2 nop .long 1859 mov 0,%i0 ret restore call %g2 nop .long 1860 mov 0,%i0 ret restore call %g2 nop .long 1861 mov 0,%i0 ret restore call %g2 nop .long 1862 mov 0,%i0 ret restore call %g2 nop .long 1863 mov 0,%i0 ret restore call %g2 nop .long 1864 mov 0,%i0 ret restore call %g2 nop .long 1865 mov 0,%i0 ret restore call %g2 nop .long 1866 mov 0,%i0 ret restore call %g2 nop .long 1867 mov 0,%i0 ret restore call %g2 nop .long 1868 mov 0,%i0 ret restore call %g2 nop .long 1869 mov 0,%i0 ret restore call %g2 nop .long 1870 mov 0,%i0 ret restore call %g2 nop .long 1871 mov 0,%i0 ret restore call %g2 nop .long 1872 mov 0,%i0 ret restore call %g2 nop .long 1873 mov 0,%i0 ret restore call %g2 nop .long 1874 mov 0,%i0 ret restore call %g2 nop .long 1875 mov 0,%i0 ret restore call %g2 nop .long 1876 mov 0,%i0 ret restore call %g2 nop .long 1877 mov 0,%i0 ret restore call %g2 nop .long 1878 mov 0,%i0 ret restore call %g2 nop .long 1879 mov 0,%i0 ret restore call %g2 nop .long 1880 mov 0,%i0 ret restore call %g2 nop .long 1881 mov 0,%i0 ret restore call %g2 nop .long 1882 mov 0,%i0 ret restore call %g2 nop .long 1883 mov 0,%i0 ret restore call %g2 nop .long 1884 mov 0,%i0 ret restore call %g2 nop .long 1885 mov 0,%i0 ret restore call %g2 nop .long 1886 mov 0,%i0 ret restore call %g2 nop .long 1887 mov 0,%i0 ret restore call %g2 nop .long 1888 mov 0,%i0 ret restore call %g2 nop .long 1889 mov 0,%i0 ret restore call %g2 nop .long 1890 mov 0,%i0 ret restore call %g2 nop .long 1891 mov 0,%i0 ret restore call %g2 nop .long 1892 mov 0,%i0 ret restore call %g2 nop .long 1893 mov 0,%i0 ret restore call %g2 nop .long 1894 mov 0,%i0 ret restore call %g2 nop .long 1895 mov 0,%i0 ret restore call %g2 nop .long 1896 mov 0,%i0 ret restore call %g2 nop .long 1897 mov 0,%i0 ret restore call %g2 nop .long 1898 mov 0,%i0 ret restore call %g2 nop .long 1899 mov 0,%i0 ret restore call %g2 nop .long 1900 mov 0,%i0 ret restore call %g2 nop .long 1901 mov 0,%i0 ret restore call %g2 nop .long 1902 mov 0,%i0 ret restore call %g2 nop .long 1903 mov 0,%i0 ret restore call %g2 nop .long 1904 mov 0,%i0 ret restore call %g2 nop .long 1905 mov 0,%i0 ret restore call %g2 nop .long 1906 mov 0,%i0 ret restore call %g2 nop .long 1907 mov 0,%i0 ret restore call %g2 nop .long 1908 mov 0,%i0 ret restore call %g2 nop .long 1909 mov 0,%i0 ret restore call %g2 nop .long 1910 mov 0,%i0 ret restore call %g2 nop .long 1911 mov 0,%i0 ret restore call %g2 nop .long 1912 mov 0,%i0 ret restore call %g2 nop .long 1913 mov 0,%i0 ret restore call %g2 nop .long 1914 mov 0,%i0 ret restore call %g2 nop .long 1915 mov 0,%i0 ret restore call %g2 nop .long 1916 mov 0,%i0 ret restore call %g2 nop .long 1917 mov 0,%i0 ret restore call %g2 nop .long 1918 mov 0,%i0 ret restore call %g2 nop .long 1919 mov 0,%i0 ret restore call %g2 nop .long 1920 mov 0,%i0 ret restore call %g2 nop .long 1921 mov 0,%i0 ret restore call %g2 nop .long 1922 mov 0,%i0 ret restore call %g2 nop .long 1923 mov 0,%i0 ret restore call %g2 nop .long 1924 mov 0,%i0 ret restore call %g2 nop .long 1925 mov 0,%i0 ret restore call %g2 nop .long 1926 mov 0,%i0 ret restore call %g2 nop .long 1927 mov 0,%i0 ret restore call %g2 nop .long 1928 mov 0,%i0 ret restore call %g2 nop .long 1929 mov 0,%i0 ret restore call %g2 nop .long 1930 mov 0,%i0 ret restore call %g2 nop .long 1931 mov 0,%i0 ret restore call %g2 nop .long 1932 mov 0,%i0 ret restore call %g2 nop .long 1933 mov 0,%i0 ret restore call %g2 nop .long 1934 mov 0,%i0 ret restore call %g2 nop .long 1935 mov 0,%i0 ret restore call %g2 nop .long 1936 mov 0,%i0 ret restore call %g2 nop .long 1937 mov 0,%i0 ret restore call %g2 nop .long 1938 mov 0,%i0 ret restore call %g2 nop .long 1939 mov 0,%i0 ret restore call %g2 nop .long 1940 mov 0,%i0 ret restore call %g2 nop .long 1941 mov 0,%i0 ret restore call %g2 nop .long 1942 mov 0,%i0 ret restore call %g2 nop .long 1943 mov 0,%i0 ret restore call %g2 nop .long 1944 mov 0,%i0 ret restore call %g2 nop .long 1945 mov 0,%i0 ret restore call %g2 nop .long 1946 mov 0,%i0 ret restore call %g2 nop .long 1947 mov 0,%i0 ret restore call %g2 nop .long 1948 mov 0,%i0 ret restore call %g2 nop .long 1949 mov 0,%i0 ret restore call %g2 nop .long 1950 mov 0,%i0 ret restore call %g2 nop .long 1951 mov 0,%i0 ret restore call %g2 nop .long 1952 mov 0,%i0 ret restore call %g2 nop .long 1953 mov 0,%i0 ret restore call %g2 nop .long 1954 mov 0,%i0 ret restore call %g2 nop .long 1955 mov 0,%i0 ret restore call %g2 nop .long 1956 mov 0,%i0 ret restore call %g2 nop .long 1957 mov 0,%i0 ret restore call %g2 nop .long 1958 mov 0,%i0 ret restore call %g2 nop .long 1959 mov 0,%i0 ret restore call %g2 nop .long 1960 mov 0,%i0 ret restore call %g2 nop .long 1961 mov 0,%i0 ret restore call %g2 nop .long 1962 mov 0,%i0 ret restore call %g2 nop .long 1963 mov 0,%i0 ret restore call %g2 nop .long 1964 mov 0,%i0 ret restore call %g2 nop .long 1965 mov 0,%i0 ret restore call %g2 nop .long 1966 mov 0,%i0 ret restore call %g2 nop .long 1967 mov 0,%i0 ret restore call %g2 nop .long 1968 mov 0,%i0 ret restore call %g2 nop .long 1969 mov 0,%i0 ret restore call %g2 nop .long 1970 mov 0,%i0 ret restore call %g2 nop .long 1971 mov 0,%i0 ret restore call %g2 nop .long 1972 mov 0,%i0 ret restore call %g2 nop .long 1973 mov 0,%i0 ret restore call %g2 nop .long 1974 mov 0,%i0 ret restore call %g2 nop .long 1975 mov 0,%i0 ret restore call %g2 nop .long 1976 mov 0,%i0 ret restore call %g2 nop .long 1977 mov 0,%i0 ret restore call %g2 nop .long 1978 mov 0,%i0 ret restore call %g2 nop .long 1979 mov 0,%i0 ret restore call %g2 nop .long 1980 mov 0,%i0 ret restore call %g2 nop .long 1981 mov 0,%i0 ret restore call %g2 nop .long 1982 mov 0,%i0 ret restore call %g2 nop .long 1983 mov 0,%i0 ret restore call %g2 nop .long 1984 mov 0,%i0 ret restore call %g2 nop .long 1985 mov 0,%i0 ret restore call %g2 nop .long 1986 mov 0,%i0 ret restore call %g2 nop .long 1987 mov 0,%i0 ret restore call %g2 nop .long 1988 mov 0,%i0 ret restore call %g2 nop .long 1989 mov 0,%i0 ret restore call %g2 nop .long 1990 mov 0,%i0 ret restore call %g2 nop .long 1991 mov 0,%i0 ret restore call %g2 nop .long 1992 mov 0,%i0 ret restore call %g2 nop .long 1993 mov 0,%i0 ret restore call %g2 nop .long 1994 mov 0,%i0 ret restore call %g2 nop .long 1995 mov 0,%i0 ret restore call %g2 nop .long 1996 mov 0,%i0 ret restore call %g2 nop .long 1997 mov 0,%i0 ret restore call %g2 nop .long 1998 mov 0,%i0 ret restore call %g2 nop .long 1999 mov 0,%i0 ret restore call %g2 nop .long 2000 mov 0,%i0 ret restore call %g2 nop .long 2001 mov 0,%i0 ret restore call %g2 nop .long 2002 mov 0,%i0 ret restore call %g2 nop .long 2003 mov 0,%i0 ret restore call %g2 nop .long 2004 mov 0,%i0 ret restore call %g2 nop .long 2005 mov 0,%i0 ret restore call %g2 nop .long 2006 mov 0,%i0 ret restore call %g2 nop .long 2007 mov 0,%i0 ret restore call %g2 nop .long 2008 mov 0,%i0 ret restore call %g2 nop .long 2009 mov 0,%i0 ret restore call %g2 nop .long 2010 mov 0,%i0 ret restore call %g2 nop .long 2011 mov 0,%i0 ret restore call %g2 nop .long 2012 mov 0,%i0 ret restore call %g2 nop .long 2013 mov 0,%i0 ret restore call %g2 nop .long 2014 mov 0,%i0 ret restore call %g2 nop .long 2015 mov 0,%i0 ret restore call %g2 nop .long 2016 mov 0,%i0 ret restore call %g2 nop .long 2017 mov 0,%i0 ret restore call %g2 nop .long 2018 mov 0,%i0 ret restore call %g2 nop .long 2019 mov 0,%i0 ret restore call %g2 nop .long 2020 mov 0,%i0 ret restore call %g2 nop .long 2021 mov 0,%i0 ret restore call %g2 nop .long 2022 mov 0,%i0 ret restore call %g2 nop .long 2023 mov 0,%i0 ret restore call %g2 nop .long 2024 mov 0,%i0 ret restore call %g2 nop .long 2025 mov 0,%i0 ret restore call %g2 nop .long 2026 mov 0,%i0 ret restore call %g2 nop .long 2027 mov 0,%i0 ret restore call %g2 nop .long 2028 mov 0,%i0 ret restore call %g2 nop .long 2029 mov 0,%i0 ret restore call %g2 nop .long 2030 mov 0,%i0 ret restore call %g2 nop .long 2031 mov 0,%i0 ret restore call %g2 nop .long 2032 mov 0,%i0 ret restore call %g2 nop .long 2033 mov 0,%i0 ret restore call %g2 nop .long 2034 mov 0,%i0 ret restore call %g2 nop .long 2035 mov 0,%i0 ret restore call %g2 nop .long 2036 mov 0,%i0 ret restore call %g2 nop .long 2037 mov 0,%i0 ret restore call %g2 nop .long 2038 mov 0,%i0 ret restore call %g2 nop .long 2039 mov 0,%i0 ret restore call %g2 nop .long 2040 mov 0,%i0 ret restore call %g2 nop .long 2041 mov 0,%i0 ret restore call %g2 nop .long 2042 mov 0,%i0 ret restore call %g2 nop .long 2043 mov 0,%i0 ret restore call %g2 nop .long 2044 mov 0,%i0 ret restore call %g2 nop .long 2045 mov 0,%i0 ret restore call %g2 nop .long 2046 mov 0,%i0 ret restore call %g2 nop .long 2047 mov 0,%i0 ret restore call %g2 nop .long 2048 mov 0,%i0 ret restore call %g2 nop .long 2049 mov 0,%i0 ret restore call %g2 nop .long 2050 mov 0,%i0 ret restore call %g2 nop .long 2051 mov 0,%i0 ret restore call %g2 nop .long 2052 mov 0,%i0 ret restore call %g2 nop .long 2053 mov 0,%i0 ret restore call %g2 nop .long 2054 mov 0,%i0 ret restore call %g2 nop .long 2055 mov 0,%i0 ret restore call %g2 nop .long 2056 mov 0,%i0 ret restore call %g2 nop .long 2057 mov 0,%i0 ret restore call %g2 nop .long 2058 mov 0,%i0 ret restore call %g2 nop .long 2059 mov 0,%i0 ret restore call %g2 nop .long 2060 mov 0,%i0 ret restore call %g2 nop .long 2061 mov 0,%i0 ret restore call %g2 nop .long 2062 mov 0,%i0 ret restore call %g2 nop .long 2063 mov 0,%i0 ret restore call %g2 nop .long 2064 mov 0,%i0 ret restore call %g2 nop .long 2065 mov 0,%i0 ret restore call %g2 nop .long 2066 mov 0,%i0 ret restore call %g2 nop .long 2067 mov 0,%i0 ret restore call %g2 nop .long 2068 mov 0,%i0 ret restore call %g2 nop .long 2069 mov 0,%i0 ret restore call %g2 nop .long 2070 mov 0,%i0 ret restore call %g2 nop .long 2071 mov 0,%i0 ret restore call %g2 nop .long 2072 mov 0,%i0 ret restore call %g2 nop .long 2073 mov 0,%i0 ret restore call %g2 nop .long 2074 mov 0,%i0 ret restore call %g2 nop .long 2075 mov 0,%i0 ret restore call %g2 nop .long 2076 mov 0,%i0 ret restore call %g2 nop .long 2077 mov 0,%i0 ret restore call %g2 nop .long 2078 mov 0,%i0 ret restore call %g2 nop .long 2079 mov 0,%i0 ret restore call %g2 nop .long 2080 mov 0,%i0 ret restore call %g2 nop .long 2081 mov 0,%i0 ret restore call %g2 nop .long 2082 mov 0,%i0 ret restore call %g2 nop .long 2083 mov 0,%i0 ret restore call %g2 nop .long 2084 mov 0,%i0 ret restore call %g2 nop .long 2085 mov 0,%i0 ret restore call %g2 nop .long 2086 mov 0,%i0 ret restore call %g2 nop .long 2087 mov 0,%i0 ret restore call %g2 nop .long 2088 mov 0,%i0 ret restore call %g2 nop .long 2089 mov 0,%i0 ret restore call %g2 nop .long 2090 mov 0,%i0 ret restore call %g2 nop .long 2091 mov 0,%i0 ret restore call %g2 nop .long 2092 mov 0,%i0 ret restore call %g2 nop .long 2093 mov 0,%i0 ret restore call %g2 nop .long 2094 mov 0,%i0 ret restore call %g2 nop .long 2095 mov 0,%i0 ret restore call %g2 nop .long 2096 mov 0,%i0 ret restore call %g2 nop .long 2097 mov 0,%i0 ret restore call %g2 nop .long 2098 mov 0,%i0 ret restore call %g2 nop .long 2099 mov 0,%i0 ret restore call %g2 nop .long 2100 mov 0,%i0 ret restore call %g2 nop .long 2101 mov 0,%i0 ret restore call %g2 nop .long 2102 mov 0,%i0 ret restore call %g2 nop .long 2103 mov 0,%i0 ret restore call %g2 nop .long 2104 mov 0,%i0 ret restore call %g2 nop .long 2105 mov 0,%i0 ret restore call %g2 nop .long 2106 mov 0,%i0 ret restore call %g2 nop .long 2107 mov 0,%i0 ret restore call %g2 nop .long 2108 mov 0,%i0 ret restore call %g2 nop .long 2109 mov 0,%i0 ret restore call %g2 nop .long 2110 mov 0,%i0 ret restore call %g2 nop .long 2111 mov 0,%i0 ret restore call %g2 nop .long 2112 mov 0,%i0 ret restore call %g2 nop .long 2113 mov 0,%i0 ret restore call %g2 nop .long 2114 mov 0,%i0 ret restore call %g2 nop .long 2115 mov 0,%i0 ret restore call %g2 nop .long 2116 mov 0,%i0 ret restore call %g2 nop .long 2117 mov 0,%i0 ret restore call %g2 nop .long 2118 mov 0,%i0 ret restore call %g2 nop .long 2119 mov 0,%i0 ret restore call %g2 nop .long 2120 mov 0,%i0 ret restore call %g2 nop .long 2121 mov 0,%i0 ret restore call %g2 nop .long 2122 mov 0,%i0 ret restore call %g2 nop .long 2123 mov 0,%i0 ret restore call %g2 nop .long 2124 mov 0,%i0 ret restore call %g2 nop .long 2125 mov 0,%i0 ret restore call %g2 nop .long 2126 mov 0,%i0 ret restore call %g2 nop .long 2127 mov 0,%i0 ret restore call %g2 nop .long 2128 mov 0,%i0 ret restore call %g2 nop .long 2129 mov 0,%i0 ret restore call %g2 nop .long 2130 mov 0,%i0 ret restore call %g2 nop .long 2131 mov 0,%i0 ret restore call %g2 nop .long 2132 mov 0,%i0 ret restore call %g2 nop .long 2133 mov 0,%i0 ret restore call %g2 nop .long 2134 mov 0,%i0 ret restore call %g2 nop .long 2135 mov 0,%i0 ret restore call %g2 nop .long 2136 mov 0,%i0 ret restore call %g2 nop .long 2137 mov 0,%i0 ret restore call %g2 nop .long 2138 mov 0,%i0 ret restore call %g2 nop .long 2139 mov 0,%i0 ret restore call %g2 nop .long 2140 mov 0,%i0 ret restore call %g2 nop .long 2141 mov 0,%i0 ret restore call %g2 nop .long 2142 mov 0,%i0 ret restore call %g2 nop .long 2143 mov 0,%i0 ret restore call %g2 nop .long 2144 mov 0,%i0 ret restore call %g2 nop .long 2145 mov 0,%i0 ret restore call %g2 nop .long 2146 mov 0,%i0 ret restore call %g2 nop .long 2147 mov 0,%i0 ret restore call %g2 nop .long 2148 mov 0,%i0 ret restore call %g2 nop .long 2149 mov 0,%i0 ret restore call %g2 nop .long 2150 mov 0,%i0 ret restore call %g2 nop .long 2151 mov 0,%i0 ret restore call %g2 nop .long 2152 mov 0,%i0 ret restore call %g2 nop .long 2153 mov 0,%i0 ret restore call %g2 nop .long 2154 mov 0,%i0 ret restore call %g2 nop .long 2155 mov 0,%i0 ret restore call %g2 nop .long 2156 mov 0,%i0 ret restore call %g2 nop .long 2157 mov 0,%i0 ret restore call %g2 nop .long 2158 mov 0,%i0 ret restore call %g2 nop .long 2159 mov 0,%i0 ret restore call %g2 nop .long 2160 mov 0,%i0 ret restore call %g2 nop .long 2161 mov 0,%i0 ret restore call %g2 nop .long 2162 mov 0,%i0 ret restore call %g2 nop .long 2163 mov 0,%i0 ret restore call %g2 nop .long 2164 mov 0,%i0 ret restore call %g2 nop .long 2165 mov 0,%i0 ret restore call %g2 nop .long 2166 mov 0,%i0 ret restore call %g2 nop .long 2167 mov 0,%i0 ret restore call %g2 nop .long 2168 mov 0,%i0 ret restore call %g2 nop .long 2169 mov 0,%i0 ret restore call %g2 nop .long 2170 mov 0,%i0 ret restore call %g2 nop .long 2171 mov 0,%i0 ret restore call %g2 nop .long 2172 mov 0,%i0 ret restore call %g2 nop .long 2173 mov 0,%i0 ret restore call %g2 nop .long 2174 mov 0,%i0 ret restore call %g2 nop .long 2175 mov 0,%i0 ret restore call %g2 nop .long 2176 mov 0,%i0 ret restore call %g2 nop .long 2177 mov 0,%i0 ret restore call %g2 nop .long 2178 mov 0,%i0 ret restore call %g2 nop .long 2179 mov 0,%i0 ret restore call %g2 nop .long 2180 mov 0,%i0 ret restore call %g2 nop .long 2181 mov 0,%i0 ret restore call %g2 nop .long 2182 mov 0,%i0 ret restore call %g2 nop .long 2183 mov 0,%i0 ret restore call %g2 nop .long 2184 mov 0,%i0 ret restore call %g2 nop .long 2185 mov 0,%i0 ret restore call %g2 nop .long 2186 mov 0,%i0 ret restore call %g2 nop .long 2187 mov 0,%i0 ret restore call %g2 nop .long 2188 mov 0,%i0 ret restore call %g2 nop .long 2189 mov 0,%i0 ret restore call %g2 nop .long 2190 mov 0,%i0 ret restore call %g2 nop .long 2191 mov 0,%i0 ret restore call %g2 nop .long 2192 mov 0,%i0 ret restore call %g2 nop .long 2193 mov 0,%i0 ret restore call %g2 nop .long 2194 mov 0,%i0 ret restore call %g2 nop .long 2195 mov 0,%i0 ret restore call %g2 nop .long 2196 mov 0,%i0 ret restore call %g2 nop .long 2197 mov 0,%i0 ret restore call %g2 nop .long 2198 mov 0,%i0 ret restore call %g2 nop .long 2199 mov 0,%i0 ret restore call %g2 nop .long 2200 mov 0,%i0 ret restore call %g2 nop .long 2201 mov 0,%i0 ret restore call %g2 nop .long 2202 mov 0,%i0 ret restore call %g2 nop .long 2203 mov 0,%i0 ret restore call %g2 nop .long 2204 mov 0,%i0 ret restore call %g2 nop .long 2205 mov 0,%i0 ret restore call %g2 nop .long 2206 mov 0,%i0 ret restore call %g2 nop .long 2207 mov 0,%i0 ret restore call %g2 nop .long 2208 mov 0,%i0 ret restore call %g2 nop .long 2209 mov 0,%i0 ret restore call %g2 nop .long 2210 mov 0,%i0 ret restore call %g2 nop .long 2211 mov 0,%i0 ret restore call %g2 nop .long 2212 mov 0,%i0 ret restore call %g2 nop .long 2213 mov 0,%i0 ret restore call %g2 nop .long 2214 mov 0,%i0 ret restore call %g2 nop .long 2215 mov 0,%i0 ret restore call %g2 nop .long 2216 mov 0,%i0 ret restore call %g2 nop .long 2217 mov 0,%i0 ret restore call %g2 nop .long 2218 mov 0,%i0 ret restore call %g2 nop .long 2219 mov 0,%i0 ret restore call %g2 nop .long 2220 mov 0,%i0 ret restore call %g2 nop .long 2221 mov 0,%i0 ret restore call %g2 nop .long 2222 mov 0,%i0 ret restore call %g2 nop .long 2223 mov 0,%i0 ret restore call %g2 nop .long 2224 mov 0,%i0 ret restore call %g2 nop .long 2225 mov 0,%i0 ret restore call %g2 nop .long 2226 mov 0,%i0 ret restore call %g2 nop .long 2227 mov 0,%i0 ret restore call %g2 nop .long 2228 mov 0,%i0 ret restore call %g2 nop .long 2229 mov 0,%i0 ret restore call %g2 nop .long 2230 mov 0,%i0 ret restore call %g2 nop .long 2231 mov 0,%i0 ret restore call %g2 nop .long 2232 mov 0,%i0 ret restore call %g2 nop .long 2233 mov 0,%i0 ret restore call %g2 nop .long 2234 mov 0,%i0 ret restore call %g2 nop .long 2235 mov 0,%i0 ret restore call %g2 nop .long 2236 mov 0,%i0 ret restore call %g2 nop .long 2237 mov 0,%i0 ret restore call %g2 nop .long 2238 mov 0,%i0 ret restore call %g2 nop .long 2239 mov 0,%i0 ret restore call %g2 nop .long 2240 mov 0,%i0 ret restore call %g2 nop .long 2241 mov 0,%i0 ret restore call %g2 nop .long 2242 mov 0,%i0 ret restore call %g2 nop .long 2243 mov 0,%i0 ret restore call %g2 nop .long 2244 mov 0,%i0 ret restore call %g2 nop .long 2245 mov 0,%i0 ret restore call %g2 nop .long 2246 mov 0,%i0 ret restore call %g2 nop .long 2247 mov 0,%i0 ret restore call %g2 nop .long 2248 mov 0,%i0 ret restore call %g2 nop .long 2249 mov 0,%i0 ret restore call %g2 nop .long 2250 mov 0,%i0 ret restore call %g2 nop .long 2251 mov 0,%i0 ret restore call %g2 nop .long 2252 mov 0,%i0 ret restore call %g2 nop .long 2253 mov 0,%i0 ret restore call %g2 nop .long 2254 mov 0,%i0 ret restore call %g2 nop .long 2255 mov 0,%i0 ret restore call %g2 nop .long 2256 mov 0,%i0 ret restore call %g2 nop .long 2257 mov 0,%i0 ret restore call %g2 nop .long 2258 mov 0,%i0 ret restore call %g2 nop .long 2259 mov 0,%i0 ret restore call %g2 nop .long 2260 mov 0,%i0 ret restore call %g2 nop .long 2261 mov 0,%i0 ret restore call %g2 nop .long 2262 mov 0,%i0 ret restore call %g2 nop .long 2263 mov 0,%i0 ret restore call %g2 nop .long 2264 mov 0,%i0 ret restore call %g2 nop .long 2265 mov 0,%i0 ret restore call %g2 nop .long 2266 mov 0,%i0 ret restore call %g2 nop .long 2267 mov 0,%i0 ret restore call %g2 nop .long 2268 mov 0,%i0 ret restore call %g2 nop .long 2269 mov 0,%i0 ret restore call %g2 nop .long 2270 mov 0,%i0 ret restore call %g2 nop .long 2271 mov 0,%i0 ret restore call %g2 nop .long 2272 mov 0,%i0 ret restore call %g2 nop .long 2273 mov 0,%i0 ret restore call %g2 nop .long 2274 mov 0,%i0 ret restore call %g2 nop .long 2275 mov 0,%i0 ret restore call %g2 nop .long 2276 mov 0,%i0 ret restore call %g2 nop .long 2277 mov 0,%i0 ret restore call %g2 nop .long 2278 mov 0,%i0 ret restore call %g2 nop .long 2279 mov 0,%i0 ret restore call %g2 nop .long 2280 mov 0,%i0 ret restore call %g2 nop .long 2281 mov 0,%i0 ret restore call %g2 nop .long 2282 mov 0,%i0 ret restore call %g2 nop .long 2283 mov 0,%i0 ret restore call %g2 nop .long 2284 mov 0,%i0 ret restore call %g2 nop .long 2285 mov 0,%i0 ret restore call %g2 nop .long 2286 mov 0,%i0 ret restore call %g2 nop .long 2287 mov 0,%i0 ret restore call %g2 nop .long 2288 mov 0,%i0 ret restore call %g2 nop .long 2289 mov 0,%i0 ret restore call %g2 nop .long 2290 mov 0,%i0 ret restore call %g2 nop .long 2291 mov 0,%i0 ret restore call %g2 nop .long 2292 mov 0,%i0 ret restore call %g2 nop .long 2293 mov 0,%i0 ret restore call %g2 nop .long 2294 mov 0,%i0 ret restore call %g2 nop .long 2295 mov 0,%i0 ret restore call %g2 nop .long 2296 mov 0,%i0 ret restore call %g2 nop .long 2297 mov 0,%i0 ret restore call %g2 nop .long 2298 mov 0,%i0 ret restore call %g2 nop .long 2299 mov 0,%i0 ret restore call %g2 nop .long 2300 mov 0,%i0 ret restore call %g2 nop .long 2301 mov 0,%i0 ret restore call %g2 nop .long 2302 mov 0,%i0 ret restore call %g2 nop .long 2303 mov 0,%i0 ret restore call %g2 nop .long 2304 mov 0,%i0 ret restore call %g2 nop .long 2305 mov 0,%i0 ret restore call %g2 nop .long 2306 mov 0,%i0 ret restore call %g2 nop .long 2307 mov 0,%i0 ret restore call %g2 nop .long 2308 mov 0,%i0 ret restore call %g2 nop .long 2309 mov 0,%i0 ret restore call %g2 nop .long 2310 mov 0,%i0 ret restore call %g2 nop .long 2311 mov 0,%i0 ret restore call %g2 nop .long 2312 mov 0,%i0 ret restore call %g2 nop .long 2313 mov 0,%i0 ret restore call %g2 nop .long 2314 mov 0,%i0 ret restore call %g2 nop .long 2315 mov 0,%i0 ret restore call %g2 nop .long 2316 mov 0,%i0 ret restore call %g2 nop .long 2317 mov 0,%i0 ret restore call %g2 nop .long 2318 mov 0,%i0 ret restore call %g2 nop .long 2319 mov 0,%i0 ret restore call %g2 nop .long 2320 mov 0,%i0 ret restore call %g2 nop .long 2321 mov 0,%i0 ret restore call %g2 nop .long 2322 mov 0,%i0 ret restore call %g2 nop .long 2323 mov 0,%i0 ret restore call %g2 nop .long 2324 mov 0,%i0 ret restore call %g2 nop .long 2325 mov 0,%i0 ret restore call %g2 nop .long 2326 mov 0,%i0 ret restore call %g2 nop .long 2327 mov 0,%i0 ret restore call %g2 nop .long 2328 mov 0,%i0 ret restore call %g2 nop .long 2329 mov 0,%i0 ret restore call %g2 nop .long 2330 mov 0,%i0 ret restore call %g2 nop .long 2331 mov 0,%i0 ret restore call %g2 nop .long 2332 mov 0,%i0 ret restore call %g2 nop .long 2333 mov 0,%i0 ret restore call %g2 nop .long 2334 mov 0,%i0 ret restore call %g2 nop .long 2335 mov 0,%i0 ret restore call %g2 nop .long 2336 mov 0,%i0 ret restore call %g2 nop .long 2337 mov 0,%i0 ret restore call %g2 nop .long 2338 mov 0,%i0 ret restore call %g2 nop .long 2339 mov 0,%i0 ret restore call %g2 nop .long 2340 mov 0,%i0 ret restore call %g2 nop .long 2341 mov 0,%i0 ret restore call %g2 nop .long 2342 mov 0,%i0 ret restore call %g2 nop .long 2343 mov 0,%i0 ret restore call %g2 nop .long 2344 mov 0,%i0 ret restore call %g2 nop .long 2345 mov 0,%i0 ret restore call %g2 nop .long 2346 mov 0,%i0 ret restore call %g2 nop .long 2347 mov 0,%i0 ret restore call %g2 nop .long 2348 mov 0,%i0 ret restore call %g2 nop .long 2349 mov 0,%i0 ret restore call %g2 nop .long 2350 mov 0,%i0 ret restore call %g2 nop .long 2351 mov 0,%i0 ret restore call %g2 nop .long 2352 mov 0,%i0 ret restore call %g2 nop .long 2353 mov 0,%i0 ret restore call %g2 nop .long 2354 mov 0,%i0 ret restore call %g2 nop .long 2355 mov 0,%i0 ret restore call %g2 nop .long 2356 mov 0,%i0 ret restore call %g2 nop .long 2357 mov 0,%i0 ret restore call %g2 nop .long 2358 mov 0,%i0 ret restore call %g2 nop .long 2359 mov 0,%i0 ret restore call %g2 nop .long 2360 mov 0,%i0 ret restore call %g2 nop .long 2361 mov 0,%i0 ret restore call %g2 nop .long 2362 mov 0,%i0 ret restore call %g2 nop .long 2363 mov 0,%i0 ret restore call %g2 nop .long 2364 mov 0,%i0 ret restore call %g2 nop .long 2365 mov 0,%i0 ret restore call %g2 nop .long 2366 mov 0,%i0 ret restore call %g2 nop .long 2367 mov 0,%i0 ret restore call %g2 nop .long 2368 mov 0,%i0 ret restore call %g2 nop .long 2369 mov 0,%i0 ret restore call %g2 nop .long 2370 mov 0,%i0 ret restore call %g2 nop .long 2371 mov 0,%i0 ret restore call %g2 nop .long 2372 mov 0,%i0 ret restore call %g2 nop .long 2373 mov 0,%i0 ret restore call %g2 nop .long 2374 mov 0,%i0 ret restore call %g2 nop .long 2375 mov 0,%i0 ret restore call %g2 nop .long 2376 mov 0,%i0 ret restore call %g2 nop .long 2377 mov 0,%i0 ret restore call %g2 nop .long 2378 mov 0,%i0 ret restore call %g2 nop .long 2379 mov 0,%i0 ret restore call %g2 nop .long 2380 mov 0,%i0 ret restore call %g2 nop .long 2381 mov 0,%i0 ret restore call %g2 nop .long 2382 mov 0,%i0 ret restore call %g2 nop .long 2383 mov 0,%i0 ret restore call %g2 nop .long 2384 mov 0,%i0 ret restore call %g2 nop .long 2385 mov 0,%i0 ret restore call %g2 nop .long 2386 mov 0,%i0 ret restore call %g2 nop .long 2387 mov 0,%i0 ret restore call %g2 nop .long 2388 mov 0,%i0 ret restore call %g2 nop .long 2389 mov 0,%i0 ret restore call %g2 nop .long 2390 mov 0,%i0 ret restore call %g2 nop .long 2391 mov 0,%i0 ret restore call %g2 nop .long 2392 mov 0,%i0 ret restore call %g2 nop .long 2393 mov 0,%i0 ret restore call %g2 nop .long 2394 mov 0,%i0 ret restore call %g2 nop .long 2395 mov 0,%i0 ret restore call %g2 nop .long 2396 mov 0,%i0 ret restore call %g2 nop .long 2397 mov 0,%i0 ret restore call %g2 nop .long 2398 mov 0,%i0 ret restore call %g2 nop .long 2399 mov 0,%i0 ret restore call %g2 nop .long 2400 mov 0,%i0 ret restore call %g2 nop .long 2401 mov 0,%i0 ret restore call %g2 nop .long 2402 mov 0,%i0 ret restore call %g2 nop .long 2403 mov 0,%i0 ret restore call %g2 nop .long 2404 mov 0,%i0 ret restore call %g2 nop .long 2405 mov 0,%i0 ret restore call %g2 nop .long 2406 mov 0,%i0 ret restore call %g2 nop .long 2407 mov 0,%i0 ret restore call %g2 nop .long 2408 mov 0,%i0 ret restore call %g2 nop .long 2409 mov 0,%i0 ret restore call %g2 nop .long 2410 mov 0,%i0 ret restore call %g2 nop .long 2411 mov 0,%i0 ret restore call %g2 nop .long 2412 mov 0,%i0 ret restore call %g2 nop .long 2413 mov 0,%i0 ret restore call %g2 nop .long 2414 mov 0,%i0 ret restore call %g2 nop .long 2415 mov 0,%i0 ret restore call %g2 nop .long 2416 mov 0,%i0 ret restore call %g2 nop .long 2417 mov 0,%i0 ret restore call %g2 nop .long 2418 mov 0,%i0 ret restore call %g2 nop .long 2419 mov 0,%i0 ret restore call %g2 nop .long 2420 mov 0,%i0 ret restore call %g2 nop .long 2421 mov 0,%i0 ret restore call %g2 nop .long 2422 mov 0,%i0 ret restore call %g2 nop .long 2423 mov 0,%i0 ret restore call %g2 nop .long 2424 mov 0,%i0 ret restore call %g2 nop .long 2425 mov 0,%i0 ret restore call %g2 nop .long 2426 mov 0,%i0 ret restore call %g2 nop .long 2427 mov 0,%i0 ret restore call %g2 nop .long 2428 mov 0,%i0 ret restore call %g2 nop .long 2429 mov 0,%i0 ret restore call %g2 nop .long 2430 mov 0,%i0 ret restore call %g2 nop .long 2431 mov 0,%i0 ret restore call %g2 nop .long 2432 mov 0,%i0 ret restore call %g2 nop .long 2433 mov 0,%i0 ret restore call %g2 nop .long 2434 mov 0,%i0 ret restore call %g2 nop .long 2435 mov 0,%i0 ret restore call %g2 nop .long 2436 mov 0,%i0 ret restore call %g2 nop .long 2437 mov 0,%i0 ret restore call %g2 nop .long 2438 mov 0,%i0 ret restore call %g2 nop .long 2439 mov 0,%i0 ret restore call %g2 nop .long 2440 mov 0,%i0 ret restore call %g2 nop .long 2441 mov 0,%i0 ret restore call %g2 nop .long 2442 mov 0,%i0 ret restore call %g2 nop .long 2443 mov 0,%i0 ret restore call %g2 nop .long 2444 mov 0,%i0 ret restore call %g2 nop .long 2445 mov 0,%i0 ret restore call %g2 nop .long 2446 mov 0,%i0 ret restore call %g2 nop .long 2447 mov 0,%i0 ret restore call %g2 nop .long 2448 mov 0,%i0 ret restore call %g2 nop .long 2449 mov 0,%i0 ret restore call %g2 nop .long 2450 mov 0,%i0 ret restore call %g2 nop .long 2451 mov 0,%i0 ret restore call %g2 nop .long 2452 mov 0,%i0 ret restore call %g2 nop .long 2453 mov 0,%i0 ret restore call %g2 nop .long 2454 mov 0,%i0 ret restore call %g2 nop .long 2455 mov 0,%i0 ret restore call %g2 nop .long 2456 mov 0,%i0 ret restore call %g2 nop .long 2457 mov 0,%i0 ret restore call %g2 nop .long 2458 mov 0,%i0 ret restore call %g2 nop .long 2459 mov 0,%i0 ret restore call %g2 nop .long 2460 mov 0,%i0 ret restore call %g2 nop .long 2461 mov 0,%i0 ret restore call %g2 nop .long 2462 mov 0,%i0 ret restore call %g2 nop .long 2463 mov 0,%i0 ret restore call %g2 nop .long 2464 mov 0,%i0 ret restore call %g2 nop .long 2465 mov 0,%i0 ret restore call %g2 nop .long 2466 mov 0,%i0 ret restore call %g2 nop .long 2467 mov 0,%i0 ret restore call %g2 nop .long 2468 mov 0,%i0 ret restore call %g2 nop .long 2469 mov 0,%i0 ret restore call %g2 nop .long 2470 mov 0,%i0 ret restore call %g2 nop .long 2471 mov 0,%i0 ret restore call %g2 nop .long 2472 mov 0,%i0 ret restore call %g2 nop .long 2473 mov 0,%i0 ret restore call %g2 nop .long 2474 mov 0,%i0 ret restore call %g2 nop .long 2475 mov 0,%i0 ret restore call %g2 nop .long 2476 mov 0,%i0 ret restore call %g2 nop .long 2477 mov 0,%i0 ret restore call %g2 nop .long 2478 mov 0,%i0 ret restore call %g2 nop .long 2479 mov 0,%i0 ret restore call %g2 nop .long 2480 mov 0,%i0 ret restore call %g2 nop .long 2481 mov 0,%i0 ret restore call %g2 nop .long 2482 mov 0,%i0 ret restore call %g2 nop .long 2483 mov 0,%i0 ret restore call %g2 nop .long 2484 mov 0,%i0 ret restore call %g2 nop .long 2485 mov 0,%i0 ret restore call %g2 nop .long 2486 mov 0,%i0 ret restore call %g2 nop .long 2487 mov 0,%i0 ret restore call %g2 nop .long 2488 mov 0,%i0 ret restore call %g2 nop .long 2489 mov 0,%i0 ret restore call %g2 nop .long 2490 mov 0,%i0 ret restore call %g2 nop .long 2491 mov 0,%i0 ret restore call %g2 nop .long 2492 mov 0,%i0 ret restore call %g2 nop .long 2493 mov 0,%i0 ret restore call %g2 nop .long 2494 mov 0,%i0 ret restore call %g2 nop .long 2495 mov 0,%i0 ret restore call %g2 nop .long 2496 mov 0,%i0 ret restore call %g2 nop .long 2497 mov 0,%i0 ret restore call %g2 nop .long 2498 mov 0,%i0 ret restore call %g2 nop .long 2499 mov 0,%i0 ret restore call %g2 nop .long 2500 mov 0,%i0 ret restore call %g2 nop .long 2501 mov 0,%i0 ret restore call %g2 nop .long 2502 mov 0,%i0 ret restore call %g2 nop .long 2503 mov 0,%i0 ret restore call %g2 nop .long 2504 mov 0,%i0 ret restore call %g2 nop .long 2505 mov 0,%i0 ret restore call %g2 nop .long 2506 mov 0,%i0 ret restore call %g2 nop .long 2507 mov 0,%i0 ret restore call %g2 nop .long 2508 mov 0,%i0 ret restore call %g2 nop .long 2509 mov 0,%i0 ret restore call %g2 nop .long 2510 mov 0,%i0 ret restore call %g2 nop .long 2511 mov 0,%i0 ret restore call %g2 nop .long 2512 mov 0,%i0 ret restore call %g2 nop .long 2513 mov 0,%i0 ret restore call %g2 nop .long 2514 mov 0,%i0 ret restore call %g2 nop .long 2515 mov 0,%i0 ret restore call %g2 nop .long 2516 mov 0,%i0 ret restore call %g2 nop .long 2517 mov 0,%i0 ret restore call %g2 nop .long 2518 mov 0,%i0 ret restore call %g2 nop .long 2519 mov 0,%i0 ret restore call %g2 nop .long 2520 mov 0,%i0 ret restore call %g2 nop .long 2521 mov 0,%i0 ret restore call %g2 nop .long 2522 mov 0,%i0 ret restore call %g2 nop .long 2523 mov 0,%i0 ret restore call %g2 nop .long 2524 mov 0,%i0 ret restore call %g2 nop .long 2525 mov 0,%i0 ret restore call %g2 nop .long 2526 mov 0,%i0 ret restore call %g2 nop .long 2527 mov 0,%i0 ret restore call %g2 nop .long 2528 mov 0,%i0 ret restore call %g2 nop .long 2529 mov 0,%i0 ret restore call %g2 nop .long 2530 mov 0,%i0 ret restore call %g2 nop .long 2531 mov 0,%i0 ret restore call %g2 nop .long 2532 mov 0,%i0 ret restore call %g2 nop .long 2533 mov 0,%i0 ret restore call %g2 nop .long 2534 mov 0,%i0 ret restore call %g2 nop .long 2535 mov 0,%i0 ret restore call %g2 nop .long 2536 mov 0,%i0 ret restore call %g2 nop .long 2537 mov 0,%i0 ret restore call %g2 nop .long 2538 mov 0,%i0 ret restore call %g2 nop .long 2539 mov 0,%i0 ret restore call %g2 nop .long 2540 mov 0,%i0 ret restore call %g2 nop .long 2541 mov 0,%i0 ret restore call %g2 nop .long 2542 mov 0,%i0 ret restore call %g2 nop .long 2543 mov 0,%i0 ret restore call %g2 nop .long 2544 mov 0,%i0 ret restore call %g2 nop .long 2545 mov 0,%i0 ret restore call %g2 nop .long 2546 mov 0,%i0 ret restore call %g2 nop .long 2547 mov 0,%i0 ret restore call %g2 nop .long 2548 mov 0,%i0 ret restore call %g2 nop .long 2549 mov 0,%i0 ret restore call %g2 nop .long 2550 mov 0,%i0 ret restore call %g2 nop .long 2551 mov 0,%i0 ret restore call %g2 nop .long 2552 mov 0,%i0 ret restore call %g2 nop .long 2553 mov 0,%i0 ret restore call %g2 nop .long 2554 mov 0,%i0 ret restore call %g2 nop .long 2555 mov 0,%i0 ret restore call %g2 nop .long 2556 mov 0,%i0 ret restore call %g2 nop .long 2557 mov 0,%i0 ret restore call %g2 nop .long 2558 mov 0,%i0 ret restore call %g2 nop .long 2559 mov 0,%i0 ret restore call %g2 nop .long 2560 mov 0,%i0 ret restore call %g2 nop .long 2561 mov 0,%i0 ret restore call %g2 nop .long 2562 mov 0,%i0 ret restore call %g2 nop .long 2563 mov 0,%i0 ret restore call %g2 nop .long 2564 mov 0,%i0 ret restore call %g2 nop .long 2565 mov 0,%i0 ret restore call %g2 nop .long 2566 mov 0,%i0 ret restore call %g2 nop .long 2567 mov 0,%i0 ret restore call %g2 nop .long 2568 mov 0,%i0 ret restore call %g2 nop .long 2569 mov 0,%i0 ret restore call %g2 nop .long 2570 mov 0,%i0 ret restore call %g2 nop .long 2571 mov 0,%i0 ret restore call %g2 nop .long 2572 mov 0,%i0 ret restore call %g2 nop .long 2573 mov 0,%i0 ret restore call %g2 nop .long 2574 mov 0,%i0 ret restore call %g2 nop .long 2575 mov 0,%i0 ret restore call %g2 nop .long 2576 mov 0,%i0 ret restore call %g2 nop .long 2577 mov 0,%i0 ret restore call %g2 nop .long 2578 mov 0,%i0 ret restore call %g2 nop .long 2579 mov 0,%i0 ret restore call %g2 nop .long 2580 mov 0,%i0 ret restore call %g2 nop .long 2581 mov 0,%i0 ret restore call %g2 nop .long 2582 mov 0,%i0 ret restore call %g2 nop .long 2583 mov 0,%i0 ret restore call %g2 nop .long 2584 mov 0,%i0 ret restore call %g2 nop .long 2585 mov 0,%i0 ret restore call %g2 nop .long 2586 mov 0,%i0 ret restore call %g2 nop .long 2587 mov 0,%i0 ret restore call %g2 nop .long 2588 mov 0,%i0 ret restore call %g2 nop .long 2589 mov 0,%i0 ret restore call %g2 nop .long 2590 mov 0,%i0 ret restore call %g2 nop .long 2591 mov 0,%i0 ret restore call %g2 nop .long 2592 mov 0,%i0 ret restore call %g2 nop .long 2593 mov 0,%i0 ret restore call %g2 nop .long 2594 mov 0,%i0 ret restore call %g2 nop .long 2595 mov 0,%i0 ret restore call %g2 nop .long 2596 mov 0,%i0 ret restore call %g2 nop .long 2597 mov 0,%i0 ret restore call %g2 nop .long 2598 mov 0,%i0 ret restore call %g2 nop .long 2599 mov 0,%i0 ret restore call %g2 nop .long 2600 mov 0,%i0 ret restore call %g2 nop .long 2601 mov 0,%i0 ret restore call %g2 nop .long 2602 mov 0,%i0 ret restore call %g2 nop .long 2603 mov 0,%i0 ret restore call %g2 nop .long 2604 mov 0,%i0 ret restore call %g2 nop .long 2605 mov 0,%i0 ret restore call %g2 nop .long 2606 mov 0,%i0 ret restore call %g2 nop .long 2607 mov 0,%i0 ret restore call %g2 nop .long 2608 mov 0,%i0 ret restore call %g2 nop .long 2609 mov 0,%i0 ret restore call %g2 nop .long 2610 mov 0,%i0 ret restore call %g2 nop .long 2611 mov 0,%i0 ret restore call %g2 nop .long 2612 mov 0,%i0 ret restore call %g2 nop .long 2613 mov 0,%i0 ret restore call %g2 nop .long 2614 mov 0,%i0 ret restore call %g2 nop .long 2615 mov 0,%i0 ret restore call %g2 nop .long 2616 mov 0,%i0 ret restore call %g2 nop .long 2617 mov 0,%i0 ret restore call %g2 nop .long 2618 mov 0,%i0 ret restore call %g2 nop .long 2619 mov 0,%i0 ret restore call %g2 nop .long 2620 mov 0,%i0 ret restore call %g2 nop .long 2621 mov 0,%i0 ret restore call %g2 nop .long 2622 mov 0,%i0 ret restore call %g2 nop .long 2623 mov 0,%i0 ret restore call %g2 nop .long 2624 mov 0,%i0 ret restore call %g2 nop .long 2625 mov 0,%i0 ret restore call %g2 nop .long 2626 mov 0,%i0 ret restore call %g2 nop .long 2627 mov 0,%i0 ret restore call %g2 nop .long 2628 mov 0,%i0 ret restore call %g2 nop .long 2629 mov 0,%i0 ret restore call %g2 nop .long 2630 mov 0,%i0 ret restore call %g2 nop .long 2631 mov 0,%i0 ret restore call %g2 nop .long 2632 mov 0,%i0 ret restore call %g2 nop .long 2633 mov 0,%i0 ret restore call %g2 nop .long 2634 mov 0,%i0 ret restore call %g2 nop .long 2635 mov 0,%i0 ret restore call %g2 nop .long 2636 mov 0,%i0 ret restore call %g2 nop .long 2637 mov 0,%i0 ret restore call %g2 nop .long 2638 mov 0,%i0 ret restore call %g2 nop .long 2639 mov 0,%i0 ret restore call %g2 nop .long 2640 mov 0,%i0 ret restore call %g2 nop .long 2641 mov 0,%i0 ret restore call %g2 nop .long 2642 mov 0,%i0 ret restore call %g2 nop .long 2643 mov 0,%i0 ret restore call %g2 nop .long 2644 mov 0,%i0 ret restore call %g2 nop .long 2645 mov 0,%i0 ret restore call %g2 nop .long 2646 mov 0,%i0 ret restore call %g2 nop .long 2647 mov 0,%i0 ret restore call %g2 nop .long 2648 mov 0,%i0 ret restore call %g2 nop .long 2649 mov 0,%i0 ret restore call %g2 nop .long 2650 mov 0,%i0 ret restore call %g2 nop .long 2651 mov 0,%i0 ret restore call %g2 nop .long 2652 mov 0,%i0 ret restore call %g2 nop .long 2653 mov 0,%i0 ret restore call %g2 nop .long 2654 mov 0,%i0 ret restore call %g2 nop .long 2655 mov 0,%i0 ret restore call %g2 nop .long 2656 mov 0,%i0 ret restore call %g2 nop .long 2657 mov 0,%i0 ret restore call %g2 nop .long 2658 mov 0,%i0 ret restore call %g2 nop .long 2659 mov 0,%i0 ret restore call %g2 nop .long 2660 mov 0,%i0 ret restore call %g2 nop .long 2661 mov 0,%i0 ret restore call %g2 nop .long 2662 mov 0,%i0 ret restore call %g2 nop .long 2663 mov 0,%i0 ret restore call %g2 nop .long 2664 mov 0,%i0 ret restore call %g2 nop .long 2665 mov 0,%i0 ret restore call %g2 nop .long 2666 mov 0,%i0 ret restore call %g2 nop .long 2667 mov 0,%i0 ret restore call %g2 nop .long 2668 mov 0,%i0 ret restore call %g2 nop .long 2669 mov 0,%i0 ret restore call %g2 nop .long 2670 mov 0,%i0 ret restore call %g2 nop .long 2671 mov 0,%i0 ret restore call %g2 nop .long 2672 mov 0,%i0 ret restore call %g2 nop .long 2673 mov 0,%i0 ret restore call %g2 nop .long 2674 mov 0,%i0 ret restore call %g2 nop .long 2675 mov 0,%i0 ret restore call %g2 nop .long 2676 mov 0,%i0 ret restore call %g2 nop .long 2677 mov 0,%i0 ret restore call %g2 nop .long 2678 mov 0,%i0 ret restore call %g2 nop .long 2679 mov 0,%i0 ret restore call %g2 nop .long 2680 mov 0,%i0 ret restore call %g2 nop .long 2681 mov 0,%i0 ret restore call %g2 nop .long 2682 mov 0,%i0 ret restore call %g2 nop .long 2683 mov 0,%i0 ret restore call %g2 nop .long 2684 mov 0,%i0 ret restore call %g2 nop .long 2685 mov 0,%i0 ret restore call %g2 nop .long 2686 mov 0,%i0 ret restore call %g2 nop .long 2687 mov 0,%i0 ret restore call %g2 nop .long 2688 mov 0,%i0 ret restore call %g2 nop .long 2689 mov 0,%i0 ret restore call %g2 nop .long 2690 mov 0,%i0 ret restore call %g2 nop .long 2691 mov 0,%i0 ret restore call %g2 nop .long 2692 mov 0,%i0 ret restore call %g2 nop .long 2693 mov 0,%i0 ret restore call %g2 nop .long 2694 mov 0,%i0 ret restore call %g2 nop .long 2695 mov 0,%i0 ret restore call %g2 nop .long 2696 mov 0,%i0 ret restore call %g2 nop .long 2697 mov 0,%i0 ret restore call %g2 nop .long 2698 mov 0,%i0 ret restore call %g2 nop .long 2699 mov 0,%i0 ret restore call %g2 nop .long 2700 mov 0,%i0 ret restore call %g2 nop .long 2701 mov 0,%i0 ret restore call %g2 nop .long 2702 mov 0,%i0 ret restore call %g2 nop .long 2703 mov 0,%i0 ret restore call %g2 nop .long 2704 mov 0,%i0 ret restore call %g2 nop .long 2705 mov 0,%i0 ret restore call %g2 nop .long 2706 mov 0,%i0 ret restore call %g2 nop .long 2707 mov 0,%i0 ret restore call %g2 nop .long 2708 mov 0,%i0 ret restore call %g2 nop .long 2709 mov 0,%i0 ret restore call %g2 nop .long 2710 mov 0,%i0 ret restore call %g2 nop .long 2711 mov 0,%i0 ret restore call %g2 nop .long 2712 mov 0,%i0 ret restore call %g2 nop .long 2713 mov 0,%i0 ret restore call %g2 nop .long 2714 mov 0,%i0 ret restore call %g2 nop .long 2715 mov 0,%i0 ret restore call %g2 nop .long 2716 mov 0,%i0 ret restore call %g2 nop .long 2717 mov 0,%i0 ret restore call %g2 nop .long 2718 mov 0,%i0 ret restore call %g2 nop .long 2719 mov 0,%i0 ret restore call %g2 nop .long 2720 mov 0,%i0 ret restore call %g2 nop .long 2721 mov 0,%i0 ret restore call %g2 nop .long 2722 mov 0,%i0 ret restore call %g2 nop .long 2723 mov 0,%i0 ret restore call %g2 nop .long 2724 mov 0,%i0 ret restore call %g2 nop .long 2725 mov 0,%i0 ret restore call %g2 nop .long 2726 mov 0,%i0 ret restore call %g2 nop .long 2727 mov 0,%i0 ret restore call %g2 nop .long 2728 mov 0,%i0 ret restore call %g2 nop .long 2729 mov 0,%i0 ret restore call %g2 nop .long 2730 mov 0,%i0 ret restore call %g2 nop .long 2731 mov 0,%i0 ret restore call %g2 nop .long 2732 mov 0,%i0 ret restore call %g2 nop .long 2733 mov 0,%i0 ret restore call %g2 nop .long 2734 mov 0,%i0 ret restore call %g2 nop .long 2735 mov 0,%i0 ret restore call %g2 nop .long 2736 mov 0,%i0 ret restore call %g2 nop .long 2737 mov 0,%i0 ret restore call %g2 nop .long 2738 mov 0,%i0 ret restore call %g2 nop .long 2739 mov 0,%i0 ret restore call %g2 nop .long 2740 mov 0,%i0 ret restore call %g2 nop .long 2741 mov 0,%i0 ret restore call %g2 nop .long 2742 mov 0,%i0 ret restore call %g2 nop .long 2743 mov 0,%i0 ret restore call %g2 nop .long 2744 mov 0,%i0 ret restore call %g2 nop .long 2745 mov 0,%i0 ret restore call %g2 nop .long 2746 mov 0,%i0 ret restore call %g2 nop .long 2747 mov 0,%i0 ret restore call %g2 nop .long 2748 mov 0,%i0 ret restore call %g2 nop .long 2749 mov 0,%i0 ret restore call %g2 nop .long 2750 mov 0,%i0 ret restore call %g2 nop .long 2751 mov 0,%i0 ret restore call %g2 nop .long 2752 mov 0,%i0 ret restore call %g2 nop .long 2753 mov 0,%i0 ret restore call %g2 nop .long 2754 mov 0,%i0 ret restore call %g2 nop .long 2755 mov 0,%i0 ret restore call %g2 nop .long 2756 mov 0,%i0 ret restore call %g2 nop .long 2757 mov 0,%i0 ret restore call %g2 nop .long 2758 mov 0,%i0 ret restore call %g2 nop .long 2759 mov 0,%i0 ret restore call %g2 nop .long 2760 mov 0,%i0 ret restore call %g2 nop .long 2761 mov 0,%i0 ret restore call %g2 nop .long 2762 mov 0,%i0 ret restore call %g2 nop .long 2763 mov 0,%i0 ret restore call %g2 nop .long 2764 mov 0,%i0 ret restore call %g2 nop .long 2765 mov 0,%i0 ret restore call %g2 nop .long 2766 mov 0,%i0 ret restore call %g2 nop .long 2767 mov 0,%i0 ret restore call %g2 nop .long 2768 mov 0,%i0 ret restore call %g2 nop .long 2769 mov 0,%i0 ret restore call %g2 nop .long 2770 mov 0,%i0 ret restore call %g2 nop .long 2771 mov 0,%i0 ret restore call %g2 nop .long 2772 mov 0,%i0 ret restore call %g2 nop .long 2773 mov 0,%i0 ret restore call %g2 nop .long 2774 mov 0,%i0 ret restore call %g2 nop .long 2775 mov 0,%i0 ret restore call %g2 nop .long 2776 mov 0,%i0 ret restore call %g2 nop .long 2777 mov 0,%i0 ret restore call %g2 nop .long 2778 mov 0,%i0 ret restore call %g2 nop .long 2779 mov 0,%i0 ret restore call %g2 nop .long 2780 mov 0,%i0 ret restore call %g2 nop .long 2781 mov 0,%i0 ret restore call %g2 nop .long 2782 mov 0,%i0 ret restore call %g2 nop .long 2783 mov 0,%i0 ret restore call %g2 nop .long 2784 mov 0,%i0 ret restore call %g2 nop .long 2785 mov 0,%i0 ret restore call %g2 nop .long 2786 mov 0,%i0 ret restore call %g2 nop .long 2787 mov 0,%i0 ret restore call %g2 nop .long 2788 mov 0,%i0 ret restore call %g2 nop .long 2789 mov 0,%i0 ret restore call %g2 nop .long 2790 mov 0,%i0 ret restore call %g2 nop .long 2791 mov 0,%i0 ret restore call %g2 nop .long 2792 mov 0,%i0 ret restore call %g2 nop .long 2793 mov 0,%i0 ret restore call %g2 nop .long 2794 mov 0,%i0 ret restore call %g2 nop .long 2795 mov 0,%i0 ret restore call %g2 nop .long 2796 mov 0,%i0 ret restore call %g2 nop .long 2797 mov 0,%i0 ret restore call %g2 nop .long 2798 mov 0,%i0 ret restore call %g2 nop .long 2799 mov 0,%i0 ret restore call %g2 nop .long 2800 mov 0,%i0 ret restore call %g2 nop .long 2801 mov 0,%i0 ret restore call %g2 nop .long 2802 mov 0,%i0 ret restore call %g2 nop .long 2803 mov 0,%i0 ret restore call %g2 nop .long 2804 mov 0,%i0 ret restore call %g2 nop .long 2805 mov 0,%i0 ret restore call %g2 nop .long 2806 mov 0,%i0 ret restore call %g2 nop .long 2807 mov 0,%i0 ret restore call %g2 nop .long 2808 mov 0,%i0 ret restore call %g2 nop .long 2809 mov 0,%i0 ret restore call %g2 nop .long 2810 mov 0,%i0 ret restore call %g2 nop .long 2811 mov 0,%i0 ret restore call %g2 nop .long 2812 mov 0,%i0 ret restore call %g2 nop .long 2813 mov 0,%i0 ret restore call %g2 nop .long 2814 mov 0,%i0 ret restore call %g2 nop .long 2815 mov 0,%i0 ret restore call %g2 nop .long 2816 mov 0,%i0 ret restore call %g2 nop .long 2817 mov 0,%i0 ret restore call %g2 nop .long 2818 mov 0,%i0 ret restore call %g2 nop .long 2819 mov 0,%i0 ret restore call %g2 nop .long 2820 mov 0,%i0 ret restore call %g2 nop .long 2821 mov 0,%i0 ret restore call %g2 nop .long 2822 mov 0,%i0 ret restore call %g2 nop .long 2823 mov 0,%i0 ret restore call %g2 nop .long 2824 mov 0,%i0 ret restore call %g2 nop .long 2825 mov 0,%i0 ret restore call %g2 nop .long 2826 mov 0,%i0 ret restore call %g2 nop .long 2827 mov 0,%i0 ret restore call %g2 nop .long 2828 mov 0,%i0 ret restore call %g2 nop .long 2829 mov 0,%i0 ret restore call %g2 nop .long 2830 mov 0,%i0 ret restore call %g2 nop .long 2831 mov 0,%i0 ret restore call %g2 nop .long 2832 mov 0,%i0 ret restore call %g2 nop .long 2833 mov 0,%i0 ret restore call %g2 nop .long 2834 mov 0,%i0 ret restore call %g2 nop .long 2835 mov 0,%i0 ret restore call %g2 nop .long 2836 mov 0,%i0 ret restore call %g2 nop .long 2837 mov 0,%i0 ret restore call %g2 nop .long 2838 mov 0,%i0 ret restore call %g2 nop .long 2839 mov 0,%i0 ret restore call %g2 nop .long 2840 mov 0,%i0 ret restore call %g2 nop .long 2841 mov 0,%i0 ret restore call %g2 nop .long 2842 mov 0,%i0 ret restore call %g2 nop .long 2843 mov 0,%i0 ret restore call %g2 nop .long 2844 mov 0,%i0 ret restore call %g2 nop .long 2845 mov 0,%i0 ret restore call %g2 nop .long 2846 mov 0,%i0 ret restore call %g2 nop .long 2847 mov 0,%i0 ret restore call %g2 nop .long 2848 mov 0,%i0 ret restore call %g2 nop .long 2849 mov 0,%i0 ret restore call %g2 nop .long 2850 mov 0,%i0 ret restore call %g2 nop .long 2851 mov 0,%i0 ret restore call %g2 nop .long 2852 mov 0,%i0 ret restore call %g2 nop .long 2853 mov 0,%i0 ret restore call %g2 nop .long 2854 mov 0,%i0 ret restore call %g2 nop .long 2855 mov 0,%i0 ret restore call %g2 nop .long 2856 mov 0,%i0 ret restore call %g2 nop .long 2857 mov 0,%i0 ret restore call %g2 nop .long 2858 mov 0,%i0 ret restore call %g2 nop .long 2859 mov 0,%i0 ret restore call %g2 nop .long 2860 mov 0,%i0 ret restore call %g2 nop .long 2861 mov 0,%i0 ret restore call %g2 nop .long 2862 mov 0,%i0 ret restore call %g2 nop .long 2863 mov 0,%i0 ret restore call %g2 nop .long 2864 mov 0,%i0 ret restore call %g2 nop .long 2865 mov 0,%i0 ret restore call %g2 nop .long 2866 mov 0,%i0 ret restore call %g2 nop .long 2867 mov 0,%i0 ret restore call %g2 nop .long 2868 mov 0,%i0 ret restore call %g2 nop .long 2869 mov 0,%i0 ret restore call %g2 nop .long 2870 mov 0,%i0 ret restore call %g2 nop .long 2871 mov 0,%i0 ret restore call %g2 nop .long 2872 mov 0,%i0 ret restore call %g2 nop .long 2873 mov 0,%i0 ret restore call %g2 nop .long 2874 mov 0,%i0 ret restore call %g2 nop .long 2875 mov 0,%i0 ret restore call %g2 nop .long 2876 mov 0,%i0 ret restore call %g2 nop .long 2877 mov 0,%i0 ret restore call %g2 nop .long 2878 mov 0,%i0 ret restore call %g2 nop .long 2879 mov 0,%i0 ret restore call %g2 nop .long 2880 mov 0,%i0 ret restore call %g2 nop .long 2881 mov 0,%i0 ret restore call %g2 nop .long 2882 mov 0,%i0 ret restore call %g2 nop .long 2883 mov 0,%i0 ret restore call %g2 nop .long 2884 mov 0,%i0 ret restore call %g2 nop .long 2885 mov 0,%i0 ret restore call %g2 nop .long 2886 mov 0,%i0 ret restore call %g2 nop .long 2887 mov 0,%i0 ret restore call %g2 nop .long 2888 mov 0,%i0 ret restore call %g2 nop .long 2889 mov 0,%i0 ret restore call %g2 nop .long 2890 mov 0,%i0 ret restore call %g2 nop .long 2891 mov 0,%i0 ret restore call %g2 nop .long 2892 mov 0,%i0 ret restore call %g2 nop .long 2893 mov 0,%i0 ret restore call %g2 nop .long 2894 mov 0,%i0 ret restore call %g2 nop .long 2895 mov 0,%i0 ret restore call %g2 nop .long 2896 mov 0,%i0 ret restore call %g2 nop .long 2897 mov 0,%i0 ret restore call %g2 nop .long 2898 mov 0,%i0 ret restore call %g2 nop .long 2899 mov 0,%i0 ret restore call %g2 nop .long 2900 mov 0,%i0 ret restore call %g2 nop .long 2901 mov 0,%i0 ret restore call %g2 nop .long 2902 mov 0,%i0 ret restore call %g2 nop .long 2903 mov 0,%i0 ret restore call %g2 nop .long 2904 mov 0,%i0 ret restore call %g2 nop .long 2905 mov 0,%i0 ret restore call %g2 nop .long 2906 mov 0,%i0 ret restore call %g2 nop .long 2907 mov 0,%i0 ret restore call %g2 nop .long 2908 mov 0,%i0 ret restore call %g2 nop .long 2909 mov 0,%i0 ret restore call %g2 nop .long 2910 mov 0,%i0 ret restore call %g2 nop .long 2911 mov 0,%i0 ret restore call %g2 nop .long 2912 mov 0,%i0 ret restore call %g2 nop .long 2913 mov 0,%i0 ret restore call %g2 nop .long 2914 mov 0,%i0 ret restore call %g2 nop .long 2915 mov 0,%i0 ret restore call %g2 nop .long 2916 mov 0,%i0 ret restore call %g2 nop .long 2917 mov 0,%i0 ret restore call %g2 nop .long 2918 mov 0,%i0 ret restore call %g2 nop .long 2919 mov 0,%i0 ret restore call %g2 nop .long 2920 mov 0,%i0 ret restore call %g2 nop .long 2921 mov 0,%i0 ret restore call %g2 nop .long 2922 mov 0,%i0 ret restore call %g2 nop .long 2923 mov 0,%i0 ret restore call %g2 nop .long 2924 mov 0,%i0 ret restore call %g2 nop .long 2925 mov 0,%i0 ret restore call %g2 nop .long 2926 mov 0,%i0 ret restore call %g2 nop .long 2927 mov 0,%i0 ret restore call %g2 nop .long 2928 mov 0,%i0 ret restore call %g2 nop .long 2929 mov 0,%i0 ret restore call %g2 nop .long 2930 mov 0,%i0 ret restore call %g2 nop .long 2931 mov 0,%i0 ret restore call %g2 nop .long 2932 mov 0,%i0 ret restore call %g2 nop .long 2933 mov 0,%i0 ret restore call %g2 nop .long 2934 mov 0,%i0 ret restore call %g2 nop .long 2935 mov 0,%i0 ret restore call %g2 nop .long 2936 mov 0,%i0 ret restore call %g2 nop .long 2937 mov 0,%i0 ret restore call %g2 nop .long 2938 mov 0,%i0 ret restore call %g2 nop .long 2939 mov 0,%i0 ret restore call %g2 nop .long 2940 mov 0,%i0 ret restore call %g2 nop .long 2941 mov 0,%i0 ret restore call %g2 nop .long 2942 mov 0,%i0 ret restore call %g2 nop .long 2943 mov 0,%i0 ret restore call %g2 nop .long 2944 mov 0,%i0 ret restore call %g2 nop .long 2945 mov 0,%i0 ret restore call %g2 nop .long 2946 mov 0,%i0 ret restore call %g2 nop .long 2947 mov 0,%i0 ret restore call %g2 nop .long 2948 mov 0,%i0 ret restore call %g2 nop .long 2949 mov 0,%i0 ret restore call %g2 nop .long 2950 mov 0,%i0 ret restore call %g2 nop .long 2951 mov 0,%i0 ret restore call %g2 nop .long 2952 mov 0,%i0 ret restore call %g2 nop .long 2953 mov 0,%i0 ret restore call %g2 nop .long 2954 mov 0,%i0 ret restore call %g2 nop .long 2955 mov 0,%i0 ret restore call %g2 nop .long 2956 mov 0,%i0 ret restore call %g2 nop .long 2957 mov 0,%i0 ret restore call %g2 nop .long 2958 mov 0,%i0 ret restore call %g2 nop .long 2959 mov 0,%i0 ret restore call %g2 nop .long 2960 mov 0,%i0 ret restore call %g2 nop .long 2961 mov 0,%i0 ret restore call %g2 nop .long 2962 mov 0,%i0 ret restore call %g2 nop .long 2963 mov 0,%i0 ret restore call %g2 nop .long 2964 mov 0,%i0 ret restore call %g2 nop .long 2965 mov 0,%i0 ret restore call %g2 nop .long 2966 mov 0,%i0 ret restore call %g2 nop .long 2967 mov 0,%i0 ret restore call %g2 nop .long 2968 mov 0,%i0 ret restore call %g2 nop .long 2969 mov 0,%i0 ret restore call %g2 nop .long 2970 mov 0,%i0 ret restore call %g2 nop .long 2971 mov 0,%i0 ret restore call %g2 nop .long 2972 mov 0,%i0 ret restore call %g2 nop .long 2973 mov 0,%i0 ret restore call %g2 nop .long 2974 mov 0,%i0 ret restore call %g2 nop .long 2975 mov 0,%i0 ret restore call %g2 nop .long 2976 mov 0,%i0 ret restore call %g2 nop .long 2977 mov 0,%i0 ret restore call %g2 nop .long 2978 mov 0,%i0 ret restore call %g2 nop .long 2979 mov 0,%i0 ret restore call %g2 nop .long 2980 mov 0,%i0 ret restore call %g2 nop .long 2981 mov 0,%i0 ret restore call %g2 nop .long 2982 mov 0,%i0 ret restore call %g2 nop .long 2983 mov 0,%i0 ret restore call %g2 nop .long 2984 mov 0,%i0 ret restore call %g2 nop .long 2985 mov 0,%i0 ret restore call %g2 nop .long 2986 mov 0,%i0 ret restore call %g2 nop .long 2987 mov 0,%i0 ret restore call %g2 nop .long 2988 mov 0,%i0 ret restore call %g2 nop .long 2989 mov 0,%i0 ret restore call %g2 nop .long 2990 mov 0,%i0 ret restore call %g2 nop .long 2991 mov 0,%i0 ret restore call %g2 nop .long 2992 mov 0,%i0 ret restore call %g2 nop .long 2993 mov 0,%i0 ret restore call %g2 nop .long 2994 mov 0,%i0 ret restore call %g2 nop .long 2995 mov 0,%i0 ret restore call %g2 nop .long 2996 mov 0,%i0 ret restore call %g2 nop .long 2997 mov 0,%i0 ret restore call %g2 nop .long 2998 mov 0,%i0 ret restore call %g2 nop .long 2999 mov 0,%i0 ret restore call %g2 nop .long 3000 mov 0,%i0 ret restore call %g2 nop .long 3001 mov 0,%i0 ret restore call %g2 nop .long 3002 mov 0,%i0 ret restore call %g2 nop .long 3003 mov 0,%i0 ret restore call %g2 nop .long 3004 mov 0,%i0 ret restore call %g2 nop .long 3005 mov 0,%i0 ret restore call %g2 nop .long 3006 mov 0,%i0 ret restore call %g2 nop .long 3007 mov 0,%i0 ret restore call %g2 nop .long 3008 mov 0,%i0 ret restore call %g2 nop .long 3009 mov 0,%i0 ret restore call %g2 nop .long 3010 mov 0,%i0 ret restore call %g2 nop .long 3011 mov 0,%i0 ret restore call %g2 nop .long 3012 mov 0,%i0 ret restore call %g2 nop .long 3013 mov 0,%i0 ret restore call %g2 nop .long 3014 mov 0,%i0 ret restore call %g2 nop .long 3015 mov 0,%i0 ret restore call %g2 nop .long 3016 mov 0,%i0 ret restore call %g2 nop .long 3017 mov 0,%i0 ret restore call %g2 nop .long 3018 mov 0,%i0 ret restore call %g2 nop .long 3019 mov 0,%i0 ret restore call %g2 nop .long 3020 mov 0,%i0 ret restore call %g2 nop .long 3021 mov 0,%i0 ret restore call %g2 nop .long 3022 mov 0,%i0 ret restore call %g2 nop .long 3023 mov 0,%i0 ret restore call %g2 nop .long 3024 mov 0,%i0 ret restore call %g2 nop .long 3025 mov 0,%i0 ret restore call %g2 nop .long 3026 mov 0,%i0 ret restore call %g2 nop .long 3027 mov 0,%i0 ret restore call %g2 nop .long 3028 mov 0,%i0 ret restore call %g2 nop .long 3029 mov 0,%i0 ret restore call %g2 nop .long 3030 mov 0,%i0 ret restore call %g2 nop .long 3031 mov 0,%i0 ret restore call %g2 nop .long 3032 mov 0,%i0 ret restore call %g2 nop .long 3033 mov 0,%i0 ret restore call %g2 nop .long 3034 mov 0,%i0 ret restore call %g2 nop .long 3035 mov 0,%i0 ret restore call %g2 nop .long 3036 mov 0,%i0 ret restore call %g2 nop .long 3037 mov 0,%i0 ret restore call %g2 nop .long 3038 mov 0,%i0 ret restore call %g2 nop .long 3039 mov 0,%i0 ret restore call %g2 nop .long 3040 mov 0,%i0 ret restore call %g2 nop .long 3041 mov 0,%i0 ret restore call %g2 nop .long 3042 mov 0,%i0 ret restore call %g2 nop .long 3043 mov 0,%i0 ret restore call %g2 nop .long 3044 mov 0,%i0 ret restore call %g2 nop .long 3045 mov 0,%i0 ret restore call %g2 nop .long 3046 mov 0,%i0 ret restore call %g2 nop .long 3047 mov 0,%i0 ret restore call %g2 nop .long 3048 mov 0,%i0 ret restore call %g2 nop .long 3049 mov 0,%i0 ret restore call %g2 nop .long 3050 mov 0,%i0 ret restore call %g2 nop .long 3051 mov 0,%i0 ret restore call %g2 nop .long 3052 mov 0,%i0 ret restore call %g2 nop .long 3053 mov 0,%i0 ret restore call %g2 nop .long 3054 mov 0,%i0 ret restore call %g2 nop .long 3055 mov 0,%i0 ret restore call %g2 nop .long 3056 mov 0,%i0 ret restore call %g2 nop .long 3057 mov 0,%i0 ret restore call %g2 nop .long 3058 mov 0,%i0 ret restore call %g2 nop .long 3059 mov 0,%i0 ret restore call %g2 nop .long 3060 mov 0,%i0 ret restore call %g2 nop .long 3061 mov 0,%i0 ret restore call %g2 nop .long 3062 mov 0,%i0 ret restore call %g2 nop .long 3063 mov 0,%i0 ret restore call %g2 nop .long 3064 mov 0,%i0 ret restore call %g2 nop .long 3065 mov 0,%i0 ret restore call %g2 nop .long 3066 mov 0,%i0 ret restore call %g2 nop .long 3067 mov 0,%i0 ret restore call %g2 nop .long 3068 mov 0,%i0 ret restore call %g2 nop .long 3069 mov 0,%i0 ret restore call %g2 nop .long 3070 mov 0,%i0 ret restore call %g2 nop .long 3071 mov 0,%i0 ret restore call %g2 nop .long 3072 mov 0,%i0 ret restore call %g2 nop .long 3073 mov 0,%i0 ret restore call %g2 nop .long 3074 mov 0,%i0 ret restore call %g2 nop .long 3075 mov 0,%i0 ret restore call %g2 nop .long 3076 mov 0,%i0 ret restore call %g2 nop .long 3077 mov 0,%i0 ret restore call %g2 nop .long 3078 mov 0,%i0 ret restore call %g2 nop .long 3079 mov 0,%i0 ret restore call %g2 nop .long 3080 mov 0,%i0 ret restore call %g2 nop .long 3081 mov 0,%i0 ret restore call %g2 nop .long 3082 mov 0,%i0 ret restore call %g2 nop .long 3083 mov 0,%i0 ret restore call %g2 nop .long 3084 mov 0,%i0 ret restore call %g2 nop .long 3085 mov 0,%i0 ret restore call %g2 nop .long 3086 mov 0,%i0 ret restore call %g2 nop .long 3087 mov 0,%i0 ret restore call %g2 nop .long 3088 mov 0,%i0 ret restore call %g2 nop .long 3089 mov 0,%i0 ret restore call %g2 nop .long 3090 mov 0,%i0 ret restore call %g2 nop .long 3091 mov 0,%i0 ret restore call %g2 nop .long 3092 mov 0,%i0 ret restore call %g2 nop .long 3093 mov 0,%i0 ret restore call %g2 nop .long 3094 mov 0,%i0 ret restore call %g2 nop .long 3095 mov 0,%i0 ret restore call %g2 nop .long 3096 mov 0,%i0 ret restore call %g2 nop .long 3097 mov 0,%i0 ret restore call %g2 nop .long 3098 mov 0,%i0 ret restore call %g2 nop .long 3099 mov 0,%i0 ret restore call %g2 nop .long 3100 mov 0,%i0 ret restore call %g2 nop .long 3101 mov 0,%i0 ret restore call %g2 nop .long 3102 mov 0,%i0 ret restore call %g2 nop .long 3103 mov 0,%i0 ret restore call %g2 nop .long 3104 mov 0,%i0 ret restore call %g2 nop .long 3105 mov 0,%i0 ret restore call %g2 nop .long 3106 mov 0,%i0 ret restore call %g2 nop .long 3107 mov 0,%i0 ret restore call %g2 nop .long 3108 mov 0,%i0 ret restore call %g2 nop .long 3109 mov 0,%i0 ret restore call %g2 nop .long 3110 mov 0,%i0 ret restore call %g2 nop .long 3111 mov 0,%i0 ret restore call %g2 nop .long 3112 mov 0,%i0 ret restore call %g2 nop .long 3113 mov 0,%i0 ret restore call %g2 nop .long 3114 mov 0,%i0 ret restore call %g2 nop .long 3115 mov 0,%i0 ret restore call %g2 nop .long 3116 mov 0,%i0 ret restore call %g2 nop .long 3117 mov 0,%i0 ret restore call %g2 nop .long 3118 mov 0,%i0 ret restore call %g2 nop .long 3119 mov 0,%i0 ret restore call %g2 nop .long 3120 mov 0,%i0 ret restore call %g2 nop .long 3121 mov 0,%i0 ret restore call %g2 nop .long 3122 mov 0,%i0 ret restore call %g2 nop .long 3123 mov 0,%i0 ret restore call %g2 nop .long 3124 mov 0,%i0 ret restore call %g2 nop .long 3125 mov 0,%i0 ret restore call %g2 nop .long 3126 mov 0,%i0 ret restore call %g2 nop .long 3127 mov 0,%i0 ret restore call %g2 nop .long 3128 mov 0,%i0 ret restore call %g2 nop .long 3129 mov 0,%i0 ret restore call %g2 nop .long 3130 mov 0,%i0 ret restore call %g2 nop .long 3131 mov 0,%i0 ret restore call %g2 nop .long 3132 mov 0,%i0 ret restore call %g2 nop .long 3133 mov 0,%i0 ret restore call %g2 nop .long 3134 mov 0,%i0 ret restore call %g2 nop .long 3135 mov 0,%i0 ret restore call %g2 nop .long 3136 mov 0,%i0 ret restore call %g2 nop .long 3137 mov 0,%i0 ret restore call %g2 nop .long 3138 mov 0,%i0 ret restore call %g2 nop .long 3139 mov 0,%i0 ret restore call %g2 nop .long 3140 mov 0,%i0 ret restore call %g2 nop .long 3141 mov 0,%i0 ret restore call %g2 nop .long 3142 mov 0,%i0 ret restore call %g2 nop .long 3143 mov 0,%i0 ret restore call %g2 nop .long 3144 mov 0,%i0 ret restore call %g2 nop .long 3145 mov 0,%i0 ret restore call %g2 nop .long 3146 mov 0,%i0 ret restore call %g2 nop .long 3147 mov 0,%i0 ret restore call %g2 nop .long 3148 mov 0,%i0 ret restore call %g2 nop .long 3149 mov 0,%i0 ret restore call %g2 nop .long 3150 mov 0,%i0 ret restore call %g2 nop .long 3151 mov 0,%i0 ret restore call %g2 nop .long 3152 mov 0,%i0 ret restore call %g2 nop .long 3153 mov 0,%i0 ret restore call %g2 nop .long 3154 mov 0,%i0 ret restore call %g2 nop .long 3155 mov 0,%i0 ret restore call %g2 nop .long 3156 mov 0,%i0 ret restore call %g2 nop .long 3157 mov 0,%i0 ret restore call %g2 nop .long 3158 mov 0,%i0 ret restore call %g2 nop .long 3159 mov 0,%i0 ret restore call %g2 nop .long 3160 mov 0,%i0 ret restore call %g2 nop .long 3161 mov 0,%i0 ret restore call %g2 nop .long 3162 mov 0,%i0 ret restore call %g2 nop .long 3163 mov 0,%i0 ret restore call %g2 nop .long 3164 mov 0,%i0 ret restore call %g2 nop .long 3165 mov 0,%i0 ret restore call %g2 nop .long 3166 mov 0,%i0 ret restore call %g2 nop .long 3167 mov 0,%i0 ret restore call %g2 nop .long 3168 mov 0,%i0 ret restore call %g2 nop .long 3169 mov 0,%i0 ret restore call %g2 nop .long 3170 mov 0,%i0 ret restore call %g2 nop .long 3171 mov 0,%i0 ret restore call %g2 nop .long 3172 mov 0,%i0 ret restore call %g2 nop .long 3173 mov 0,%i0 ret restore call %g2 nop .long 3174 mov 0,%i0 ret restore call %g2 nop .long 3175 mov 0,%i0 ret restore call %g2 nop .long 3176 mov 0,%i0 ret restore call %g2 nop .long 3177 mov 0,%i0 ret restore call %g2 nop .long 3178 mov 0,%i0 ret restore call %g2 nop .long 3179 mov 0,%i0 ret restore call %g2 nop .long 3180 mov 0,%i0 ret restore call %g2 nop .long 3181 mov 0,%i0 ret restore call %g2 nop .long 3182 mov 0,%i0 ret restore call %g2 nop .long 3183 mov 0,%i0 ret restore call %g2 nop .long 3184 mov 0,%i0 ret restore call %g2 nop .long 3185 mov 0,%i0 ret restore call %g2 nop .long 3186 mov 0,%i0 ret restore call %g2 nop .long 3187 mov 0,%i0 ret restore call %g2 nop .long 3188 mov 0,%i0 ret restore call %g2 nop .long 3189 mov 0,%i0 ret restore call %g2 nop .long 3190 mov 0,%i0 ret restore call %g2 nop .long 3191 mov 0,%i0 ret restore call %g2 nop .long 3192 mov 0,%i0 ret restore call %g2 nop .long 3193 mov 0,%i0 ret restore call %g2 nop .long 3194 mov 0,%i0 ret restore call %g2 nop .long 3195 mov 0,%i0 ret restore call %g2 nop .long 3196 mov 0,%i0 ret restore call %g2 nop .long 3197 mov 0,%i0 ret restore call %g2 nop .long 3198 mov 0,%i0 ret restore call %g2 nop .long 3199 mov 0,%i0 ret restore call %g2 nop .long 3200 mov 0,%i0 ret restore call %g2 nop .long 3201 mov 0,%i0 ret restore call %g2 nop .long 3202 mov 0,%i0 ret restore call %g2 nop .long 3203 mov 0,%i0 ret restore call %g2 nop .long 3204 mov 0,%i0 ret restore call %g2 nop .long 3205 mov 0,%i0 ret restore call %g2 nop .long 3206 mov 0,%i0 ret restore call %g2 nop .long 3207 mov 0,%i0 ret restore call %g2 nop .long 3208 mov 0,%i0 ret restore call %g2 nop .long 3209 mov 0,%i0 ret restore call %g2 nop .long 3210 mov 0,%i0 ret restore call %g2 nop .long 3211 mov 0,%i0 ret restore call %g2 nop .long 3212 mov 0,%i0 ret restore call %g2 nop .long 3213 mov 0,%i0 ret restore call %g2 nop .long 3214 mov 0,%i0 ret restore call %g2 nop .long 3215 mov 0,%i0 ret restore call %g2 nop .long 3216 mov 0,%i0 ret restore call %g2 nop .long 3217 mov 0,%i0 ret restore call %g2 nop .long 3218 mov 0,%i0 ret restore call %g2 nop .long 3219 mov 0,%i0 ret restore call %g2 nop .long 3220 mov 0,%i0 ret restore call %g2 nop .long 3221 mov 0,%i0 ret restore call %g2 nop .long 3222 mov 0,%i0 ret restore call %g2 nop .long 3223 mov 0,%i0 ret restore call %g2 nop .long 3224 mov 0,%i0 ret restore call %g2 nop .long 3225 mov 0,%i0 ret restore call %g2 nop .long 3226 mov 0,%i0 ret restore call %g2 nop .long 3227 mov 0,%i0 ret restore call %g2 nop .long 3228 mov 0,%i0 ret restore call %g2 nop .long 3229 mov 0,%i0 ret restore call %g2 nop .long 3230 mov 0,%i0 ret restore call %g2 nop .long 3231 mov 0,%i0 ret restore call %g2 nop .long 3232 mov 0,%i0 ret restore call %g2 nop .long 3233 mov 0,%i0 ret restore call %g2 nop .long 3234 mov 0,%i0 ret restore call %g2 nop .long 3235 mov 0,%i0 ret restore call %g2 nop .long 3236 mov 0,%i0 ret restore call %g2 nop .long 3237 mov 0,%i0 ret restore call %g2 nop .long 3238 mov 0,%i0 ret restore call %g2 nop .long 3239 mov 0,%i0 ret restore call %g2 nop .long 3240 mov 0,%i0 ret restore call %g2 nop .long 3241 mov 0,%i0 ret restore call %g2 nop .long 3242 mov 0,%i0 ret restore call %g2 nop .long 3243 mov 0,%i0 ret restore call %g2 nop .long 3244 mov 0,%i0 ret restore call %g2 nop .long 3245 mov 0,%i0 ret restore call %g2 nop .long 3246 mov 0,%i0 ret restore call %g2 nop .long 3247 mov 0,%i0 ret restore call %g2 nop .long 3248 mov 0,%i0 ret restore call %g2 nop .long 3249 mov 0,%i0 ret restore call %g2 nop .long 3250 mov 0,%i0 ret restore call %g2 nop .long 3251 mov 0,%i0 ret restore call %g2 nop .long 3252 mov 0,%i0 ret restore call %g2 nop .long 3253 mov 0,%i0 ret restore call %g2 nop .long 3254 mov 0,%i0 ret restore call %g2 nop .long 3255 mov 0,%i0 ret restore call %g2 nop .long 3256 mov 0,%i0 ret restore call %g2 nop .long 3257 mov 0,%i0 ret restore call %g2 nop .long 3258 mov 0,%i0 ret restore call %g2 nop .long 3259 mov 0,%i0 ret restore call %g2 nop .long 3260 mov 0,%i0 ret restore call %g2 nop .long 3261 mov 0,%i0 ret restore call %g2 nop .long 3262 mov 0,%i0 ret restore call %g2 nop .long 3263 mov 0,%i0 ret restore call %g2 nop .long 3264 mov 0,%i0 ret restore call %g2 nop .long 3265 mov 0,%i0 ret restore call %g2 nop .long 3266 mov 0,%i0 ret restore call %g2 nop .long 3267 mov 0,%i0 ret restore call %g2 nop .long 3268 mov 0,%i0 ret restore call %g2 nop .long 3269 mov 0,%i0 ret restore call %g2 nop .long 3270 mov 0,%i0 ret restore call %g2 nop .long 3271 mov 0,%i0 ret restore call %g2 nop .long 3272 mov 0,%i0 ret restore call %g2 nop .long 3273 mov 0,%i0 ret restore call %g2 nop .long 3274 mov 0,%i0 ret restore call %g2 nop .long 3275 mov 0,%i0 ret restore call %g2 nop .long 3276 mov 0,%i0 ret restore call %g2 nop .long 3277 mov 0,%i0 ret restore call %g2 nop .long 3278 mov 0,%i0 ret restore call %g2 nop .long 3279 mov 0,%i0 ret restore call %g2 nop .long 3280 mov 0,%i0 ret restore call %g2 nop .long 3281 mov 0,%i0 ret restore call %g2 nop .long 3282 mov 0,%i0 ret restore call %g2 nop .long 3283 mov 0,%i0 ret restore call %g2 nop .long 3284 mov 0,%i0 ret restore call %g2 nop .long 3285 mov 0,%i0 ret restore call %g2 nop .long 3286 mov 0,%i0 ret restore call %g2 nop .long 3287 mov 0,%i0 ret restore call %g2 nop .long 3288 mov 0,%i0 ret restore call %g2 nop .long 3289 mov 0,%i0 ret restore call %g2 nop .long 3290 mov 0,%i0 ret restore call %g2 nop .long 3291 mov 0,%i0 ret restore call %g2 nop .long 3292 mov 0,%i0 ret restore call %g2 nop .long 3293 mov 0,%i0 ret restore call %g2 nop .long 3294 mov 0,%i0 ret restore call %g2 nop .long 3295 mov 0,%i0 ret restore call %g2 nop .long 3296 mov 0,%i0 ret restore call %g2 nop .long 3297 mov 0,%i0 ret restore call %g2 nop .long 3298 mov 0,%i0 ret restore call %g2 nop .long 3299 mov 0,%i0 ret restore call %g2 nop .long 3300 mov 0,%i0 ret restore call %g2 nop .long 3301 mov 0,%i0 ret restore call %g2 nop .long 3302 mov 0,%i0 ret restore call %g2 nop .long 3303 mov 0,%i0 ret restore call %g2 nop .long 3304 mov 0,%i0 ret restore call %g2 nop .long 3305 mov 0,%i0 ret restore call %g2 nop .long 3306 mov 0,%i0 ret restore call %g2 nop .long 3307 mov 0,%i0 ret restore call %g2 nop .long 3308 mov 0,%i0 ret restore call %g2 nop .long 3309 mov 0,%i0 ret restore call %g2 nop .long 3310 mov 0,%i0 ret restore call %g2 nop .long 3311 mov 0,%i0 ret restore call %g2 nop .long 3312 mov 0,%i0 ret restore call %g2 nop .long 3313 mov 0,%i0 ret restore call %g2 nop .long 3314 mov 0,%i0 ret restore call %g2 nop .long 3315 mov 0,%i0 ret restore call %g2 nop .long 3316 mov 0,%i0 ret restore call %g2 nop .long 3317 mov 0,%i0 ret restore call %g2 nop .long 3318 mov 0,%i0 ret restore call %g2 nop .long 3319 mov 0,%i0 ret restore call %g2 nop .long 3320 mov 0,%i0 ret restore call %g2 nop .long 3321 mov 0,%i0 ret restore call %g2 nop .long 3322 mov 0,%i0 ret restore call %g2 nop .long 3323 mov 0,%i0 ret restore call %g2 nop .long 3324 mov 0,%i0 ret restore call %g2 nop .long 3325 mov 0,%i0 ret restore call %g2 nop .long 3326 mov 0,%i0 ret restore call %g2 nop .long 3327 mov 0,%i0 ret restore call %g2 nop .long 3328 mov 0,%i0 ret restore call %g2 nop .long 3329 mov 0,%i0 ret restore call %g2 nop .long 3330 mov 0,%i0 ret restore call %g2 nop .long 3331 mov 0,%i0 ret restore call %g2 nop .long 3332 mov 0,%i0 ret restore call %g2 nop .long 3333 mov 0,%i0 ret restore call %g2 nop .long 3334 mov 0,%i0 ret restore call %g2 nop .long 3335 mov 0,%i0 ret restore call %g2 nop .long 3336 mov 0,%i0 ret restore call %g2 nop .long 3337 mov 0,%i0 ret restore call %g2 nop .long 3338 mov 0,%i0 ret restore call %g2 nop .long 3339 mov 0,%i0 ret restore call %g2 nop .long 3340 mov 0,%i0 ret restore call %g2 nop .long 3341 mov 0,%i0 ret restore call %g2 nop .long 3342 mov 0,%i0 ret restore call %g2 nop .long 3343 mov 0,%i0 ret restore call %g2 nop .long 3344 mov 0,%i0 ret restore call %g2 nop .long 3345 mov 0,%i0 ret restore call %g2 nop .long 3346 mov 0,%i0 ret restore call %g2 nop .long 3347 mov 0,%i0 ret restore call %g2 nop .long 3348 mov 0,%i0 ret restore call %g2 nop .long 3349 mov 0,%i0 ret restore call %g2 nop .long 3350 mov 0,%i0 ret restore call %g2 nop .long 3351 mov 0,%i0 ret restore call %g2 nop .long 3352 mov 0,%i0 ret restore call %g2 nop .long 3353 mov 0,%i0 ret restore call %g2 nop .long 3354 mov 0,%i0 ret restore call %g2 nop .long 3355 mov 0,%i0 ret restore call %g2 nop .long 3356 mov 0,%i0 ret restore call %g2 nop .long 3357 mov 0,%i0 ret restore call %g2 nop .long 3358 mov 0,%i0 ret restore call %g2 nop .long 3359 mov 0,%i0 ret restore call %g2 nop .long 3360 mov 0,%i0 ret restore call %g2 nop .long 3361 mov 0,%i0 ret restore call %g2 nop .long 3362 mov 0,%i0 ret restore call %g2 nop .long 3363 mov 0,%i0 ret restore call %g2 nop .long 3364 mov 0,%i0 ret restore call %g2 nop .long 3365 mov 0,%i0 ret restore call %g2 nop .long 3366 mov 0,%i0 ret restore call %g2 nop .long 3367 mov 0,%i0 ret restore call %g2 nop .long 3368 mov 0,%i0 ret restore call %g2 nop .long 3369 mov 0,%i0 ret restore call %g2 nop .long 3370 mov 0,%i0 ret restore call %g2 nop .long 3371 mov 0,%i0 ret restore call %g2 nop .long 3372 mov 0,%i0 ret restore call %g2 nop .long 3373 mov 0,%i0 ret restore call %g2 nop .long 3374 mov 0,%i0 ret restore call %g2 nop .long 3375 mov 0,%i0 ret restore call %g2 nop .long 3376 mov 0,%i0 ret restore call %g2 nop .long 3377 mov 0,%i0 ret restore call %g2 nop .long 3378 mov 0,%i0 ret restore call %g2 nop .long 3379 mov 0,%i0 ret restore call %g2 nop .long 3380 mov 0,%i0 ret restore call %g2 nop .long 3381 mov 0,%i0 ret restore call %g2 nop .long 3382 mov 0,%i0 ret restore call %g2 nop .long 3383 mov 0,%i0 ret restore call %g2 nop .long 3384 mov 0,%i0 ret restore call %g2 nop .long 3385 mov 0,%i0 ret restore call %g2 nop .long 3386 mov 0,%i0 ret restore call %g2 nop .long 3387 mov 0,%i0 ret restore call %g2 nop .long 3388 mov 0,%i0 ret restore call %g2 nop .long 3389 mov 0,%i0 ret restore call %g2 nop .long 3390 mov 0,%i0 ret restore call %g2 nop .long 3391 mov 0,%i0 ret restore call %g2 nop .long 3392 mov 0,%i0 ret restore call %g2 nop .long 3393 mov 0,%i0 ret restore call %g2 nop .long 3394 mov 0,%i0 ret restore call %g2 nop .long 3395 mov 0,%i0 ret restore call %g2 nop .long 3396 mov 0,%i0 ret restore call %g2 nop .long 3397 mov 0,%i0 ret restore call %g2 nop .long 3398 mov 0,%i0 ret restore call %g2 nop .long 3399 mov 0,%i0 ret restore call %g2 nop .long 3400 mov 0,%i0 ret restore call %g2 nop .long 3401 mov 0,%i0 ret restore call %g2 nop .long 3402 mov 0,%i0 ret restore call %g2 nop .long 3403 mov 0,%i0 ret restore call %g2 nop .long 3404 mov 0,%i0 ret restore call %g2 nop .long 3405 mov 0,%i0 ret restore call %g2 nop .long 3406 mov 0,%i0 ret restore call %g2 nop .long 3407 mov 0,%i0 ret restore call %g2 nop .long 3408 mov 0,%i0 ret restore call %g2 nop .long 3409 mov 0,%i0 ret restore call %g2 nop .long 3410 mov 0,%i0 ret restore call %g2 nop .long 3411 mov 0,%i0 ret restore call %g2 nop .long 3412 mov 0,%i0 ret restore call %g2 nop .long 3413 mov 0,%i0 ret restore call %g2 nop .long 3414 mov 0,%i0 ret restore call %g2 nop .long 3415 mov 0,%i0 ret restore call %g2 nop .long 3416 mov 0,%i0 ret restore call %g2 nop .long 3417 mov 0,%i0 ret restore call %g2 nop .long 3418 mov 0,%i0 ret restore call %g2 nop .long 3419 mov 0,%i0 ret restore call %g2 nop .long 3420 mov 0,%i0 ret restore call %g2 nop .long 3421 mov 0,%i0 ret restore call %g2 nop .long 3422 mov 0,%i0 ret restore call %g2 nop .long 3423 mov 0,%i0 ret restore call %g2 nop .long 3424 mov 0,%i0 ret restore call %g2 nop .long 3425 mov 0,%i0 ret restore call %g2 nop .long 3426 mov 0,%i0 ret restore call %g2 nop .long 3427 mov 0,%i0 ret restore call %g2 nop .long 3428 mov 0,%i0 ret restore call %g2 nop .long 3429 mov 0,%i0 ret restore call %g2 nop .long 3430 mov 0,%i0 ret restore call %g2 nop .long 3431 mov 0,%i0 ret restore call %g2 nop .long 3432 mov 0,%i0 ret restore call %g2 nop .long 3433 mov 0,%i0 ret restore call %g2 nop .long 3434 mov 0,%i0 ret restore call %g2 nop .long 3435 mov 0,%i0 ret restore call %g2 nop .long 3436 mov 0,%i0 ret restore call %g2 nop .long 3437 mov 0,%i0 ret restore call %g2 nop .long 3438 mov 0,%i0 ret restore call %g2 nop .long 3439 mov 0,%i0 ret restore call %g2 nop .long 3440 mov 0,%i0 ret restore call %g2 nop .long 3441 mov 0,%i0 ret restore call %g2 nop .long 3442 mov 0,%i0 ret restore call %g2 nop .long 3443 mov 0,%i0 ret restore call %g2 nop .long 3444 mov 0,%i0 ret restore call %g2 nop .long 3445 mov 0,%i0 ret restore call %g2 nop .long 3446 mov 0,%i0 ret restore call %g2 nop .long 3447 mov 0,%i0 ret restore call %g2 nop .long 3448 mov 0,%i0 ret restore call %g2 nop .long 3449 mov 0,%i0 ret restore call %g2 nop .long 3450 mov 0,%i0 ret restore call %g2 nop .long 3451 mov 0,%i0 ret restore call %g2 nop .long 3452 mov 0,%i0 ret restore call %g2 nop .long 3453 mov 0,%i0 ret restore call %g2 nop .long 3454 mov 0,%i0 ret restore call %g2 nop .long 3455 mov 0,%i0 ret restore call %g2 nop .long 3456 mov 0,%i0 ret restore call %g2 nop .long 3457 mov 0,%i0 ret restore call %g2 nop .long 3458 mov 0,%i0 ret restore call %g2 nop .long 3459 mov 0,%i0 ret restore call %g2 nop .long 3460 mov 0,%i0 ret restore call %g2 nop .long 3461 mov 0,%i0 ret restore call %g2 nop .long 3462 mov 0,%i0 ret restore call %g2 nop .long 3463 mov 0,%i0 ret restore call %g2 nop .long 3464 mov 0,%i0 ret restore call %g2 nop .long 3465 mov 0,%i0 ret restore call %g2 nop .long 3466 mov 0,%i0 ret restore call %g2 nop .long 3467 mov 0,%i0 ret restore call %g2 nop .long 3468 mov 0,%i0 ret restore call %g2 nop .long 3469 mov 0,%i0 ret restore call %g2 nop .long 3470 mov 0,%i0 ret restore call %g2 nop .long 3471 mov 0,%i0 ret restore call %g2 nop .long 3472 mov 0,%i0 ret restore call %g2 nop .long 3473 mov 0,%i0 ret restore call %g2 nop .long 3474 mov 0,%i0 ret restore call %g2 nop .long 3475 mov 0,%i0 ret restore call %g2 nop .long 3476 mov 0,%i0 ret restore call %g2 nop .long 3477 mov 0,%i0 ret restore call %g2 nop .long 3478 mov 0,%i0 ret restore call %g2 nop .long 3479 mov 0,%i0 ret restore call %g2 nop .long 3480 mov 0,%i0 ret restore call %g2 nop .long 3481 mov 0,%i0 ret restore call %g2 nop .long 3482 mov 0,%i0 ret restore call %g2 nop .long 3483 mov 0,%i0 ret restore call %g2 nop .long 3484 mov 0,%i0 ret restore call %g2 nop .long 3485 mov 0,%i0 ret restore call %g2 nop .long 3486 mov 0,%i0 ret restore call %g2 nop .long 3487 mov 0,%i0 ret restore call %g2 nop .long 3488 mov 0,%i0 ret restore call %g2 nop .long 3489 mov 0,%i0 ret restore call %g2 nop .long 3490 mov 0,%i0 ret restore call %g2 nop .long 3491 mov 0,%i0 ret restore call %g2 nop .long 3492 mov 0,%i0 ret restore call %g2 nop .long 3493 mov 0,%i0 ret restore call %g2 nop .long 3494 mov 0,%i0 ret restore call %g2 nop .long 3495 mov 0,%i0 ret restore call %g2 nop .long 3496 mov 0,%i0 ret restore call %g2 nop .long 3497 mov 0,%i0 ret restore call %g2 nop .long 3498 mov 0,%i0 ret restore call %g2 nop .long 3499 mov 0,%i0 ret restore call %g2 nop .long 3500 mov 0,%i0 ret restore call %g2 nop .long 3501 mov 0,%i0 ret restore call %g2 nop .long 3502 mov 0,%i0 ret restore call %g2 nop .long 3503 mov 0,%i0 ret restore call %g2 nop .long 3504 mov 0,%i0 ret restore call %g2 nop .long 3505 mov 0,%i0 ret restore call %g2 nop .long 3506 mov 0,%i0 ret restore call %g2 nop .long 3507 mov 0,%i0 ret restore call %g2 nop .long 3508 mov 0,%i0 ret restore call %g2 nop .long 3509 mov 0,%i0 ret restore call %g2 nop .long 3510 mov 0,%i0 ret restore call %g2 nop .long 3511 mov 0,%i0 ret restore call %g2 nop .long 3512 mov 0,%i0 ret restore call %g2 nop .long 3513 mov 0,%i0 ret restore call %g2 nop .long 3514 mov 0,%i0 ret restore call %g2 nop .long 3515 mov 0,%i0 ret restore call %g2 nop .long 3516 mov 0,%i0 ret restore call %g2 nop .long 3517 mov 0,%i0 ret restore call %g2 nop .long 3518 mov 0,%i0 ret restore call %g2 nop .long 3519 mov 0,%i0 ret restore call %g2 nop .long 3520 mov 0,%i0 ret restore call %g2 nop .long 3521 mov 0,%i0 ret restore call %g2 nop .long 3522 mov 0,%i0 ret restore call %g2 nop .long 3523 mov 0,%i0 ret restore call %g2 nop .long 3524 mov 0,%i0 ret restore call %g2 nop .long 3525 mov 0,%i0 ret restore call %g2 nop .long 3526 mov 0,%i0 ret restore call %g2 nop .long 3527 mov 0,%i0 ret restore call %g2 nop .long 3528 mov 0,%i0 ret restore call %g2 nop .long 3529 mov 0,%i0 ret restore call %g2 nop .long 3530 mov 0,%i0 ret restore call %g2 nop .long 3531 mov 0,%i0 ret restore call %g2 nop .long 3532 mov 0,%i0 ret restore call %g2 nop .long 3533 mov 0,%i0 ret restore call %g2 nop .long 3534 mov 0,%i0 ret restore call %g2 nop .long 3535 mov 0,%i0 ret restore call %g2 nop .long 3536 mov 0,%i0 ret restore call %g2 nop .long 3537 mov 0,%i0 ret restore call %g2 nop .long 3538 mov 0,%i0 ret restore call %g2 nop .long 3539 mov 0,%i0 ret restore call %g2 nop .long 3540 mov 0,%i0 ret restore call %g2 nop .long 3541 mov 0,%i0 ret restore call %g2 nop .long 3542 mov 0,%i0 ret restore call %g2 nop .long 3543 mov 0,%i0 ret restore call %g2 nop .long 3544 mov 0,%i0 ret restore call %g2 nop .long 3545 mov 0,%i0 ret restore call %g2 nop .long 3546 mov 0,%i0 ret restore call %g2 nop .long 3547 mov 0,%i0 ret restore call %g2 nop .long 3548 mov 0,%i0 ret restore call %g2 nop .long 3549 mov 0,%i0 ret restore call %g2 nop .long 3550 mov 0,%i0 ret restore call %g2 nop .long 3551 mov 0,%i0 ret restore call %g2 nop .long 3552 mov 0,%i0 ret restore call %g2 nop .long 3553 mov 0,%i0 ret restore call %g2 nop .long 3554 mov 0,%i0 ret restore call %g2 nop .long 3555 mov 0,%i0 ret restore call %g2 nop .long 3556 mov 0,%i0 ret restore call %g2 nop .long 3557 mov 0,%i0 ret restore call %g2 nop .long 3558 mov 0,%i0 ret restore call %g2 nop .long 3559 mov 0,%i0 ret restore call %g2 nop .long 3560 mov 0,%i0 ret restore call %g2 nop .long 3561 mov 0,%i0 ret restore call %g2 nop .long 3562 mov 0,%i0 ret restore call %g2 nop .long 3563 mov 0,%i0 ret restore call %g2 nop .long 3564 mov 0,%i0 ret restore call %g2 nop .long 3565 mov 0,%i0 ret restore call %g2 nop .long 3566 mov 0,%i0 ret restore call %g2 nop .long 3567 mov 0,%i0 ret restore call %g2 nop .long 3568 mov 0,%i0 ret restore call %g2 nop .long 3569 mov 0,%i0 ret restore call %g2 nop .long 3570 mov 0,%i0 ret restore call %g2 nop .long 3571 mov 0,%i0 ret restore call %g2 nop .long 3572 mov 0,%i0 ret restore call %g2 nop .long 3573 mov 0,%i0 ret restore call %g2 nop .long 3574 mov 0,%i0 ret restore call %g2 nop .long 3575 mov 0,%i0 ret restore call %g2 nop .long 3576 mov 0,%i0 ret restore call %g2 nop .long 3577 mov 0,%i0 ret restore call %g2 nop .long 3578 mov 0,%i0 ret restore call %g2 nop .long 3579 mov 0,%i0 ret restore call %g2 nop .long 3580 mov 0,%i0 ret restore call %g2 nop .long 3581 mov 0,%i0 ret restore call %g2 nop .long 3582 mov 0,%i0 ret restore call %g2 nop .long 3583 mov 0,%i0 ret restore call %g2 nop .long 3584 mov 0,%i0 ret restore call %g2 nop .long 3585 mov 0,%i0 ret restore call %g2 nop .long 3586 mov 0,%i0 ret restore call %g2 nop .long 3587 mov 0,%i0 ret restore call %g2 nop .long 3588 mov 0,%i0 ret restore call %g2 nop .long 3589 mov 0,%i0 ret restore call %g2 nop .long 3590 mov 0,%i0 ret restore call %g2 nop .long 3591 mov 0,%i0 ret restore call %g2 nop .long 3592 mov 0,%i0 ret restore call %g2 nop .long 3593 mov 0,%i0 ret restore call %g2 nop .long 3594 mov 0,%i0 ret restore call %g2 nop .long 3595 mov 0,%i0 ret restore call %g2 nop .long 3596 mov 0,%i0 ret restore call %g2 nop .long 3597 mov 0,%i0 ret restore call %g2 nop .long 3598 mov 0,%i0 ret restore call %g2 nop .long 3599 mov 0,%i0 ret restore call %g2 nop .long 3600 mov 0,%i0 ret restore call %g2 nop .long 3601 mov 0,%i0 ret restore call %g2 nop .long 3602 mov 0,%i0 ret restore call %g2 nop .long 3603 mov 0,%i0 ret restore call %g2 nop .long 3604 mov 0,%i0 ret restore call %g2 nop .long 3605 mov 0,%i0 ret restore call %g2 nop .long 3606 mov 0,%i0 ret restore call %g2 nop .long 3607 mov 0,%i0 ret restore call %g2 nop .long 3608 mov 0,%i0 ret restore call %g2 nop .long 3609 mov 0,%i0 ret restore call %g2 nop .long 3610 mov 0,%i0 ret restore call %g2 nop .long 3611 mov 0,%i0 ret restore call %g2 nop .long 3612 mov 0,%i0 ret restore call %g2 nop .long 3613 mov 0,%i0 ret restore call %g2 nop .long 3614 mov 0,%i0 ret restore call %g2 nop .long 3615 mov 0,%i0 ret restore call %g2 nop .long 3616 mov 0,%i0 ret restore call %g2 nop .long 3617 mov 0,%i0 ret restore call %g2 nop .long 3618 mov 0,%i0 ret restore call %g2 nop .long 3619 mov 0,%i0 ret restore call %g2 nop .long 3620 mov 0,%i0 ret restore call %g2 nop .long 3621 mov 0,%i0 ret restore call %g2 nop .long 3622 mov 0,%i0 ret restore call %g2 nop .long 3623 mov 0,%i0 ret restore call %g2 nop .long 3624 mov 0,%i0 ret restore call %g2 nop .long 3625 mov 0,%i0 ret restore call %g2 nop .long 3626 mov 0,%i0 ret restore call %g2 nop .long 3627 mov 0,%i0 ret restore call %g2 nop .long 3628 mov 0,%i0 ret restore call %g2 nop .long 3629 mov 0,%i0 ret restore call %g2 nop .long 3630 mov 0,%i0 ret restore call %g2 nop .long 3631 mov 0,%i0 ret restore call %g2 nop .long 3632 mov 0,%i0 ret restore call %g2 nop .long 3633 mov 0,%i0 ret restore call %g2 nop .long 3634 mov 0,%i0 ret restore call %g2 nop .long 3635 mov 0,%i0 ret restore call %g2 nop .long 3636 mov 0,%i0 ret restore call %g2 nop .long 3637 mov 0,%i0 ret restore call %g2 nop .long 3638 mov 0,%i0 ret restore call %g2 nop .long 3639 mov 0,%i0 ret restore call %g2 nop .long 3640 mov 0,%i0 ret restore call %g2 nop .long 3641 mov 0,%i0 ret restore call %g2 nop .long 3642 mov 0,%i0 ret restore call %g2 nop .long 3643 mov 0,%i0 ret restore call %g2 nop .long 3644 mov 0,%i0 ret restore call %g2 nop .long 3645 mov 0,%i0 ret restore call %g2 nop .long 3646 mov 0,%i0 ret restore call %g2 nop .long 3647 mov 0,%i0 ret restore call %g2 nop .long 3648 mov 0,%i0 ret restore call %g2 nop .long 3649 mov 0,%i0 ret restore call %g2 nop .long 3650 mov 0,%i0 ret restore call %g2 nop .long 3651 mov 0,%i0 ret restore call %g2 nop .long 3652 mov 0,%i0 ret restore call %g2 nop .long 3653 mov 0,%i0 ret restore call %g2 nop .long 3654 mov 0,%i0 ret restore call %g2 nop .long 3655 mov 0,%i0 ret restore call %g2 nop .long 3656 mov 0,%i0 ret restore call %g2 nop .long 3657 mov 0,%i0 ret restore call %g2 nop .long 3658 mov 0,%i0 ret restore call %g2 nop .long 3659 mov 0,%i0 ret restore call %g2 nop .long 3660 mov 0,%i0 ret restore call %g2 nop .long 3661 mov 0,%i0 ret restore call %g2 nop .long 3662 mov 0,%i0 ret restore call %g2 nop .long 3663 mov 0,%i0 ret restore call %g2 nop .long 3664 mov 0,%i0 ret restore call %g2 nop .long 3665 mov 0,%i0 ret restore call %g2 nop .long 3666 mov 0,%i0 ret restore call %g2 nop .long 3667 mov 0,%i0 ret restore call %g2 nop .long 3668 mov 0,%i0 ret restore call %g2 nop .long 3669 mov 0,%i0 ret restore call %g2 nop .long 3670 mov 0,%i0 ret restore call %g2 nop .long 3671 mov 0,%i0 ret restore call %g2 nop .long 3672 mov 0,%i0 ret restore call %g2 nop .long 3673 mov 0,%i0 ret restore call %g2 nop .long 3674 mov 0,%i0 ret restore call %g2 nop .long 3675 mov 0,%i0 ret restore call %g2 nop .long 3676 mov 0,%i0 ret restore call %g2 nop .long 3677 mov 0,%i0 ret restore call %g2 nop .long 3678 mov 0,%i0 ret restore call %g2 nop .long 3679 mov 0,%i0 ret restore call %g2 nop .long 3680 mov 0,%i0 ret restore call %g2 nop .long 3681 mov 0,%i0 ret restore call %g2 nop .long 3682 mov 0,%i0 ret restore call %g2 nop .long 3683 mov 0,%i0 ret restore call %g2 nop .long 3684 mov 0,%i0 ret restore call %g2 nop .long 3685 mov 0,%i0 ret restore call %g2 nop .long 3686 mov 0,%i0 ret restore call %g2 nop .long 3687 mov 0,%i0 ret restore call %g2 nop .long 3688 mov 0,%i0 ret restore call %g2 nop .long 3689 mov 0,%i0 ret restore call %g2 nop .long 3690 mov 0,%i0 ret restore call %g2 nop .long 3691 mov 0,%i0 ret restore call %g2 nop .long 3692 mov 0,%i0 ret restore call %g2 nop .long 3693 mov 0,%i0 ret restore call %g2 nop .long 3694 mov 0,%i0 ret restore call %g2 nop .long 3695 mov 0,%i0 ret restore call %g2 nop .long 3696 mov 0,%i0 ret restore call %g2 nop .long 3697 mov 0,%i0 ret restore call %g2 nop .long 3698 mov 0,%i0 ret restore call %g2 nop .long 3699 mov 0,%i0 ret restore call %g2 nop .long 3700 mov 0,%i0 ret restore call %g2 nop .long 3701 mov 0,%i0 ret restore call %g2 nop .long 3702 mov 0,%i0 ret restore call %g2 nop .long 3703 mov 0,%i0 ret restore call %g2 nop .long 3704 mov 0,%i0 ret restore call %g2 nop .long 3705 mov 0,%i0 ret restore call %g2 nop .long 3706 mov 0,%i0 ret restore call %g2 nop .long 3707 mov 0,%i0 ret restore call %g2 nop .long 3708 mov 0,%i0 ret restore call %g2 nop .long 3709 mov 0,%i0 ret restore call %g2 nop .long 3710 mov 0,%i0 ret restore call %g2 nop .long 3711 mov 0,%i0 ret restore call %g2 nop .long 3712 mov 0,%i0 ret restore call %g2 nop .long 3713 mov 0,%i0 ret restore call %g2 nop .long 3714 mov 0,%i0 ret restore call %g2 nop .long 3715 mov 0,%i0 ret restore call %g2 nop .long 3716 mov 0,%i0 ret restore call %g2 nop .long 3717 mov 0,%i0 ret restore call %g2 nop .long 3718 mov 0,%i0 ret restore call %g2 nop .long 3719 mov 0,%i0 ret restore call %g2 nop .long 3720 mov 0,%i0 ret restore call %g2 nop .long 3721 mov 0,%i0 ret restore call %g2 nop .long 3722 mov 0,%i0 ret restore call %g2 nop .long 3723 mov 0,%i0 ret restore call %g2 nop .long 3724 mov 0,%i0 ret restore call %g2 nop .long 3725 mov 0,%i0 ret restore call %g2 nop .long 3726 mov 0,%i0 ret restore call %g2 nop .long 3727 mov 0,%i0 ret restore call %g2 nop .long 3728 mov 0,%i0 ret restore call %g2 nop .long 3729 mov 0,%i0 ret restore call %g2 nop .long 3730 mov 0,%i0 ret restore call %g2 nop .long 3731 mov 0,%i0 ret restore call %g2 nop .long 3732 mov 0,%i0 ret restore call %g2 nop .long 3733 mov 0,%i0 ret restore call %g2 nop .long 3734 mov 0,%i0 ret restore call %g2 nop .long 3735 mov 0,%i0 ret restore call %g2 nop .long 3736 mov 0,%i0 ret restore call %g2 nop .long 3737 mov 0,%i0 ret restore call %g2 nop .long 3738 mov 0,%i0 ret restore call %g2 nop .long 3739 mov 0,%i0 ret restore call %g2 nop .long 3740 mov 0,%i0 ret restore call %g2 nop .long 3741 mov 0,%i0 ret restore call %g2 nop .long 3742 mov 0,%i0 ret restore call %g2 nop .long 3743 mov 0,%i0 ret restore call %g2 nop .long 3744 mov 0,%i0 ret restore call %g2 nop .long 3745 mov 0,%i0 ret restore call %g2 nop .long 3746 mov 0,%i0 ret restore call %g2 nop .long 3747 mov 0,%i0 ret restore call %g2 nop .long 3748 mov 0,%i0 ret restore call %g2 nop .long 3749 mov 0,%i0 ret restore call %g2 nop .long 3750 mov 0,%i0 ret restore call %g2 nop .long 3751 mov 0,%i0 ret restore call %g2 nop .long 3752 mov 0,%i0 ret restore call %g2 nop .long 3753 mov 0,%i0 ret restore call %g2 nop .long 3754 mov 0,%i0 ret restore call %g2 nop .long 3755 mov 0,%i0 ret restore call %g2 nop .long 3756 mov 0,%i0 ret restore call %g2 nop .long 3757 mov 0,%i0 ret restore call %g2 nop .long 3758 mov 0,%i0 ret restore call %g2 nop .long 3759 mov 0,%i0 ret restore call %g2 nop .long 3760 mov 0,%i0 ret restore call %g2 nop .long 3761 mov 0,%i0 ret restore call %g2 nop .long 3762 mov 0,%i0 ret restore call %g2 nop .long 3763 mov 0,%i0 ret restore call %g2 nop .long 3764 mov 0,%i0 ret restore call %g2 nop .long 3765 mov 0,%i0 ret restore call %g2 nop .long 3766 mov 0,%i0 ret restore call %g2 nop .long 3767 mov 0,%i0 ret restore call %g2 nop .long 3768 mov 0,%i0 ret restore call %g2 nop .long 3769 mov 0,%i0 ret restore call %g2 nop .long 3770 mov 0,%i0 ret restore call %g2 nop .long 3771 mov 0,%i0 ret restore call %g2 nop .long 3772 mov 0,%i0 ret restore call %g2 nop .long 3773 mov 0,%i0 ret restore call %g2 nop .long 3774 mov 0,%i0 ret restore call %g2 nop .long 3775 mov 0,%i0 ret restore call %g2 nop .long 3776 mov 0,%i0 ret restore call %g2 nop .long 3777 mov 0,%i0 ret restore call %g2 nop .long 3778 mov 0,%i0 ret restore call %g2 nop .long 3779 mov 0,%i0 ret restore call %g2 nop .long 3780 mov 0,%i0 ret restore call %g2 nop .long 3781 mov 0,%i0 ret restore call %g2 nop .long 3782 mov 0,%i0 ret restore call %g2 nop .long 3783 mov 0,%i0 ret restore call %g2 nop .long 3784 mov 0,%i0 ret restore call %g2 nop .long 3785 mov 0,%i0 ret restore call %g2 nop .long 3786 mov 0,%i0 ret restore call %g2 nop .long 3787 mov 0,%i0 ret restore call %g2 nop .long 3788 mov 0,%i0 ret restore call %g2 nop .long 3789 mov 0,%i0 ret restore call %g2 nop .long 3790 mov 0,%i0 ret restore call %g2 nop .long 3791 mov 0,%i0 ret restore call %g2 nop .long 3792 mov 0,%i0 ret restore call %g2 nop .long 3793 mov 0,%i0 ret restore call %g2 nop .long 3794 mov 0,%i0 ret restore call %g2 nop .long 3795 mov 0,%i0 ret restore call %g2 nop .long 3796 mov 0,%i0 ret restore call %g2 nop .long 3797 mov 0,%i0 ret restore call %g2 nop .long 3798 mov 0,%i0 ret restore call %g2 nop .long 3799 mov 0,%i0 ret restore call %g2 nop .long 3800 mov 0,%i0 ret restore call %g2 nop .long 3801 mov 0,%i0 ret restore call %g2 nop .long 3802 mov 0,%i0 ret restore call %g2 nop .long 3803 mov 0,%i0 ret restore call %g2 nop .long 3804 mov 0,%i0 ret restore call %g2 nop .long 3805 mov 0,%i0 ret restore call %g2 nop .long 3806 mov 0,%i0 ret restore call %g2 nop .long 3807 mov 0,%i0 ret restore call %g2 nop .long 3808 mov 0,%i0 ret restore call %g2 nop .long 3809 mov 0,%i0 ret restore call %g2 nop .long 3810 mov 0,%i0 ret restore call %g2 nop .long 3811 mov 0,%i0 ret restore call %g2 nop .long 3812 mov 0,%i0 ret restore call %g2 nop .long 3813 mov 0,%i0 ret restore call %g2 nop .long 3814 mov 0,%i0 ret restore call %g2 nop .long 3815 mov 0,%i0 ret restore call %g2 nop .long 3816 mov 0,%i0 ret restore call %g2 nop .long 3817 mov 0,%i0 ret restore call %g2 nop .long 3818 mov 0,%i0 ret restore call %g2 nop .long 3819 mov 0,%i0 ret restore call %g2 nop .long 3820 mov 0,%i0 ret restore call %g2 nop .long 3821 mov 0,%i0 ret restore call %g2 nop .long 3822 mov 0,%i0 ret restore call %g2 nop .long 3823 mov 0,%i0 ret restore call %g2 nop .long 3824 mov 0,%i0 ret restore call %g2 nop .long 3825 mov 0,%i0 ret restore call %g2 nop .long 3826 mov 0,%i0 ret restore call %g2 nop .long 3827 mov 0,%i0 ret restore call %g2 nop .long 3828 mov 0,%i0 ret restore call %g2 nop .long 3829 mov 0,%i0 ret restore call %g2 nop .long 3830 mov 0,%i0 ret restore call %g2 nop .long 3831 mov 0,%i0 ret restore call %g2 nop .long 3832 mov 0,%i0 ret restore call %g2 nop .long 3833 mov 0,%i0 ret restore call %g2 nop .long 3834 mov 0,%i0 ret restore call %g2 nop .long 3835 mov 0,%i0 ret restore call %g2 nop .long 3836 mov 0,%i0 ret restore call %g2 nop .long 3837 mov 0,%i0 ret restore call %g2 nop .long 3838 mov 0,%i0 ret restore call %g2 nop .long 3839 mov 0,%i0 ret restore call %g2 nop .long 3840 mov 0,%i0 ret restore call %g2 nop .long 3841 mov 0,%i0 ret restore call %g2 nop .long 3842 mov 0,%i0 ret restore call %g2 nop .long 3843 mov 0,%i0 ret restore call %g2 nop .long 3844 mov 0,%i0 ret restore call %g2 nop .long 3845 mov 0,%i0 ret restore call %g2 nop .long 3846 mov 0,%i0 ret restore call %g2 nop .long 3847 mov 0,%i0 ret restore call %g2 nop .long 3848 mov 0,%i0 ret restore call %g2 nop .long 3849 mov 0,%i0 ret restore call %g2 nop .long 3850 mov 0,%i0 ret restore call %g2 nop .long 3851 mov 0,%i0 ret restore call %g2 nop .long 3852 mov 0,%i0 ret restore call %g2 nop .long 3853 mov 0,%i0 ret restore call %g2 nop .long 3854 mov 0,%i0 ret restore call %g2 nop .long 3855 mov 0,%i0 ret restore call %g2 nop .long 3856 mov 0,%i0 ret restore call %g2 nop .long 3857 mov 0,%i0 ret restore call %g2 nop .long 3858 mov 0,%i0 ret restore call %g2 nop .long 3859 mov 0,%i0 ret restore call %g2 nop .long 3860 mov 0,%i0 ret restore call %g2 nop .long 3861 mov 0,%i0 ret restore call %g2 nop .long 3862 mov 0,%i0 ret restore call %g2 nop .long 3863 mov 0,%i0 ret restore call %g2 nop .long 3864 mov 0,%i0 ret restore call %g2 nop .long 3865 mov 0,%i0 ret restore call %g2 nop .long 3866 mov 0,%i0 ret restore call %g2 nop .long 3867 mov 0,%i0 ret restore call %g2 nop .long 3868 mov 0,%i0 ret restore call %g2 nop .long 3869 mov 0,%i0 ret restore call %g2 nop .long 3870 mov 0,%i0 ret restore call %g2 nop .long 3871 mov 0,%i0 ret restore call %g2 nop .long 3872 mov 0,%i0 ret restore call %g2 nop .long 3873 mov 0,%i0 ret restore call %g2 nop .long 3874 mov 0,%i0 ret restore call %g2 nop .long 3875 mov 0,%i0 ret restore call %g2 nop .long 3876 mov 0,%i0 ret restore call %g2 nop .long 3877 mov 0,%i0 ret restore call %g2 nop .long 3878 mov 0,%i0 ret restore call %g2 nop .long 3879 mov 0,%i0 ret restore call %g2 nop .long 3880 mov 0,%i0 ret restore call %g2 nop .long 3881 mov 0,%i0 ret restore call %g2 nop .long 3882 mov 0,%i0 ret restore call %g2 nop .long 3883 mov 0,%i0 ret restore call %g2 nop .long 3884 mov 0,%i0 ret restore call %g2 nop .long 3885 mov 0,%i0 ret restore call %g2 nop .long 3886 mov 0,%i0 ret restore call %g2 nop .long 3887 mov 0,%i0 ret restore call %g2 nop .long 3888 mov 0,%i0 ret restore call %g2 nop .long 3889 mov 0,%i0 ret restore call %g2 nop .long 3890 mov 0,%i0 ret restore call %g2 nop .long 3891 mov 0,%i0 ret restore call %g2 nop .long 3892 mov 0,%i0 ret restore call %g2 nop .long 3893 mov 0,%i0 ret restore call %g2 nop .long 3894 mov 0,%i0 ret restore call %g2 nop .long 3895 mov 0,%i0 ret restore call %g2 nop .long 3896 mov 0,%i0 ret restore call %g2 nop .long 3897 mov 0,%i0 ret restore call %g2 nop .long 3898 mov 0,%i0 ret restore call %g2 nop .long 3899 mov 0,%i0 ret restore call %g2 nop .long 3900 mov 0,%i0 ret restore call %g2 nop .long 3901 mov 0,%i0 ret restore call %g2 nop .long 3902 mov 0,%i0 ret restore call %g2 nop .long 3903 mov 0,%i0 ret restore call %g2 nop .long 3904 mov 0,%i0 ret restore call %g2 nop .long 3905 mov 0,%i0 ret restore call %g2 nop .long 3906 mov 0,%i0 ret restore call %g2 nop .long 3907 mov 0,%i0 ret restore call %g2 nop .long 3908 mov 0,%i0 ret restore call %g2 nop .long 3909 mov 0,%i0 ret restore call %g2 nop .long 3910 mov 0,%i0 ret restore call %g2 nop .long 3911 mov 0,%i0 ret restore call %g2 nop .long 3912 mov 0,%i0 ret restore call %g2 nop .long 3913 mov 0,%i0 ret restore call %g2 nop .long 3914 mov 0,%i0 ret restore call %g2 nop .long 3915 mov 0,%i0 ret restore call %g2 nop .long 3916 mov 0,%i0 ret restore call %g2 nop .long 3917 mov 0,%i0 ret restore call %g2 nop .long 3918 mov 0,%i0 ret restore call %g2 nop .long 3919 mov 0,%i0 ret restore call %g2 nop .long 3920 mov 0,%i0 ret restore call %g2 nop .long 3921 mov 0,%i0 ret restore call %g2 nop .long 3922 mov 0,%i0 ret restore call %g2 nop .long 3923 mov 0,%i0 ret restore call %g2 nop .long 3924 mov 0,%i0 ret restore call %g2 nop .long 3925 mov 0,%i0 ret restore call %g2 nop .long 3926 mov 0,%i0 ret restore call %g2 nop .long 3927 mov 0,%i0 ret restore call %g2 nop .long 3928 mov 0,%i0 ret restore call %g2 nop .long 3929 mov 0,%i0 ret restore call %g2 nop .long 3930 mov 0,%i0 ret restore call %g2 nop .long 3931 mov 0,%i0 ret restore call %g2 nop .long 3932 mov 0,%i0 ret restore call %g2 nop .long 3933 mov 0,%i0 ret restore call %g2 nop .long 3934 mov 0,%i0 ret restore call %g2 nop .long 3935 mov 0,%i0 ret restore call %g2 nop .long 3936 mov 0,%i0 ret restore call %g2 nop .long 3937 mov 0,%i0 ret restore call %g2 nop .long 3938 mov 0,%i0 ret restore call %g2 nop .long 3939 mov 0,%i0 ret restore call %g2 nop .long 3940 mov 0,%i0 ret restore call %g2 nop .long 3941 mov 0,%i0 ret restore call %g2 nop .long 3942 mov 0,%i0 ret restore call %g2 nop .long 3943 mov 0,%i0 ret restore call %g2 nop .long 3944 mov 0,%i0 ret restore call %g2 nop .long 3945 mov 0,%i0 ret restore call %g2 nop .long 3946 mov 0,%i0 ret restore call %g2 nop .long 3947 mov 0,%i0 ret restore call %g2 nop .long 3948 mov 0,%i0 ret restore call %g2 nop .long 3949 mov 0,%i0 ret restore call %g2 nop .long 3950 mov 0,%i0 ret restore call %g2 nop .long 3951 mov 0,%i0 ret restore call %g2 nop .long 3952 mov 0,%i0 ret restore call %g2 nop .long 3953 mov 0,%i0 ret restore call %g2 nop .long 3954 mov 0,%i0 ret restore call %g2 nop .long 3955 mov 0,%i0 ret restore call %g2 nop .long 3956 mov 0,%i0 ret restore call %g2 nop .long 3957 mov 0,%i0 ret restore call %g2 nop .long 3958 mov 0,%i0 ret restore call %g2 nop .long 3959 mov 0,%i0 ret restore call %g2 nop .long 3960 mov 0,%i0 ret restore call %g2 nop .long 3961 mov 0,%i0 ret restore call %g2 nop .long 3962 mov 0,%i0 ret restore call %g2 nop .long 3963 mov 0,%i0 ret restore call %g2 nop .long 3964 mov 0,%i0 ret restore call %g2 nop .long 3965 mov 0,%i0 ret restore call %g2 nop .long 3966 mov 0,%i0 ret restore call %g2 nop .long 3967 mov 0,%i0 ret restore call %g2 nop .long 3968 mov 0,%i0 ret restore call %g2 nop .long 3969 mov 0,%i0 ret restore call %g2 nop .long 3970 mov 0,%i0 ret restore call %g2 nop .long 3971 mov 0,%i0 ret restore call %g2 nop .long 3972 mov 0,%i0 ret restore call %g2 nop .long 3973 mov 0,%i0 ret restore call %g2 nop .long 3974 mov 0,%i0 ret restore call %g2 nop .long 3975 mov 0,%i0 ret restore call %g2 nop .long 3976 mov 0,%i0 ret restore call %g2 nop .long 3977 mov 0,%i0 ret restore call %g2 nop .long 3978 mov 0,%i0 ret restore call %g2 nop .long 3979 mov 0,%i0 ret restore call %g2 nop .long 3980 mov 0,%i0 ret restore call %g2 nop .long 3981 mov 0,%i0 ret restore call %g2 nop .long 3982 mov 0,%i0 ret restore call %g2 nop .long 3983 mov 0,%i0 ret restore call %g2 nop .long 3984 mov 0,%i0 ret restore call %g2 nop .long 3985 mov 0,%i0 ret restore call %g2 nop .long 3986 mov 0,%i0 ret restore call %g2 nop .long 3987 mov 0,%i0 ret restore call %g2 nop .long 3988 mov 0,%i0 ret restore call %g2 nop .long 3989 mov 0,%i0 ret restore call %g2 nop .long 3990 mov 0,%i0 ret restore call %g2 nop .long 3991 mov 0,%i0 ret restore call %g2 nop .long 3992 mov 0,%i0 ret restore call %g2 nop .long 3993 mov 0,%i0 ret restore call %g2 nop .long 3994 mov 0,%i0 ret restore call %g2 nop .long 3995 mov 0,%i0 ret restore call %g2 nop .long 3996 mov 0,%i0 ret restore call %g2 nop .long 3997 mov 0,%i0 ret restore call %g2 nop .long 3998 mov 0,%i0 ret restore call %g2 nop .long 3999 mov 0,%i0 ret restore call %g2 nop .long 4000 mov 0,%i0 ret restore call %g2 nop .long 4001 mov 0,%i0 ret restore call %g2 nop .long 4002 mov 0,%i0 ret restore call %g2 nop .long 4003 mov 0,%i0 ret restore call %g2 nop .long 4004 mov 0,%i0 ret restore call %g2 nop .long 4005 mov 0,%i0 ret restore call %g2 nop .long 4006 mov 0,%i0 ret restore call %g2 nop .long 4007 mov 0,%i0 ret restore call %g2 nop .long 4008 mov 0,%i0 ret restore call %g2 nop .long 4009 mov 0,%i0 ret restore call %g2 nop .long 4010 mov 0,%i0 ret restore call %g2 nop .long 4011 mov 0,%i0 ret restore call %g2 nop .long 4012 mov 0,%i0 ret restore call %g2 nop .long 4013 mov 0,%i0 ret restore call %g2 nop .long 4014 mov 0,%i0 ret restore call %g2 nop .long 4015 mov 0,%i0 ret restore call %g2 nop .long 4016 mov 0,%i0 ret restore call %g2 nop .long 4017 mov 0,%i0 ret restore call %g2 nop .long 4018 mov 0,%i0 ret restore call %g2 nop .long 4019 mov 0,%i0 ret restore call %g2 nop .long 4020 mov 0,%i0 ret restore call %g2 nop .long 4021 mov 0,%i0 ret restore call %g2 nop .long 4022 mov 0,%i0 ret restore call %g2 nop .long 4023 mov 0,%i0 ret restore call %g2 nop .long 4024 mov 0,%i0 ret restore call %g2 nop .long 4025 mov 0,%i0 ret restore call %g2 nop .long 4026 mov 0,%i0 ret restore call %g2 nop .long 4027 mov 0,%i0 ret restore call %g2 nop .long 4028 mov 0,%i0 ret restore call %g2 nop .long 4029 mov 0,%i0 ret restore call %g2 nop .long 4030 mov 0,%i0 ret restore call %g2 nop .long 4031 mov 0,%i0 ret restore call %g2 nop .long 4032 mov 0,%i0 ret restore call %g2 nop .long 4033 mov 0,%i0 ret restore call %g2 nop .long 4034 mov 0,%i0 ret restore call %g2 nop .long 4035 mov 0,%i0 ret restore call %g2 nop .long 4036 mov 0,%i0 ret restore call %g2 nop .long 4037 mov 0,%i0 ret restore call %g2 nop .long 4038 mov 0,%i0 ret restore call %g2 nop .long 4039 mov 0,%i0 ret restore call %g2 nop .long 4040 mov 0,%i0 ret restore call %g2 nop .long 4041 mov 0,%i0 ret restore call %g2 nop .long 4042 mov 0,%i0 ret restore call %g2 nop .long 4043 mov 0,%i0 ret restore call %g2 nop .long 4044 mov 0,%i0 ret restore call %g2 nop .long 4045 mov 0,%i0 ret restore call %g2 nop .long 4046 mov 0,%i0 ret restore call %g2 nop .long 4047 mov 0,%i0 ret restore call %g2 nop .long 4048 mov 0,%i0 ret restore call %g2 nop .long 4049 mov 0,%i0 ret restore call %g2 nop .long 4050 mov 0,%i0 ret restore call %g2 nop .long 4051 mov 0,%i0 ret restore call %g2 nop .long 4052 mov 0,%i0 ret restore call %g2 nop .long 4053 mov 0,%i0 ret restore call %g2 nop .long 4054 mov 0,%i0 ret restore call %g2 nop .long 4055 mov 0,%i0 ret restore call %g2 nop .long 4056 mov 0,%i0 ret restore call %g2 nop .long 4057 mov 0,%i0 ret restore call %g2 nop .long 4058 mov 0,%i0 ret restore call %g2 nop .long 4059 mov 0,%i0 ret restore call %g2 nop .long 4060 mov 0,%i0 ret restore call %g2 nop .long 4061 mov 0,%i0 ret restore call %g2 nop .long 4062 mov 0,%i0 ret restore call %g2 nop .long 4063 mov 0,%i0 ret restore call %g2 nop .long 4064 mov 0,%i0 ret restore call %g2 nop .long 4065 mov 0,%i0 ret restore call %g2 nop .long 4066 mov 0,%i0 ret restore call %g2 nop .long 4067 mov 0,%i0 ret restore call %g2 nop .long 4068 mov 0,%i0 ret restore call %g2 nop .long 4069 mov 0,%i0 ret restore call %g2 nop .long 4070 mov 0,%i0 ret restore call %g2 nop .long 4071 mov 0,%i0 ret restore call %g2 nop .long 4072 mov 0,%i0 ret restore call %g2 nop .long 4073 mov 0,%i0 ret restore call %g2 nop .long 4074 mov 0,%i0 ret restore call %g2 nop .long 4075 mov 0,%i0 ret restore call %g2 nop .long 4076 mov 0,%i0 ret restore call %g2 nop .long 4077 mov 0,%i0 ret restore call %g2 nop .long 4078 mov 0,%i0 ret restore call %g2 nop .long 4079 mov 0,%i0 ret restore call %g2 nop .long 4080 mov 0,%i0 ret restore call %g2 nop .long 4081 mov 0,%i0 ret restore call %g2 nop .long 4082 mov 0,%i0 ret restore call %g2 nop .long 4083 mov 0,%i0 ret restore call %g2 nop .long 4084 mov 0,%i0 ret restore call %g2 nop .long 4085 mov 0,%i0 ret restore call %g2 nop .long 4086 mov 0,%i0 ret restore call %g2 nop .long 4087 mov 0,%i0 ret restore call %g2 nop .long 4088 mov 0,%i0 ret restore call %g2 nop .long 4089 mov 0,%i0 ret restore call %g2 nop .long 4090 mov 0,%i0 ret restore call %g2 nop .long 4091 mov 0,%i0 ret restore call %g2 nop .long 4092 mov 0,%i0 ret restore call %g2 nop .long 4093 mov 0,%i0 ret restore call %g2 nop .long 4094 mov 0,%i0 ret restore call %g2 nop .long 4095 mov 0,%i0 ret restore ld [%i0+24], %g3 .LL54: ld [%i0+4], %l0 ld [%g3], %o0 ld [%g3+4], %o1 ld [%g3+8], %o2 ld [%g3+12], %o3 ld [%g3+16], %o4 call %l0, 0 ld [%g3+20], %o5 nop ld [%i0+12], %g3 cmp %g3, 1 be .LL11 mov %o0, %o7 cmp %g3, 2 be .LL52 cmp %g3, 3 be .LL52 cmp %g3, 4 be .LL52 cmp %g3, 5 be .LL51 cmp %g3, 6 be .LL51 cmp %g3, 7 be .LL49 cmp %g3, 8 be .LL49 cmp %g3, 9 be .LL49 cmp %g3, 10 be .LL49 add %g3, -11, %g3 cmp %g3, 1 bgu,a .LL30 ld [%i0+12], %g3 ld [%i0+8], %g3 st %o0, [%g3] b .LL11 st %o1, [%g3+4] .LL30: cmp %g3, 13 bne,a .LL32 ld [%i0+12], %g3 ld [%i0], %g3 andcc %g3, 32, %g0 be .LL33 ld [%i0+8], %g3 fdtos %f0, %f0 .LL33: b .LL11 st %f0, [%g3] .LL32: cmp %g3, 14 bne,a .LL36 ld [%i0+12], %g3 ld [%i0+8], %g3 b .LL11 std %f0, [%g3] .LL36: cmp %g3, 15 be,a .LL55 ld [%i0+8], %g3 ld [%i0+12], %g3 cmp %g3, 16 bne .LL11 nop ld [%i0], %g3 andcc %g3, 2, %g0 be .LL11 nop ld [%i0+16], %g3 cmp %g3, 1 bne .LL42 cmp %g3, 2 .LL52: ld [%i0+8], %g3 b .LL11 stb %o7, [%g3] .LL42: bne,a .LL44 ld [%i0+16], %g3 .LL51: ld [%i0+8], %g3 b .LL11 sth %o7, [%g3] .LL44: cmp %g3, 4 bne .LL11 nop .LL49: ld [%i0+8], %g3 .LL55: st %o7, [%g3] .LL11: ret restore %g0, 0, %o0 .LLfe1: .size avcall_call,.LLfe1-avcall_call .ident "GCC: (GNU) 3.1" libffcall-2.5/avcall/avcall-s390-macro.S0000664000000000000000000000355714662622067014637 00000000000000 .file "avcall-s390.c" .text .align 4 .globl avcall_call .type avcall_call,@function avcall_call: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long 1 .LTN0_0: lr %r14,%r15 ahi %r15,-96 lr %r10,%r2 lr %r11,%r15 lhi %r2,0 st %r14,0(%r15) l %r1,0(%r15) ahi %r15,-1032 l %r3,20(%r10) l %r4,24(%r10) sr %r3,%r4 sra %r3,2 la %r5,96(%r15) st %r1,0(%r15) cr %r2,%r3 l %r0,64(%r10) jhe .L53 .L6: lr %r1,%r2 sll %r1,2 ahi %r2,1 cr %r2,%r3 l %r9,0(%r1,%r4) st %r9,0(%r1,%r5) jl .L6 .L53: ltr %r0,%r0 je .L7 l %r1,72(%r10) tml %r1,1 je .L8 ld %f0,88(%r10) .L9: cl %r0,.LC0-.LT0_0(%r13) jle .L7 tml %r1,2 je .L12 ld %f2,96(%r10) .L7: l %r1,4(%r10) l %r4,52(%r10) l %r2,44(%r10) l %r3,48(%r10) l %r5,56(%r10) l %r6,60(%r10) basr %r14,%r1 l %r4,12(%r10) chi %r4,1 je .L16 chi %r4,2 je .L56 chi %r4,3 je .L56 chi %r4,4 je .L56 chi %r4,5 je .L55 chi %r4,6 je .L55 chi %r4,7 je .L62 chi %r4,8 je .L62 chi %r4,9 je .L62 chi %r4,10 je .L62 lr %r1,%r4 ahi %r1,-11 cl %r1,.LC0-.LT0_0(%r13) jle .L61 chi %r4,13 je .L63 chi %r4,14 je .L64 chi %r4,15 je .L62 chi %r4,16 je .L65 .L16: lhi %r2,0 l %r4,152(%r11) lm %r6,%r15,120(%r11) br %r4 .L65: tm 2(%r10),2 je .L16 l %r1,16(%r10) chi %r1,1 je .L56 chi %r1,2 je .L55 chi %r1,4 je .L62 chi %r1,8 jne .L16 .L61: l %r1,8(%r10) st %r3,4(%r1) .L54: st %r2,0(%r1) j .L16 .L62: l %r1,8(%r10) j .L54 .L55: l %r1,8(%r10) sth %r2,0(%r1) j .L16 .L56: l %r1,8(%r10) stc %r2,0(%r1) j .L16 .L64: l %r1,8(%r10) std %f0,0(%r1) j .L16 .L63: l %r1,8(%r10) ste %f0,0(%r1) j .L16 .L12: tm 71(%r10),2 je .L7 le %f2,80(%r10) j .L7 .L8: tm 71(%r10),1 je .L9 le %f0,76(%r10) j .L9 .Lfe1: .size avcall_call,.Lfe1-avcall_call #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-mips64eb-linux.s0000664000000000000000000002312514662622066015660 00000000000000 .file 1 "avcall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call .type avcall_call, @function avcall_call: .frame $fp,32,$31 # vars= 0, regs= 4/0, args= 0, gp= 0 .mask 0xd0010000,-8 .fmask 0x00000000,0 ld $2,40($4) ld $12,48($4) lw $3,68($4) daddiu $sp,$sp,-32 dsubu $6,$2,$12 dsra $6,$6,3 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp daddiu $sp,$sp,-2064 move $16,$4 sll $6,$6,0 .set noreorder .set nomacro beq $3,$0,.L2 move $2,$sp .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L123 andi $4,$3,0x2 .set macro .set reorder #APP # 77 "avcall-mips64.c" 1 lwc1 $f12,76($16) # 0 "" 2 #NO_APP andi $4,$3,0x2 .L123: .set noreorder .set nomacro beq $4,$0,.L124 andi $4,$3,0x4 .set macro .set reorder #APP # 79 "avcall-mips64.c" 1 lwc1 $f13,80($16) # 0 "" 2 #NO_APP andi $4,$3,0x4 .L124: .set noreorder .set nomacro beq $4,$0,.L125 andi $4,$3,0x8 .set macro .set reorder #APP # 81 "avcall-mips64.c" 1 lwc1 $f14,84($16) # 0 "" 2 #NO_APP andi $4,$3,0x8 .L125: .set noreorder .set nomacro beq $4,$0,.L126 andi $4,$3,0x10 .set macro .set reorder #APP # 83 "avcall-mips64.c" 1 lwc1 $f15,88($16) # 0 "" 2 #NO_APP andi $4,$3,0x10 .L126: .set noreorder .set nomacro beq $4,$0,.L127 andi $4,$3,0x20 .set macro .set reorder #APP # 85 "avcall-mips64.c" 1 lwc1 $f16,92($16) # 0 "" 2 #NO_APP andi $4,$3,0x20 .L127: .set noreorder .set nomacro beq $4,$0,.L128 andi $4,$3,0x40 .set macro .set reorder #APP # 87 "avcall-mips64.c" 1 lwc1 $f17,96($16) # 0 "" 2 #NO_APP andi $4,$3,0x40 .L128: .set noreorder .set nomacro beql $4,$0,.L129 andi $3,$3,0x80 .set macro .set reorder #APP # 89 "avcall-mips64.c" 1 lwc1 $f18,100($16) # 0 "" 2 #NO_APP andi $3,$3,0x80 .L129: bne $3,$0,.L116 .L2: lw $3,72($16) .L122: .set noreorder .set nomacro beql $3,$0,.L121 slt $3,$6,9 .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L130 andi $4,$3,0x2 .set macro .set reorder #APP # 97 "avcall-mips64.c" 1 ldc1 $f12,0($12) # 0 "" 2 #NO_APP andi $4,$3,0x2 .L130: .set noreorder .set nomacro beq $4,$0,.L131 andi $4,$3,0x4 .set macro .set reorder #APP # 99 "avcall-mips64.c" 1 ldc1 $f13,8($12) # 0 "" 2 #NO_APP andi $4,$3,0x4 .L131: .set noreorder .set nomacro beq $4,$0,.L132 andi $4,$3,0x8 .set macro .set reorder #APP # 101 "avcall-mips64.c" 1 ldc1 $f14,16($12) # 0 "" 2 #NO_APP andi $4,$3,0x8 .L132: .set noreorder .set nomacro beq $4,$0,.L133 andi $4,$3,0x10 .set macro .set reorder #APP # 103 "avcall-mips64.c" 1 ldc1 $f15,24($12) # 0 "" 2 #NO_APP andi $4,$3,0x10 .L133: .set noreorder .set nomacro beq $4,$0,.L134 andi $4,$3,0x20 .set macro .set reorder #APP # 105 "avcall-mips64.c" 1 ldc1 $f16,32($12) # 0 "" 2 #NO_APP andi $4,$3,0x20 .L134: .set noreorder .set nomacro beq $4,$0,.L135 andi $4,$3,0x40 .set macro .set reorder #APP # 107 "avcall-mips64.c" 1 ldc1 $f17,40($12) # 0 "" 2 #NO_APP andi $4,$3,0x40 .L135: .set noreorder .set nomacro beql $4,$0,.L136 andi $3,$3,0x80 .set macro .set reorder #APP # 109 "avcall-mips64.c" 1 ldc1 $f18,48($12) # 0 "" 2 #NO_APP andi $3,$3,0x80 .L136: bne $3,$0,.L117 slt $3,$6,9 .L121: .set noreorder .set nomacro bne $3,$0,.L22 daddiu $4,$12,64 .set macro .set reorder li $3,8 # 0x8 .align 3 .L21: ld $5,0($4) addiu $3,$3,1 daddiu $4,$4,8 sd $5,0($2) .set noreorder .set nomacro bne $6,$3,.L21 daddiu $2,$2,8 .set macro .set reorder .L22: #APP # 118 "avcall-mips64.c" 1 ld $4,0($12) # 0 "" 2 # 119 "avcall-mips64.c" 1 ld $5,8($12) # 0 "" 2 # 120 "avcall-mips64.c" 1 ld $6,16($12) # 0 "" 2 # 121 "avcall-mips64.c" 1 ld $7,24($12) # 0 "" 2 # 122 "avcall-mips64.c" 1 ld $8,32($12) # 0 "" 2 # 123 "avcall-mips64.c" 1 ld $9,40($12) # 0 "" 2 # 124 "avcall-mips64.c" 1 ld $10,48($12) # 0 "" 2 # 125 "avcall-mips64.c" 1 ld $11,56($12) # 0 "" 2 #NO_APP ld $25,8($16) jalr $25 lw $4,24($16) li $5,1 # 0x1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,10 # 0xa .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,11 # 0xb .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L118 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,16 # 0x10 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L137 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 ld $4,32($16) .set macro .set reorder ld $3,32($16) li $4,1 # 0x1 .set noreorder .set nomacro beq $3,$4,.L106 li $4,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L108 li $4,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L111 li $4,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L138 ld $3,16($16) .set macro .set reorder .L19: move $sp,$fp .L137: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L117: #APP # 111 "avcall-mips64.c" 1 ldc1 $f19,56($12) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L121 slt $3,$6,9 .set macro .set reorder .align 3 .L116: #APP # 91 "avcall-mips64.c" 1 lwc1 $f19,104($16) # 0 "" 2 #NO_APP .set noreorder .set nomacro b .L122 lw $3,72($16) .set macro .set reorder .align 3 .L106: ld $3,16($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L111: ld $3,16($16) .set noreorder .set nomacro b .L19 sw $2,0($3) .set macro .set reorder .align 3 .L108: ld $3,16($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: ld $3,16($16) .align 3 .L138: sd $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L119: ld $2,16($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L118: ld $2,16($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: daddiu $5,$4,-1 sltu $5,$5,16 .set noreorder .set nomacro beq $5,$0,.L19 sltu $7,$4,9 .set macro .set reorder ld $6,16($16) li $8,-8 # 0xfffffffffffffff8 andi $5,$6,0x7 daddu $4,$4,$5 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$4,9 .set noreorder .set nomacro beq $3,$0,.L42 subu $8,$0,$5 .set macro .set reorder subu $3,$0,$5 sll $7,$4,0 sll $3,$3,3 ld $8,0($6) addiu $3,$3,63 subu $7,$0,$7 li $4,2 # 0x2 dsll $4,$4,$3 sll $7,$7,3 sll $5,$5,3 li $3,1 # 0x1 dsll $3,$3,$7 dsra $2,$2,$5 dsubu $3,$4,$3 xor $2,$2,$8 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,0($6) .set macro .set reorder .L41: subu $9,$0,$5 ld $11,0($6) sll $10,$9,3 addiu $7,$10,63 sll $5,$5,3 li $8,2 # 0x2 dsll $8,$8,$7 dsra $7,$2,$5 daddiu $8,$8,-1 xor $7,$7,$11 and $7,$8,$7 xor $7,$7,$11 sltu $8,$4,17 .set noreorder .set nomacro bne $8,$0,.L120 sd $7,0($6) .set macro .set reorder ld $9,16($6) sll $4,$4,0 addiu $10,$10,64 subu $4,$0,$4 move $8,$3 sll $4,$4,3 dsll $3,$3,$10 li $7,-1 # 0xffffffffffffffff dsll $4,$7,$4 xor $3,$3,$9 dsll $2,$2,$10 dsra $5,$8,$5 and $3,$4,$3 or $2,$2,$5 xor $3,$3,$9 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $11,0($6) ld $10,8($6) sll $7,$4,0 sll $8,$8,3 sll $5,$5,3 subu $9,$0,$7 addiu $4,$8,63 li $7,2 # 0x2 dsra $3,$2,$5 dsll $4,$7,$4 dsll $2,$2,$8 sll $7,$9,3 li $5,-1 # 0xffffffffffffffff daddiu $4,$4,-1 xor $3,$3,$11 dsll $5,$5,$7 xor $2,$2,$10 and $3,$4,$3 and $2,$5,$2 xor $3,$3,$11 xor $2,$2,$10 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L120: sll $7,$9,2 addiu $7,$7,32 ld $8,8($6) dsll $2,$2,$7 sll $4,$4,0 dsll $7,$2,$7 dsra $3,$3,$5 subu $4,$0,$4 or $3,$7,$3 sll $4,$4,3 li $2,-1 # 0xffffffffffffffff xor $3,$3,$8 dsll $2,$2,$4 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call .ident "GCC: (GNU) 5.4.0" libffcall-2.5/avcall/avcall-riscv32-ilp32d-linux.s0000664000000000000000000000773614662622067016630 00000000000000 .file "avcall-riscv32.c" .option pic .text .align 1 .globl avcall_call .type avcall_call, @function avcall_call: add sp,sp,-32 sw ra,28(sp) sw s0,24(sp) sw s1,20(sp) sw s2,16(sp) sw s3,12(sp) sw s4,8(sp) add s0,sp,32 lw t2,24(a0) lw t0,20(a0) li t3,32 mv s1,a0 sub t0,t0,t2 add sp,sp,-1040 lw ra,40(a0) ble t0,t3,.L2 mv t1,sp sra t6,t0,2 add t4,t2,32 li t3,8 .L3: lw t5,0(t4) add t3,t3,1 add t4,t4,4 sw t5,0(t1) add t1,t1,4 bgt t6,t3,.L3 .L4: li t1,4 lw a0,0(t2) bgt t0,t1,.L79 .L5: beqz ra,.L8 lw t1,48(s1) and t3,t1,1 beqz t3,.L9 fld fa0,88(s1) .L10: li t3,1 bleu ra,t3,.L8 and t3,t1,2 bnez t3,.L80 lw t3,44(s1) and t3,t3,2 beqz t3,.L13 flw fa1,56(s1) .L13: li t3,2 beq ra,t3,.L8 and t3,t1,4 beqz t3,.L14 fld fa2,104(s1) .L15: li t3,3 beq ra,t3,.L8 and t3,t1,8 bnez t3,.L81 lw t3,44(s1) and t3,t3,8 beqz t3,.L17 flw fa3,64(s1) .L17: li t3,4 beq ra,t3,.L8 and t3,t1,16 beqz t3,.L18 fld fa4,120(s1) .L19: li t3,5 beq ra,t3,.L8 and t3,t1,32 beqz t3,.L20 fld fa5,128(s1) .L21: li t3,6 beq ra,t3,.L8 and t3,t1,64 beqz t3,.L22 fld fa6,136(s1) .L23: li t3,7 beq ra,t3,.L8 and t1,t1,128 beqz t1,.L24 fld fa7,144(s1) .L8: lw t1,12(s1) li t3,13 lw t4,4(s1) bne t1,t3,.L25 lw s1,8(s1) jalr t4 fsw fa0,0(s1) .L26: add sp,s0,-32 lw ra,28(sp) li a0,0 lw s0,24(sp) lw s1,20(sp) lw s2,16(sp) lw s3,12(sp) lw s4,8(sp) add sp,sp,32 jr ra .L79: li t1,8 lw a1,4(t2) ble t0,t1,.L5 li t1,12 lw a2,8(t2) ble t0,t1,.L5 li t1,16 lw a3,12(t2) ble t0,t1,.L5 li t1,20 lw a4,16(t2) ble t0,t1,.L5 li t1,24 lw a5,20(t2) ble t0,t1,.L5 li t1,28 lw a6,24(t2) ble t0,t1,.L5 lw a7,28(t2) j .L5 .L9: lw t3,44(s1) and t3,t3,1 beqz t3,.L10 flw fa0,52(s1) j .L10 .L25: li t3,14 beq t1,t3,.L82 jalr t4 lw t1,12(s1) li t4,1 mv t3,a0 beq t1,t4,.L26 li t4,2 beq t1,t4,.L72 li t4,3 beq t1,t4,.L72 li t4,4 beq t1,t4,.L72 li t4,5 beq t1,t4,.L73 li t4,6 beq t1,t4,.L73 li t4,7 beq t1,t4,.L77 li t4,8 beq t1,t4,.L77 li t4,9 beq t1,t4,.L77 li t4,10 beq t1,t4,.L77 add t6,t1,-11 li t4,1 bleu t6,t4,.L83 li t6,15 beq t1,t6,.L77 li t6,16 bne t1,t6,.L26 lw t1,0(s1) and t1,t1,2 beqz t1,.L26 lw s3,16(s1) li t1,7 add t6,s3,-1 bgtu t6,t1,.L26 lw t6,8(s1) li s4,4 and t0,t6,-4 lw t2,0(t0) and t6,t6,3 sll s2,t6,3 sll s1,a0,s2 add t1,s3,t6 sll t4,t4,s2 xor s1,s1,t2 bgtu s3,s4,.L39 bgtu t1,s4,.L40 sll t1,t1,3 add t3,t1,-1 li t1,2 sll t1,t1,t3 sub t1,t1,t4 and t1,t1,s1 xor t1,t1,t2 sw t1,0(t0) j .L26 .L80: fld fa1,96(s1) j .L13 .L82: lw s1,8(s1) jalr t4 fsd fa0,0(s1) j .L26 .L72: lw t1,8(s1) sb t3,0(t1) j .L26 .L2: blez t0,.L5 j .L4 .L14: lw t3,44(s1) and t3,t3,4 beqz t3,.L15 flw fa2,60(s1) j .L15 .L81: fld fa3,112(s1) j .L17 .L73: lw t1,8(s1) sh t3,0(t1) j .L26 .L18: lw t3,44(s1) and t3,t3,16 beqz t3,.L19 flw fa4,68(s1) j .L19 .L77: lw t1,8(s1) sw t3,0(t1) j .L26 .L20: lw t3,44(s1) and t3,t3,32 beqz t3,.L21 flw fa5,72(s1) j .L21 .L22: lw t3,44(s1) and t3,t3,64 beqz t3,.L23 flw fa6,76(s1) j .L23 .L24: lw t1,44(s1) and t1,t1,128 beqz t1,.L8 flw fa7,80(s1) j .L8 .L83: lw t1,8(s1) sw a0,0(t1) sw a1,4(t1) j .L26 .L40: li t5,-8 mul t6,t6,t5 lw s2,4(t0) sll t1,t1,3 add t5,t1,-33 li t1,2 sll t1,t1,t5 sub t4,zero,t4 add t1,t1,-1 and t4,t4,s1 xor t4,t4,t2 sra t3,a0,t6 xor t3,t3,s2 and t1,t1,t3 xor t1,t1,s2 sw t4,0(t0) sw t1,4(t0) j .L26 .L39: sub t4,zero,t4 and t4,t4,s1 xor t4,t4,t2 sw t4,0(t0) li t4,8 sll s1,a1,s2 bleu t1,t4,.L84 li t4,-8 mul t6,t6,t4 sll t1,t1,3 li t2,2 add t1,t1,-65 lw s2,8(t0) sll t1,t2,t1 add t2,t1,-1 add t1,t6,32 sra t4,a1,t1 xor t4,t4,s2 sra t1,a0,t1 and t3,t2,t4 or t1,t1,s1 xor t3,t3,s2 sw t1,4(t0) sw t3,8(t0) j .L26 .L84: li t4,-4 mul t4,t6,t4 sll t1,t1,3 lw t6,4(t0) add t5,t1,-33 li t1,2 sll t1,t1,t5 add t1,t1,-1 add t4,t4,16 sra t3,a0,t4 sra t3,t3,t4 or t3,t3,s1 xor t3,t3,t6 and t1,t1,t3 xor t1,t1,t6 sw t1,4(t0) j .L26 .size avcall_call, .-avcall_call .ident "GCC: (GNU) 7.3.0" libffcall-2.5/avcall/avcall-mips64eb-macro.S0000664000000000000000000002047214662622066015564 00000000000000#include "asm-mips.h" .file 1 "avcall-mips64.c" .text .align 2 .align 3 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,32,$31 .mask 0xd0010000,-8 .fmask 0x00000000,0 ld $2,40($4) ld $12,48($4) lw $3,68($4) daddiu $sp,$sp,-32 dsubu $6,$2,$12 dsra $6,$6,3 sd $fp,16($sp) sd $16,0($sp) sd $31,24($sp) move $fp,$sp daddiu $sp,$sp,-2064 move $16,$4 sll $6,$6,0 .set noreorder .set nomacro beq $3,$0,.L2 move $2,$sp .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L123 andi $4,$3,0x2 .set macro .set reorder lwc1 $f12,76($16) andi $4,$3,0x2 .L123: .set noreorder .set nomacro beq $4,$0,.L124 andi $4,$3,0x4 .set macro .set reorder lwc1 $f13,80($16) andi $4,$3,0x4 .L124: .set noreorder .set nomacro beq $4,$0,.L125 andi $4,$3,0x8 .set macro .set reorder lwc1 $f14,84($16) andi $4,$3,0x8 .L125: .set noreorder .set nomacro beq $4,$0,.L126 andi $4,$3,0x10 .set macro .set reorder lwc1 $f15,88($16) andi $4,$3,0x10 .L126: .set noreorder .set nomacro beq $4,$0,.L127 andi $4,$3,0x20 .set macro .set reorder lwc1 $f16,92($16) andi $4,$3,0x20 .L127: .set noreorder .set nomacro beq $4,$0,.L128 andi $4,$3,0x40 .set macro .set reorder lwc1 $f17,96($16) andi $4,$3,0x40 .L128: .set noreorder .set nomacro beql $4,$0,.L129 andi $3,$3,0x80 .set macro .set reorder lwc1 $f18,100($16) andi $3,$3,0x80 .L129: bne $3,$0,.L116 .L2: lw $3,72($16) .L122: .set noreorder .set nomacro beql $3,$0,.L121 slt $3,$6,9 .set macro .set reorder andi $4,$3,0x1 .set noreorder .set nomacro beq $4,$0,.L130 andi $4,$3,0x2 .set macro .set reorder ldc1 $f12,0($12) andi $4,$3,0x2 .L130: .set noreorder .set nomacro beq $4,$0,.L131 andi $4,$3,0x4 .set macro .set reorder ldc1 $f13,8($12) andi $4,$3,0x4 .L131: .set noreorder .set nomacro beq $4,$0,.L132 andi $4,$3,0x8 .set macro .set reorder ldc1 $f14,16($12) andi $4,$3,0x8 .L132: .set noreorder .set nomacro beq $4,$0,.L133 andi $4,$3,0x10 .set macro .set reorder ldc1 $f15,24($12) andi $4,$3,0x10 .L133: .set noreorder .set nomacro beq $4,$0,.L134 andi $4,$3,0x20 .set macro .set reorder ldc1 $f16,32($12) andi $4,$3,0x20 .L134: .set noreorder .set nomacro beq $4,$0,.L135 andi $4,$3,0x40 .set macro .set reorder ldc1 $f17,40($12) andi $4,$3,0x40 .L135: .set noreorder .set nomacro beql $4,$0,.L136 andi $3,$3,0x80 .set macro .set reorder ldc1 $f18,48($12) andi $3,$3,0x80 .L136: bne $3,$0,.L117 slt $3,$6,9 .L121: .set noreorder .set nomacro bne $3,$0,.L22 daddiu $4,$12,64 .set macro .set reorder li $3,8 .align 3 .L21: ld $5,0($4) addiu $3,$3,1 daddiu $4,$4,8 sd $5,0($2) .set noreorder .set nomacro bne $6,$3,.L21 daddiu $2,$2,8 .set macro .set reorder .L22: ld $4,0($12) ld $5,8($12) ld $6,16($12) ld $7,24($12) ld $8,32($12) ld $9,40($12) ld $10,48($12) ld $11,56($12) ld $25,8($16) jalr $25 lw $4,24($16) li $5,1 .set noreorder .set nomacro beq $4,$5,.L19 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L106 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L108 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L111 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,11 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L118 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L119 li $5,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,.L109 li $5,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,.L137 move $sp,$fp .set macro .set reorder lw $4,0($16) andi $5,$4,0x200 .set noreorder .set nomacro beq $5,$0,.L19 andi $4,$4,0x4 .set macro .set reorder .set noreorder .set nomacro beql $4,$0,.L37 ld $4,32($16) .set macro .set reorder ld $3,32($16) li $4,1 .set noreorder .set nomacro beq $3,$4,.L106 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L108 li $4,4 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,.L111 li $4,8 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,.L138 ld $3,16($16) .set macro .set reorder .L19: move $sp,$fp .L137: ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L117: ldc1 $f19,56($12) .set noreorder .set nomacro b .L121 slt $3,$6,9 .set macro .set reorder .align 3 .L116: lwc1 $f19,104($16) .set noreorder .set nomacro b .L122 lw $3,72($16) .set macro .set reorder .align 3 .L106: ld $3,16($16) sb $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L111: ld $3,16($16) .set noreorder .set nomacro b .L19 sw $2,0($3) .set macro .set reorder .align 3 .L108: ld $3,16($16) sh $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .align 3 .L109: ld $3,16($16) .align 3 .L138: sd $2,0($3) move $sp,$fp ld $31,24($sp) ld $fp,16($sp) ld $16,0($sp) move $2,$0 .set noreorder .set nomacro j $31 daddiu $sp,$sp,32 .set macro .set reorder .L119: ld $2,16($16) .set noreorder .set nomacro b .L19 sdc1 $f0,0($2) .set macro .set reorder .L118: ld $2,16($16) .set noreorder .set nomacro b .L19 swc1 $f0,0($2) .set macro .set reorder .L37: daddiu $5,$4,-1 sltu $5,$5,16 .set noreorder .set nomacro beq $5,$0,.L19 sltu $7,$4,9 .set macro .set reorder ld $6,16($16) li $8,-8 andi $5,$6,0x7 daddu $4,$4,$5 .set noreorder .set nomacro beq $7,$0,.L41 and $6,$6,$8 .set macro .set reorder sltu $3,$4,9 .set noreorder .set nomacro beq $3,$0,.L42 subu $8,$0,$5 .set macro .set reorder subu $3,$0,$5 sll $7,$4,0 sll $3,$3,3 ld $8,0($6) addiu $3,$3,63 subu $7,$0,$7 li $4,2 dsll $4,$4,$3 sll $7,$7,3 sll $5,$5,3 li $3,1 dsll $3,$3,$7 dsra $2,$2,$5 dsubu $3,$4,$3 xor $2,$2,$8 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,0($6) .set macro .set reorder .L41: subu $9,$0,$5 ld $11,0($6) sll $10,$9,3 addiu $7,$10,63 sll $5,$5,3 li $8,2 dsll $8,$8,$7 dsra $7,$2,$5 daddiu $8,$8,-1 xor $7,$7,$11 and $7,$8,$7 xor $7,$7,$11 sltu $8,$4,17 .set noreorder .set nomacro bne $8,$0,.L120 sd $7,0($6) .set macro .set reorder ld $9,16($6) sll $4,$4,0 addiu $10,$10,64 subu $4,$0,$4 move $8,$3 sll $4,$4,3 dsll $3,$3,$10 li $7,-1 dsll $4,$7,$4 xor $3,$3,$9 dsll $2,$2,$10 dsra $5,$8,$5 and $3,$4,$3 or $2,$2,$5 xor $3,$3,$9 sd $2,8($6) .set noreorder .set nomacro b .L19 sd $3,16($6) .set macro .set reorder .L42: ld $11,0($6) ld $10,8($6) sll $7,$4,0 sll $8,$8,3 sll $5,$5,3 subu $9,$0,$7 addiu $4,$8,63 li $7,2 dsra $3,$2,$5 dsll $4,$7,$4 dsll $2,$2,$8 sll $7,$9,3 li $5,-1 daddiu $4,$4,-1 xor $3,$3,$11 dsll $5,$5,$7 xor $2,$2,$10 and $3,$4,$3 and $2,$5,$2 xor $3,$3,$11 xor $2,$2,$10 sd $3,0($6) .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .L120: sll $7,$9,2 addiu $7,$7,32 ld $8,8($6) dsll $2,$2,$7 sll $4,$4,0 dsll $7,$2,$7 dsra $3,$3,$5 subu $4,$0,$4 or $3,$7,$3 sll $4,$4,3 li $2,-1 xor $3,$3,$8 dsll $2,$2,$4 and $2,$3,$2 xor $2,$2,$8 .set noreorder .set nomacro b .L19 sd $2,8($6) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-x86_64.c0000664000000000000000000003635614662613003014011 00000000000000/** Copyright 1993 Bill Triggs Copyright 1995-2021 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . **/ /*---------------------------------------------------------------------- Foreign function interface for an x86_64 (a.k.a. amd64) with gcc using the Unix ABI ('gcc -mabi=sysv'). This calls a C function with an argument list built up using macros defined in avcall.h. x86_64 Argument Passing Conventions on Unix: Documentation is at https://github.com/hjl-tools/x86-psABI/wiki/X86-psABI * Arguments: - Integer or pointer arguments: The first 6 integer or pointer arguments get passed in integer registers (%rdi, %rsi, %rdx, %rcx, %r8, %r9). The remaining ones (as an entire word each) on the stack. - Floating-point arguments: Up to 8 float/double arguments are passed in SSE registers (%xmm0..%xmm7). The remaining ones (as an entire word each) on the stack. - Structure arguments: Structure args are passed as true structures embedded in the argument stack. * Return value: Integers are returned in %rax, %rdx. Float/double values are returned in %xmm0, %xmm1. To return a structure larger than 16 bytes, the called function copies the value to space pointed to by its first argument, and all other arguments are shifted down by one. * Call-used registers: rax,rdx,rcx,rsi,rdi,r8-r11 ----------------------------------------------------------------------*/ #include "avcall-internal.h" #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL)) /*register __avrword iarg1 __asm__("rdi");*/ /*register __avrword iarg2 __asm__("rsi");*/ /*register __avrword iarg3 __asm__("rdx");*/ /*register __avrword iarg4 __asm__("rcx");*/ /*register __avrword iarg5 __asm__("r8");*/ /*register __avrword iarg6 __asm__("r9");*/ register double farg1 __asm__("xmm0"); register double farg2 __asm__("xmm1"); register double farg3 __asm__("xmm2"); register double farg4 __asm__("xmm3"); register double farg5 __asm__("xmm4"); register double farg6 __asm__("xmm5"); register double farg7 __asm__("xmm6"); register double farg8 __asm__("xmm7"); int avcall_call(av_alist* list) { register __avword* sp __asm__("rsp"); /* C names for registers */ /*register __avrword iretreg __asm__("rax");*/ register __avrword iret2reg __asm__("rdx"); register double dret __asm__("xmm0"); __av_alist* l = &AV_LIST_INNER(list); __avword* argframe = __builtin_alloca(__AV_ALIST_WORDS * sizeof(__avword)); /* make room for argument list */ int arglen = l->aptr - l->args; int farglen = l->faptr - l->fargs; __avrword iret, iret2; { int i; for (i = 0; i < arglen; i++) /* push function args onto stack */ argframe[i] = l->args[i]; } /* Call function. It's OK to pass 8 values in SSE registers even if the called function takes less than 8 float/double arguments. Similarly for the integer arguments. */ if (l->rtype == __AVfloat) { *(float*)l->raddr = (*(float(*)())l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3], l->iargs[4], l->iargs[5], farglen > 0 ? l->fargs[0] : 0.0, farglen > 1 ? l->fargs[1] : 0.0, farglen > 2 ? l->fargs[2] : 0.0, farglen > 3 ? l->fargs[3] : 0.0, farglen > 4 ? l->fargs[4] : 0.0, farglen > 5 ? l->fargs[5] : 0.0, farglen > 6 ? l->fargs[6] : 0.0, farglen > 7 ? l->fargs[7] : 0.0); } else if (l->rtype == __AVdouble) { *(double*)l->raddr = (*(double(*)())l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3], l->iargs[4], l->iargs[5], farglen > 0 ? l->fargs[0] : 0.0, farglen > 1 ? l->fargs[1] : 0.0, farglen > 2 ? l->fargs[2] : 0.0, farglen > 3 ? l->fargs[3] : 0.0, farglen > 4 ? l->fargs[4] : 0.0, farglen > 5 ? l->fargs[5] : 0.0, farglen > 6 ? l->fargs[6] : 0.0, farglen > 7 ? l->fargs[7] : 0.0); } else { iret = (*l->func)(l->iargs[0], l->iargs[1], l->iargs[2], l->iargs[3], l->iargs[4], l->iargs[5], farglen > 0 ? l->fargs[0] : 0.0, farglen > 1 ? l->fargs[1] : 0.0, farglen > 2 ? l->fargs[2] : 0.0, farglen > 3 ? l->fargs[3] : 0.0, farglen > 4 ? l->fargs[4] : 0.0, farglen > 5 ? l->fargs[5] : 0.0, farglen > 6 ? l->fargs[6] : 0.0, farglen > 7 ? l->fargs[7] : 0.0); iret2 = iret2reg; /* save return value */ if (l->rtype == __AVvoid) { } else if (l->rtype == __AVchar) { RETURN(char, iret); } else if (l->rtype == __AVschar) { RETURN(signed char, iret); } else if (l->rtype == __AVuchar) { RETURN(unsigned char, iret); } else if (l->rtype == __AVshort) { RETURN(short, iret); } else if (l->rtype == __AVushort) { RETURN(unsigned short, iret); } else if (l->rtype == __AVint) { RETURN(int, iret); } else if (l->rtype == __AVuint) { RETURN(unsigned int, iret); } else if (l->rtype == __AVlong) { RETURN(long, iret); } else if (l->rtype == __AVulong) { RETURN(unsigned long, iret); } else if (l->rtype == __AVlonglong) { RETURN(long long, iret); } else if (l->rtype == __AVulonglong) { RETURN(unsigned long long, iret); } else /* see above if (l->rtype == __AVfloat) { } else if (l->rtype == __AVdouble) { } else */ if (l->rtype == __AVvoidp) { RETURN(void*, iret); } else if (l->rtype == __AVstruct) { if (l->flags & __AV_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (l->rsize > 0 && l->rsize <= 16) { void* raddr = l->raddr; #if 0 /* Unoptimized */ if (l->rsize == 1) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); } else if (l->rsize == 2) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); } else if (l->rsize == 3) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); } else if (l->rsize == 4) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); } else if (l->rsize == 5) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); } else if (l->rsize == 6) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); } else if (l->rsize == 7) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); } else if (l->rsize >= 8 && l->rsize <= 16) { ((unsigned char *)raddr)[0] = (unsigned char)(iret); ((unsigned char *)raddr)[1] = (unsigned char)(iret>>8); ((unsigned char *)raddr)[2] = (unsigned char)(iret>>16); ((unsigned char *)raddr)[3] = (unsigned char)(iret>>24); ((unsigned char *)raddr)[4] = (unsigned char)(iret>>32); ((unsigned char *)raddr)[5] = (unsigned char)(iret>>40); ((unsigned char *)raddr)[6] = (unsigned char)(iret>>48); ((unsigned char *)raddr)[7] = (unsigned char)(iret>>56); if (l->rsize == 8) { } else if (l->rsize == 9) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); } else if (l->rsize == 10) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); } else if (l->rsize == 11) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); } else if (l->rsize == 12) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); } else if (l->rsize == 13) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); } else if (l->rsize == 14) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); } else if (l->rsize == 15) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); } else if (l->rsize == 16) { ((unsigned char *)raddr)[8+0] = (unsigned char)(iret2); ((unsigned char *)raddr)[8+1] = (unsigned char)(iret2>>8); ((unsigned char *)raddr)[8+2] = (unsigned char)(iret2>>16); ((unsigned char *)raddr)[8+3] = (unsigned char)(iret2>>24); ((unsigned char *)raddr)[8+4] = (unsigned char)(iret2>>32); ((unsigned char *)raddr)[8+5] = (unsigned char)(iret2>>40); ((unsigned char *)raddr)[8+6] = (unsigned char)(iret2>>48); ((unsigned char *)raddr)[8+7] = (unsigned char)(iret2>>56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = l->rsize; /* > 0, ≤ 2*sizeof(__avrword) */ __avrword* wordaddr = (__avrword*)((uintptr_t)raddr & ~(uintptr_t)(sizeof(__avrword)-1)); uintptr_t start_offset = (uintptr_t)raddr & (uintptr_t)(sizeof(__avrword)-1); /* ≥ 0, < sizeof(__avrword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__avrword) */ if (count <= sizeof(__avrword)) { /* Use iret. */ if (end_offset <= sizeof(__avrword)) { /* 0 < end_offset ≤ sizeof(__avrword) */ __avrword mask0 = ((__avrword)2 << (end_offset*8-1)) - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; } else { /* sizeof(__avrword) < end_offset < 2*sizeof(__avrword), start_offset > 0 */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; wordaddr[1] ^= (wordaddr[1] ^ (iret >> (sizeof(__avrword)*8-start_offset*8))) & mask1; } } else { /* Use iret, iret2. */ __avrword mask0 = - ((__avrword)1 << (start_offset*8)); wordaddr[0] ^= (wordaddr[0] ^ (iret << (start_offset*8))) & mask0; if (end_offset <= 2*sizeof(__avrword)) { /* sizeof(__avrword) < end_offset ≤ 2*sizeof(__avrword) */ __avrword mask1 = ((__avrword)2 << (end_offset*8-sizeof(__avrword)*8-1)) - 1; wordaddr[1] ^= (wordaddr[1] ^ ((iret >> (sizeof(__avrword)*4-start_offset*4) >> (sizeof(__avrword)*4-start_offset*4)) | (iret2 << (start_offset*8)))) & mask1; } else { /* 2*sizeof(__avrword) < end_offset < 3*sizeof(__avrword), start_offset > 0 */ __avrword mask2 = ((__avrword)2 << (end_offset*8-2*sizeof(__avrword)*8-1)) - 1; wordaddr[1] = (iret >> (sizeof(__avrword)*8-start_offset*8)) | (iret2 << (start_offset*8)); wordaddr[2] ^= (wordaddr[2] ^ (iret2 >> (sizeof(__avrword)*8-start_offset*8))) & mask2; } } #endif } } } } return 0; } libffcall-2.5/avcall/avcall-powerpc64-aix.s0000664000000000000000000000516314662622066015504 00000000000000 .file "avcall-powerpc64.c" .csect .text[PR] .toc .csect .text[PR] .align 2 .align 4 .globl avcall_call .globl .avcall_call .csect avcall_call[DS],3 avcall_call: .llong .avcall_call, TOC[tc0], 0 .csect .text[PR] .avcall_call: mflr 0 std 30,-16(1) std 31,-8(1) mr 30,3 std 0,16(1) stdu 1,-128(1) ld 3,48(3) ld 9,40(30) ld 10,0(1) mr 31,1 subf 9,3,9 stdu 10,-2064(1) sradi 9,9,3 cmpwi 7,9,8 ble 7,L..6 addi 10,9,-9 addi 8,1,112 rldicl 10,10,0,32 addi 9,3,56 addi 10,10,8 addi 8,8,-8 sldi 10,10,3 add 10,3,10 .align 4 L..5: ldu 7,8(9) stdu 7,8(8) cmpld 7,10,9 bne 7,L..5 L..6: ld 10,64(30) addi 9,30,72 subf 9,9,10 sradi 9,9,3 extsw 9,9 cmpwi 7,9,0 ble 7,L..4 cmpwi 7,9,1 beq 7,L..7 cmpwi 7,9,2 beq 7,L..8 cmpwi 7,9,3 beq 7,L..9 cmpwi 7,9,4 beq 7,L..10 cmpwi 7,9,5 beq 7,L..11 cmpwi 7,9,6 beq 7,L..12 cmpwi 7,9,7 beq 7,L..13 cmpwi 7,9,8 beq 7,L..14 cmpwi 7,9,9 beq 7,L..15 cmpwi 7,9,10 beq 7,L..16 cmpwi 7,9,11 beq 7,L..17 cmpwi 7,9,12 beq 7,L..18 lfd 13,168(30) L..18: lfd 12,160(30) L..17: lfd 11,152(30) L..16: lfd 10,144(30) L..15: lfd 9,136(30) L..14: lfd 8,128(30) L..13: lfd 7,120(30) L..12: lfd 6,112(30) L..11: lfd 5,104(30) L..10: lfd 4,96(30) L..9: lfd 3,88(30) L..8: lfd 2,80(30) L..7: lfd 1,72(30) L..4: ld 9,48(3) ld 10,56(3) ld 8,40(3) ld 7,32(3) ld 6,24(3) ld 5,16(3) ld 4,8(3) ld 3,0(3) std 2,40(1) ld 12,8(30) ld 0,0(12) ld 11,16(12) mtctr 0 ld 2,8(12) bctrl ld 2,40(1) lwz 9,24(30) cmplwi 7,9,1 beq 7,L..19 cmplwi 7,9,2 beq 7,L..36 cmplwi 7,9,3 beq 7,L..36 cmplwi 7,9,4 beq 7,L..36 cmplwi 7,9,5 beq 7,L..37 cmplwi 7,9,6 beq 7,L..37 cmplwi 7,9,7 beq 7,L..38 cmplwi 7,9,8 beq 7,L..38 cmplwi 7,9,9 beq 7,L..39 cmplwi 7,9,10 beq 7,L..39 cmplwi 7,9,11 beq 7,L..39 cmplwi 7,9,12 beq 7,L..39 cmplwi 7,9,13 beq 7,L..41 cmplwi 7,9,14 beq 7,L..42 cmplwi 7,9,15 beq 7,L..39 L..19: addi 1,31,128 ld 0,16(1) ld 30,-16(1) li 3,0 ld 31,-8(1) mtlr 0 blr .align 4 L..36: ld 9,16(30) stb 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr L..38: ld 9,16(30) stw 3,0(9) b L..19 .align 4 L..37: ld 9,16(30) sth 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .align 4 L..39: ld 9,16(30) std 3,0(9) addi 1,31,128 li 3,0 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr L..42: ld 9,16(30) stfd 1,0(9) b L..19 L..41: ld 9,16(30) stfs 1,0(9) b L..19 LT..avcall_call: .long 0 .byte 0,0,32,97,128,2,1,0 .long 0 .long LT..avcall_call-.avcall_call .short 11 .byte "avcall_call" .byte 31 .align 2 _section_.text: .csect .data[RW],4 .llong _section_.text libffcall-2.5/avcall/COPYING0000644000000000000000000004335713026317516012502 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/avcall/avcall-i386-macro.S0000664000000000000000000000757114662622065014630 00000000000000#include "asm-i386.h" TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(avcall_call)) DECLARE_FUNCTION(avcall_call) FUNBEGIN(avcall_call) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(edi)) INSN1(push,l ,R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN2(mov,l ,X4 MEM_DISP(eax,20), R(edx)) INSN2(mov,l ,X4 MEM_DISP(eax,24), R(eax)) INSN2(sub,l ,R(eax), R(edx)) INSN2(sar,l ,NUM(2), R(edx)) INSN2(xor,l ,R(esi), R(esi)) INSN2(sub,l ,NUM(1024), R(esp)) INSN2(cmp,l ,R(edx), R(esi)) INSN2(mov,l ,R(esp), R(edi)) INSN1(jge,_ ,L(45)) INSN2(mov,l ,R(eax), R(ecx)) P2ALIGN(2,3) L(6): INSN2(mov,l ,X4 MEM_SHINDEX(ecx,esi,4), R(eax)) INSN2(mov,l ,R(eax),X4 MEM_SHINDEX(edi,esi,4)) INSN1(inc,l ,R(esi)) INSN2(cmp,l ,R(edx), R(esi)) INSN1(jl,_ ,L(6)) L(45): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,12), R(eax)) INSN2(cmp,l ,NUM(13), R(eax)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(14), R(eax)) INSN1(je,_ ,L(56)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN1(call,_ ,INDIR(X4 MEM_DISP(ecx,4))) INSN2(mov,l ,R(eax), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN2(mov,l ,X4 MEM_DISP(eax,12), R(ecx)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(8)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(57)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(58)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(10), R(ecx)) INSN1(je,_ ,L(46)) INSN2(lea,l ,X4 MEM_DISP(ecx,-11), R(eax)) INSN2(cmp,l ,NUM(1), R(eax)) INSN1(jbe,_ ,L(47)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(16), R(ecx)) INSN1(je,_ ,L(59)) P2ALIGN(2,3) L(8): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN2(xor,l ,R(eax), R(eax)) INSN1(pop,l ,R(edi)) leave ret L(59): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(test,b ,NUM(2),X1 MEM_DISP(ecx,1)) INSN1(je,_ ,L(8)) INSN2(mov,l ,X4 MEM_DISP(ecx,16), R(eax)) INSN2(cmp,l ,NUM(1), R(eax)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(2), R(eax)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(4), R(eax)) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(8), R(eax)) INSN1(jne,_ ,L(8)) L(47): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN2(mov,l ,R(esi),X4 MEM(eax)) INSN2(mov,l ,R(edx),X4 MEM_DISP(eax,4)) INSN1(jmp,_ ,L(8)) L(46): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) L(48): INSN2(mov,l ,R(esi),X4 MEM(eax)) INSN1(jmp,_ ,L(8)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) L(49): INSN2(mov,w ,R(si),X2 MEM(eax)) INSN1(jmp,_ ,L(8)) L(50): INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) L(51): INSN2(mov,l ,R(esi), R(edx)) INSN2(mov,b ,R(dl),X1 MEM(eax)) INSN1(jmp,_ ,L(8)) L(52): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN1(jmp,_ ,L(48)) L(58): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) INSN1(jmp,_ ,L(49)) L(53): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN1(jmp,_ ,L(50)) L(57): INSN2(mov,l ,X4 MEM_DISP(eax,8), R(eax)) INSN1(jmp,_ ,L(51)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(eax)) INSN1(call,_ ,INDIR(X4 MEM_DISP(eax,4))) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,X4 MEM_DISP(edx,8), R(eax)) INSN1(fstp,l ,X8 MEM(eax)) INSN1(jmp,_ ,L(8)) L(55): INSN1(call,_ ,INDIR(X4 MEM_DISP(edx,4))) INSN2(mov,l ,X4 MEM_DISP(ebp,8), R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ecx,8), R(eax)) INSN1(fstp,s ,X4 MEM(eax)) INSN1(jmp,_ ,L(8)) L(fe1): FUNEND(avcall_call,L(fe1)-avcall_call) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/avcall/avcall-mipseb-macro.S0000664000000000000000000001013614662622065015405 00000000000000#include "asm-mips.h" .file 1 "avcall-mips.c" .text .align 2 .globl avcall_call .set nomips16 .set nomicromips .ent avcall_call DECLARE_FUNCTION(avcall_call) avcall_call: .frame $fp,40,$31 .mask 0xc0010000,-4 .fmask 0x00000000,0 lw $6,40($4) lw $5,20($4) lw $8,24($4) addiu $sp,$sp,-40 andi $2,$6,0x1 sw $fp,32($sp) sw $16,28($sp) move $fp,$sp sw $31,36($sp) move $16,$4 addiu $sp,$sp,-1032 subu $4,$5,$8 move $3,$sp .set noreorder .set nomacro beq $2,$0,$L2 sra $4,$4,2 .set macro .set reorder l.s $f12,48($16) $L2: lw $2,44($16) andi $7,$2,0x1 .set noreorder .set nomacro beql $7,$0,$L54 andi $6,$6,0x2 .set macro .set reorder l.d $f12,56($16) andi $6,$6,0x2 $L54: .set noreorder .set nomacro beql $6,$0,$L55 andi $2,$2,0x2 .set macro .set reorder l.s $f14,52($16) andi $2,$2,0x2 $L55: .set noreorder .set nomacro beql $2,$0,$L56 slt $4,$4,5 .set macro .set reorder l.d $f14,64($16) slt $4,$4,5 $L56: addiu $2,$8,16 .set noreorder .set nomacro bne $4,$0,$L10 addiu $3,$3,16 .set macro .set reorder $L36: lw $4,0($2) addiu $3,$3,4 addiu $2,$2,4 .set noreorder .set nomacro bne $5,$2,$L36 sw $4,-4($3) .set macro .set reorder $L10: lw $5,4($8) lw $4,0($8) lw $25,4($16) lw $7,12($8) .set noreorder .set nomacro jalr $25 lw $6,8($8) .set macro .set reorder lw $4,12($16) li $5,1 .set noreorder .set nomacro beq $4,$5,$L7 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L47 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L48 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 li $5,10 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L49 addiu $5,$4,-11 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bnel $5,$0,$L51 lw $4,8($16) .set macro .set reorder li $3,13 .set noreorder .set nomacro beq $4,$3,$L52 li $3,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L53 li $3,15 .set macro .set reorder .set noreorder .set nomacro beq $4,$3,$L49 li $3,16 .set macro .set reorder .set noreorder .set nomacro bnel $4,$3,$L57 move $sp,$fp .set macro .set reorder lw $3,0($16) andi $3,$3,0x2 .set noreorder .set nomacro beq $3,$0,$L7 li $4,1 .set macro .set reorder lw $3,16($16) .set noreorder .set nomacro beq $3,$4,$L47 li $4,2 .set macro .set reorder .set noreorder .set nomacro beq $3,$4,$L48 li $4,4 .set macro .set reorder .set noreorder .set nomacro beql $3,$4,$L58 lw $3,8($16) .set macro .set reorder $L7: move $sp,$fp $L57: lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L47: lw $3,8($16) sb $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L49: lw $3,8($16) $L58: sw $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L48: lw $3,8($16) sh $2,0($3) move $sp,$fp lw $31,36($sp) lw $fp,32($sp) lw $16,28($sp) move $2,$0 .set noreorder .set nomacro j $31 addiu $sp,$sp,40 .set macro .set reorder $L51: sw $2,0($4) .set noreorder .set nomacro b $L7 sw $3,4($4) .set macro .set reorder $L52: lw $2,8($16) .set noreorder .set nomacro b $L7 swc1 $f0,0($2) .set macro .set reorder $L53: lw $2,8($16) .set noreorder .set nomacro b $L7 sdc1 $f0,0($2) .set macro .set reorder .end avcall_call .size avcall_call, .-avcall_call libffcall-2.5/avcall/avcall-alist.h0000664000000000000000000002242414662613237014174 00000000000000/* * Copyright 1993-1995 Bill Triggs * Copyright 1995-2022 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _AVCALL_INTERNAL_H #error "Never use directly; include instead." #endif /* The platform indicator symbols (__i386__, etc.) come from - "config.h" when compiling avcall-libapi.c, - the GCC command line options when compiling avcall-$(CPU).c. */ /* These two variants of powerpc ABIs are quite different. */ #if defined(__powerpc__) && !defined(__powerpc64__) #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) #define __powerpc_aix__ 1 #else #define __powerpc_sysv4__ 1 #endif #endif /* The Unix and Windows variants of x86_64 ABIs are quite different. */ #if defined(__x86_64__) #if defined(_WIN32) || defined(__CYGWIN__) #define __x86_64_ms__ 1 #else #define __x86_64_sysv__ 1 #endif #endif /* * Definition of the ‘__av_alist’ type. */ /* Note: This struct must not contain members of type 'long' or 'unsigned long', because in the mingw port we use precompiled code that assumes 'long' is 64-bit whereas avcall-libapi.c is then compiled by a compiler that has a 32-bit 'long' type. */ typedef struct { /* some av_... macros need these flags */ int flags; /* function to be called */ __avrword (*func)(); /* return type, address for the result */ void* raddr; enum __AVtype rtype; uintptr_t rsize; /* current pointer into the args[] array */ __avword* aptr; /* beginning of the args[] array */ __avword* args; #if defined(__hppa__) && !defined(__hppa64__) /* end of the args[] array */ __avword* args_end; #endif /* limit pointer into the args[] array */ __avword* eptr; #if defined(__i386__) && 0 /* Filler word, needed if the numbers of words up to now in this structure */ /* is odd (because on MSVC, alignof(double) = 8, normally = 4). */ __avword filler1; #endif #if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__) /* temporary storage, used to split doubles into two words */ union { double _double; #if defined(__sparc__) && !defined(__sparc64__) long long _longlong; #endif __avword words[2]; } tmp; #endif #if defined(__x86_64_sysv__) #define __AV_IARG_NUM 6 /* store the integer arguments in an extra array */ unsigned int ianum; __avrword iargs[__AV_IARG_NUM]; #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #define __AV_FARG_NUM 2 /* store the floating-point arguments in an extra array */ unsigned int anum; unsigned int fanum; unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif #if defined(__mipsn32__) || defined(__mips64__) /* store the floating-point arguments in an extra array */ int anum; /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */ unsigned int farg_mask; /* bitmask of those entries in farg[] which have a value */ unsigned int darg_mask; /* bitmask of those entries in args[] which have a double value */ float fargs[8]; #endif #if defined(__sparc64__) /* store the floating-point arguments in an extra array */ int anum; /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */ unsigned int darg_mask; /* bitmask of those entries in args[] which have a float or double value */ #endif #if defined(__hppa__) || defined(__hppa64__) unsigned int farg_mask; /* bitmask of those entries in args[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in args[] which have a double value */ #endif #if defined(__armhf__) #define __AV_IARG_NUM 4 /* The first __AV_IARG_NUM integer arguments are passed in registers, even if some floating-point arguments have already been allocated on the stack. */ unsigned int ianum; /* store the floating-point arguments in an extra array */ unsigned int fanum; /* number of fargs[] words that are occupied so far */ unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[16]; double dargs[8]; #endif #if defined(__arm64__) #define __AV_IARG_NUM 8 /* store the integer arguments in an extra array */ unsigned int ianum; __avrword iargs[__AV_IARG_NUM]; #define __AV_FARG_NUM 8 /* store the floating-point arguments in an extra array */ unsigned int fanum; /* number of fargs[] words that are occupied so far */ unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif #if defined(__ia64__) || defined(__x86_64_sysv__) /* store the floating-point arguments in an extra array */ #define __AV_FARG_NUM 8 double* faptr; double fargs[__AV_FARG_NUM]; #endif #if defined(__powerpc__) || defined(__powerpc64__) #if defined(__powerpc_sysv4__) #define __AV_IARG_NUM 8 /* store the integer arguments in an extra array */ unsigned int ianum; __avrword iargs[__AV_IARG_NUM]; #define __AV_FARG_NUM 8 #else #define __AV_FARG_NUM 13 #endif /* store the floating-point arguments in an extra array */ double* faptr; double fargs[__AV_FARG_NUM]; #endif #if defined(__x86_64_ms__) /* store the floating-point arguments in an extra array */ int anum; /* redundant: (LIST).aptr = &(LIST).args[(LIST).anum] */ #define __AV_FARG_NUM 4 unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif #if (defined(__s390__) && !defined(__s390x__)) #define __AV_IARG_NUM 5 /* store the integer arguments in an extra array */ unsigned int ianum; __avrword iargs[__AV_IARG_NUM]; /* store the floating-point arguments in an extra array */ #define __AV_FARG_NUM 2 unsigned int fanum; /* number of fargs[] words that are occupied so far */ unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif #if defined(__s390x__) #define __AV_IARG_NUM 5 /* store the integer arguments in an extra array */ unsigned int ianum; __avrword iargs[__AV_IARG_NUM]; #define __AV_FARG_NUM 4 /* store the floating-point arguments in an extra array */ unsigned int fanum; /* number of fargs[] words that are occupied so far */ unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) #define __AV_FARG_NUM 8 /* store the floating-point arguments in an extra array */ unsigned int fanum; /* number of fargs[] words that are occupied so far */ unsigned int farg_mask; /* bitmask of those entries in fargs[] which have a float value */ unsigned int darg_mask; /* bitmask of those entries in dargs[] which have a double value */ float fargs[__AV_FARG_NUM]; double dargs[__AV_FARG_NUM]; #endif } __av_alist; libffcall-2.5/ffcall-version.c0000664000000000000000000000151113347755316013261 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" /* Specification. */ #include "ffcall-version.h" int ffcall_get_version (void) { return LIBFFCALL_VERSION; } libffcall-2.5/build-aux/0000775000000000000000000000000014665334231012150 500000000000000libffcall-2.5/build-aux/missing0000755000000000000000000001706014665326517013501 00000000000000#! /bin/sh # Common wrapper for a few potentially missing GNU and other programs. scriptversion=2024-06-07.14; # UTC # shellcheck disable=SC2006,SC2268 # we must support pre-POSIX shells # Copyright (C) 1996-2024 Free Software Foundation, Inc. # Originally written by Fran,cois Pinard , 1996. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with this program. If not, see . # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. if test $# -eq 0; then echo 1>&2 "Try '$0 --help' for more information" exit 1 fi case $1 in --is-lightweight) # Used by our autoconf macros to check whether the available missing # script is modern enough. exit 0 ;; --run) # Back-compat with the calling convention used by older automake. shift ;; -h|--h|--he|--hel|--help) echo "\ $0 [OPTION]... PROGRAM [ARGUMENT]... Run 'PROGRAM [ARGUMENT]...', returning a proper advice when this fails due to PROGRAM being missing or too old. Options: -h, --help display this help and exit -v, --version output version information and exit Supported PROGRAM values: aclocal autoconf autogen autoheader autom4te automake autoreconf bison flex help2man lex makeinfo perl yacc Version suffixes to PROGRAM as well as the prefixes 'gnu-', 'gnu', and 'g' are ignored when checking the name. Report bugs to . GNU Automake home page: . General help using GNU software: ." exit $? ;; -v|--v|--ve|--ver|--vers|--versi|--versio|--version) echo "missing (GNU Automake) $scriptversion" exit $? ;; -*) echo 1>&2 "$0: unknown '$1' option" echo 1>&2 "Try '$0 --help' for more information" exit 1 ;; esac # Run the given program, remember its exit status. "$@"; st=$? # If it succeeded, we are done. test $st -eq 0 && exit 0 # Also exit now if we it failed (or wasn't found), and '--version' was # passed; such an option is passed most likely to detect whether the # program is present and works. case $2 in --version|--help) exit $st;; esac # Exit code 63 means version mismatch. This often happens when the user # tries to use an ancient version of a tool on a file that requires a # minimum version. if test $st -eq 63; then msg="probably too old" elif test $st -eq 127; then # Program was missing. msg="missing on your system" else # Program was found and executed, but failed. Give up. exit $st fi perl_URL=https://www.perl.org/ flex_URL=https://github.com/westes/flex gnu_software_URL=https://www.gnu.org/software program_details () { case $1 in aclocal|automake|autoreconf) echo "The '$1' program is part of the GNU Automake package:" echo "<$gnu_software_URL/automake>" echo "It also requires GNU Autoconf, GNU m4 and Perl in order to run:" echo "<$gnu_software_URL/autoconf>" echo "<$gnu_software_URL/m4/>" echo "<$perl_URL>" ;; autoconf|autom4te|autoheader) echo "The '$1' program is part of the GNU Autoconf package:" echo "<$gnu_software_URL/autoconf/>" echo "It also requires GNU m4 and Perl in order to run:" echo "<$gnu_software_URL/m4/>" echo "<$perl_URL>" ;; *) : ;; esac } give_advice () { # Normalize program name to check for. normalized_program=`echo "$1" | sed ' s/^gnu-//; t s/^gnu//; t s/^g//; t'` printf '%s\n' "'$1' is $msg." configure_deps="'configure.ac' or m4 files included by 'configure.ac'" autoheader_deps="'acconfig.h'" automake_deps="'Makefile.am'" aclocal_deps="'acinclude.m4'" case $normalized_program in aclocal*) echo "You should only need it if you modified $aclocal_deps or" echo "$configure_deps." ;; autoconf*) echo "You should only need it if you modified $configure_deps." ;; autogen*) echo "You should only need it if you modified a '.def' or '.tpl' file." echo "You may want to install the GNU AutoGen package:" echo "<$gnu_software_URL/autogen/>" ;; autoheader*) echo "You should only need it if you modified $autoheader_deps or" echo "$configure_deps." ;; automake*) echo "You should only need it if you modified $automake_deps or" echo "$configure_deps." ;; autom4te*) echo "You might have modified some maintainer files that require" echo "the 'autom4te' program to be rebuilt." ;; autoreconf*) echo "You should only need it if you modified $aclocal_deps or" echo "$automake_deps or $autoheader_deps or $automake_deps or" echo "$configure_deps." ;; bison*|yacc*) echo "You should only need it if you modified a '.y' file." echo "You may want to install the GNU Bison package:" echo "<$gnu_software_URL/bison/>" ;; help2man*) echo "You should only need it if you modified a dependency" \ "of a man page." echo "You may want to install the GNU Help2man package:" echo "<$gnu_software_URL/help2man/>" ;; lex*|flex*) echo "You should only need it if you modified a '.l' file." echo "You may want to install the Fast Lexical Analyzer package:" echo "<$flex_URL>" ;; makeinfo*) echo "You should only need it if you modified a '.texi' file, or" echo "any other file indirectly affecting the aspect of the manual." echo "You might want to install the Texinfo package:" echo "<$gnu_software_URL/texinfo/>" echo "The spurious makeinfo call might also be the consequence of" echo "using a buggy 'make' (AIX, DU, IRIX), in which case you might" echo "want to install GNU make:" echo "<$gnu_software_URL/make/>" ;; perl*) echo "You should only need it to run GNU Autoconf, GNU Automake, " echo " assorted other tools, or if you modified a Perl source file." echo "You may want to install the Perl 5 language interpreter:" echo "<$perl_URL>" ;; *) echo "You might have modified some files without having the proper" echo "tools for further handling them. Check the 'README' file, it" echo "often tells you about the needed prerequisites for installing" echo "this package. You may also peek at any GNU archive site, in" echo "case some other package contains this missing '$1' program." ;; esac program_details "$normalized_program" } give_advice "$1" | sed -e '1s/^/WARNING: /' \ -e '2,$s/^/ /' >&2 # Propagate the correct exit status (expected to be 127 for a program # not found, 63 for a program that failed due to version mismatch). exit $st # Local variables: # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC0" # time-stamp-end: "; # UTC" # End: libffcall-2.5/build-aux/ar-lib0000775000000000000000000001403114641402034013152 00000000000000#! /bin/sh # Wrapper for Microsoft lib.exe me=ar-lib scriptversion=2024-06-19.01; # UTC # Copyright (C) 2010-2024 Free Software Foundation, Inc. # Written by Peter Rosin . # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. # This file is maintained in Automake, please report # bugs to or send patches to # . # func_error message func_error () { echo "$me: $1" 1>&2 exit 1 } file_conv= # func_file_conv build_file # Convert a $build file to $host form and store it in $file # Currently only supports Windows hosts. func_file_conv () { file=$1 case $file in / | /[!/]*) # absolute file, and not a UNC file if test -z "$file_conv"; then # lazily determine how to convert abs files case `uname -s` in MINGW*) file_conv=mingw ;; CYGWIN* | MSYS*) file_conv=cygwin ;; *) file_conv=wine ;; esac fi case $file_conv in mingw) file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'` ;; cygwin | msys) file=`cygpath -m "$file" || echo "$file"` ;; wine) file=`winepath -w "$file" || echo "$file"` ;; esac ;; esac } # func_at_file at_file operation archive # Iterate over all members in AT_FILE performing OPERATION on ARCHIVE # for each of them. # When interpreting the content of the @FILE, do NOT use func_file_conv, # since the user would need to supply preconverted file names to # binutils ar, at least for MinGW. func_at_file () { operation=$2 archive=$3 at_file_contents=`cat "$1"` eval set x "$at_file_contents" shift for member do $AR -NOLOGO $operation:"$member" "$archive" || exit $? done } case $1 in '') func_error "no command. Try '$0 --help' for more information." ;; -h | --h*) cat <. GNU Automake home page: . General help using GNU software: . EOF exit $? ;; -v | --v*) echo "$me (GNU Automake) $scriptversion" exit $? ;; esac if test $# -lt 3; then func_error "you must specify a program, an action and an archive" fi AR=$1 shift while : do if test $# -lt 2; then func_error "you must specify a program, an action and an archive" fi case $1 in -lib | -LIB \ | -ltcg | -LTCG \ | -machine* | -MACHINE* \ | -subsystem* | -SUBSYSTEM* \ | -verbose | -VERBOSE \ | -wx* | -WX* ) AR="$AR $1" shift ;; -nologo | -NOLOGO) # We always invoke AR with -nologo, so don't need to add it again. shift ;; *) action=$1 shift break ;; esac done orig_archive=$1 shift func_file_conv "$orig_archive" archive=$file # strip leading dash in $action action=${action#-} delete= extract= list= quick= replace= index= create= while test -n "$action" do case $action in d*) delete=yes ;; x*) extract=yes ;; t*) list=yes ;; q*) quick=yes ;; r*) replace=yes ;; s*) index=yes ;; S*) ;; # the index is always updated implicitly c*) create=yes ;; u*) ;; # TODO: don't ignore the update modifier v*) ;; # TODO: don't ignore the verbose modifier *) func_error "unknown action specified" ;; esac action=${action#?} done case $delete$extract$list$quick$replace,$index in yes,* | ,yes) ;; yesyes*) func_error "more than one action specified" ;; *) func_error "no action specified" ;; esac if test -n "$delete"; then if test ! -f "$orig_archive"; then func_error "archive not found" fi for member do case $1 in @*) func_at_file "${1#@}" -REMOVE "$archive" ;; *) func_file_conv "$1" $AR -NOLOGO -REMOVE:"$file" "$archive" || exit $? ;; esac done elif test -n "$extract"; then if test ! -f "$orig_archive"; then func_error "archive not found" fi if test $# -gt 0; then for member do case $1 in @*) func_at_file "${1#@}" -EXTRACT "$archive" ;; *) func_file_conv "$1" $AR -NOLOGO -EXTRACT:"$file" "$archive" || exit $? ;; esac done else $AR -NOLOGO -LIST "$archive" | tr -d '\r' | sed -e 's/\\/\\\\/g' \ | while read member do $AR -NOLOGO -EXTRACT:"$member" "$archive" || exit $? done fi elif test -n "$quick$replace"; then if test ! -f "$orig_archive"; then if test -z "$create"; then echo "$me: creating $orig_archive" fi orig_archive= else orig_archive=$archive fi for member do case $1 in @*) func_file_conv "${1#@}" set x "$@" "@$file" ;; *) func_file_conv "$1" set x "$@" "$file" ;; esac shift shift done if test -n "$orig_archive"; then $AR -NOLOGO -OUT:"$archive" "$orig_archive" "$@" || exit $? else $AR -NOLOGO -OUT:"$archive" "$@" || exit $? fi elif test -n "$list"; then if test ! -f "$orig_archive"; then func_error "archive not found" fi $AR -NOLOGO -LIST "$archive" || exit $? fi libffcall-2.5/build-aux/ltmain.sh0000644000000000000000000121264214662364334013722 00000000000000#! /usr/bin/env sh ## DO NOT EDIT - This file generated from ./build-aux/ltmain.in ## by inline-source v2019-02-19.15 # libtool (GNU libtool) 2.4.7 # Provide generalized library-building support services. # Written by Gordon Matzigkeit , 1996 # Copyright (C) 1996-2019, 2021-2022 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # GNU Libtool is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # As a special exception to the GNU General Public License, # if you distribute this file as part of a program or library that # is built using GNU Libtool, you may include this file under the # same distribution terms that you use for the rest of that program. # # GNU Libtool is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . PROGRAM=libtool PACKAGE=libtool VERSION=2.4.7 package_revision=2.4.7 ## ------ ## ## Usage. ## ## ------ ## # Run './libtool --help' for help with using this script from the # command line. ## ------------------------------- ## ## User overridable command paths. ## ## ------------------------------- ## # After configure completes, it has a better idea of some of the # shell tools we need than the defaults used by the functions shared # with bootstrap, so set those here where they can still be over- # ridden by the user, but otherwise take precedence. : ${AUTOCONF="autoconf"} : ${AUTOMAKE="automake"} ## -------------------------- ## ## Source external libraries. ## ## -------------------------- ## # Much of our low-level functionality needs to be sourced from external # libraries, which are installed to $pkgauxdir. # Set a version string for this script. scriptversion=2019-02-19.15; # UTC # General shell script boiler plate, and helper functions. # Written by Gary V. Vaughan, 2004 # This is free software. There is NO warranty; not even for # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # # Copyright (C) 2004-2019, 2021 Bootstrap Authors # # This file is dual licensed under the terms of the MIT license # , and GPL version 2 or later # . You must apply one of # these licenses when using or redistributing this software or any of # the files within it. See the URLs above, or the file `LICENSE` # included in the Bootstrap distribution for the full license texts. # Please report bugs or propose patches to: # ## ------ ## ## Usage. ## ## ------ ## # Evaluate this file near the top of your script to gain access to # the functions and variables defined here: # # . `echo "$0" | ${SED-sed} 's|[^/]*$||'`/build-aux/funclib.sh # # If you need to override any of the default environment variable # settings, do that before evaluating this file. ## -------------------- ## ## Shell normalisation. ## ## -------------------- ## # Some shells need a little help to be as Bourne compatible as possible. # Before doing anything else, make sure all that help has been provided! DUALCASE=1; export DUALCASE # for MKS sh if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then : emulate sh NULLCMD=: # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which # is contrary to our usage. Disable this feature. alias -g '${1+"$@"}'='"$@"' setopt NO_GLOB_SUBST else case `(set -o) 2>/dev/null` in *posix*) set -o posix ;; esac fi # NLS nuisances: We save the old values in case they are required later. _G_user_locale= _G_safe_locale= for _G_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES do eval "if test set = \"\${$_G_var+set}\"; then save_$_G_var=\$$_G_var $_G_var=C export $_G_var _G_user_locale=\"$_G_var=\\\$save_\$_G_var; \$_G_user_locale\" _G_safe_locale=\"$_G_var=C; \$_G_safe_locale\" fi" done # These NLS vars are set unconditionally (bootstrap issue #24). Unset those # in case the environment reset is needed later and the $save_* variant is not # defined (see the code above). LC_ALL=C LANGUAGE=C export LANGUAGE LC_ALL # Make sure IFS has a sensible default sp=' ' nl=' ' IFS="$sp $nl" # There are apparently some retarded systems that use ';' as a PATH separator! if test "${PATH_SEPARATOR+set}" != set; then PATH_SEPARATOR=: (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || PATH_SEPARATOR=';' } fi # func_unset VAR # -------------- # Portably unset VAR. # In some shells, an 'unset VAR' statement leaves a non-zero return # status if VAR is already unset, which might be problematic if the # statement is used at the end of a function (thus poisoning its return # value) or when 'set -e' is active (causing even a spurious abort of # the script in this case). func_unset () { { eval $1=; (eval unset $1) >/dev/null 2>&1 && eval unset $1 || : ; } } # Make sure CDPATH doesn't cause `cd` commands to output the target dir. func_unset CDPATH # Make sure ${,E,F}GREP behave sanely. func_unset GREP_OPTIONS ## ------------------------- ## ## Locate command utilities. ## ## ------------------------- ## # func_executable_p FILE # ---------------------- # Check that FILE is an executable regular file. func_executable_p () { test -f "$1" && test -x "$1" } # func_path_progs PROGS_LIST CHECK_FUNC [PATH] # -------------------------------------------- # Search for either a program that responds to --version with output # containing "GNU", or else returned by CHECK_FUNC otherwise, by # trying all the directories in PATH with each of the elements of # PROGS_LIST. # # CHECK_FUNC should accept the path to a candidate program, and # set $func_check_prog_result if it truncates its output less than # $_G_path_prog_max characters. func_path_progs () { _G_progs_list=$1 _G_check_func=$2 _G_PATH=${3-"$PATH"} _G_path_prog_max=0 _G_path_prog_found=false _G_save_IFS=$IFS; IFS=${PATH_SEPARATOR-:} for _G_dir in $_G_PATH; do IFS=$_G_save_IFS test -z "$_G_dir" && _G_dir=. for _G_prog_name in $_G_progs_list; do for _exeext in '' .EXE; do _G_path_prog=$_G_dir/$_G_prog_name$_exeext func_executable_p "$_G_path_prog" || continue case `"$_G_path_prog" --version 2>&1` in *GNU*) func_path_progs_result=$_G_path_prog _G_path_prog_found=: ;; *) $_G_check_func $_G_path_prog func_path_progs_result=$func_check_prog_result ;; esac $_G_path_prog_found && break 3 done done done IFS=$_G_save_IFS test -z "$func_path_progs_result" && { echo "no acceptable sed could be found in \$PATH" >&2 exit 1 } } # We want to be able to use the functions in this file before configure # has figured out where the best binaries are kept, which means we have # to search for them ourselves - except when the results are already set # where we skip the searches. # Unless the user overrides by setting SED, search the path for either GNU # sed, or the sed that truncates its output the least. test -z "$SED" && { _G_sed_script=s/aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb/ for _G_i in 1 2 3 4 5 6 7; do _G_sed_script=$_G_sed_script$nl$_G_sed_script done echo "$_G_sed_script" 2>/dev/null | sed 99q >conftest.sed _G_sed_script= func_check_prog_sed () { _G_path_prog=$1 _G_count=0 printf 0123456789 >conftest.in while : do cat conftest.in conftest.in >conftest.tmp mv conftest.tmp conftest.in cp conftest.in conftest.nl echo '' >> conftest.nl "$_G_path_prog" -f conftest.sed conftest.out 2>/dev/null || break diff conftest.out conftest.nl >/dev/null 2>&1 || break _G_count=`expr $_G_count + 1` if test "$_G_count" -gt "$_G_path_prog_max"; then # Best one so far, save it but keep looking for a better one func_check_prog_result=$_G_path_prog _G_path_prog_max=$_G_count fi # 10*(2^10) chars as input seems more than enough test 10 -lt "$_G_count" && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out } func_path_progs "sed gsed" func_check_prog_sed "$PATH:/usr/xpg4/bin" rm -f conftest.sed SED=$func_path_progs_result } # Unless the user overrides by setting GREP, search the path for either GNU # grep, or the grep that truncates its output the least. test -z "$GREP" && { func_check_prog_grep () { _G_path_prog=$1 _G_count=0 _G_path_prog_max=0 printf 0123456789 >conftest.in while : do cat conftest.in conftest.in >conftest.tmp mv conftest.tmp conftest.in cp conftest.in conftest.nl echo 'GREP' >> conftest.nl "$_G_path_prog" -e 'GREP$' -e '-(cannot match)-' conftest.out 2>/dev/null || break diff conftest.out conftest.nl >/dev/null 2>&1 || break _G_count=`expr $_G_count + 1` if test "$_G_count" -gt "$_G_path_prog_max"; then # Best one so far, save it but keep looking for a better one func_check_prog_result=$_G_path_prog _G_path_prog_max=$_G_count fi # 10*(2^10) chars as input seems more than enough test 10 -lt "$_G_count" && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out } func_path_progs "grep ggrep" func_check_prog_grep "$PATH:/usr/xpg4/bin" GREP=$func_path_progs_result } ## ------------------------------- ## ## User overridable command paths. ## ## ------------------------------- ## # All uppercase variable names are used for environment variables. These # variables can be overridden by the user before calling a script that # uses them if a suitable command of that name is not already available # in the command search PATH. : ${CP="cp -f"} : ${ECHO="printf %s\n"} : ${EGREP="$GREP -E"} : ${FGREP="$GREP -F"} : ${LN_S="ln -s"} : ${MAKE="make"} : ${MKDIR="mkdir"} : ${MV="mv -f"} : ${RM="rm -f"} : ${SHELL="${CONFIG_SHELL-/bin/sh}"} ## -------------------- ## ## Useful sed snippets. ## ## -------------------- ## sed_dirname='s|/[^/]*$||' sed_basename='s|^.*/||' # Sed substitution that helps us do robust quoting. It backslashifies # metacharacters that are still active within double-quoted strings. sed_quote_subst='s|\([`"$\\]\)|\\\1|g' # Same as above, but do not quote variable references. sed_double_quote_subst='s/\(["`\\]\)/\\\1/g' # Sed substitution that turns a string into a regex matching for the # string literally. sed_make_literal_regex='s|[].[^$\\*\/]|\\&|g' # Sed substitution that converts a w32 file name or path # that contains forward slashes, into one that contains # (escaped) backslashes. A very naive implementation. sed_naive_backslashify='s|\\\\*|\\|g;s|/|\\|g;s|\\|\\\\|g' # Re-'\' parameter expansions in output of sed_double_quote_subst that # were '\'-ed in input to the same. If an odd number of '\' preceded a # '$' in input to sed_double_quote_subst, that '$' was protected from # expansion. Since each input '\' is now two '\'s, look for any number # of runs of four '\'s followed by two '\'s and then a '$'. '\' that '$'. _G_bs='\\' _G_bs2='\\\\' _G_bs4='\\\\\\\\' _G_dollar='\$' sed_double_backslash="\ s/$_G_bs4/&\\ /g s/^$_G_bs2$_G_dollar/$_G_bs&/ s/\\([^$_G_bs]\\)$_G_bs2$_G_dollar/\\1$_G_bs2$_G_bs$_G_dollar/g s/\n//g" # require_check_ifs_backslash # --------------------------- # Check if we can use backslash as IFS='\' separator, and set # $check_ifs_backshlash_broken to ':' or 'false'. require_check_ifs_backslash=func_require_check_ifs_backslash func_require_check_ifs_backslash () { _G_save_IFS=$IFS IFS='\' _G_check_ifs_backshlash='a\\b' for _G_i in $_G_check_ifs_backshlash do case $_G_i in a) check_ifs_backshlash_broken=false ;; '') break ;; *) check_ifs_backshlash_broken=: break ;; esac done IFS=$_G_save_IFS require_check_ifs_backslash=: } ## ----------------- ## ## Global variables. ## ## ----------------- ## # Except for the global variables explicitly listed below, the following # functions in the '^func_' namespace, and the '^require_' namespace # variables initialised in the 'Resource management' section, sourcing # this file will not pollute your global namespace with anything # else. There's no portable way to scope variables in Bourne shell # though, so actually running these functions will sometimes place # results into a variable named after the function, and often use # temporary variables in the '^_G_' namespace. If you are careful to # avoid using those namespaces casually in your sourcing script, things # should continue to work as you expect. And, of course, you can freely # overwrite any of the functions or variables defined here before # calling anything to customize them. EXIT_SUCCESS=0 EXIT_FAILURE=1 EXIT_MISMATCH=63 # $? = 63 is used to indicate version mismatch to missing. EXIT_SKIP=77 # $? = 77 is used to indicate a skipped test to automake. # Allow overriding, eg assuming that you follow the convention of # putting '$debug_cmd' at the start of all your functions, you can get # bash to show function call trace with: # # debug_cmd='eval echo "${FUNCNAME[0]} $*" >&2' bash your-script-name debug_cmd=${debug_cmd-":"} exit_cmd=: # By convention, finish your script with: # # exit $exit_status # # so that you can set exit_status to non-zero if you want to indicate # something went wrong during execution without actually bailing out at # the point of failure. exit_status=$EXIT_SUCCESS # Work around backward compatibility issue on IRIX 6.5. On IRIX 6.4+, sh # is ksh but when the shell is invoked as "sh" and the current value of # the _XPG environment variable is not equal to 1 (one), the special # positional parameter $0, within a function call, is the name of the # function. progpath=$0 # The name of this program. progname=`$ECHO "$progpath" |$SED "$sed_basename"` # Make sure we have an absolute progpath for reexecution: case $progpath in [\\/]*|[A-Za-z]:\\*) ;; *[\\/]*) progdir=`$ECHO "$progpath" |$SED "$sed_dirname"` progdir=`cd "$progdir" && pwd` progpath=$progdir/$progname ;; *) _G_IFS=$IFS IFS=${PATH_SEPARATOR-:} for progdir in $PATH; do IFS=$_G_IFS test -x "$progdir/$progname" && break done IFS=$_G_IFS test -n "$progdir" || progdir=`pwd` progpath=$progdir/$progname ;; esac ## ----------------- ## ## Standard options. ## ## ----------------- ## # The following options affect the operation of the functions defined # below, and should be set appropriately depending on run-time para- # meters passed on the command line. opt_dry_run=false opt_quiet=false opt_verbose=false # Categories 'all' and 'none' are always available. Append any others # you will pass as the first argument to func_warning from your own # code. warning_categories= # By default, display warnings according to 'opt_warning_types'. Set # 'warning_func' to ':' to elide all warnings, or func_fatal_error to # treat the next displayed warning as a fatal error. warning_func=func_warn_and_continue # Set to 'all' to display all warnings, 'none' to suppress all # warnings, or a space delimited list of some subset of # 'warning_categories' to display only the listed warnings. opt_warning_types=all ## -------------------- ## ## Resource management. ## ## -------------------- ## # This section contains definitions for functions that each ensure a # particular resource (a file, or a non-empty configuration variable for # example) is available, and if appropriate to extract default values # from pertinent package files. Call them using their associated # 'require_*' variable to ensure that they are executed, at most, once. # # It's entirely deliberate that calling these functions can set # variables that don't obey the namespace limitations obeyed by the rest # of this file, in order that that they be as useful as possible to # callers. # require_term_colors # ------------------- # Allow display of bold text on terminals that support it. require_term_colors=func_require_term_colors func_require_term_colors () { $debug_cmd test -t 1 && { # COLORTERM and USE_ANSI_COLORS environment variables take # precedence, because most terminfo databases neglect to describe # whether color sequences are supported. test -n "${COLORTERM+set}" && : ${USE_ANSI_COLORS="1"} if test 1 = "$USE_ANSI_COLORS"; then # Standard ANSI escape sequences tc_reset='' tc_bold=''; tc_standout='' tc_red=''; tc_green='' tc_blue=''; tc_cyan='' else # Otherwise trust the terminfo database after all. test -n "`tput sgr0 2>/dev/null`" && { tc_reset=`tput sgr0` test -n "`tput bold 2>/dev/null`" && tc_bold=`tput bold` tc_standout=$tc_bold test -n "`tput smso 2>/dev/null`" && tc_standout=`tput smso` test -n "`tput setaf 1 2>/dev/null`" && tc_red=`tput setaf 1` test -n "`tput setaf 2 2>/dev/null`" && tc_green=`tput setaf 2` test -n "`tput setaf 4 2>/dev/null`" && tc_blue=`tput setaf 4` test -n "`tput setaf 5 2>/dev/null`" && tc_cyan=`tput setaf 5` } fi } require_term_colors=: } ## ----------------- ## ## Function library. ## ## ----------------- ## # This section contains a variety of useful functions to call in your # scripts. Take note of the portable wrappers for features provided by # some modern shells, which will fall back to slower equivalents on # less featureful shells. # func_append VAR VALUE # --------------------- # Append VALUE onto the existing contents of VAR. # We should try to minimise forks, especially on Windows where they are # unreasonably slow, so skip the feature probes when bash or zsh are # being used: if test set = "${BASH_VERSION+set}${ZSH_VERSION+set}"; then : ${_G_HAVE_ARITH_OP="yes"} : ${_G_HAVE_XSI_OPS="yes"} # The += operator was introduced in bash 3.1 case $BASH_VERSION in [12].* | 3.0 | 3.0*) ;; *) : ${_G_HAVE_PLUSEQ_OP="yes"} ;; esac fi # _G_HAVE_PLUSEQ_OP # Can be empty, in which case the shell is probed, "yes" if += is # useable or anything else if it does not work. test -z "$_G_HAVE_PLUSEQ_OP" \ && (eval 'x=a; x+=" b"; test "a b" = "$x"') 2>/dev/null \ && _G_HAVE_PLUSEQ_OP=yes if test yes = "$_G_HAVE_PLUSEQ_OP" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_append () { $debug_cmd eval "$1+=\$2" }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_append () { $debug_cmd eval "$1=\$$1\$2" } fi # func_append_quoted VAR VALUE # ---------------------------- # Quote VALUE and append to the end of shell variable VAR, separated # by a space. if test yes = "$_G_HAVE_PLUSEQ_OP"; then eval 'func_append_quoted () { $debug_cmd func_quote_arg pretty "$2" eval "$1+=\\ \$func_quote_arg_result" }' else func_append_quoted () { $debug_cmd func_quote_arg pretty "$2" eval "$1=\$$1\\ \$func_quote_arg_result" } fi # func_append_uniq VAR VALUE # -------------------------- # Append unique VALUE onto the existing contents of VAR, assuming # entries are delimited by the first character of VALUE. For example: # # func_append_uniq options " --another-option option-argument" # # will only append to $options if " --another-option option-argument " # is not already present somewhere in $options already (note spaces at # each end implied by leading space in second argument). func_append_uniq () { $debug_cmd eval _G_current_value='`$ECHO $'$1'`' _G_delim=`expr "$2" : '\(.\)'` case $_G_delim$_G_current_value$_G_delim in *"$2$_G_delim"*) ;; *) func_append "$@" ;; esac } # func_arith TERM... # ------------------ # Set func_arith_result to the result of evaluating TERMs. test -z "$_G_HAVE_ARITH_OP" \ && (eval 'test 2 = $(( 1 + 1 ))') 2>/dev/null \ && _G_HAVE_ARITH_OP=yes if test yes = "$_G_HAVE_ARITH_OP"; then eval 'func_arith () { $debug_cmd func_arith_result=$(( $* )) }' else func_arith () { $debug_cmd func_arith_result=`expr "$@"` } fi # func_basename FILE # ------------------ # Set func_basename_result to FILE with everything up to and including # the last / stripped. if test yes = "$_G_HAVE_XSI_OPS"; then # If this shell supports suffix pattern removal, then use it to avoid # forking. Hide the definitions single quotes in case the shell chokes # on unsupported syntax... _b='func_basename_result=${1##*/}' _d='case $1 in */*) func_dirname_result=${1%/*}$2 ;; * ) func_dirname_result=$3 ;; esac' else # ...otherwise fall back to using sed. _b='func_basename_result=`$ECHO "$1" |$SED "$sed_basename"`' _d='func_dirname_result=`$ECHO "$1" |$SED "$sed_dirname"` if test "X$func_dirname_result" = "X$1"; then func_dirname_result=$3 else func_append func_dirname_result "$2" fi' fi eval 'func_basename () { $debug_cmd '"$_b"' }' # func_dirname FILE APPEND NONDIR_REPLACEMENT # ------------------------------------------- # Compute the dirname of FILE. If nonempty, add APPEND to the result, # otherwise set result to NONDIR_REPLACEMENT. eval 'func_dirname () { $debug_cmd '"$_d"' }' # func_dirname_and_basename FILE APPEND NONDIR_REPLACEMENT # -------------------------------------------------------- # Perform func_basename and func_dirname in a single function # call: # dirname: Compute the dirname of FILE. If nonempty, # add APPEND to the result, otherwise set result # to NONDIR_REPLACEMENT. # value returned in "$func_dirname_result" # basename: Compute filename of FILE. # value retuned in "$func_basename_result" # For efficiency, we do not delegate to the functions above but instead # duplicate the functionality here. eval 'func_dirname_and_basename () { $debug_cmd '"$_b"' '"$_d"' }' # func_echo ARG... # ---------------- # Echo program name prefixed message. func_echo () { $debug_cmd _G_message=$* func_echo_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_IFS $ECHO "$progname: $_G_line" done IFS=$func_echo_IFS } # func_echo_all ARG... # -------------------- # Invoke $ECHO with all args, space-separated. func_echo_all () { $ECHO "$*" } # func_echo_infix_1 INFIX ARG... # ------------------------------ # Echo program name, followed by INFIX on the first line, with any # additional lines not showing INFIX. func_echo_infix_1 () { $debug_cmd $require_term_colors _G_infix=$1; shift _G_indent=$_G_infix _G_prefix="$progname: $_G_infix: " _G_message=$* # Strip color escape sequences before counting printable length for _G_tc in "$tc_reset" "$tc_bold" "$tc_standout" "$tc_red" "$tc_green" "$tc_blue" "$tc_cyan" do test -n "$_G_tc" && { _G_esc_tc=`$ECHO "$_G_tc" | $SED "$sed_make_literal_regex"` _G_indent=`$ECHO "$_G_indent" | $SED "s|$_G_esc_tc||g"` } done _G_indent="$progname: "`echo "$_G_indent" | $SED 's|.| |g'`" " ## exclude from sc_prohibit_nested_quotes func_echo_infix_1_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_infix_1_IFS $ECHO "$_G_prefix$tc_bold$_G_line$tc_reset" >&2 _G_prefix=$_G_indent done IFS=$func_echo_infix_1_IFS } # func_error ARG... # ----------------- # Echo program name prefixed message to standard error. func_error () { $debug_cmd $require_term_colors func_echo_infix_1 " $tc_standout${tc_red}error$tc_reset" "$*" >&2 } # func_fatal_error ARG... # ----------------------- # Echo program name prefixed message to standard error, and exit. func_fatal_error () { $debug_cmd func_error "$*" exit $EXIT_FAILURE } # func_grep EXPRESSION FILENAME # ----------------------------- # Check whether EXPRESSION matches any line of FILENAME, without output. func_grep () { $debug_cmd $GREP "$1" "$2" >/dev/null 2>&1 } # func_len STRING # --------------- # Set func_len_result to the length of STRING. STRING may not # start with a hyphen. test -z "$_G_HAVE_XSI_OPS" \ && (eval 'x=a/b/c; test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \ && _G_HAVE_XSI_OPS=yes if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_len () { $debug_cmd func_len_result=${#1} }' else func_len () { $debug_cmd func_len_result=`expr "$1" : ".*" 2>/dev/null || echo $max_cmd_len` } fi # func_mkdir_p DIRECTORY-PATH # --------------------------- # Make sure the entire path to DIRECTORY-PATH is available. func_mkdir_p () { $debug_cmd _G_directory_path=$1 _G_dir_list= if test -n "$_G_directory_path" && test : != "$opt_dry_run"; then # Protect directory names starting with '-' case $_G_directory_path in -*) _G_directory_path=./$_G_directory_path ;; esac # While some portion of DIR does not yet exist... while test ! -d "$_G_directory_path"; do # ...make a list in topmost first order. Use a colon delimited # list incase some portion of path contains whitespace. _G_dir_list=$_G_directory_path:$_G_dir_list # If the last portion added has no slash in it, the list is done case $_G_directory_path in */*) ;; *) break ;; esac # ...otherwise throw away the child directory and loop _G_directory_path=`$ECHO "$_G_directory_path" | $SED -e "$sed_dirname"` done _G_dir_list=`$ECHO "$_G_dir_list" | $SED 's|:*$||'` func_mkdir_p_IFS=$IFS; IFS=: for _G_dir in $_G_dir_list; do IFS=$func_mkdir_p_IFS # mkdir can fail with a 'File exist' error if two processes # try to create one of the directories concurrently. Don't # stop in that case! $MKDIR "$_G_dir" 2>/dev/null || : done IFS=$func_mkdir_p_IFS # Bail out if we (or some other process) failed to create a directory. test -d "$_G_directory_path" || \ func_fatal_error "Failed to create '$1'" fi } # func_mktempdir [BASENAME] # ------------------------- # Make a temporary directory that won't clash with other running # libtool processes, and avoids race conditions if possible. If # given, BASENAME is the basename for that directory. func_mktempdir () { $debug_cmd _G_template=${TMPDIR-/tmp}/${1-$progname} if test : = "$opt_dry_run"; then # Return a directory name, but don't create it in dry-run mode _G_tmpdir=$_G_template-$$ else # If mktemp works, use that first and foremost _G_tmpdir=`mktemp -d "$_G_template-XXXXXXXX" 2>/dev/null` if test ! -d "$_G_tmpdir"; then # Failing that, at least try and use $RANDOM to avoid a race _G_tmpdir=$_G_template-${RANDOM-0}$$ func_mktempdir_umask=`umask` umask 0077 $MKDIR "$_G_tmpdir" umask $func_mktempdir_umask fi # If we're not in dry-run mode, bomb out on failure test -d "$_G_tmpdir" || \ func_fatal_error "cannot create temporary directory '$_G_tmpdir'" fi $ECHO "$_G_tmpdir" } # func_normal_abspath PATH # ------------------------ # Remove doubled-up and trailing slashes, "." path components, # and cancel out any ".." path components in PATH after making # it an absolute path. func_normal_abspath () { $debug_cmd # These SED scripts presuppose an absolute path with a trailing slash. _G_pathcar='s|^/\([^/]*\).*$|\1|' _G_pathcdr='s|^/[^/]*||' _G_removedotparts=':dotsl s|/\./|/|g t dotsl s|/\.$|/|' _G_collapseslashes='s|/\{1,\}|/|g' _G_finalslash='s|/*$|/|' # Start from root dir and reassemble the path. func_normal_abspath_result= func_normal_abspath_tpath=$1 func_normal_abspath_altnamespace= case $func_normal_abspath_tpath in "") # Empty path, that just means $cwd. func_stripname '' '/' "`pwd`" func_normal_abspath_result=$func_stripname_result return ;; # The next three entries are used to spot a run of precisely # two leading slashes without using negated character classes; # we take advantage of case's first-match behaviour. ///*) # Unusual form of absolute path, do nothing. ;; //*) # Not necessarily an ordinary path; POSIX reserves leading '//' # and for example Cygwin uses it to access remote file shares # over CIFS/SMB, so we conserve a leading double slash if found. func_normal_abspath_altnamespace=/ ;; /*) # Absolute path, do nothing. ;; *) # Relative path, prepend $cwd. func_normal_abspath_tpath=`pwd`/$func_normal_abspath_tpath ;; esac # Cancel out all the simple stuff to save iterations. We also want # the path to end with a slash for ease of parsing, so make sure # there is one (and only one) here. func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_removedotparts" -e "$_G_collapseslashes" -e "$_G_finalslash"` while :; do # Processed it all yet? if test / = "$func_normal_abspath_tpath"; then # If we ascended to the root using ".." the result may be empty now. if test -z "$func_normal_abspath_result"; then func_normal_abspath_result=/ fi break fi func_normal_abspath_tcomponent=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_pathcar"` func_normal_abspath_tpath=`$ECHO "$func_normal_abspath_tpath" | $SED \ -e "$_G_pathcdr"` # Figure out what to do with it case $func_normal_abspath_tcomponent in "") # Trailing empty path component, ignore it. ;; ..) # Parent dir; strip last assembled component from result. func_dirname "$func_normal_abspath_result" func_normal_abspath_result=$func_dirname_result ;; *) # Actual path component, append it. func_append func_normal_abspath_result "/$func_normal_abspath_tcomponent" ;; esac done # Restore leading double-slash if one was found on entry. func_normal_abspath_result=$func_normal_abspath_altnamespace$func_normal_abspath_result } # func_notquiet ARG... # -------------------- # Echo program name prefixed message only when not in quiet mode. func_notquiet () { $debug_cmd $opt_quiet || func_echo ${1+"$@"} # A bug in bash halts the script if the last line of a function # fails when set -e is in force, so we need another command to # work around that: : } # func_relative_path SRCDIR DSTDIR # -------------------------------- # Set func_relative_path_result to the relative path from SRCDIR to DSTDIR. func_relative_path () { $debug_cmd func_relative_path_result= func_normal_abspath "$1" func_relative_path_tlibdir=$func_normal_abspath_result func_normal_abspath "$2" func_relative_path_tbindir=$func_normal_abspath_result # Ascend the tree starting from libdir while :; do # check if we have found a prefix of bindir case $func_relative_path_tbindir in $func_relative_path_tlibdir) # found an exact match func_relative_path_tcancelled= break ;; $func_relative_path_tlibdir*) # found a matching prefix func_stripname "$func_relative_path_tlibdir" '' "$func_relative_path_tbindir" func_relative_path_tcancelled=$func_stripname_result if test -z "$func_relative_path_result"; then func_relative_path_result=. fi break ;; *) func_dirname $func_relative_path_tlibdir func_relative_path_tlibdir=$func_dirname_result if test -z "$func_relative_path_tlibdir"; then # Have to descend all the way to the root! func_relative_path_result=../$func_relative_path_result func_relative_path_tcancelled=$func_relative_path_tbindir break fi func_relative_path_result=../$func_relative_path_result ;; esac done # Now calculate path; take care to avoid doubling-up slashes. func_stripname '' '/' "$func_relative_path_result" func_relative_path_result=$func_stripname_result func_stripname '/' '/' "$func_relative_path_tcancelled" if test -n "$func_stripname_result"; then func_append func_relative_path_result "/$func_stripname_result" fi # Normalisation. If bindir is libdir, return '.' else relative path. if test -n "$func_relative_path_result"; then func_stripname './' '' "$func_relative_path_result" func_relative_path_result=$func_stripname_result fi test -n "$func_relative_path_result" || func_relative_path_result=. : } # func_quote_portable EVAL ARG # ---------------------------- # Internal function to portably implement func_quote_arg. Note that we still # keep attention to performance here so we as much as possible try to avoid # calling sed binary (so far O(N) complexity as long as func_append is O(1)). func_quote_portable () { $debug_cmd $require_check_ifs_backslash func_quote_portable_result=$2 # one-time-loop (easy break) while true do if $1; then func_quote_portable_result=`$ECHO "$2" | $SED \ -e "$sed_double_quote_subst" -e "$sed_double_backslash"` break fi # Quote for eval. case $func_quote_portable_result in *[\\\`\"\$]*) # Fallback to sed for $func_check_bs_ifs_broken=:, or when the string # contains the shell wildcard characters. case $check_ifs_backshlash_broken$func_quote_portable_result in :*|*[\[\*\?]*) func_quote_portable_result=`$ECHO "$func_quote_portable_result" \ | $SED "$sed_quote_subst"` break ;; esac func_quote_portable_old_IFS=$IFS for _G_char in '\' '`' '"' '$' do # STATE($1) PREV($2) SEPARATOR($3) set start "" "" func_quote_portable_result=dummy"$_G_char$func_quote_portable_result$_G_char"dummy IFS=$_G_char for _G_part in $func_quote_portable_result do case $1 in quote) func_append func_quote_portable_result "$3$2" set quote "$_G_part" "\\$_G_char" ;; start) set first "" "" func_quote_portable_result= ;; first) set quote "$_G_part" "" ;; esac done done IFS=$func_quote_portable_old_IFS ;; *) ;; esac break done func_quote_portable_unquoted_result=$func_quote_portable_result case $func_quote_portable_result in # double-quote args containing shell metacharacters to delay # word splitting, command substitution and variable expansion # for a subsequent eval. # many bourne shells cannot handle close brackets correctly # in scan sets, so we specify it separately. *[\[\~\#\^\&\*\(\)\{\}\|\;\<\>\?\'\ \ ]*|*]*|"") func_quote_portable_result=\"$func_quote_portable_result\" ;; esac } # func_quotefast_eval ARG # ----------------------- # Quote one ARG (internal). This is equivalent to 'func_quote_arg eval ARG', # but optimized for speed. Result is stored in $func_quotefast_eval. if test xyes = `(x=; printf -v x %q yes; echo x"$x") 2>/dev/null`; then printf -v _GL_test_printf_tilde %q '~' if test '\~' = "$_GL_test_printf_tilde"; then func_quotefast_eval () { printf -v func_quotefast_eval_result %q "$1" } else # Broken older Bash implementations. Make those faster too if possible. func_quotefast_eval () { case $1 in '~'*) func_quote_portable false "$1" func_quotefast_eval_result=$func_quote_portable_result ;; *) printf -v func_quotefast_eval_result %q "$1" ;; esac } fi else func_quotefast_eval () { func_quote_portable false "$1" func_quotefast_eval_result=$func_quote_portable_result } fi # func_quote_arg MODEs ARG # ------------------------ # Quote one ARG to be evaled later. MODEs argument may contain zero or more # specifiers listed below separated by ',' character. This function returns two # values: # i) func_quote_arg_result # double-quoted (when needed), suitable for a subsequent eval # ii) func_quote_arg_unquoted_result # has all characters that are still active within double # quotes backslashified. Available only if 'unquoted' is specified. # # Available modes: # ---------------- # 'eval' (default) # - escape shell special characters # 'expand' # - the same as 'eval'; but do not quote variable references # 'pretty' # - request aesthetic output, i.e. '"a b"' instead of 'a\ b'. This might # be used later in func_quote to get output like: 'echo "a b"' instead # of 'echo a\ b'. This is slower than default on some shells. # 'unquoted' # - produce also $func_quote_arg_unquoted_result which does not contain # wrapping double-quotes. # # Examples for 'func_quote_arg pretty,unquoted string': # # string | *_result | *_unquoted_result # ------------+-----------------------+------------------- # " | \" | \" # a b | "a b" | a b # "a b" | "\"a b\"" | \"a b\" # * | "*" | * # z="${x-$y}" | "z=\"\${x-\$y}\"" | z=\"\${x-\$y}\" # # Examples for 'func_quote_arg pretty,unquoted,expand string': # # string | *_result | *_unquoted_result # --------------+---------------------+-------------------- # z="${x-$y}" | "z=\"${x-$y}\"" | z=\"${x-$y}\" func_quote_arg () { _G_quote_expand=false case ,$1, in *,expand,*) _G_quote_expand=: ;; esac case ,$1, in *,pretty,*|*,expand,*|*,unquoted,*) func_quote_portable $_G_quote_expand "$2" func_quote_arg_result=$func_quote_portable_result func_quote_arg_unquoted_result=$func_quote_portable_unquoted_result ;; *) # Faster quote-for-eval for some shells. func_quotefast_eval "$2" func_quote_arg_result=$func_quotefast_eval_result ;; esac } # func_quote MODEs ARGs... # ------------------------ # Quote all ARGs to be evaled later and join them into single command. See # func_quote_arg's description for more info. func_quote () { $debug_cmd _G_func_quote_mode=$1 ; shift func_quote_result= while test 0 -lt $#; do func_quote_arg "$_G_func_quote_mode" "$1" if test -n "$func_quote_result"; then func_append func_quote_result " $func_quote_arg_result" else func_append func_quote_result "$func_quote_arg_result" fi shift done } # func_stripname PREFIX SUFFIX NAME # --------------------------------- # strip PREFIX and SUFFIX from NAME, and store in func_stripname_result. # PREFIX and SUFFIX must not contain globbing or regex special # characters, hashes, percent signs, but SUFFIX may contain a leading # dot (in which case that matches only a dot). if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_stripname () { $debug_cmd # pdksh 5.2.14 does not do ${X%$Y} correctly if both X and Y are # positional parameters, so assign one to ordinary variable first. func_stripname_result=$3 func_stripname_result=${func_stripname_result#"$1"} func_stripname_result=${func_stripname_result%"$2"} }' else func_stripname () { $debug_cmd case $2 in .*) func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%\\\\$2\$%%"`;; *) func_stripname_result=`$ECHO "$3" | $SED -e "s%^$1%%" -e "s%$2\$%%"`;; esac } fi # func_show_eval CMD [FAIL_EXP] # ----------------------------- # Unless opt_quiet is true, then output CMD. Then, if opt_dryrun is # not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP # is given, then evaluate it. func_show_eval () { $debug_cmd _G_cmd=$1 _G_fail_exp=${2-':'} func_quote_arg pretty,expand "$_G_cmd" eval "func_notquiet $func_quote_arg_result" $opt_dry_run || { eval "$_G_cmd" _G_status=$? if test 0 -ne "$_G_status"; then eval "(exit $_G_status); $_G_fail_exp" fi } } # func_show_eval_locale CMD [FAIL_EXP] # ------------------------------------ # Unless opt_quiet is true, then output CMD. Then, if opt_dryrun is # not true, evaluate CMD. If the evaluation of CMD fails, and FAIL_EXP # is given, then evaluate it. Use the saved locale for evaluation. func_show_eval_locale () { $debug_cmd _G_cmd=$1 _G_fail_exp=${2-':'} $opt_quiet || { func_quote_arg expand,pretty "$_G_cmd" eval "func_echo $func_quote_arg_result" } $opt_dry_run || { eval "$_G_user_locale $_G_cmd" _G_status=$? eval "$_G_safe_locale" if test 0 -ne "$_G_status"; then eval "(exit $_G_status); $_G_fail_exp" fi } } # func_tr_sh # ---------- # Turn $1 into a string suitable for a shell variable name. # Result is stored in $func_tr_sh_result. All characters # not in the set a-zA-Z0-9_ are replaced with '_'. Further, # if $1 begins with a digit, a '_' is prepended as well. func_tr_sh () { $debug_cmd case $1 in [0-9]* | *[!a-zA-Z0-9_]*) func_tr_sh_result=`$ECHO "$1" | $SED -e 's/^\([0-9]\)/_\1/' -e 's/[^a-zA-Z0-9_]/_/g'` ;; * ) func_tr_sh_result=$1 ;; esac } # func_verbose ARG... # ------------------- # Echo program name prefixed message in verbose mode only. func_verbose () { $debug_cmd $opt_verbose && func_echo "$*" : } # func_warn_and_continue ARG... # ----------------------------- # Echo program name prefixed warning message to standard error. func_warn_and_continue () { $debug_cmd $require_term_colors func_echo_infix_1 "${tc_red}warning$tc_reset" "$*" >&2 } # func_warning CATEGORY ARG... # ---------------------------- # Echo program name prefixed warning message to standard error. Warning # messages can be filtered according to CATEGORY, where this function # elides messages where CATEGORY is not listed in the global variable # 'opt_warning_types'. func_warning () { $debug_cmd # CATEGORY must be in the warning_categories list! case " $warning_categories " in *" $1 "*) ;; *) func_internal_error "invalid warning category '$1'" ;; esac _G_category=$1 shift case " $opt_warning_types " in *" $_G_category "*) $warning_func ${1+"$@"} ;; esac } # func_sort_ver VER1 VER2 # ----------------------- # 'sort -V' is not generally available. # Note this deviates from the version comparison in automake # in that it treats 1.5 < 1.5.0, and treats 1.4.4a < 1.4-p3a # but this should suffice as we won't be specifying old # version formats or redundant trailing .0 in bootstrap.conf. # If we did want full compatibility then we should probably # use m4_version_compare from autoconf. func_sort_ver () { $debug_cmd printf '%s\n%s\n' "$1" "$2" \ | sort -t. -k 1,1n -k 2,2n -k 3,3n -k 4,4n -k 5,5n -k 6,6n -k 7,7n -k 8,8n -k 9,9n } # func_lt_ver PREV CURR # --------------------- # Return true if PREV and CURR are in the correct order according to # func_sort_ver, otherwise false. Use it like this: # # func_lt_ver "$prev_ver" "$proposed_ver" || func_fatal_error "..." func_lt_ver () { $debug_cmd test "x$1" = x`func_sort_ver "$1" "$2" | $SED 1q` } # Local variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-pattern: "10/scriptversion=%:y-%02m-%02d.%02H; # UTC" # time-stamp-time-zone: "UTC" # End: #! /bin/sh # A portable, pluggable option parser for Bourne shell. # Written by Gary V. Vaughan, 2010 # This is free software. There is NO warranty; not even for # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # # Copyright (C) 2010-2019, 2021 Bootstrap Authors # # This file is dual licensed under the terms of the MIT license # , and GPL version 2 or later # . You must apply one of # these licenses when using or redistributing this software or any of # the files within it. See the URLs above, or the file `LICENSE` # included in the Bootstrap distribution for the full license texts. # Please report bugs or propose patches to: # # Set a version string for this script. scriptversion=2019-02-19.15; # UTC ## ------ ## ## Usage. ## ## ------ ## # This file is a library for parsing options in your shell scripts along # with assorted other useful supporting features that you can make use # of too. # # For the simplest scripts you might need only: # # #!/bin/sh # . relative/path/to/funclib.sh # . relative/path/to/options-parser # scriptversion=1.0 # func_options ${1+"$@"} # eval set dummy "$func_options_result"; shift # ...rest of your script... # # In order for the '--version' option to work, you will need to have a # suitably formatted comment like the one at the top of this file # starting with '# Written by ' and ending with '# Copyright'. # # For '-h' and '--help' to work, you will also need a one line # description of your script's purpose in a comment directly above the # '# Written by ' line, like the one at the top of this file. # # The default options also support '--debug', which will turn on shell # execution tracing (see the comment above debug_cmd below for another # use), and '--verbose' and the func_verbose function to allow your script # to display verbose messages only when your user has specified # '--verbose'. # # After sourcing this file, you can plug in processing for additional # options by amending the variables from the 'Configuration' section # below, and following the instructions in the 'Option parsing' # section further down. ## -------------- ## ## Configuration. ## ## -------------- ## # You should override these variables in your script after sourcing this # file so that they reflect the customisations you have added to the # option parser. # The usage line for option parsing errors and the start of '-h' and # '--help' output messages. You can embed shell variables for delayed # expansion at the time the message is displayed, but you will need to # quote other shell meta-characters carefully to prevent them being # expanded when the contents are evaled. usage='$progpath [OPTION]...' # Short help message in response to '-h' and '--help'. Add to this or # override it after sourcing this library to reflect the full set of # options your script accepts. usage_message="\ --debug enable verbose shell tracing -W, --warnings=CATEGORY report the warnings falling in CATEGORY [all] -v, --verbose verbosely report processing --version print version information and exit -h, --help print short or long help message and exit " # Additional text appended to 'usage_message' in response to '--help'. long_help_message=" Warning categories include: 'all' show all warnings 'none' turn off all the warnings 'error' warnings are treated as fatal errors" # Help message printed before fatal option parsing errors. fatal_help="Try '\$progname --help' for more information." ## ------------------------- ## ## Hook function management. ## ## ------------------------- ## # This section contains functions for adding, removing, and running hooks # in the main code. A hook is just a list of function names that can be # run in order later on. # func_hookable FUNC_NAME # ----------------------- # Declare that FUNC_NAME will run hooks added with # 'func_add_hook FUNC_NAME ...'. func_hookable () { $debug_cmd func_append hookable_fns " $1" } # func_add_hook FUNC_NAME HOOK_FUNC # --------------------------------- # Request that FUNC_NAME call HOOK_FUNC before it returns. FUNC_NAME must # first have been declared "hookable" by a call to 'func_hookable'. func_add_hook () { $debug_cmd case " $hookable_fns " in *" $1 "*) ;; *) func_fatal_error "'$1' does not accept hook functions." ;; esac eval func_append ${1}_hooks '" $2"' } # func_remove_hook FUNC_NAME HOOK_FUNC # ------------------------------------ # Remove HOOK_FUNC from the list of hook functions to be called by # FUNC_NAME. func_remove_hook () { $debug_cmd eval ${1}_hooks='`$ECHO "\$'$1'_hooks" |$SED "s| '$2'||"`' } # func_propagate_result FUNC_NAME_A FUNC_NAME_B # --------------------------------------------- # If the *_result variable of FUNC_NAME_A _is set_, assign its value to # *_result variable of FUNC_NAME_B. func_propagate_result () { $debug_cmd func_propagate_result_result=: if eval "test \"\${${1}_result+set}\" = set" then eval "${2}_result=\$${1}_result" else func_propagate_result_result=false fi } # func_run_hooks FUNC_NAME [ARG]... # --------------------------------- # Run all hook functions registered to FUNC_NAME. # It's assumed that the list of hook functions contains nothing more # than a whitespace-delimited list of legal shell function names, and # no effort is wasted trying to catch shell meta-characters or preserve # whitespace. func_run_hooks () { $debug_cmd case " $hookable_fns " in *" $1 "*) ;; *) func_fatal_error "'$1' does not support hook functions." ;; esac eval _G_hook_fns=\$$1_hooks; shift for _G_hook in $_G_hook_fns; do func_unset "${_G_hook}_result" eval $_G_hook '${1+"$@"}' func_propagate_result $_G_hook func_run_hooks if $func_propagate_result_result; then eval set dummy "$func_run_hooks_result"; shift fi done } ## --------------- ## ## Option parsing. ## ## --------------- ## # In order to add your own option parsing hooks, you must accept the # full positional parameter list from your hook function. You may remove # or edit any options that you action, and then pass back the remaining # unprocessed options in '_result', escaped # suitably for 'eval'. # # The '_result' variable is automatically unset # before your hook gets called; for best performance, only set the # *_result variable when necessary (i.e. don't call the 'func_quote' # function unnecessarily because it can be an expensive operation on some # machines). # # Like this: # # my_options_prep () # { # $debug_cmd # # # Extend the existing usage message. # usage_message=$usage_message' # -s, --silent don'\''t print informational messages # ' # # No change in '$@' (ignored completely by this hook). Leave # # my_options_prep_result variable intact. # } # func_add_hook func_options_prep my_options_prep # # # my_silent_option () # { # $debug_cmd # # args_changed=false # # # Note that, for efficiency, we parse as many options as we can # # recognise in a loop before passing the remainder back to the # # caller on the first unrecognised argument we encounter. # while test $# -gt 0; do # opt=$1; shift # case $opt in # --silent|-s) opt_silent=: # args_changed=: # ;; # # Separate non-argument short options: # -s*) func_split_short_opt "$_G_opt" # set dummy "$func_split_short_opt_name" \ # "-$func_split_short_opt_arg" ${1+"$@"} # shift # args_changed=: # ;; # *) # Make sure the first unrecognised option "$_G_opt" # # is added back to "$@" in case we need it later, # # if $args_changed was set to 'true'. # set dummy "$_G_opt" ${1+"$@"}; shift; break ;; # esac # done # # # Only call 'func_quote' here if we processed at least one argument. # if $args_changed; then # func_quote eval ${1+"$@"} # my_silent_option_result=$func_quote_result # fi # } # func_add_hook func_parse_options my_silent_option # # # my_option_validation () # { # $debug_cmd # # $opt_silent && $opt_verbose && func_fatal_help "\ # '--silent' and '--verbose' options are mutually exclusive." # } # func_add_hook func_validate_options my_option_validation # # You'll also need to manually amend $usage_message to reflect the extra # options you parse. It's preferable to append if you can, so that # multiple option parsing hooks can be added safely. # func_options_finish [ARG]... # ---------------------------- # Finishing the option parse loop (call 'func_options' hooks ATM). func_options_finish () { $debug_cmd func_run_hooks func_options ${1+"$@"} func_propagate_result func_run_hooks func_options_finish } # func_options [ARG]... # --------------------- # All the functions called inside func_options are hookable. See the # individual implementations for details. func_hookable func_options func_options () { $debug_cmd _G_options_quoted=false for my_func in options_prep parse_options validate_options options_finish do func_unset func_${my_func}_result func_unset func_run_hooks_result eval func_$my_func '${1+"$@"}' func_propagate_result func_$my_func func_options if $func_propagate_result_result; then eval set dummy "$func_options_result"; shift _G_options_quoted=: fi done $_G_options_quoted || { # As we (func_options) are top-level options-parser function and # nobody quoted "$@" for us yet, we need to do it explicitly for # caller. func_quote eval ${1+"$@"} func_options_result=$func_quote_result } } # func_options_prep [ARG]... # -------------------------- # All initialisations required before starting the option parse loop. # Note that when calling hook functions, we pass through the list of # positional parameters. If a hook function modifies that list, and # needs to propagate that back to rest of this script, then the complete # modified list must be put in 'func_run_hooks_result' before returning. func_hookable func_options_prep func_options_prep () { $debug_cmd # Option defaults: opt_verbose=false opt_warning_types= func_run_hooks func_options_prep ${1+"$@"} func_propagate_result func_run_hooks func_options_prep } # func_parse_options [ARG]... # --------------------------- # The main option parsing loop. func_hookable func_parse_options func_parse_options () { $debug_cmd _G_parse_options_requote=false # this just eases exit handling while test $# -gt 0; do # Defer to hook functions for initial option parsing, so they # get priority in the event of reusing an option name. func_run_hooks func_parse_options ${1+"$@"} func_propagate_result func_run_hooks func_parse_options if $func_propagate_result_result; then eval set dummy "$func_parse_options_result"; shift # Even though we may have changed "$@", we passed the "$@" array # down into the hook and it quoted it for us (because we are in # this if-branch). No need to quote it again. _G_parse_options_requote=false fi # Break out of the loop if we already parsed every option. test $# -gt 0 || break # We expect that one of the options parsed in this function matches # and thus we remove _G_opt from "$@" and need to re-quote. _G_match_parse_options=: _G_opt=$1 shift case $_G_opt in --debug|-x) debug_cmd='set -x' func_echo "enabling shell trace mode" >&2 $debug_cmd ;; --no-warnings|--no-warning|--no-warn) set dummy --warnings none ${1+"$@"} shift ;; --warnings|--warning|-W) if test $# = 0 && func_missing_arg $_G_opt; then _G_parse_options_requote=: break fi case " $warning_categories $1" in *" $1 "*) # trailing space prevents matching last $1 above func_append_uniq opt_warning_types " $1" ;; *all) opt_warning_types=$warning_categories ;; *none) opt_warning_types=none warning_func=: ;; *error) opt_warning_types=$warning_categories warning_func=func_fatal_error ;; *) func_fatal_error \ "unsupported warning category: '$1'" ;; esac shift ;; --verbose|-v) opt_verbose=: ;; --version) func_version ;; -\?|-h) func_usage ;; --help) func_help ;; # Separate optargs to long options (plugins may need this): --*=*) func_split_equals "$_G_opt" set dummy "$func_split_equals_lhs" \ "$func_split_equals_rhs" ${1+"$@"} shift ;; # Separate optargs to short options: -W*) func_split_short_opt "$_G_opt" set dummy "$func_split_short_opt_name" \ "$func_split_short_opt_arg" ${1+"$@"} shift ;; # Separate non-argument short options: -\?*|-h*|-v*|-x*) func_split_short_opt "$_G_opt" set dummy "$func_split_short_opt_name" \ "-$func_split_short_opt_arg" ${1+"$@"} shift ;; --) _G_parse_options_requote=: ; break ;; -*) func_fatal_help "unrecognised option: '$_G_opt'" ;; *) set dummy "$_G_opt" ${1+"$@"}; shift _G_match_parse_options=false break ;; esac if $_G_match_parse_options; then _G_parse_options_requote=: fi done if $_G_parse_options_requote; then # save modified positional parameters for caller func_quote eval ${1+"$@"} func_parse_options_result=$func_quote_result fi } # func_validate_options [ARG]... # ------------------------------ # Perform any sanity checks on option settings and/or unconsumed # arguments. func_hookable func_validate_options func_validate_options () { $debug_cmd # Display all warnings if -W was not given. test -n "$opt_warning_types" || opt_warning_types=" $warning_categories" func_run_hooks func_validate_options ${1+"$@"} func_propagate_result func_run_hooks func_validate_options # Bail if the options were screwed! $exit_cmd $EXIT_FAILURE } ## ----------------- ## ## Helper functions. ## ## ----------------- ## # This section contains the helper functions used by the rest of the # hookable option parser framework in ascii-betical order. # func_fatal_help ARG... # ---------------------- # Echo program name prefixed message to standard error, followed by # a help hint, and exit. func_fatal_help () { $debug_cmd eval \$ECHO \""Usage: $usage"\" eval \$ECHO \""$fatal_help"\" func_error ${1+"$@"} exit $EXIT_FAILURE } # func_help # --------- # Echo long help message to standard output and exit. func_help () { $debug_cmd func_usage_message $ECHO "$long_help_message" exit 0 } # func_missing_arg ARGNAME # ------------------------ # Echo program name prefixed message to standard error and set global # exit_cmd. func_missing_arg () { $debug_cmd func_error "Missing argument for '$1'." exit_cmd=exit } # func_split_equals STRING # ------------------------ # Set func_split_equals_lhs and func_split_equals_rhs shell variables # after splitting STRING at the '=' sign. test -z "$_G_HAVE_XSI_OPS" \ && (eval 'x=a/b/c; test 5aa/bb/cc = "${#x}${x%%/*}${x%/*}${x#*/}${x##*/}"') 2>/dev/null \ && _G_HAVE_XSI_OPS=yes if test yes = "$_G_HAVE_XSI_OPS" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_split_equals () { $debug_cmd func_split_equals_lhs=${1%%=*} func_split_equals_rhs=${1#*=} if test "x$func_split_equals_lhs" = "x$1"; then func_split_equals_rhs= fi }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_split_equals () { $debug_cmd func_split_equals_lhs=`expr "x$1" : 'x\([^=]*\)'` func_split_equals_rhs= test "x$func_split_equals_lhs=" = "x$1" \ || func_split_equals_rhs=`expr "x$1" : 'x[^=]*=\(.*\)$'` } fi #func_split_equals # func_split_short_opt SHORTOPT # ----------------------------- # Set func_split_short_opt_name and func_split_short_opt_arg shell # variables after splitting SHORTOPT after the 2nd character. if test yes = "$_G_HAVE_XSI_OPS" then # This is an XSI compatible shell, allowing a faster implementation... eval 'func_split_short_opt () { $debug_cmd func_split_short_opt_arg=${1#??} func_split_short_opt_name=${1%"$func_split_short_opt_arg"} }' else # ...otherwise fall back to using expr, which is often a shell builtin. func_split_short_opt () { $debug_cmd func_split_short_opt_name=`expr "x$1" : 'x\(-.\)'` func_split_short_opt_arg=`expr "x$1" : 'x-.\(.*\)$'` } fi #func_split_short_opt # func_usage # ---------- # Echo short help message to standard output and exit. func_usage () { $debug_cmd func_usage_message $ECHO "Run '$progname --help |${PAGER-more}' for full usage" exit 0 } # func_usage_message # ------------------ # Echo short help message to standard output. func_usage_message () { $debug_cmd eval \$ECHO \""Usage: $usage"\" echo $SED -n 's|^# || /^Written by/{ x;p;x } h /^Written by/q' < "$progpath" echo eval \$ECHO \""$usage_message"\" } # func_version # ------------ # Echo version message to standard output and exit. # The version message is extracted from the calling file's header # comments, with leading '# ' stripped: # 1. First display the progname and version # 2. Followed by the header comment line matching /^# Written by / # 3. Then a blank line followed by the first following line matching # /^# Copyright / # 4. Immediately followed by any lines between the previous matches, # except lines preceding the intervening completely blank line. # For example, see the header comments of this file. func_version () { $debug_cmd printf '%s\n' "$progname $scriptversion" $SED -n ' /^# Written by /!b s|^# ||; p; n :fwd2blnk /./ { n b fwd2blnk } p; n :holdwrnt s|^# || s|^# *$|| /^Copyright /!{ /./H n b holdwrnt } s|\((C)\)[ 0-9,-]*[ ,-]\([1-9][0-9]* \)|\1 \2| G s|\(\n\)\n*|\1|g p; q' < "$progpath" exit $? } # Local variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-pattern: "30/scriptversion=%:y-%02m-%02d.%02H; # UTC" # time-stamp-time-zone: "UTC" # End: # Set a version string. scriptversion='(GNU libtool) 2.4.7' # func_echo ARG... # ---------------- # Libtool also displays the current mode in messages, so override # funclib.sh func_echo with this custom definition. func_echo () { $debug_cmd _G_message=$* func_echo_IFS=$IFS IFS=$nl for _G_line in $_G_message; do IFS=$func_echo_IFS $ECHO "$progname${opt_mode+: $opt_mode}: $_G_line" done IFS=$func_echo_IFS } # func_warning ARG... # ------------------- # Libtool warnings are not categorized, so override funclib.sh # func_warning with this simpler definition. func_warning () { $debug_cmd $warning_func ${1+"$@"} } ## ---------------- ## ## Options parsing. ## ## ---------------- ## # Hook in the functions to make sure our own options are parsed during # the option parsing loop. usage='$progpath [OPTION]... [MODE-ARG]...' # Short help message in response to '-h'. usage_message="Options: --config show all configuration variables --debug enable verbose shell tracing -n, --dry-run display commands without modifying any files --features display basic configuration information and exit --mode=MODE use operation mode MODE --no-warnings equivalent to '-Wnone' --preserve-dup-deps don't remove duplicate dependency libraries --quiet, --silent don't print informational messages --tag=TAG use configuration variables from tag TAG -v, --verbose print more informational messages than default --version print version information -W, --warnings=CATEGORY report the warnings falling in CATEGORY [all] -h, --help, --help-all print short, long, or detailed help message " # Additional text appended to 'usage_message' in response to '--help'. func_help () { $debug_cmd func_usage_message $ECHO "$long_help_message MODE must be one of the following: clean remove files from the build directory compile compile a source file into a libtool object execute automatically set library path, then run a program finish complete the installation of libtool libraries install install libraries or executables link create a library or an executable uninstall remove libraries from an installed directory MODE-ARGS vary depending on the MODE. When passed as first option, '--mode=MODE' may be abbreviated as 'MODE' or a unique abbreviation of that. Try '$progname --help --mode=MODE' for a more detailed description of MODE. When reporting a bug, please describe a test case to reproduce it and include the following information: host-triplet: $host shell: $SHELL compiler: $LTCC compiler flags: $LTCFLAGS linker: $LD (gnu? $with_gnu_ld) version: $progname (GNU libtool) 2.4.7 automake: `($AUTOMAKE --version) 2>/dev/null |$SED 1q` autoconf: `($AUTOCONF --version) 2>/dev/null |$SED 1q` Report bugs to . GNU libtool home page: . General help using GNU software: ." exit 0 } # func_lo2o OBJECT-NAME # --------------------- # Transform OBJECT-NAME from a '.lo' suffix to the platform specific # object suffix. lo2o=s/\\.lo\$/.$objext/ o2lo=s/\\.$objext\$/.lo/ if test yes = "$_G_HAVE_XSI_OPS"; then eval 'func_lo2o () { case $1 in *.lo) func_lo2o_result=${1%.lo}.$objext ;; * ) func_lo2o_result=$1 ;; esac }' # func_xform LIBOBJ-OR-SOURCE # --------------------------- # Transform LIBOBJ-OR-SOURCE from a '.o' or '.c' (or otherwise) # suffix to a '.lo' libtool-object suffix. eval 'func_xform () { func_xform_result=${1%.*}.lo }' else # ...otherwise fall back to using sed. func_lo2o () { func_lo2o_result=`$ECHO "$1" | $SED "$lo2o"` } func_xform () { func_xform_result=`$ECHO "$1" | $SED 's|\.[^.]*$|.lo|'` } fi # func_fatal_configuration ARG... # ------------------------------- # Echo program name prefixed message to standard error, followed by # a configuration failure hint, and exit. func_fatal_configuration () { func_fatal_error ${1+"$@"} \ "See the $PACKAGE documentation for more information." \ "Fatal configuration error." } # func_config # ----------- # Display the configuration for all the tags in this script. func_config () { re_begincf='^# ### BEGIN LIBTOOL' re_endcf='^# ### END LIBTOOL' # Default configuration. $SED "1,/$re_begincf CONFIG/d;/$re_endcf CONFIG/,\$d" < "$progpath" # Now print the configurations for the tags. for tagname in $taglist; do $SED -n "/$re_begincf TAG CONFIG: $tagname\$/,/$re_endcf TAG CONFIG: $tagname\$/p" < "$progpath" done exit $? } # func_features # ------------- # Display the features supported by this script. func_features () { echo "host: $host" if test yes = "$build_libtool_libs"; then echo "enable shared libraries" else echo "disable shared libraries" fi if test yes = "$build_old_libs"; then echo "enable static libraries" else echo "disable static libraries" fi exit $? } # func_enable_tag TAGNAME # ----------------------- # Verify that TAGNAME is valid, and either flag an error and exit, or # enable the TAGNAME tag. We also add TAGNAME to the global $taglist # variable here. func_enable_tag () { # Global variable: tagname=$1 re_begincf="^# ### BEGIN LIBTOOL TAG CONFIG: $tagname\$" re_endcf="^# ### END LIBTOOL TAG CONFIG: $tagname\$" sed_extractcf=/$re_begincf/,/$re_endcf/p # Validate tagname. case $tagname in *[!-_A-Za-z0-9,/]*) func_fatal_error "invalid tag name: $tagname" ;; esac # Don't test for the "default" C tag, as we know it's # there but not specially marked. case $tagname in CC) ;; *) if $GREP "$re_begincf" "$progpath" >/dev/null 2>&1; then taglist="$taglist $tagname" # Evaluate the configuration. Be careful to quote the path # and the sed script, to avoid splitting on whitespace, but # also don't use non-portable quotes within backquotes within # quotes we have to do it in 2 steps: extractedcf=`$SED -n -e "$sed_extractcf" < "$progpath"` eval "$extractedcf" else func_error "ignoring unknown tag $tagname" fi ;; esac } # func_check_version_match # ------------------------ # Ensure that we are using m4 macros, and libtool script from the same # release of libtool. func_check_version_match () { if test "$package_revision" != "$macro_revision"; then if test "$VERSION" != "$macro_version"; then if test -z "$macro_version"; then cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, but the $progname: definition of this LT_INIT comes from an older release. $progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION $progname: and run autoconf again. _LT_EOF else cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, but the $progname: definition of this LT_INIT comes from $PACKAGE $macro_version. $progname: You should recreate aclocal.m4 with macros from $PACKAGE $VERSION $progname: and run autoconf again. _LT_EOF fi else cat >&2 <<_LT_EOF $progname: Version mismatch error. This is $PACKAGE $VERSION, revision $package_revision, $progname: but the definition of this LT_INIT comes from revision $macro_revision. $progname: You should recreate aclocal.m4 with macros from revision $package_revision $progname: of $PACKAGE $VERSION and run autoconf again. _LT_EOF fi exit $EXIT_MISMATCH fi } # libtool_options_prep [ARG]... # ----------------------------- # Preparation for options parsed by libtool. libtool_options_prep () { $debug_mode # Option defaults: opt_config=false opt_dlopen= opt_dry_run=false opt_help=false opt_mode= opt_preserve_dup_deps=false opt_quiet=false nonopt= preserve_args= _G_rc_lt_options_prep=: # Shorthand for --mode=foo, only valid as the first argument case $1 in clean|clea|cle|cl) shift; set dummy --mode clean ${1+"$@"}; shift ;; compile|compil|compi|comp|com|co|c) shift; set dummy --mode compile ${1+"$@"}; shift ;; execute|execut|execu|exec|exe|ex|e) shift; set dummy --mode execute ${1+"$@"}; shift ;; finish|finis|fini|fin|fi|f) shift; set dummy --mode finish ${1+"$@"}; shift ;; install|instal|insta|inst|ins|in|i) shift; set dummy --mode install ${1+"$@"}; shift ;; link|lin|li|l) shift; set dummy --mode link ${1+"$@"}; shift ;; uninstall|uninstal|uninsta|uninst|unins|unin|uni|un|u) shift; set dummy --mode uninstall ${1+"$@"}; shift ;; *) _G_rc_lt_options_prep=false ;; esac if $_G_rc_lt_options_prep; then # Pass back the list of options. func_quote eval ${1+"$@"} libtool_options_prep_result=$func_quote_result fi } func_add_hook func_options_prep libtool_options_prep # libtool_parse_options [ARG]... # --------------------------------- # Provide handling for libtool specific options. libtool_parse_options () { $debug_cmd _G_rc_lt_parse_options=false # Perform our own loop to consume as many options as possible in # each iteration. while test $# -gt 0; do _G_match_lt_parse_options=: _G_opt=$1 shift case $_G_opt in --dry-run|--dryrun|-n) opt_dry_run=: ;; --config) func_config ;; --dlopen|-dlopen) opt_dlopen="${opt_dlopen+$opt_dlopen }$1" shift ;; --preserve-dup-deps) opt_preserve_dup_deps=: ;; --features) func_features ;; --finish) set dummy --mode finish ${1+"$@"}; shift ;; --help) opt_help=: ;; --help-all) opt_help=': help-all' ;; --mode) test $# = 0 && func_missing_arg $_G_opt && break opt_mode=$1 case $1 in # Valid mode arguments: clean|compile|execute|finish|install|link|relink|uninstall) ;; # Catch anything else as an error *) func_error "invalid argument for $_G_opt" exit_cmd=exit break ;; esac shift ;; --no-silent|--no-quiet) opt_quiet=false func_append preserve_args " $_G_opt" ;; --no-warnings|--no-warning|--no-warn) opt_warning=false func_append preserve_args " $_G_opt" ;; --no-verbose) opt_verbose=false func_append preserve_args " $_G_opt" ;; --silent|--quiet) opt_quiet=: opt_verbose=false func_append preserve_args " $_G_opt" ;; --tag) test $# = 0 && func_missing_arg $_G_opt && break opt_tag=$1 func_append preserve_args " $_G_opt $1" func_enable_tag "$1" shift ;; --verbose|-v) opt_quiet=false opt_verbose=: func_append preserve_args " $_G_opt" ;; # An option not handled by this hook function: *) set dummy "$_G_opt" ${1+"$@"} ; shift _G_match_lt_parse_options=false break ;; esac $_G_match_lt_parse_options && _G_rc_lt_parse_options=: done if $_G_rc_lt_parse_options; then # save modified positional parameters for caller func_quote eval ${1+"$@"} libtool_parse_options_result=$func_quote_result fi } func_add_hook func_parse_options libtool_parse_options # libtool_validate_options [ARG]... # --------------------------------- # Perform any sanity checks on option settings and/or unconsumed # arguments. libtool_validate_options () { # save first non-option argument if test 0 -lt $#; then nonopt=$1 shift fi # preserve --debug test : = "$debug_cmd" || func_append preserve_args " --debug" case $host in # Solaris2 added to fix http://debbugs.gnu.org/cgi/bugreport.cgi?bug=16452 # see also: http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59788 *cygwin* | *mingw* | *pw32* | *cegcc* | *solaris2* | *os2*) # don't eliminate duplications in $postdeps and $predeps opt_duplicate_compiler_generated_deps=: ;; *) opt_duplicate_compiler_generated_deps=$opt_preserve_dup_deps ;; esac $opt_help || { # Sanity checks first: func_check_version_match test yes != "$build_libtool_libs" \ && test yes != "$build_old_libs" \ && func_fatal_configuration "not configured to build any kind of library" # Darwin sucks eval std_shrext=\"$shrext_cmds\" # Only execute mode is allowed to have -dlopen flags. if test -n "$opt_dlopen" && test execute != "$opt_mode"; then func_error "unrecognized option '-dlopen'" $ECHO "$help" 1>&2 exit $EXIT_FAILURE fi # Change the help message to a mode-specific one. generic_help=$help help="Try '$progname --help --mode=$opt_mode' for more information." } # Pass back the unparsed argument list func_quote eval ${1+"$@"} libtool_validate_options_result=$func_quote_result } func_add_hook func_validate_options libtool_validate_options # Process options as early as possible so that --help and --version # can return quickly. func_options ${1+"$@"} eval set dummy "$func_options_result"; shift ## ----------- ## ## Main. ## ## ----------- ## magic='%%%MAGIC variable%%%' magic_exe='%%%MAGIC EXE variable%%%' # Global variables. extracted_archives= extracted_serial=0 # If this variable is set in any of the actions, the command in it # will be execed at the end. This prevents here-documents from being # left over by shells. exec_cmd= # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF $1 _LTECHO_EOF' } # func_generated_by_libtool # True iff stdin has been generated by Libtool. This function is only # a basic sanity check; it will hardly flush out determined imposters. func_generated_by_libtool_p () { $GREP "^# Generated by .*$PACKAGE" > /dev/null 2>&1 } # func_lalib_p file # True iff FILE is a libtool '.la' library or '.lo' object file. # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_lalib_p () { test -f "$1" && $SED -e 4q "$1" 2>/dev/null | func_generated_by_libtool_p } # func_lalib_unsafe_p file # True iff FILE is a libtool '.la' library or '.lo' object file. # This function implements the same check as func_lalib_p without # resorting to external programs. To this end, it redirects stdin and # closes it afterwards, without saving the original file descriptor. # As a safety measure, use it only where a negative result would be # fatal anyway. Works if 'file' does not exist. func_lalib_unsafe_p () { lalib_p=no if test -f "$1" && test -r "$1" && exec 5<&0 <"$1"; then for lalib_p_l in 1 2 3 4 do read lalib_p_line case $lalib_p_line in \#\ Generated\ by\ *$PACKAGE* ) lalib_p=yes; break;; esac done exec 0<&5 5<&- fi test yes = "$lalib_p" } # func_ltwrapper_script_p file # True iff FILE is a libtool wrapper script # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_script_p () { test -f "$1" && $lt_truncate_bin < "$1" 2>/dev/null | func_generated_by_libtool_p } # func_ltwrapper_executable_p file # True iff FILE is a libtool wrapper executable # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_executable_p () { func_ltwrapper_exec_suffix= case $1 in *.exe) ;; *) func_ltwrapper_exec_suffix=.exe ;; esac $GREP "$magic_exe" "$1$func_ltwrapper_exec_suffix" >/dev/null 2>&1 } # func_ltwrapper_scriptname file # Assumes file is an ltwrapper_executable # uses $file to determine the appropriate filename for a # temporary ltwrapper_script. func_ltwrapper_scriptname () { func_dirname_and_basename "$1" "" "." func_stripname '' '.exe' "$func_basename_result" func_ltwrapper_scriptname_result=$func_dirname_result/$objdir/${func_stripname_result}_ltshwrapper } # func_ltwrapper_p file # True iff FILE is a libtool wrapper script or wrapper executable # This function is only a basic sanity check; it will hardly flush out # determined imposters. func_ltwrapper_p () { func_ltwrapper_script_p "$1" || func_ltwrapper_executable_p "$1" } # func_execute_cmds commands fail_cmd # Execute tilde-delimited COMMANDS. # If FAIL_CMD is given, eval that upon failure. # FAIL_CMD may read-access the current command in variable CMD! func_execute_cmds () { $debug_cmd save_ifs=$IFS; IFS='~' for cmd in $1; do IFS=$sp$nl eval cmd=\"$cmd\" IFS=$save_ifs func_show_eval "$cmd" "${2-:}" done IFS=$save_ifs } # func_source file # Source FILE, adding directory component if necessary. # Note that it is not necessary on cygwin/mingw to append a dot to # FILE even if both FILE and FILE.exe exist: automatic-append-.exe # behavior happens only for exec(3), not for open(2)! Also, sourcing # 'FILE.' does not work on cygwin managed mounts. func_source () { $debug_cmd case $1 in */* | *\\*) . "$1" ;; *) . "./$1" ;; esac } # func_resolve_sysroot PATH # Replace a leading = in PATH with a sysroot. Store the result into # func_resolve_sysroot_result func_resolve_sysroot () { func_resolve_sysroot_result=$1 case $func_resolve_sysroot_result in =*) func_stripname '=' '' "$func_resolve_sysroot_result" func_resolve_sysroot_result=$lt_sysroot$func_stripname_result ;; esac } # func_replace_sysroot PATH # If PATH begins with the sysroot, replace it with = and # store the result into func_replace_sysroot_result. func_replace_sysroot () { case $lt_sysroot:$1 in ?*:"$lt_sysroot"*) func_stripname "$lt_sysroot" '' "$1" func_replace_sysroot_result='='$func_stripname_result ;; *) # Including no sysroot. func_replace_sysroot_result=$1 ;; esac } # func_infer_tag arg # Infer tagged configuration to use if any are available and # if one wasn't chosen via the "--tag" command line option. # Only attempt this if the compiler in the base compile # command doesn't match the default compiler. # arg is usually of the form 'gcc ...' func_infer_tag () { $debug_cmd if test -n "$available_tags" && test -z "$tagname"; then CC_quoted= for arg in $CC; do func_append_quoted CC_quoted "$arg" done CC_expanded=`func_echo_all $CC` CC_quoted_expanded=`func_echo_all $CC_quoted` case $@ in # Blanks in the command may have been stripped by the calling shell, # but not from the CC environment variable when configure was run. " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \ " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) ;; # Blanks at the start of $base_compile will cause this to fail # if we don't check for them as well. *) for z in $available_tags; do if $GREP "^# ### BEGIN LIBTOOL TAG CONFIG: $z$" < "$progpath" > /dev/null; then # Evaluate the configuration. eval "`$SED -n -e '/^# ### BEGIN LIBTOOL TAG CONFIG: '$z'$/,/^# ### END LIBTOOL TAG CONFIG: '$z'$/p' < $progpath`" CC_quoted= for arg in $CC; do # Double-quote args containing other shell metacharacters. func_append_quoted CC_quoted "$arg" done CC_expanded=`func_echo_all $CC` CC_quoted_expanded=`func_echo_all $CC_quoted` case "$@ " in " $CC "* | "$CC "* | " $CC_expanded "* | "$CC_expanded "* | \ " $CC_quoted"* | "$CC_quoted "* | " $CC_quoted_expanded "* | "$CC_quoted_expanded "*) # The compiler in the base compile command matches # the one in the tagged configuration. # Assume this is the tagged configuration we want. tagname=$z break ;; esac fi done # If $tagname still isn't set, then no tagged configuration # was found and let the user know that the "--tag" command # line option must be used. if test -z "$tagname"; then func_echo "unable to infer tagged configuration" func_fatal_error "specify a tag with '--tag'" # else # func_verbose "using $tagname tagged configuration" fi ;; esac fi } # func_write_libtool_object output_name pic_name nonpic_name # Create a libtool object file (analogous to a ".la" file), # but don't create it if we're doing a dry run. func_write_libtool_object () { write_libobj=$1 if test yes = "$build_libtool_libs"; then write_lobj=\'$2\' else write_lobj=none fi if test yes = "$build_old_libs"; then write_oldobj=\'$3\' else write_oldobj=none fi $opt_dry_run || { cat >${write_libobj}T </dev/null` if test "$?" -eq 0 && test -n "$func_convert_core_file_wine_to_w32_tmp"; then func_convert_core_file_wine_to_w32_result=`$ECHO "$func_convert_core_file_wine_to_w32_tmp" | $SED -e "$sed_naive_backslashify"` else func_convert_core_file_wine_to_w32_result= fi fi } # end: func_convert_core_file_wine_to_w32 # func_convert_core_path_wine_to_w32 ARG # Helper function used by path conversion functions when $build is *nix, and # $host is mingw, cygwin, or some other w32 environment. Relies on a correctly # configured wine environment available, with the winepath program in $build's # $PATH. Assumes ARG has no leading or trailing path separator characters. # # ARG is path to be converted from $build format to win32. # Result is available in $func_convert_core_path_wine_to_w32_result. # Unconvertible file (directory) names in ARG are skipped; if no directory names # are convertible, then the result may be empty. func_convert_core_path_wine_to_w32 () { $debug_cmd # unfortunately, winepath doesn't convert paths, only file names func_convert_core_path_wine_to_w32_result= if test -n "$1"; then oldIFS=$IFS IFS=: for func_convert_core_path_wine_to_w32_f in $1; do IFS=$oldIFS func_convert_core_file_wine_to_w32 "$func_convert_core_path_wine_to_w32_f" if test -n "$func_convert_core_file_wine_to_w32_result"; then if test -z "$func_convert_core_path_wine_to_w32_result"; then func_convert_core_path_wine_to_w32_result=$func_convert_core_file_wine_to_w32_result else func_append func_convert_core_path_wine_to_w32_result ";$func_convert_core_file_wine_to_w32_result" fi fi done IFS=$oldIFS fi } # end: func_convert_core_path_wine_to_w32 # func_cygpath ARGS... # Wrapper around calling the cygpath program via LT_CYGPATH. This is used when # when (1) $build is *nix and Cygwin is hosted via a wine environment; or (2) # $build is MSYS and $host is Cygwin, or (3) $build is Cygwin. In case (1) or # (2), returns the Cygwin file name or path in func_cygpath_result (input # file name or path is assumed to be in w32 format, as previously converted # from $build's *nix or MSYS format). In case (3), returns the w32 file name # or path in func_cygpath_result (input file name or path is assumed to be in # Cygwin format). Returns an empty string on error. # # ARGS are passed to cygpath, with the last one being the file name or path to # be converted. # # Specify the absolute *nix (or w32) name to cygpath in the LT_CYGPATH # environment variable; do not put it in $PATH. func_cygpath () { $debug_cmd if test -n "$LT_CYGPATH" && test -f "$LT_CYGPATH"; then func_cygpath_result=`$LT_CYGPATH "$@" 2>/dev/null` if test "$?" -ne 0; then # on failure, ensure result is empty func_cygpath_result= fi else func_cygpath_result= func_error "LT_CYGPATH is empty or specifies non-existent file: '$LT_CYGPATH'" fi } #end: func_cygpath # func_convert_core_msys_to_w32 ARG # Convert file name or path ARG from MSYS format to w32 format. Return # result in func_convert_core_msys_to_w32_result. func_convert_core_msys_to_w32 () { $debug_cmd # awkward: cmd appends spaces to result func_convert_core_msys_to_w32_result=`( cmd //c echo "$1" ) 2>/dev/null | $SED -e 's/[ ]*$//' -e "$sed_naive_backslashify"` } #end: func_convert_core_msys_to_w32 # func_convert_file_check ARG1 ARG2 # Verify that ARG1 (a file name in $build format) was converted to $host # format in ARG2. Otherwise, emit an error message, but continue (resetting # func_to_host_file_result to ARG1). func_convert_file_check () { $debug_cmd if test -z "$2" && test -n "$1"; then func_error "Could not determine host file name corresponding to" func_error " '$1'" func_error "Continuing, but uninstalled executables may not work." # Fallback: func_to_host_file_result=$1 fi } # end func_convert_file_check # func_convert_path_check FROM_PATHSEP TO_PATHSEP FROM_PATH TO_PATH # Verify that FROM_PATH (a path in $build format) was converted to $host # format in TO_PATH. Otherwise, emit an error message, but continue, resetting # func_to_host_file_result to a simplistic fallback value (see below). func_convert_path_check () { $debug_cmd if test -z "$4" && test -n "$3"; then func_error "Could not determine the host path corresponding to" func_error " '$3'" func_error "Continuing, but uninstalled executables may not work." # Fallback. This is a deliberately simplistic "conversion" and # should not be "improved". See libtool.info. if test "x$1" != "x$2"; then lt_replace_pathsep_chars="s|$1|$2|g" func_to_host_path_result=`echo "$3" | $SED -e "$lt_replace_pathsep_chars"` else func_to_host_path_result=$3 fi fi } # end func_convert_path_check # func_convert_path_front_back_pathsep FRONTPAT BACKPAT REPL ORIG # Modifies func_to_host_path_result by prepending REPL if ORIG matches FRONTPAT # and appending REPL if ORIG matches BACKPAT. func_convert_path_front_back_pathsep () { $debug_cmd case $4 in $1 ) func_to_host_path_result=$3$func_to_host_path_result ;; esac case $4 in $2 ) func_append func_to_host_path_result "$3" ;; esac } # end func_convert_path_front_back_pathsep ################################################## # $build to $host FILE NAME CONVERSION FUNCTIONS # ################################################## # invoked via '$to_host_file_cmd ARG' # # In each case, ARG is the path to be converted from $build to $host format. # Result will be available in $func_to_host_file_result. # func_to_host_file ARG # Converts the file name ARG from $build format to $host format. Return result # in func_to_host_file_result. func_to_host_file () { $debug_cmd $to_host_file_cmd "$1" } # end func_to_host_file # func_to_tool_file ARG LAZY # converts the file name ARG from $build format to toolchain format. Return # result in func_to_tool_file_result. If the conversion in use is listed # in (the comma separated) LAZY, no conversion takes place. func_to_tool_file () { $debug_cmd case ,$2, in *,"$to_tool_file_cmd",*) func_to_tool_file_result=$1 ;; *) $to_tool_file_cmd "$1" func_to_tool_file_result=$func_to_host_file_result ;; esac } # end func_to_tool_file # func_convert_file_noop ARG # Copy ARG to func_to_host_file_result. func_convert_file_noop () { func_to_host_file_result=$1 } # end func_convert_file_noop # func_convert_file_msys_to_w32 ARG # Convert file name ARG from (mingw) MSYS to (mingw) w32 format; automatic # conversion to w32 is not available inside the cwrapper. Returns result in # func_to_host_file_result. func_convert_file_msys_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_msys_to_w32 "$1" func_to_host_file_result=$func_convert_core_msys_to_w32_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_msys_to_w32 # func_convert_file_cygwin_to_w32 ARG # Convert file name ARG from Cygwin to w32 format. Returns result in # func_to_host_file_result. func_convert_file_cygwin_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then # because $build is cygwin, we call "the" cygpath in $PATH; no need to use # LT_CYGPATH in this case. func_to_host_file_result=`cygpath -m "$1"` fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_cygwin_to_w32 # func_convert_file_nix_to_w32 ARG # Convert file name ARG from *nix to w32 format. Requires a wine environment # and a working winepath. Returns result in func_to_host_file_result. func_convert_file_nix_to_w32 () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_file_wine_to_w32 "$1" func_to_host_file_result=$func_convert_core_file_wine_to_w32_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_nix_to_w32 # func_convert_file_msys_to_cygwin ARG # Convert file name ARG from MSYS to Cygwin format. Requires LT_CYGPATH set. # Returns result in func_to_host_file_result. func_convert_file_msys_to_cygwin () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then func_convert_core_msys_to_w32 "$1" func_cygpath -u "$func_convert_core_msys_to_w32_result" func_to_host_file_result=$func_cygpath_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_msys_to_cygwin # func_convert_file_nix_to_cygwin ARG # Convert file name ARG from *nix to Cygwin format. Requires Cygwin installed # in a wine environment, working winepath, and LT_CYGPATH set. Returns result # in func_to_host_file_result. func_convert_file_nix_to_cygwin () { $debug_cmd func_to_host_file_result=$1 if test -n "$1"; then # convert from *nix to w32, then use cygpath to convert from w32 to cygwin. func_convert_core_file_wine_to_w32 "$1" func_cygpath -u "$func_convert_core_file_wine_to_w32_result" func_to_host_file_result=$func_cygpath_result fi func_convert_file_check "$1" "$func_to_host_file_result" } # end func_convert_file_nix_to_cygwin ############################################# # $build to $host PATH CONVERSION FUNCTIONS # ############################################# # invoked via '$to_host_path_cmd ARG' # # In each case, ARG is the path to be converted from $build to $host format. # The result will be available in $func_to_host_path_result. # # Path separators are also converted from $build format to $host format. If # ARG begins or ends with a path separator character, it is preserved (but # converted to $host format) on output. # # All path conversion functions are named using the following convention: # file name conversion function : func_convert_file_X_to_Y () # path conversion function : func_convert_path_X_to_Y () # where, for any given $build/$host combination the 'X_to_Y' value is the # same. If conversion functions are added for new $build/$host combinations, # the two new functions must follow this pattern, or func_init_to_host_path_cmd # will break. # func_init_to_host_path_cmd # Ensures that function "pointer" variable $to_host_path_cmd is set to the # appropriate value, based on the value of $to_host_file_cmd. to_host_path_cmd= func_init_to_host_path_cmd () { $debug_cmd if test -z "$to_host_path_cmd"; then func_stripname 'func_convert_file_' '' "$to_host_file_cmd" to_host_path_cmd=func_convert_path_$func_stripname_result fi } # func_to_host_path ARG # Converts the path ARG from $build format to $host format. Return result # in func_to_host_path_result. func_to_host_path () { $debug_cmd func_init_to_host_path_cmd $to_host_path_cmd "$1" } # end func_to_host_path # func_convert_path_noop ARG # Copy ARG to func_to_host_path_result. func_convert_path_noop () { func_to_host_path_result=$1 } # end func_convert_path_noop # func_convert_path_msys_to_w32 ARG # Convert path ARG from (mingw) MSYS to (mingw) w32 format; automatic # conversion to w32 is not available inside the cwrapper. Returns result in # func_to_host_path_result. func_convert_path_msys_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # Remove leading and trailing path separator characters from ARG. MSYS # behavior is inconsistent here; cygpath turns them into '.;' and ';.'; # and winepath ignores them completely. func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_msys_to_w32 "$func_to_host_path_tmp1" func_to_host_path_result=$func_convert_core_msys_to_w32_result func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_msys_to_w32 # func_convert_path_cygwin_to_w32 ARG # Convert path ARG from Cygwin to w32 format. Returns result in # func_to_host_file_result. func_convert_path_cygwin_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_to_host_path_result=`cygpath -m -p "$func_to_host_path_tmp1"` func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_cygwin_to_w32 # func_convert_path_nix_to_w32 ARG # Convert path ARG from *nix to w32 format. Requires a wine environment and # a working winepath. Returns result in func_to_host_file_result. func_convert_path_nix_to_w32 () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1" func_to_host_path_result=$func_convert_core_path_wine_to_w32_result func_convert_path_check : ";" \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" ";" "$1" fi } # end func_convert_path_nix_to_w32 # func_convert_path_msys_to_cygwin ARG # Convert path ARG from MSYS to Cygwin format. Requires LT_CYGPATH set. # Returns result in func_to_host_file_result. func_convert_path_msys_to_cygwin () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # See func_convert_path_msys_to_w32: func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_msys_to_w32 "$func_to_host_path_tmp1" func_cygpath -u -p "$func_convert_core_msys_to_w32_result" func_to_host_path_result=$func_cygpath_result func_convert_path_check : : \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" : "$1" fi } # end func_convert_path_msys_to_cygwin # func_convert_path_nix_to_cygwin ARG # Convert path ARG from *nix to Cygwin format. Requires Cygwin installed in a # a wine environment, working winepath, and LT_CYGPATH set. Returns result in # func_to_host_file_result. func_convert_path_nix_to_cygwin () { $debug_cmd func_to_host_path_result=$1 if test -n "$1"; then # Remove leading and trailing path separator characters from # ARG. msys behavior is inconsistent here, cygpath turns them # into '.;' and ';.', and winepath ignores them completely. func_stripname : : "$1" func_to_host_path_tmp1=$func_stripname_result func_convert_core_path_wine_to_w32 "$func_to_host_path_tmp1" func_cygpath -u -p "$func_convert_core_path_wine_to_w32_result" func_to_host_path_result=$func_cygpath_result func_convert_path_check : : \ "$func_to_host_path_tmp1" "$func_to_host_path_result" func_convert_path_front_back_pathsep ":*" "*:" : "$1" fi } # end func_convert_path_nix_to_cygwin # func_dll_def_p FILE # True iff FILE is a Windows DLL '.def' file. # Keep in sync with _LT_DLL_DEF_P in libtool.m4 func_dll_def_p () { $debug_cmd func_dll_def_p_tmp=`$SED -n \ -e 's/^[ ]*//' \ -e '/^\(;.*\)*$/d' \ -e 's/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p' \ -e q \ "$1"` test DEF = "$func_dll_def_p_tmp" } # func_mode_compile arg... func_mode_compile () { $debug_cmd # Get the compilation command and the source file. base_compile= srcfile=$nonopt # always keep a non-empty value in "srcfile" suppress_opt=yes suppress_output= arg_mode=normal libobj= later= pie_flag= for arg do case $arg_mode in arg ) # do not "continue". Instead, add this to base_compile lastarg=$arg arg_mode=normal ;; target ) libobj=$arg arg_mode=normal continue ;; normal ) # Accept any command-line options. case $arg in -o) test -n "$libobj" && \ func_fatal_error "you cannot specify '-o' more than once" arg_mode=target continue ;; -pie | -fpie | -fPIE) func_append pie_flag " $arg" continue ;; -shared | -static | -prefer-pic | -prefer-non-pic) func_append later " $arg" continue ;; -no-suppress) suppress_opt=no continue ;; -Xcompiler) arg_mode=arg # the next one goes into the "base_compile" arg list continue # The current "srcfile" will either be retained or ;; # replaced later. I would guess that would be a bug. -Wc,*) func_stripname '-Wc,' '' "$arg" args=$func_stripname_result lastarg= save_ifs=$IFS; IFS=, for arg in $args; do IFS=$save_ifs func_append_quoted lastarg "$arg" done IFS=$save_ifs func_stripname ' ' '' "$lastarg" lastarg=$func_stripname_result # Add the arguments to base_compile. func_append base_compile " $lastarg" continue ;; *) # Accept the current argument as the source file. # The previous "srcfile" becomes the current argument. # lastarg=$srcfile srcfile=$arg ;; esac # case $arg ;; esac # case $arg_mode # Aesthetically quote the previous argument. func_append_quoted base_compile "$lastarg" done # for arg case $arg_mode in arg) func_fatal_error "you must specify an argument for -Xcompile" ;; target) func_fatal_error "you must specify a target with '-o'" ;; *) # Get the name of the library object. test -z "$libobj" && { func_basename "$srcfile" libobj=$func_basename_result } ;; esac # Recognize several different file suffixes. # If the user specifies -o file.o, it is replaced with file.lo case $libobj in *.[cCFSifmso] | \ *.ada | *.adb | *.ads | *.asm | \ *.c++ | *.cc | *.ii | *.class | *.cpp | *.cxx | \ *.[fF][09]? | *.for | *.java | *.go | *.obj | *.sx | *.cu | *.cup) func_xform "$libobj" libobj=$func_xform_result ;; esac case $libobj in *.lo) func_lo2o "$libobj"; obj=$func_lo2o_result ;; *) func_fatal_error "cannot determine name of library object from '$libobj'" ;; esac func_infer_tag $base_compile for arg in $later; do case $arg in -shared) test yes = "$build_libtool_libs" \ || func_fatal_configuration "cannot build a shared library" build_old_libs=no continue ;; -static) build_libtool_libs=no build_old_libs=yes continue ;; -prefer-pic) pic_mode=yes continue ;; -prefer-non-pic) pic_mode=no continue ;; esac done func_quote_arg pretty "$libobj" test "X$libobj" != "X$func_quote_arg_result" \ && $ECHO "X$libobj" | $GREP '[]~#^*{};<>?"'"'"' &()|`$[]' \ && func_warning "libobj name '$libobj' may not contain shell special characters." func_dirname_and_basename "$obj" "/" "" objname=$func_basename_result xdir=$func_dirname_result lobj=$xdir$objdir/$objname test -z "$base_compile" && \ func_fatal_help "you must specify a compilation command" # Delete any leftover library objects. if test yes = "$build_old_libs"; then removelist="$obj $lobj $libobj ${libobj}T" else removelist="$lobj $libobj ${libobj}T" fi # On Cygwin there's no "real" PIC flag so we must build both object types case $host_os in cygwin* | mingw* | pw32* | os2* | cegcc*) pic_mode=default ;; esac if test no = "$pic_mode" && test pass_all != "$deplibs_check_method"; then # non-PIC code in shared libraries is not supported pic_mode=default fi # Calculate the filename of the output object if compiler does # not support -o with -c if test no = "$compiler_c_o"; then output_obj=`$ECHO "$srcfile" | $SED 's%^.*/%%; s%\.[^.]*$%%'`.$objext lockfile=$output_obj.lock else output_obj= need_locks=no lockfile= fi # Lock this critical section if it is needed # We use this script file to make the link, it avoids creating a new file if test yes = "$need_locks"; then until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do func_echo "Waiting for $lockfile to be removed" sleep 2 done elif test warn = "$need_locks"; then if test -f "$lockfile"; then $ECHO "\ *** ERROR, $lockfile exists and contains: `cat $lockfile 2>/dev/null` This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi func_append removelist " $output_obj" $ECHO "$srcfile" > "$lockfile" fi $opt_dry_run || $RM $removelist func_append removelist " $lockfile" trap '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' 1 2 15 func_to_tool_file "$srcfile" func_convert_file_msys_to_w32 srcfile=$func_to_tool_file_result func_quote_arg pretty "$srcfile" qsrcfile=$func_quote_arg_result # Only build a PIC object if we are building libtool libraries. if test yes = "$build_libtool_libs"; then # Without this assignment, base_compile gets emptied. fbsd_hideous_sh_bug=$base_compile if test no != "$pic_mode"; then command="$base_compile $qsrcfile $pic_flag" else # Don't build PIC code command="$base_compile $qsrcfile" fi func_mkdir_p "$xdir$objdir" if test -z "$output_obj"; then # Place PIC objects in $objdir func_append command " -o $lobj" fi func_show_eval_locale "$command" \ 'test -n "$output_obj" && $RM $removelist; exit $EXIT_FAILURE' if test warn = "$need_locks" && test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then $ECHO "\ *** ERROR, $lockfile contains: `cat $lockfile 2>/dev/null` but it should contain: $srcfile This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi # Just move the object if needed, then go on to compile the next one if test -n "$output_obj" && test "X$output_obj" != "X$lobj"; then func_show_eval '$MV "$output_obj" "$lobj"' \ 'error=$?; $opt_dry_run || $RM $removelist; exit $error' fi # Allow error messages only from the first compilation. if test yes = "$suppress_opt"; then suppress_output=' >/dev/null 2>&1' fi fi # Only build a position-dependent object if we build old libraries. if test yes = "$build_old_libs"; then if test yes != "$pic_mode"; then # Don't build PIC code command="$base_compile $qsrcfile$pie_flag" else command="$base_compile $qsrcfile $pic_flag" fi if test yes = "$compiler_c_o"; then func_append command " -o $obj" fi # Suppress compiler output if we already did a PIC compilation. func_append command "$suppress_output" func_show_eval_locale "$command" \ '$opt_dry_run || $RM $removelist; exit $EXIT_FAILURE' if test warn = "$need_locks" && test "X`cat $lockfile 2>/dev/null`" != "X$srcfile"; then $ECHO "\ *** ERROR, $lockfile contains: `cat $lockfile 2>/dev/null` but it should contain: $srcfile This indicates that another process is trying to use the same temporary object file, and libtool could not work around it because your compiler does not support '-c' and '-o' together. If you repeat this compilation, it may succeed, by chance, but you had better avoid parallel builds (make -j) in this platform, or get a better compiler." $opt_dry_run || $RM $removelist exit $EXIT_FAILURE fi # Just move the object if needed if test -n "$output_obj" && test "X$output_obj" != "X$obj"; then func_show_eval '$MV "$output_obj" "$obj"' \ 'error=$?; $opt_dry_run || $RM $removelist; exit $error' fi fi $opt_dry_run || { func_write_libtool_object "$libobj" "$objdir/$objname" "$objname" # Unlock the critical section if it was locked if test no != "$need_locks"; then removelist=$lockfile $RM "$lockfile" fi } exit $EXIT_SUCCESS } $opt_help || { test compile = "$opt_mode" && func_mode_compile ${1+"$@"} } func_mode_help () { # We need to display help for each of the modes. case $opt_mode in "") # Generic help is extracted from the usage comments # at the start of this file. func_help ;; clean) $ECHO \ "Usage: $progname [OPTION]... --mode=clean RM [RM-OPTION]... FILE... Remove files from the build directory. RM is the name of the program to use to delete files associated with each FILE (typically '/bin/rm'). RM-OPTIONS are options (such as '-f') to be passed to RM. If FILE is a libtool library, object or program, all the files associated with it are deleted. Otherwise, only FILE itself is deleted using RM." ;; compile) $ECHO \ "Usage: $progname [OPTION]... --mode=compile COMPILE-COMMAND... SOURCEFILE Compile a source file into a libtool library object. This mode accepts the following additional options: -o OUTPUT-FILE set the output file name to OUTPUT-FILE -no-suppress do not suppress compiler output for multiple passes -prefer-pic try to build PIC objects only -prefer-non-pic try to build non-PIC objects only -shared do not build a '.o' file suitable for static linking -static only build a '.o' file suitable for static linking -Wc,FLAG -Xcompiler FLAG pass FLAG directly to the compiler COMPILE-COMMAND is a command to be used in creating a 'standard' object file from the given SOURCEFILE. The output file name is determined by removing the directory component from SOURCEFILE, then substituting the C source code suffix '.c' with the library object suffix, '.lo'." ;; execute) $ECHO \ "Usage: $progname [OPTION]... --mode=execute COMMAND [ARGS]... Automatically set library path, then run a program. This mode accepts the following additional options: -dlopen FILE add the directory containing FILE to the library path This mode sets the library path environment variable according to '-dlopen' flags. If any of the ARGS are libtool executable wrappers, then they are translated into their corresponding uninstalled binary, and any of their required library directories are added to the library path. Then, COMMAND is executed, with ARGS as arguments." ;; finish) $ECHO \ "Usage: $progname [OPTION]... --mode=finish [LIBDIR]... Complete the installation of libtool libraries. Each LIBDIR is a directory that contains libtool libraries. The commands that this mode executes may require superuser privileges. Use the '--dry-run' option if you just want to see what would be executed." ;; install) $ECHO \ "Usage: $progname [OPTION]... --mode=install INSTALL-COMMAND... Install executables or libraries. INSTALL-COMMAND is the installation command. The first component should be either the 'install' or 'cp' program. The following components of INSTALL-COMMAND are treated specially: -inst-prefix-dir PREFIX-DIR Use PREFIX-DIR as a staging area for installation The rest of the components are interpreted as arguments to that command (only BSD-compatible install options are recognized)." ;; link) $ECHO \ "Usage: $progname [OPTION]... --mode=link LINK-COMMAND... Link object files or libraries together to form another library, or to create an executable program. LINK-COMMAND is a command using the C compiler that you would use to create a program from several object files. The following components of LINK-COMMAND are treated specially: -all-static do not do any dynamic linking at all -static do not do any dynamic linking at all -avoid-version do not add a version suffix if possible -bindir BINDIR specify path to binaries directory (for systems where libraries must be found in the PATH setting at runtime) -dlopen FILE '-dlpreopen' FILE if it cannot be dlopened at runtime -dlpreopen FILE link in FILE and add its symbols to lt_preloaded_symbols -export-dynamic allow symbols from OUTPUT-FILE to be resolved with dlsym(3) -export-symbols SYMFILE try to export only the symbols listed in SYMFILE -export-symbols-regex REGEX try to export only the symbols matching REGEX -LLIBDIR search LIBDIR for required installed libraries -lNAME OUTPUT-FILE requires the installed library libNAME -module build a library that can dlopened -no-fast-install disable the fast-install mode -no-install link a not-installable executable -no-undefined declare that a library does not refer to external symbols -o OUTPUT-FILE create OUTPUT-FILE from the specified objects -objectlist FILE use a list of object files found in FILE to specify objects -os2dllname NAME force a short DLL name on OS/2 (no effect on other OSes) -precious-files-regex REGEX don't remove output files matching REGEX -release RELEASE specify package release information -rpath LIBDIR the created library will eventually be installed in LIBDIR -R[ ]LIBDIR add LIBDIR to the runtime path of programs and libraries -shared only do dynamic linking of libtool libraries -shrext SUFFIX override the standard shared library file extension -static-uninstalled-libs do not do any dynamic linking of uninstalled libtool libraries -static-libtool-libs do not do any dynamic linking of libtool libraries -version-info CURRENT[:REVISION[:AGE]] specify library version info [each variable defaults to 0] -weak LIBNAME declare that the target provides the LIBNAME interface -Wc,FLAG -Xcompiler FLAG pass linker-specific FLAG directly to the compiler -Wa,FLAG -Xassembler FLAG pass linker-specific FLAG directly to the assembler -Wl,FLAG -Xlinker FLAG pass linker-specific FLAG directly to the linker -XCClinker FLAG pass link-specific FLAG to the compiler driver (CC) All other options (arguments beginning with '-') are ignored. Every other argument is treated as a filename. Files ending in '.la' are treated as uninstalled libtool libraries, other files are standard or library object files. If the OUTPUT-FILE ends in '.la', then a libtool library is created, only library objects ('.lo' files) may be specified, and '-rpath' is required, except when creating a convenience library. If OUTPUT-FILE ends in '.a' or '.lib', then a standard library is created using 'ar' and 'ranlib', or on Windows using 'lib'. If OUTPUT-FILE ends in '.lo' or '.$objext', then a reloadable object file is created, otherwise an executable program is created." ;; uninstall) $ECHO \ "Usage: $progname [OPTION]... --mode=uninstall RM [RM-OPTION]... FILE... Remove libraries from an installation directory. RM is the name of the program to use to delete files associated with each FILE (typically '/bin/rm'). RM-OPTIONS are options (such as '-f') to be passed to RM. If FILE is a libtool library, all the files associated with it are deleted. Otherwise, only FILE itself is deleted using RM." ;; *) func_fatal_help "invalid operation mode '$opt_mode'" ;; esac echo $ECHO "Try '$progname --help' for more information about other modes." } # Now that we've collected a possible --mode arg, show help if necessary if $opt_help; then if test : = "$opt_help"; then func_mode_help else { func_help noexit for opt_mode in compile link execute install finish uninstall clean; do func_mode_help done } | $SED -n '1p; 2,$s/^Usage:/ or: /p' { func_help noexit for opt_mode in compile link execute install finish uninstall clean; do echo func_mode_help done } | $SED '1d /^When reporting/,/^Report/{ H d } $x /information about other modes/d /more detailed .*MODE/d s/^Usage:.*--mode=\([^ ]*\) .*/Description of \1 mode:/' fi exit $? fi # func_mode_execute arg... func_mode_execute () { $debug_cmd # The first argument is the command name. cmd=$nonopt test -z "$cmd" && \ func_fatal_help "you must specify a COMMAND" # Handle -dlopen flags immediately. for file in $opt_dlopen; do test -f "$file" \ || func_fatal_help "'$file' is not a file" dir= case $file in *.la) func_resolve_sysroot "$file" file=$func_resolve_sysroot_result # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$file" \ || func_fatal_help "'$lib' is not a valid libtool archive" # Read the libtool library. dlname= library_names= func_source "$file" # Skip this library if it cannot be dlopened. if test -z "$dlname"; then # Warn if it was a shared library. test -n "$library_names" && \ func_warning "'$file' was not linked with '-export-dynamic'" continue fi func_dirname "$file" "" "." dir=$func_dirname_result if test -f "$dir/$objdir/$dlname"; then func_append dir "/$objdir" else if test ! -f "$dir/$dlname"; then func_fatal_error "cannot find '$dlname' in '$dir' or '$dir/$objdir'" fi fi ;; *.lo) # Just add the directory containing the .lo file. func_dirname "$file" "" "." dir=$func_dirname_result ;; *) func_warning "'-dlopen' is ignored for non-libtool libraries and objects" continue ;; esac # Get the absolute pathname. absdir=`cd "$dir" && pwd` test -n "$absdir" && dir=$absdir # Now add the directory to shlibpath_var. if eval "test -z \"\$$shlibpath_var\""; then eval "$shlibpath_var=\"\$dir\"" else eval "$shlibpath_var=\"\$dir:\$$shlibpath_var\"" fi done # This variable tells wrapper scripts just to set shlibpath_var # rather than running their programs. libtool_execute_magic=$magic # Check if any of the arguments is a wrapper script. args= for file do case $file in -* | *.la | *.lo ) ;; *) # Do a test to see if this is really a libtool program. if func_ltwrapper_script_p "$file"; then func_source "$file" # Transform arg to wrapped name. file=$progdir/$program elif func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" func_source "$func_ltwrapper_scriptname_result" # Transform arg to wrapped name. file=$progdir/$program fi ;; esac # Quote arguments (to preserve shell metacharacters). func_append_quoted args "$file" done if $opt_dry_run; then # Display what would be done. if test -n "$shlibpath_var"; then eval "\$ECHO \"\$shlibpath_var=\$$shlibpath_var\"" echo "export $shlibpath_var" fi $ECHO "$cmd$args" exit $EXIT_SUCCESS else if test -n "$shlibpath_var"; then # Export the shlibpath_var. eval "export $shlibpath_var" fi # Restore saved environment variables for lt_var in LANG LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LC_MESSAGES do eval "if test \"\${save_$lt_var+set}\" = set; then $lt_var=\$save_$lt_var; export $lt_var else $lt_unset $lt_var fi" done # Now prepare to actually exec the command. exec_cmd=\$cmd$args fi } test execute = "$opt_mode" && func_mode_execute ${1+"$@"} # func_mode_finish arg... func_mode_finish () { $debug_cmd libs= libdirs= admincmds= for opt in "$nonopt" ${1+"$@"} do if test -d "$opt"; then func_append libdirs " $opt" elif test -f "$opt"; then if func_lalib_unsafe_p "$opt"; then func_append libs " $opt" else func_warning "'$opt' is not a valid libtool archive" fi else func_fatal_error "invalid argument '$opt'" fi done if test -n "$libs"; then if test -n "$lt_sysroot"; then sysroot_regex=`$ECHO "$lt_sysroot" | $SED "$sed_make_literal_regex"` sysroot_cmd="s/\([ ']\)$sysroot_regex/\1/g;" else sysroot_cmd= fi # Remove sysroot references if $opt_dry_run; then for lib in $libs; do echo "removing references to $lt_sysroot and '=' prefixes from $lib" done else tmpdir=`func_mktempdir` for lib in $libs; do $SED -e "$sysroot_cmd s/\([ ']-[LR]\)=/\1/g; s/\([ ']\)=/\1/g" $lib \ > $tmpdir/tmp-la mv -f $tmpdir/tmp-la $lib done ${RM}r "$tmpdir" fi fi if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then for libdir in $libdirs; do if test -n "$finish_cmds"; then # Do each command in the finish commands. func_execute_cmds "$finish_cmds" 'admincmds="$admincmds '"$cmd"'"' fi if test -n "$finish_eval"; then # Do the single finish_eval. eval cmds=\"$finish_eval\" $opt_dry_run || eval "$cmds" || func_append admincmds " $cmds" fi done fi # Exit here if they wanted silent mode. $opt_quiet && exit $EXIT_SUCCESS if test -n "$finish_cmds$finish_eval" && test -n "$libdirs"; then echo "----------------------------------------------------------------------" echo "Libraries have been installed in:" for libdir in $libdirs; do $ECHO " $libdir" done echo echo "If you ever happen to want to link against installed libraries" echo "in a given directory, LIBDIR, you must either use libtool, and" echo "specify the full pathname of the library, or use the '-LLIBDIR'" echo "flag during linking and do at least one of the following:" if test -n "$shlibpath_var"; then echo " - add LIBDIR to the '$shlibpath_var' environment variable" echo " during execution" fi if test -n "$runpath_var"; then echo " - add LIBDIR to the '$runpath_var' environment variable" echo " during linking" fi if test -n "$hardcode_libdir_flag_spec"; then libdir=LIBDIR eval flag=\"$hardcode_libdir_flag_spec\" $ECHO " - use the '$flag' linker flag" fi if test -n "$admincmds"; then $ECHO " - have your system administrator run these commands:$admincmds" fi if test -f /etc/ld.so.conf; then echo " - have your system administrator add LIBDIR to '/etc/ld.so.conf'" fi echo echo "See any operating system documentation about shared libraries for" case $host in solaris2.[6789]|solaris2.1[0-9]) echo "more information, such as the ld(1), crle(1) and ld.so(8) manual" echo "pages." ;; *) echo "more information, such as the ld(1) and ld.so(8) manual pages." ;; esac echo "----------------------------------------------------------------------" fi exit $EXIT_SUCCESS } test finish = "$opt_mode" && func_mode_finish ${1+"$@"} # func_mode_install arg... func_mode_install () { $debug_cmd # There may be an optional sh(1) argument at the beginning of # install_prog (especially on Windows NT). if test "$SHELL" = "$nonopt" || test /bin/sh = "$nonopt" || # Allow the use of GNU shtool's install command. case $nonopt in *shtool*) :;; *) false;; esac then # Aesthetically quote it. func_quote_arg pretty "$nonopt" install_prog="$func_quote_arg_result " arg=$1 shift else install_prog= arg=$nonopt fi # The real first argument should be the name of the installation program. # Aesthetically quote it. func_quote_arg pretty "$arg" func_append install_prog "$func_quote_arg_result" install_shared_prog=$install_prog case " $install_prog " in *[\\\ /]cp\ *) install_cp=: ;; *) install_cp=false ;; esac # We need to accept at least all the BSD install flags. dest= files= opts= prev= install_type= isdir=false stripme= no_mode=: for arg do arg2= if test -n "$dest"; then func_append files " $dest" dest=$arg continue fi case $arg in -d) isdir=: ;; -f) if $install_cp; then :; else prev=$arg fi ;; -g | -m | -o) prev=$arg ;; -s) stripme=" -s" continue ;; -*) ;; *) # If the previous option needed an argument, then skip it. if test -n "$prev"; then if test X-m = "X$prev" && test -n "$install_override_mode"; then arg2=$install_override_mode no_mode=false fi prev= else dest=$arg continue fi ;; esac # Aesthetically quote the argument. func_quote_arg pretty "$arg" func_append install_prog " $func_quote_arg_result" if test -n "$arg2"; then func_quote_arg pretty "$arg2" fi func_append install_shared_prog " $func_quote_arg_result" done test -z "$install_prog" && \ func_fatal_help "you must specify an install program" test -n "$prev" && \ func_fatal_help "the '$prev' option requires an argument" if test -n "$install_override_mode" && $no_mode; then if $install_cp; then :; else func_quote_arg pretty "$install_override_mode" func_append install_shared_prog " -m $func_quote_arg_result" fi fi if test -z "$files"; then if test -z "$dest"; then func_fatal_help "no file or destination specified" else func_fatal_help "you must specify a destination" fi fi # Strip any trailing slash from the destination. func_stripname '' '/' "$dest" dest=$func_stripname_result # Check to see that the destination is a directory. test -d "$dest" && isdir=: if $isdir; then destdir=$dest destname= else func_dirname_and_basename "$dest" "" "." destdir=$func_dirname_result destname=$func_basename_result # Not a directory, so check to see that there is only one file specified. set dummy $files; shift test "$#" -gt 1 && \ func_fatal_help "'$dest' is not a directory" fi case $destdir in [\\/]* | [A-Za-z]:[\\/]*) ;; *) for file in $files; do case $file in *.lo) ;; *) func_fatal_help "'$destdir' must be an absolute directory name" ;; esac done ;; esac # This variable tells wrapper scripts just to set variables rather # than running their programs. libtool_install_magic=$magic staticlibs= future_libdirs= current_libdirs= for file in $files; do # Do each installation. case $file in *.$libext) # Do the static libraries later. func_append staticlibs " $file" ;; *.la) func_resolve_sysroot "$file" file=$func_resolve_sysroot_result # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$file" \ || func_fatal_help "'$file' is not a valid libtool archive" library_names= old_library= relink_command= func_source "$file" # Add the libdir to current_libdirs if it is the destination. if test "X$destdir" = "X$libdir"; then case "$current_libdirs " in *" $libdir "*) ;; *) func_append current_libdirs " $libdir" ;; esac else # Note the libdir as a future libdir. case "$future_libdirs " in *" $libdir "*) ;; *) func_append future_libdirs " $libdir" ;; esac fi func_dirname "$file" "/" "" dir=$func_dirname_result func_append dir "$objdir" if test -n "$relink_command"; then # Determine the prefix the user has applied to our future dir. inst_prefix_dir=`$ECHO "$destdir" | $SED -e "s%$libdir\$%%"` # Don't allow the user to place us outside of our expected # location b/c this prevents finding dependent libraries that # are installed to the same prefix. # At present, this check doesn't affect windows .dll's that # are installed into $libdir/../bin (currently, that works fine) # but it's something to keep an eye on. test "$inst_prefix_dir" = "$destdir" && \ func_fatal_error "error: cannot install '$file' to a directory not ending in $libdir" if test -n "$inst_prefix_dir"; then # Stick the inst_prefix_dir data into the link command. relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%-inst-prefix-dir $inst_prefix_dir%"` else relink_command=`$ECHO "$relink_command" | $SED "s%@inst_prefix_dir@%%"` fi func_warning "relinking '$file'" func_show_eval "$relink_command" \ 'func_fatal_error "error: relink '\''$file'\'' with the above command before installing it"' fi # See the names of the shared library. set dummy $library_names; shift if test -n "$1"; then realname=$1 shift srcname=$realname test -n "$relink_command" && srcname=${realname}T # Install the shared library and build the symlinks. func_show_eval "$install_shared_prog $dir/$srcname $destdir/$realname" \ 'exit $?' tstripme=$stripme case $host_os in cygwin* | mingw* | pw32* | cegcc*) case $realname in *.dll.a) tstripme= ;; esac ;; os2*) case $realname in *_dll.a) tstripme= ;; esac ;; esac if test -n "$tstripme" && test -n "$striplib"; then func_show_eval "$striplib $destdir/$realname" 'exit $?' fi if test "$#" -gt 0; then # Delete the old symlinks, and create new ones. # Try 'ln -sf' first, because the 'ln' binary might depend on # the symlink we replace! Solaris /bin/ln does not understand -f, # so we also need to try rm && ln -s. for linkname do test "$linkname" != "$realname" \ && func_show_eval "(cd $destdir && { $LN_S -f $realname $linkname || { $RM $linkname && $LN_S $realname $linkname; }; })" done fi # Do each command in the postinstall commands. lib=$destdir/$realname func_execute_cmds "$postinstall_cmds" 'exit $?' fi # Install the pseudo-library for information purposes. func_basename "$file" name=$func_basename_result instname=$dir/${name}i func_show_eval "$install_prog $instname $destdir/$name" 'exit $?' # Maybe install the static library, too. test -n "$old_library" && func_append staticlibs " $dir/$old_library" ;; *.lo) # Install (i.e. copy) a libtool object. # Figure out destination file name, if it wasn't already specified. if test -n "$destname"; then destfile=$destdir/$destname else func_basename "$file" destfile=$func_basename_result destfile=$destdir/$destfile fi # Deduce the name of the destination old-style object file. case $destfile in *.lo) func_lo2o "$destfile" staticdest=$func_lo2o_result ;; *.$objext) staticdest=$destfile destfile= ;; *) func_fatal_help "cannot copy a libtool object to '$destfile'" ;; esac # Install the libtool object if requested. test -n "$destfile" && \ func_show_eval "$install_prog $file $destfile" 'exit $?' # Install the old object if enabled. if test yes = "$build_old_libs"; then # Deduce the name of the old-style object file. func_lo2o "$file" staticobj=$func_lo2o_result func_show_eval "$install_prog \$staticobj \$staticdest" 'exit $?' fi exit $EXIT_SUCCESS ;; *) # Figure out destination file name, if it wasn't already specified. if test -n "$destname"; then destfile=$destdir/$destname else func_basename "$file" destfile=$func_basename_result destfile=$destdir/$destfile fi # If the file is missing, and there is a .exe on the end, strip it # because it is most likely a libtool script we actually want to # install stripped_ext= case $file in *.exe) if test ! -f "$file"; then func_stripname '' '.exe' "$file" file=$func_stripname_result stripped_ext=.exe fi ;; esac # Do a test to see if this is really a libtool program. case $host in *cygwin* | *mingw*) if func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" wrapper=$func_ltwrapper_scriptname_result else func_stripname '' '.exe' "$file" wrapper=$func_stripname_result fi ;; *) wrapper=$file ;; esac if func_ltwrapper_script_p "$wrapper"; then notinst_deplibs= relink_command= func_source "$wrapper" # Check the variables that should have been set. test -z "$generated_by_libtool_version" && \ func_fatal_error "invalid libtool wrapper script '$wrapper'" finalize=: for lib in $notinst_deplibs; do # Check to see that each library is installed. libdir= if test -f "$lib"; then func_source "$lib" fi libfile=$libdir/`$ECHO "$lib" | $SED 's%^.*/%%g'` if test -n "$libdir" && test ! -f "$libfile"; then func_warning "'$lib' has not been installed in '$libdir'" finalize=false fi done relink_command= func_source "$wrapper" outputname= if test no = "$fast_install" && test -n "$relink_command"; then $opt_dry_run || { if $finalize; then tmpdir=`func_mktempdir` func_basename "$file$stripped_ext" file=$func_basename_result outputname=$tmpdir/$file # Replace the output file specification. relink_command=`$ECHO "$relink_command" | $SED 's%@OUTPUT@%'"$outputname"'%g'` $opt_quiet || { func_quote_arg expand,pretty "$relink_command" eval "func_echo $func_quote_arg_result" } if eval "$relink_command"; then : else func_error "error: relink '$file' with the above command before installing it" $opt_dry_run || ${RM}r "$tmpdir" continue fi file=$outputname else func_warning "cannot relink '$file'" fi } else # Install the binary that we compiled earlier. file=`$ECHO "$file$stripped_ext" | $SED "s%\([^/]*\)$%$objdir/\1%"` fi fi # remove .exe since cygwin /usr/bin/install will append another # one anyway case $install_prog,$host in */usr/bin/install*,*cygwin*) case $file:$destfile in *.exe:*.exe) # this is ok ;; *.exe:*) destfile=$destfile.exe ;; *:*.exe) func_stripname '' '.exe' "$destfile" destfile=$func_stripname_result ;; esac ;; esac func_show_eval "$install_prog\$stripme \$file \$destfile" 'exit $?' $opt_dry_run || if test -n "$outputname"; then ${RM}r "$tmpdir" fi ;; esac done for file in $staticlibs; do func_basename "$file" name=$func_basename_result # Set up the ranlib parameters. oldlib=$destdir/$name func_to_tool_file "$oldlib" func_convert_file_msys_to_w32 tool_oldlib=$func_to_tool_file_result func_show_eval "$install_prog \$file \$oldlib" 'exit $?' if test -n "$stripme" && test -n "$old_striplib"; then func_show_eval "$old_striplib $tool_oldlib" 'exit $?' fi # Do each command in the postinstall commands. func_execute_cmds "$old_postinstall_cmds" 'exit $?' done test -n "$future_libdirs" && \ func_warning "remember to run '$progname --finish$future_libdirs'" if test -n "$current_libdirs"; then # Maybe just do a dry run. $opt_dry_run && current_libdirs=" -n$current_libdirs" exec_cmd='$SHELL "$progpath" $preserve_args --finish$current_libdirs' else exit $EXIT_SUCCESS fi } test install = "$opt_mode" && func_mode_install ${1+"$@"} # func_generate_dlsyms outputname originator pic_p # Extract symbols from dlprefiles and create ${outputname}S.o with # a dlpreopen symbol table. func_generate_dlsyms () { $debug_cmd my_outputname=$1 my_originator=$2 my_pic_p=${3-false} my_prefix=`$ECHO "$my_originator" | $SED 's%[^a-zA-Z0-9]%_%g'` my_dlsyms= if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then if test -n "$NM" && test -n "$global_symbol_pipe"; then my_dlsyms=${my_outputname}S.c else func_error "not configured to extract global symbols from dlpreopened files" fi fi if test -n "$my_dlsyms"; then case $my_dlsyms in "") ;; *.c) # Discover the nlist of each of the dlfiles. nlist=$output_objdir/$my_outputname.nm func_show_eval "$RM $nlist ${nlist}S ${nlist}T" # Parse the name list into a source file. func_verbose "creating $output_objdir/$my_dlsyms" $opt_dry_run || $ECHO > "$output_objdir/$my_dlsyms" "\ /* $my_dlsyms - symbol resolution table for '$my_outputname' dlsym emulation. */ /* Generated by $PROGRAM (GNU $PACKAGE) $VERSION */ #ifdef __cplusplus extern \"C\" { #endif #if defined __GNUC__ && (((__GNUC__ == 4) && (__GNUC_MINOR__ >= 4)) || (__GNUC__ > 4)) #pragma GCC diagnostic ignored \"-Wstrict-prototypes\" #endif /* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests. */ #if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE /* DATA imports from DLLs on WIN32 can't be const, because runtime relocations are performed -- see ld's documentation on pseudo-relocs. */ # define LT_DLSYM_CONST #elif defined __osf__ /* This system does not cope well with relocations in const data. */ # define LT_DLSYM_CONST #else # define LT_DLSYM_CONST const #endif #define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0) /* External symbol declarations for the compiler. */\ " if test yes = "$dlself"; then func_verbose "generating symbol list for '$output'" $opt_dry_run || echo ': @PROGRAM@ ' > "$nlist" # Add our own program objects to the symbol list. progfiles=`$ECHO "$objs$old_deplibs" | $SP2NL | $SED "$lo2o" | $NL2SP` for progfile in $progfiles; do func_to_tool_file "$progfile" func_convert_file_msys_to_w32 func_verbose "extracting global C symbols from '$func_to_tool_file_result'" $opt_dry_run || eval "$NM $func_to_tool_file_result | $global_symbol_pipe >> '$nlist'" done if test -n "$exclude_expsyms"; then $opt_dry_run || { eval '$EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' } fi if test -n "$export_symbols_regex"; then $opt_dry_run || { eval '$EGREP -e "$export_symbols_regex" "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' } fi # Prepare the list of exported symbols if test -z "$export_symbols"; then export_symbols=$output_objdir/$outputname.exp $opt_dry_run || { $RM $export_symbols eval "$SED -n -e '/^: @PROGRAM@ $/d' -e 's/^.* \(.*\)$/\1/p' "'< "$nlist" > "$export_symbols"' case $host in *cygwin* | *mingw* | *cegcc* ) eval "echo EXPORTS "'> "$output_objdir/$outputname.def"' eval 'cat "$export_symbols" >> "$output_objdir/$outputname.def"' ;; esac } else $opt_dry_run || { eval "$SED -e 's/\([].[*^$]\)/\\\\\1/g' -e 's/^/ /' -e 's/$/$/'"' < "$export_symbols" > "$output_objdir/$outputname.exp"' eval '$GREP -f "$output_objdir/$outputname.exp" < "$nlist" > "$nlist"T' eval '$MV "$nlist"T "$nlist"' case $host in *cygwin* | *mingw* | *cegcc* ) eval "echo EXPORTS "'> "$output_objdir/$outputname.def"' eval 'cat "$nlist" >> "$output_objdir/$outputname.def"' ;; esac } fi fi for dlprefile in $dlprefiles; do func_verbose "extracting global C symbols from '$dlprefile'" func_basename "$dlprefile" name=$func_basename_result case $host in *cygwin* | *mingw* | *cegcc* ) # if an import library, we need to obtain dlname if func_win32_import_lib_p "$dlprefile"; then func_tr_sh "$dlprefile" eval "curr_lafile=\$libfile_$func_tr_sh_result" dlprefile_dlbasename= if test -n "$curr_lafile" && func_lalib_p "$curr_lafile"; then # Use subshell, to avoid clobbering current variable values dlprefile_dlname=`source "$curr_lafile" && echo "$dlname"` if test -n "$dlprefile_dlname"; then func_basename "$dlprefile_dlname" dlprefile_dlbasename=$func_basename_result else # no lafile. user explicitly requested -dlpreopen . $sharedlib_from_linklib_cmd "$dlprefile" dlprefile_dlbasename=$sharedlib_from_linklib_result fi fi $opt_dry_run || { if test -n "$dlprefile_dlbasename"; then eval '$ECHO ": $dlprefile_dlbasename" >> "$nlist"' else func_warning "Could not compute DLL name from $name" eval '$ECHO ": $name " >> "$nlist"' fi func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe | $SED -e '/I __imp/d' -e 's/I __nm_/D /;s/_nm__//' >> '$nlist'" } else # not an import lib $opt_dry_run || { eval '$ECHO ": $name " >> "$nlist"' func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'" } fi ;; *) $opt_dry_run || { eval '$ECHO ": $name " >> "$nlist"' func_to_tool_file "$dlprefile" func_convert_file_msys_to_w32 eval "$NM \"$func_to_tool_file_result\" 2>/dev/null | $global_symbol_pipe >> '$nlist'" } ;; esac done $opt_dry_run || { # Make sure we have at least an empty file. test -f "$nlist" || : > "$nlist" if test -n "$exclude_expsyms"; then $EGREP -v " ($exclude_expsyms)$" "$nlist" > "$nlist"T $MV "$nlist"T "$nlist" fi # Try sorting and uniquifying the output. if $GREP -v "^: " < "$nlist" | if sort -k 3 /dev/null 2>&1; then sort -k 3 else sort +2 fi | uniq > "$nlist"S; then : else $GREP -v "^: " < "$nlist" > "$nlist"S fi if test -f "$nlist"S; then eval "$global_symbol_to_cdecl"' < "$nlist"S >> "$output_objdir/$my_dlsyms"' else echo '/* NONE */' >> "$output_objdir/$my_dlsyms" fi func_show_eval '$RM "${nlist}I"' if test -n "$global_symbol_to_import"; then eval "$global_symbol_to_import"' < "$nlist"S > "$nlist"I' fi echo >> "$output_objdir/$my_dlsyms" "\ /* The mapping between symbol names and symbols. */ typedef struct { const char *name; void *address; } lt_dlsymlist; extern LT_DLSYM_CONST lt_dlsymlist lt_${my_prefix}_LTX_preloaded_symbols[];\ " if test -s "$nlist"I; then echo >> "$output_objdir/$my_dlsyms" "\ static void lt_syminit(void) { LT_DLSYM_CONST lt_dlsymlist *symbol = lt_${my_prefix}_LTX_preloaded_symbols; for (; symbol->name; ++symbol) {" $SED 's/.*/ if (STREQ (symbol->name, \"&\")) symbol->address = (void *) \&&;/' < "$nlist"I >> "$output_objdir/$my_dlsyms" echo >> "$output_objdir/$my_dlsyms" "\ } }" fi echo >> "$output_objdir/$my_dlsyms" "\ LT_DLSYM_CONST lt_dlsymlist lt_${my_prefix}_LTX_preloaded_symbols[] = { {\"$my_originator\", (void *) 0}," if test -s "$nlist"I; then echo >> "$output_objdir/$my_dlsyms" "\ {\"@INIT@\", (void *) <_syminit}," fi case $need_lib_prefix in no) eval "$global_symbol_to_c_name_address" < "$nlist" >> "$output_objdir/$my_dlsyms" ;; *) eval "$global_symbol_to_c_name_address_lib_prefix" < "$nlist" >> "$output_objdir/$my_dlsyms" ;; esac echo >> "$output_objdir/$my_dlsyms" "\ {0, (void *) 0} }; /* This works around a problem in FreeBSD linker */ #ifdef FREEBSD_WORKAROUND static const void *lt_preloaded_setup() { return lt_${my_prefix}_LTX_preloaded_symbols; } #endif #ifdef __cplusplus } #endif\ " } # !$opt_dry_run pic_flag_for_symtable= case "$compile_command " in *" -static "*) ;; *) case $host in # compiling the symbol table file with pic_flag works around # a FreeBSD bug that causes programs to crash when -lm is # linked before any other PIC object. But we must not use # pic_flag when linking with -static. The problem exists in # FreeBSD 2.2.6 and is fixed in FreeBSD 3.1. *-*-freebsd2.*|*-*-freebsd3.0*|*-*-freebsdelf3.0*) pic_flag_for_symtable=" $pic_flag -DFREEBSD_WORKAROUND" ;; *-*-hpux*) pic_flag_for_symtable=" $pic_flag" ;; *) $my_pic_p && pic_flag_for_symtable=" $pic_flag" ;; esac ;; esac symtab_cflags= for arg in $LTCFLAGS; do case $arg in -pie | -fpie | -fPIE) ;; *) func_append symtab_cflags " $arg" ;; esac done # Now compile the dynamic symbol file. func_show_eval '(cd $output_objdir && $LTCC$symtab_cflags -c$no_builtin_flag$pic_flag_for_symtable "$my_dlsyms")' 'exit $?' # Clean up the generated files. func_show_eval '$RM "$output_objdir/$my_dlsyms" "$nlist" "${nlist}S" "${nlist}T" "${nlist}I"' # Transform the symbol file into the correct name. symfileobj=$output_objdir/${my_outputname}S.$objext case $host in *cygwin* | *mingw* | *cegcc* ) if test -f "$output_objdir/$my_outputname.def"; then compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$output_objdir/$my_outputname.def $symfileobj%"` else compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"` fi ;; *) compile_command=`$ECHO "$compile_command" | $SED "s%@SYMFILE@%$symfileobj%"` finalize_command=`$ECHO "$finalize_command" | $SED "s%@SYMFILE@%$symfileobj%"` ;; esac ;; *) func_fatal_error "unknown suffix for '$my_dlsyms'" ;; esac else # We keep going just in case the user didn't refer to # lt_preloaded_symbols. The linker will fail if global_symbol_pipe # really was required. # Nullify the symbol file. compile_command=`$ECHO "$compile_command" | $SED "s% @SYMFILE@%%"` finalize_command=`$ECHO "$finalize_command" | $SED "s% @SYMFILE@%%"` fi } # func_cygming_gnu_implib_p ARG # This predicate returns with zero status (TRUE) if # ARG is a GNU/binutils-style import library. Returns # with nonzero status (FALSE) otherwise. func_cygming_gnu_implib_p () { $debug_cmd func_to_tool_file "$1" func_convert_file_msys_to_w32 func_cygming_gnu_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $EGREP ' (_head_[A-Za-z0-9_]+_[ad]l*|[A-Za-z0-9_]+_[ad]l*_iname)$'` test -n "$func_cygming_gnu_implib_tmp" } # func_cygming_ms_implib_p ARG # This predicate returns with zero status (TRUE) if # ARG is an MS-style import library. Returns # with nonzero status (FALSE) otherwise. func_cygming_ms_implib_p () { $debug_cmd func_to_tool_file "$1" func_convert_file_msys_to_w32 func_cygming_ms_implib_tmp=`$NM "$func_to_tool_file_result" | eval "$global_symbol_pipe" | $GREP '_NULL_IMPORT_DESCRIPTOR'` test -n "$func_cygming_ms_implib_tmp" } # func_win32_libid arg # return the library type of file 'arg' # # Need a lot of goo to handle *both* DLLs and import libs # Has to be a shell function in order to 'eat' the argument # that is supplied when $file_magic_command is called. # Despite the name, also deal with 64 bit binaries. func_win32_libid () { $debug_cmd win32_libid_type=unknown win32_fileres=`file -L $1 2>/dev/null` case $win32_fileres in *ar\ archive\ import\ library*) # definitely import win32_libid_type="x86 archive import" ;; *ar\ archive*) # could be an import, or static # Keep the egrep pattern in sync with the one in _LT_CHECK_MAGIC_METHOD. if eval $OBJDUMP -f $1 | $SED -e '10q' 2>/dev/null | $EGREP 'file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' >/dev/null; then case $nm_interface in "MS dumpbin") if func_cygming_ms_implib_p "$1" || func_cygming_gnu_implib_p "$1" then win32_nmres=import else win32_nmres= fi ;; *) func_to_tool_file "$1" func_convert_file_msys_to_w32 win32_nmres=`eval $NM -f posix -A \"$func_to_tool_file_result\" | $SED -n -e ' 1,100{ / I /{ s|.*|import| p q } }'` ;; esac case $win32_nmres in import*) win32_libid_type="x86 archive import";; *) win32_libid_type="x86 archive static";; esac fi ;; *DLL*) win32_libid_type="x86 DLL" ;; *executable*) # but shell scripts are "executable" too... case $win32_fileres in *MS\ Windows\ PE\ Intel*) win32_libid_type="x86 DLL" ;; esac ;; esac $ECHO "$win32_libid_type" } # func_cygming_dll_for_implib ARG # # Platform-specific function to extract the # name of the DLL associated with the specified # import library ARG. # Invoked by eval'ing the libtool variable # $sharedlib_from_linklib_cmd # Result is available in the variable # $sharedlib_from_linklib_result func_cygming_dll_for_implib () { $debug_cmd sharedlib_from_linklib_result=`$DLLTOOL --identify-strict --identify "$1"` } # func_cygming_dll_for_implib_fallback_core SECTION_NAME LIBNAMEs # # The is the core of a fallback implementation of a # platform-specific function to extract the name of the # DLL associated with the specified import library LIBNAME. # # SECTION_NAME is either .idata$6 or .idata$7, depending # on the platform and compiler that created the implib. # # Echos the name of the DLL associated with the # specified import library. func_cygming_dll_for_implib_fallback_core () { $debug_cmd match_literal=`$ECHO "$1" | $SED "$sed_make_literal_regex"` $OBJDUMP -s --section "$1" "$2" 2>/dev/null | $SED '/^Contents of section '"$match_literal"':/{ # Place marker at beginning of archive member dllname section s/.*/====MARK====/ p d } # These lines can sometimes be longer than 43 characters, but # are always uninteresting /:[ ]*file format pe[i]\{,1\}-/d /^In archive [^:]*:/d # Ensure marker is printed /^====MARK====/p # Remove all lines with less than 43 characters /^.\{43\}/!d # From remaining lines, remove first 43 characters s/^.\{43\}//' | $SED -n ' # Join marker and all lines until next marker into a single line /^====MARK====/ b para H $ b para b :para x s/\n//g # Remove the marker s/^====MARK====// # Remove trailing dots and whitespace s/[\. \t]*$// # Print /./p' | # we now have a list, one entry per line, of the stringified # contents of the appropriate section of all members of the # archive that possess that section. Heuristic: eliminate # all those that have a first or second character that is # a '.' (that is, objdump's representation of an unprintable # character.) This should work for all archives with less than # 0x302f exports -- but will fail for DLLs whose name actually # begins with a literal '.' or a single character followed by # a '.'. # # Of those that remain, print the first one. $SED -e '/^\./d;/^.\./d;q' } # func_cygming_dll_for_implib_fallback ARG # Platform-specific function to extract the # name of the DLL associated with the specified # import library ARG. # # This fallback implementation is for use when $DLLTOOL # does not support the --identify-strict option. # Invoked by eval'ing the libtool variable # $sharedlib_from_linklib_cmd # Result is available in the variable # $sharedlib_from_linklib_result func_cygming_dll_for_implib_fallback () { $debug_cmd if func_cygming_gnu_implib_p "$1"; then # binutils import library sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$7' "$1"` elif func_cygming_ms_implib_p "$1"; then # ms-generated import library sharedlib_from_linklib_result=`func_cygming_dll_for_implib_fallback_core '.idata$6' "$1"` else # unknown sharedlib_from_linklib_result= fi } # func_extract_an_archive dir oldlib func_extract_an_archive () { $debug_cmd f_ex_an_ar_dir=$1; shift f_ex_an_ar_oldlib=$1 if test yes = "$lock_old_archive_extraction"; then lockfile=$f_ex_an_ar_oldlib.lock until $opt_dry_run || ln "$progpath" "$lockfile" 2>/dev/null; do func_echo "Waiting for $lockfile to be removed" sleep 2 done fi func_show_eval "(cd \$f_ex_an_ar_dir && $AR x \"\$f_ex_an_ar_oldlib\")" \ 'stat=$?; rm -f "$lockfile"; exit $stat' if test yes = "$lock_old_archive_extraction"; then $opt_dry_run || rm -f "$lockfile" fi if ($AR t "$f_ex_an_ar_oldlib" | sort | sort -uc >/dev/null 2>&1); then : else func_fatal_error "object name conflicts in archive: $f_ex_an_ar_dir/$f_ex_an_ar_oldlib" fi } # func_extract_archives gentop oldlib ... func_extract_archives () { $debug_cmd my_gentop=$1; shift my_oldlibs=${1+"$@"} my_oldobjs= my_xlib= my_xabs= my_xdir= for my_xlib in $my_oldlibs; do # Extract the objects. case $my_xlib in [\\/]* | [A-Za-z]:[\\/]*) my_xabs=$my_xlib ;; *) my_xabs=`pwd`"/$my_xlib" ;; esac func_basename "$my_xlib" my_xlib=$func_basename_result my_xlib_u=$my_xlib while :; do case " $extracted_archives " in *" $my_xlib_u "*) func_arith $extracted_serial + 1 extracted_serial=$func_arith_result my_xlib_u=lt$extracted_serial-$my_xlib ;; *) break ;; esac done extracted_archives="$extracted_archives $my_xlib_u" my_xdir=$my_gentop/$my_xlib_u func_mkdir_p "$my_xdir" case $host in *-darwin*) func_verbose "Extracting $my_xabs" # Do not bother doing anything if just a dry run $opt_dry_run || { darwin_orig_dir=`pwd` cd $my_xdir || exit $? darwin_archive=$my_xabs darwin_curdir=`pwd` func_basename "$darwin_archive" darwin_base_archive=$func_basename_result darwin_arches=`$LIPO -info "$darwin_archive" 2>/dev/null | $GREP Architectures 2>/dev/null || true` if test -n "$darwin_arches"; then darwin_arches=`$ECHO "$darwin_arches" | $SED -e 's/.*are://'` darwin_arch= func_verbose "$darwin_base_archive has multiple architectures $darwin_arches" for darwin_arch in $darwin_arches; do func_mkdir_p "unfat-$$/$darwin_base_archive-$darwin_arch" $LIPO -thin $darwin_arch -output "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive" "$darwin_archive" cd "unfat-$$/$darwin_base_archive-$darwin_arch" func_extract_an_archive "`pwd`" "$darwin_base_archive" cd "$darwin_curdir" $RM "unfat-$$/$darwin_base_archive-$darwin_arch/$darwin_base_archive" done # $darwin_arches ## Okay now we've a bunch of thin objects, gotta fatten them up :) darwin_filelist=`find unfat-$$ -type f -name \*.o -print -o -name \*.lo -print | $SED -e "$sed_basename" | sort -u` darwin_file= darwin_files= for darwin_file in $darwin_filelist; do darwin_files=`find unfat-$$ -name $darwin_file -print | sort | $NL2SP` $LIPO -create -output "$darwin_file" $darwin_files done # $darwin_filelist $RM -rf unfat-$$ cd "$darwin_orig_dir" else cd $darwin_orig_dir func_extract_an_archive "$my_xdir" "$my_xabs" fi # $darwin_arches } # !$opt_dry_run ;; *) func_extract_an_archive "$my_xdir" "$my_xabs" ;; esac my_oldobjs="$my_oldobjs "`find $my_xdir -name \*.$objext -print -o -name \*.lo -print | sort | $NL2SP` done func_extract_archives_result=$my_oldobjs } # func_emit_wrapper [arg=no] # # Emit a libtool wrapper script on stdout. # Don't directly open a file because we may want to # incorporate the script contents within a cygwin/mingw # wrapper executable. Must ONLY be called from within # func_mode_link because it depends on a number of variables # set therein. # # ARG is the value that the WRAPPER_SCRIPT_BELONGS_IN_OBJDIR # variable will take. If 'yes', then the emitted script # will assume that the directory where it is stored is # the $objdir directory. This is a cygwin/mingw-specific # behavior. func_emit_wrapper () { func_emit_wrapper_arg1=${1-no} $ECHO "\ #! $SHELL # $output - temporary wrapper script for $objdir/$outputname # Generated by $PROGRAM (GNU $PACKAGE) $VERSION # # The $output program cannot be directly executed until all the libtool # libraries that it depends on are installed. # # This wrapper script should never be moved out of the build directory. # If it is, it will not operate correctly. # Sed substitution that helps us do robust quoting. It backslashifies # metacharacters that are still active within double-quoted strings. sed_quote_subst='$sed_quote_subst' # Be Bourne compatible if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then emulate sh NULLCMD=: # Zsh 3.x and 4.x performs word splitting on \${1+\"\$@\"}, which # is contrary to our usage. Disable this feature. alias -g '\${1+\"\$@\"}'='\"\$@\"' setopt NO_GLOB_SUBST else case \`(set -o) 2>/dev/null\` in *posix*) set -o posix;; esac fi BIN_SH=xpg4; export BIN_SH # for Tru64 DUALCASE=1; export DUALCASE # for MKS sh # The HP-UX ksh and POSIX shell print the target directory to stdout # if CDPATH is set. (unset CDPATH) >/dev/null 2>&1 && unset CDPATH relink_command=\"$relink_command\" # This environment variable determines our operation mode. if test \"\$libtool_install_magic\" = \"$magic\"; then # install mode needs the following variables: generated_by_libtool_version='$macro_version' notinst_deplibs='$notinst_deplibs' else # When we are sourced in execute mode, \$file and \$ECHO are already set. if test \"\$libtool_execute_magic\" != \"$magic\"; then file=\"\$0\"" func_quote_arg pretty "$ECHO" qECHO=$func_quote_arg_result $ECHO "\ # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF \$1 _LTECHO_EOF' } ECHO=$qECHO fi # Very basic option parsing. These options are (a) specific to # the libtool wrapper, (b) are identical between the wrapper # /script/ and the wrapper /executable/ that is used only on # windows platforms, and (c) all begin with the string "--lt-" # (application programs are unlikely to have options that match # this pattern). # # There are only two supported options: --lt-debug and # --lt-dump-script. There is, deliberately, no --lt-help. # # The first argument to this parsing function should be the # script's $0 value, followed by "$@". lt_option_debug= func_parse_lt_options () { lt_script_arg0=\$0 shift for lt_opt do case \"\$lt_opt\" in --lt-debug) lt_option_debug=1 ;; --lt-dump-script) lt_dump_D=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%/[^/]*$%%'\` test \"X\$lt_dump_D\" = \"X\$lt_script_arg0\" && lt_dump_D=. lt_dump_F=\`\$ECHO \"X\$lt_script_arg0\" | $SED -e 's/^X//' -e 's%^.*/%%'\` cat \"\$lt_dump_D/\$lt_dump_F\" exit 0 ;; --lt-*) \$ECHO \"Unrecognized --lt- option: '\$lt_opt'\" 1>&2 exit 1 ;; esac done # Print the debug banner immediately: if test -n \"\$lt_option_debug\"; then echo \"$outputname:$output:\$LINENO: libtool wrapper (GNU $PACKAGE) $VERSION\" 1>&2 fi } # Used when --lt-debug. Prints its arguments to stdout # (redirection is the responsibility of the caller) func_lt_dump_args () { lt_dump_args_N=1; for lt_arg do \$ECHO \"$outputname:$output:\$LINENO: newargv[\$lt_dump_args_N]: \$lt_arg\" lt_dump_args_N=\`expr \$lt_dump_args_N + 1\` done } # Core function for launching the target application func_exec_program_core () { " case $host in # Backslashes separate directories on plain windows *-*-mingw | *-*-os2* | *-cegcc*) $ECHO "\ if test -n \"\$lt_option_debug\"; then \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir\\\\\$program\" 1>&2 func_lt_dump_args \${1+\"\$@\"} 1>&2 fi exec \"\$progdir\\\\\$program\" \${1+\"\$@\"} " ;; *) $ECHO "\ if test -n \"\$lt_option_debug\"; then \$ECHO \"$outputname:$output:\$LINENO: newargv[0]: \$progdir/\$program\" 1>&2 func_lt_dump_args \${1+\"\$@\"} 1>&2 fi exec \"\$progdir/\$program\" \${1+\"\$@\"} " ;; esac $ECHO "\ \$ECHO \"\$0: cannot exec \$program \$*\" 1>&2 exit 1 } # A function to encapsulate launching the target application # Strips options in the --lt-* namespace from \$@ and # launches target application with the remaining arguments. func_exec_program () { case \" \$* \" in *\\ --lt-*) for lt_wr_arg do case \$lt_wr_arg in --lt-*) ;; *) set x \"\$@\" \"\$lt_wr_arg\"; shift;; esac shift done ;; esac func_exec_program_core \${1+\"\$@\"} } # Parse options func_parse_lt_options \"\$0\" \${1+\"\$@\"} # Find the directory that this script lives in. thisdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*$%%'\` test \"x\$thisdir\" = \"x\$file\" && thisdir=. # Follow symbolic links until we get to the real thisdir. file=\`ls -ld \"\$file\" | $SED -n 's/.*-> //p'\` while test -n \"\$file\"; do destdir=\`\$ECHO \"\$file\" | $SED 's%/[^/]*\$%%'\` # If there was a directory component, then change thisdir. if test \"x\$destdir\" != \"x\$file\"; then case \"\$destdir\" in [\\\\/]* | [A-Za-z]:[\\\\/]*) thisdir=\"\$destdir\" ;; *) thisdir=\"\$thisdir/\$destdir\" ;; esac fi file=\`\$ECHO \"\$file\" | $SED 's%^.*/%%'\` file=\`ls -ld \"\$thisdir/\$file\" | $SED -n 's/.*-> //p'\` done # Usually 'no', except on cygwin/mingw when embedded into # the cwrapper. WRAPPER_SCRIPT_BELONGS_IN_OBJDIR=$func_emit_wrapper_arg1 if test \"\$WRAPPER_SCRIPT_BELONGS_IN_OBJDIR\" = \"yes\"; then # special case for '.' if test \"\$thisdir\" = \".\"; then thisdir=\`pwd\` fi # remove .libs from thisdir case \"\$thisdir\" in *[\\\\/]$objdir ) thisdir=\`\$ECHO \"\$thisdir\" | $SED 's%[\\\\/][^\\\\/]*$%%'\` ;; $objdir ) thisdir=. ;; esac fi # Try to get the absolute directory name. absdir=\`cd \"\$thisdir\" && pwd\` test -n \"\$absdir\" && thisdir=\"\$absdir\" " if test yes = "$fast_install"; then $ECHO "\ program=lt-'$outputname'$exeext progdir=\"\$thisdir/$objdir\" if test ! -f \"\$progdir/\$program\" || { file=\`ls -1dt \"\$progdir/\$program\" \"\$progdir/../\$program\" 2>/dev/null | $SED 1q\`; \\ test \"X\$file\" != \"X\$progdir/\$program\"; }; then file=\"\$\$-\$program\" if test ! -d \"\$progdir\"; then $MKDIR \"\$progdir\" else $RM \"\$progdir/\$file\" fi" $ECHO "\ # relink executable if necessary if test -n \"\$relink_command\"; then if relink_command_output=\`eval \$relink_command 2>&1\`; then : else \$ECHO \"\$relink_command_output\" >&2 $RM \"\$progdir/\$file\" exit 1 fi fi $MV \"\$progdir/\$file\" \"\$progdir/\$program\" 2>/dev/null || { $RM \"\$progdir/\$program\"; $MV \"\$progdir/\$file\" \"\$progdir/\$program\"; } $RM \"\$progdir/\$file\" fi" else $ECHO "\ program='$outputname' progdir=\"\$thisdir/$objdir\" " fi $ECHO "\ if test -f \"\$progdir/\$program\"; then" # fixup the dll searchpath if we need to. # # Fix the DLL searchpath if we need to. Do this before prepending # to shlibpath, because on Windows, both are PATH and uninstalled # libraries must come first. if test -n "$dllsearchpath"; then $ECHO "\ # Add the dll search path components to the executable PATH PATH=$dllsearchpath:\$PATH " fi # Export our shlibpath_var if we have one. if test yes = "$shlibpath_overrides_runpath" && test -n "$shlibpath_var" && test -n "$temp_rpath"; then $ECHO "\ # Add our own library path to $shlibpath_var $shlibpath_var=\"$temp_rpath\$$shlibpath_var\" # Some systems cannot cope with colon-terminated $shlibpath_var # The second colon is a workaround for a bug in BeOS R4 sed $shlibpath_var=\`\$ECHO \"\$$shlibpath_var\" | $SED 's/::*\$//'\` export $shlibpath_var " fi $ECHO "\ if test \"\$libtool_execute_magic\" != \"$magic\"; then # Run the actual program with our arguments. func_exec_program \${1+\"\$@\"} fi else # The program doesn't exist. \$ECHO \"\$0: error: '\$progdir/\$program' does not exist\" 1>&2 \$ECHO \"This script is just a wrapper for \$program.\" 1>&2 \$ECHO \"See the $PACKAGE documentation for more information.\" 1>&2 exit 1 fi fi\ " } # func_emit_cwrapperexe_src # emit the source code for a wrapper executable on stdout # Must ONLY be called from within func_mode_link because # it depends on a number of variable set therein. func_emit_cwrapperexe_src () { cat < #include #ifdef _MSC_VER # include # include # include #else # include # include # ifdef __CYGWIN__ # include # endif #endif #include #include #include #include #include #include #include #include #define STREQ(s1, s2) (strcmp ((s1), (s2)) == 0) /* declarations of non-ANSI functions */ #if defined __MINGW32__ # ifdef __STRICT_ANSI__ int _putenv (const char *); # endif #elif defined __CYGWIN__ # ifdef __STRICT_ANSI__ char *realpath (const char *, char *); int putenv (char *); int setenv (const char *, const char *, int); # endif /* #elif defined other_platform || defined ... */ #endif /* portability defines, excluding path handling macros */ #if defined _MSC_VER # define setmode _setmode # define stat _stat # define chmod _chmod # define getcwd _getcwd # define putenv _putenv # define S_IXUSR _S_IEXEC #elif defined __MINGW32__ # define setmode _setmode # define stat _stat # define chmod _chmod # define getcwd _getcwd # define putenv _putenv #elif defined __CYGWIN__ # define HAVE_SETENV # define FOPEN_WB "wb" /* #elif defined other platforms ... */ #endif #if defined PATH_MAX # define LT_PATHMAX PATH_MAX #elif defined MAXPATHLEN # define LT_PATHMAX MAXPATHLEN #else # define LT_PATHMAX 1024 #endif #ifndef S_IXOTH # define S_IXOTH 0 #endif #ifndef S_IXGRP # define S_IXGRP 0 #endif /* path handling portability macros */ #ifndef DIR_SEPARATOR # define DIR_SEPARATOR '/' # define PATH_SEPARATOR ':' #endif #if defined _WIN32 || defined __MSDOS__ || defined __DJGPP__ || \ defined __OS2__ # define HAVE_DOS_BASED_FILE_SYSTEM # define FOPEN_WB "wb" # ifndef DIR_SEPARATOR_2 # define DIR_SEPARATOR_2 '\\' # endif # ifndef PATH_SEPARATOR_2 # define PATH_SEPARATOR_2 ';' # endif #endif #ifndef DIR_SEPARATOR_2 # define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR) #else /* DIR_SEPARATOR_2 */ # define IS_DIR_SEPARATOR(ch) \ (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2)) #endif /* DIR_SEPARATOR_2 */ #ifndef PATH_SEPARATOR_2 # define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR) #else /* PATH_SEPARATOR_2 */ # define IS_PATH_SEPARATOR(ch) ((ch) == PATH_SEPARATOR_2) #endif /* PATH_SEPARATOR_2 */ #ifndef FOPEN_WB # define FOPEN_WB "w" #endif #ifndef _O_BINARY # define _O_BINARY 0 #endif #define XMALLOC(type, num) ((type *) xmalloc ((num) * sizeof(type))) #define XFREE(stale) do { \ if (stale) { free (stale); stale = 0; } \ } while (0) #if defined LT_DEBUGWRAPPER static int lt_debug = 1; #else static int lt_debug = 0; #endif const char *program_name = "libtool-wrapper"; /* in case xstrdup fails */ void *xmalloc (size_t num); char *xstrdup (const char *string); const char *base_name (const char *name); char *find_executable (const char *wrapper); char *chase_symlinks (const char *pathspec); int make_executable (const char *path); int check_executable (const char *path); char *strendzap (char *str, const char *pat); void lt_debugprintf (const char *file, int line, const char *fmt, ...); void lt_fatal (const char *file, int line, const char *message, ...); static const char *nonnull (const char *s); static const char *nonempty (const char *s); void lt_setenv (const char *name, const char *value); char *lt_extend_str (const char *orig_value, const char *add, int to_end); void lt_update_exe_path (const char *name, const char *value); void lt_update_lib_path (const char *name, const char *value); char **prepare_spawn (char **argv); void lt_dump_script (FILE *f); EOF cat <= 0) && (st.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))) return 1; else return 0; } int make_executable (const char *path) { int rval = 0; struct stat st; lt_debugprintf (__FILE__, __LINE__, "(make_executable): %s\n", nonempty (path)); if ((!path) || (!*path)) return 0; if (stat (path, &st) >= 0) { rval = chmod (path, st.st_mode | S_IXOTH | S_IXGRP | S_IXUSR); } return rval; } /* Searches for the full path of the wrapper. Returns newly allocated full path name if found, NULL otherwise Does not chase symlinks, even on platforms that support them. */ char * find_executable (const char *wrapper) { int has_slash = 0; const char *p; const char *p_next; /* static buffer for getcwd */ char tmp[LT_PATHMAX + 1]; size_t tmp_len; char *concat_name; lt_debugprintf (__FILE__, __LINE__, "(find_executable): %s\n", nonempty (wrapper)); if ((wrapper == NULL) || (*wrapper == '\0')) return NULL; /* Absolute path? */ #if defined HAVE_DOS_BASED_FILE_SYSTEM if (isalpha ((unsigned char) wrapper[0]) && wrapper[1] == ':') { concat_name = xstrdup (wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } else { #endif if (IS_DIR_SEPARATOR (wrapper[0])) { concat_name = xstrdup (wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } #if defined HAVE_DOS_BASED_FILE_SYSTEM } #endif for (p = wrapper; *p; p++) if (*p == '/') { has_slash = 1; break; } if (!has_slash) { /* no slashes; search PATH */ const char *path = getenv ("PATH"); if (path != NULL) { for (p = path; *p; p = p_next) { const char *q; size_t p_len; for (q = p; *q; q++) if (IS_PATH_SEPARATOR (*q)) break; p_len = (size_t) (q - p); p_next = (*q == '\0' ? q : q + 1); if (p_len == 0) { /* empty path: current directory */ if (getcwd (tmp, LT_PATHMAX) == NULL) lt_fatal (__FILE__, __LINE__, "getcwd failed: %s", nonnull (strerror (errno))); tmp_len = strlen (tmp); concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, tmp, tmp_len); concat_name[tmp_len] = '/'; strcpy (concat_name + tmp_len + 1, wrapper); } else { concat_name = XMALLOC (char, p_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, p, p_len); concat_name[p_len] = '/'; strcpy (concat_name + p_len + 1, wrapper); } if (check_executable (concat_name)) return concat_name; XFREE (concat_name); } } /* not found in PATH; assume curdir */ } /* Relative path | not found in path: prepend cwd */ if (getcwd (tmp, LT_PATHMAX) == NULL) lt_fatal (__FILE__, __LINE__, "getcwd failed: %s", nonnull (strerror (errno))); tmp_len = strlen (tmp); concat_name = XMALLOC (char, tmp_len + 1 + strlen (wrapper) + 1); memcpy (concat_name, tmp, tmp_len); concat_name[tmp_len] = '/'; strcpy (concat_name + tmp_len + 1, wrapper); if (check_executable (concat_name)) return concat_name; XFREE (concat_name); return NULL; } char * chase_symlinks (const char *pathspec) { #ifndef S_ISLNK return xstrdup (pathspec); #else char buf[LT_PATHMAX]; struct stat s; char *tmp_pathspec = xstrdup (pathspec); char *p; int has_symlinks = 0; while (strlen (tmp_pathspec) && !has_symlinks) { lt_debugprintf (__FILE__, __LINE__, "checking path component for symlinks: %s\n", tmp_pathspec); if (lstat (tmp_pathspec, &s) == 0) { if (S_ISLNK (s.st_mode) != 0) { has_symlinks = 1; break; } /* search backwards for last DIR_SEPARATOR */ p = tmp_pathspec + strlen (tmp_pathspec) - 1; while ((p > tmp_pathspec) && (!IS_DIR_SEPARATOR (*p))) p--; if ((p == tmp_pathspec) && (!IS_DIR_SEPARATOR (*p))) { /* no more DIR_SEPARATORS left */ break; } *p = '\0'; } else { lt_fatal (__FILE__, __LINE__, "error accessing file \"%s\": %s", tmp_pathspec, nonnull (strerror (errno))); } } XFREE (tmp_pathspec); if (!has_symlinks) { return xstrdup (pathspec); } tmp_pathspec = realpath (pathspec, buf); if (tmp_pathspec == 0) { lt_fatal (__FILE__, __LINE__, "could not follow symlinks for %s", pathspec); } return xstrdup (tmp_pathspec); #endif } char * strendzap (char *str, const char *pat) { size_t len, patlen; assert (str != NULL); assert (pat != NULL); len = strlen (str); patlen = strlen (pat); if (patlen <= len) { str += len - patlen; if (STREQ (str, pat)) *str = '\0'; } return str; } void lt_debugprintf (const char *file, int line, const char *fmt, ...) { va_list args; if (lt_debug) { (void) fprintf (stderr, "%s:%s:%d: ", program_name, file, line); va_start (args, fmt); (void) vfprintf (stderr, fmt, args); va_end (args); } } static void lt_error_core (int exit_status, const char *file, int line, const char *mode, const char *message, va_list ap) { fprintf (stderr, "%s:%s:%d: %s: ", program_name, file, line, mode); vfprintf (stderr, message, ap); fprintf (stderr, ".\n"); if (exit_status >= 0) exit (exit_status); } void lt_fatal (const char *file, int line, const char *message, ...) { va_list ap; va_start (ap, message); lt_error_core (EXIT_FAILURE, file, line, "FATAL", message, ap); va_end (ap); } static const char * nonnull (const char *s) { return s ? s : "(null)"; } static const char * nonempty (const char *s) { return (s && !*s) ? "(empty)" : nonnull (s); } void lt_setenv (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_setenv) setting '%s' to '%s'\n", nonnull (name), nonnull (value)); { #ifdef HAVE_SETENV /* always make a copy, for consistency with !HAVE_SETENV */ char *str = xstrdup (value); setenv (name, str, 1); #else size_t len = strlen (name) + 1 + strlen (value) + 1; char *str = XMALLOC (char, len); sprintf (str, "%s=%s", name, value); if (putenv (str) != EXIT_SUCCESS) { XFREE (str); } #endif } } char * lt_extend_str (const char *orig_value, const char *add, int to_end) { char *new_value; if (orig_value && *orig_value) { size_t orig_value_len = strlen (orig_value); size_t add_len = strlen (add); new_value = XMALLOC (char, add_len + orig_value_len + 1); if (to_end) { strcpy (new_value, orig_value); strcpy (new_value + orig_value_len, add); } else { strcpy (new_value, add); strcpy (new_value + add_len, orig_value); } } else { new_value = xstrdup (add); } return new_value; } void lt_update_exe_path (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_update_exe_path) modifying '%s' by prepending '%s'\n", nonnull (name), nonnull (value)); if (name && *name && value && *value) { char *new_value = lt_extend_str (getenv (name), value, 0); /* some systems can't cope with a ':'-terminated path #' */ size_t len = strlen (new_value); while ((len > 0) && IS_PATH_SEPARATOR (new_value[len-1])) { new_value[--len] = '\0'; } lt_setenv (name, new_value); XFREE (new_value); } } void lt_update_lib_path (const char *name, const char *value) { lt_debugprintf (__FILE__, __LINE__, "(lt_update_lib_path) modifying '%s' by prepending '%s'\n", nonnull (name), nonnull (value)); if (name && *name && value && *value) { char *new_value = lt_extend_str (getenv (name), value, 0); lt_setenv (name, new_value); XFREE (new_value); } } EOF case $host_os in mingw*) cat <<"EOF" /* Prepares an argument vector before calling spawn(). Note that spawn() does not by itself call the command interpreter (getenv ("COMSPEC") != NULL ? getenv ("COMSPEC") : ({ OSVERSIONINFO v; v.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); GetVersionEx(&v); v.dwPlatformId == VER_PLATFORM_WIN32_NT; }) ? "cmd.exe" : "command.com"). Instead it simply concatenates the arguments, separated by ' ', and calls CreateProcess(). We must quote the arguments since Win32 CreateProcess() interprets characters like ' ', '\t', '\\', '"' (but not '<' and '>') in a special way: - Space and tab are interpreted as delimiters. They are not treated as delimiters if they are surrounded by double quotes: "...". - Unescaped double quotes are removed from the input. Their only effect is that within double quotes, space and tab are treated like normal characters. - Backslashes not followed by double quotes are not special. - But 2*n+1 backslashes followed by a double quote become n backslashes followed by a double quote (n >= 0): \" -> " \\\" -> \" \\\\\" -> \\" */ #define SHELL_SPECIAL_CHARS "\"\\ \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037" #define SHELL_SPACE_CHARS " \001\002\003\004\005\006\007\010\011\012\013\014\015\016\017\020\021\022\023\024\025\026\027\030\031\032\033\034\035\036\037" char ** prepare_spawn (char **argv) { size_t argc; char **new_argv; size_t i; /* Count number of arguments. */ for (argc = 0; argv[argc] != NULL; argc++) ; /* Allocate new argument vector. */ new_argv = XMALLOC (char *, argc + 1); /* Put quoted arguments into the new argument vector. */ for (i = 0; i < argc; i++) { const char *string = argv[i]; if (string[0] == '\0') new_argv[i] = xstrdup ("\"\""); else if (strpbrk (string, SHELL_SPECIAL_CHARS) != NULL) { int quote_around = (strpbrk (string, SHELL_SPACE_CHARS) != NULL); size_t length; unsigned int backslashes; const char *s; char *quoted_string; char *p; length = 0; backslashes = 0; if (quote_around) length++; for (s = string; *s != '\0'; s++) { char c = *s; if (c == '"') length += backslashes + 1; length++; if (c == '\\') backslashes++; else backslashes = 0; } if (quote_around) length += backslashes + 1; quoted_string = XMALLOC (char, length + 1); p = quoted_string; backslashes = 0; if (quote_around) *p++ = '"'; for (s = string; *s != '\0'; s++) { char c = *s; if (c == '"') { unsigned int j; for (j = backslashes + 1; j > 0; j--) *p++ = '\\'; } *p++ = c; if (c == '\\') backslashes++; else backslashes = 0; } if (quote_around) { unsigned int j; for (j = backslashes; j > 0; j--) *p++ = '\\'; *p++ = '"'; } *p = '\0'; new_argv[i] = quoted_string; } else new_argv[i] = (char *) string; } new_argv[argc] = NULL; return new_argv; } EOF ;; esac cat <<"EOF" void lt_dump_script (FILE* f) { EOF func_emit_wrapper yes | $SED -n -e ' s/^\(.\{79\}\)\(..*\)/\1\ \2/ h s/\([\\"]\)/\\\1/g s/$/\\n/ s/\([^\n]*\).*/ fputs ("\1", f);/p g D' cat <<"EOF" } EOF } # end: func_emit_cwrapperexe_src # func_win32_import_lib_p ARG # True if ARG is an import lib, as indicated by $file_magic_cmd func_win32_import_lib_p () { $debug_cmd case `eval $file_magic_cmd \"\$1\" 2>/dev/null | $SED -e 10q` in *import*) : ;; *) false ;; esac } # func_suncc_cstd_abi # !!ONLY CALL THIS FOR SUN CC AFTER $compile_command IS FULLY EXPANDED!! # Several compiler flags select an ABI that is incompatible with the # Cstd library. Avoid specifying it if any are in CXXFLAGS. func_suncc_cstd_abi () { $debug_cmd case " $compile_command " in *" -compat=g "*|*\ -std=c++[0-9][0-9]\ *|*" -library=stdcxx4 "*|*" -library=stlport4 "*) suncc_use_cstd_abi=no ;; *) suncc_use_cstd_abi=yes ;; esac } # func_mode_link arg... func_mode_link () { $debug_cmd case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) # It is impossible to link a dll without this setting, and # we shouldn't force the makefile maintainer to figure out # what system we are compiling for in order to pass an extra # flag for every libtool invocation. # allow_undefined=no # FIXME: Unfortunately, there are problems with the above when trying # to make a dll that has undefined symbols, in which case not # even a static library is built. For now, we need to specify # -no-undefined on the libtool link line when we can be certain # that all symbols are satisfied, otherwise we get a static library. allow_undefined=yes ;; *) allow_undefined=yes ;; esac libtool_args=$nonopt base_compile="$nonopt $@" compile_command=$nonopt finalize_command=$nonopt compile_rpath= finalize_rpath= compile_shlibpath= finalize_shlibpath= convenience= old_convenience= deplibs= old_deplibs= compiler_flags= linker_flags= dllsearchpath= lib_search_path=`pwd` inst_prefix_dir= new_inherited_linker_flags= avoid_version=no bindir= dlfiles= dlprefiles= dlself=no export_dynamic=no export_symbols= export_symbols_regex= generated= libobjs= ltlibs= module=no no_install=no objs= os2dllname= non_pic_objects= precious_files_regex= prefer_static_libs=no preload=false prev= prevarg= release= rpath= xrpath= perm_rpath= temp_rpath= thread_safe=no vinfo= vinfo_number=no weak_libs= single_module=$wl-single_module func_infer_tag $base_compile # We need to know -static, to get the right output filenames. for arg do case $arg in -shared) test yes != "$build_libtool_libs" \ && func_fatal_configuration "cannot build a shared library" build_old_libs=no break ;; -all-static | -static | -static-uninstalled-libs | -static-libtool-libs) case $arg in -all-static | -static) if test yes = "$build_libtool_libs" && test -z "$link_static_flag"; then func_warning "complete static linking is impossible in this configuration" fi if test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=yes ;; -static-uninstalled-libs) if test -z "$pic_flag" && test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=built ;; -static-libtool-libs) if test -z "$pic_flag" && test -n "$link_static_flag"; then dlopen_self=$dlopen_self_static fi prefer_static_libs=yes ;; esac build_libtool_libs=no build_old_libs=yes break ;; esac done # See if our shared archives depend on static archives. test -n "$old_archive_from_new_cmds" && build_old_libs=yes # Go through the arguments, transforming them on the way. while test "$#" -gt 0; do arg=$1 shift func_quote_arg pretty,unquoted "$arg" qarg=$func_quote_arg_unquoted_result func_append libtool_args " $func_quote_arg_result" # If the previous option needs an argument, assign it. if test -n "$prev"; then case $prev in output) func_append compile_command " @OUTPUT@" func_append finalize_command " @OUTPUT@" ;; esac case $prev in bindir) bindir=$arg prev= continue ;; dlfiles|dlprefiles) $preload || { # Add the symbol object into the linking commands. func_append compile_command " @SYMFILE@" func_append finalize_command " @SYMFILE@" preload=: } case $arg in *.la | *.lo) ;; # We handle these cases below. force) if test no = "$dlself"; then dlself=needless export_dynamic=yes fi prev= continue ;; self) if test dlprefiles = "$prev"; then dlself=yes elif test dlfiles = "$prev" && test yes != "$dlopen_self"; then dlself=yes else dlself=needless export_dynamic=yes fi prev= continue ;; *) if test dlfiles = "$prev"; then func_append dlfiles " $arg" else func_append dlprefiles " $arg" fi prev= continue ;; esac ;; expsyms) export_symbols=$arg test -f "$arg" \ || func_fatal_error "symbol file '$arg' does not exist" prev= continue ;; expsyms_regex) export_symbols_regex=$arg prev= continue ;; framework) case $host in *-*-darwin*) case "$deplibs " in *" $qarg.ltframework "*) ;; *) func_append deplibs " $qarg.ltframework" # this is fixed later ;; esac ;; esac prev= continue ;; inst_prefix) inst_prefix_dir=$arg prev= continue ;; mllvm) # Clang does not use LLVM to link, so we can simply discard any # '-mllvm $arg' options when doing the link step. prev= continue ;; objectlist) if test -f "$arg"; then save_arg=$arg moreargs= for fil in `cat "$save_arg"` do # func_append moreargs " $fil" arg=$fil # A libtool-controlled object. # Check to see that this really is a libtool object. if func_lalib_unsafe_p "$arg"; then pic_object= non_pic_object= # Read the .lo file func_source "$arg" if test -z "$pic_object" || test -z "$non_pic_object" || test none = "$pic_object" && test none = "$non_pic_object"; then func_fatal_error "cannot find name of object for '$arg'" fi # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result if test none != "$pic_object"; then # Prepend the subdirectory the object is found in. pic_object=$xdir$pic_object if test dlfiles = "$prev"; then if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then func_append dlfiles " $pic_object" prev= continue else # If libtool objects are unsupported, then we need to preload. prev=dlprefiles fi fi # CHECK ME: I think I busted this. -Ossama if test dlprefiles = "$prev"; then # Preload the old-style object. func_append dlprefiles " $pic_object" prev= fi # A PIC object. func_append libobjs " $pic_object" arg=$pic_object fi # Non-PIC object. if test none != "$non_pic_object"; then # Prepend the subdirectory the object is found in. non_pic_object=$xdir$non_pic_object # A standard non-PIC object func_append non_pic_objects " $non_pic_object" if test -z "$pic_object" || test none = "$pic_object"; then arg=$non_pic_object fi else # If the PIC object exists, use it instead. # $xdir was prepended to $pic_object above. non_pic_object=$pic_object func_append non_pic_objects " $non_pic_object" fi else # Only an error if not doing a dry-run. if $opt_dry_run; then # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result func_lo2o "$arg" pic_object=$xdir$objdir/$func_lo2o_result non_pic_object=$xdir$func_lo2o_result func_append libobjs " $pic_object" func_append non_pic_objects " $non_pic_object" else func_fatal_error "'$arg' is not a valid libtool object" fi fi done else func_fatal_error "link input file '$arg' does not exist" fi arg=$save_arg prev= continue ;; os2dllname) os2dllname=$arg prev= continue ;; precious_regex) precious_files_regex=$arg prev= continue ;; release) release=-$arg prev= continue ;; rpath | xrpath) # We need an absolute path. case $arg in [\\/]* | [A-Za-z]:[\\/]*) ;; *) func_fatal_error "only absolute run-paths are allowed" ;; esac if test rpath = "$prev"; then case "$rpath " in *" $arg "*) ;; *) func_append rpath " $arg" ;; esac else case "$xrpath " in *" $arg "*) ;; *) func_append xrpath " $arg" ;; esac fi prev= continue ;; shrext) shrext_cmds=$arg prev= continue ;; weak) func_append weak_libs " $arg" prev= continue ;; xassembler) func_append compiler_flags " -Xassembler $qarg" prev= func_append compile_command " -Xassembler $qarg" func_append finalize_command " -Xassembler $qarg" continue ;; xcclinker) func_append linker_flags " $qarg" func_append compiler_flags " $qarg" prev= func_append compile_command " $qarg" func_append finalize_command " $qarg" continue ;; xcompiler) func_append compiler_flags " $qarg" prev= func_append compile_command " $qarg" func_append finalize_command " $qarg" continue ;; xlinker) func_append linker_flags " $qarg" func_append compiler_flags " $wl$qarg" prev= func_append compile_command " $wl$qarg" func_append finalize_command " $wl$qarg" continue ;; *) eval "$prev=\"\$arg\"" prev= continue ;; esac fi # test -n "$prev" prevarg=$arg case $arg in -all-static | -static) if test -n "$link_static_flag"; then # See comment for -static flag below, for more details. func_append compile_command " $link_static_flag" func_append finalize_command " $link_static_flag" fi continue ;; -allow-undefined) # FIXME: remove this flag sometime in the future. func_fatal_error "'-allow-undefined' must not be used because it is the default" ;; -avoid-version) avoid_version=yes continue ;; -bindir) prev=bindir continue ;; -dlopen) prev=dlfiles continue ;; -dlpreopen) prev=dlprefiles continue ;; -export-dynamic) export_dynamic=yes continue ;; -export-symbols | -export-symbols-regex) if test -n "$export_symbols" || test -n "$export_symbols_regex"; then func_fatal_error "more than one -exported-symbols argument is not allowed" fi if test X-export-symbols = "X$arg"; then prev=expsyms else prev=expsyms_regex fi continue ;; -framework) prev=framework continue ;; -inst-prefix-dir) prev=inst_prefix continue ;; # The native IRIX linker understands -LANG:*, -LIST:* and -LNO:* # so, if we see these flags be careful not to treat them like -L -L[A-Z][A-Z]*:*) case $with_gcc/$host in no/*-*-irix* | /*-*-irix*) func_append compile_command " $arg" func_append finalize_command " $arg" ;; esac continue ;; -L*) func_stripname "-L" '' "$arg" if test -z "$func_stripname_result"; then if test "$#" -gt 0; then func_fatal_error "require no space between '-L' and '$1'" else func_fatal_error "need path for '-L' option" fi fi func_resolve_sysroot "$func_stripname_result" dir=$func_resolve_sysroot_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) ;; *) absdir=`cd "$dir" && pwd` test -z "$absdir" && \ func_fatal_error "cannot determine absolute directory name of '$dir'" dir=$absdir ;; esac case "$deplibs " in *" -L$dir "* | *" $arg "*) # Will only happen for absolute or sysroot arguments ;; *) # Preserve sysroot, but never include relative directories case $dir in [\\/]* | [A-Za-z]:[\\/]* | =*) func_append deplibs " $arg" ;; *) func_append deplibs " -L$dir" ;; esac func_append lib_search_path " $dir" ;; esac case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) testbindir=`$ECHO "$dir" | $SED 's*/lib$*/bin*'` case :$dllsearchpath: in *":$dir:"*) ;; ::) dllsearchpath=$dir;; *) func_append dllsearchpath ":$dir";; esac case :$dllsearchpath: in *":$testbindir:"*) ;; ::) dllsearchpath=$testbindir;; *) func_append dllsearchpath ":$testbindir";; esac ;; esac continue ;; -l*) if test X-lc = "X$arg" || test X-lm = "X$arg"; then case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-beos* | *-cegcc* | *-*-haiku*) # These systems don't actually have a C or math library (as such) continue ;; *-*-os2*) # These systems don't actually have a C library (as such) test X-lc = "X$arg" && continue ;; *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig* | *-*-midnightbsd*) # Do not include libc due to us having libc/libc_r. test X-lc = "X$arg" && continue ;; *-*-rhapsody* | *-*-darwin1.[012]) # Rhapsody C and math libraries are in the System framework func_append deplibs " System.ltframework" continue ;; *-*-sco3.2v5* | *-*-sco5v6*) # Causes problems with __ctype test X-lc = "X$arg" && continue ;; *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*) # Compiler inserts libc in the correct place for threads to work test X-lc = "X$arg" && continue ;; esac elif test X-lc_r = "X$arg"; then case $host in *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-bitrig* | *-*-midnightbsd*) # Do not include libc_r directly, use -pthread flag. continue ;; esac fi func_append deplibs " $arg" continue ;; -mllvm) prev=mllvm continue ;; -module) module=yes continue ;; # Tru64 UNIX uses -model [arg] to determine the layout of C++ # classes, name mangling, and exception handling. # Darwin uses the -arch flag to determine output architecture. -model|-arch|-isysroot|--sysroot) func_append compiler_flags " $arg" func_append compile_command " $arg" func_append finalize_command " $arg" prev=xcompiler continue ;; # Solaris ld rejects as of 11.4. Refer to Oracle bug 22985199. -pthread) case $host in *solaris2*) ;; *) case "$new_inherited_linker_flags " in *" $arg "*) ;; * ) func_append new_inherited_linker_flags " $arg" ;; esac ;; esac continue ;; -mt|-mthreads|-kthread|-Kthread|-pthreads|--thread-safe \ |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*) func_append compiler_flags " $arg" func_append compile_command " $arg" func_append finalize_command " $arg" case "$new_inherited_linker_flags " in *" $arg "*) ;; * ) func_append new_inherited_linker_flags " $arg" ;; esac continue ;; -multi_module) single_module=$wl-multi_module continue ;; -no-fast-install) fast_install=no continue ;; -no-install) case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-darwin* | *-cegcc*) # The PATH hackery in wrapper scripts is required on Windows # and Darwin in order for the loader to find any dlls it needs. func_warning "'-no-install' is ignored for $host" func_warning "assuming '-no-fast-install' instead" fast_install=no ;; *) no_install=yes ;; esac continue ;; -no-undefined) allow_undefined=no continue ;; -objectlist) prev=objectlist continue ;; -os2dllname) prev=os2dllname continue ;; -o) prev=output ;; -precious-files-regex) prev=precious_regex continue ;; -release) prev=release continue ;; -rpath) prev=rpath continue ;; -R) prev=xrpath continue ;; -R*) func_stripname '-R' '' "$arg" dir=$func_stripname_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) ;; =*) func_stripname '=' '' "$dir" dir=$lt_sysroot$func_stripname_result ;; *) func_fatal_error "only absolute run-paths are allowed" ;; esac case "$xrpath " in *" $dir "*) ;; *) func_append xrpath " $dir" ;; esac continue ;; -shared) # The effects of -shared are defined in a previous loop. continue ;; -shrext) prev=shrext continue ;; -static-uninstalled-libs | -static-libtool-libs) # The effects of -static-uninstalled-libs are defined in a previous # loop. We used to do the same as -all-static on platforms that # didn't have a PIC flag, but the assumption that the effects # would be equivalent was wrong. It would break on at least # Digital Unix and AIX. continue ;; -thread-safe) thread_safe=yes continue ;; -version-info) prev=vinfo continue ;; -version-number) prev=vinfo vinfo_number=yes continue ;; -weak) prev=weak continue ;; -Wc,*) func_stripname '-Wc,' '' "$arg" args=$func_stripname_result arg= save_ifs=$IFS; IFS=, for flag in $args; do IFS=$save_ifs func_quote_arg pretty "$flag" func_append arg " $func_quote_arg_result" func_append compiler_flags " $func_quote_arg_result" done IFS=$save_ifs func_stripname ' ' '' "$arg" arg=$func_stripname_result ;; -Wl,*) func_stripname '-Wl,' '' "$arg" args=$func_stripname_result arg= save_ifs=$IFS; IFS=, for flag in $args; do IFS=$save_ifs func_quote_arg pretty "$flag" func_append arg " $wl$func_quote_arg_result" func_append compiler_flags " $wl$func_quote_arg_result" func_append linker_flags " $func_quote_arg_result" done IFS=$save_ifs func_stripname ' ' '' "$arg" arg=$func_stripname_result ;; -Xassembler) prev=xassembler continue ;; -Xcompiler) prev=xcompiler continue ;; -Xlinker) prev=xlinker continue ;; -XCClinker) prev=xcclinker continue ;; # -msg_* for osf cc -msg_*) func_quote_arg pretty "$arg" arg=$func_quote_arg_result ;; # Flags to be passed through unchanged, with rationale: # -64, -mips[0-9] enable 64-bit mode for the SGI compiler # -r[0-9][0-9]* specify processor for the SGI compiler # -xarch=*, -xtarget=* enable 64-bit mode for the Sun compiler # +DA*, +DD* enable 64-bit mode for the HP compiler # -q* compiler args for the IBM compiler # -m*, -t[45]*, -txscale* architecture-specific flags for GCC # -F/path path to uninstalled frameworks, gcc on darwin # -p, -pg, --coverage, -fprofile-* profiling flags for GCC # -fstack-protector* stack protector flags for GCC # @file GCC response files # -tp=* Portland pgcc target processor selection # --sysroot=* for sysroot support # -O*, -g*, -flto*, -fwhopr*, -fuse-linker-plugin GCC link-time optimization # -specs=* GCC specs files # -stdlib=* select c++ std lib with clang # -fsanitize=* Clang/GCC memory and address sanitizer # -fuse-ld=* Linker select flags for GCC # -Wa,* Pass flags directly to the assembler -64|-mips[0-9]|-r[0-9][0-9]*|-xarch=*|-xtarget=*|+DA*|+DD*|-q*|-m*| \ -t[45]*|-txscale*|-p|-pg|--coverage|-fprofile-*|-F*|@*|-tp=*|--sysroot=*| \ -O*|-g*|-flto*|-fwhopr*|-fuse-linker-plugin|-fstack-protector*|-stdlib=*| \ -specs=*|-fsanitize=*|-fuse-ld=*|-Wa,*) func_quote_arg pretty "$arg" arg=$func_quote_arg_result func_append compile_command " $arg" func_append finalize_command " $arg" func_append compiler_flags " $arg" continue ;; -Z*) if test os2 = "`expr $host : '.*\(os2\)'`"; then # OS/2 uses -Zxxx to specify OS/2-specific options compiler_flags="$compiler_flags $arg" func_append compile_command " $arg" func_append finalize_command " $arg" case $arg in -Zlinker | -Zstack) prev=xcompiler ;; esac continue else # Otherwise treat like 'Some other compiler flag' below func_quote_arg pretty "$arg" arg=$func_quote_arg_result fi ;; # Some other compiler flag. -* | +*) func_quote_arg pretty "$arg" arg=$func_quote_arg_result ;; *.$objext) # A standard object. func_append objs " $arg" ;; *.lo) # A libtool-controlled object. # Check to see that this really is a libtool object. if func_lalib_unsafe_p "$arg"; then pic_object= non_pic_object= # Read the .lo file func_source "$arg" if test -z "$pic_object" || test -z "$non_pic_object" || test none = "$pic_object" && test none = "$non_pic_object"; then func_fatal_error "cannot find name of object for '$arg'" fi # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result test none = "$pic_object" || { # Prepend the subdirectory the object is found in. pic_object=$xdir$pic_object if test dlfiles = "$prev"; then if test yes = "$build_libtool_libs" && test yes = "$dlopen_support"; then func_append dlfiles " $pic_object" prev= continue else # If libtool objects are unsupported, then we need to preload. prev=dlprefiles fi fi # CHECK ME: I think I busted this. -Ossama if test dlprefiles = "$prev"; then # Preload the old-style object. func_append dlprefiles " $pic_object" prev= fi # A PIC object. func_append libobjs " $pic_object" arg=$pic_object } # Non-PIC object. if test none != "$non_pic_object"; then # Prepend the subdirectory the object is found in. non_pic_object=$xdir$non_pic_object # A standard non-PIC object func_append non_pic_objects " $non_pic_object" if test -z "$pic_object" || test none = "$pic_object"; then arg=$non_pic_object fi else # If the PIC object exists, use it instead. # $xdir was prepended to $pic_object above. non_pic_object=$pic_object func_append non_pic_objects " $non_pic_object" fi else # Only an error if not doing a dry-run. if $opt_dry_run; then # Extract subdirectory from the argument. func_dirname "$arg" "/" "" xdir=$func_dirname_result func_lo2o "$arg" pic_object=$xdir$objdir/$func_lo2o_result non_pic_object=$xdir$func_lo2o_result func_append libobjs " $pic_object" func_append non_pic_objects " $non_pic_object" else func_fatal_error "'$arg' is not a valid libtool object" fi fi ;; *.$libext) # An archive. func_append deplibs " $arg" func_append old_deplibs " $arg" continue ;; *.la) # A libtool-controlled library. func_resolve_sysroot "$arg" if test dlfiles = "$prev"; then # This library was specified with -dlopen. func_append dlfiles " $func_resolve_sysroot_result" prev= elif test dlprefiles = "$prev"; then # The library was specified with -dlpreopen. func_append dlprefiles " $func_resolve_sysroot_result" prev= else func_append deplibs " $func_resolve_sysroot_result" fi continue ;; # Some other compiler argument. *) # Unknown arguments in both finalize_command and compile_command need # to be aesthetically quoted because they are evaled later. func_quote_arg pretty "$arg" arg=$func_quote_arg_result ;; esac # arg # Now actually substitute the argument into the commands. if test -n "$arg"; then func_append compile_command " $arg" func_append finalize_command " $arg" fi done # argument parsing loop test -n "$prev" && \ func_fatal_help "the '$prevarg' option requires an argument" if test yes = "$export_dynamic" && test -n "$export_dynamic_flag_spec"; then eval arg=\"$export_dynamic_flag_spec\" func_append compile_command " $arg" func_append finalize_command " $arg" fi oldlibs= # calculate the name of the file, without its directory func_basename "$output" outputname=$func_basename_result libobjs_save=$libobjs if test -n "$shlibpath_var"; then # get the directories listed in $shlibpath_var eval shlib_search_path=\`\$ECHO \"\$$shlibpath_var\" \| \$SED \'s/:/ /g\'\` else shlib_search_path= fi eval sys_lib_search_path=\"$sys_lib_search_path_spec\" eval sys_lib_dlsearch_path=\"$sys_lib_dlsearch_path_spec\" # Definition is injected by LT_CONFIG during libtool generation. func_munge_path_list sys_lib_dlsearch_path "$LT_SYS_LIBRARY_PATH" func_dirname "$output" "/" "" output_objdir=$func_dirname_result$objdir func_to_tool_file "$output_objdir/" tool_output_objdir=$func_to_tool_file_result # Create the object directory. func_mkdir_p "$output_objdir" # Determine the type of output case $output in "") func_fatal_help "you must specify an output file" ;; *.$libext) linkmode=oldlib ;; *.lo | *.$objext) linkmode=obj ;; *.la) linkmode=lib ;; *) linkmode=prog ;; # Anything else should be a program. esac specialdeplibs= libs= # Find all interdependent deplibs by searching for libraries # that are linked more than once (e.g. -la -lb -la) for deplib in $deplibs; do if $opt_preserve_dup_deps; then case "$libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append libs " $deplib" done if test lib = "$linkmode"; then libs="$predeps $libs $compiler_lib_search_path $postdeps" # Compute libraries that are listed more than once in $predeps # $postdeps and mark them as special (i.e., whose duplicates are # not to be eliminated). pre_post_deps= if $opt_duplicate_compiler_generated_deps; then for pre_post_dep in $predeps $postdeps; do case "$pre_post_deps " in *" $pre_post_dep "*) func_append specialdeplibs " $pre_post_deps" ;; esac func_append pre_post_deps " $pre_post_dep" done fi pre_post_deps= fi deplibs= newdependency_libs= newlib_search_path= need_relink=no # whether we're linking any uninstalled libtool libraries notinst_deplibs= # not-installed libtool libraries notinst_path= # paths that contain not-installed libtool libraries case $linkmode in lib) passes="conv dlpreopen link" for file in $dlfiles $dlprefiles; do case $file in *.la) ;; *) func_fatal_help "libraries can '-dlopen' only libtool libraries: $file" ;; esac done ;; prog) compile_deplibs= finalize_deplibs= alldeplibs=false newdlfiles= newdlprefiles= passes="conv scan dlopen dlpreopen link" ;; *) passes="conv" ;; esac for pass in $passes; do # The preopen pass in lib mode reverses $deplibs; put it back here # so that -L comes before libs that need it for instance... if test lib,link = "$linkmode,$pass"; then ## FIXME: Find the place where the list is rebuilt in the wrong ## order, and fix it there properly tmp_deplibs= for deplib in $deplibs; do tmp_deplibs="$deplib $tmp_deplibs" done deplibs=$tmp_deplibs fi if test lib,link = "$linkmode,$pass" || test prog,scan = "$linkmode,$pass"; then libs=$deplibs deplibs= fi if test prog = "$linkmode"; then case $pass in dlopen) libs=$dlfiles ;; dlpreopen) libs=$dlprefiles ;; link) libs="$deplibs %DEPLIBS% $dependency_libs" ;; esac fi if test lib,dlpreopen = "$linkmode,$pass"; then # Collect and forward deplibs of preopened libtool libs for lib in $dlprefiles; do # Ignore non-libtool-libs dependency_libs= func_resolve_sysroot "$lib" case $lib in *.la) func_source "$func_resolve_sysroot_result" ;; esac # Collect preopened libtool deplibs, except any this library # has declared as weak libs for deplib in $dependency_libs; do func_basename "$deplib" deplib_base=$func_basename_result case " $weak_libs " in *" $deplib_base "*) ;; *) func_append deplibs " $deplib" ;; esac done done libs=$dlprefiles fi if test dlopen = "$pass"; then # Collect dlpreopened libraries save_deplibs=$deplibs deplibs= fi for deplib in $libs; do lib= found=false case $deplib in -mt|-mthreads|-kthread|-Kthread|-pthread|-pthreads|--thread-safe \ |-threads|-fopenmp|-openmp|-mp|-xopenmp|-omp|-qsmp=*) if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else func_append compiler_flags " $deplib" if test lib = "$linkmode"; then case "$new_inherited_linker_flags " in *" $deplib "*) ;; * ) func_append new_inherited_linker_flags " $deplib" ;; esac fi fi continue ;; -l*) if test lib != "$linkmode" && test prog != "$linkmode"; then func_warning "'-l' is ignored for archives/objects" continue fi func_stripname '-l' '' "$deplib" name=$func_stripname_result if test lib = "$linkmode"; then searchdirs="$newlib_search_path $lib_search_path $compiler_lib_search_dirs $sys_lib_search_path $shlib_search_path" else searchdirs="$newlib_search_path $lib_search_path $sys_lib_search_path $shlib_search_path" fi for searchdir in $searchdirs; do for search_ext in .la $std_shrext .so .a; do # Search the libtool library lib=$searchdir/lib$name$search_ext if test -f "$lib"; then if test .la = "$search_ext"; then found=: else found=false fi break 2 fi done done if $found; then # deplib is a libtool library # If $allow_libtool_libs_with_static_runtimes && $deplib is a stdlib, # We need to do some special things here, and not later. if test yes = "$allow_libtool_libs_with_static_runtimes"; then case " $predeps $postdeps " in *" $deplib "*) if func_lalib_p "$lib"; then library_names= old_library= func_source "$lib" for l in $old_library $library_names; do ll=$l done if test "X$ll" = "X$old_library"; then # only static version available found=false func_dirname "$lib" "" "." ladir=$func_dirname_result lib=$ladir/$old_library if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs" fi continue fi fi ;; *) ;; esac fi else # deplib doesn't seem to be a libtool library if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" test lib = "$linkmode" && newdependency_libs="$deplib $newdependency_libs" fi continue fi ;; # -l *.ltframework) if test prog,link = "$linkmode,$pass"; then compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else deplibs="$deplib $deplibs" if test lib = "$linkmode"; then case "$new_inherited_linker_flags " in *" $deplib "*) ;; * ) func_append new_inherited_linker_flags " $deplib" ;; esac fi fi continue ;; -L*) case $linkmode in lib) deplibs="$deplib $deplibs" test conv = "$pass" && continue newdependency_libs="$deplib $newdependency_libs" func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; prog) if test conv = "$pass"; then deplibs="$deplib $deplibs" continue fi if test scan = "$pass"; then deplibs="$deplib $deplibs" else compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" fi func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; *) func_warning "'-L' is ignored for archives/objects" ;; esac # linkmode continue ;; # -L -R*) if test link = "$pass"; then func_stripname '-R' '' "$deplib" func_resolve_sysroot "$func_stripname_result" dir=$func_resolve_sysroot_result # Make sure the xrpath contains only unique directories. case "$xrpath " in *" $dir "*) ;; *) func_append xrpath " $dir" ;; esac fi deplibs="$deplib $deplibs" continue ;; *.la) func_resolve_sysroot "$deplib" lib=$func_resolve_sysroot_result ;; *.$libext) if test conv = "$pass"; then deplibs="$deplib $deplibs" continue fi case $linkmode in lib) # Linking convenience modules into shared libraries is allowed, # but linking other static libraries is non-portable. case " $dlpreconveniencelibs " in *" $deplib "*) ;; *) valid_a_lib=false case $deplibs_check_method in match_pattern*) set dummy $deplibs_check_method; shift match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"` if eval "\$ECHO \"$deplib\"" 2>/dev/null | $SED 10q \ | $EGREP "$match_pattern_regex" > /dev/null; then valid_a_lib=: fi ;; pass_all) valid_a_lib=: ;; esac if $valid_a_lib; then echo $ECHO "*** Warning: Linking the shared library $output against the" $ECHO "*** static library $deplib is not portable!" deplibs="$deplib $deplibs" else echo $ECHO "*** Warning: Trying to link with static lib archive $deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because the file extensions .$libext of this argument makes me believe" echo "*** that it is just a static archive that I should not use here." fi ;; esac continue ;; prog) if test link != "$pass"; then deplibs="$deplib $deplibs" else compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" fi continue ;; esac # linkmode ;; # *.$libext *.lo | *.$objext) if test conv = "$pass"; then deplibs="$deplib $deplibs" elif test prog = "$linkmode"; then if test dlpreopen = "$pass" || test yes != "$dlopen_support" || test no = "$build_libtool_libs"; then # If there is no dlopen support or we're linking statically, # we need to preload. func_append newdlprefiles " $deplib" compile_deplibs="$deplib $compile_deplibs" finalize_deplibs="$deplib $finalize_deplibs" else func_append newdlfiles " $deplib" fi fi continue ;; %DEPLIBS%) alldeplibs=: continue ;; esac # case $deplib $found || test -f "$lib" \ || func_fatal_error "cannot find the library '$lib' or unhandled argument '$deplib'" # Check to see that this really is a libtool archive. func_lalib_unsafe_p "$lib" \ || func_fatal_error "'$lib' is not a valid libtool archive" func_dirname "$lib" "" "." ladir=$func_dirname_result dlname= dlopen= dlpreopen= libdir= library_names= old_library= inherited_linker_flags= # If the library was installed with an old release of libtool, # it will not redefine variables installed, or shouldnotlink installed=yes shouldnotlink=no avoidtemprpath= # Read the .la file func_source "$lib" # Convert "-framework foo" to "foo.ltframework" if test -n "$inherited_linker_flags"; then tmp_inherited_linker_flags=`$ECHO "$inherited_linker_flags" | $SED 's/-framework \([^ $]*\)/\1.ltframework/g'` for tmp_inherited_linker_flag in $tmp_inherited_linker_flags; do case " $new_inherited_linker_flags " in *" $tmp_inherited_linker_flag "*) ;; *) func_append new_inherited_linker_flags " $tmp_inherited_linker_flag";; esac done fi dependency_libs=`$ECHO " $dependency_libs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` if test lib,link = "$linkmode,$pass" || test prog,scan = "$linkmode,$pass" || { test prog != "$linkmode" && test lib != "$linkmode"; }; then test -n "$dlopen" && func_append dlfiles " $dlopen" test -n "$dlpreopen" && func_append dlprefiles " $dlpreopen" fi if test conv = "$pass"; then # Only check for convenience libraries deplibs="$lib $deplibs" if test -z "$libdir"; then if test -z "$old_library"; then func_fatal_error "cannot find name of link library for '$lib'" fi # It is a libtool convenience library, so add in its objects. func_append convenience " $ladir/$objdir/$old_library" func_append old_convenience " $ladir/$objdir/$old_library" elif test prog != "$linkmode" && test lib != "$linkmode"; then func_fatal_error "'$lib' is not a convenience library" fi tmp_libs= for deplib in $dependency_libs; do deplibs="$deplib $deplibs" if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append tmp_libs " $deplib" done continue fi # $pass = conv # Get the name of the library we link against. linklib= if test -n "$old_library" && { test yes = "$prefer_static_libs" || test built,no = "$prefer_static_libs,$installed"; }; then linklib=$old_library else for l in $old_library $library_names; do linklib=$l done fi if test -z "$linklib"; then func_fatal_error "cannot find name of link library for '$lib'" fi # This library was specified with -dlopen. if test dlopen = "$pass"; then test -z "$libdir" \ && func_fatal_error "cannot -dlopen a convenience library: '$lib'" if test -z "$dlname" || test yes != "$dlopen_support" || test no = "$build_libtool_libs" then # If there is no dlname, no dlopen support or we're linking # statically, we need to preload. We also need to preload any # dependent libraries so libltdl's deplib preloader doesn't # bomb out in the load deplibs phase. func_append dlprefiles " $lib $dependency_libs" else func_append newdlfiles " $lib" fi continue fi # $pass = dlopen # We need an absolute path. case $ladir in [\\/]* | [A-Za-z]:[\\/]*) abs_ladir=$ladir ;; *) abs_ladir=`cd "$ladir" && pwd` if test -z "$abs_ladir"; then func_warning "cannot determine absolute directory name of '$ladir'" func_warning "passing it literally to the linker, although it might fail" abs_ladir=$ladir fi ;; esac func_basename "$lib" laname=$func_basename_result # Find the relevant object directory and library name. if test yes = "$installed"; then if test ! -f "$lt_sysroot$libdir/$linklib" && test -f "$abs_ladir/$linklib"; then func_warning "library '$lib' was moved." dir=$ladir absdir=$abs_ladir libdir=$abs_ladir else dir=$lt_sysroot$libdir absdir=$lt_sysroot$libdir fi test yes = "$hardcode_automatic" && avoidtemprpath=yes else if test ! -f "$ladir/$objdir/$linklib" && test -f "$abs_ladir/$linklib"; then dir=$ladir absdir=$abs_ladir # Remove this search path later func_append notinst_path " $abs_ladir" else dir=$ladir/$objdir absdir=$abs_ladir/$objdir # Remove this search path later func_append notinst_path " $abs_ladir" fi fi # $installed = yes func_stripname 'lib' '.la' "$laname" name=$func_stripname_result # This library was specified with -dlpreopen. if test dlpreopen = "$pass"; then if test -z "$libdir" && test prog = "$linkmode"; then func_fatal_error "only libraries may -dlpreopen a convenience library: '$lib'" fi case $host in # special handling for platforms with PE-DLLs. *cygwin* | *mingw* | *cegcc* ) # Linker will automatically link against shared library if both # static and shared are present. Therefore, ensure we extract # symbols from the import library if a shared library is present # (otherwise, the dlopen module name will be incorrect). We do # this by putting the import library name into $newdlprefiles. # We recover the dlopen module name by 'saving' the la file # name in a special purpose variable, and (later) extracting the # dlname from the la file. if test -n "$dlname"; then func_tr_sh "$dir/$linklib" eval "libfile_$func_tr_sh_result=\$abs_ladir/\$laname" func_append newdlprefiles " $dir/$linklib" else func_append newdlprefiles " $dir/$old_library" # Keep a list of preopened convenience libraries to check # that they are being used correctly in the link pass. test -z "$libdir" && \ func_append dlpreconveniencelibs " $dir/$old_library" fi ;; * ) # Prefer using a static library (so that no silly _DYNAMIC symbols # are required to link). if test -n "$old_library"; then func_append newdlprefiles " $dir/$old_library" # Keep a list of preopened convenience libraries to check # that they are being used correctly in the link pass. test -z "$libdir" && \ func_append dlpreconveniencelibs " $dir/$old_library" # Otherwise, use the dlname, so that lt_dlopen finds it. elif test -n "$dlname"; then func_append newdlprefiles " $dir/$dlname" else func_append newdlprefiles " $dir/$linklib" fi ;; esac fi # $pass = dlpreopen if test -z "$libdir"; then # Link the convenience library if test lib = "$linkmode"; then deplibs="$dir/$old_library $deplibs" elif test prog,link = "$linkmode,$pass"; then compile_deplibs="$dir/$old_library $compile_deplibs" finalize_deplibs="$dir/$old_library $finalize_deplibs" else deplibs="$lib $deplibs" # used for prog,scan pass fi continue fi if test prog = "$linkmode" && test link != "$pass"; then func_append newlib_search_path " $ladir" deplibs="$lib $deplibs" linkalldeplibs=false if test no != "$link_all_deplibs" || test -z "$library_names" || test no = "$build_libtool_libs"; then linkalldeplibs=: fi tmp_libs= for deplib in $dependency_libs; do case $deplib in -L*) func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result" func_append newlib_search_path " $func_resolve_sysroot_result" ;; esac # Need to link against all dependency_libs? if $linkalldeplibs; then deplibs="$deplib $deplibs" else # Need to hardcode shared library paths # or/and link against static libraries newdependency_libs="$deplib $newdependency_libs" fi if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $deplib "*) func_append specialdeplibs " $deplib" ;; esac fi func_append tmp_libs " $deplib" done # for deplib continue fi # $linkmode = prog... if test prog,link = "$linkmode,$pass"; then if test -n "$library_names" && { { test no = "$prefer_static_libs" || test built,yes = "$prefer_static_libs,$installed"; } || test -z "$old_library"; }; then # We need to hardcode the library path if test -n "$shlibpath_var" && test -z "$avoidtemprpath"; then # Make sure the rpath contains only unique directories. case $temp_rpath: in *"$absdir:"*) ;; *) func_append temp_rpath "$absdir:" ;; esac fi # Hardcode the library path. # Skip directories that are in the system default run-time # search path. case " $sys_lib_dlsearch_path " in *" $absdir "*) ;; *) case "$compile_rpath " in *" $absdir "*) ;; *) func_append compile_rpath " $absdir" ;; esac ;; esac case " $sys_lib_dlsearch_path " in *" $libdir "*) ;; *) case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac ;; esac fi # $linkmode,$pass = prog,link... if $alldeplibs && { test pass_all = "$deplibs_check_method" || { test yes = "$build_libtool_libs" && test -n "$library_names"; }; }; then # We only need to search for static libraries continue fi fi link_static=no # Whether the deplib will be linked statically use_static_libs=$prefer_static_libs if test built = "$use_static_libs" && test yes = "$installed"; then use_static_libs=no fi if test -n "$library_names" && { test no = "$use_static_libs" || test -z "$old_library"; }; then case $host in *cygwin* | *mingw* | *cegcc* | *os2*) # No point in relinking DLLs because paths are not encoded func_append notinst_deplibs " $lib" need_relink=no ;; *) if test no = "$installed"; then func_append notinst_deplibs " $lib" need_relink=yes fi ;; esac # This is a shared library # Warn about portability, can't link against -module's on some # systems (darwin). Don't bleat about dlopened modules though! dlopenmodule= for dlpremoduletest in $dlprefiles; do if test "X$dlpremoduletest" = "X$lib"; then dlopenmodule=$dlpremoduletest break fi done if test -z "$dlopenmodule" && test yes = "$shouldnotlink" && test link = "$pass"; then echo if test prog = "$linkmode"; then $ECHO "*** Warning: Linking the executable $output against the loadable module" else $ECHO "*** Warning: Linking the shared library $output against the loadable module" fi $ECHO "*** $linklib is not portable!" fi if test lib = "$linkmode" && test yes = "$hardcode_into_libs"; then # Hardcode the library path. # Skip directories that are in the system default run-time # search path. case " $sys_lib_dlsearch_path " in *" $absdir "*) ;; *) case "$compile_rpath " in *" $absdir "*) ;; *) func_append compile_rpath " $absdir" ;; esac ;; esac case " $sys_lib_dlsearch_path " in *" $libdir "*) ;; *) case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac ;; esac fi if test -n "$old_archive_from_expsyms_cmds"; then # figure out the soname set dummy $library_names shift realname=$1 shift libname=`eval "\\$ECHO \"$libname_spec\""` # use dlname if we got it. it's perfectly good, no? if test -n "$dlname"; then soname=$dlname elif test -n "$soname_spec"; then # bleh windows case $host in *cygwin* | mingw* | *cegcc* | *os2*) func_arith $current - $age major=$func_arith_result versuffix=-$major ;; esac eval soname=\"$soname_spec\" else soname=$realname fi # Make a new name for the extract_expsyms_cmds to use soroot=$soname func_basename "$soroot" soname=$func_basename_result func_stripname 'lib' '.dll' "$soname" newlib=libimp-$func_stripname_result.a # If the library has no export list, then create one now if test -f "$output_objdir/$soname-def"; then : else func_verbose "extracting exported symbol list from '$soname'" func_execute_cmds "$extract_expsyms_cmds" 'exit $?' fi # Create $newlib if test -f "$output_objdir/$newlib"; then :; else func_verbose "generating import library for '$soname'" func_execute_cmds "$old_archive_from_expsyms_cmds" 'exit $?' fi # make sure the library variables are pointing to the new library dir=$output_objdir linklib=$newlib fi # test -n "$old_archive_from_expsyms_cmds" if test prog = "$linkmode" || test relink != "$opt_mode"; then add_shlibpath= add_dir= add= lib_linked=yes case $hardcode_action in immediate | unsupported) if test no = "$hardcode_direct"; then add=$dir/$linklib case $host in *-*-sco3.2v5.0.[024]*) add_dir=-L$dir ;; *-*-sysv4*uw2*) add_dir=-L$dir ;; *-*-sysv5OpenUNIX* | *-*-sysv5UnixWare7.[01].[10]* | \ *-*-unixware7*) add_dir=-L$dir ;; *-*-darwin* ) # if the lib is a (non-dlopened) module then we cannot # link against it, someone is ignoring the earlier warnings if /usr/bin/file -L $add 2> /dev/null | $GREP ": [^:]* bundle" >/dev/null; then if test "X$dlopenmodule" != "X$lib"; then $ECHO "*** Warning: lib $linklib is a module, not a shared library" if test -z "$old_library"; then echo echo "*** And there doesn't seem to be a static archive available" echo "*** The link will probably fail, sorry" else add=$dir/$old_library fi elif test -n "$old_library"; then add=$dir/$old_library fi fi esac elif test no = "$hardcode_minus_L"; then case $host in *-*-sunos*) add_shlibpath=$dir ;; esac add_dir=-L$dir add=-l$name elif test no = "$hardcode_shlibpath_var"; then add_shlibpath=$dir add=-l$name else lib_linked=no fi ;; relink) if test yes = "$hardcode_direct" && test no = "$hardcode_direct_absolute"; then add=$dir/$linklib elif test yes = "$hardcode_minus_L"; then add_dir=-L$absdir # Try looking first in the location we're being installed to. if test -n "$inst_prefix_dir"; then case $libdir in [\\/]*) func_append add_dir " -L$inst_prefix_dir$libdir" ;; esac fi add=-l$name elif test yes = "$hardcode_shlibpath_var"; then add_shlibpath=$dir add=-l$name else lib_linked=no fi ;; *) lib_linked=no ;; esac if test yes != "$lib_linked"; then func_fatal_configuration "unsupported hardcode properties" fi if test -n "$add_shlibpath"; then case :$compile_shlibpath: in *":$add_shlibpath:"*) ;; *) func_append compile_shlibpath "$add_shlibpath:" ;; esac fi if test prog = "$linkmode"; then test -n "$add_dir" && compile_deplibs="$add_dir $compile_deplibs" test -n "$add" && compile_deplibs="$add $compile_deplibs" else test -n "$add_dir" && deplibs="$add_dir $deplibs" test -n "$add" && deplibs="$add $deplibs" if test yes != "$hardcode_direct" && test yes != "$hardcode_minus_L" && test yes = "$hardcode_shlibpath_var"; then case :$finalize_shlibpath: in *":$libdir:"*) ;; *) func_append finalize_shlibpath "$libdir:" ;; esac fi fi fi if test prog = "$linkmode" || test relink = "$opt_mode"; then add_shlibpath= add_dir= add= # Finalize command for both is simple: just hardcode it. if test yes = "$hardcode_direct" && test no = "$hardcode_direct_absolute"; then add=$libdir/$linklib elif test yes = "$hardcode_minus_L"; then add_dir=-L$libdir add=-l$name elif test yes = "$hardcode_shlibpath_var"; then case :$finalize_shlibpath: in *":$libdir:"*) ;; *) func_append finalize_shlibpath "$libdir:" ;; esac add=-l$name elif test yes = "$hardcode_automatic"; then if test -n "$inst_prefix_dir" && test -f "$inst_prefix_dir$libdir/$linklib"; then add=$inst_prefix_dir$libdir/$linklib else add=$libdir/$linklib fi else # We cannot seem to hardcode it, guess we'll fake it. add_dir=-L$libdir # Try looking first in the location we're being installed to. if test -n "$inst_prefix_dir"; then case $libdir in [\\/]*) func_append add_dir " -L$inst_prefix_dir$libdir" ;; esac fi add=-l$name fi if test prog = "$linkmode"; then test -n "$add_dir" && finalize_deplibs="$add_dir $finalize_deplibs" test -n "$add" && finalize_deplibs="$add $finalize_deplibs" else test -n "$add_dir" && deplibs="$add_dir $deplibs" test -n "$add" && deplibs="$add $deplibs" fi fi elif test prog = "$linkmode"; then # Here we assume that one of hardcode_direct or hardcode_minus_L # is not unsupported. This is valid on all known static and # shared platforms. if test unsupported != "$hardcode_direct"; then test -n "$old_library" && linklib=$old_library compile_deplibs="$dir/$linklib $compile_deplibs" finalize_deplibs="$dir/$linklib $finalize_deplibs" else compile_deplibs="-l$name -L$dir $compile_deplibs" finalize_deplibs="-l$name -L$dir $finalize_deplibs" fi elif test yes = "$build_libtool_libs"; then # Not a shared library if test pass_all != "$deplibs_check_method"; then # We're trying link a shared library against a static one # but the system doesn't support it. # Just print a warning and add the library to dependency_libs so # that the program can be linked against the static library. echo $ECHO "*** Warning: This system cannot link to static lib archive $lib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have." if test yes = "$module"; then echo "*** But as you try to build a module library, libtool will still create " echo "*** a static module, that should work as long as the dlopening application" echo "*** is linked with the -dlopen flag to resolve symbols at runtime." if test -z "$global_symbol_pipe"; then echo echo "*** However, this would only work if libtool was able to extract symbol" echo "*** lists from a program, using 'nm' or equivalent, but libtool could" echo "*** not find such a program. So, this module is probably useless." echo "*** 'nm' from GNU binutils and a full rebuild may help." fi if test no = "$build_old_libs"; then build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi fi else deplibs="$dir/$old_library $deplibs" link_static=yes fi fi # link shared/static library? if test lib = "$linkmode"; then if test -n "$dependency_libs" && { test yes != "$hardcode_into_libs" || test yes = "$build_old_libs" || test yes = "$link_static"; }; then # Extract -R from dependency_libs temp_deplibs= for libdir in $dependency_libs; do case $libdir in -R*) func_stripname '-R' '' "$libdir" temp_xrpath=$func_stripname_result case " $xrpath " in *" $temp_xrpath "*) ;; *) func_append xrpath " $temp_xrpath";; esac;; *) func_append temp_deplibs " $libdir";; esac done dependency_libs=$temp_deplibs fi func_append newlib_search_path " $absdir" # Link against this library test no = "$link_static" && newdependency_libs="$abs_ladir/$laname $newdependency_libs" # ... and its dependency_libs tmp_libs= for deplib in $dependency_libs; do newdependency_libs="$deplib $newdependency_libs" case $deplib in -L*) func_stripname '-L' '' "$deplib" func_resolve_sysroot "$func_stripname_result";; *) func_resolve_sysroot "$deplib" ;; esac if $opt_preserve_dup_deps; then case "$tmp_libs " in *" $func_resolve_sysroot_result "*) func_append specialdeplibs " $func_resolve_sysroot_result" ;; esac fi func_append tmp_libs " $func_resolve_sysroot_result" done if test no != "$link_all_deplibs"; then # Add the search paths of all dependency libraries for deplib in $dependency_libs; do path= case $deplib in -L*) path=$deplib ;; *.la) func_resolve_sysroot "$deplib" deplib=$func_resolve_sysroot_result func_dirname "$deplib" "" "." dir=$func_dirname_result # We need an absolute path. case $dir in [\\/]* | [A-Za-z]:[\\/]*) absdir=$dir ;; *) absdir=`cd "$dir" && pwd` if test -z "$absdir"; then func_warning "cannot determine absolute directory name of '$dir'" absdir=$dir fi ;; esac if $GREP "^installed=no" $deplib > /dev/null; then case $host in *-*-darwin*) depdepl= eval deplibrary_names=`$SED -n -e 's/^library_names=\(.*\)$/\1/p' $deplib` if test -n "$deplibrary_names"; then for tmp in $deplibrary_names; do depdepl=$tmp done if test -f "$absdir/$objdir/$depdepl"; then depdepl=$absdir/$objdir/$depdepl darwin_install_name=`$OTOOL -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'` if test -z "$darwin_install_name"; then darwin_install_name=`$OTOOL64 -L $depdepl | awk '{if (NR == 2) {print $1;exit}}'` fi func_append compiler_flags " $wl-dylib_file $wl$darwin_install_name:$depdepl" func_append linker_flags " -dylib_file $darwin_install_name:$depdepl" path= fi fi ;; *) path=-L$absdir/$objdir ;; esac else eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $deplib` test -z "$libdir" && \ func_fatal_error "'$deplib' is not a valid libtool archive" test "$absdir" != "$libdir" && \ func_warning "'$deplib' seems to be moved" path=-L$absdir fi ;; esac case " $deplibs " in *" $path "*) ;; *) deplibs="$path $deplibs" ;; esac done fi # link_all_deplibs != no fi # linkmode = lib done # for deplib in $libs if test link = "$pass"; then if test prog = "$linkmode"; then compile_deplibs="$new_inherited_linker_flags $compile_deplibs" finalize_deplibs="$new_inherited_linker_flags $finalize_deplibs" else compiler_flags="$compiler_flags "`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` fi fi dependency_libs=$newdependency_libs if test dlpreopen = "$pass"; then # Link the dlpreopened libraries before other libraries for deplib in $save_deplibs; do deplibs="$deplib $deplibs" done fi if test dlopen != "$pass"; then test conv = "$pass" || { # Make sure lib_search_path contains only unique directories. lib_search_path= for dir in $newlib_search_path; do case "$lib_search_path " in *" $dir "*) ;; *) func_append lib_search_path " $dir" ;; esac done newlib_search_path= } if test prog,link = "$linkmode,$pass"; then vars="compile_deplibs finalize_deplibs" else vars=deplibs fi for var in $vars dependency_libs; do # Add libraries to $var in reverse order eval tmp_libs=\"\$$var\" new_libs= for deplib in $tmp_libs; do # FIXME: Pedantically, this is the right thing to do, so # that some nasty dependency loop isn't accidentally # broken: #new_libs="$deplib $new_libs" # Pragmatically, this seems to cause very few problems in # practice: case $deplib in -L*) new_libs="$deplib $new_libs" ;; -R*) ;; *) # And here is the reason: when a library appears more # than once as an explicit dependence of a library, or # is implicitly linked in more than once by the # compiler, it is considered special, and multiple # occurrences thereof are not removed. Compare this # with having the same library being listed as a # dependency of multiple other libraries: in this case, # we know (pedantically, we assume) the library does not # need to be listed more than once, so we keep only the # last copy. This is not always right, but it is rare # enough that we require users that really mean to play # such unportable linking tricks to link the library # using -Wl,-lname, so that libtool does not consider it # for duplicate removal. case " $specialdeplibs " in *" $deplib "*) new_libs="$deplib $new_libs" ;; *) case " $new_libs " in *" $deplib "*) ;; *) new_libs="$deplib $new_libs" ;; esac ;; esac ;; esac done tmp_libs= for deplib in $new_libs; do case $deplib in -L*) case " $tmp_libs " in *" $deplib "*) ;; *) func_append tmp_libs " $deplib" ;; esac ;; *) func_append tmp_libs " $deplib" ;; esac done eval $var=\"$tmp_libs\" done # for var fi # Add Sun CC postdeps if required: test CXX = "$tagname" && { case $host_os in linux*) case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C++ 5.9 func_suncc_cstd_abi if test no != "$suncc_use_cstd_abi"; then func_append postdeps ' -library=Cstd -library=Crun' fi ;; esac ;; solaris*) func_cc_basename "$CC" case $func_cc_basename_result in CC* | sunCC*) func_suncc_cstd_abi if test no != "$suncc_use_cstd_abi"; then func_append postdeps ' -library=Cstd -library=Crun' fi ;; esac ;; esac } # Last step: remove runtime libs from dependency_libs # (they stay in deplibs) tmp_libs= for i in $dependency_libs; do case " $predeps $postdeps $compiler_lib_search_path " in *" $i "*) i= ;; esac if test -n "$i"; then func_append tmp_libs " $i" fi done dependency_libs=$tmp_libs done # for pass if test prog = "$linkmode"; then dlfiles=$newdlfiles fi if test prog = "$linkmode" || test lib = "$linkmode"; then dlprefiles=$newdlprefiles fi case $linkmode in oldlib) if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then func_warning "'-dlopen' is ignored for archives" fi case " $deplibs" in *\ -l* | *\ -L*) func_warning "'-l' and '-L' are ignored for archives" ;; esac test -n "$rpath" && \ func_warning "'-rpath' is ignored for archives" test -n "$xrpath" && \ func_warning "'-R' is ignored for archives" test -n "$vinfo" && \ func_warning "'-version-info/-version-number' is ignored for archives" test -n "$release" && \ func_warning "'-release' is ignored for archives" test -n "$export_symbols$export_symbols_regex" && \ func_warning "'-export-symbols' is ignored for archives" # Now set the variables for building old libraries. build_libtool_libs=no oldlibs=$output func_append objs "$old_deplibs" ;; lib) # Make sure we only generate libraries of the form 'libNAME.la'. case $outputname in lib*) func_stripname 'lib' '.la' "$outputname" name=$func_stripname_result eval shared_ext=\"$shrext_cmds\" eval libname=\"$libname_spec\" ;; *) test no = "$module" \ && func_fatal_help "libtool library '$output' must begin with 'lib'" if test no != "$need_lib_prefix"; then # Add the "lib" prefix for modules if required func_stripname '' '.la' "$outputname" name=$func_stripname_result eval shared_ext=\"$shrext_cmds\" eval libname=\"$libname_spec\" else func_stripname '' '.la' "$outputname" libname=$func_stripname_result fi ;; esac if test -n "$objs"; then if test pass_all != "$deplibs_check_method"; then func_fatal_error "cannot build libtool library '$output' from non-libtool objects on this host:$objs" else echo $ECHO "*** Warning: Linking the shared library $output against the non-libtool" $ECHO "*** objects $objs is not portable!" func_append libobjs " $objs" fi fi test no = "$dlself" \ || func_warning "'-dlopen self' is ignored for libtool libraries" set dummy $rpath shift test 1 -lt "$#" \ && func_warning "ignoring multiple '-rpath's for a libtool library" install_libdir=$1 oldlibs= if test -z "$rpath"; then if test yes = "$build_libtool_libs"; then # Building a libtool convenience library. # Some compilers have problems with a '.al' extension so # convenience libraries should have the same extension an # archive normally would. oldlibs="$output_objdir/$libname.$libext $oldlibs" build_libtool_libs=convenience build_old_libs=yes fi test -n "$vinfo" && \ func_warning "'-version-info/-version-number' is ignored for convenience libraries" test -n "$release" && \ func_warning "'-release' is ignored for convenience libraries" else # Parse the version information argument. save_ifs=$IFS; IFS=: set dummy $vinfo 0 0 0 shift IFS=$save_ifs test -n "$7" && \ func_fatal_help "too many parameters to '-version-info'" # convert absolute version numbers to libtool ages # this retains compatibility with .la files and attempts # to make the code below a bit more comprehensible case $vinfo_number in yes) number_major=$1 number_minor=$2 number_revision=$3 # # There are really only two kinds -- those that # use the current revision as the major version # and those that subtract age and use age as # a minor version. But, then there is irix # that has an extra 1 added just for fun # case $version_type in # correct linux to gnu/linux during the next big refactor darwin|freebsd-elf|linux|midnightbsd-elf|osf|windows|none) func_arith $number_major + $number_minor current=$func_arith_result age=$number_minor revision=$number_revision ;; freebsd-aout|qnx|sunos) current=$number_major revision=$number_minor age=0 ;; irix|nonstopux) func_arith $number_major + $number_minor current=$func_arith_result age=$number_minor revision=$number_minor lt_irix_increment=no ;; esac ;; no) current=$1 revision=$2 age=$3 ;; esac # Check that each of the things are valid numbers. case $current in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "CURRENT '$current' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac case $revision in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "REVISION '$revision' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac case $age in 0|[1-9]|[1-9][0-9]|[1-9][0-9][0-9]|[1-9][0-9][0-9][0-9]|[1-9][0-9][0-9][0-9][0-9]) ;; *) func_error "AGE '$age' must be a nonnegative integer" func_fatal_error "'$vinfo' is not valid version information" ;; esac if test "$age" -gt "$current"; then func_error "AGE '$age' is greater than the current interface number '$current'" func_fatal_error "'$vinfo' is not valid version information" fi # Calculate the version variables. major= versuffix= verstring= case $version_type in none) ;; darwin) # Like Linux, but with the current version available in # verstring for coding it into the library header func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision # Darwin ld doesn't like 0 for these options... func_arith $current + 1 minor_current=$func_arith_result xlcverstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision" verstring="-compatibility_version $minor_current -current_version $minor_current.$revision" # On Darwin other compilers case $CC in nagfor*) verstring="$wl-compatibility_version $wl$minor_current $wl-current_version $wl$minor_current.$revision" ;; *) verstring="-compatibility_version $minor_current -current_version $minor_current.$revision" ;; esac ;; freebsd-aout) major=.$current versuffix=.$current.$revision ;; freebsd-elf | midnightbsd-elf) func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision ;; irix | nonstopux) if test no = "$lt_irix_increment"; then func_arith $current - $age else func_arith $current - $age + 1 fi major=$func_arith_result case $version_type in nonstopux) verstring_prefix=nonstopux ;; *) verstring_prefix=sgi ;; esac verstring=$verstring_prefix$major.$revision # Add in all the interfaces that we are compatible with. loop=$revision while test 0 -ne "$loop"; do func_arith $revision - $loop iface=$func_arith_result func_arith $loop - 1 loop=$func_arith_result verstring=$verstring_prefix$major.$iface:$verstring done # Before this point, $major must not contain '.'. major=.$major versuffix=$major.$revision ;; linux) # correct to gnu/linux during the next big refactor func_arith $current - $age major=.$func_arith_result versuffix=$major.$age.$revision ;; osf) func_arith $current - $age major=.$func_arith_result versuffix=.$current.$age.$revision verstring=$current.$age.$revision # Add in all the interfaces that we are compatible with. loop=$age while test 0 -ne "$loop"; do func_arith $current - $loop iface=$func_arith_result func_arith $loop - 1 loop=$func_arith_result verstring=$verstring:$iface.0 done # Make executables depend on our current version. func_append verstring ":$current.0" ;; qnx) major=.$current versuffix=.$current ;; sco) major=.$current versuffix=.$current ;; sunos) major=.$current versuffix=.$current.$revision ;; windows) # Use '-' rather than '.', since we only want one # extension on DOS 8.3 file systems. func_arith $current - $age major=$func_arith_result versuffix=-$major ;; *) func_fatal_configuration "unknown library version type '$version_type'" ;; esac # Clear the version info if we defaulted, and they specified a release. if test -z "$vinfo" && test -n "$release"; then major= case $version_type in darwin) # we can't check for "0.0" in archive_cmds due to quoting # problems, so we reset it completely verstring= ;; *) verstring=0.0 ;; esac if test no = "$need_version"; then versuffix= else versuffix=.0.0 fi fi # Remove version info from name if versioning should be avoided if test yes,no = "$avoid_version,$need_version"; then major= versuffix= verstring= fi # Check to see if the archive will have undefined symbols. if test yes = "$allow_undefined"; then if test unsupported = "$allow_undefined_flag"; then if test yes = "$build_old_libs"; then func_warning "undefined symbols not allowed in $host shared libraries; building static only" build_libtool_libs=no else func_fatal_error "can't build $host shared library unless -no-undefined is specified" fi fi else # Don't allow undefined symbols. allow_undefined_flag=$no_undefined_flag fi fi func_generate_dlsyms "$libname" "$libname" : func_append libobjs " $symfileobj" test " " = "$libobjs" && libobjs= if test relink != "$opt_mode"; then # Remove our outputs, but don't remove object files since they # may have been created when compiling PIC objects. removelist= tempremovelist=`$ECHO "$output_objdir/*"` for p in $tempremovelist; do case $p in *.$objext | *.gcno) ;; $output_objdir/$outputname | $output_objdir/$libname.* | $output_objdir/$libname$release.*) if test -n "$precious_files_regex"; then if $ECHO "$p" | $EGREP -e "$precious_files_regex" >/dev/null 2>&1 then continue fi fi func_append removelist " $p" ;; *) ;; esac done test -n "$removelist" && \ func_show_eval "${RM}r \$removelist" fi # Now set the variables for building old libraries. if test yes = "$build_old_libs" && test convenience != "$build_libtool_libs"; then func_append oldlibs " $output_objdir/$libname.$libext" # Transform .lo files to .o files. oldobjs="$objs "`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; $lo2o" | $NL2SP` fi # Eliminate all temporary directories. #for path in $notinst_path; do # lib_search_path=`$ECHO "$lib_search_path " | $SED "s% $path % %g"` # deplibs=`$ECHO "$deplibs " | $SED "s% -L$path % %g"` # dependency_libs=`$ECHO "$dependency_libs " | $SED "s% -L$path % %g"` #done if test -n "$xrpath"; then # If the user specified any rpath flags, then add them. temp_xrpath= for libdir in $xrpath; do func_replace_sysroot "$libdir" func_append temp_xrpath " -R$func_replace_sysroot_result" case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac done if test yes != "$hardcode_into_libs" || test yes = "$build_old_libs"; then dependency_libs="$temp_xrpath $dependency_libs" fi fi # Make sure dlfiles contains only unique files that won't be dlpreopened old_dlfiles=$dlfiles dlfiles= for lib in $old_dlfiles; do case " $dlprefiles $dlfiles " in *" $lib "*) ;; *) func_append dlfiles " $lib" ;; esac done # Make sure dlprefiles contains only unique files old_dlprefiles=$dlprefiles dlprefiles= for lib in $old_dlprefiles; do case "$dlprefiles " in *" $lib "*) ;; *) func_append dlprefiles " $lib" ;; esac done if test yes = "$build_libtool_libs"; then if test -n "$rpath"; then case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-*-beos* | *-cegcc* | *-*-haiku*) # these systems don't actually have a c library (as such)! ;; *-*-rhapsody* | *-*-darwin1.[012]) # Rhapsody C library is in the System framework func_append deplibs " System.ltframework" ;; *-*-netbsd*) # Don't link with libc until the a.out ld.so is fixed. ;; *-*-openbsd* | *-*-freebsd* | *-*-dragonfly* | *-*-midnightbsd*) # Do not include libc due to us having libc/libc_r. ;; *-*-sco3.2v5* | *-*-sco5v6*) # Causes problems with __ctype ;; *-*-sysv4.2uw2* | *-*-sysv5* | *-*-unixware* | *-*-OpenUNIX*) # Compiler inserts libc in the correct place for threads to work ;; *) # Add libc to deplibs on all other systems if necessary. if test yes = "$build_libtool_need_lc"; then func_append deplibs " -lc" fi ;; esac fi # Transform deplibs into only deplibs that can be linked in shared. name_save=$name libname_save=$libname release_save=$release versuffix_save=$versuffix major_save=$major # I'm not sure if I'm treating the release correctly. I think # release should show up in the -l (ie -lgmp5) so we don't want to # add it in twice. Is that correct? release= versuffix= major= newdeplibs= droppeddeps=no case $deplibs_check_method in pass_all) # Don't check for shared/static. Everything works. # This might be a little naive. We might want to check # whether the library exists or not. But this is on # osf3 & osf4 and I'm not really sure... Just # implementing what was already the behavior. newdeplibs=$deplibs ;; test_compile) # This code stresses the "libraries are programs" paradigm to its # limits. Maybe even breaks it. We compile a program, linking it # against the deplibs as a proxy for the library. Then we can check # whether they linked in statically or dynamically with ldd. $opt_dry_run || $RM conftest.c cat > conftest.c </dev/null` $nocaseglob else potential_libs=`ls $i/$libnameglob[.-]* 2>/dev/null` fi for potent_lib in $potential_libs; do # Follow soft links. if ls -lLd "$potent_lib" 2>/dev/null | $GREP " -> " >/dev/null; then continue fi # The statement above tries to avoid entering an # endless loop below, in case of cyclic links. # We might still enter an endless loop, since a link # loop can be closed while we follow links, # but so what? potlib=$potent_lib while test -h "$potlib" 2>/dev/null; do potliblink=`ls -ld $potlib | $SED 's/.* -> //'` case $potliblink in [\\/]* | [A-Za-z]:[\\/]*) potlib=$potliblink;; *) potlib=`$ECHO "$potlib" | $SED 's|[^/]*$||'`"$potliblink";; esac done if eval $file_magic_cmd \"\$potlib\" 2>/dev/null | $SED -e 10q | $EGREP "$file_magic_regex" > /dev/null; then func_append newdeplibs " $a_deplib" a_deplib= break 2 fi done done fi if test -n "$a_deplib"; then droppeddeps=yes echo $ECHO "*** Warning: linker path does not have real file for library $a_deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because I did check the linker path looking for a file starting" if test -z "$potlib"; then $ECHO "*** with $libname but no candidates were found. (...for file magic test)" else $ECHO "*** with $libname and none of the candidates passed a file format test" $ECHO "*** using a file magic. Last file checked: $potlib" fi fi ;; *) # Add a -L argument. func_append newdeplibs " $a_deplib" ;; esac done # Gone through all deplibs. ;; match_pattern*) set dummy $deplibs_check_method; shift match_pattern_regex=`expr "$deplibs_check_method" : "$1 \(.*\)"` for a_deplib in $deplibs; do case $a_deplib in -l*) func_stripname -l '' "$a_deplib" name=$func_stripname_result if test yes = "$allow_libtool_libs_with_static_runtimes"; then case " $predeps $postdeps " in *" $a_deplib "*) func_append newdeplibs " $a_deplib" a_deplib= ;; esac fi if test -n "$a_deplib"; then libname=`eval "\\$ECHO \"$libname_spec\""` for i in $lib_search_path $sys_lib_search_path $shlib_search_path; do potential_libs=`ls $i/$libname[.-]* 2>/dev/null` for potent_lib in $potential_libs; do potlib=$potent_lib # see symlink-check above in file_magic test if eval "\$ECHO \"$potent_lib\"" 2>/dev/null | $SED 10q | \ $EGREP "$match_pattern_regex" > /dev/null; then func_append newdeplibs " $a_deplib" a_deplib= break 2 fi done done fi if test -n "$a_deplib"; then droppeddeps=yes echo $ECHO "*** Warning: linker path does not have real file for library $a_deplib." echo "*** I have the capability to make that library automatically link in when" echo "*** you link to this library. But I can only do this if you have a" echo "*** shared version of the library, which you do not appear to have" echo "*** because I did check the linker path looking for a file starting" if test -z "$potlib"; then $ECHO "*** with $libname but no candidates were found. (...for regex pattern test)" else $ECHO "*** with $libname and none of the candidates passed a file format test" $ECHO "*** using a regex pattern. Last file checked: $potlib" fi fi ;; *) # Add a -L argument. func_append newdeplibs " $a_deplib" ;; esac done # Gone through all deplibs. ;; none | unknown | *) newdeplibs= tmp_deplibs=`$ECHO " $deplibs" | $SED 's/ -lc$//; s/ -[LR][^ ]*//g'` if test yes = "$allow_libtool_libs_with_static_runtimes"; then for i in $predeps $postdeps; do # can't use Xsed below, because $i might contain '/' tmp_deplibs=`$ECHO " $tmp_deplibs" | $SED "s|$i||"` done fi case $tmp_deplibs in *[!\ \ ]*) echo if test none = "$deplibs_check_method"; then echo "*** Warning: inter-library dependencies are not supported in this platform." else echo "*** Warning: inter-library dependencies are not known to be supported." fi echo "*** All declared inter-library dependencies are being dropped." droppeddeps=yes ;; esac ;; esac versuffix=$versuffix_save major=$major_save release=$release_save libname=$libname_save name=$name_save case $host in *-*-rhapsody* | *-*-darwin1.[012]) # On Rhapsody replace the C library with the System framework newdeplibs=`$ECHO " $newdeplibs" | $SED 's/ -lc / System.ltframework /'` ;; esac if test yes = "$droppeddeps"; then if test yes = "$module"; then echo echo "*** Warning: libtool could not satisfy all declared inter-library" $ECHO "*** dependencies of module $libname. Therefore, libtool will create" echo "*** a static module, that should work as long as the dlopening" echo "*** application is linked with the -dlopen flag." if test -z "$global_symbol_pipe"; then echo echo "*** However, this would only work if libtool was able to extract symbol" echo "*** lists from a program, using 'nm' or equivalent, but libtool could" echo "*** not find such a program. So, this module is probably useless." echo "*** 'nm' from GNU binutils and a full rebuild may help." fi if test no = "$build_old_libs"; then oldlibs=$output_objdir/$libname.$libext build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi else echo "*** The inter-library dependencies that have been dropped here will be" echo "*** automatically added whenever a program is linked with this library" echo "*** or is declared to -dlopen it." if test no = "$allow_undefined"; then echo echo "*** Since this library must not contain undefined symbols," echo "*** because either the platform does not support them or" echo "*** it was explicitly requested with -no-undefined," echo "*** libtool will only create a static version of it." if test no = "$build_old_libs"; then oldlibs=$output_objdir/$libname.$libext build_libtool_libs=module build_old_libs=yes else build_libtool_libs=no fi fi fi fi # Done checking deplibs! deplibs=$newdeplibs fi # Time to change all our "foo.ltframework" stuff back to "-framework foo" case $host in *-*-darwin*) newdeplibs=`$ECHO " $newdeplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` new_inherited_linker_flags=`$ECHO " $new_inherited_linker_flags" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` deplibs=`$ECHO " $deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` ;; esac # move library search paths that coincide with paths to not yet # installed libraries to the beginning of the library search list new_libs= for path in $notinst_path; do case " $new_libs " in *" -L$path/$objdir "*) ;; *) case " $deplibs " in *" -L$path/$objdir "*) func_append new_libs " -L$path/$objdir" ;; esac ;; esac done for deplib in $deplibs; do case $deplib in -L*) case " $new_libs " in *" $deplib "*) ;; *) func_append new_libs " $deplib" ;; esac ;; *) func_append new_libs " $deplib" ;; esac done deplibs=$new_libs # All the library-specific variables (install_libdir is set above). library_names= old_library= dlname= # Test again, we may have decided not to build it any more if test yes = "$build_libtool_libs"; then # Remove $wl instances when linking with ld. # FIXME: should test the right _cmds variable. case $archive_cmds in *\$LD\ *) wl= ;; esac if test yes = "$hardcode_into_libs"; then # Hardcode the library paths hardcode_libdirs= dep_rpath= rpath=$finalize_rpath test relink = "$opt_mode" || rpath=$compile_rpath$rpath for libdir in $rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then func_replace_sysroot "$libdir" libdir=$func_replace_sysroot_result if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append dep_rpath " $flag" fi elif test -n "$runpath_var"; then case "$perm_rpath " in *" $libdir "*) ;; *) func_append perm_rpath " $libdir" ;; esac fi done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval "dep_rpath=\"$hardcode_libdir_flag_spec\"" fi if test -n "$runpath_var" && test -n "$perm_rpath"; then # We should set the runpath_var. rpath= for dir in $perm_rpath; do func_append rpath "$dir:" done eval "$runpath_var='$rpath\$$runpath_var'; export $runpath_var" fi test -n "$dep_rpath" && deplibs="$dep_rpath $deplibs" fi shlibpath=$finalize_shlibpath test relink = "$opt_mode" || shlibpath=$compile_shlibpath$shlibpath if test -n "$shlibpath"; then eval "$shlibpath_var='$shlibpath\$$shlibpath_var'; export $shlibpath_var" fi # Get the real and link names of the library. eval shared_ext=\"$shrext_cmds\" eval library_names=\"$library_names_spec\" set dummy $library_names shift realname=$1 shift if test -n "$soname_spec"; then eval soname=\"$soname_spec\" else soname=$realname fi if test -z "$dlname"; then dlname=$soname fi lib=$output_objdir/$realname linknames= for link do func_append linknames " $link" done # Use standard objects if they are pic test -z "$pic_flag" && libobjs=`$ECHO "$libobjs" | $SP2NL | $SED "$lo2o" | $NL2SP` test "X$libobjs" = "X " && libobjs= delfiles= if test -n "$export_symbols" && test -n "$include_expsyms"; then $opt_dry_run || cp "$export_symbols" "$output_objdir/$libname.uexp" export_symbols=$output_objdir/$libname.uexp func_append delfiles " $export_symbols" fi orig_export_symbols= case $host_os in cygwin* | mingw* | cegcc*) if test -n "$export_symbols" && test -z "$export_symbols_regex"; then # exporting using user supplied symfile func_dll_def_p "$export_symbols" || { # and it's NOT already a .def file. Must figure out # which of the given symbols are data symbols and tag # them as such. So, trigger use of export_symbols_cmds. # export_symbols gets reassigned inside the "prepare # the list of exported symbols" if statement, so the # include_expsyms logic still works. orig_export_symbols=$export_symbols export_symbols= always_export_symbols=yes } fi ;; esac # Prepare the list of exported symbols if test -z "$export_symbols"; then if test yes = "$always_export_symbols" || test -n "$export_symbols_regex"; then func_verbose "generating symbol list for '$libname.la'" export_symbols=$output_objdir/$libname.exp $opt_dry_run || $RM $export_symbols cmds=$export_symbols_cmds save_ifs=$IFS; IFS='~' for cmd1 in $cmds; do IFS=$save_ifs # Take the normal branch if the nm_file_list_spec branch # doesn't work or if tool conversion is not needed. case $nm_file_list_spec~$to_tool_file_cmd in *~func_convert_file_noop | *~func_convert_file_msys_to_w32 | ~*) try_normal_branch=yes eval cmd=\"$cmd1\" func_len " $cmd" len=$func_len_result ;; *) try_normal_branch=no ;; esac if test yes = "$try_normal_branch" \ && { test "$len" -lt "$max_cmd_len" \ || test "$max_cmd_len" -le -1; } then func_show_eval "$cmd" 'exit $?' skipped_export=false elif test -n "$nm_file_list_spec"; then func_basename "$output" output_la=$func_basename_result save_libobjs=$libobjs save_output=$output output=$output_objdir/$output_la.nm func_to_tool_file "$output" libobjs=$nm_file_list_spec$func_to_tool_file_result func_append delfiles " $output" func_verbose "creating $NM input file list: $output" for obj in $save_libobjs; do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" done > "$output" eval cmd=\"$cmd1\" func_show_eval "$cmd" 'exit $?' output=$save_output libobjs=$save_libobjs skipped_export=false else # The command line is too long to execute in one step. func_verbose "using reloadable object file for export list..." skipped_export=: # Break out early, otherwise skipped_export may be # set to false by a later but shorter cmd. break fi done IFS=$save_ifs if test -n "$export_symbols_regex" && test : != "$skipped_export"; then func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"' func_show_eval '$MV "${export_symbols}T" "$export_symbols"' fi fi fi if test -n "$export_symbols" && test -n "$include_expsyms"; then tmp_export_symbols=$export_symbols test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"' fi if test : != "$skipped_export" && test -n "$orig_export_symbols"; then # The given exports_symbols file has to be filtered, so filter it. func_verbose "filter symbol list for '$libname.la' to tag DATA exports" # FIXME: $output_objdir/$libname.filter potentially contains lots of # 's' commands, which not all seds can handle. GNU sed should be fine # though. Also, the filter scales superlinearly with the number of # global variables. join(1) would be nice here, but unfortunately # isn't a blessed tool. $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter func_append delfiles " $export_symbols $output_objdir/$libname.filter" export_symbols=$output_objdir/$libname.def $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols fi tmp_deplibs= for test_deplib in $deplibs; do case " $convenience " in *" $test_deplib "*) ;; *) func_append tmp_deplibs " $test_deplib" ;; esac done deplibs=$tmp_deplibs if test -n "$convenience"; then if test -n "$whole_archive_flag_spec" && test yes = "$compiler_needs_object" && test -z "$libobjs"; then # extract the archives, so we have objects to list. # TODO: could optimize this to just extract one archive. whole_archive_flag_spec= fi if test -n "$whole_archive_flag_spec"; then save_libobjs=$libobjs eval libobjs=\"\$libobjs $whole_archive_flag_spec\" test "X$libobjs" = "X " && libobjs= else gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $convenience func_append libobjs " $func_extract_archives_result" test "X$libobjs" = "X " && libobjs= fi fi if test yes = "$thread_safe" && test -n "$thread_safe_flag_spec"; then eval flag=\"$thread_safe_flag_spec\" func_append linker_flags " $flag" fi # Make a backup of the uninstalled library when relinking if test relink = "$opt_mode"; then $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}U && $MV $realname ${realname}U)' || exit $? fi # Do each of the archive commands. if test yes = "$module" && test -n "$module_cmds"; then if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then eval test_cmds=\"$module_expsym_cmds\" cmds=$module_expsym_cmds else eval test_cmds=\"$module_cmds\" cmds=$module_cmds fi else if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then eval test_cmds=\"$archive_expsym_cmds\" cmds=$archive_expsym_cmds else eval test_cmds=\"$archive_cmds\" cmds=$archive_cmds fi fi if test : != "$skipped_export" && func_len " $test_cmds" && len=$func_len_result && test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then : else # The command line is too long to link in one step, link piecewise # or, if using GNU ld and skipped_export is not :, use a linker # script. # Save the value of $output and $libobjs because we want to # use them later. If we have whole_archive_flag_spec, we # want to use save_libobjs as it was before # whole_archive_flag_spec was expanded, because we can't # assume the linker understands whole_archive_flag_spec. # This may have to be revisited, in case too many # convenience libraries get linked in and end up exceeding # the spec. if test -z "$convenience" || test -z "$whole_archive_flag_spec"; then save_libobjs=$libobjs fi save_output=$output func_basename "$output" output_la=$func_basename_result # Clear the reloadable object creation command queue and # initialize k to one. test_cmds= concat_cmds= objlist= last_robj= k=1 if test -n "$save_libobjs" && test : != "$skipped_export" && test yes = "$with_gnu_ld"; then output=$output_objdir/$output_la.lnkscript func_verbose "creating GNU ld script: $output" echo 'INPUT (' > $output for obj in $save_libobjs do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" >> $output done echo ')' >> $output func_append delfiles " $output" func_to_tool_file "$output" output=$func_to_tool_file_result elif test -n "$save_libobjs" && test : != "$skipped_export" && test -n "$file_list_spec"; then output=$output_objdir/$output_la.lnk func_verbose "creating linker input file list: $output" : > $output set x $save_libobjs shift firstobj= if test yes = "$compiler_needs_object"; then firstobj="$1 " shift fi for obj do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" >> $output done func_append delfiles " $output" func_to_tool_file "$output" output=$firstobj\"$file_list_spec$func_to_tool_file_result\" else if test -n "$save_libobjs"; then func_verbose "creating reloadable object files..." output=$output_objdir/$output_la-$k.$objext eval test_cmds=\"$reload_cmds\" func_len " $test_cmds" len0=$func_len_result len=$len0 # Loop over the list of objects to be linked. for obj in $save_libobjs do func_len " $obj" func_arith $len + $func_len_result len=$func_arith_result if test -z "$objlist" || test "$len" -lt "$max_cmd_len"; then func_append objlist " $obj" else # The command $test_cmds is almost too long, add a # command to the queue. if test 1 -eq "$k"; then # The first file doesn't have a previous command to add. reload_objs=$objlist eval concat_cmds=\"$reload_cmds\" else # All subsequent reloadable object files will link in # the last one created. reload_objs="$objlist $last_robj" eval concat_cmds=\"\$concat_cmds~$reload_cmds~\$RM $last_robj\" fi last_robj=$output_objdir/$output_la-$k.$objext func_arith $k + 1 k=$func_arith_result output=$output_objdir/$output_la-$k.$objext objlist=" $obj" func_len " $last_robj" func_arith $len0 + $func_len_result len=$func_arith_result fi done # Handle the remaining objects by creating one last # reloadable object file. All subsequent reloadable object # files will link in the last one created. test -z "$concat_cmds" || concat_cmds=$concat_cmds~ reload_objs="$objlist $last_robj" eval concat_cmds=\"\$concat_cmds$reload_cmds\" if test -n "$last_robj"; then eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\" fi func_append delfiles " $output" else output= fi ${skipped_export-false} && { func_verbose "generating symbol list for '$libname.la'" export_symbols=$output_objdir/$libname.exp $opt_dry_run || $RM $export_symbols libobjs=$output # Append the command to create the export file. test -z "$concat_cmds" || concat_cmds=$concat_cmds~ eval concat_cmds=\"\$concat_cmds$export_symbols_cmds\" if test -n "$last_robj"; then eval concat_cmds=\"\$concat_cmds~\$RM $last_robj\" fi } test -n "$save_libobjs" && func_verbose "creating a temporary reloadable object file: $output" # Loop through the commands generated above and execute them. save_ifs=$IFS; IFS='~' for cmd in $concat_cmds; do IFS=$save_ifs $opt_quiet || { func_quote_arg expand,pretty "$cmd" eval "func_echo $func_quote_arg_result" } $opt_dry_run || eval "$cmd" || { lt_exit=$? # Restore the uninstalled library and exit if test relink = "$opt_mode"; then ( cd "$output_objdir" && \ $RM "${realname}T" && \ $MV "${realname}U" "$realname" ) fi exit $lt_exit } done IFS=$save_ifs if test -n "$export_symbols_regex" && ${skipped_export-false}; then func_show_eval '$EGREP -e "$export_symbols_regex" "$export_symbols" > "${export_symbols}T"' func_show_eval '$MV "${export_symbols}T" "$export_symbols"' fi fi ${skipped_export-false} && { if test -n "$export_symbols" && test -n "$include_expsyms"; then tmp_export_symbols=$export_symbols test -n "$orig_export_symbols" && tmp_export_symbols=$orig_export_symbols $opt_dry_run || eval '$ECHO "$include_expsyms" | $SP2NL >> "$tmp_export_symbols"' fi if test -n "$orig_export_symbols"; then # The given exports_symbols file has to be filtered, so filter it. func_verbose "filter symbol list for '$libname.la' to tag DATA exports" # FIXME: $output_objdir/$libname.filter potentially contains lots of # 's' commands, which not all seds can handle. GNU sed should be fine # though. Also, the filter scales superlinearly with the number of # global variables. join(1) would be nice here, but unfortunately # isn't a blessed tool. $opt_dry_run || $SED -e '/[ ,]DATA/!d;s,\(.*\)\([ \,].*\),s|^\1$|\1\2|,' < $export_symbols > $output_objdir/$libname.filter func_append delfiles " $export_symbols $output_objdir/$libname.filter" export_symbols=$output_objdir/$libname.def $opt_dry_run || $SED -f $output_objdir/$libname.filter < $orig_export_symbols > $export_symbols fi } libobjs=$output # Restore the value of output. output=$save_output if test -n "$convenience" && test -n "$whole_archive_flag_spec"; then eval libobjs=\"\$libobjs $whole_archive_flag_spec\" test "X$libobjs" = "X " && libobjs= fi # Expand the library linking commands again to reset the # value of $libobjs for piecewise linking. # Do each of the archive commands. if test yes = "$module" && test -n "$module_cmds"; then if test -n "$export_symbols" && test -n "$module_expsym_cmds"; then cmds=$module_expsym_cmds else cmds=$module_cmds fi else if test -n "$export_symbols" && test -n "$archive_expsym_cmds"; then cmds=$archive_expsym_cmds else cmds=$archive_cmds fi fi fi if test -n "$delfiles"; then # Append the command to remove temporary files to $cmds. eval cmds=\"\$cmds~\$RM $delfiles\" fi # Add any objects from preloaded convenience libraries if test -n "$dlprefiles"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $dlprefiles func_append libobjs " $func_extract_archives_result" test "X$libobjs" = "X " && libobjs= fi save_ifs=$IFS; IFS='~' for cmd in $cmds; do IFS=$sp$nl eval cmd=\"$cmd\" IFS=$save_ifs $opt_quiet || { func_quote_arg expand,pretty "$cmd" eval "func_echo $func_quote_arg_result" } $opt_dry_run || eval "$cmd" || { lt_exit=$? # Restore the uninstalled library and exit if test relink = "$opt_mode"; then ( cd "$output_objdir" && \ $RM "${realname}T" && \ $MV "${realname}U" "$realname" ) fi exit $lt_exit } done IFS=$save_ifs # Restore the uninstalled library and exit if test relink = "$opt_mode"; then $opt_dry_run || eval '(cd $output_objdir && $RM ${realname}T && $MV $realname ${realname}T && $MV ${realname}U $realname)' || exit $? if test -n "$convenience"; then if test -z "$whole_archive_flag_spec"; then func_show_eval '${RM}r "$gentop"' fi fi exit $EXIT_SUCCESS fi # Create links to the real library. for linkname in $linknames; do if test "$realname" != "$linkname"; then func_show_eval '(cd "$output_objdir" && $RM "$linkname" && $LN_S "$realname" "$linkname")' 'exit $?' fi done # If -module or -export-dynamic was specified, set the dlname. if test yes = "$module" || test yes = "$export_dynamic"; then # On all known operating systems, these are identical. dlname=$soname fi fi ;; obj) if test -n "$dlfiles$dlprefiles" || test no != "$dlself"; then func_warning "'-dlopen' is ignored for objects" fi case " $deplibs" in *\ -l* | *\ -L*) func_warning "'-l' and '-L' are ignored for objects" ;; esac test -n "$rpath" && \ func_warning "'-rpath' is ignored for objects" test -n "$xrpath" && \ func_warning "'-R' is ignored for objects" test -n "$vinfo" && \ func_warning "'-version-info' is ignored for objects" test -n "$release" && \ func_warning "'-release' is ignored for objects" case $output in *.lo) test -n "$objs$old_deplibs" && \ func_fatal_error "cannot build library object '$output' from non-libtool objects" libobj=$output func_lo2o "$libobj" obj=$func_lo2o_result ;; *) libobj= obj=$output ;; esac # Delete the old objects. $opt_dry_run || $RM $obj $libobj # Objects from convenience libraries. This assumes # single-version convenience libraries. Whenever we create # different ones for PIC/non-PIC, this we'll have to duplicate # the extraction. reload_conv_objs= gentop= # if reload_cmds runs $LD directly, get rid of -Wl from # whole_archive_flag_spec and hope we can get by with turning comma # into space. case $reload_cmds in *\$LD[\ \$]*) wl= ;; esac if test -n "$convenience"; then if test -n "$whole_archive_flag_spec"; then eval tmp_whole_archive_flags=\"$whole_archive_flag_spec\" test -n "$wl" || tmp_whole_archive_flags=`$ECHO "$tmp_whole_archive_flags" | $SED 's|,| |g'` reload_conv_objs=$reload_objs\ $tmp_whole_archive_flags else gentop=$output_objdir/${obj}x func_append generated " $gentop" func_extract_archives $gentop $convenience reload_conv_objs="$reload_objs $func_extract_archives_result" fi fi # If we're not building shared, we need to use non_pic_objs test yes = "$build_libtool_libs" || libobjs=$non_pic_objects # Create the old-style object. reload_objs=$objs$old_deplibs' '`$ECHO "$libobjs" | $SP2NL | $SED "/\.$libext$/d; /\.lib$/d; $lo2o" | $NL2SP`' '$reload_conv_objs output=$obj func_execute_cmds "$reload_cmds" 'exit $?' # Exit if we aren't doing a library object file. if test -z "$libobj"; then if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi exit $EXIT_SUCCESS fi test yes = "$build_libtool_libs" || { if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi # Create an invalid libtool object if no PIC, so that we don't # accidentally link it into a program. # $show "echo timestamp > $libobj" # $opt_dry_run || eval "echo timestamp > $libobj" || exit $? exit $EXIT_SUCCESS } if test -n "$pic_flag" || test default != "$pic_mode"; then # Only do commands if we really have different PIC objects. reload_objs="$libobjs $reload_conv_objs" output=$libobj func_execute_cmds "$reload_cmds" 'exit $?' fi if test -n "$gentop"; then func_show_eval '${RM}r "$gentop"' fi exit $EXIT_SUCCESS ;; prog) case $host in *cygwin*) func_stripname '' '.exe' "$output" output=$func_stripname_result.exe;; esac test -n "$vinfo" && \ func_warning "'-version-info' is ignored for programs" test -n "$release" && \ func_warning "'-release' is ignored for programs" $preload \ && test unknown,unknown,unknown = "$dlopen_support,$dlopen_self,$dlopen_self_static" \ && func_warning "'LT_INIT([dlopen])' not used. Assuming no dlopen support." case $host in *-*-rhapsody* | *-*-darwin1.[012]) # On Rhapsody replace the C library is the System framework compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's/ -lc / System.ltframework /'` finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's/ -lc / System.ltframework /'` ;; esac case $host in *-*-darwin*) # Don't allow lazy linking, it breaks C++ global constructors # But is supposedly fixed on 10.4 or later (yay!). if test CXX = "$tagname"; then case ${MACOSX_DEPLOYMENT_TARGET-10.0} in 10.[0123]) func_append compile_command " $wl-bind_at_load" func_append finalize_command " $wl-bind_at_load" ;; esac fi # Time to change all our "foo.ltframework" stuff back to "-framework foo" compile_deplibs=`$ECHO " $compile_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` finalize_deplibs=`$ECHO " $finalize_deplibs" | $SED 's% \([^ $]*\).ltframework% -framework \1%g'` ;; esac # move library search paths that coincide with paths to not yet # installed libraries to the beginning of the library search list new_libs= for path in $notinst_path; do case " $new_libs " in *" -L$path/$objdir "*) ;; *) case " $compile_deplibs " in *" -L$path/$objdir "*) func_append new_libs " -L$path/$objdir" ;; esac ;; esac done for deplib in $compile_deplibs; do case $deplib in -L*) case " $new_libs " in *" $deplib "*) ;; *) func_append new_libs " $deplib" ;; esac ;; *) func_append new_libs " $deplib" ;; esac done compile_deplibs=$new_libs func_append compile_command " $compile_deplibs" func_append finalize_command " $finalize_deplibs" if test -n "$rpath$xrpath"; then # If the user specified any rpath flags, then add them. for libdir in $rpath $xrpath; do # This is the magic to use -rpath. case "$finalize_rpath " in *" $libdir "*) ;; *) func_append finalize_rpath " $libdir" ;; esac done fi # Now hardcode the library paths rpath= hardcode_libdirs= for libdir in $compile_rpath $finalize_rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append rpath " $flag" fi elif test -n "$runpath_var"; then case "$perm_rpath " in *" $libdir "*) ;; *) func_append perm_rpath " $libdir" ;; esac fi case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-os2* | *-cegcc*) testbindir=`$ECHO "$libdir" | $SED -e 's*/lib$*/bin*'` case :$dllsearchpath: in *":$libdir:"*) ;; ::) dllsearchpath=$libdir;; *) func_append dllsearchpath ":$libdir";; esac case :$dllsearchpath: in *":$testbindir:"*) ;; ::) dllsearchpath=$testbindir;; *) func_append dllsearchpath ":$testbindir";; esac ;; esac done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval rpath=\" $hardcode_libdir_flag_spec\" fi compile_rpath=$rpath rpath= hardcode_libdirs= for libdir in $finalize_rpath; do if test -n "$hardcode_libdir_flag_spec"; then if test -n "$hardcode_libdir_separator"; then if test -z "$hardcode_libdirs"; then hardcode_libdirs=$libdir else # Just accumulate the unique libdirs. case $hardcode_libdir_separator$hardcode_libdirs$hardcode_libdir_separator in *"$hardcode_libdir_separator$libdir$hardcode_libdir_separator"*) ;; *) func_append hardcode_libdirs "$hardcode_libdir_separator$libdir" ;; esac fi else eval flag=\"$hardcode_libdir_flag_spec\" func_append rpath " $flag" fi elif test -n "$runpath_var"; then case "$finalize_perm_rpath " in *" $libdir "*) ;; *) func_append finalize_perm_rpath " $libdir" ;; esac fi done # Substitute the hardcoded libdirs into the rpath. if test -n "$hardcode_libdir_separator" && test -n "$hardcode_libdirs"; then libdir=$hardcode_libdirs eval rpath=\" $hardcode_libdir_flag_spec\" fi finalize_rpath=$rpath if test -n "$libobjs" && test yes = "$build_old_libs"; then # Transform all the library objects into standard objects. compile_command=`$ECHO "$compile_command" | $SP2NL | $SED "$lo2o" | $NL2SP` finalize_command=`$ECHO "$finalize_command" | $SP2NL | $SED "$lo2o" | $NL2SP` fi func_generate_dlsyms "$outputname" "@PROGRAM@" false # template prelinking step if test -n "$prelink_cmds"; then func_execute_cmds "$prelink_cmds" 'exit $?' fi wrappers_required=: case $host in *cegcc* | *mingw32ce*) # Disable wrappers for cegcc and mingw32ce hosts, we are cross compiling anyway. wrappers_required=false ;; *cygwin* | *mingw* ) test yes = "$build_libtool_libs" || wrappers_required=false ;; *) if test no = "$need_relink" || test yes != "$build_libtool_libs"; then wrappers_required=false fi ;; esac $wrappers_required || { # Replace the output file specification. compile_command=`$ECHO "$compile_command" | $SED 's%@OUTPUT@%'"$output"'%g'` link_command=$compile_command$compile_rpath # We have no uninstalled library dependencies, so finalize right now. exit_status=0 func_show_eval "$link_command" 'exit_status=$?' if test -n "$postlink_cmds"; then func_to_tool_file "$output" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi # Delete the generated files. if test -f "$output_objdir/${outputname}S.$objext"; then func_show_eval '$RM "$output_objdir/${outputname}S.$objext"' fi exit $exit_status } if test -n "$compile_shlibpath$finalize_shlibpath"; then compile_command="$shlibpath_var=\"$compile_shlibpath$finalize_shlibpath\$$shlibpath_var\" $compile_command" fi if test -n "$finalize_shlibpath"; then finalize_command="$shlibpath_var=\"$finalize_shlibpath\$$shlibpath_var\" $finalize_command" fi compile_var= finalize_var= if test -n "$runpath_var"; then if test -n "$perm_rpath"; then # We should set the runpath_var. rpath= for dir in $perm_rpath; do func_append rpath "$dir:" done compile_var="$runpath_var=\"$rpath\$$runpath_var\" " fi if test -n "$finalize_perm_rpath"; then # We should set the runpath_var. rpath= for dir in $finalize_perm_rpath; do func_append rpath "$dir:" done finalize_var="$runpath_var=\"$rpath\$$runpath_var\" " fi fi if test yes = "$no_install"; then # We don't need to create a wrapper script. link_command=$compile_var$compile_command$compile_rpath # Replace the output file specification. link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output"'%g'` # Delete the old output file. $opt_dry_run || $RM $output # Link the executable and exit func_show_eval "$link_command" 'exit $?' if test -n "$postlink_cmds"; then func_to_tool_file "$output" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi exit $EXIT_SUCCESS fi case $hardcode_action,$fast_install in relink,*) # Fast installation is not supported link_command=$compile_var$compile_command$compile_rpath relink_command=$finalize_var$finalize_command$finalize_rpath func_warning "this platform does not like uninstalled shared libraries" func_warning "'$output' will be relinked during installation" ;; *,yes) link_command=$finalize_var$compile_command$finalize_rpath relink_command=`$ECHO "$compile_var$compile_command$compile_rpath" | $SED 's%@OUTPUT@%\$progdir/\$file%g'` ;; *,no) link_command=$compile_var$compile_command$compile_rpath relink_command=$finalize_var$finalize_command$finalize_rpath ;; *,needless) link_command=$finalize_var$compile_command$finalize_rpath relink_command= ;; esac # Replace the output file specification. link_command=`$ECHO "$link_command" | $SED 's%@OUTPUT@%'"$output_objdir/$outputname"'%g'` # Delete the old output files. $opt_dry_run || $RM $output $output_objdir/$outputname $output_objdir/lt-$outputname func_show_eval "$link_command" 'exit $?' if test -n "$postlink_cmds"; then func_to_tool_file "$output_objdir/$outputname" postlink_cmds=`func_echo_all "$postlink_cmds" | $SED -e 's%@OUTPUT@%'"$output_objdir/$outputname"'%g' -e 's%@TOOL_OUTPUT@%'"$func_to_tool_file_result"'%g'` func_execute_cmds "$postlink_cmds" 'exit $?' fi # Now create the wrapper script. func_verbose "creating $output" # Quote the relink command for shipping. if test -n "$relink_command"; then # Preserve any variables that may affect compiler behavior for var in $variables_saved_for_relink; do if eval test -z \"\${$var+set}\"; then relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command" elif eval var_value=\$$var; test -z "$var_value"; then relink_command="$var=; export $var; $relink_command" else func_quote_arg pretty "$var_value" relink_command="$var=$func_quote_arg_result; export $var; $relink_command" fi done func_quote eval cd "`pwd`" func_quote_arg pretty,unquoted "($func_quote_result; $relink_command)" relink_command=$func_quote_arg_unquoted_result fi # Only actually do things if not in dry run mode. $opt_dry_run || { # win32 will think the script is a binary if it has # a .exe suffix, so we strip it off here. case $output in *.exe) func_stripname '' '.exe' "$output" output=$func_stripname_result ;; esac # test for cygwin because mv fails w/o .exe extensions case $host in *cygwin*) exeext=.exe func_stripname '' '.exe' "$outputname" outputname=$func_stripname_result ;; *) exeext= ;; esac case $host in *cygwin* | *mingw* ) func_dirname_and_basename "$output" "" "." output_name=$func_basename_result output_path=$func_dirname_result cwrappersource=$output_path/$objdir/lt-$output_name.c cwrapper=$output_path/$output_name.exe $RM $cwrappersource $cwrapper trap "$RM $cwrappersource $cwrapper; exit $EXIT_FAILURE" 1 2 15 func_emit_cwrapperexe_src > $cwrappersource # The wrapper executable is built using the $host compiler, # because it contains $host paths and files. If cross- # compiling, it, like the target executable, must be # executed on the $host or under an emulation environment. $opt_dry_run || { $LTCC $LTCFLAGS -o $cwrapper $cwrappersource $STRIP $cwrapper } # Now, create the wrapper script for func_source use: func_ltwrapper_scriptname $cwrapper $RM $func_ltwrapper_scriptname_result trap "$RM $func_ltwrapper_scriptname_result; exit $EXIT_FAILURE" 1 2 15 $opt_dry_run || { # note: this script will not be executed, so do not chmod. if test "x$build" = "x$host"; then $cwrapper --lt-dump-script > $func_ltwrapper_scriptname_result else func_emit_wrapper no > $func_ltwrapper_scriptname_result fi } ;; * ) $RM $output trap "$RM $output; exit $EXIT_FAILURE" 1 2 15 func_emit_wrapper no > $output chmod +x $output ;; esac } exit $EXIT_SUCCESS ;; esac # See if we need to build an old-fashioned archive. for oldlib in $oldlibs; do case $build_libtool_libs in convenience) oldobjs="$libobjs_save $symfileobj" addlibs=$convenience build_libtool_libs=no ;; module) oldobjs=$libobjs_save addlibs=$old_convenience build_libtool_libs=no ;; *) oldobjs="$old_deplibs $non_pic_objects" $preload && test -f "$symfileobj" \ && func_append oldobjs " $symfileobj" addlibs=$old_convenience ;; esac if test -n "$addlibs"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $addlibs func_append oldobjs " $func_extract_archives_result" fi # Do each command in the archive commands. if test -n "$old_archive_from_new_cmds" && test yes = "$build_libtool_libs"; then cmds=$old_archive_from_new_cmds else # Add any objects from preloaded convenience libraries if test -n "$dlprefiles"; then gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_extract_archives $gentop $dlprefiles func_append oldobjs " $func_extract_archives_result" fi # POSIX demands no paths to be encoded in archives. We have # to avoid creating archives with duplicate basenames if we # might have to extract them afterwards, e.g., when creating a # static archive out of a convenience library, or when linking # the entirety of a libtool archive into another (currently # not supported by libtool). if (for obj in $oldobjs do func_basename "$obj" $ECHO "$func_basename_result" done | sort | sort -uc >/dev/null 2>&1); then : else echo "copying selected object files to avoid basename conflicts..." gentop=$output_objdir/${outputname}x func_append generated " $gentop" func_mkdir_p "$gentop" save_oldobjs=$oldobjs oldobjs= counter=1 for obj in $save_oldobjs do func_basename "$obj" objbase=$func_basename_result case " $oldobjs " in " ") oldobjs=$obj ;; *[\ /]"$objbase "*) while :; do # Make sure we don't pick an alternate name that also # overlaps. newobj=lt$counter-$objbase func_arith $counter + 1 counter=$func_arith_result case " $oldobjs " in *[\ /]"$newobj "*) ;; *) if test ! -f "$gentop/$newobj"; then break; fi ;; esac done func_show_eval "ln $obj $gentop/$newobj || cp $obj $gentop/$newobj" func_append oldobjs " $gentop/$newobj" ;; *) func_append oldobjs " $obj" ;; esac done fi func_to_tool_file "$oldlib" func_convert_file_msys_to_w32 tool_oldlib=$func_to_tool_file_result eval cmds=\"$old_archive_cmds\" func_len " $cmds" len=$func_len_result if test "$len" -lt "$max_cmd_len" || test "$max_cmd_len" -le -1; then cmds=$old_archive_cmds elif test -n "$archiver_list_spec"; then func_verbose "using command file archive linking..." for obj in $oldobjs do func_to_tool_file "$obj" $ECHO "$func_to_tool_file_result" done > $output_objdir/$libname.libcmd func_to_tool_file "$output_objdir/$libname.libcmd" oldobjs=" $archiver_list_spec$func_to_tool_file_result" cmds=$old_archive_cmds else # the command line is too long to link in one step, link in parts func_verbose "using piecewise archive linking..." save_RANLIB=$RANLIB RANLIB=: objlist= concat_cmds= save_oldobjs=$oldobjs oldobjs= # Is there a better way of finding the last object in the list? for obj in $save_oldobjs do last_oldobj=$obj done eval test_cmds=\"$old_archive_cmds\" func_len " $test_cmds" len0=$func_len_result len=$len0 for obj in $save_oldobjs do func_len " $obj" func_arith $len + $func_len_result len=$func_arith_result func_append objlist " $obj" if test "$len" -lt "$max_cmd_len"; then : else # the above command should be used before it gets too long oldobjs=$objlist if test "$obj" = "$last_oldobj"; then RANLIB=$save_RANLIB fi test -z "$concat_cmds" || concat_cmds=$concat_cmds~ eval concat_cmds=\"\$concat_cmds$old_archive_cmds\" objlist= len=$len0 fi done RANLIB=$save_RANLIB oldobjs=$objlist if test -z "$oldobjs"; then eval cmds=\"\$concat_cmds\" else eval cmds=\"\$concat_cmds~\$old_archive_cmds\" fi fi fi func_execute_cmds "$cmds" 'exit $?' done test -n "$generated" && \ func_show_eval "${RM}r$generated" # Now create the libtool archive. case $output in *.la) old_library= test yes = "$build_old_libs" && old_library=$libname.$libext func_verbose "creating $output" # Preserve any variables that may affect compiler behavior for var in $variables_saved_for_relink; do if eval test -z \"\${$var+set}\"; then relink_command="{ test -z \"\${$var+set}\" || $lt_unset $var || { $var=; export $var; }; }; $relink_command" elif eval var_value=\$$var; test -z "$var_value"; then relink_command="$var=; export $var; $relink_command" else func_quote_arg pretty,unquoted "$var_value" relink_command="$var=$func_quote_arg_unquoted_result; export $var; $relink_command" fi done # Quote the link command for shipping. func_quote eval cd "`pwd`" relink_command="($func_quote_result; $SHELL \"$progpath\" $preserve_args --mode=relink $libtool_args @inst_prefix_dir@)" func_quote_arg pretty,unquoted "$relink_command" relink_command=$func_quote_arg_unquoted_result if test yes = "$hardcode_automatic"; then relink_command= fi # Only create the output if not a dry run. $opt_dry_run || { for installed in no yes; do if test yes = "$installed"; then if test -z "$install_libdir"; then break fi output=$output_objdir/${outputname}i # Replace all uninstalled libtool libraries with the installed ones newdependency_libs= for deplib in $dependency_libs; do case $deplib in *.la) func_basename "$deplib" name=$func_basename_result func_resolve_sysroot "$deplib" eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $func_resolve_sysroot_result` test -z "$libdir" && \ func_fatal_error "'$deplib' is not a valid libtool archive" func_append newdependency_libs " ${lt_sysroot:+=}$libdir/$name" ;; -L*) func_stripname -L '' "$deplib" func_replace_sysroot "$func_stripname_result" func_append newdependency_libs " -L$func_replace_sysroot_result" ;; -R*) func_stripname -R '' "$deplib" func_replace_sysroot "$func_stripname_result" func_append newdependency_libs " -R$func_replace_sysroot_result" ;; *) func_append newdependency_libs " $deplib" ;; esac done dependency_libs=$newdependency_libs newdlfiles= for lib in $dlfiles; do case $lib in *.la) func_basename "$lib" name=$func_basename_result eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib` test -z "$libdir" && \ func_fatal_error "'$lib' is not a valid libtool archive" func_append newdlfiles " ${lt_sysroot:+=}$libdir/$name" ;; *) func_append newdlfiles " $lib" ;; esac done dlfiles=$newdlfiles newdlprefiles= for lib in $dlprefiles; do case $lib in *.la) # Only pass preopened files to the pseudo-archive (for # eventual linking with the app. that links it) if we # didn't already link the preopened objects directly into # the library: func_basename "$lib" name=$func_basename_result eval libdir=`$SED -n -e 's/^libdir=\(.*\)$/\1/p' $lib` test -z "$libdir" && \ func_fatal_error "'$lib' is not a valid libtool archive" func_append newdlprefiles " ${lt_sysroot:+=}$libdir/$name" ;; esac done dlprefiles=$newdlprefiles else newdlfiles= for lib in $dlfiles; do case $lib in [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;; *) abs=`pwd`"/$lib" ;; esac func_append newdlfiles " $abs" done dlfiles=$newdlfiles newdlprefiles= for lib in $dlprefiles; do case $lib in [\\/]* | [A-Za-z]:[\\/]*) abs=$lib ;; *) abs=`pwd`"/$lib" ;; esac func_append newdlprefiles " $abs" done dlprefiles=$newdlprefiles fi $RM $output # place dlname in correct position for cygwin # In fact, it would be nice if we could use this code for all target # systems that can't hard-code library paths into their executables # and that have no shared library path variable independent of PATH, # but it turns out we can't easily determine that from inspecting # libtool variables, so we have to hard-code the OSs to which it # applies here; at the moment, that means platforms that use the PE # object format with DLL files. See the long comment at the top of # tests/bindir.at for full details. tdlname=$dlname case $host,$output,$installed,$module,$dlname in *cygwin*,*lai,yes,no,*.dll | *mingw*,*lai,yes,no,*.dll | *cegcc*,*lai,yes,no,*.dll) # If a -bindir argument was supplied, place the dll there. if test -n "$bindir"; then func_relative_path "$install_libdir" "$bindir" tdlname=$func_relative_path_result/$dlname else # Otherwise fall back on heuristic. tdlname=../bin/$dlname fi ;; esac $ECHO > $output "\ # $outputname - a libtool library file # Generated by $PROGRAM (GNU $PACKAGE) $VERSION # # Please DO NOT delete this file! # It is necessary for linking the library. # The name that we can dlopen(3). dlname='$tdlname' # Names of this library. library_names='$library_names' # The name of the static archive. old_library='$old_library' # Linker flags that cannot go in dependency_libs. inherited_linker_flags='$new_inherited_linker_flags' # Libraries that this one depends upon. dependency_libs='$dependency_libs' # Names of additional weak libraries provided by this library weak_library_names='$weak_libs' # Version information for $libname. current=$current age=$age revision=$revision # Is this an already installed library? installed=$installed # Should we warn about portability when linking against -modules? shouldnotlink=$module # Files to dlopen/dlpreopen dlopen='$dlfiles' dlpreopen='$dlprefiles' # Directory that this library needs to be installed in: libdir='$install_libdir'" if test no,yes = "$installed,$need_relink"; then $ECHO >> $output "\ relink_command=\"$relink_command\"" fi done } # Do a symbolic link so that the libtool archive can be found in # LD_LIBRARY_PATH before the program is installed. func_show_eval '( cd "$output_objdir" && $RM "$outputname" && $LN_S "../$outputname" "$outputname" )' 'exit $?' ;; esac exit $EXIT_SUCCESS } if test link = "$opt_mode" || test relink = "$opt_mode"; then func_mode_link ${1+"$@"} fi # func_mode_uninstall arg... func_mode_uninstall () { $debug_cmd RM=$nonopt files= rmforce=false exit_status=0 # This variable tells wrapper scripts just to set variables rather # than running their programs. libtool_install_magic=$magic for arg do case $arg in -f) func_append RM " $arg"; rmforce=: ;; -*) func_append RM " $arg" ;; *) func_append files " $arg" ;; esac done test -z "$RM" && \ func_fatal_help "you must specify an RM program" rmdirs= for file in $files; do func_dirname "$file" "" "." dir=$func_dirname_result if test . = "$dir"; then odir=$objdir else odir=$dir/$objdir fi func_basename "$file" name=$func_basename_result test uninstall = "$opt_mode" && odir=$dir # Remember odir for removal later, being careful to avoid duplicates if test clean = "$opt_mode"; then case " $rmdirs " in *" $odir "*) ;; *) func_append rmdirs " $odir" ;; esac fi # Don't error if the file doesn't exist and rm -f was used. if { test -L "$file"; } >/dev/null 2>&1 || { test -h "$file"; } >/dev/null 2>&1 || test -f "$file"; then : elif test -d "$file"; then exit_status=1 continue elif $rmforce; then continue fi rmfiles=$file case $name in *.la) # Possibly a libtool archive, so verify it. if func_lalib_p "$file"; then func_source $dir/$name # Delete the libtool libraries and symlinks. for n in $library_names; do func_append rmfiles " $odir/$n" done test -n "$old_library" && func_append rmfiles " $odir/$old_library" case $opt_mode in clean) case " $library_names " in *" $dlname "*) ;; *) test -n "$dlname" && func_append rmfiles " $odir/$dlname" ;; esac test -n "$libdir" && func_append rmfiles " $odir/$name $odir/${name}i" ;; uninstall) if test -n "$library_names"; then # Do each command in the postuninstall commands. func_execute_cmds "$postuninstall_cmds" '$rmforce || exit_status=1' fi if test -n "$old_library"; then # Do each command in the old_postuninstall commands. func_execute_cmds "$old_postuninstall_cmds" '$rmforce || exit_status=1' fi # FIXME: should reinstall the best remaining shared library. ;; esac fi ;; *.lo) # Possibly a libtool object, so verify it. if func_lalib_p "$file"; then # Read the .lo file func_source $dir/$name # Add PIC object to the list of files to remove. if test -n "$pic_object" && test none != "$pic_object"; then func_append rmfiles " $dir/$pic_object" fi # Add non-PIC object to the list of files to remove. if test -n "$non_pic_object" && test none != "$non_pic_object"; then func_append rmfiles " $dir/$non_pic_object" fi fi ;; *) if test clean = "$opt_mode"; then noexename=$name case $file in *.exe) func_stripname '' '.exe' "$file" file=$func_stripname_result func_stripname '' '.exe' "$name" noexename=$func_stripname_result # $file with .exe has already been added to rmfiles, # add $file without .exe func_append rmfiles " $file" ;; esac # Do a test to see if this is a libtool program. if func_ltwrapper_p "$file"; then if func_ltwrapper_executable_p "$file"; then func_ltwrapper_scriptname "$file" relink_command= func_source $func_ltwrapper_scriptname_result func_append rmfiles " $func_ltwrapper_scriptname_result" else relink_command= func_source $dir/$noexename fi # note $name still contains .exe if it was in $file originally # as does the version of $file that was added into $rmfiles func_append rmfiles " $odir/$name $odir/${name}S.$objext" if test yes = "$fast_install" && test -n "$relink_command"; then func_append rmfiles " $odir/lt-$name" fi if test "X$noexename" != "X$name"; then func_append rmfiles " $odir/lt-$noexename.c" fi fi fi ;; esac func_show_eval "$RM $rmfiles" 'exit_status=1' done # Try to remove the $objdir's in the directories where we deleted files for dir in $rmdirs; do if test -d "$dir"; then func_show_eval "rmdir $dir >/dev/null 2>&1" fi done exit $exit_status } if test uninstall = "$opt_mode" || test clean = "$opt_mode"; then func_mode_uninstall ${1+"$@"} fi test -z "$opt_mode" && { help=$generic_help func_fatal_help "you must specify a MODE" } test -z "$exec_cmd" && \ func_fatal_help "invalid operation mode '$opt_mode'" if test -n "$exec_cmd"; then eval exec "$exec_cmd" exit $EXIT_FAILURE fi exit $exit_status # The TAGs below are defined such that we never get into a situation # where we disable both kinds of libraries. Given conflicting # choices, we go for a static library, that is the most portable, # since we can't tell whether shared libraries were disabled because # the user asked for that or because the platform doesn't support # them. This is particularly important on AIX, because we don't # support having both static and shared libraries enabled at the same # time on that platform, so we default to a shared-only configuration. # If a disable-shared tag is given, we'll fallback to a static-only # configuration. But we'll never go from static-only to shared-only. # ### BEGIN LIBTOOL TAG CONFIG: disable-shared build_libtool_libs=no build_old_libs=yes # ### END LIBTOOL TAG CONFIG: disable-shared # ### BEGIN LIBTOOL TAG CONFIG: disable-static build_old_libs=`case $build_libtool_libs in yes) echo no;; *) echo yes;; esac` # ### END LIBTOOL TAG CONFIG: disable-static # Local Variables: # mode:shell-script # sh-indentation:2 # End: libffcall-2.5/build-aux/depcomp0000755000000000000000000005621714665326517013466 00000000000000#! /bin/sh # depcomp - compile a program generating dependencies as side-effects scriptversion=2024-06-19.01; # UTC # Copyright (C) 1999-2024 Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # You should have received a copy of the GNU General Public License # along with this program. If not, see . # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. # Originally written by Alexandre Oliva . case $1 in '') echo "$0: No command. Try '$0 --help' for more information." 1>&2 exit 1; ;; -h | --h*) cat <<\EOF Usage: depcomp [--help] [--version] PROGRAM [ARGS] Run PROGRAMS ARGS to compile a file, generating dependencies as side-effects. Environment variables: depmode Dependency tracking mode. source Source file read by 'PROGRAMS ARGS'. object Object file output by 'PROGRAMS ARGS'. DEPDIR directory where to store dependencies. depfile Dependency file to output. tmpdepfile Temporary file to use when outputting dependencies. libtool Whether libtool is used (yes/no). Report bugs to . GNU Automake home page: . General help using GNU software: . EOF exit $? ;; -v | --v*) echo "depcomp (GNU Automake) $scriptversion" exit $? ;; esac # Get the directory component of the given path, and save it in the # global variables '$dir'. Note that this directory component will # be either empty or ending with a '/' character. This is deliberate. set_dir_from () { case $1 in */*) dir=`echo "$1" | sed -e 's|/[^/]*$|/|'`;; *) dir=;; esac } # Get the suffix-stripped basename of the given path, and save it the # global variable '$base'. set_base_from () { base=`echo "$1" | sed -e 's|^.*/||' -e 's/\.[^.]*$//'` } # If no dependency file was actually created by the compiler invocation, # we still have to create a dummy depfile, to avoid errors with the # Makefile "include basename.Plo" scheme. make_dummy_depfile () { echo "#dummy" > "$depfile" } # Factor out some common post-processing of the generated depfile. # Requires the auxiliary global variable '$tmpdepfile' to be set. aix_post_process_depfile () { # If the compiler actually managed to produce a dependency file, # post-process it. if test -f "$tmpdepfile"; then # Each line is of the form 'foo.o: dependency.h'. # Do two passes, one to just change these to # $object: dependency.h # and one to simply output # dependency.h: # which is needed to avoid the deleted-header problem. { sed -e "s,^.*\.[$lower]*:,$object:," < "$tmpdepfile" sed -e "s,^.*\.[$lower]*:[$tab ]*,," -e 's,$,:,' < "$tmpdepfile" } > "$depfile" rm -f "$tmpdepfile" else make_dummy_depfile fi } # A tabulation character. tab=' ' # A newline character. nl=' ' # Character ranges might be problematic outside the C locale. # These definitions help. upper=ABCDEFGHIJKLMNOPQRSTUVWXYZ lower=abcdefghijklmnopqrstuvwxyz alpha=${upper}${lower} if test -z "$depmode" || test -z "$source" || test -z "$object"; then echo "depcomp: Variables source, object and depmode must be set" 1>&2 exit 1 fi # Dependencies for sub/bar.o or sub/bar.obj go into sub/.deps/bar.Po. depfile=${depfile-`echo "$object" | sed 's|[^\\/]*$|'${DEPDIR-.deps}'/&|;s|\.\([^.]*\)$|.P\1|;s|Pobj$|Po|'`} tmpdepfile=${tmpdepfile-`echo "$depfile" | sed 's/\.\([^.]*\)$/.T\1/'`} rm -f "$tmpdepfile" # Avoid interference from the environment. gccflag= dashmflag= # Some modes work just like other modes, but use different flags. We # parameterize here, but still list the modes in the big case below, # to make depend.m4 easier to write. Note that we *cannot* use a case # here, because this file can only contain one case statement. if test "$depmode" = hp; then # HP compiler uses -M and no extra arg. gccflag=-M depmode=gcc fi if test "$depmode" = dashXmstdout; then # This is just like dashmstdout with a different argument. dashmflag=-xM depmode=dashmstdout fi cygpath_u="cygpath -u -f -" if test "$depmode" = msvcmsys; then # This is just like msvisualcpp but w/o cygpath translation. # Just convert the backslash-escaped backslashes to single forward # slashes to satisfy depend.m4 cygpath_u='sed s,\\\\,/,g' depmode=msvisualcpp fi if test "$depmode" = msvc7msys; then # This is just like msvc7 but w/o cygpath translation. # Just convert the backslash-escaped backslashes to single forward # slashes to satisfy depend.m4 cygpath_u='sed s,\\\\,/,g' depmode=msvc7 fi if test "$depmode" = xlc; then # IBM C/C++ Compilers xlc/xlC can output gcc-like dependency information. gccflag=-qmakedep=gcc,-MF depmode=gcc fi case "$depmode" in gcc3) ## gcc 3 implements dependency tracking that does exactly what ## we want. Yay! Note: for some reason libtool 1.4 doesn't like ## it if -MD -MP comes after the -MF stuff. Hmm. ## Unfortunately, FreeBSD c89 acceptance of flags depends upon ## the command line argument order; so add the flags where they ## appear in depend2.am. Note that the slowdown incurred here ## affects only configure: in makefiles, %FASTDEP% shortcuts this. for arg do case $arg in -c) set fnord "$@" -MT "$object" -MD -MP -MF "$tmpdepfile" "$arg" ;; *) set fnord "$@" "$arg" ;; esac shift # fnord shift # $arg done "$@" stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi mv "$tmpdepfile" "$depfile" ;; gcc) ## Note that this doesn't just cater to obsolete pre-3.x GCC compilers. ## but also to in-use compilers like IBM xlc/xlC and the HP C compiler. ## (see the conditional assignment to $gccflag above). ## There are various ways to get dependency output from gcc. Here's ## why we pick this rather obscure method: ## - Don't want to use -MD because we'd like the dependencies to end ## up in a subdir. Having to rename by hand is ugly. ## (We might end up doing this anyway to support other compilers.) ## - The DEPENDENCIES_OUTPUT environment variable makes gcc act like ## -MM, not -M (despite what the docs say). Also, it might not be ## supported by the other compilers which use the 'gcc' depmode. ## - Using -M directly means running the compiler twice (even worse ## than renaming). if test -z "$gccflag"; then gccflag=-MD, fi "$@" -Wp,"$gccflag$tmpdepfile" stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi rm -f "$depfile" echo "$object : \\" > "$depfile" # The second -e expression handles DOS-style file names with drive # letters. sed -e 's/^[^:]*: / /' \ -e 's/^['$alpha']:\/[^:]*: / /' < "$tmpdepfile" >> "$depfile" ## This next piece of magic avoids the "deleted header file" problem. ## The problem is that when a header file which appears in a .P file ## is deleted, the dependency causes make to die (because there is ## typically no way to rebuild the header). We avoid this by adding ## dummy dependencies for each header file. Too bad gcc doesn't do ## this for us directly. ## Some versions of gcc put a space before the ':'. On the theory ## that the space means something, we add a space to the output as ## well. hp depmode also adds that space, but also prefixes the VPATH ## to the object. Take care to not repeat it in the output. ## Some versions of the HPUX 10.20 sed can't process this invocation ## correctly. Breaking it into two sed invocations is a workaround. tr ' ' "$nl" < "$tmpdepfile" \ | sed -e 's/^\\$//' -e '/^$/d' -e "s|.*$object$||" -e '/:$/d' \ | sed -e 's/$/ :/' >> "$depfile" rm -f "$tmpdepfile" ;; hp) # This case exists only to let depend.m4 do its work. It works by # looking at the text of this script. This case will never be run, # since it is checked for above. exit 1 ;; sgi) if test "$libtool" = yes; then "$@" "-Wp,-MDupdate,$tmpdepfile" else "$@" -MDupdate "$tmpdepfile" fi stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi rm -f "$depfile" if test -f "$tmpdepfile"; then # yes, the sourcefile depend on other files echo "$object : \\" > "$depfile" # Clip off the initial element (the dependent). Don't try to be # clever and replace this with sed code, as IRIX sed won't handle # lines with more than a fixed number of characters (4096 in # IRIX 6.2 sed, 8192 in IRIX 6.5). We also remove comment lines; # the IRIX cc adds comments like '#:fec' to the end of the # dependency line. tr ' ' "$nl" < "$tmpdepfile" \ | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' \ | tr "$nl" ' ' >> "$depfile" echo >> "$depfile" # The second pass generates a dummy entry for each header file. tr ' ' "$nl" < "$tmpdepfile" \ | sed -e 's/^.*\.o://' -e 's/#.*$//' -e '/^$/ d' -e 's/$/:/' \ >> "$depfile" else make_dummy_depfile fi rm -f "$tmpdepfile" ;; xlc) # This case exists only to let depend.m4 do its work. It works by # looking at the text of this script. This case will never be run, # since it is checked for above. exit 1 ;; aix) # The C for AIX Compiler uses -M and outputs the dependencies # in a .u file. In older versions, this file always lives in the # current directory. Also, the AIX compiler puts '$object:' at the # start of each line; $object doesn't have directory information. # Version 6 uses the directory in both cases. set_dir_from "$object" set_base_from "$object" if test "$libtool" = yes; then tmpdepfile1=$dir$base.u tmpdepfile2=$base.u tmpdepfile3=$dir.libs/$base.u "$@" -Wc,-M else tmpdepfile1=$dir$base.u tmpdepfile2=$dir$base.u tmpdepfile3=$dir$base.u "$@" -M fi stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" exit $stat fi for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" do test -f "$tmpdepfile" && break done aix_post_process_depfile ;; tcc) # tcc (Tiny C Compiler) understand '-MD -MF file' since version 0.9.26 # FIXME: That version still under development at the moment of writing. # Make that this statement remains true also for stable, released # versions. # It will wrap lines (doesn't matter whether long or short) with a # trailing '\', as in: # # foo.o : \ # foo.c \ # foo.h \ # # It will put a trailing '\' even on the last line, and will use leading # spaces rather than leading tabs (at least since its commit 0394caf7 # "Emit spaces for -MD"). "$@" -MD -MF "$tmpdepfile" stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi rm -f "$depfile" # Each non-empty line is of the form 'foo.o : \' or ' dep.h \'. # We have to change lines of the first kind to '$object: \'. sed -e "s|.*:|$object :|" < "$tmpdepfile" > "$depfile" # And for each line of the second kind, we have to emit a 'dep.h:' # dummy dependency, to avoid the deleted-header problem. sed -n -e 's|^ *\(.*\) *\\$|\1:|p' < "$tmpdepfile" >> "$depfile" rm -f "$tmpdepfile" ;; ## The order of this option in the case statement is important, since the ## shell code in configure will try each of these formats in the order ## listed in this file. A plain '-MD' option would be understood by many ## compilers, so we must ensure this comes after the gcc and icc options. pgcc) # Portland's C compiler understands '-MD'. # Will always output deps to 'file.d' where file is the root name of the # source file under compilation, even if file resides in a subdirectory. # The object file name does not affect the name of the '.d' file. # pgcc 10.2 will output # foo.o: sub/foo.c sub/foo.h # and will wrap long lines using '\' : # foo.o: sub/foo.c ... \ # sub/foo.h ... \ # ... set_dir_from "$object" # Use the source, not the object, to determine the base name, since # that's sadly what pgcc will do too. set_base_from "$source" tmpdepfile=$base.d # For projects that build the same source file twice into different object # files, the pgcc approach of using the *source* file root name can cause # problems in parallel builds. Use a locking strategy to avoid stomping on # the same $tmpdepfile. lockdir=$base.d-lock trap " echo '$0: caught signal, cleaning up...' >&2 rmdir '$lockdir' exit 1 " 1 2 13 15 numtries=100 i=$numtries while test $i -gt 0; do # mkdir is a portable test-and-set. if mkdir "$lockdir" 2>/dev/null; then # This process acquired the lock. "$@" -MD stat=$? # Release the lock. rmdir "$lockdir" break else # If the lock is being held by a different process, wait # until the winning process is done or we timeout. while test -d "$lockdir" && test $i -gt 0; do sleep 1 i=`expr $i - 1` done fi i=`expr $i - 1` done trap - 1 2 13 15 if test $i -le 0; then echo "$0: failed to acquire lock after $numtries attempts" >&2 echo "$0: check lockdir '$lockdir'" >&2 exit 1 fi if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi rm -f "$depfile" # Each line is of the form `foo.o: dependent.h', # or `foo.o: dep1.h dep2.h \', or ` dep3.h dep4.h \'. # Do two passes, one to just change these to # `$object: dependent.h' and one to simply `dependent.h:'. sed "s,^[^:]*:,$object :," < "$tmpdepfile" > "$depfile" # Some versions of the HPUX 10.20 sed can't process this invocation # correctly. Breaking it into two sed invocations is a workaround. sed 's,^[^:]*: \(.*\)$,\1,;s/^\\$//;/^$/d;/:$/d' < "$tmpdepfile" \ | sed -e 's/$/ :/' >> "$depfile" rm -f "$tmpdepfile" ;; hp2) # The "hp" stanza above does not work with aCC (C++) and HP's ia64 # compilers, which have integrated preprocessors. The correct option # to use with these is +Maked; it writes dependencies to a file named # 'foo.d', which lands next to the object file, wherever that # happens to be. # Much of this is similar to the tru64 case; see comments there. set_dir_from "$object" set_base_from "$object" if test "$libtool" = yes; then tmpdepfile1=$dir$base.d tmpdepfile2=$dir.libs/$base.d "$@" -Wc,+Maked else tmpdepfile1=$dir$base.d tmpdepfile2=$dir$base.d "$@" +Maked fi stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile1" "$tmpdepfile2" exit $stat fi for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" do test -f "$tmpdepfile" && break done if test -f "$tmpdepfile"; then sed -e "s,^.*\.[$lower]*:,$object:," "$tmpdepfile" > "$depfile" # Add 'dependent.h:' lines. sed -ne '2,${ s/^ *// s/ \\*$// s/$/:/ p }' "$tmpdepfile" >> "$depfile" else make_dummy_depfile fi rm -f "$tmpdepfile" "$tmpdepfile2" ;; tru64) # The Tru64 compiler uses -MD to generate dependencies as a side # effect. 'cc -MD -o foo.o ...' puts the dependencies into 'foo.o.d'. # At least on Alpha/Redhat 6.1, Compaq CCC V6.2-504 seems to put # dependencies in 'foo.d' instead, so we check for that too. # Subdirectories are respected. set_dir_from "$object" set_base_from "$object" if test "$libtool" = yes; then # Libtool generates 2 separate objects for the 2 libraries. These # two compilations output dependencies in $dir.libs/$base.o.d and # in $dir$base.o.d. We have to check for both files, because # one of the two compilations can be disabled. We should prefer # $dir$base.o.d over $dir.libs/$base.o.d because the latter is # automatically cleaned when .libs/ is deleted, while ignoring # the former would cause a distcleancheck panic. tmpdepfile1=$dir$base.o.d # libtool 1.5 tmpdepfile2=$dir.libs/$base.o.d # Likewise. tmpdepfile3=$dir.libs/$base.d # Compaq CCC V6.2-504 "$@" -Wc,-MD else tmpdepfile1=$dir$base.d tmpdepfile2=$dir$base.d tmpdepfile3=$dir$base.d "$@" -MD fi stat=$? if test $stat -ne 0; then rm -f "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" exit $stat fi for tmpdepfile in "$tmpdepfile1" "$tmpdepfile2" "$tmpdepfile3" do test -f "$tmpdepfile" && break done # Same post-processing that is required for AIX mode. aix_post_process_depfile ;; msvc7) if test "$libtool" = yes; then showIncludes=-Wc,-showIncludes else showIncludes=-showIncludes fi "$@" $showIncludes > "$tmpdepfile" stat=$? grep -v '^Note: including file: ' "$tmpdepfile" if test $stat -ne 0; then rm -f "$tmpdepfile" exit $stat fi rm -f "$depfile" echo "$object : \\" > "$depfile" # The first sed program below extracts the file names and escapes # backslashes for cygpath. The second sed program outputs the file # name when reading, but also accumulates all include files in the # hold buffer in order to output them again at the end. This only # works with sed implementations that can handle large buffers. sed < "$tmpdepfile" -n ' /^Note: including file: *\(.*\)/ { s//\1/ s/\\/\\\\/g p }' | $cygpath_u | sort -u | sed -n ' s/ /\\ /g s/\(.*\)/'"$tab"'\1 \\/p s/.\(.*\) \\/\1:/ H $ { s/.*/'"$tab"'/ G p }' >> "$depfile" echo >> "$depfile" # make sure the fragment doesn't end with a backslash rm -f "$tmpdepfile" ;; msvc7msys) # This case exists only to let depend.m4 do its work. It works by # looking at the text of this script. This case will never be run, # since it is checked for above. exit 1 ;; #nosideeffect) # This comment above is used by automake to tell side-effect # dependency tracking mechanisms from slower ones. dashmstdout) # Important note: in order to support this mode, a compiler *must* # always write the preprocessed file to stdout, regardless of -o. "$@" || exit $? # Remove the call to Libtool. if test "$libtool" = yes; then while test "X$1" != 'X--mode=compile'; do shift done shift fi # Remove '-o $object'. IFS=" " for arg do case $arg in -o) shift ;; $object) shift ;; *) set fnord "$@" "$arg" shift # fnord shift # $arg ;; esac done test -z "$dashmflag" && dashmflag=-M # Require at least two characters before searching for ':' # in the target name. This is to cope with DOS-style filenames: # a dependency such as 'c:/foo/bar' could be seen as target 'c' otherwise. "$@" $dashmflag | sed "s|^[$tab ]*[^:$tab ][^:][^:]*:[$tab ]*|$object: |" > "$tmpdepfile" rm -f "$depfile" cat < "$tmpdepfile" > "$depfile" # Some versions of the HPUX 10.20 sed can't process this sed invocation # correctly. Breaking it into two sed invocations is a workaround. tr ' ' "$nl" < "$tmpdepfile" \ | sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \ | sed -e 's/$/ :/' >> "$depfile" rm -f "$tmpdepfile" ;; dashXmstdout) # This case only exists to satisfy depend.m4. It is never actually # run, as this mode is specially recognized in the preamble. exit 1 ;; makedepend) "$@" || exit $? # Remove any Libtool call if test "$libtool" = yes; then while test "X$1" != 'X--mode=compile'; do shift done shift fi # X makedepend shift cleared=no eat=no for arg do case $cleared in no) set ""; shift cleared=yes ;; esac if test $eat = yes; then eat=no continue fi case "$arg" in -D*|-I*) set fnord "$@" "$arg"; shift ;; # Strip any option that makedepend may not understand. Remove # the object too, otherwise makedepend will parse it as a source file. -arch) eat=yes ;; -*|$object) ;; *) set fnord "$@" "$arg"; shift ;; esac done obj_suffix=`echo "$object" | sed 's/^.*\././'` touch "$tmpdepfile" ${MAKEDEPEND-makedepend} -o"$obj_suffix" -f"$tmpdepfile" "$@" rm -f "$depfile" # makedepend may prepend the VPATH from the source file name to the object. # No need to regex-escape $object, excess matching of '.' is harmless. sed "s|^.*\($object *:\)|\1|" "$tmpdepfile" > "$depfile" # Some versions of the HPUX 10.20 sed can't process the last invocation # correctly. Breaking it into two sed invocations is a workaround. sed '1,2d' "$tmpdepfile" \ | tr ' ' "$nl" \ | sed -e 's/^\\$//' -e '/^$/d' -e '/:$/d' \ | sed -e 's/$/ :/' >> "$depfile" rm -f "$tmpdepfile" "$tmpdepfile".bak ;; cpp) # Important note: in order to support this mode, a compiler *must* # always write the preprocessed file to stdout. "$@" || exit $? # Remove the call to Libtool. if test "$libtool" = yes; then while test "X$1" != 'X--mode=compile'; do shift done shift fi # Remove '-o $object'. IFS=" " for arg do case $arg in -o) shift ;; $object) shift ;; *) set fnord "$@" "$arg" shift # fnord shift # $arg ;; esac done "$@" -E \ | sed -n -e '/^# [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \ -e '/^#line [0-9][0-9]* "\([^"]*\)".*/ s:: \1 \\:p' \ | sed '$ s: \\$::' > "$tmpdepfile" rm -f "$depfile" echo "$object : \\" > "$depfile" cat < "$tmpdepfile" >> "$depfile" sed < "$tmpdepfile" '/^$/d;s/^ //;s/ \\$//;s/$/ :/' >> "$depfile" rm -f "$tmpdepfile" ;; msvisualcpp) # Important note: in order to support this mode, a compiler *must* # always write the preprocessed file to stdout. "$@" || exit $? # Remove the call to Libtool. if test "$libtool" = yes; then while test "X$1" != 'X--mode=compile'; do shift done shift fi IFS=" " for arg do case "$arg" in -o) shift ;; $object) shift ;; "-Gm"|"/Gm"|"-Gi"|"/Gi"|"-ZI"|"/ZI") set fnord "$@" shift shift ;; *) set fnord "$@" "$arg" shift shift ;; esac done "$@" -E 2>/dev/null | sed -n '/^#line [0-9][0-9]* "\([^"]*\)"/ s::\1:p' | $cygpath_u | sort -u > "$tmpdepfile" rm -f "$depfile" echo "$object : \\" > "$depfile" sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::'"$tab"'\1 \\:p' >> "$depfile" echo "$tab" >> "$depfile" sed < "$tmpdepfile" -n -e 's% %\\ %g' -e '/^\(.*\)$/ s::\1\::p' >> "$depfile" rm -f "$tmpdepfile" ;; msvcmsys) # This case exists only to let depend.m4 do its work. It works by # looking at the text of this script. This case will never be run, # since it is checked for above. exit 1 ;; none) exec "$@" ;; *) echo "Unknown depmode $depmode" 1>&2 exit 1 ;; esac exit 0 # Local Variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC0" # time-stamp-end: "; # UTC" # End: libffcall-2.5/build-aux/config.guess0000775000000000000000000014306714657156076014435 00000000000000#! /bin/sh # Attempt to guess a canonical system name. # Copyright 1992-2024 Free Software Foundation, Inc. # shellcheck disable=SC2006,SC2268 # see below for rationale timestamp='2024-07-27' # This file is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, see . # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that # program. This Exception is an additional permission under section 7 # of the GNU General Public License, version 3 ("GPLv3"). # # Originally written by Per Bothner; maintained since 2000 by Ben Elliston. # # You can get the latest version of this script from: # https://git.savannah.gnu.org/cgit/config.git/plain/config.guess # # Please send patches to . # The "shellcheck disable" line above the timestamp inhibits complaints # about features and limitations of the classic Bourne shell that were # superseded or lifted in POSIX. However, this script identifies a wide # variety of pre-POSIX systems that do not have POSIX shells at all, and # even some reasonably current systems (Solaris 10 as case-in-point) still # have a pre-POSIX /bin/sh. me=`echo "$0" | sed -e 's,.*/,,'` usage="\ Usage: $0 [OPTION] Output the configuration name of the system '$me' is run on. Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit Report bugs and patches to ." version="\ GNU config.guess ($timestamp) Originally written by Per Bothner. Copyright 1992-2024 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." help=" Try '$me --help' for more information." # Parse command line while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) echo "$timestamp" ; exit ;; --version | -v ) echo "$version" ; exit ;; --help | --h* | -h ) echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) echo "$me: invalid option $1$help" >&2 exit 1 ;; * ) break ;; esac done if test $# != 0; then echo "$me: too many arguments$help" >&2 exit 1 fi # Just in case it came from the environment. GUESS= # CC_FOR_BUILD -- compiler used by this script. Note that the use of a # compiler to aid in system detection is discouraged as it requires # temporary files to be created and, as you can see below, it is a # headache to deal with in a portable fashion. # Historically, 'CC_FOR_BUILD' used to be named 'HOST_CC'. We still # use 'HOST_CC' if defined, but it is deprecated. # Portable tmp directory creation inspired by the Autoconf team. tmp= # shellcheck disable=SC2172 trap 'test -z "$tmp" || rm -fr "$tmp"' 0 1 2 13 15 set_cc_for_build() { # prevent multiple calls if $tmp is already set test "$tmp" && return 0 : "${TMPDIR=/tmp}" # shellcheck disable=SC2039,SC3028 { tmp=`(umask 077 && mktemp -d "$TMPDIR/cgXXXXXX") 2>/dev/null` && test -n "$tmp" && test -d "$tmp" ; } || { test -n "$RANDOM" && tmp=$TMPDIR/cg$$-$RANDOM && (umask 077 && mkdir "$tmp" 2>/dev/null) ; } || { tmp=$TMPDIR/cg-$$ && (umask 077 && mkdir "$tmp" 2>/dev/null) && echo "Warning: creating insecure temp directory" >&2 ; } || { echo "$me: cannot create a temporary directory in $TMPDIR" >&2 ; exit 1 ; } dummy=$tmp/dummy case ${CC_FOR_BUILD-},${HOST_CC-},${CC-} in ,,) echo "int x;" > "$dummy.c" for driver in cc gcc c17 c99 c89 ; do if ($driver -c -o "$dummy.o" "$dummy.c") >/dev/null 2>&1 ; then CC_FOR_BUILD=$driver break fi done if test x"$CC_FOR_BUILD" = x ; then CC_FOR_BUILD=no_compiler_found fi ;; ,,*) CC_FOR_BUILD=$CC ;; ,*,*) CC_FOR_BUILD=$HOST_CC ;; esac } # This is needed to find uname on a Pyramid OSx when run in the BSD universe. # (ghazi@noc.rutgers.edu 1994-08-24) if test -f /.attbin/uname ; then PATH=$PATH:/.attbin ; export PATH fi UNAME_MACHINE=`(uname -m) 2>/dev/null` || UNAME_MACHINE=unknown UNAME_RELEASE=`(uname -r) 2>/dev/null` || UNAME_RELEASE=unknown UNAME_SYSTEM=`(uname -s) 2>/dev/null` || UNAME_SYSTEM=unknown UNAME_VERSION=`(uname -v) 2>/dev/null` || UNAME_VERSION=unknown case $UNAME_SYSTEM in Linux|GNU|GNU/*) LIBC=unknown set_cc_for_build cat <<-EOF > "$dummy.c" #if defined(__ANDROID__) LIBC=android #else #include #if defined(__UCLIBC__) LIBC=uclibc #elif defined(__dietlibc__) LIBC=dietlibc #elif defined(__GLIBC__) LIBC=gnu #elif defined(__LLVM_LIBC__) LIBC=llvm #else #include /* First heuristic to detect musl libc. */ #ifdef __DEFINED_va_list LIBC=musl #endif #endif #endif EOF cc_set_libc=`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^LIBC' | sed 's, ,,g'` eval "$cc_set_libc" # Second heuristic to detect musl libc. if [ "$LIBC" = unknown ] && command -v ldd >/dev/null && ldd --version 2>&1 | grep -q ^musl; then LIBC=musl fi # If the system lacks a compiler, then just pick glibc. # We could probably try harder. if [ "$LIBC" = unknown ]; then LIBC=gnu fi ;; esac # Note: order is significant - the case branches are not exclusive. case $UNAME_MACHINE:$UNAME_SYSTEM:$UNAME_RELEASE:$UNAME_VERSION in *:NetBSD:*:*) # NetBSD (nbsd) targets should (where applicable) match one or # more of the tuples: *-*-netbsdelf*, *-*-netbsdaout*, # *-*-netbsdecoff* and *-*-netbsd*. For targets that recently # switched to ELF, *-*-netbsd* would select the old # object file format. This provides both forward # compatibility and a consistent mechanism for selecting the # object file format. # # Note: NetBSD doesn't particularly care about the vendor # portion of the name. We always set it to "unknown". UNAME_MACHINE_ARCH=`(uname -p 2>/dev/null || \ /sbin/sysctl -n hw.machine_arch 2>/dev/null || \ /usr/sbin/sysctl -n hw.machine_arch 2>/dev/null || \ echo unknown)` case $UNAME_MACHINE_ARCH in aarch64eb) machine=aarch64_be-unknown ;; armeb) machine=armeb-unknown ;; arm*) machine=arm-unknown ;; sh3el) machine=shl-unknown ;; sh3eb) machine=sh-unknown ;; sh5el) machine=sh5le-unknown ;; earmv*) arch=`echo "$UNAME_MACHINE_ARCH" | sed -e 's,^e\(armv[0-9]\).*$,\1,'` endian=`echo "$UNAME_MACHINE_ARCH" | sed -ne 's,^.*\(eb\)$,\1,p'` machine=${arch}${endian}-unknown ;; *) machine=$UNAME_MACHINE_ARCH-unknown ;; esac # The Operating System including object format, if it has switched # to ELF recently (or will in the future) and ABI. case $UNAME_MACHINE_ARCH in earm*) os=netbsdelf ;; arm*|i386|m68k|ns32k|sh3*|sparc|vax) set_cc_for_build if echo __ELF__ | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ELF__ then # Once all utilities can be ECOFF (netbsdecoff) or a.out (netbsdaout). # Return netbsd for either. FIX? os=netbsd else os=netbsdelf fi ;; *) os=netbsd ;; esac # Determine ABI tags. case $UNAME_MACHINE_ARCH in earm*) expr='s/^earmv[0-9]/-eabi/;s/eb$//' abi=`echo "$UNAME_MACHINE_ARCH" | sed -e "$expr"` ;; esac # The OS release # Debian GNU/NetBSD machines have a different userland, and # thus, need a distinct triplet. However, they do not need # kernel version information, so it can be replaced with a # suitable tag, in the style of linux-gnu. case $UNAME_VERSION in Debian*) release='-gnu' ;; *) release=`echo "$UNAME_RELEASE" | sed -e 's/[-_].*//' | cut -d. -f1,2` ;; esac # Since CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM: # contains redundant information, the shorter form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM is used. GUESS=$machine-${os}${release}${abi-} ;; *:Bitrig:*:*) UNAME_MACHINE_ARCH=`arch | sed 's/Bitrig.//'` GUESS=$UNAME_MACHINE_ARCH-unknown-bitrig$UNAME_RELEASE ;; *:OpenBSD:*:*) UNAME_MACHINE_ARCH=`arch | sed 's/OpenBSD.//'` GUESS=$UNAME_MACHINE_ARCH-unknown-openbsd$UNAME_RELEASE ;; *:SecBSD:*:*) UNAME_MACHINE_ARCH=`arch | sed 's/SecBSD.//'` GUESS=$UNAME_MACHINE_ARCH-unknown-secbsd$UNAME_RELEASE ;; *:LibertyBSD:*:*) UNAME_MACHINE_ARCH=`arch | sed 's/^.*BSD\.//'` GUESS=$UNAME_MACHINE_ARCH-unknown-libertybsd$UNAME_RELEASE ;; *:MidnightBSD:*:*) GUESS=$UNAME_MACHINE-unknown-midnightbsd$UNAME_RELEASE ;; *:ekkoBSD:*:*) GUESS=$UNAME_MACHINE-unknown-ekkobsd$UNAME_RELEASE ;; *:SolidBSD:*:*) GUESS=$UNAME_MACHINE-unknown-solidbsd$UNAME_RELEASE ;; *:OS108:*:*) GUESS=$UNAME_MACHINE-unknown-os108_$UNAME_RELEASE ;; macppc:MirBSD:*:*) GUESS=powerpc-unknown-mirbsd$UNAME_RELEASE ;; *:MirBSD:*:*) GUESS=$UNAME_MACHINE-unknown-mirbsd$UNAME_RELEASE ;; *:Sortix:*:*) GUESS=$UNAME_MACHINE-unknown-sortix ;; *:Twizzler:*:*) GUESS=$UNAME_MACHINE-unknown-twizzler ;; *:Redox:*:*) GUESS=$UNAME_MACHINE-unknown-redox ;; mips:OSF1:*.*) GUESS=mips-dec-osf1 ;; alpha:OSF1:*:*) # Reset EXIT trap before exiting to avoid spurious non-zero exit code. trap '' 0 case $UNAME_RELEASE in *4.0) UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $3}'` ;; *5.*) UNAME_RELEASE=`/usr/sbin/sizer -v | awk '{print $4}'` ;; esac # According to Compaq, /usr/sbin/psrinfo has been available on # OSF/1 and Tru64 systems produced since 1995. I hope that # covers most systems running today. This code pipes the CPU # types through head -n 1, so we only detect the type of CPU 0. ALPHA_CPU_TYPE=`/usr/sbin/psrinfo -v | sed -n -e 's/^ The alpha \(.*\) processor.*$/\1/p' | head -n 1` case $ALPHA_CPU_TYPE in "EV4 (21064)") UNAME_MACHINE=alpha ;; "EV4.5 (21064)") UNAME_MACHINE=alpha ;; "LCA4 (21066/21068)") UNAME_MACHINE=alpha ;; "EV5 (21164)") UNAME_MACHINE=alphaev5 ;; "EV5.6 (21164A)") UNAME_MACHINE=alphaev56 ;; "EV5.6 (21164PC)") UNAME_MACHINE=alphapca56 ;; "EV5.7 (21164PC)") UNAME_MACHINE=alphapca57 ;; "EV6 (21264)") UNAME_MACHINE=alphaev6 ;; "EV6.7 (21264A)") UNAME_MACHINE=alphaev67 ;; "EV6.8CB (21264C)") UNAME_MACHINE=alphaev68 ;; "EV6.8AL (21264B)") UNAME_MACHINE=alphaev68 ;; "EV6.8CX (21264D)") UNAME_MACHINE=alphaev68 ;; "EV6.9A (21264/EV69A)") UNAME_MACHINE=alphaev69 ;; "EV7 (21364)") UNAME_MACHINE=alphaev7 ;; "EV7.9 (21364A)") UNAME_MACHINE=alphaev79 ;; esac # A Pn.n version is a patched version. # A Vn.n version is a released version. # A Tn.n version is a released field test version. # A Xn.n version is an unreleased experimental baselevel. # 1.2 uses "1.2" for uname -r. OSF_REL=`echo "$UNAME_RELEASE" | sed -e 's/^[PVTX]//' | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz` GUESS=$UNAME_MACHINE-dec-osf$OSF_REL ;; Amiga*:UNIX_System_V:4.0:*) GUESS=m68k-unknown-sysv4 ;; *:[Aa]miga[Oo][Ss]:*:*) GUESS=$UNAME_MACHINE-unknown-amigaos ;; *:[Mm]orph[Oo][Ss]:*:*) GUESS=$UNAME_MACHINE-unknown-morphos ;; *:OS/390:*:*) GUESS=i370-ibm-openedition ;; *:z/VM:*:*) GUESS=s390-ibm-zvmoe ;; *:OS400:*:*) GUESS=powerpc-ibm-os400 ;; arm:RISC*:1.[012]*:*|arm:riscix:1.[012]*:*) GUESS=arm-acorn-riscix$UNAME_RELEASE ;; arm*:riscos:*:*|arm*:RISCOS:*:*) GUESS=arm-unknown-riscos ;; SR2?01:HI-UX/MPP:*:* | SR8000:HI-UX/MPP:*:*) GUESS=hppa1.1-hitachi-hiuxmpp ;; Pyramid*:OSx*:*:* | MIS*:OSx*:*:* | MIS*:SMP_DC-OSx*:*:*) # akee@wpdis03.wpafb.af.mil (Earle F. Ake) contributed MIS and NILE. case `(/bin/universe) 2>/dev/null` in att) GUESS=pyramid-pyramid-sysv3 ;; *) GUESS=pyramid-pyramid-bsd ;; esac ;; NILE*:*:*:dcosx) GUESS=pyramid-pyramid-svr4 ;; DRS?6000:unix:4.0:6*) GUESS=sparc-icl-nx6 ;; DRS?6000:UNIX_SV:4.2*:7* | DRS?6000:isis:4.2*:7*) case `/usr/bin/uname -p` in sparc) GUESS=sparc-icl-nx7 ;; esac ;; s390x:SunOS:*:*) SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=$UNAME_MACHINE-ibm-solaris2$SUN_REL ;; sun4H:SunOS:5.*:*) SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=sparc-hal-solaris2$SUN_REL ;; sun4*:SunOS:5.*:* | tadpole*:SunOS:5.*:*) SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=sparc-sun-solaris2$SUN_REL ;; i86pc:AuroraUX:5.*:* | i86xen:AuroraUX:5.*:*) GUESS=i386-pc-auroraux$UNAME_RELEASE ;; i86pc:SunOS:5.*:* | i86xen:SunOS:5.*:*) set_cc_for_build SUN_ARCH=i386 # If there is a compiler, see if it is configured for 64-bit objects. # Note that the Sun cc does not turn __LP64__ into 1 like gcc does. # This test works for both compilers. if test "$CC_FOR_BUILD" != no_compiler_found; then if (echo '#ifdef __amd64'; echo IS_64BIT_ARCH; echo '#endif') | \ (CCOPTS="" $CC_FOR_BUILD -m64 -E - 2>/dev/null) | \ grep IS_64BIT_ARCH >/dev/null then SUN_ARCH=x86_64 fi fi SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=$SUN_ARCH-pc-solaris2$SUN_REL ;; sun4*:SunOS:6*:*) # According to config.sub, this is the proper way to canonicalize # SunOS6. Hard to guess exactly what SunOS6 will be like, but # it's likely to be more like Solaris than SunOS4. SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=sparc-sun-solaris3$SUN_REL ;; sun4*:SunOS:*:*) case `/usr/bin/arch -k` in Series*|S4*) UNAME_RELEASE=`uname -v` ;; esac # Japanese Language versions have a version number like '4.1.3-JL'. SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/-/_/'` GUESS=sparc-sun-sunos$SUN_REL ;; sun3*:SunOS:*:*) GUESS=m68k-sun-sunos$UNAME_RELEASE ;; sun*:*:4.2BSD:*) UNAME_RELEASE=`(sed 1q /etc/motd | awk '{print substr($5,1,3)}') 2>/dev/null` test "x$UNAME_RELEASE" = x && UNAME_RELEASE=3 case `/bin/arch` in sun3) GUESS=m68k-sun-sunos$UNAME_RELEASE ;; sun4) GUESS=sparc-sun-sunos$UNAME_RELEASE ;; esac ;; aushp:SunOS:*:*) GUESS=sparc-auspex-sunos$UNAME_RELEASE ;; # The situation for MiNT is a little confusing. The machine name # can be virtually everything (everything which is not # "atarist" or "atariste" at least should have a processor # > m68000). The system name ranges from "MiNT" over "FreeMiNT" # to the lowercase version "mint" (or "freemint"). Finally # the system name "TOS" denotes a system which is actually not # MiNT. But MiNT is downward compatible to TOS, so this should # be no problem. atarist[e]:*MiNT:*:* | atarist[e]:*mint:*:* | atarist[e]:*TOS:*:*) GUESS=m68k-atari-mint$UNAME_RELEASE ;; atari*:*MiNT:*:* | atari*:*mint:*:* | atarist[e]:*TOS:*:*) GUESS=m68k-atari-mint$UNAME_RELEASE ;; *falcon*:*MiNT:*:* | *falcon*:*mint:*:* | *falcon*:*TOS:*:*) GUESS=m68k-atari-mint$UNAME_RELEASE ;; milan*:*MiNT:*:* | milan*:*mint:*:* | *milan*:*TOS:*:*) GUESS=m68k-milan-mint$UNAME_RELEASE ;; hades*:*MiNT:*:* | hades*:*mint:*:* | *hades*:*TOS:*:*) GUESS=m68k-hades-mint$UNAME_RELEASE ;; *:*MiNT:*:* | *:*mint:*:* | *:*TOS:*:*) GUESS=m68k-unknown-mint$UNAME_RELEASE ;; m68k:machten:*:*) GUESS=m68k-apple-machten$UNAME_RELEASE ;; powerpc:machten:*:*) GUESS=powerpc-apple-machten$UNAME_RELEASE ;; RISC*:Mach:*:*) GUESS=mips-dec-mach_bsd4.3 ;; RISC*:ULTRIX:*:*) GUESS=mips-dec-ultrix$UNAME_RELEASE ;; VAX*:ULTRIX*:*:*) GUESS=vax-dec-ultrix$UNAME_RELEASE ;; 2020:CLIX:*:* | 2430:CLIX:*:*) GUESS=clipper-intergraph-clix$UNAME_RELEASE ;; mips:*:*:UMIPS | mips:*:*:RISCos) set_cc_for_build sed 's/^ //' << EOF > "$dummy.c" #ifdef __cplusplus #include /* for printf() prototype */ int main (int argc, char *argv[]) { #else int main (argc, argv) int argc; char *argv[]; { #endif #if defined (host_mips) && defined (MIPSEB) #if defined (SYSTYPE_SYSV) printf ("mips-mips-riscos%ssysv\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_SVR4) printf ("mips-mips-riscos%ssvr4\\n", argv[1]); exit (0); #endif #if defined (SYSTYPE_BSD43) || defined(SYSTYPE_BSD) printf ("mips-mips-riscos%sbsd\\n", argv[1]); exit (0); #endif #endif exit (-1); } EOF $CC_FOR_BUILD -o "$dummy" "$dummy.c" && dummyarg=`echo "$UNAME_RELEASE" | sed -n 's/\([0-9]*\).*/\1/p'` && SYSTEM_NAME=`"$dummy" "$dummyarg"` && { echo "$SYSTEM_NAME"; exit; } GUESS=mips-mips-riscos$UNAME_RELEASE ;; Motorola:PowerMAX_OS:*:*) GUESS=powerpc-motorola-powermax ;; Motorola:*:4.3:PL8-*) GUESS=powerpc-harris-powermax ;; Night_Hawk:*:*:PowerMAX_OS | Synergy:PowerMAX_OS:*:*) GUESS=powerpc-harris-powermax ;; Night_Hawk:Power_UNIX:*:*) GUESS=powerpc-harris-powerunix ;; m88k:CX/UX:7*:*) GUESS=m88k-harris-cxux7 ;; m88k:*:4*:R4*) GUESS=m88k-motorola-sysv4 ;; m88k:*:3*:R3*) GUESS=m88k-motorola-sysv3 ;; AViiON:dgux:*:*) # DG/UX returns AViiON for all architectures UNAME_PROCESSOR=`/usr/bin/uname -p` if test "$UNAME_PROCESSOR" = mc88100 || test "$UNAME_PROCESSOR" = mc88110 then if test "$TARGET_BINARY_INTERFACE"x = m88kdguxelfx || \ test "$TARGET_BINARY_INTERFACE"x = x then GUESS=m88k-dg-dgux$UNAME_RELEASE else GUESS=m88k-dg-dguxbcs$UNAME_RELEASE fi else GUESS=i586-dg-dgux$UNAME_RELEASE fi ;; M88*:DolphinOS:*:*) # DolphinOS (SVR3) GUESS=m88k-dolphin-sysv3 ;; M88*:*:R3*:*) # Delta 88k system running SVR3 GUESS=m88k-motorola-sysv3 ;; XD88*:*:*:*) # Tektronix XD88 system running UTekV (SVR3) GUESS=m88k-tektronix-sysv3 ;; Tek43[0-9][0-9]:UTek:*:*) # Tektronix 4300 system running UTek (BSD) GUESS=m68k-tektronix-bsd ;; *:IRIX*:*:*) IRIX_REL=`echo "$UNAME_RELEASE" | sed -e 's/-/_/g'` GUESS=mips-sgi-irix$IRIX_REL ;; ????????:AIX?:[12].1:2) # AIX 2.2.1 or AIX 2.1.1 is RT/PC AIX. GUESS=romp-ibm-aix # uname -m gives an 8 hex-code CPU id ;; # Note that: echo "'`uname -s`'" gives 'AIX ' i*86:AIX:*:*) GUESS=i386-ibm-aix ;; ia64:AIX:*:*) if test -x /usr/bin/oslevel ; then IBM_REV=`/usr/bin/oslevel` else IBM_REV=$UNAME_VERSION.$UNAME_RELEASE fi GUESS=$UNAME_MACHINE-ibm-aix$IBM_REV ;; *:AIX:2:3) if grep bos325 /usr/include/stdio.h >/dev/null 2>&1; then set_cc_for_build sed 's/^ //' << EOF > "$dummy.c" #include int main () { if (!__power_pc()) exit(1); puts("powerpc-ibm-aix3.2.5"); exit(0); } EOF if $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` then GUESS=$SYSTEM_NAME else GUESS=rs6000-ibm-aix3.2.5 fi elif grep bos324 /usr/include/stdio.h >/dev/null 2>&1; then GUESS=rs6000-ibm-aix3.2.4 else GUESS=rs6000-ibm-aix3.2 fi ;; *:AIX:*:[4567]) IBM_CPU_ID=`/usr/sbin/lsdev -C -c processor -S available | sed 1q | awk '{ print $1 }'` if /usr/sbin/lsattr -El "$IBM_CPU_ID" | grep ' POWER' >/dev/null 2>&1; then IBM_ARCH=rs6000 else IBM_ARCH=powerpc fi if test -x /usr/bin/lslpp ; then IBM_REV=`/usr/bin/lslpp -Lqc bos.rte.libc | \ awk -F: '{ print $3 }' | sed s/[0-9]*$/0/` else IBM_REV=$UNAME_VERSION.$UNAME_RELEASE fi GUESS=$IBM_ARCH-ibm-aix$IBM_REV ;; *:AIX:*:*) GUESS=rs6000-ibm-aix ;; ibmrt:4.4BSD:*|romp-ibm:4.4BSD:*) GUESS=romp-ibm-bsd4.4 ;; ibmrt:*BSD:*|romp-ibm:BSD:*) # covers RT/PC BSD and GUESS=romp-ibm-bsd$UNAME_RELEASE # 4.3 with uname added to ;; # report: romp-ibm BSD 4.3 *:BOSX:*:*) GUESS=rs6000-bull-bosx ;; DPX/2?00:B.O.S.:*:*) GUESS=m68k-bull-sysv3 ;; 9000/[34]??:4.3bsd:1.*:*) GUESS=m68k-hp-bsd ;; hp300:4.4BSD:*:* | 9000/[34]??:4.3bsd:2.*:*) GUESS=m68k-hp-bsd4.4 ;; 9000/[34678]??:HP-UX:*:*) HPUX_REV=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*.[0B]*//'` case $UNAME_MACHINE in 9000/31?) HP_ARCH=m68000 ;; 9000/[34]??) HP_ARCH=m68k ;; 9000/[678][0-9][0-9]) if test -x /usr/bin/getconf; then sc_cpu_version=`/usr/bin/getconf SC_CPU_VERSION 2>/dev/null` sc_kernel_bits=`/usr/bin/getconf SC_KERNEL_BITS 2>/dev/null` case $sc_cpu_version in 523) HP_ARCH=hppa1.0 ;; # CPU_PA_RISC1_0 528) HP_ARCH=hppa1.1 ;; # CPU_PA_RISC1_1 532) # CPU_PA_RISC2_0 case $sc_kernel_bits in 32) HP_ARCH=hppa2.0n ;; 64) HP_ARCH=hppa2.0w ;; '') HP_ARCH=hppa2.0 ;; # HP-UX 10.20 esac ;; esac fi if test "$HP_ARCH" = ""; then set_cc_for_build sed 's/^ //' << EOF > "$dummy.c" #define _HPUX_SOURCE #include #include int main () { #if defined(_SC_KERNEL_BITS) long bits = sysconf(_SC_KERNEL_BITS); #endif long cpu = sysconf (_SC_CPU_VERSION); switch (cpu) { case CPU_PA_RISC1_0: puts ("hppa1.0"); break; case CPU_PA_RISC1_1: puts ("hppa1.1"); break; case CPU_PA_RISC2_0: #if defined(_SC_KERNEL_BITS) switch (bits) { case 64: puts ("hppa2.0w"); break; case 32: puts ("hppa2.0n"); break; default: puts ("hppa2.0"); break; } break; #else /* !defined(_SC_KERNEL_BITS) */ puts ("hppa2.0"); break; #endif default: puts ("hppa1.0"); break; } exit (0); } EOF (CCOPTS="" $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null) && HP_ARCH=`"$dummy"` test -z "$HP_ARCH" && HP_ARCH=hppa fi ;; esac if test "$HP_ARCH" = hppa2.0w then set_cc_for_build # hppa2.0w-hp-hpux* has a 64-bit kernel and a compiler generating # 32-bit code. hppa64-hp-hpux* has the same kernel and a compiler # generating 64-bit code. GNU and HP use different nomenclature: # # $ CC_FOR_BUILD=cc ./config.guess # => hppa2.0w-hp-hpux11.23 # $ CC_FOR_BUILD="cc +DA2.0w" ./config.guess # => hppa64-hp-hpux11.23 if echo __LP64__ | (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | grep -q __LP64__ then HP_ARCH=hppa2.0w else HP_ARCH=hppa64 fi fi GUESS=$HP_ARCH-hp-hpux$HPUX_REV ;; ia64:HP-UX:*:*) HPUX_REV=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*.[0B]*//'` GUESS=ia64-hp-hpux$HPUX_REV ;; 3050*:HI-UX:*:*) set_cc_for_build sed 's/^ //' << EOF > "$dummy.c" #include int main () { long cpu = sysconf (_SC_CPU_VERSION); /* The order matters, because CPU_IS_HP_MC68K erroneously returns true for CPU_PA_RISC1_0. CPU_IS_PA_RISC returns correct results, however. */ if (CPU_IS_PA_RISC (cpu)) { switch (cpu) { case CPU_PA_RISC1_0: puts ("hppa1.0-hitachi-hiuxwe2"); break; case CPU_PA_RISC1_1: puts ("hppa1.1-hitachi-hiuxwe2"); break; case CPU_PA_RISC2_0: puts ("hppa2.0-hitachi-hiuxwe2"); break; default: puts ("hppa-hitachi-hiuxwe2"); break; } } else if (CPU_IS_HP_MC68K (cpu)) puts ("m68k-hitachi-hiuxwe2"); else puts ("unknown-hitachi-hiuxwe2"); exit (0); } EOF $CC_FOR_BUILD -o "$dummy" "$dummy.c" && SYSTEM_NAME=`"$dummy"` && { echo "$SYSTEM_NAME"; exit; } GUESS=unknown-hitachi-hiuxwe2 ;; 9000/7??:4.3bsd:*:* | 9000/8?[79]:4.3bsd:*:*) GUESS=hppa1.1-hp-bsd ;; 9000/8??:4.3bsd:*:*) GUESS=hppa1.0-hp-bsd ;; *9??*:MPE/iX:*:* | *3000*:MPE/iX:*:*) GUESS=hppa1.0-hp-mpeix ;; hp7??:OSF1:*:* | hp8?[79]:OSF1:*:*) GUESS=hppa1.1-hp-osf ;; hp8??:OSF1:*:*) GUESS=hppa1.0-hp-osf ;; i*86:OSF1:*:*) if test -x /usr/sbin/sysversion ; then GUESS=$UNAME_MACHINE-unknown-osf1mk else GUESS=$UNAME_MACHINE-unknown-osf1 fi ;; parisc*:Lites*:*:*) GUESS=hppa1.1-hp-lites ;; C1*:ConvexOS:*:* | convex:ConvexOS:C1*:*) GUESS=c1-convex-bsd ;; C2*:ConvexOS:*:* | convex:ConvexOS:C2*:*) if getsysinfo -f scalar_acc then echo c32-convex-bsd else echo c2-convex-bsd fi exit ;; C34*:ConvexOS:*:* | convex:ConvexOS:C34*:*) GUESS=c34-convex-bsd ;; C38*:ConvexOS:*:* | convex:ConvexOS:C38*:*) GUESS=c38-convex-bsd ;; C4*:ConvexOS:*:* | convex:ConvexOS:C4*:*) GUESS=c4-convex-bsd ;; CRAY*Y-MP:*:*:*) CRAY_REL=`echo "$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'` GUESS=ymp-cray-unicos$CRAY_REL ;; CRAY*[A-Z]90:*:*:*) echo "$UNAME_MACHINE"-cray-unicos"$UNAME_RELEASE" \ | sed -e 's/CRAY.*\([A-Z]90\)/\1/' \ -e y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/ \ -e 's/\.[^.]*$/.X/' exit ;; CRAY*TS:*:*:*) CRAY_REL=`echo "$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'` GUESS=t90-cray-unicos$CRAY_REL ;; CRAY*T3E:*:*:*) CRAY_REL=`echo "$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'` GUESS=alphaev5-cray-unicosmk$CRAY_REL ;; CRAY*SV1:*:*:*) CRAY_REL=`echo "$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'` GUESS=sv1-cray-unicos$CRAY_REL ;; *:UNICOS/mp:*:*) CRAY_REL=`echo "$UNAME_RELEASE" | sed -e 's/\.[^.]*$/.X/'` GUESS=craynv-cray-unicosmp$CRAY_REL ;; F30[01]:UNIX_System_V:*:* | F700:UNIX_System_V:*:*) FUJITSU_PROC=`uname -m | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz` FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` FUJITSU_REL=`echo "$UNAME_RELEASE" | sed -e 's/ /_/'` GUESS=${FUJITSU_PROC}-fujitsu-${FUJITSU_SYS}${FUJITSU_REL} ;; 5000:UNIX_System_V:4.*:*) FUJITSU_SYS=`uname -p | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/\///'` FUJITSU_REL=`echo "$UNAME_RELEASE" | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz | sed -e 's/ /_/'` GUESS=sparc-fujitsu-${FUJITSU_SYS}${FUJITSU_REL} ;; i*86:BSD/386:*:* | i*86:BSD/OS:*:* | *:Ascend\ Embedded/OS:*:*) GUESS=$UNAME_MACHINE-pc-bsdi$UNAME_RELEASE ;; sparc*:BSD/OS:*:*) GUESS=sparc-unknown-bsdi$UNAME_RELEASE ;; *:BSD/OS:*:*) GUESS=$UNAME_MACHINE-unknown-bsdi$UNAME_RELEASE ;; arm:FreeBSD:*:*) UNAME_PROCESSOR=`uname -p` set_cc_for_build if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ARM_PCS_VFP then FREEBSD_REL=`echo "$UNAME_RELEASE" | sed -e 's/[-(].*//'` GUESS=$UNAME_PROCESSOR-unknown-freebsd$FREEBSD_REL-gnueabi else FREEBSD_REL=`echo "$UNAME_RELEASE" | sed -e 's/[-(].*//'` GUESS=$UNAME_PROCESSOR-unknown-freebsd$FREEBSD_REL-gnueabihf fi ;; *:FreeBSD:*:*) UNAME_PROCESSOR=`uname -p` case $UNAME_PROCESSOR in amd64) UNAME_PROCESSOR=x86_64 ;; i386) UNAME_PROCESSOR=i586 ;; esac FREEBSD_REL=`echo "$UNAME_RELEASE" | sed -e 's/[-(].*//'` GUESS=$UNAME_PROCESSOR-unknown-freebsd$FREEBSD_REL ;; i*:CYGWIN*:*) GUESS=$UNAME_MACHINE-pc-cygwin ;; *:MINGW64*:*) GUESS=$UNAME_MACHINE-pc-mingw64 ;; *:MINGW*:*) GUESS=$UNAME_MACHINE-pc-mingw32 ;; *:MSYS*:*) GUESS=$UNAME_MACHINE-pc-msys ;; i*:PW*:*) GUESS=$UNAME_MACHINE-pc-pw32 ;; *:SerenityOS:*:*) GUESS=$UNAME_MACHINE-pc-serenity ;; *:Interix*:*) case $UNAME_MACHINE in x86) GUESS=i586-pc-interix$UNAME_RELEASE ;; authenticamd | genuineintel | EM64T) GUESS=x86_64-unknown-interix$UNAME_RELEASE ;; IA64) GUESS=ia64-unknown-interix$UNAME_RELEASE ;; esac ;; i*:UWIN*:*) GUESS=$UNAME_MACHINE-pc-uwin ;; amd64:CYGWIN*:*:* | x86_64:CYGWIN*:*:*) GUESS=x86_64-pc-cygwin ;; prep*:SunOS:5.*:*) SUN_REL=`echo "$UNAME_RELEASE" | sed -e 's/[^.]*//'` GUESS=powerpcle-unknown-solaris2$SUN_REL ;; *:GNU:*:*) # the GNU system GNU_ARCH=`echo "$UNAME_MACHINE" | sed -e 's,[-/].*$,,'` GNU_REL=`echo "$UNAME_RELEASE" | sed -e 's,/.*$,,'` GUESS=$GNU_ARCH-unknown-$LIBC$GNU_REL ;; *:GNU/*:*:*) # other systems with GNU libc and userland GNU_SYS=`echo "$UNAME_SYSTEM" | sed 's,^[^/]*/,,' | tr "[:upper:]" "[:lower:]"` GNU_REL=`echo "$UNAME_RELEASE" | sed -e 's/[-(].*//'` GUESS=$UNAME_MACHINE-unknown-$GNU_SYS$GNU_REL-$LIBC ;; x86_64:[Mm]anagarm:*:*|i?86:[Mm]anagarm:*:*) GUESS="$UNAME_MACHINE-pc-managarm-mlibc" ;; *:[Mm]anagarm:*:*) GUESS="$UNAME_MACHINE-unknown-managarm-mlibc" ;; *:Minix:*:*) GUESS=$UNAME_MACHINE-unknown-minix ;; aarch64:Linux:*:*) set_cc_for_build CPU=$UNAME_MACHINE LIBCABI=$LIBC if test "$CC_FOR_BUILD" != no_compiler_found; then ABI=64 sed 's/^ //' << EOF > "$dummy.c" #ifdef __ARM_EABI__ #ifdef __ARM_PCS_VFP ABI=eabihf #else ABI=eabi #endif #endif EOF cc_set_abi=`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^ABI' | sed 's, ,,g'` eval "$cc_set_abi" case $ABI in eabi | eabihf) CPU=armv8l; LIBCABI=$LIBC$ABI ;; esac fi GUESS=$CPU-unknown-linux-$LIBCABI ;; aarch64_be:Linux:*:*) UNAME_MACHINE=aarch64_be GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; alpha:Linux:*:*) case `sed -n '/^cpu model/s/^.*: \(.*\)/\1/p' /proc/cpuinfo 2>/dev/null` in EV5) UNAME_MACHINE=alphaev5 ;; EV56) UNAME_MACHINE=alphaev56 ;; PCA56) UNAME_MACHINE=alphapca56 ;; PCA57) UNAME_MACHINE=alphapca56 ;; EV6) UNAME_MACHINE=alphaev6 ;; EV67) UNAME_MACHINE=alphaev67 ;; EV68*) UNAME_MACHINE=alphaev68 ;; esac objdump --private-headers /bin/sh | grep -q ld.so.1 if test "$?" = 0 ; then LIBC=gnulibc1 ; fi GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; arc:Linux:*:* | arceb:Linux:*:* | arc32:Linux:*:* | arc64:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; arm*:Linux:*:*) set_cc_for_build if echo __ARM_EABI__ | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ARM_EABI__ then GUESS=$UNAME_MACHINE-unknown-linux-$LIBC else if echo __ARM_PCS_VFP | $CC_FOR_BUILD -E - 2>/dev/null \ | grep -q __ARM_PCS_VFP then GUESS=$UNAME_MACHINE-unknown-linux-${LIBC}eabi else GUESS=$UNAME_MACHINE-unknown-linux-${LIBC}eabihf fi fi ;; avr32*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; cris:Linux:*:*) GUESS=$UNAME_MACHINE-axis-linux-$LIBC ;; crisv32:Linux:*:*) GUESS=$UNAME_MACHINE-axis-linux-$LIBC ;; e2k:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; frv:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; hexagon:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; i*86:Linux:*:*) GUESS=$UNAME_MACHINE-pc-linux-$LIBC ;; ia64:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; k1om:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; kvx:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; kvx:cos:*:*) GUESS=$UNAME_MACHINE-unknown-cos ;; kvx:mbr:*:*) GUESS=$UNAME_MACHINE-unknown-mbr ;; loongarch32:Linux:*:* | loongarch64:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; m32r*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; m68*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; mips:Linux:*:* | mips64:Linux:*:*) set_cc_for_build IS_GLIBC=0 test x"${LIBC}" = xgnu && IS_GLIBC=1 sed 's/^ //' << EOF > "$dummy.c" #undef CPU #undef mips #undef mipsel #undef mips64 #undef mips64el #if ${IS_GLIBC} && defined(_ABI64) LIBCABI=gnuabi64 #else #if ${IS_GLIBC} && defined(_ABIN32) LIBCABI=gnuabin32 #else LIBCABI=${LIBC} #endif #endif #if ${IS_GLIBC} && defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 CPU=mipsisa64r6 #else #if ${IS_GLIBC} && !defined(__mips64) && defined(__mips_isa_rev) && __mips_isa_rev>=6 CPU=mipsisa32r6 #else #if defined(__mips64) CPU=mips64 #else CPU=mips #endif #endif #endif #if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL) || defined(MIPSEL) MIPS_ENDIAN=el #else #if defined(__MIPSEB__) || defined(__MIPSEB) || defined(_MIPSEB) || defined(MIPSEB) MIPS_ENDIAN= #else MIPS_ENDIAN= #endif #endif EOF cc_set_vars=`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^CPU\|^MIPS_ENDIAN\|^LIBCABI'` eval "$cc_set_vars" test "x$CPU" != x && { echo "$CPU${MIPS_ENDIAN}-unknown-linux-$LIBCABI"; exit; } ;; mips64el:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; openrisc*:Linux:*:*) GUESS=or1k-unknown-linux-$LIBC ;; or32:Linux:*:* | or1k*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; padre:Linux:*:*) GUESS=sparc-unknown-linux-$LIBC ;; parisc64:Linux:*:* | hppa64:Linux:*:*) GUESS=hppa64-unknown-linux-$LIBC ;; parisc:Linux:*:* | hppa:Linux:*:*) # Look for CPU level case `grep '^cpu[^a-z]*:' /proc/cpuinfo 2>/dev/null | cut -d' ' -f2` in PA7*) GUESS=hppa1.1-unknown-linux-$LIBC ;; PA8*) GUESS=hppa2.0-unknown-linux-$LIBC ;; *) GUESS=hppa-unknown-linux-$LIBC ;; esac ;; ppc64:Linux:*:*) GUESS=powerpc64-unknown-linux-$LIBC ;; ppc:Linux:*:*) GUESS=powerpc-unknown-linux-$LIBC ;; ppc64le:Linux:*:*) GUESS=powerpc64le-unknown-linux-$LIBC ;; ppcle:Linux:*:*) GUESS=powerpcle-unknown-linux-$LIBC ;; riscv32:Linux:*:* | riscv32be:Linux:*:* | riscv64:Linux:*:* | riscv64be:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; s390:Linux:*:* | s390x:Linux:*:*) GUESS=$UNAME_MACHINE-ibm-linux-$LIBC ;; sh64*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; sh*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; sparc:Linux:*:* | sparc64:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; tile*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; vax:Linux:*:*) GUESS=$UNAME_MACHINE-dec-linux-$LIBC ;; x86_64:Linux:*:*) set_cc_for_build CPU=$UNAME_MACHINE LIBCABI=$LIBC if test "$CC_FOR_BUILD" != no_compiler_found; then ABI=64 sed 's/^ //' << EOF > "$dummy.c" #ifdef __i386__ ABI=x86 #else #ifdef __ILP32__ ABI=x32 #endif #endif EOF cc_set_abi=`$CC_FOR_BUILD -E "$dummy.c" 2>/dev/null | grep '^ABI' | sed 's, ,,g'` eval "$cc_set_abi" case $ABI in x86) CPU=i686 ;; x32) LIBCABI=${LIBC}x32 ;; esac fi GUESS=$CPU-pc-linux-$LIBCABI ;; xtensa*:Linux:*:*) GUESS=$UNAME_MACHINE-unknown-linux-$LIBC ;; i*86:DYNIX/ptx:4*:*) # ptx 4.0 does uname -s correctly, with DYNIX/ptx in there. # earlier versions are messed up and put the nodename in both # sysname and nodename. GUESS=i386-sequent-sysv4 ;; i*86:UNIX_SV:4.2MP:2.*) # Unixware is an offshoot of SVR4, but it has its own version # number series starting with 2... # I am not positive that other SVR4 systems won't match this, # I just have to hope. -- rms. # Use sysv4.2uw... so that sysv4* matches it. GUESS=$UNAME_MACHINE-pc-sysv4.2uw$UNAME_VERSION ;; i*86:OS/2:*:*) # If we were able to find 'uname', then EMX Unix compatibility # is probably installed. GUESS=$UNAME_MACHINE-pc-os2-emx ;; i*86:XTS-300:*:STOP) GUESS=$UNAME_MACHINE-unknown-stop ;; i*86:atheos:*:*) GUESS=$UNAME_MACHINE-unknown-atheos ;; i*86:syllable:*:*) GUESS=$UNAME_MACHINE-pc-syllable ;; i*86:LynxOS:2.*:* | i*86:LynxOS:3.[01]*:* | i*86:LynxOS:4.[02]*:*) GUESS=i386-unknown-lynxos$UNAME_RELEASE ;; i*86:*DOS:*:*) GUESS=$UNAME_MACHINE-pc-msdosdjgpp ;; i*86:*:4.*:*) UNAME_REL=`echo "$UNAME_RELEASE" | sed 's/\/MP$//'` if grep Novell /usr/include/link.h >/dev/null 2>/dev/null; then GUESS=$UNAME_MACHINE-univel-sysv$UNAME_REL else GUESS=$UNAME_MACHINE-pc-sysv$UNAME_REL fi ;; i*86:*:5:[678]*) # UnixWare 7.x, OpenUNIX and OpenServer 6. case `/bin/uname -X | grep "^Machine"` in *486*) UNAME_MACHINE=i486 ;; *Pentium) UNAME_MACHINE=i586 ;; *Pent*|*Celeron) UNAME_MACHINE=i686 ;; esac GUESS=$UNAME_MACHINE-unknown-sysv${UNAME_RELEASE}${UNAME_SYSTEM}${UNAME_VERSION} ;; i*86:*:3.2:*) if test -f /usr/options/cb.name; then UNAME_REL=`sed -n 's/.*Version //p' /dev/null >/dev/null ; then UNAME_REL=`(/bin/uname -X|grep Release|sed -e 's/.*= //')` (/bin/uname -X|grep i80486 >/dev/null) && UNAME_MACHINE=i486 (/bin/uname -X|grep '^Machine.*Pentium' >/dev/null) \ && UNAME_MACHINE=i586 (/bin/uname -X|grep '^Machine.*Pent *II' >/dev/null) \ && UNAME_MACHINE=i686 (/bin/uname -X|grep '^Machine.*Pentium Pro' >/dev/null) \ && UNAME_MACHINE=i686 GUESS=$UNAME_MACHINE-pc-sco$UNAME_REL else GUESS=$UNAME_MACHINE-pc-sysv32 fi ;; pc:*:*:*) # Left here for compatibility: # uname -m prints for DJGPP always 'pc', but it prints nothing about # the processor, so we play safe by assuming i586. # Note: whatever this is, it MUST be the same as what config.sub # prints for the "djgpp" host, or else GDB configure will decide that # this is a cross-build. GUESS=i586-pc-msdosdjgpp ;; Intel:Mach:3*:*) GUESS=i386-pc-mach3 ;; paragon:*:*:*) GUESS=i860-intel-osf1 ;; i860:*:4.*:*) # i860-SVR4 if grep Stardent /usr/include/sys/uadmin.h >/dev/null 2>&1 ; then GUESS=i860-stardent-sysv$UNAME_RELEASE # Stardent Vistra i860-SVR4 else # Add other i860-SVR4 vendors below as they are discovered. GUESS=i860-unknown-sysv$UNAME_RELEASE # Unknown i860-SVR4 fi ;; mini*:CTIX:SYS*5:*) # "miniframe" GUESS=m68010-convergent-sysv ;; mc68k:UNIX:SYSTEM5:3.51m) GUESS=m68k-convergent-sysv ;; M680?0:D-NIX:5.3:*) GUESS=m68k-diab-dnix ;; M68*:*:R3V[5678]*:*) test -r /sysV68 && { echo 'm68k-motorola-sysv'; exit; } ;; 3[345]??:*:4.0:3.0 | 3[34]??A:*:4.0:3.0 | 3[34]??,*:*:4.0:3.0 | 3[34]??/*:*:4.0:3.0 | 4400:*:4.0:3.0 | 4850:*:4.0:3.0 | SKA40:*:4.0:3.0 | SDS2:*:4.0:3.0 | SHG2:*:4.0:3.0 | S7501*:*:4.0:3.0) OS_REL='' test -r /etc/.relid \ && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; 3[34]??:*:4.0:* | 3[34]??,*:*:4.0:*) /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4; exit; } ;; NCR*:*:4.2:* | MPRAS*:*:4.2:*) OS_REL='.3' test -r /etc/.relid \ && OS_REL=.`sed -n 's/[^ ]* [^ ]* \([0-9][0-9]\).*/\1/p' < /etc/.relid` /bin/uname -p 2>/dev/null | grep 86 >/dev/null \ && { echo i486-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep entium >/dev/null \ && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } /bin/uname -p 2>/dev/null | /bin/grep pteron >/dev/null \ && { echo i586-ncr-sysv4.3"$OS_REL"; exit; } ;; m68*:LynxOS:2.*:* | m68*:LynxOS:3.0*:*) GUESS=m68k-unknown-lynxos$UNAME_RELEASE ;; mc68030:UNIX_System_V:4.*:*) GUESS=m68k-atari-sysv4 ;; TSUNAMI:LynxOS:2.*:*) GUESS=sparc-unknown-lynxos$UNAME_RELEASE ;; rs6000:LynxOS:2.*:*) GUESS=rs6000-unknown-lynxos$UNAME_RELEASE ;; PowerPC:LynxOS:2.*:* | PowerPC:LynxOS:3.[01]*:* | PowerPC:LynxOS:4.[02]*:*) GUESS=powerpc-unknown-lynxos$UNAME_RELEASE ;; SM[BE]S:UNIX_SV:*:*) GUESS=mips-dde-sysv$UNAME_RELEASE ;; RM*:ReliantUNIX-*:*:*) GUESS=mips-sni-sysv4 ;; RM*:SINIX-*:*:*) GUESS=mips-sni-sysv4 ;; *:SINIX-*:*:*) if uname -p 2>/dev/null >/dev/null ; then UNAME_MACHINE=`(uname -p) 2>/dev/null` GUESS=$UNAME_MACHINE-sni-sysv4 else GUESS=ns32k-sni-sysv fi ;; PENTIUM:*:4.0*:*) # Unisys 'ClearPath HMP IX 4000' SVR4/MP effort # says GUESS=i586-unisys-sysv4 ;; *:UNIX_System_V:4*:FTX*) # From Gerald Hewes . # How about differentiating between stratus architectures? -djm GUESS=hppa1.1-stratus-sysv4 ;; *:*:*:FTX*) # From seanf@swdc.stratus.com. GUESS=i860-stratus-sysv4 ;; i*86:VOS:*:*) # From Paul.Green@stratus.com. GUESS=$UNAME_MACHINE-stratus-vos ;; *:VOS:*:*) # From Paul.Green@stratus.com. GUESS=hppa1.1-stratus-vos ;; mc68*:A/UX:*:*) GUESS=m68k-apple-aux$UNAME_RELEASE ;; news*:NEWS-OS:6*:*) GUESS=mips-sony-newsos6 ;; R[34]000:*System_V*:*:* | R4000:UNIX_SYSV:*:* | R*000:UNIX_SV:*:*) if test -d /usr/nec; then GUESS=mips-nec-sysv$UNAME_RELEASE else GUESS=mips-unknown-sysv$UNAME_RELEASE fi ;; BeBox:BeOS:*:*) # BeOS running on hardware made by Be, PPC only. GUESS=powerpc-be-beos ;; BeMac:BeOS:*:*) # BeOS running on Mac or Mac clone, PPC only. GUESS=powerpc-apple-beos ;; BePC:BeOS:*:*) # BeOS running on Intel PC compatible. GUESS=i586-pc-beos ;; BePC:Haiku:*:*) # Haiku running on Intel PC compatible. GUESS=i586-pc-haiku ;; ppc:Haiku:*:*) # Haiku running on Apple PowerPC GUESS=powerpc-apple-haiku ;; *:Haiku:*:*) # Haiku modern gcc (not bound by BeOS compat) GUESS=$UNAME_MACHINE-unknown-haiku ;; SX-4:SUPER-UX:*:*) GUESS=sx4-nec-superux$UNAME_RELEASE ;; SX-5:SUPER-UX:*:*) GUESS=sx5-nec-superux$UNAME_RELEASE ;; SX-6:SUPER-UX:*:*) GUESS=sx6-nec-superux$UNAME_RELEASE ;; SX-7:SUPER-UX:*:*) GUESS=sx7-nec-superux$UNAME_RELEASE ;; SX-8:SUPER-UX:*:*) GUESS=sx8-nec-superux$UNAME_RELEASE ;; SX-8R:SUPER-UX:*:*) GUESS=sx8r-nec-superux$UNAME_RELEASE ;; SX-ACE:SUPER-UX:*:*) GUESS=sxace-nec-superux$UNAME_RELEASE ;; Power*:Rhapsody:*:*) GUESS=powerpc-apple-rhapsody$UNAME_RELEASE ;; *:Rhapsody:*:*) GUESS=$UNAME_MACHINE-apple-rhapsody$UNAME_RELEASE ;; arm64:Darwin:*:*) GUESS=aarch64-apple-darwin$UNAME_RELEASE ;; *:Darwin:*:*) UNAME_PROCESSOR=`uname -p` case $UNAME_PROCESSOR in unknown) UNAME_PROCESSOR=powerpc ;; esac if command -v xcode-select > /dev/null 2> /dev/null && \ ! xcode-select --print-path > /dev/null 2> /dev/null ; then # Avoid executing cc if there is no toolchain installed as # cc will be a stub that puts up a graphical alert # prompting the user to install developer tools. CC_FOR_BUILD=no_compiler_found else set_cc_for_build fi if test "$CC_FOR_BUILD" != no_compiler_found; then if (echo '#ifdef __LP64__'; echo IS_64BIT_ARCH; echo '#endif') | \ (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ grep IS_64BIT_ARCH >/dev/null then case $UNAME_PROCESSOR in i386) UNAME_PROCESSOR=x86_64 ;; powerpc) UNAME_PROCESSOR=powerpc64 ;; esac fi # On 10.4-10.6 one might compile for PowerPC via gcc -arch ppc if (echo '#ifdef __POWERPC__'; echo IS_PPC; echo '#endif') | \ (CCOPTS="" $CC_FOR_BUILD -E - 2>/dev/null) | \ grep IS_PPC >/dev/null then UNAME_PROCESSOR=powerpc fi elif test "$UNAME_PROCESSOR" = i386 ; then # uname -m returns i386 or x86_64 UNAME_PROCESSOR=$UNAME_MACHINE fi GUESS=$UNAME_PROCESSOR-apple-darwin$UNAME_RELEASE ;; *:procnto*:*:* | *:QNX:[0123456789]*:*) UNAME_PROCESSOR=`uname -p` if test "$UNAME_PROCESSOR" = x86; then UNAME_PROCESSOR=i386 UNAME_MACHINE=pc fi GUESS=$UNAME_PROCESSOR-$UNAME_MACHINE-nto-qnx$UNAME_RELEASE ;; *:QNX:*:4*) GUESS=i386-pc-qnx ;; NEO-*:NONSTOP_KERNEL:*:*) GUESS=neo-tandem-nsk$UNAME_RELEASE ;; NSE-*:NONSTOP_KERNEL:*:*) GUESS=nse-tandem-nsk$UNAME_RELEASE ;; NSR-*:NONSTOP_KERNEL:*:*) GUESS=nsr-tandem-nsk$UNAME_RELEASE ;; NSV-*:NONSTOP_KERNEL:*:*) GUESS=nsv-tandem-nsk$UNAME_RELEASE ;; NSX-*:NONSTOP_KERNEL:*:*) GUESS=nsx-tandem-nsk$UNAME_RELEASE ;; *:NonStop-UX:*:*) GUESS=mips-compaq-nonstopux ;; BS2000:POSIX*:*:*) GUESS=bs2000-siemens-sysv ;; DS/*:UNIX_System_V:*:*) GUESS=$UNAME_MACHINE-$UNAME_SYSTEM-$UNAME_RELEASE ;; *:Plan9:*:*) # "uname -m" is not consistent, so use $cputype instead. 386 # is converted to i386 for consistency with other x86 # operating systems. if test "${cputype-}" = 386; then UNAME_MACHINE=i386 elif test "x${cputype-}" != x; then UNAME_MACHINE=$cputype fi GUESS=$UNAME_MACHINE-unknown-plan9 ;; *:TOPS-10:*:*) GUESS=pdp10-unknown-tops10 ;; *:TENEX:*:*) GUESS=pdp10-unknown-tenex ;; KS10:TOPS-20:*:* | KL10:TOPS-20:*:* | TYPE4:TOPS-20:*:*) GUESS=pdp10-dec-tops20 ;; XKL-1:TOPS-20:*:* | TYPE5:TOPS-20:*:*) GUESS=pdp10-xkl-tops20 ;; *:TOPS-20:*:*) GUESS=pdp10-unknown-tops20 ;; *:ITS:*:*) GUESS=pdp10-unknown-its ;; SEI:*:*:SEIUX) GUESS=mips-sei-seiux$UNAME_RELEASE ;; *:DragonFly:*:*) DRAGONFLY_REL=`echo "$UNAME_RELEASE" | sed -e 's/[-(].*//'` GUESS=$UNAME_MACHINE-unknown-dragonfly$DRAGONFLY_REL ;; *:*VMS:*:*) UNAME_MACHINE=`(uname -p) 2>/dev/null` case $UNAME_MACHINE in A*) GUESS=alpha-dec-vms ;; I*) GUESS=ia64-dec-vms ;; V*) GUESS=vax-dec-vms ;; esac ;; *:XENIX:*:SysV) GUESS=i386-pc-xenix ;; i*86:skyos:*:*) SKYOS_REL=`echo "$UNAME_RELEASE" | sed -e 's/ .*$//'` GUESS=$UNAME_MACHINE-pc-skyos$SKYOS_REL ;; i*86:rdos:*:*) GUESS=$UNAME_MACHINE-pc-rdos ;; i*86:Fiwix:*:*) GUESS=$UNAME_MACHINE-pc-fiwix ;; *:AROS:*:*) GUESS=$UNAME_MACHINE-unknown-aros ;; x86_64:VMkernel:*:*) GUESS=$UNAME_MACHINE-unknown-esx ;; amd64:Isilon\ OneFS:*:*) GUESS=x86_64-unknown-onefs ;; *:Unleashed:*:*) GUESS=$UNAME_MACHINE-unknown-unleashed$UNAME_RELEASE ;; *:Ironclad:*:*) GUESS=$UNAME_MACHINE-unknown-ironclad ;; esac # Do we have a guess based on uname results? if test "x$GUESS" != x; then echo "$GUESS" exit fi # No uname command or uname output not recognized. set_cc_for_build cat > "$dummy.c" < #include #endif #if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) #if defined (vax) || defined (__vax) || defined (__vax__) || defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) #include #if defined(_SIZE_T_) || defined(SIGLOST) #include #endif #endif #endif int main () { #if defined (sony) #if defined (MIPSEB) /* BFD wants "bsd" instead of "newsos". Perhaps BFD should be changed, I don't know.... */ printf ("mips-sony-bsd\n"); exit (0); #else #include printf ("m68k-sony-newsos%s\n", #ifdef NEWSOS4 "4" #else "" #endif ); exit (0); #endif #endif #if defined (NeXT) #if !defined (__ARCHITECTURE__) #define __ARCHITECTURE__ "m68k" #endif int version; version=`(hostinfo | sed -n 's/.*NeXT Mach \([0-9]*\).*/\1/p') 2>/dev/null`; if (version < 4) printf ("%s-next-nextstep%d\n", __ARCHITECTURE__, version); else printf ("%s-next-openstep%d\n", __ARCHITECTURE__, version); exit (0); #endif #if defined (MULTIMAX) || defined (n16) #if defined (UMAXV) printf ("ns32k-encore-sysv\n"); exit (0); #else #if defined (CMU) printf ("ns32k-encore-mach\n"); exit (0); #else printf ("ns32k-encore-bsd\n"); exit (0); #endif #endif #endif #if defined (__386BSD__) printf ("i386-pc-bsd\n"); exit (0); #endif #if defined (sequent) #if defined (i386) printf ("i386-sequent-dynix\n"); exit (0); #endif #if defined (ns32000) printf ("ns32k-sequent-dynix\n"); exit (0); #endif #endif #if defined (_SEQUENT_) struct utsname un; uname(&un); if (strncmp(un.version, "V2", 2) == 0) { printf ("i386-sequent-ptx2\n"); exit (0); } if (strncmp(un.version, "V1", 2) == 0) { /* XXX is V1 correct? */ printf ("i386-sequent-ptx1\n"); exit (0); } printf ("i386-sequent-ptx\n"); exit (0); #endif #if defined (vax) #if !defined (ultrix) #include #if defined (BSD) #if BSD == 43 printf ("vax-dec-bsd4.3\n"); exit (0); #else #if BSD == 199006 printf ("vax-dec-bsd4.3reno\n"); exit (0); #else printf ("vax-dec-bsd\n"); exit (0); #endif #endif #else printf ("vax-dec-bsd\n"); exit (0); #endif #else #if defined(_SIZE_T_) || defined(SIGLOST) struct utsname un; uname (&un); printf ("vax-dec-ultrix%s\n", un.release); exit (0); #else printf ("vax-dec-ultrix\n"); exit (0); #endif #endif #endif #if defined(ultrix) || defined(_ultrix) || defined(__ultrix) || defined(__ultrix__) #if defined(mips) || defined(__mips) || defined(__mips__) || defined(MIPS) || defined(__MIPS__) #if defined(_SIZE_T_) || defined(SIGLOST) struct utsname *un; uname (&un); printf ("mips-dec-ultrix%s\n", un.release); exit (0); #else printf ("mips-dec-ultrix\n"); exit (0); #endif #endif #endif #if defined (alliant) && defined (i860) printf ("i860-alliant-bsd\n"); exit (0); #endif exit (1); } EOF $CC_FOR_BUILD -o "$dummy" "$dummy.c" 2>/dev/null && SYSTEM_NAME=`"$dummy"` && { echo "$SYSTEM_NAME"; exit; } # Apollos put the system type in the environment. test -d /usr/apollo && { echo "$ISP-apollo-$SYSTYPE"; exit; } echo "$0: unable to guess system type" >&2 case $UNAME_MACHINE:$UNAME_SYSTEM in mips:Linux | mips64:Linux) # If we got here on MIPS GNU/Linux, output extra information. cat >&2 <&2 <&2 </dev/null || echo unknown` uname -r = `(uname -r) 2>/dev/null || echo unknown` uname -s = `(uname -s) 2>/dev/null || echo unknown` uname -v = `(uname -v) 2>/dev/null || echo unknown` /usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null` /bin/uname -X = `(/bin/uname -X) 2>/dev/null` hostinfo = `(hostinfo) 2>/dev/null` /bin/universe = `(/bin/universe) 2>/dev/null` /usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null` /bin/arch = `(/bin/arch) 2>/dev/null` /usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null` /usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null` UNAME_MACHINE = "$UNAME_MACHINE" UNAME_RELEASE = "$UNAME_RELEASE" UNAME_SYSTEM = "$UNAME_SYSTEM" UNAME_VERSION = "$UNAME_VERSION" EOF fi exit 1 # Local variables: # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" # End: libffcall-2.5/build-aux/compile0000775000000000000000000001670514641402034013446 00000000000000#! /bin/sh # Wrapper for compilers which do not understand '-c -o'. scriptversion=2024-06-19.01; # UTC # Copyright (C) 1999-2024 Free Software Foundation, Inc. # Written by Tom Tromey . # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that program. # This file is maintained in Automake, please report # bugs to or send patches to # . nl=' ' # We need space, tab and new line, in precisely that order. Quoting is # there to prevent tools from complaining about whitespace usage. IFS=" "" $nl" file_conv= # func_file_conv build_file lazy # Convert a $build file to $host form and store it in $file # Currently only supports Windows hosts. If the determined conversion # type is listed in (the comma separated) LAZY, no conversion will # take place. func_file_conv () { file=$1 case $file in / | /[!/]*) # absolute file, and not a UNC file if test -z "$file_conv"; then # lazily determine how to convert abs files case `uname -s` in MINGW*) file_conv=mingw ;; CYGWIN* | MSYS*) file_conv=cygwin ;; *) file_conv=wine ;; esac fi case $file_conv/,$2, in *,$file_conv,*) ;; mingw/*) file=`cmd //C echo "$file " | sed -e 's/"\(.*\) " *$/\1/'` ;; cygwin/* | msys/*) file=`cygpath -m "$file" || echo "$file"` ;; wine/*) file=`winepath -w "$file" || echo "$file"` ;; esac ;; esac } # func_cl_dashL linkdir # Make cl look for libraries in LINKDIR func_cl_dashL () { func_file_conv "$1" if test -z "$lib_path"; then lib_path=$file else lib_path="$lib_path;$file" fi linker_opts="$linker_opts -LIBPATH:$file" } # func_cl_dashl library # Do a library search-path lookup for cl func_cl_dashl () { lib=$1 found=no save_IFS=$IFS IFS=';' for dir in $lib_path $LIB do IFS=$save_IFS if $shared && test -f "$dir/$lib.dll.lib"; then found=yes lib=$dir/$lib.dll.lib break fi if test -f "$dir/$lib.lib"; then found=yes lib=$dir/$lib.lib break fi if test -f "$dir/lib$lib.a"; then found=yes lib=$dir/lib$lib.a break fi done IFS=$save_IFS if test "$found" != yes; then lib=$lib.lib fi } # func_cl_wrapper cl arg... # Adjust compile command to suit cl func_cl_wrapper () { # Assume a capable shell lib_path= shared=: linker_opts= for arg do if test -n "$eat"; then eat= else case $1 in -o) # configure might choose to run compile as 'compile cc -o foo foo.c'. eat=1 case $2 in *.o | *.lo | *.[oO][bB][jJ]) func_file_conv "$2" set x "$@" -Fo"$file" shift ;; *) func_file_conv "$2" set x "$@" -Fe"$file" shift ;; esac ;; -I) eat=1 func_file_conv "$2" mingw set x "$@" -I"$file" shift ;; -I*) func_file_conv "${1#-I}" mingw set x "$@" -I"$file" shift ;; -l) eat=1 func_cl_dashl "$2" set x "$@" "$lib" shift ;; -l*) func_cl_dashl "${1#-l}" set x "$@" "$lib" shift ;; -L) eat=1 func_cl_dashL "$2" ;; -L*) func_cl_dashL "${1#-L}" ;; -static) shared=false ;; -Wl,*) arg=${1#-Wl,} save_ifs="$IFS"; IFS=',' for flag in $arg; do IFS="$save_ifs" linker_opts="$linker_opts $flag" done IFS="$save_ifs" ;; -Xlinker) eat=1 linker_opts="$linker_opts $2" ;; -*) set x "$@" "$1" shift ;; *.cc | *.CC | *.cxx | *.CXX | *.[cC]++) func_file_conv "$1" set x "$@" -Tp"$file" shift ;; *.c | *.cpp | *.CPP | *.lib | *.LIB | *.Lib | *.OBJ | *.obj | *.[oO]) func_file_conv "$1" mingw set x "$@" "$file" shift ;; *) set x "$@" "$1" shift ;; esac fi shift done if test -n "$linker_opts"; then linker_opts="-link$linker_opts" fi exec "$@" $linker_opts exit 1 } eat= case $1 in '') echo "$0: No command. Try '$0 --help' for more information." 1>&2 exit 1; ;; -h | --h*) cat <<\EOF Usage: compile [--help] [--version] PROGRAM [ARGS] Wrapper for compilers which do not understand '-c -o'. Remove '-o dest.o' from ARGS, run PROGRAM with the remaining arguments, and rename the output as expected. If you are trying to build a whole package this is not the right script to run: please start by reading the file 'INSTALL'. Report bugs to . GNU Automake home page: . General help using GNU software: . EOF exit $? ;; -v | --v*) echo "compile (GNU Automake) $scriptversion" exit $? ;; cl | *[/\\]cl | cl.exe | *[/\\]cl.exe | \ clang-cl | *[/\\]clang-cl | clang-cl.exe | *[/\\]clang-cl.exe | \ icl | *[/\\]icl | icl.exe | *[/\\]icl.exe ) func_cl_wrapper "$@" # Doesn't return... ;; esac ofile= cfile= for arg do if test -n "$eat"; then eat= else case $1 in -o) # configure might choose to run compile as 'compile cc -o foo foo.c'. # So we strip '-o arg' only if arg is an object. eat=1 case $2 in *.o | *.obj) ofile=$2 ;; *) set x "$@" -o "$2" shift ;; esac ;; *.c) cfile=$1 set x "$@" "$1" shift ;; *) set x "$@" "$1" shift ;; esac fi shift done if test -z "$ofile" || test -z "$cfile"; then # If no '-o' option was seen then we might have been invoked from a # pattern rule where we don't need one. That is ok -- this is a # normal compilation that the losing compiler can handle. If no # '.c' file was seen then we are probably linking. That is also # ok. exec "$@" fi # Name of file we expect compiler to create. cofile=`echo "$cfile" | sed 's|^.*[\\/]||; s|^[a-zA-Z]:||; s/\.c$/.o/'` # Create the lock directory. # Note: use '[/\\:.-]' here to ensure that we don't use the same name # that we are using for the .o file. Also, base the name on the expected # object file name, since that is what matters with a parallel build. lockdir=`echo "$cofile" | sed -e 's|[/\\:.-]|_|g'`.d while true; do if mkdir "$lockdir" >/dev/null 2>&1; then break fi sleep 1 done # FIXME: race condition here if user kills between mkdir and trap. trap "rmdir '$lockdir'; exit 1" 1 2 15 # Run the compile. "$@" ret=$? if test -f "$cofile"; then test "$cofile" = "$ofile" || mv "$cofile" "$ofile" elif test -f "${cofile}bj"; then test "${cofile}bj" = "$ofile" || mv "${cofile}bj" "$ofile" fi rmdir "$lockdir" exit $ret # Local Variables: # mode: shell-script # sh-indentation: 2 # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC0" # time-stamp-end: "; # UTC" # End: libffcall-2.5/build-aux/config.sub0000775000000000000000000011544114657156076014073 00000000000000#! /bin/sh # Configuration validation subroutine script. # Copyright 1992-2024 Free Software Foundation, Inc. # shellcheck disable=SC2006,SC2268,SC2162 # see below for rationale timestamp='2024-05-27' # This file is free software; you can redistribute it and/or modify it # under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, see . # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program that contains a # configuration script generated by Autoconf, you may include it under # the same distribution terms that you use for the rest of that # program. This Exception is an additional permission under section 7 # of the GNU General Public License, version 3 ("GPLv3"). # Please send patches to . # # Configuration subroutine to validate and canonicalize a configuration type. # Supply the specified configuration type as an argument. # If it is invalid, we print an error message on stderr and exit with code 1. # Otherwise, we print the canonical config type on stdout and succeed. # You can get the latest version of this script from: # https://git.savannah.gnu.org/cgit/config.git/plain/config.sub # This file is supposed to be the same for all GNU packages # and recognize all the CPU types, system types and aliases # that are meaningful with *any* GNU software. # Each package is responsible for reporting which valid configurations # it does not support. The user should be able to distinguish # a failure to support a valid configuration from a meaningless # configuration. # The goal of this file is to map all the various variations of a given # machine specification into a single specification in the form: # CPU_TYPE-MANUFACTURER-OPERATING_SYSTEM # or in some cases, the newer four-part form: # CPU_TYPE-MANUFACTURER-KERNEL-OPERATING_SYSTEM # It is wrong to echo any other type of specification. # The "shellcheck disable" line above the timestamp inhibits complaints # about features and limitations of the classic Bourne shell that were # superseded or lifted in POSIX. However, this script identifies a wide # variety of pre-POSIX systems that do not have POSIX shells at all, and # even some reasonably current systems (Solaris 10 as case-in-point) still # have a pre-POSIX /bin/sh. me=`echo "$0" | sed -e 's,.*/,,'` usage="\ Usage: $0 [OPTION] CPU-MFR-OPSYS or ALIAS Canonicalize a configuration name. Options: -h, --help print this help, then exit -t, --time-stamp print date of last modification, then exit -v, --version print version number, then exit Report bugs and patches to ." version="\ GNU config.sub ($timestamp) Copyright 1992-2024 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." help=" Try '$me --help' for more information." # Parse command line while test $# -gt 0 ; do case $1 in --time-stamp | --time* | -t ) echo "$timestamp" ; exit ;; --version | -v ) echo "$version" ; exit ;; --help | --h* | -h ) echo "$usage"; exit ;; -- ) # Stop option processing shift; break ;; - ) # Use stdin as input. break ;; -* ) echo "$me: invalid option $1$help" >&2 exit 1 ;; *local*) # First pass through any local machine types. echo "$1" exit ;; * ) break ;; esac done case $# in 0) echo "$me: missing argument$help" >&2 exit 1;; 1) ;; *) echo "$me: too many arguments$help" >&2 exit 1;; esac # Split fields of configuration type saved_IFS=$IFS IFS="-" read field1 field2 field3 field4 <&2 exit 1 ;; *-*-*-*) basic_machine=$field1-$field2 basic_os=$field3-$field4 ;; *-*-*) # Ambiguous whether COMPANY is present, or skipped and KERNEL-OS is two # parts maybe_os=$field2-$field3 case $maybe_os in cloudabi*-eabi* \ | kfreebsd*-gnu* \ | knetbsd*-gnu* \ | kopensolaris*-gnu* \ | linux-* \ | managarm-* \ | netbsd*-eabi* \ | netbsd*-gnu* \ | nto-qnx* \ | os2-emx* \ | rtmk-nova* \ | storm-chaos* \ | uclinux-gnu* \ | uclinux-uclibc* \ | windows-* ) basic_machine=$field1 basic_os=$maybe_os ;; android-linux) basic_machine=$field1-unknown basic_os=linux-android ;; *) basic_machine=$field1-$field2 basic_os=$field3 ;; esac ;; *-*) case $field1-$field2 in # Shorthands that happen to contain a single dash convex-c[12] | convex-c3[248]) basic_machine=$field2-convex basic_os= ;; decstation-3100) basic_machine=mips-dec basic_os= ;; *-*) # Second component is usually, but not always the OS case $field2 in # Do not treat sunos as a manufacturer sun*os*) basic_machine=$field1 basic_os=$field2 ;; # Manufacturers 3100* \ | 32* \ | 3300* \ | 3600* \ | 7300* \ | acorn \ | altos* \ | apollo \ | apple \ | atari \ | att* \ | axis \ | be \ | bull \ | cbm \ | ccur \ | cisco \ | commodore \ | convergent* \ | convex* \ | cray \ | crds \ | dec* \ | delta* \ | dg \ | digital \ | dolphin \ | encore* \ | gould \ | harris \ | highlevel \ | hitachi* \ | hp \ | ibm* \ | intergraph \ | isi* \ | knuth \ | masscomp \ | microblaze* \ | mips* \ | motorola* \ | ncr* \ | news \ | next \ | ns \ | oki \ | omron* \ | pc533* \ | rebel \ | rom68k \ | rombug \ | semi \ | sequent* \ | siemens \ | sgi* \ | siemens \ | sim \ | sni \ | sony* \ | stratus \ | sun \ | sun[234]* \ | tektronix \ | tti* \ | ultra \ | unicom* \ | wec \ | winbond \ | wrs) basic_machine=$field1-$field2 basic_os= ;; zephyr*) basic_machine=$field1-unknown basic_os=$field2 ;; *) basic_machine=$field1 basic_os=$field2 ;; esac ;; esac ;; *) # Convert single-component short-hands not valid as part of # multi-component configurations. case $field1 in 386bsd) basic_machine=i386-pc basic_os=bsd ;; a29khif) basic_machine=a29k-amd basic_os=udi ;; adobe68k) basic_machine=m68010-adobe basic_os=scout ;; alliant) basic_machine=fx80-alliant basic_os= ;; altos | altos3068) basic_machine=m68k-altos basic_os= ;; am29k) basic_machine=a29k-none basic_os=bsd ;; amdahl) basic_machine=580-amdahl basic_os=sysv ;; amiga) basic_machine=m68k-unknown basic_os= ;; amigaos | amigados) basic_machine=m68k-unknown basic_os=amigaos ;; amigaunix | amix) basic_machine=m68k-unknown basic_os=sysv4 ;; apollo68) basic_machine=m68k-apollo basic_os=sysv ;; apollo68bsd) basic_machine=m68k-apollo basic_os=bsd ;; aros) basic_machine=i386-pc basic_os=aros ;; aux) basic_machine=m68k-apple basic_os=aux ;; balance) basic_machine=ns32k-sequent basic_os=dynix ;; blackfin) basic_machine=bfin-unknown basic_os=linux ;; cegcc) basic_machine=arm-unknown basic_os=cegcc ;; cray) basic_machine=j90-cray basic_os=unicos ;; crds | unos) basic_machine=m68k-crds basic_os= ;; da30) basic_machine=m68k-da30 basic_os= ;; decstation | pmax | pmin | dec3100 | decstatn) basic_machine=mips-dec basic_os= ;; delta88) basic_machine=m88k-motorola basic_os=sysv3 ;; dicos) basic_machine=i686-pc basic_os=dicos ;; djgpp) basic_machine=i586-pc basic_os=msdosdjgpp ;; ebmon29k) basic_machine=a29k-amd basic_os=ebmon ;; es1800 | OSE68k | ose68k | ose | OSE) basic_machine=m68k-ericsson basic_os=ose ;; gmicro) basic_machine=tron-gmicro basic_os=sysv ;; go32) basic_machine=i386-pc basic_os=go32 ;; h8300hms) basic_machine=h8300-hitachi basic_os=hms ;; h8300xray) basic_machine=h8300-hitachi basic_os=xray ;; h8500hms) basic_machine=h8500-hitachi basic_os=hms ;; harris) basic_machine=m88k-harris basic_os=sysv3 ;; hp300 | hp300hpux) basic_machine=m68k-hp basic_os=hpux ;; hp300bsd) basic_machine=m68k-hp basic_os=bsd ;; hppaosf) basic_machine=hppa1.1-hp basic_os=osf ;; hppro) basic_machine=hppa1.1-hp basic_os=proelf ;; i386mach) basic_machine=i386-mach basic_os=mach ;; isi68 | isi) basic_machine=m68k-isi basic_os=sysv ;; m68knommu) basic_machine=m68k-unknown basic_os=linux ;; magnum | m3230) basic_machine=mips-mips basic_os=sysv ;; merlin) basic_machine=ns32k-utek basic_os=sysv ;; mingw64) basic_machine=x86_64-pc basic_os=mingw64 ;; mingw32) basic_machine=i686-pc basic_os=mingw32 ;; mingw32ce) basic_machine=arm-unknown basic_os=mingw32ce ;; monitor) basic_machine=m68k-rom68k basic_os=coff ;; morphos) basic_machine=powerpc-unknown basic_os=morphos ;; moxiebox) basic_machine=moxie-unknown basic_os=moxiebox ;; msdos) basic_machine=i386-pc basic_os=msdos ;; msys) basic_machine=i686-pc basic_os=msys ;; mvs) basic_machine=i370-ibm basic_os=mvs ;; nacl) basic_machine=le32-unknown basic_os=nacl ;; ncr3000) basic_machine=i486-ncr basic_os=sysv4 ;; netbsd386) basic_machine=i386-pc basic_os=netbsd ;; netwinder) basic_machine=armv4l-rebel basic_os=linux ;; news | news700 | news800 | news900) basic_machine=m68k-sony basic_os=newsos ;; news1000) basic_machine=m68030-sony basic_os=newsos ;; necv70) basic_machine=v70-nec basic_os=sysv ;; nh3000) basic_machine=m68k-harris basic_os=cxux ;; nh[45]000) basic_machine=m88k-harris basic_os=cxux ;; nindy960) basic_machine=i960-intel basic_os=nindy ;; mon960) basic_machine=i960-intel basic_os=mon960 ;; nonstopux) basic_machine=mips-compaq basic_os=nonstopux ;; os400) basic_machine=powerpc-ibm basic_os=os400 ;; OSE68000 | ose68000) basic_machine=m68000-ericsson basic_os=ose ;; os68k) basic_machine=m68k-none basic_os=os68k ;; paragon) basic_machine=i860-intel basic_os=osf ;; parisc) basic_machine=hppa-unknown basic_os=linux ;; psp) basic_machine=mipsallegrexel-sony basic_os=psp ;; pw32) basic_machine=i586-unknown basic_os=pw32 ;; rdos | rdos64) basic_machine=x86_64-pc basic_os=rdos ;; rdos32) basic_machine=i386-pc basic_os=rdos ;; rom68k) basic_machine=m68k-rom68k basic_os=coff ;; sa29200) basic_machine=a29k-amd basic_os=udi ;; sei) basic_machine=mips-sei basic_os=seiux ;; sequent) basic_machine=i386-sequent basic_os= ;; sps7) basic_machine=m68k-bull basic_os=sysv2 ;; st2000) basic_machine=m68k-tandem basic_os= ;; stratus) basic_machine=i860-stratus basic_os=sysv4 ;; sun2) basic_machine=m68000-sun basic_os= ;; sun2os3) basic_machine=m68000-sun basic_os=sunos3 ;; sun2os4) basic_machine=m68000-sun basic_os=sunos4 ;; sun3) basic_machine=m68k-sun basic_os= ;; sun3os3) basic_machine=m68k-sun basic_os=sunos3 ;; sun3os4) basic_machine=m68k-sun basic_os=sunos4 ;; sun4) basic_machine=sparc-sun basic_os= ;; sun4os3) basic_machine=sparc-sun basic_os=sunos3 ;; sun4os4) basic_machine=sparc-sun basic_os=sunos4 ;; sun4sol2) basic_machine=sparc-sun basic_os=solaris2 ;; sun386 | sun386i | roadrunner) basic_machine=i386-sun basic_os= ;; sv1) basic_machine=sv1-cray basic_os=unicos ;; symmetry) basic_machine=i386-sequent basic_os=dynix ;; t3e) basic_machine=alphaev5-cray basic_os=unicos ;; t90) basic_machine=t90-cray basic_os=unicos ;; toad1) basic_machine=pdp10-xkl basic_os=tops20 ;; tpf) basic_machine=s390x-ibm basic_os=tpf ;; udi29k) basic_machine=a29k-amd basic_os=udi ;; ultra3) basic_machine=a29k-nyu basic_os=sym1 ;; v810 | necv810) basic_machine=v810-nec basic_os=none ;; vaxv) basic_machine=vax-dec basic_os=sysv ;; vms) basic_machine=vax-dec basic_os=vms ;; vsta) basic_machine=i386-pc basic_os=vsta ;; vxworks960) basic_machine=i960-wrs basic_os=vxworks ;; vxworks68) basic_machine=m68k-wrs basic_os=vxworks ;; vxworks29k) basic_machine=a29k-wrs basic_os=vxworks ;; xbox) basic_machine=i686-pc basic_os=mingw32 ;; ymp) basic_machine=ymp-cray basic_os=unicos ;; *) basic_machine=$1 basic_os= ;; esac ;; esac # Decode 1-component or ad-hoc basic machines case $basic_machine in # Here we handle the default manufacturer of certain CPU types. It is in # some cases the only manufacturer, in others, it is the most popular. w89k) cpu=hppa1.1 vendor=winbond ;; op50n) cpu=hppa1.1 vendor=oki ;; op60c) cpu=hppa1.1 vendor=oki ;; ibm*) cpu=i370 vendor=ibm ;; orion105) cpu=clipper vendor=highlevel ;; mac | mpw | mac-mpw) cpu=m68k vendor=apple ;; pmac | pmac-mpw) cpu=powerpc vendor=apple ;; # Recognize the various machine names and aliases which stand # for a CPU type and a company and sometimes even an OS. 3b1 | 7300 | 7300-att | att-7300 | pc7300 | safari | unixpc) cpu=m68000 vendor=att ;; 3b*) cpu=we32k vendor=att ;; bluegene*) cpu=powerpc vendor=ibm basic_os=cnk ;; decsystem10* | dec10*) cpu=pdp10 vendor=dec basic_os=tops10 ;; decsystem20* | dec20*) cpu=pdp10 vendor=dec basic_os=tops20 ;; delta | 3300 | delta-motorola | 3300-motorola | motorola-delta | motorola-3300) cpu=m68k vendor=motorola ;; # This used to be dpx2*, but that gets the RS6000-based # DPX/20 and the x86-based DPX/2-100 wrong. See # https://oldskool.silicium.org/stations/bull_dpx20.htm # https://www.feb-patrimoine.com/english/bull_dpx2.htm # https://www.feb-patrimoine.com/english/unix_and_bull.htm dpx2 | dpx2[23]00 | dpx2[23]xx) cpu=m68k vendor=bull ;; dpx2100 | dpx21xx) cpu=i386 vendor=bull ;; dpx20) cpu=rs6000 vendor=bull ;; encore | umax | mmax) cpu=ns32k vendor=encore ;; elxsi) cpu=elxsi vendor=elxsi basic_os=${basic_os:-bsd} ;; fx2800) cpu=i860 vendor=alliant ;; genix) cpu=ns32k vendor=ns ;; h3050r* | hiux*) cpu=hppa1.1 vendor=hitachi basic_os=hiuxwe2 ;; hp3k9[0-9][0-9] | hp9[0-9][0-9]) cpu=hppa1.0 vendor=hp ;; hp9k2[0-9][0-9] | hp9k31[0-9]) cpu=m68000 vendor=hp ;; hp9k3[2-9][0-9]) cpu=m68k vendor=hp ;; hp9k6[0-9][0-9] | hp6[0-9][0-9]) cpu=hppa1.0 vendor=hp ;; hp9k7[0-79][0-9] | hp7[0-79][0-9]) cpu=hppa1.1 vendor=hp ;; hp9k78[0-9] | hp78[0-9]) # FIXME: really hppa2.0-hp cpu=hppa1.1 vendor=hp ;; hp9k8[67]1 | hp8[67]1 | hp9k80[24] | hp80[24] | hp9k8[78]9 | hp8[78]9 | hp9k893 | hp893) # FIXME: really hppa2.0-hp cpu=hppa1.1 vendor=hp ;; hp9k8[0-9][13679] | hp8[0-9][13679]) cpu=hppa1.1 vendor=hp ;; hp9k8[0-9][0-9] | hp8[0-9][0-9]) cpu=hppa1.0 vendor=hp ;; i*86v32) cpu=`echo "$1" | sed -e 's/86.*/86/'` vendor=pc basic_os=sysv32 ;; i*86v4*) cpu=`echo "$1" | sed -e 's/86.*/86/'` vendor=pc basic_os=sysv4 ;; i*86v) cpu=`echo "$1" | sed -e 's/86.*/86/'` vendor=pc basic_os=sysv ;; i*86sol2) cpu=`echo "$1" | sed -e 's/86.*/86/'` vendor=pc basic_os=solaris2 ;; j90 | j90-cray) cpu=j90 vendor=cray basic_os=${basic_os:-unicos} ;; iris | iris4d) cpu=mips vendor=sgi case $basic_os in irix*) ;; *) basic_os=irix4 ;; esac ;; miniframe) cpu=m68000 vendor=convergent ;; *mint | mint[0-9]* | *MiNT | *MiNT[0-9]*) cpu=m68k vendor=atari basic_os=mint ;; news-3600 | risc-news) cpu=mips vendor=sony basic_os=newsos ;; next | m*-next) cpu=m68k vendor=next ;; np1) cpu=np1 vendor=gould ;; op50n-* | op60c-*) cpu=hppa1.1 vendor=oki basic_os=proelf ;; pa-hitachi) cpu=hppa1.1 vendor=hitachi basic_os=hiuxwe2 ;; pbd) cpu=sparc vendor=tti ;; pbb) cpu=m68k vendor=tti ;; pc532) cpu=ns32k vendor=pc532 ;; pn) cpu=pn vendor=gould ;; power) cpu=power vendor=ibm ;; ps2) cpu=i386 vendor=ibm ;; rm[46]00) cpu=mips vendor=siemens ;; rtpc | rtpc-*) cpu=romp vendor=ibm ;; sde) cpu=mipsisa32 vendor=sde basic_os=${basic_os:-elf} ;; simso-wrs) cpu=sparclite vendor=wrs basic_os=vxworks ;; tower | tower-32) cpu=m68k vendor=ncr ;; vpp*|vx|vx-*) cpu=f301 vendor=fujitsu ;; w65) cpu=w65 vendor=wdc ;; w89k-*) cpu=hppa1.1 vendor=winbond basic_os=proelf ;; none) cpu=none vendor=none ;; leon|leon[3-9]) cpu=sparc vendor=$basic_machine ;; leon-*|leon[3-9]-*) cpu=sparc vendor=`echo "$basic_machine" | sed 's/-.*//'` ;; *-*) saved_IFS=$IFS IFS="-" read cpu vendor <&2 exit 1 ;; esac ;; esac # Here we canonicalize certain aliases for manufacturers. case $vendor in digital*) vendor=dec ;; commodore*) vendor=cbm ;; *) ;; esac # Decode manufacturer-specific aliases for certain operating systems. if test x"$basic_os" != x then # First recognize some ad-hoc cases, or perhaps split kernel-os, or else just # set os. obj= case $basic_os in gnu/linux*) kernel=linux os=`echo "$basic_os" | sed -e 's|gnu/linux|gnu|'` ;; os2-emx) kernel=os2 os=`echo "$basic_os" | sed -e 's|os2-emx|emx|'` ;; nto-qnx*) kernel=nto os=`echo "$basic_os" | sed -e 's|nto-qnx|qnx|'` ;; *-*) saved_IFS=$IFS IFS="-" read kernel os <&2 fi ;; *) echo "Invalid configuration '$1': OS '$os' not recognized" 1>&2 exit 1 ;; esac case $obj in aout* | coff* | elf* | pe*) ;; '') # empty is fine ;; *) echo "Invalid configuration '$1': Machine code format '$obj' not recognized" 1>&2 exit 1 ;; esac # Here we handle the constraint that a (synthetic) cpu and os are # valid only in combination with each other and nowhere else. case $cpu-$os in # The "javascript-unknown-ghcjs" triple is used by GHC; we # accept it here in order to tolerate that, but reject any # variations. javascript-ghcjs) ;; javascript-* | *-ghcjs) echo "Invalid configuration '$1': cpu '$cpu' is not valid with os '$os$obj'" 1>&2 exit 1 ;; esac # As a final step for OS-related things, validate the OS-kernel combination # (given a valid OS), if there is a kernel. case $kernel-$os-$obj in linux-gnu*- | linux-android*- | linux-dietlibc*- | linux-llvm*- \ | linux-mlibc*- | linux-musl*- | linux-newlib*- \ | linux-relibc*- | linux-uclibc*- | linux-ohos*- ) ;; uclinux-uclibc*- | uclinux-gnu*- ) ;; managarm-mlibc*- | managarm-kernel*- ) ;; windows*-msvc*-) ;; -dietlibc*- | -llvm*- | -mlibc*- | -musl*- | -newlib*- | -relibc*- \ | -uclibc*- ) # These are just libc implementations, not actual OSes, and thus # require a kernel. echo "Invalid configuration '$1': libc '$os' needs explicit kernel." 1>&2 exit 1 ;; -kernel*- ) echo "Invalid configuration '$1': '$os' needs explicit kernel." 1>&2 exit 1 ;; *-kernel*- ) echo "Invalid configuration '$1': '$kernel' does not support '$os'." 1>&2 exit 1 ;; *-msvc*- ) echo "Invalid configuration '$1': '$os' needs 'windows'." 1>&2 exit 1 ;; kfreebsd*-gnu*- | knetbsd*-gnu*- | netbsd*-gnu*- | kopensolaris*-gnu*-) ;; vxworks-simlinux- | vxworks-simwindows- | vxworks-spe-) ;; nto-qnx*-) ;; os2-emx-) ;; rtmk-nova-) ;; *-eabi*- | *-gnueabi*-) ;; none--*) # None (no kernel, i.e. freestanding / bare metal), # can be paired with an machine code file format ;; -*-) # Blank kernel with real OS is always fine. ;; --*) # Blank kernel and OS with real machine code file format is always fine. ;; *-*-*) echo "Invalid configuration '$1': Kernel '$kernel' not known to work with OS '$os'." 1>&2 exit 1 ;; esac # Here we handle the case where we know the os, and the CPU type, but not the # manufacturer. We pick the logical manufacturer. case $vendor in unknown) case $cpu-$os in *-riscix*) vendor=acorn ;; *-sunos* | *-solaris*) vendor=sun ;; *-cnk* | *-aix*) vendor=ibm ;; *-beos*) vendor=be ;; *-hpux*) vendor=hp ;; *-mpeix*) vendor=hp ;; *-hiux*) vendor=hitachi ;; *-unos*) vendor=crds ;; *-dgux*) vendor=dg ;; *-luna*) vendor=omron ;; *-genix*) vendor=ns ;; *-clix*) vendor=intergraph ;; *-mvs* | *-opened*) vendor=ibm ;; *-os400*) vendor=ibm ;; s390-* | s390x-*) vendor=ibm ;; *-ptx*) vendor=sequent ;; *-tpf*) vendor=ibm ;; *-vxsim* | *-vxworks* | *-windiss*) vendor=wrs ;; *-aux*) vendor=apple ;; *-hms*) vendor=hitachi ;; *-mpw* | *-macos*) vendor=apple ;; *-*mint | *-mint[0-9]* | *-*MiNT | *-MiNT[0-9]*) vendor=atari ;; *-vos*) vendor=stratus ;; esac ;; esac echo "$cpu-$vendor${kernel:+-$kernel}${os:+-$os}${obj:+-$obj}" exit # Local variables: # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "timestamp='" # time-stamp-format: "%:y-%02m-%02d" # time-stamp-end: "'" # End: libffcall-2.5/build-aux/install-sh0000775000000000000000000003611514641402034014071 00000000000000#!/bin/sh # install - install a program, script, or datafile scriptversion=2024-06-19.01; # UTC # This originates from X11R5 (mit/util/scripts/install.sh), which was # later released in X11R6 (xc/config/util/install.sh) with the # following copyright and license. # # Copyright (C) 1994 X Consortium # # Permission is hereby granted, free of charge, to any person obtaining a copy # of this software and associated documentation files (the "Software"), to # deal in the Software without restriction, including without limitation the # rights to use, copy, modify, merge, publish, distribute, sublicense, and/or # sell copies of the Software, and to permit persons to whom the Software is # furnished to do so, subject to the following conditions: # # The above copyright notice and this permission notice shall be included in # all copies or substantial portions of the Software. # # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE # X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN # AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC- # TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. # # Except as contained in this notice, the name of the X Consortium shall not # be used in advertising or otherwise to promote the sale, use or other deal- # ings in this Software without prior written authorization from the X Consor- # tium. # # # FSF changes to this file are in the public domain. # # Calling this script install-sh is preferred over install.sh, to prevent # 'make' implicit rules from creating a file called install from it # when there is no Makefile. # # This script is compatible with the BSD install script, but was written # from scratch. tab=' ' nl=' ' IFS=" $tab$nl" # Set DOITPROG to "echo" to test this script. doit=${DOITPROG-} doit_exec=${doit:-exec} # Put in absolute file names if you don't have them in your path; # or use environment vars. chgrpprog=${CHGRPPROG-chgrp} chmodprog=${CHMODPROG-chmod} chownprog=${CHOWNPROG-chown} cmpprog=${CMPPROG-cmp} cpprog=${CPPROG-cp} mkdirprog=${MKDIRPROG-mkdir} mvprog=${MVPROG-mv} rmprog=${RMPROG-rm} stripprog=${STRIPPROG-strip} posix_mkdir= # Desired mode of installed file. mode=0755 # Create dirs (including intermediate dirs) using mode 755. # This is like GNU 'install' as of coreutils 8.32 (2020). mkdir_umask=22 backupsuffix= chgrpcmd= chmodcmd=$chmodprog chowncmd= mvcmd=$mvprog rmcmd="$rmprog -f" stripcmd= src= dst= dir_arg= dst_arg= copy_on_change=false is_target_a_directory=possibly usage="\ Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE or: $0 [OPTION]... SRCFILES... DIRECTORY or: $0 [OPTION]... -t DIRECTORY SRCFILES... or: $0 [OPTION]... -d DIRECTORIES... In the 1st form, copy SRCFILE to DSTFILE. In the 2nd and 3rd, copy all SRCFILES to DIRECTORY. In the 4th, create DIRECTORIES. Options: --help display this help and exit. --version display version info and exit. -c (ignored) -C install only if different (preserve data modification time) -d create directories instead of installing files. -g GROUP $chgrpprog installed files to GROUP. -m MODE $chmodprog installed files to MODE. -o USER $chownprog installed files to USER. -p pass -p to $cpprog. -s $stripprog installed files. -S SUFFIX attempt to back up existing files, with suffix SUFFIX. -t DIRECTORY install into DIRECTORY. -T report an error if DSTFILE is a directory. Environment variables override the default commands: CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG RMPROG STRIPPROG By default, rm is invoked with -f; when overridden with RMPROG, it's up to you to specify -f if you want it. If -S is not specified, no backups are attempted. Report bugs to . GNU Automake home page: . General help using GNU software: ." while test $# -ne 0; do case $1 in -c) ;; -C) copy_on_change=true;; -d) dir_arg=true;; -g) chgrpcmd="$chgrpprog $2" shift;; --help) echo "$usage"; exit $?;; -m) mode=$2 case $mode in *' '* | *"$tab"* | *"$nl"* | *'*'* | *'?'* | *'['*) echo "$0: invalid mode: $mode" >&2 exit 1;; esac shift;; -o) chowncmd="$chownprog $2" shift;; -p) cpprog="$cpprog -p";; -s) stripcmd=$stripprog;; -S) backupsuffix="$2" shift;; -t) is_target_a_directory=always dst_arg=$2 # Protect names problematic for 'test' and other utilities. case $dst_arg in -* | [=\(\)!]) dst_arg=./$dst_arg;; esac shift;; -T) is_target_a_directory=never;; --version) echo "$0 (GNU Automake) $scriptversion"; exit $?;; --) shift break;; -*) echo "$0: invalid option: $1" >&2 exit 1;; *) break;; esac shift done # We allow the use of options -d and -T together, by making -d # take the precedence; this is for compatibility with GNU install. if test -n "$dir_arg"; then if test -n "$dst_arg"; then echo "$0: target directory not allowed when installing a directory." >&2 exit 1 fi fi if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then # When -d is used, all remaining arguments are directories to create. # When -t is used, the destination is already specified. # Otherwise, the last argument is the destination. Remove it from $@. for arg do if test -n "$dst_arg"; then # $@ is not empty: it contains at least $arg. set fnord "$@" "$dst_arg" shift # fnord fi shift # arg dst_arg=$arg # Protect names problematic for 'test' and other utilities. case $dst_arg in -* | [=\(\)!]) dst_arg=./$dst_arg;; esac done fi if test $# -eq 0; then if test -z "$dir_arg"; then echo "$0: no input file specified." >&2 exit 1 fi # It's OK to call 'install-sh -d' without argument. # This can happen when creating conditional directories. exit 0 fi if test -z "$dir_arg"; then if test $# -gt 1 || test "$is_target_a_directory" = always; then if test ! -d "$dst_arg"; then echo "$0: $dst_arg: Is not a directory." >&2 exit 1 fi fi fi if test -z "$dir_arg"; then do_exit='(exit $ret); exit $ret' trap "ret=129; $do_exit" 1 trap "ret=130; $do_exit" 2 trap "ret=141; $do_exit" 13 trap "ret=143; $do_exit" 15 # Set umask so as not to create temps with too-generous modes. # However, 'strip' requires both read and write access to temps. case $mode in # Optimize common cases. *644) cp_umask=133;; *755) cp_umask=22;; *[0-7]) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw='% 200' fi cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;; *) if test -z "$stripcmd"; then u_plus_rw= else u_plus_rw=,u+rw fi cp_umask=$mode$u_plus_rw;; esac fi for src do # Protect names problematic for 'test' and other utilities. case $src in -* | [=\(\)!]) src=./$src;; esac if test -n "$dir_arg"; then dst=$src dstdir=$dst test -d "$dstdir" dstdir_status=$? # Don't chown directories that already exist. if test $dstdir_status = 0; then chowncmd="" fi else # Waiting for this to be detected by the "$cpprog $src $dsttmp" command # might cause directories to be created, which would be especially bad # if $src (and thus $dsttmp) contains '*'. if test ! -f "$src" && test ! -d "$src"; then echo "$0: $src does not exist." >&2 exit 1 fi if test -z "$dst_arg"; then echo "$0: no destination specified." >&2 exit 1 fi dst=$dst_arg # If destination is a directory, append the input filename. if test -d "$dst"; then if test "$is_target_a_directory" = never; then echo "$0: $dst_arg: Is a directory" >&2 exit 1 fi dstdir=$dst dstbase=`basename "$src"` case $dst in */) dst=$dst$dstbase;; *) dst=$dst/$dstbase;; esac dstdir_status=0 else dstdir=`dirname "$dst"` test -d "$dstdir" dstdir_status=$? fi fi case $dstdir in */) dstdirslash=$dstdir;; *) dstdirslash=$dstdir/;; esac obsolete_mkdir_used=false if test $dstdir_status != 0; then case $posix_mkdir in '') # With -d, create the new directory with the user-specified mode. # Otherwise, rely on $mkdir_umask. if test -n "$dir_arg"; then mkdir_mode=-m$mode else mkdir_mode= fi posix_mkdir=false # The $RANDOM variable is not portable (e.g., dash). Use it # here however when possible just to lower collision chance. tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$ trap ' ret=$? rmdir "$tmpdir/a/b" "$tmpdir/a" "$tmpdir" 2>/dev/null exit $ret ' 0 # Because "mkdir -p" follows existing symlinks and we likely work # directly in world-writable /tmp, make sure that the '$tmpdir' # directory is successfully created first before we actually test # 'mkdir -p'. if (umask $mkdir_umask && $mkdirprog $mkdir_mode "$tmpdir" && exec $mkdirprog $mkdir_mode -p -- "$tmpdir/a/b") >/dev/null 2>&1 then if test -z "$dir_arg" || { # Check for POSIX incompatibility with -m. # HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or # other-writable bit of parent directory when it shouldn't. # FreeBSD 6.1 mkdir -m -p sets mode of existing directory. test_tmpdir="$tmpdir/a" ls_ld_tmpdir=`ls -ld "$test_tmpdir"` case $ls_ld_tmpdir in d????-?r-*) different_mode=700;; d????-?--*) different_mode=755;; *) false;; esac && $mkdirprog -m$different_mode -p -- "$test_tmpdir" && { ls_ld_tmpdir_1=`ls -ld "$test_tmpdir"` test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1" } } then posix_mkdir=: fi rmdir "$tmpdir/a/b" "$tmpdir/a" "$tmpdir" else # Remove any dirs left behind by ancient mkdir implementations. rmdir ./$mkdir_mode ./-p ./-- "$tmpdir" 2>/dev/null fi trap '' 0;; esac if $posix_mkdir && ( umask $mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir" ) then : else # mkdir does not conform to POSIX, # or it failed possibly due to a race condition. Create the # directory the slow way, step by step, checking for races as we go. case $dstdir in /*) prefix='/';; [-=\(\)!]*) prefix='./';; *) prefix='';; esac oIFS=$IFS IFS=/ set -f set fnord $dstdir shift set +f IFS=$oIFS prefixes= for d do test X"$d" = X && continue prefix=$prefix$d if test -d "$prefix"; then prefixes= else if $posix_mkdir; then (umask $mkdir_umask && $doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break # Don't fail if two instances are running concurrently. test -d "$prefix" || exit 1 else case $prefix in *\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;; *) qprefix=$prefix;; esac prefixes="$prefixes '$qprefix'" fi fi prefix=$prefix/ done if test -n "$prefixes"; then # Don't fail if two instances are running concurrently. (umask $mkdir_umask && eval "\$doit_exec \$mkdirprog $prefixes") || test -d "$dstdir" || exit 1 obsolete_mkdir_used=true fi fi fi if test -n "$dir_arg"; then { test -z "$chowncmd" || $doit $chowncmd "$dst"; } && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } && { test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false || test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1 else # Make a couple of temp file names in the proper directory. dsttmp=${dstdirslash}_inst.$$_ rmtmp=${dstdirslash}_rm.$$_ # Trap to clean up those temp files at exit. trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0 # Copy the file name to the temp name. (umask $cp_umask && { test -z "$stripcmd" || { # Create $dsttmp read-write so that cp doesn't create it read-only, # which would cause strip to fail. if test -z "$doit"; then : >"$dsttmp" # No need to fork-exec 'touch'. else $doit touch "$dsttmp" fi } } && $doit_exec $cpprog "$src" "$dsttmp") && # and set any options; do chmod last to preserve setuid bits. # # If any of these fail, we abort the whole thing. If we want to # ignore errors from any of these, just make sure not to ignore # errors from the above "$doit $cpprog $src $dsttmp" command. # { test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } && { test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } && { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } && { test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } && # If -C, don't bother to copy if it wouldn't change the file. if $copy_on_change && old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` && new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` && set -f && set X $old && old=:$2:$4:$5:$6 && set X $new && new=:$2:$4:$5:$6 && set +f && test "$old" = "$new" && $cmpprog "$dst" "$dsttmp" >/dev/null 2>&1 then rm -f "$dsttmp" else # If $backupsuffix is set, and the file being installed # already exists, attempt a backup. Don't worry if it fails, # e.g., if mv doesn't support -f. if test -n "$backupsuffix" && test -f "$dst"; then $doit $mvcmd -f "$dst" "$dst$backupsuffix" 2>/dev/null fi # Rename the file to the real destination. $doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null || # The rename failed, perhaps because mv can't rename something else # to itself, or perhaps because mv is so ancient that it does not # support -f. { # Now remove or move aside any old file at destination location. # We try this two ways since rm can't unlink itself on some # systems and the destination file might be busy for other # reasons. In this case, the final cleanup might fail but the new # file should still install successfully. { test ! -f "$dst" || $doit $rmcmd "$dst" 2>/dev/null || { $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null && { $doit $rmcmd "$rmtmp" 2>/dev/null; :; } } || { echo "$0: cannot unlink or rename $dst" >&2 (exit 1); exit 1 } } && # Now rename the file to the real destination. $doit $mvcmd "$dsttmp" "$dst" } fi || exit 1 trap '' 0 fi done # Local variables: # eval: (add-hook 'before-save-hook 'time-stamp) # time-stamp-start: "scriptversion=" # time-stamp-format: "%:y-%02m-%02d.%02H" # time-stamp-time-zone: "UTC0" # time-stamp-end: "; # UTC" # End: libffcall-2.5/ChangeLog0000664000000000000000000102402714665333607011764 000000000000002024-09-02 Bruno Haible Prepare for 2.5 release. * VERSION: Set to 2.5. * NEWS: Update. 2024-09-02 Bruno Haible Bump shared library version numbers. * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 1:1:1. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 2:1:1. * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Bump to 1:4:0. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Bump to 1:5:0. 2024-09-02 Bruno Haible build: Trim the code size of gnulib dependencies. * gnulib-local/modules/libffcall-imports: New file. * Makefile.maint (GNULIB_MODULES): Remove clean-temp-simple, hasmntopt, lock, vma-prot. Add libffcall-imports. (gnulib-m4/gnulib-cache.m4): Pass the options --local-dir and --conditional-dependencies to gnulib-tool. 2024-09-02 Bruno Haible vacall: Fix build failure on Haiku (x86_64). * vacall/Makefile.devel (vacall-x86_64-macro.S): On Haiku as well, use the variant compiled with -fPIC. Needed because without -fPIC, the .text section has a R_X86_64_PC32 relocation. 2024-08-29 Bruno Haible Avoid collision of different functions with the same name. * trampoline/cache-powerpc.c (__TR_clear_cache_3): Renamed from __TR_clear_cache. * trampoline/cache-powerpc64.c (__TR_clear_cache_3): Renamed from __TR_clear_cache. * trampoline/trampoline.c: On powerpc*, use __TR_clear_cache_3 instead of __TR_clear_cache. * callback/trampoline_r/cache-powerpc.c (__TR_clear_cache_2): Renamed from __TR_clear_cache. * callback/trampoline_r/cache-powerpc64.c (__TR_clear_cache_2): Renamed from __TR_clear_cache. * callback/trampoline_r/trampoline.c: On powerpc*, use __TR_clear_cache_2 instead of __TR_clear_cache. 2024-08-29 Bruno Haible trampoline: Drop support for K&R C compilers. * trampoline/cache.c (__TR_clear_cache): Use ANSI C syntax. * trampoline/trampoline.c (__TR_clear_cache_4, __TR_clear_cache): Declare with parameters. * callback/trampoline_r/trampoline.c (__TR_clear_cache_2, __TR_clear_cache): Likewise. 2024-08-29 Bruno Haible trampoline: Simplify code structure. * trampoline/trampoline.c (alloc_trampoline): Do the final mprotect call before filling out the trampoline. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2024-08-29 Bruno Haible trampoline: Fix test failure on OpenBSD/arm64. * Makefile.maint (GNULIB_MODULES): Add vma-prot. * trampoline/trampoline.c: Include vma-prot.h. (is_trampoline): On OpenBSD, test first whether the function's code is readable. * callback/trampoline_r/trampoline.c: Include vma-prot.h. (is_trampoline_r): On OpenBSD, test first whether the function's code is readable. * NEWS: Mention the improvement. 2024-08-29 Bruno Haible build: Verify the license of imported gnulib modules. * Makefile.maint (gnulib-m4/gnulib-cache.m4): Pass option --gpl=2 to gnulib-tool. 2024-08-25 Bruno Haible trampoline: Fix compilation error on Linux/hppa. * trampoline/trampoline.c (alloc_trampoline, is_trampoline): Use 'volatile' to block an invalid GCC optimization. * callback/trampoline_r/trampoline.c (alloc_trampoline_r, is_trampoline_r): Likewise. * NEWS: Mention it. 2024-08-25 Bruno Haible vacall: Fix build failure on Linux/hppa. * vacall/Makefile.devel (vacall-hppa-linux-pic.s): New rule. (vacall-hppa-macro.S): Combine the PIC and non-PIC code in a single file. 2024-08-25 Bruno Haible A simpler fix for Linux/ia64. * avcall/avcall-ia64.c (avcall_call): Revert last change. Use __builtin_alloca to allocate the stack frame. 2024-08-25 Bruno Haible Fix the support for Linux/ia64. In avcall, the l_l6J and l_l4K tests were failing. * avcall/avcall-ia64.c (avcall_call): Remove argframe variable. Don't make side effects on sp = r12. Instead, force the compiler to build a stack frame for up to 256 arguments. * NEWS: Mention the fix. 2024-08-24 Bruno Haible Fix shared library support in 32-bit mode on FreeBSD/powerpc64. * libtool-patches/libtool-freebsd-biarch.diff: New file, from . * libtool-patches/README: Mention it. * Makefile.maint (libtool-imported-files): Apply it. 2024-08-23 Bruno Haible Add support for FreeBSD 14/powerpc64. This is the first big-endian powerpc64-ELFv2 platform. * avcall/avcall-powerpc64.c (avcall_call): Add big-endian variant of the small-struct return handling code. * vacall/vacall-powerpc64.c (vacall_receiver): Likewise. * avcall/Makefile.devel (avcall-powerpc64-elfv2-linux.S): Include the code for both little-endian and big-endian platforms. * vacall/Makefile.devel (vacall-powerpc64-elfv2-linux.S): Likewise. * callback/vacall_r/Makefile.devel (vacall-powerpc64-elfv2-linux.S): Likewise. * NEWS: Mention the new port. 2024-08-23 Bruno Haible Add support for FreeBSD 14/powerpc64le. FreeBSD 14 breaks the long-standing convention that, on powerpc64, _BIG_ENDIAN is defined on big-endian machines only and _LITTLE_ENDIAN is defined on little-endian machines only. * avcall/avcall-internal.h: On powerpc64, test __BIG_ENDIAN__ or __LITTLE_ENDIAN__, not _BIG_ENDIAN or _LITTLE_ENDIAN, as FreeBSD 14 breaks the latter. * vacall/vacall-internal.h: Likewise. * NEWS: Mention the new port. 2024-08-21 Bruno Haible Add support for FreeBSD/powerpc and NetBSD/powerpc. * avcall/avcall-powerpc.c (avcall_call): Add support for structs returned in registers, of size 3, 5..7. Code copied from avcall-hppa.c. * avcall/avcall-internal.h (__av_reg_struct_return): Define differently for FreeBSD/powerpc and NetBSD/powerpc. * avcall/avcall.h (__AV_STRUCT_RETURN): Include the __AV_SMALL_STRUCT_RETURN flag on FreeBSD/powerpc and NetBSD/powerpc. * vacall/vacall-powerpc.c (vacall_receiver): Add support for structs returned in registers, of size 3, 5..7. Code copied from vacall-hppa.c. * vacall/vacall-internal.h (__va_reg_struct_return): Define differently for FreeBSD/powerpc and NetBSD/powerpc. * vacall/vacall.h (__VA_STRUCT_RETURN): Include the __VA_SMALL_STRUCT_RETURN flag on FreeBSD/powerpc and NetBSD/powerpc. * callback/vacall_r/vacall_r.h: Likewise. * NEWS: Mention the new ports. 2024-08-21 Bruno Haible Add support for Linux/riscv64 with musl libc. * trampoline/trampoline.c (__riscv_flush_icache): New declaration. * callback/trampoline_r/trampoline.c: Likewise. * NEWS: Mention the new port. 2024-08-20 Bruno Haible Fix support for older Linux versions (regression 2024-08-18). * trampoline/trampoline.c (is_usable_mount): Skip f_flags test if 'struct statfs' does not have this field. * callback/trampoline_r/trampoline.c: Likewise. 2024-08-20 Bruno Haible Fix support for FreeBSD 12/arm, broken by last commit. * m4/cc-gcc.m4 (CL_CC_GCC): Revert last change. * cross-tools/cross.conf (arm): Add cross-compiler for arm-linux-gnueabi. * configure.ac: If HOST_CPU_C_ABI is arm or armhf, add a '-old' or '-eabi' suffix. * avcall/avcall-arm.c (avcall_call): With GCC >= 4, use __builtin_alloca to reserve room for the stack frame. * avcall/avcall-armhf.c (avcall_call): Remove redundant stack pointer alignment. * avcall/Makefile.devel (avcall-arm-old-macro.S): Renamed from avcall-arm-macro.S. (avcall-arm-eabi-macro.S): New rule. (avcall-armhf-eabi-macro.S): Renamed from avcall-armhf-macro.S. Use gcc 6.5 option -masm-syntax-unified. * avcall/Makefile.in (avcall-arm-old.lo): Renamed from avcall-arm.lo. (avcall-arm-old.s): Renamed from avcall-arm.s. (avcall-arm-eabi.lo, avcall-arm-eabi.s): New rules. (avcall-armhf-eabi.lo): Renamed from avcall-armhf.lo. (avcall-armhf-eabi.s): Renamed from avcall-armhf.s. (clean, SOURCE_FILES): Update. * vacall/Makefile.devel (vacall-arm-old-linux.s): Renamed from vacall-arm-linux.s. (vacall-arm-old-linux-pic.s): Renamed from vacall-arm-linux-pic.s. (vacall-arm-old-macro.S): Renamed from vacall-arm-macro.S. (vacall-arm-eabi-linux.s, vacall-arm-eabi-linux-pic.s, vacall-arm-eabi-macro.S): New rules. (vacall-armhf-eabi-linux.s): Renamed from vacall-armhf-linux.s. Use gcc 6.5 option -masm-syntax-unified. (vacall-armhf-eabi-linux-pic.s): Renamed from vacall-armhf-linux-pic.s. Use gcc 6.5 option -masm-syntax-unified. (vacall-armhf-eabi-macro.S): Renamed from vacall-armhf-macro.S. * vacall/Makefile.in (vacall-arm-old.@OBJEXT@): Renamed from vacall-arm.@OBJEXT@. (vacall-arm-old.s): Renamed from vacall-arm.s. (vacall-arm-eabi.@OBJEXT@, vacall-arm-eabi.s): New rules. (vacall-armhf-eabi.@OBJEXT@): Renamed from vacall-armhf.@OBJEXT@. (vacall-armhf-eabi.s): Renamed from vacall-armhf.s. (clean, SOURCE_FILES): Update. * callback/vacall_r/Makefile.devel (vacall-arm-old-macro.S): Renamed from vacall-arm-macro.S. (vacall-arm-eabi-macro.S): New rule. (vacall-armhf-eabi-macro.S): Renamed from vacall-armhf-macro.S. Use gcc 6.5 option -masm-syntax-unified. * callback/vacall_r/Makefile.in (vacall-arm-old.lo): Renamed from vacall-arm.lo. (vacall-arm-old.s): Renamed from vacall-arm.s. (vacall-arm-eabi.lo, vacall-arm-eabi.s): New rules. (vacall-armhf-eabi.lo): Renamed from vacall-armhf.lo. (vacall-armhf-eabi.s): Renamed from vacall-armhf.s. (clean, SOURCE_FILES): Update. Add support for Android. * m4/cc-gcc.m4 (CL_CC_GCC): If using clang as compiler, add the option -no-integrated-as to GCC_X_NONE. * NEWS: Mention Android as supported. 2024-08-19 Bruno Haible trampoline: Fix portability problems to Android API levels < 30. * m4/codeexec.m4 (FFCALL_CODEEXEC): Test whether mmap()+mprotect works, independently of the result of whether malloc()+mprotect works. Test whether memfd_create exists at the given API level, before trying to use it. * trampoline/trampoline.c: On Android, prefer mmap()+mprotect to the temp file location approach. * callback/trampoline_r/trampoline.c: Likewise. 2024-08-19 Bruno Haible trampoline: Fix portability problems to Android API levels < 26. * configure.ac: Test for setmntent. * trampoline/trampoline.c: On Android, test HAVE_SETMNTENT, since API levels < 21 don't have the necessary functions. * callback/trampoline_r/trampoline.c: Likewise. * Makefile.maint (GNULIB_MODULES): Add hasmntopt. 2024-08-18 Bruno Haible trampoline: Try harder to find a temp file location on Linux, OpenBSD. Reported by Simon Dales on 2018-02-26. * trampoline/trampoline.c: Include , , or . (is_usable_mount, is_usable_mntent, local_rwx_tmp_dir): New functions. (for_mmap_init) [EXECUTABLE_VIA_MMAP_SHARED_POSIX]: Use local_rwx_tmp_dir. * callback/trampoline_r/trampoline.c: Likewise. 2024-08-18 Bruno Haible trampoline: Use anonymous memory also on NetBSD. * m4/codeexec.m4 (FFCALL_CODEEXEC): Add a test that may define HAVE_MMAP_SHARED_NETBSD_CAN_EXEC. * trampoline/trampoline.c (EXECUTABLE_VIA_MMAP_SHARED_NETBSD): New macro. (alloc_trampoline): Add alternative code for EXECUTABLE_VIA_MMAP_SHARED_NETBSD. * callback/trampoline_r/trampoline.c: Likewise. * NEWS: Mention the improvement. 2024-08-18 Bruno Haible trampoline: More reliable autoconfiguration on Linux, FreeBSD, NetBSD. * m4/codeexec.m4 (FFCALL_CODEEXEC): On Linux, FreeBSD, NetBSD, make the results of HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC and HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC only dependent on the OS, independent of configurable security policies. 2024-08-17 Bruno Haible trampoline: Work around failing mmap call on macOS 14, and use memfd_create on Linux and FreeBSD. Reported by Lorenzo Daneo at . * m4/codeexec.m4 (FFCALL_CODEEXEC): Rename HAVE_MMAP_SHARED_CAN_EXEC to HAVE_MMAP_SHARED_POSIX_CAN_EXEC. Add a test that may define HAVE_MMAP_SHARED_MACOS_CAN_EXEC. Add a test that may define HAVE_MMAP_SHARED_MEMFD_CAN_EXEC. * trampoline/trampoline.c: Test HAVE_MMAP_SHARED_POSIX_CAN_EXEC instead of HAVE_MMAP_SHARED_CAN_EXEC. (EXECUTABLE_VIA_MMAP_SHARED_POSIX): Renamed from EXECUTABLE_VIA_MMAP_FILE_SHARED. (EXECUTABLE_VIA_MMAP_SHARED_MACOS, EXECUTABLE_VIA_MMAP_SHARED_MEMFD): New macros. (mach_vm_remap) [EXECUTABLE_VIA_MMAP_SHARED_MACOS]: New declaration. (for_mmap_init): Add an alternative implementation for EXECUTABLE_VIA_MMAP_SHARED_MEMFD. (alloc_trampoline): Add alternative code for EXECUTABLE_VIA_MMAP_SHARED_MACOS. * callback/trampoline_r/trampoline.c: Likewise. * NEWS: Mention the improvements. 2024-07-12 Bruno Haible Switch to autoconf 2.72, automake 1.17. * configure.ac: Remove AC_PROG_GCC_TRADITIONAL invocation. * autogen.sh: Update comments. 2024-04-04 Bruno Haible Fix macro file 'serial' numbers for 'aclocal --install'. * m4/endianness.m4: Make 'serial' effective. 2023-09-18 Bruno Haible Fix shared library support on Android. * libtool-patches/libtool-android.diff: New file, from . * libtool-patches/README: Mention it. * Makefile.maint (libtool-imported-files): Apply it. 2023-08-30 Bruno Haible Recognize the *-*-windows* config triplets introduced on 2023-06-26. * m4/codeexec.m4 (FFCALL_CODEEXEC): Treat windows* as equivalent to mingw*. 2023-06-29 Bruno Haible Update the installation instructions for Windows. * INSTALL.windows: Add a note about MSYS2. 2023-05-21 Bruno Haible Support creating shared libraries on Hurd/x86_64. * libtool-patches/libtool-hurd-64.diff: New file, from https://lists.gnu.org/archive/html/bug-hurd/2023-05/msg00086.html. * libtool-patches/README: Mention it. * Makefile.maint (libtool-imported-files): Apply it. 2023-02-26 Bruno Haible Modernize handling of m4 macro dirs. Suggested by Sébastien Villemot . * configure.ac (AC_CONFIG_MACRO_DIRS): Specify the m4 macro dirs here. * Makefile.maint (aclocal.m4): ... not here. * autogen.sh: Update comments. 2023-02-09 Bruno Haible Fix compilation error with ISO C 23 compliant compilers. Note: The parameter list (...) was introduced in C23, for compatibility with C++. See ISO C 23 § 6.7.6.(1) definition of parameter-type-list and . * trampoline/trampoline.h (trampoline_function_t): For ISO C23, use the same syntax as for C++. * callback/trampoline_r/trampoline_r.h (__TR_function): Likewise. * callback/trampoline_r/test1.c (function): Likewise. * callback/trampoline_r/test2.c (function): Likewise. * callback/callback.h (callback_t): Likewise. 2022-07-18 Bruno Haible Make autopull.sh more suited for continuous integration. * autopull.sh: Support option --one-time. 2022-07-18 Bruno Haible Move gnulib-tool invocation back from autopull.sh to autogen.sh. * autogen.sh: Revert last change regarding gnulib. Improve comments. * autopull.sh: Only call 'gitsub.sh pull' and fetch libtool. 2022-07-17 Bruno Haible Split autogen.sh into autopull.sh and autogen.sh. * autopull.sh: New file, based on autogen.sh. * autogen.sh: Remove code that was moved to autopull.sh. Remove --skip-gnulib option. * Makefile.in (SOURCE_FILES): Add README-hacking, autogen.sh. * README-hacking: Mention autopull.sh. 2022-05-22 Bruno Haible Add GNU Project notice. * JOIN-GNU: New file. Inspired by a suggestion from José E. Marchesi on the gnu-prog-discuss mailing list. * README: Refer to it. * Makefile.in (SOURCE_FILES): Add it. 2022-05-15 Bruno Haible Switch to libtool 2.4.7. * autogen.sh (LIBTOOL_VERSION): Set to 2.4.7. * libtool-patches/libtool-midnightbsd-fix.diff: Remove file. * libtool-patches/README: Don't mention it. * Makefile.maint (libtool-imported-files): Don't apply it. 2022-05-08 Bruno Haible loongarch: Use the now-released GCC 12. * cross-tools/cross-build.sh: Fix typo in comment. (func_build_zstd): New function. (func_build_gcc): For GCC versions ≥ 12, build also zstd. * cross-tools/patches/gcc-12.1.0.patch: New file. * cross-tools/cross.conf (loongarch64): Use GCC 12.1.0. * avcall/Makefile.devel (avcall-loongarch64-linux.s): Force the use of GCC 12.1.0. * vacall/Makefile.devel (vacall-loongarch64-linux.s): Likewise. * callback/vacall_r/Makefile.devel (vacall-loongarch64-linux.s): Likewise. * trampoline/Makefile.devel (proto-loongarch64.s): Likewise. * callback/trampoline_r/Makefile.devel (proto-loongarch64.s): Likewise. * trampoline/proto-loongarch64.s: Regenerated. * callback/trampoline_r/proto-loongarch64.s: Regenerated. 2022-05-08 Bruno Haible riscv32: Add support for Linux/riscv32 with PIE-enabled GCC. * vacall/Makefile.devel (vacall-riscv32-ilp32d-linux-pic.s): New target. (vacall-riscv32-ilp32d-macro.S): Include code for the PIC and the non-PIC case. * vacall/Makefile.in (SOURCE_FILES): Add vacall-riscv32-ilp32d-linux-pic.s. 2022-05-08 Bruno Haible riscv64: Add support for Linux/riscv64 with PIE-enabled GCC. Reported by Raymond Wong at . * vacall/Makefile.devel (vacall-riscv64-lp64d-linux-pic.s): New target. (vacall-riscv64-lp64d-macro.S): Include code for the PIC and the non-PIC case. * vacall/Makefile.in (SOURCE_FILES): Add vacall-riscv64-lp64d-linux-pic.s. 2022-02-12 Bruno Haible loongarch: Fix gcc installation. * cross-tools/cross.conf (loongarch64): Change gcc version to match what it actually reports. 2022-02-12 Bruno Haible Fix cross-tools build. * cross-tools/cross-build.sh (func_build_gcc): Set LD_LIBRARY_PATH, so that libisl.so.15 gets found during installation. 2022-02-12 Bruno Haible loongarch: Allow for continuous integration. * cross-tools/cross-build.sh (func_build_gcc): Download fork tarball from alpha.gnu.org. Adjust installation completeness test. * cross-tools/cross.conf (loongarch64): Use binutils 2.38. 2022-01-16 Bruno Haible loongarch: Add support for loongarch64 ABI. * cross-tools/cross-build.sh (func_build_binutils): Add support for newer binutils snapshots. (func_build_gcc): Add support for GCC 10 and newer. * cross-tools/cross.conf: Add configuration for loongarch64 cross tools. * porting-tools/abis/call-used-registers.txt: Add info about loongarch64. * porting-tools/abis/reg-struct-return.txt: Likewise. * porting-tools/abis/stack-frame.txt: Likewise. Some more tweaks. * porting-tools/execstack/voidfunc.c: Add command for loongarch64. * porting-tools/execstack/voidfunc-loongarch64.o: New generated file. * porting-tools/execstack/main.c (voidfunc): Define also for loongarch. * porting-tools/execstack/README: Add info about loongarch64. * ffcall-abi.h: Add support for loongarch64-lp64. * common/asm-loongarch.sh: New file. * Makefile.in (SOURCE_FILES): Add it. * avcall/avcall.h (__AV_STRUCT_RETURN, __AV_REGISTER_STRUCT_RETURN): Add code for __loongarch64__. * avcall/avcall-alist.h (__av_alist): Likewise. * avcall/avcall-internal.h: Add code for __loongarch64__, especially __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word, __av_long, __av_ulong, __av_ptr, __av_longlong, __av_ulonglong, _av_float, _av_double, __av_struct. * avcall/avcall-loongarch64.c: New file, based on avcall/avcall-riscv64.c. * avcall/Makefile.devel (avcall-loongarch64-linux.s, avcall-loongarch64-macro.S): New targets. * avcall/Makefile.in (avcall-loongarch64.lo, avcall-loongarch64.s): New targets. (clean): Remove avcall-loongarch64.s. (SOURCE_FILES): Add avcall-loongarch64.c, avcall-loongarch64-linux.s, avcall-loongarch64-macro.S. * vacall/vacall.h (__VA_STRUCT_RETURN, __VA_REGISTER_STRUCT_RETURN): Add code for __loongarch64__. * vacall/vacall-internal.h: Add code for __loongarch64__, especially __va_alist, __va_reg_struct_return, __va_start_struct2, __va_arg_leftadjusted, __va_arg_adjusted, _va_arg_longlong, _va_arg_ulonglong, __va_align_double, _va_arg_float, _va_arg_double, __va_arg_struct, _va_return_longlong. * vacall/vacall-loongarch64.c: New file, based on vacall/vacall-riscv64.c. * vacall/Makefile.devel (vacall-loongarch64-linux.s, vacall-loongarch64-macro.S): New targets. * vacall/Makefile.in (vacall-loongarch64.@OBJEXT@, vacall-loongarch64.s): New targets. (clean): Remove vacall-loongarch64.s. (SOURCE_FILES): Add vacall-loongarch64.c, vacall-loongarch64-linux.s, vacall-loongarch64-macro.S. * callback/vacall_r/vacall_r.h (__VA_STRUCT_RETURN, __VA_REGISTER_STRUCT_RETURN): Add code for __loongarch64__. * callback/vacall_r/Makefile.devel (vacall-loongarch64-linux.s, vacall-loongarch64-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-loongarch64.lo, vacall-loongarch64.s): New targets. (clean): Remove vacall-loongarch64.s. (SOURCE_FILES): Add vacall-loongarch64-linux.s, vacall-loongarch64-macro.S. * trampoline/Makefile.devel (proto-loongarch64.s, tramp-loongarch64.o): New targets. * trampoline/proto-loongarch64.s: New generated file. * trampoline/tramp-loongarch64.s: New file. * trampoline/tramp-loongarch64.o: New generated file. * trampoline/trampoline.c: Implement for __loongarch64__. * callback/trampoline_r/Makefile.devel (proto-loongarch64.s, tramp-loongarch64.o): New targets. * callback/trampoline_r/proto64.c: Add code for __loongarch64__. * callback/trampoline_r/proto-loongarch64.s: New generated file. * callback/trampoline_r/tramp-loongarch64.s: New file. * callback/trampoline_r/tramp-loongarch64.o: New generated file. * callback/trampoline_r/trampoline.c: Implement for __loongarch64__. * callback/trampoline_r/test1.c: Add support for __loongarch64__. * PLATFORMS, */PLATFORMS: List the 64-bit LoongArch ABI. * NEWS: Mention the new port. 2022-01-16 Bruno Haible Simplify. * callback/vacall_r/Makefile.in (vacall-alpha.s, vacall-powerpc.s, vacall-s390.lo, vacall-s390x.s, vacall-riscv32-ilp32d.s, vacall-riscv64-lp64d.s): Don't use -I options during preprocessing. 2021-06-26 Bruno Haible x86_64: Create a read-only .eh_frame section on all platforms. Reported by Thomas Klausner at . * common/asm-x86_64.h (EH_FRAME_SECTION): Use flags "a" (instead of "aw") on all platforms. 2021-06-13 Bruno Haible maint: Don't require an internet connection for running autogen.sh. * libtool-patches: New directory. * Makefile.maint (libtool-imported-files): Don't call wget. Take the patches from libtool-patches/ instead. 2021-06-13 Bruno Haible Prepare for 2.4 release. * VERSION: Set to 2.4. 2021-06-13 Bruno Haible Bump shared library version numbers. * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 1:0:1. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 2:0:1. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Bump to 1:4:0. 2021-06-13 Bruno Haible Port to Solaris 11/SPARC 32-bit. * avcall/avcall-sparc.c (avcall_call): Use preallocated trampolines instead of generating a trampoline on the stack, because the stack is not executable on Solaris 11. * avcall/Makefile.devel (avcall-sparc-solaris.s, avcall-sparc-solaris-macro.S): New rules. * avcall/Makefile.in (SOURCE_FILES): Add avcall-sparc-solaris.s, avcall-sparc-solaris-macro.S. (avcall-sparc.s): Use a different input file on Solaris. * NEWS: Mention the new port. 2021-06-13 Bruno Haible Fix build error on FreeBSD 12/arm. * common/asm-arm.sh: Eliminate '.syntax divided' pseudo-ops. * NEWS: Mention the new port. 2021-06-13 Bruno Haible Fix build error on 64-bit MSVC, due to newer libtool. * avcall/Makefile.in (avcall-x86_64.lo) [IF_MSVC]: Use ml64 directly, without invoking libtool. * callback/vacall_r/Makefile.in (vacall-x86_64.lo) [IF_MSVC]: Likewise. 2021-06-12 Bruno Haible Finish port to macOS 11/arm64. * PLATFORMS, */PLATFORMS: Mention the macOS 11/arm64 port. * NEWS: Mention it as attained in release 2.4, not 2.3. 2021-06-12 Bruno Haible vacall: Fix regression on Linux/arm64. * common/asm-arm64.h: Fix mistake. 2021-06-12 Bruno Haible vacall, callback: Add support for macOS 11/arm64. * vacall/vacall.h (__varword): Define differently on macOS 11/arm64. * callback/vacall_r/vacall_r.h (__varword): Likewise. * vacall/vacall-internal.h (_va_arg_double): Update to allow for sizeof(__vaword) < sizeof(double). (__va_arg_struct): Compare type size with 2*sizeof(__varword). * vacall/Makefile.devel (vacall-arm64-macos-macro.S): New rule. * vacall/Makefile.in (SOURCE_FILES): Add vacall-arm64-macos-macro.S. (vacall-arm64.s): Use a different input file on macOS. * callback/vacall_r/Makefile.devel (vacall-arm64-macos-macro.S): New rule. * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-arm64-macos-macro.S. (vacall-arm64.s): Use a different input file on macOS. 2021-06-12 Bruno Haible vacall, callback: Distinguish a register word from a stack word. * vacall/vacall.h (__varword): New type. * callback/vacall_r/vacall_r.h (__varword): Likewise. * vacall/vacall-alist.h: Use it as as element type of iarg[]. * vacall/vacall-internal.h: Use it when assigning to an iargs[] element. * vacall/vacall-*.c: Use it for integer register variables. 2021-06-12 Bruno Haible avcall: Add support for macOS 11/arm64. * avcall/avcall-arm64.c: Update comment regarding stack words. * avcall/avcall.h (__avword): Define differently on macOS 11/arm64. * avcall/avcall-internal.h (__av_long, __av_ulong, __av_ptr): Define differently on macOS 11/arm64. (_av_double): Update to allow for sizeof(__avword) < sizeof(double). (__av_struct): Update to allow for sizeof(__avword) < sizeof(void*). * avcall/Makefile.devel (avcall-arm64-macos-macro.S): New rule. * avcall/Makefile.in (SOURCE_FILES): Add avcall-arm64-macos-macro.S. (avcall-arm64.s): Use a different input file on macOS. 2021-06-12 Bruno Haible avcall: Distinguish a register word from a stack word. * avcall/avcall.h (__avrword): New type. (avcall_start, av_start_struct): Use it as return type of func. * avcall/avcall-libapi.c (avcall_start, av_start_struct): Likewise. * avcall/avcall-alist.h: Use it as return type of func and as element type of iargs[]. * avcall/avcall-internal.h: Use it when assigning to an iargs[] element. * avcall/avcall-*.c: Use it for integer register variables. 2021-06-12 Bruno Haible avcall: Support calling conventions that pass 'int', 'long' differently. * avcall/avcall-internal.h (__av_int, __av_uint): New macros. * avcall/avcall-libapi.c (avcall_arg_int, avcall_arg_uint): New functions. * avcall/avcall.h (avcall_arg_int, avcall_arg_uint): New declarations. (av_char, av_schar, av_short, av_int, av_uchar, av_ushort, av_uint): Use them. 2021-06-12 Bruno Haible Support assembly language syntax expected by macOS 11/arm64. * common/asm-arm64.sh: New file, based on common/asm-arm.sh. * common/asm-arm64.h: New file, based on common/asm-arm.h. * Makefile.in (SOURCE_FILES): Add them. * avcall/Makefile.devel (avcall-arm64-macro.S): Use asm-arm64.sh, asm-arm64.h instead of asm-arm.sh, asm-arm.h. * vacall/Makefile.devel (vacall-arm64-macro.S): Use asm-arm64.sh, asm-arm64.h instead of asm-arm.sh, asm-arm.h. * callback/vacall_r/Makefile.devel (vacall-arm64-macro.S): Use asm-arm64.sh, asm-arm64.h instead of asm-arm.sh, asm-arm.h. 2021-06-11 Bruno Haible avcall: Remove handling of obsolete enum item '__AVword'. * avcall/avcall-*.c: Remove handling of '__AVword'. 2021-06-11 Bruno Haible Fix undefined behaviour in the tests. * testcases.c (us_cdcd): Cast from double (-30.4) to int to ushort, not directly to ushort. This avoids undefined behaviour (see ISO C 11 § 6.3.1.4.(2)). * vacall/tests.c (simulator): Update accordingly. * callback/tests.c (us_cdcd_simulator): Likewise. 2021-06-06 Bruno Haible Fix test crash with CC="gcc -ftrapv". * callback/trampoline_r/test1.c (f): Reorder summands, to avoid signed integer overflow. 2021-06-06 Bruno Haible Bump shared library version numbers. * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 0:3:0. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 1:3:0. * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Likewise. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Likewise. 2021-06-06 Bruno Haible Add support for xlclang compiler in 64-bit mode on AIX. * avcall/avcall.h (__AV_FLOAT_ARGS): Add __AV_AIXCC_FLOAT_ARGS on 64-bit xlclang. * vacall/vacall.h (__VA_FLOAT_ARGS): Add __VA_AIXCC_FLOAT_ARGS on 64-bit xlclang. * callback/vacall_r/vacall_r.h: Likewise. 2021-06-06 Bruno Haible vacall: Fix minitests crash on OpenBSD 6.5 and newer (x86_64). * vacall/Makefile.devel (vacall-x86_64-linux-pic.s): New target. (vacall-x86_64-macro.S): On OpenBSD, use the variant compiled with -fPIC. Needed because without -fPIC, the .eh_frame section has relocations. 2021-04-14 Bruno Haible build: Fix compilation error on FreeBSD 13.0/x86_64. * common/asm-x86_64.h (EH_FRAME_SECTION): On FreeBSD, use flags "a" instead of "aw". 2021-03-21 Bruno Haible trampoline: Work around failing mmap call on macOS 11. * Makefile.maint (GNULIB_MODULES): Add clean-temp-simple. * trampoline/trampoline.c: On macOS, define KEEP_TEMP_FILE_VISIBLE. (for_mmap_init): If KEEP_TEMP_FILE_VISIBLE, don't delete the file here, but instead register it for deletion when the process terminates. * callback/trampoline_r/trampoline.c: Likewise. 2021-02-28 Bruno Haible Update DEPENDENCIES. * DEPENDENCIES: Update some details. 2021-02-20 Bruno Haible build: Support creating shared libraries on MidnightBSD. * Makefile.maint (libtool-imported-files): Apply the patch from . 2021-02-20 Bruno Haible Switch to autoconf 2.71. * autogen.sh: Update comments. 2020-12-09 Bruno Haible Switch to autoconf 2.70. * configure.ac: Fix AC_CHECK_HEADERS invocation. Don't invoke AC_HEADER_STDC. * Makefile.maint (ACLOCAL, AUTOMAKE, AUTOCONF, AUTOHEADER): Remove the fixed version suffix. * autogen.sh: Update comments. * README-hacking: Indicate which versions of autoconf and automake are supported. 2020-12-09 Bruno Haible build: Fix syntax error in configure.ac (regression from 2020-07-19). * configure.ac: Fix syntax error. 2020-07-19 Bruno Haible trampoline, callback: Fix another multithread-safety bug. * trampoline/trampoline.c (alloc_trampoline): Invoke for_mmap_init before assigning pagesize, not after. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2020-07-19 Bruno Haible trampoline, callback: Fix a multithread-safety bug. * trampoline/trampoline.c (free_trampoline): Take the freelist_lock. * callback/trampoline_r/trampoline.c (free_trampoline_r): Likewise. 2020-07-19 Bruno Haible Use OS-provided functions for flushing the instruction cache. * trampoline/trampoline.c (alloc_trampoline): For flushing the instruction cache, use the OS-provided functions on Windows, macOS, AIX, IRIX, Solaris. * callback/trampoline_r/trampoline.c: Likewise. * configure.ac: Arrange to not build cache-sparc.o or cache-sparc64.o on Solaris. 2020-07-12 Bruno Haible build: Fix misuse of AC_CACHE_CHECK. * m4/codeexec.m4 (FFCALL_CODEEXEC): Use two AC_CACHE_CHECK invocations instead of one. Don't set ffcall_cv_func_mmap_works. 2020-07-12 Bruno Haible build: Avoid possible conflict with the broken AC_FUNC_MMAP. * trampoline/trampoline.c: Don't test HAVE_MMAP. * callback/trampoline_r/trampoline.c: Likewise. * m4/codeexec.m4 (FFCALL_CODEEXEC): Don't define HAVE_MMAP. 2020-07-12 Bruno Haible Drop portability to IRIX 4. * trampoline/trampoline.c (PROT_EXEC): Remove fallback definition. * callback/trampoline_r/trampoline.c (PROT_EXEC): Likewise. 2020-07-12 Bruno Haible build: Simplify autoconf macros. * m4/codeexec.m4: Include the code from m4/mmap.m4 and m4/mprotect.m4. * m4/mmap.m4: Remove file. * m4/mprotect.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove them. * configure.ac: Invoke just FFCALL_CODEEXEC, instead of FFCALL_MMAP, FFCALL_MPROTECT, FFCALL_CODEEXEC, FFCALL_CODEEXEC_PAX. 2020-07-12 Bruno Haible build: Use autoconf macros from gnulib. * Makefile.maint (GNULIB_FILES): New variable. (gnulib-imported-files): Import the $(GNULIB_FILES) from gnulib. * Makefile.in (GNULIB_IMPORTED_FILES): Add m4/mmap-anon.m4. * configure.ac: Invoke gl_FUNC_MMAP_ANON. * m4/mmap.m4 (FFCALL_MMAP): Require gl_FUNC_MMAP_ANON. Don't test MAP_ANON. Don't set HAVE_MMAP_ANON. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Require gl_FUNC_MMAP_ANON. Don't test HAVE_MMAP_ANON. 2020-07-12 Bruno Haible build: Simplify autoconf macros. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Assume that all platforms that have mprotect also have ENOTSUP. 2020-07-12 Bruno Haible build: Use common GNU style in autoconf macros. * m4/mmap.m4 (FFCALL_MMAP): Define HAVE_MMAP, HAVE_MMAP_ANON, HAVE_MMAP_ANONYMOUS, HAVE_MMAP_DEVZERO to 1, not empty. * m4/mprotect.m4 (FFCALL_MPROTECT): Define HAVE_WORKING_MPROTECT to 1, not empty. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Define HAVE_MMAP_SHARED_CAN_EXEC to 1, not empty. * trampoline/trampoline.c: Test these macros with #if, not #ifdef. * callback/trampoline_r/trampoline.c: Likewise. 2020-07-11 Bruno Haible build: Modernize autoconf macros. * m4/mmap.m4 (FFCALL_MMAP): Use AC_RUN_IFELSE instead of AC_TRY_RUN. * m4/mprotect.m4 (FFCALL_MPROTECT): Likewise. * m4/codeexec.m4 (FFCALL_CODEEXEC, FFCALL_CODEEXEC_PAX): Likewise. 2020-07-11 Bruno Haible Drop portability to OSF/1. * trampoline/trampoline.c: Assume HAVE_MACH_VM is not defined. * callback/trampoline_r/trampoline.c: Likewise. * configure.ac: Don't invoke CL_MACH_VM. * m4/mach-vm.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove it. 2020-07-11 Bruno Haible build: Simplify autoconf macros. * trampoline/trampoline.c (getpagesize): Declare only on HP-UX. Remove fallback definition. * callback/trampoline_r/trampoline.c (getpagesize): Likewise. * configure.ac: Don't invoke CL_GETPAGESIZE. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Declare getpagesize only on HP-UX. Remove its fallback definition. * m4/mprotect.m4 (FFCALL_MPROTECT): Don't require CL_GETPAGESIZE. Declare getpagesize only on HP-UX. Remove its fallback definition. * m4/getpagesize.m4: Remove file. * m4/proto.m4: Remove file. * m4/general.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove them. 2020-07-11 Bruno Haible build: Simplify autoconf macros. * configure.ac: Don't invoke FFCALL_SMALL_STRUCT_RETURN, FFCALL_IREG_FLOAT_RETURN. * m4/ireg.m4: Remove file. * m4/smallstruct.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove them. 2020-07-11 Bruno Haible build: Simplify. * Makefile.maint (GNULIB_MODULES): Remove 'longlong'. 2020-07-11 Bruno Haible build: Simplify autoconf macros. * m4/codeexec.m4 (CE_DOC): Remove macro. (FFCALL_CODEEXEC): Inline it. 2020-07-11 Bruno Haible build: Simplify autoconf macros. * m4/getpagesize.m4 (CL_GETPAGESIZE): Inline CL_LINK_CHECK invocation. * m4/mach-vm.m4 (CL_MACH_VM): Likewise. * m4/general.m4 (CL_CHECK, CL_LINK_CHECK): Remove macros. 2020-07-11 Bruno Haible trampoline: Remove option to allocate memory through shared memory. * trampoline/trampoline.c: Remove EXECUTABLE_VIA_SHM and its uses. * callback/trampoline_r/trampoline.c: Likewise. * configure.ac: Don't invoke CL_SHM_H, CL_SHM. * m4/shm.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove it. 2019-10-13 Bruno Haible build: Update after armv7l-linux-gnueabihf gcc version changed. * avcall/Makefile.devel (avcall-armhf-macro.S): Update. * vacall/Makefile.devel (vacall-armhf-linux.s, vacall-armhf-linux-pic.s): Likewise. * callback/vacall_r/Makefile.devel (vacall-armhf-macro.S): Likewise. 2019-10-13 Bruno Haible cross-tools: Fix compilation error of binutils 2.17 with makeinfo-6.x. * cross-tools/patches/binutils-2.17.patch: Fix sectioning in elf.texi. 2019-10-13 Bruno Haible cross-tools: Fix compilation error of binutils < 2.24 with makeinfo-6.1. This backports the fix from . * cross-tools/patches/binutils-2.12.90.0.7.patch: Escape @ characters inside @tex. * cross-tools/patches/binutils-2.16.1.patch: Likewise. * cross-tools/patches/binutils-2.17.patch: New file. 2019-10-09 Bruno Haible cross-tools: Fix compilation error for armhf CPU. * cross-tools/cross.conf (armhf): Use GCC version 6.5.0 instead of 6.3.0. * cross-tools/cross-build.sh (func_build_gcc): Expect GCC 6.x tarball in .xz format. 2019-10-08 Bruno Haible cross-tools: Work around error 500 on www.multiprecision.org. * cross-tools/cross-build.sh (func_build_mpc): Use alternate download location. 2019-10-08 Bruno Haible cross-tools: Reduce verbosity. * cross-tools/cross-build.sh (func_ensure_tarball): Use wget option '-nv'. 2019-09-01 Bruno Haible build: Add support for shallow-cloning of subdirectories. * gitsub.sh (func_usage): Document allowed git options with 'git pull'. (func_pull): Accept GIT_OPTIONS argument. (pull): Parse git options before complaining about too many arguments. Pass the git options to func_pull. 2019-08-29 Bruno Haible trampoline: Fix "illegal instruction" on mips32r6. Reported by Luyou Peng at . The instruction that, before mips32r6, encoded 'j $25' produces an "illegal instruction" on mips32r6. That instruction had the same effects as 'jal $0,$25'; this one works on mips32r6 and on all other MIPS ISAs. The assemblers and disassemblers were changed to map 'j $25' to 'jal $0,$25' and back automatically. * trampoline/trampoline.c (alloc_trampoline): On MIPS, use instruction 'jal $0,$25' instead of 'j $25'. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2019-08-28 Helmut Grohne (tiny change) Fix configure failure during a cross build. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Fix AC_TRY_RUN invocations. 2019-08-24 Bruno Haible Bump shared library version numbers. * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 0:2:0. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 1:2:0. * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Likewise. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Likewise. 2019-08-24 Bruno Haible hppa: Add comments about structure arguments. * avcall/avcall-hppa.c: Add comment. * avcall/avcall-internal.h (__av_struct): Likewise. * vacall/vacall-internal.h (__va_arg_struct): Likewise. 2019-08-24 Bruno Haible Add a test for by-value passing. * testcases.c (v_clobber_K): New function. * avcall/tests.c (by_value_tests): New function. (main): Invoke it. * vacall/tests.c (simulator, main): Test v_clobber_K. * callback/tests.c (v_clobber_K_simulator): New function. (main): Test it. 2019-08-24 Bruno Haible hppa: Implement correct floating-point argument passing on Linux. * avcall/avcall.h (__AV_ALIST_WORDS): Add comment. * avcall/avcall-alist.h (__av_alist) [__hppa__]: Add farg_mask, darg_mask. * avcall/avcall-internal.h (__av_start1) [__hppa__]: Initialize farg_mask, darg_mask. (_av_float) [__hppa__]: Set a bit in farg_mask. (_av_double) [__hppa__]: Set a bit in darg_mask. * avcall/avcall-hppa.c (avcall_call): Copy floating-point arguments among the first 4 words to %fr4L...%fr7L and %fr5,%fr7. * vacall/vacall-internal.h (_va_arg_float, _va_arg_double) [__hppa__]: For floating-point arguments among the first 4 words, use the value passed in floating-point registers. * PLATFORMS, */PLATFORMS: List the Linux/hppa ABI. * NEWS: Mention the new port. 2019-08-24 Bruno Haible hppa: Fix stack corruption in avcall. * avcall/avcall-hppa.c (avcall_call): Don't let GCC optimize away the stack-allocated array. * NEWS: Mention the fix. 2019-08-24 Bruno Haible Add another integer test. * testcases.c (i17, ..., i32): New variables. (i_i32): New function. * avcall/tests.c (int_tests): Test it. * vacall/tests.c (simulator, main): Likewise. * callback/tests.c (i_i32_simulator): New function. (main): Test it. 2019-08-24 Bruno Haible cross-tools: Add support for GCC 8 and 9. * cross-tools/cross-build.sh (func_build_gcc): Handle also GCC 8 and 9. 2019-08-21 Bruno Haible mips: Change the default 32-bit ABI from fp32 to fpxx. Reported by Sébastien Villemot at . He also found the trick with -fno-tree-dce. * porting-tools/abis/mips-abis.txt: New file. * cross-tools/cross.conf (mips): Use gcc 5 and binutils 2.27. * common/asm-mips.sh: Eliminate .nan and .module lines. * avcall/avcall-mipsn32.c (avcall_call): Use return value of __builtin_alloca instead of accessing the stack pointer directly. * avcall/Makefile.devel (avcall-mipseb-linux.s, avcall-mipsel-linux.s): Build with gcc 5, with option -mfpxx (for compatibility with current Debian), with -march=mips2 (required by -mfpxx), and -fno-tree-dce (required to avoid that gcc eliminates the __builtin_alloca call). (avcall-mipsn32eb-linux.s, avcall-mipsn32el-linux.s, avcall-mips64eb-linux.s, avcall-mips64el-linux.s): Build with gcc 5. * vacall/Makefile.devel (vacall-mipseb-linux.s, vacall-mipsel-linux.s): Build with gcc 5, with option -mfpxx (for compatibility with current Debian) and -march=mips2 (required by -mfpxx). (vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s, vacall-mips64eb-linux.s, vacall-mips64el-linux.s): Build with gcc 5. * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s, vacall-mipsel-linux.s): Build with gcc 5, with option -mfpxx (for compatibility with current Debian) and -march=mips2 (required by -mfpxx). (vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s, vacall-mips64eb-linux.s, vacall-mips64el-linux.s): Build with gcc 5. * NEWS: Mention the change. 2019-08-20 Bruno Haible riscv32: Add support for riscv32-ilp32d ABI. * cross-tools/cross.conf: Add configuration for riscv32 cross tools. * porting-tools/emulation/buildroot-riscv-2018-10-20-riscv32.config: New file. * porting-tools/emulation/tinyemu-riscv32.txt: New file. * porting-tools/emulation/README: Refer to it. * porting-tools/abis/README: Tweaks. * porting-tools/abis/call-used-registers.txt: Add info about riscv32. * porting-tools/abis/reg-struct-return.txt: Likewise. * porting-tools/abis/stack-frame.txt: Likewise. * porting-tools/execstack/voidfunc.c: Add command for riscv32. * porting-tools/execstack/voidfunc-riscv32.o: New generated file. * porting-tools/execstack/README: Add info about riscv32. * ffcall-abi.h: Add support for riscv32-lp64. * configure.ac: Check for also on riscv32. * avcall/avcall.h (__AV_STRUCT_RETURN): Add code for __riscv32__. * avcall/avcall-alist.h (__av_alist): Likewise. * avcall/avcall-internal.h: Add code for __riscv32__, especially __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word, __av_longlong, __av_ulonglong, __av_arg_longlong, _av_float, _av_double, __av_struct. * avcall/avcall-riscv32.c: New file. * avcall/Makefile.devel (avcall-riscv32-ilp32d-linux.s, avcall-riscv32-ilp32d-macro.S): New targets. * avcall/Makefile.in (avcall-riscv32-ilp32d.lo, avcall-riscv32-ilp32d.s): New targets. (clean): Remove avcall-riscv32-ilp32d.s. (SOURCE_FILES): Add avcall-riscv32.c, avcall-riscv32-ilp32d-linux.s, avcall-riscv32-ilp32d-macro.S. * vacall/vacall.h (__VA_STRUCT_RETURN): Add code for __riscv32__. * vacall/vacall-internal.h: Add code for __riscv32__, especially __va_alist, __va_reg_struct_return, __va_start_struct2, __va_arg_leftadjusted, __va_arg_adjusted, _va_arg_longlong, _va_arg_ulonglong, __va_arg_longlong, __va_align_double, _va_arg_float, _va_arg_double, __va_arg_struct. * vacall/vacall-riscv32.c: New file. * vacall/Makefile.devel (vacall-riscv32-ilp32d-linux.s, vacall-riscv32-ilp32d-macro.S): New targets. * vacall/Makefile.in (vacall-riscv32-ilp32d.@OBJEXT@, vacall-riscv32-ilp32d.s): New targets. (clean): Remove vacall-riscv32-ilp32d.s. (SOURCE_FILES): Add vacall-riscv32.c, vacall-riscv32-ilp32d-linux.s, vacall-riscv32-ilp32d-macro.S. * callback/vacall_r/vacall_r.h (__VA_STRUCT_RETURN): Add code for __riscv32__. * callback/vacall_r/Makefile.devel (vacall-riscv32-ilp32d-linux.s, vacall-riscv32-ilp32d-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-riscv32-ilp32d.lo, vacall-riscv32-ilp32d.s): New targets. (clean): Remove vacall-riscv32-ilp32d.s. (SOURCE_FILES): Add vacall-riscv32-ilp32d-linux.s, vacall-riscv32-ilp32d-macro.S. * trampoline/Makefile.devel (proto-riscv32.s, tramp-riscv32.o): New targets. * trampoline/proto-riscv32.s: New generated file. * trampoline/tramp-riscv32.old.s: New file. * trampoline/tramp-riscv32.old.o: New generated file. * trampoline/tramp-riscv32.s: New file. * trampoline/tramp-riscv32.o: New generated file. * trampoline/trampoline.c: Implement for __riscv32__. * callback/trampoline_r/Makefile.devel (proto-riscv32.s, tramp-riscv32.o): New targets. * callback/trampoline_r/proto.c: Add code for __riscv32__. * callback/trampoline_r/proto-riscv32.s: New generated file. * callback/trampoline_r/tramp-riscv32.old.s: New file. * callback/trampoline_r/tramp-riscv32.old.o: New generated file. * callback/trampoline_r/tramp-riscv32.s: New file. * callback/trampoline_r/tramp-riscv32.o: New generated file. * callback/trampoline_r/trampoline.c: Implement for __riscv32__. * callback/trampoline_r/test1.c: Add support for __riscv32__. * PLATFORMS, */PLATFORMS: List the 32-bit RISC-V ABI. * NEWS: Mention the new port. 2019-08-19 Bruno Haible Add some more general-purpose args boundary tests. * testcases.c (l_l0J, l_l1J, l_l2J, l_l3J, l_l4J, l_l5J, l_l6J, l_l7J): New functions. * avcall/tests.c (gpargs_boundary_tests): Test them. * vacall/tests.c (simulator, main): Likewise. * callback/tests.c (l_l*J_simulator): New functions. (main): Test them. * porting-tools/abis/gpargs*.c: Add a corresponding test here as well. 2019-08-19 Bruno Haible riscv64: Fix bug regarding passing of more than 8 arguments. * porting-tools/abis/stack-frame.txt: Correct information about riscv64 ABI. * avcall/avcall-alist.h (__av_alist) [__riscv64__]: Remove ianum and iargs. * avcall/avcall-internal.h (__av_start1, __av_start_struct4, __av_long, __av_ulong, __av_ptr, _av_float, _av_double, __av_struct) [__riscv64__]: Change accordingly. * avcall/avcall-riscv64.c (avcall_call): Likewise. * vacall/vacall-internal.h (__va_arg_adjusted): Deal with a split struct that spans the 8th and 9th argument words. * vacall/vacall-riscv64.c (struct gpargsequence): New type. (vacall_receiver): Use it to make sure that room is allocated when a struct is passed that spans the 8th and 9th argument words. 2019-08-19 Bruno Haible arm64: Fix bug regarding passing of more than 8 arguments. * vacall/vacall-internal.h (__va_arg_adjusted): Bump (LIST)->ianum when switching from registers to the stack. * NEWS: Mention it. 2019-08-19 Bruno Haible avcall: Remove unnecessary parentheses. * avcall/avcall-internal.h (av_double, _av_float, _av_double): Remove unnecessary level of parentheses. 2019-05-11 Bruno Haible Update bug reporting instructions. * README: Tell users to report bugs in the bug tracker or by email. * cross-tools/cross-build.sh (func_usage): Likewise. 2019-04-01 Bruno Haible build: Separate git operations from build operations. * gitsub.sh: New file, from gnulib. * .gitmodules: New file. * autogen.sh: Remove all git operations. Look at GNULIB_SRCDIR environment variable. Ignore the GNULIB_TOOL environment variable. * README-hacking: Explain when to use gitsub.sh. 2019-01-19 Bruno Haible Record support for NetBSD/SPARC64. * PLATFORMS, */PLATFORMS: List this platform. 2018-05-04 Bruno Haible Simplify code. Drop support for Borland C++ on Windows. * common/asm-x86_64.h, common/asm-x86_64.sh, ffcall-stdint.h: Simplify 'defined _WIN32 || defined __WIN32__' to just 'defined _WIN32'. * avcall/avcall.h, avcall/avcall-alist.h: Likewise. * vacall/vacall.h, vacall/vacall-internal.h: Likewise. * callback/vacall_r/vacall_r.h: Likewise. * trampoline/trampoline.c: Likewise. * callback/trampoline_r/trampoline.c: Likewise. 2018-04-08 Bruno Haible riscv64: Add support for riscv64-lp64d ABI. * cross-tools/cross-build.sh (func_build_gcc): Add support for GCC 7.2.0 and 7.3.0. * cross-tools/cross.conf: Add configuration for riscv64 cross tools. * porting-tools/emulation/qemu-riscv64.txt: New file. * porting-tools/emulation/README: Refer to it. * porting-tools/abis/README: Tweaks. * porting-tools/abis/call-used-registers.txt: Add info about riscv64. * porting-tools/abis/reg-struct-return.txt: Likewise. * porting-tools/abis/stack-frame.txt: Likewise. * porting-tools/abis/function-pointer.txt: Clarify file locations. * porting-tools/execstack/voidfunc.c: Add command for riscv64. * porting-tools/execstack/voidfunc-riscv64.o: New generated file. * porting-tools/execstack/main.c (voidfunc): Define also for riscv. * porting-tools/execstack/README: Add info about riscv64. * ffcall-abi.h: Add support for riscv64-lp64. * common/asm-riscv.sh: New file. * Makefile.in (SOURCE_FILES): Add it. * configure.ac: Check for also on riscv64. * avcall/avcall.h (__AV_STRUCT_RETURN, __AV_REGISTER_STRUCT_RETURN): Add code for __riscv64__. * avcall/avcall-alist.h (__av_alist): Likewise. * avcall/avcall-internal.h: Add code for __riscv64__, especially __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word, __av_long, __av_ulong, __av_ptr, __av_longlong, __av_ulonglong, _av_float, _av_double, __av_struct. * avcall/avcall-riscv64.c: New file. * avcall/Makefile.devel (avcall-riscv64-lp64d-linux.s, avcall-riscv64-lp64d-macro.S): New targets. * avcall/Makefile.in (avcall-riscv64-lp64d.lo, avcall-riscv64-lp64d.s): New targets. (clean): Remove avcall-riscv64-lp64d.s. (SOURCE_FILES): Add avcall-riscv64.c, avcall-riscv64-lp64d-linux.s, avcall-riscv64-lp64d-macro.S. * vacall/vacall.h (__VA_STRUCT_RETURN, __VA_REGISTER_STRUCT_RETURN): Add code for __riscv64__. * vacall/vacall-internal.h: Add code for __riscv64__, especially __va_alist, __va_reg_struct_return, __va_start_struct2, __va_arg_leftadjusted, __va_arg_adjusted, _va_arg_longlong, _va_arg_ulonglong, __va_align_double, _va_arg_float, _va_arg_double, __va_arg_struct, _va_return_longlong. * vacall/vacall-riscv64.c: New file. * vacall/Makefile.devel (vacall-riscv64-lp64d-linux.s, vacall-riscv64-lp64d-macro.S): New targets. * vacall/Makefile.in (vacall-riscv64-lp64d.@OBJEXT@, vacall-riscv64-lp64d.s): New targets. (clean): Remove vacall-riscv64-lp64d.s. (SOURCE_FILES): Add vacall-riscv64.c, vacall-riscv64-lp64d-linux.s, vacall-riscv64-lp64d-macro.S. * callback/vacall_r/vacall_r.h (__VA_STRUCT_RETURN, __VA_REGISTER_STRUCT_RETURN): Add code for __riscv64__. * callback/vacall_r/Makefile.devel (vacall-riscv64-lp64d-linux.s, vacall-riscv64-lp64d-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-riscv64-lp64d.lo, vacall-riscv64-lp64d.s): New targets. (clean): Remove vacall-riscv64-lp64d.s. (SOURCE_FILES): Add vacall-riscv64-lp64d-linux.s, vacall-riscv64-lp64d-macro.S. * trampoline/Makefile.devel (proto-riscv64.s, tramp-riscv64.o): New targets. * trampoline/proto-riscv64.s: New generated file. * trampoline/tramp-riscv64.s: New file. * trampoline/tramp-riscv64.o: New generated file. * trampoline/trampoline.c: Implement for __riscv64__. * callback/trampoline_r/Makefile.devel (proto-riscv64.s, tramp-riscv64.o): New targets. * callback/trampoline_r/proto64.c: Add code for __riscv64__. * callback/trampoline_r/proto-riscv64.s: New generated file. * callback/trampoline_r/tramp-riscv64.s: New file. * callback/trampoline_r/tramp-riscv64.o: New generated file. * callback/trampoline_r/trampoline.c: Implement for __riscv64__. * callback/trampoline_r/test1.c: Add support for __riscv64__. * PLATFORMS, */PLATFORMS: List the 64-bit RISC-V ABI. * NEWS: Mention the new port. 2018-04-08 Bruno Haible s390x: Trivial tweak. * avcall/avcall-s390x.c (avcall_call): Rename result variable from 'i' to 'iret'. 2018-02-26 Bruno Haible Add support for Linux/arm on Raspberry Pi. Reported by Simon Dales . * avcall/Makefile.devel (avcall-armhf-macro.S): Pass option '-march=armv6' to gcc. * vacall/Makefile.devel (vacall-arm-linux.s, vacall-arm-linux-pic.s): Likewise. * callback/vacall_r/Makefile.devel (vacall-armhf-macro.S): Likewise. * PLATFORMS, */PLATFORMS: List this platform. * NEWS: Mention this. 2018-02-24 Bruno Haible Add support for Linux/i386 with PIE-enabled gcc. * vacall/Makefile.devel (vacall-i386-linux-pic.s): New target. (vacall-i386-macro.S): Include code for the PIC and the non-PIC case. * vacall/Makefile.in (SOURCE_FILES): Add vacall-i386-linux-pic.s. 2018-02-18 Bruno Haible Avoid undesired compiler optimizations. Reported by Jerry James . * configure.ac (DISABLE_TYPE_BASED_ALIASING): New substituted variable. * avcall/Makefile.in (avcall-libapi.lo): Use it. * vacall/Makefile.in (vacall-libapi.o): Likewise. * callback/vacall_r/Makefile.in (vacall-libapi.lo): Likewise. 2018-02-17 Bruno Haible Bump version number. * VERSION: Set to 2.2. * NEWS: Open new section for 2.2. 2018-02-17 Bruno Haible Bump shared library version numbers. * Makefile.in (LIBFFCALL_VERSION_INFO): Bump to 0:1:0. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): Bump to 1:1:0. * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): Likewise. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): Likewise. 2018-02-17 Bruno Haible Add support for HardenedBSD. The fix was done in gnulib today. * NEWS: Mention this. 2018-02-17 Bruno Haible Add support for Linux/arm with PIE-enabled gcc. Reported by Nelson Beebe. * vacall/Makefile.devel (vacall-arm-linux.s, vacall-arm-linux-pic.s, vacall-armhf-linux.s, vacall-armhf-linux-pic.s): New targets. (vacall-arm-macro.S, vacall-armhf-macro.S): Include code for the PIC and the non-PIC case. * vacall/Makefile.in (SOURCE_FILES): Add vacall-arm*-linux*.s. 2018-02-17 Bruno Haible Add support for OpenBSD 6.1 and newer. Reported by Nelson Beebe. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Also test whether mprotect returns with errno=ENOTSUP. * NEWS: Mention this. 2018-01-30 Bruno Haible Verify support for Minix/i386. * PLATFORMS, */PLATFORMS: List this platform. 2018-01-27 Bruno Haible Rename some files. * INSTALL.windows: Renamed from README.windows. * INSTALL.os2: Renamed from README.os2. * Makefile.in (SOURCE_FILES): Update. 2018-01-09 Bruno Haible Make processing of assembly-language files work with GNU clisp. * common/asm-arm.sh: Don't introduce C() macro in .req lines. * common/asm-hppa.h (DEF): Don't use token-pasting operator here, since the result would not be a valid token. * common/asm-hppa64.h (DEF): Likewise. * common/asm-i386.h (INSN2SHCL): Omit the cl register only on Solaris. All other assemblers support it. (P2ALIGN): Use __SVR4, not __sun, to detect Solaris. * common/asm-i386.sh: Allow spaces instead of tabs after .type and .size. Recognize INSN2SHCL without assuming an 'shcl' macro. 2017-11-28 Bruno Haible mips, mipsn32, mips64: Improvement for ELF format. * common/asm-mips.h (DECLARE_FUNCTION): Test __ELF__, not __GNU__. 2017-11-25 Bruno Haible mips64: Fix crash on some real hardware mips64el (Octeon). Reported by Sébastien Villemot . Reminder: Some real MIPS hardware executes the "branch delay slot" after a branch or jump instruction. See * trampoline/trampoline.c (alloc_trampoline) [__mips64__]: Store the instructions as 32-bit words, so that the instructions come out as expected, regardless of the endianness. * trampoline/tramp-mips*.s: Update comments. * callback/trampoline_r/tramp-mips*.s: Likewise. 2017-10-29 Bruno Haible Verify support for Haiku/i386. * PLATFORMS, */PLATFORMS: List this platform. 2017-10-22 Bruno Haible x86_64-x32: Fix passing of pointers. * avcall/avcall-internal.h (__av_start_struct4, __av_ptr): For pointer values, use zero-extend instead of cast from 'void*' to '__avword'. * vacall/vacall-x86_64.c (vacall_receiver): For pointer values, use zero-extend instead of cast from 'void*' to '__vaword'. 2017-10-21 Bruno Haible Include libtool fix for Solaris 11.3. Reported at . * Makefile.maint (libtool-imported-files): Download and apply said fix. 2017-10-09 Bruno Haible Avoid build failures caused by parallel make. Reported by Riccardo G Corsi . * Makefile.in (GNUMAKEFLAGS): New variable. 2017-09-24 Bruno Haible Update NEWS. * NEWS: Mention the API changes in 2.0. 2017-09-15 Bruno Haible tests: Consistency. * avcall/tests.c (pointer_tests): Move before the mixed_number_tests. (gpargs_boundary_tests): Fix weakness in the f_f17l3L test. 2017-09-12 Bruno Haible sparc: Verify support for NetBSD. * PLATFORMS, */PLATFORMS: List this platform. 2017-09-11 Bruno Haible Bump version number. * VERSION: Set to 2.1. * NEWS: Open new section for 2.1. 2017-09-10 Bruno Haible Install the libraries as shared libraries by default. * configure.ac (LT_INIT): Remove option 'disable-shared'. * README: Remove outdated text. * NEWS: Mention the change. 2017-09-10 Bruno Haible Install a library named libffcall. * ffcall-version.c: New file. * ffcall-version.in.h: Rename double-inclusion guard. (ffcall_get_version): New declaration. * Makefile.in: Add variables for using libtool. (LIBFFCALL_EXPORTED_SYMBOLS_REGEX, LIBFFCALL_VERSION_INFO): New variables. (all-subdirs, ffcall-version.lo, libffcall.la): New targets. (all): Depend on them. (install): Install also libffcall.la. (installdirs): Create also $(libdir). (uninstall): Uninstall also libffcall.la. (MOSTLYCLEANDIRS, MOSTLYCLEANFILES): New variables. (mostlyclean, clean, distclean, maintainer-clean): Delete these. (SOURCE_FILES): Add ffcall-version.c. * README: Mention libffcall.{a,so}. Mark libavcall and libcallback as deprecated. * NEWS: Mention the change. 2017-09-10 Bruno Haible Move the backward compatibility code to separate object files. * avcall/avcall-compat.c: New file, extracted from avcall/avcall-libapi.c. * avcall/Makefile.in (SOURCE_FILES): Add it. (avcall-compat.lo): New target. (OBJECTS): Add it. * avcall/avcall-libapi.c (__builtin_avcall): Remove function. * callback/callback-compat.c: New file, extracted from callback/callback-libapi.c. * callback/Makefile.in (SOURCE_FILES): Add it. (callback-compat.lo): New target. (libcallback.la): Include it. * callback/callback-libapi.c (trampoline_r_data0): Remove function. 2017-09-10 Bruno Haible vacall: Fix build failure with gcc configured with --enable-default-pie. Works around a GCC bug, reported at . * configure.ac (WORKAROUND_BUG_81653): New variable. * vacall/Makefile.in (vacall-sparc.@OBJEXT@, vacall-sparc.s): Use it. 2017-09-10 Bruno Haible Fix build failure "error: narrowing conversion" with g++ on arm. * testcases.c (C5): Cast -1 to 'char' explicitly. 2017-09-10 Bruno Haible Fix build failure with --enable-shared on Solaris/x86 with cc. * common/asm-i386.h: Test __SVR4, not __svr4__. 2017-09-10 Bruno Haible Support building shared libraries on native Windows. * configure.ac (LT_INIT): Add option 'win32-dll'. * avcall/Makefile.in (avcall-x86_64.lo): Copy object file into .libs/ directory. * callback/vacall_r/Makefile.in (vacall-x86_64.lo): Likewise. 2017-09-09 Bruno Haible i386: Verify support for Hurd. * NEWS: List this platform. 2017-09-09 Bruno Haible x86_64: Verify support for FreeBSD, NetBSD, OpenBSD. * PLATFORMS, */PLATFORMS: List these platforms. * NEWS: Likewise. 2017-09-09 Bruno Haible i386: Restore support for FreeBSD, NetBSD, OpenBSD, DragonFly BSD. * avcall/avcall.h (__AV_STRUCT_RETURN): Enable __AV_SMALL_STRUCT_RETURN on FreeBSD/i386, OpenBSD/i386, DragonFly/i386. * vacall/vacall.h (__VA_STRUCT_RETURN): Enable __VA_SMALL_STRUCT_RETURN on FreeBSD/i386, OpenBSD/i386, DragonFly/i386. * callback/vacall_r/vacall_r.h: Likewise. * avcall/avcall-i386.c: Update comments. * vacall/vacall-i386.c (vacall_receiver): Return the structure address in %eax also for other platforms than MSVC. * PLATFORMS, */PLATFORMS: List these platforms. * NEWS: Likewise. 2017-09-09 Bruno Haible i386: Assume MSVC struct return convention also on 32-bit mingw. * avcall/avcall.h (__AV_STRUCT_RETURN): Enable __AV_MSVC_STRUCT_RETURN on 32-bit mingw. * vacall/vacall.h (__VA_STRUCT_RETURN): Enable __VA_MSVC_STRUCT_RETURN on 32-bit mingw. * callback/vacall_r/vacall_r.h: Likewise. * NEWS: Mention the fix. 2017-09-09 Bruno Haible vacall: Fix warnings on DragonFly BSD. * vacall/vacall-internal.h (__va_start, __va_arg): Undefine first. 2017-09-09 Bruno Haible avcall, vacall: Optimize struct return of small structs. * avcall/avcall-arm64.c (avcall_call): Add alternative optimized code for struct return. * avcall/avcall-hppa.c (avcall_call): Likewise. * avcall/avcall-ia64.c (avcall_call): Likewise. * avcall/avcall-mipsn32.c (avcall_call): Likewise. * avcall/avcall-mips64.c (avcall_call): Likewise. * avcall/avcall-powerpc64.c (avcall_call): Likewise. * avcall/avcall-sparc64.c (avcall_call): Likewise. * avcall/avcall-x86_64.c (avcall_call): Likewise. * avcall/avcall-x86_64-windows.c (avcall_call): Likewise. * avcall/avcall-hppa64.c (avcall_call): Likewise, but don't enable it. * vacall/vacall-arm64.c (vacall_receiver): Add alternative optimized code for struct return. * vacall/vacall-hppa.c (vacall_receiver): Likewise. * vacall/vacall-ia64.c (vacall_receiver): Likewise. * vacall/vacall-mipsn32.c (vacall_receiver): Likewise. * vacall/vacall-mips64.c (vacall_receiver): Likewise. * vacall/vacall-powerpc64.c (vacall_receiver): Likewise. * vacall/vacall-sparc64.c (vacall_receiver): Likewise. * vacall/vacall-x86_64.c (vacall_receiver): Likewise. * vacall/vacall-x86_64-windows.c (vacall_receiver): Likewise. * vacall/vacall-hppa64.c (vacall_receiver): Likewise. 2017-09-09 Bruno Haible avcall, vacall: Align code style. * avcall/avcall-hppa.c (avcall_call): Use variable name 'iret', like for the other ABIs. * avcall/avcall-ia64.c: Likewise. * avcall/avcall-arm64.c (avcall_call): Use variable names 'iret' and 'iret2', like for the other ABIs. * avcall/avcall-x86_64.c: Likewise. * avcall/avcall-sparc64.c (avcall_call): Use variable names 'iret', 'iret2', 'iret3', 'iret4', for consistency. * vacall/vacall-sparc64 (vacall_receiver): Likewise. 2017-09-09 Bruno Haible x86_64: Remove register pressure on gcc. * avcall/avcall-x86_64.c: Don't declare iarg[1-6]. (avcall_call): Pass the integer arguments through arguments. * avcall/avcall-x86_64-windows.c: Don't declare iarg[1-4]. (avcall_call): Pass the integer arguments through arguments. * vacall/vacall-x86_64.c: Don't declare iarg[1-6]. (vacall_receiver): Use another way to save the integer registers. * vacall/vacall-x86_64-windows.c: Don't declare iarg[1-4]. 2017-09-09 Bruno Haible Fix preprocessor warning "does not give a valid preprocessing token". * common/asm-i386.h (NUM): Don't use token concatenation between '$' and a possibly negative number. * common/asm-x86_64.h (NUM): Likewise. 2017-09-09 Bruno Haible hppa64: Simplify trampoline. * trampoline/tramp-hppa64-old.s: Renamed from trampoline/tramp-hppa64.s. * trampoline/tramp-hppa64-old.o: Renamed from trampoline/tramp-hppa64.o. * trampoline/tramp-hppa64-macro.S: New file. * trampoline/Makefile.in (tramp-hppa64.lo, tramp-hppa64.s): New targets. (clean): Remove tramp-hppa64.s. (SOURCE_FILES): Add tramp-hppa64-macro.S. * trampoline/trampoline.c: Distinguish __hppa64old__ and __hppa64new__. Implement trampoline for __hppa64new__. * callback/trampoline_r/tramp-hppa64-old.s: Renamed from callback/trampoline_r/tramp-hppa64.s. * callback/trampoline_r/tramp-hppa64-old.o: Renamed from callback/trampoline_r/tramp-hppa64.o. * callback/trampoline_r/tramp-hppa64-macro.S: New file. * callback/trampoline_r/Makefile.in (tramp-hppa64.lo, tramp-hppa64.s): New targets. (clean): Remove tramp-hppa64.s. (SOURCE_FILES): Add tramp-hppa64-macro.S. * callback/trampoline_r/trampoline.c: Distinguish __hppa64old__ and __hppa64new__. Implement trampoline for __hppa64new__. * configure.ac (CPU_OBJECTS): Augment with tramp-hppa64.lo. 2017-09-09 Bruno Haible hppa64: Add support for HP-PA in 64-bit mode on HP-UX. * cross-tools/cross.conf: Add configuration for hppa64 cross tools. * porting-tools/abis/README: Add details about platforms where function pointers are actually pointers to some struct. * porting-tools/abis/call-used-registers.txt: Add info about hppa64. Fix info about hppa. * porting-tools/abis/reg-struct-return.txt: Add info about hppa64. * porting-tools/abis/stack-frame.txt: Likewise. * porting-tools/execstack/voidfunc-hppa64.o: New file. * common/asm-hppa64.h: New file. * common/asm-hppa64.sh: New file. * Makefile.in (SOURCE_FILES): Add them. * avcall/avcall.h (__AV_REGISTER_STRUCT_RETURN): Add code for __hppa64__. * avcall/avcall-alist.h (__av_alist): Likewise. * avcall/avcall-internal.h: Add code for __hppa64__, especially __av_start1, __av_reg_struct_return, __av_start_struct4, __av_word, __av_longlong, __av_ulonglong, _av_float, _av_double, __av_struct_leftadjusted, __av_struct. * avcall/avcall-hppa64.c: New file. * avcall/Makefile.devel (avcall-hppa64-linux.s, avcall-hppa64-macro.S): New targets. * avcall/Makefile.in (avcall-hppa64.lo, avcall-hppa64.s): New targets. (clean): Remove avcall-hppa64.s. (SOURCE_FILES): Add avcall-hppa64.c, avcall-hppa64-linux.s, avcall-hppa64-macro.S. * vacall/vacall.h (__VA_REGISTER_STRUCT_RETURN): Add code for __hppa64__. * vacall/vacall-internal.h: Add code for __hppa64__, especially __va_alist, __va_reg_struct_return, __va_start_struct2, __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted, _va_arg_longlong, _va_arg_ulonglong, __va_align_double, _va_arg_float, _va_arg_double, __va_arg_struct, _va_return_longlong. * vacall/vacall-hppa64.c: New file. * vacall/Makefile.devel (vacall-hppa64-linux.s, vacall-hppa64-macro.S): New targets. * vacall/Makefile.in (vacall-hppa64.@OBJEXT@, vacall-hppa64.s): New targets. (clean): Remove vacall-hppa64.s. (SOURCE_FILES): Add vacall-hppa64.c, vacall-hppa64-linux.s, vacall-hppa64-macro.S. * callback/vacall_r/vacall_r.h (__VA_REGISTER_STRUCT_RETURN): Add code for __hppa64__. * callback/vacall_r/Makefile.devel (vacall-hppa64-linux.s, vacall-hppa64-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-hppa64.lo, vacall-hppa64.s): New targets. (clean): Remove vacall-hppa64.s. (SOURCE_FILES): Add vacall-hppa64-linux.s, vacall-hppa64-macro.S. * trampoline/Makefile.devel (cache-hppa64-linux.s, cache-hppa64-macro.S): New targets. (proto-hppa64.s, tramp-hppa64.o): New targets. * trampoline/proto-hppa64.s: New generated file. * trampoline/tramp-hppa64.s: New file. * trampoline/tramp-hppa64.o: New generated file. * trampoline/tramp-hppa-macro.S: Fix comment. * trampoline/cache-hppa.c: Add code for __hppa64__. * trampoline/trampoline.c: Implement for __hppa64__. * trampoline/Makefile.in (cache-hppa64.lo, cache-hppa64.s): New targets. (clean): Remove cache-hppa64.s. (SOURCE_FILES): Add cache-hppa64-linux.s, cache-hppa64-macro.S. * callback/trampoline_r/Makefile.devel (cache-hppa64-linux.s, cache-hppa64-macro.S): New targets. (proto-hppa64.s, tramp-hppa64.o): New targets. * callback/trampoline_r/proto64.c: Add code for __hppa64__. * callback/trampoline_r/proto-hppa64.s: New generated file. * callback/trampoline_r/tramp-hppa64.s: New file. * callback/trampoline_r/tramp-hppa64.o: New generated file. * callback/trampoline_r/tramp-hppa-macro.S: Fix comment. * callback/trampoline_r/trampoline.c: Implement for __hppa64__. * callback/trampoline_r/test1.c: Add support for __hppa64__. * callback/trampoline_r/Makefile.in (cache-hppa64.lo, cache-hppa64.s): New targets. (clean): Remove cache-hppa64.s. (SOURCE_FILES): Add cache-hppa64-linux.s, cache-hppa64-macro.S. * configure.ac (CPU_OBJECTS): Augment also for hppa64 ABI. * PLATFORMS, */PLATFORMS: List the 64-bit HP-PA machine. * NEWS: Mention the new port. 2017-09-09 Bruno Haible Don't violate ISO C rules. * avcall/avcall-internal.h (__av_struct): Don't store an unaligned pointer in (LIST).aptr. 2017-09-09 Bruno Haible Assume the C preprocessor discards // comments. * common/asm-i386.h: Renamed from common/asm-i386.hh. * Makefile.maint (common/asm-i386.h): Remove target. * Makefile.in (SOURCE_FILES): Add common/asm-i386.h. Remove common/asm-i386.hh. (GENERATED_FILES): Remove common/asm-i386.h. 2017-09-09 Bruno Haible avcall: Optimize struct return of small structs. * avcall/avcall-*.c: Cache l->raddr in a local variable. 2017-09-09 Bruno Haible x86_64: Improve processing of assembly-language files. * common/asm-x86_64.sh: Eliminate #APP and #NO_APP directives. In the MEM* patterns, recognize all 64-bit register names. 2017-09-09 Bruno Haible Fix compilation error on HP-UX (regression from 2017-09-03). * avcall/avcall-libapi.c: Include before ffcall-stdint.h. 2017-09-03 Bruno Haible i386: Align processing of assembly-language files with x86_64 case. * common/asm-i386.hh (INSN2MOVXL): Renamed from INSN2MOVX. * common/asm-i386.sh: Generate INSN2MOVXL instead of INSN2MOVX. 2017-09-03 Bruno Haible i386: Provide disambiguating size prefixes in more cases. * common/asm-i386.sh: Introduce size prefixes also for the second operand of instructions with two operands. 2017-09-03 Bruno Haible i386: Simplify processing of assembly-language files. * common/asm-i386.sh: Remove unused introduction of FUNEND. Remove no-op rule for GLOBL. 2017-09-03 Bruno Haible x86_64: Add support for MSVC 14. * common/asm-x86_64.h (R, NUM, ADDR, ADDR_PCRELATIVE, X1, X2, X4, X8, MEM, MEM_DISP, MEM_INDEX, MEM_SHINDEX, MEM_DISP_SHINDEX0, MEM_DISP_SHINDEX, MEM_PCRELATIVE, INDIR, INSNCONC, INSN1, INSN2, INSN2S, INSN2MOVXL, INSN2MOVXQ, INSN2MOVXLQ, _): New macros. (TEXT, P2ALIGN, DECLARE_FUNCTION, FUNBEGIN, FUNEND): Implement for MSVC. * common/asm-x86_64.sh: Generate instructions as macros that may expand into AT&T syntax or MSVC syntax. * avcall/Makefile.in (avcall-x86_64.lo): Use a different rule for MSVC. (clean): Remove also avcall-x86_64.asm. * vacall/Makefile.in (vacall-x86_64.@OBJEXT@): Use a different rule for MSVC. (clean): Remove also vacall-x86_64.asm. * callback/vacall_r/Makefile.in (vacall-x86_64.lo): Use a different rule for MSVC. (clean): Remove also vacall-x86_64.asm. * PLATFORMS, */PLATFORMS: List the 64-bit mingw machine. * NEWS: Mention the new port. 2017-09-03 Bruno Haible x86_64: Add support for mingw. * avcall/avcall.h (__AV_LLP64): New macro. (__avword): Use it. * avcall/avcall-alist.h (__av_alist): Change fields of type 'unsigned long' to 'uintptr_t'. * avcall/avcall-internal.h (__av_longlong): Update implementation for LLP64 platforms. * vacall/vacall.h (__VA_LLP64): New macro. (__vaword): Use it. * callback/vacall_r/vacall_r.h: Likewise. * vacall/vacall-internal.h (__va_alist): Change fields of type 'unsigned long' to 'uintptr_t'. Don't assume that 'long long' is the same as 'long' on x86_64. (_va_arg_longlong, _va_arg_ulonglong, _va_return_longlong, _va_return_ulonglong): Update implementation for LLP64 platforms. * PLATFORMS, */PLATFORMS: List the 64-bit mingw machine. * NEWS: Mention the new port. 2017-09-03 Bruno Haible Fix warnings on 64-bit native Windows. * avcall/tests.c (pointer_tests): Use %p to display the value of a pointer. * vacall/tests.c (main): Likewise, * callback/tests.c (main): Likewise, 2017-09-03 Bruno Haible Add support for platforms where sizeof(long) < sizeof(void*). * ffcall-stdint.h: New file. * Makefile.in (SOURCE_FILES): Add it. * avcall/avcall-internal.h: Include ffcall-stdint.h. Use [u]intptr_t instead of 'long', 'unsigned long', or '__avword' where appropriate. * vacall/vacall-internal.h: Include ffcall-stdint.h. Use [u]intptr_t instead of 'long', 'unsigned long', or '__vaword' where appropriate. * Makefile.maint (GNULIB_MODULES): Add stdint. * trampoline/trampoline.c: Include . Use [u]intptr_t instead of 'long' or 'unsigned long' where appropriate. For __x86_64__, use 'unsigned long long' instead of 'unsigned long'. * callback/trampoline_r/trampoline.c: Likewise. * callback/trampoline_r/test1.c (f): Use 'void*' instead of 'long' to access env. 2017-09-03 Bruno Haible x86_64: Add support for Cygwin. * porting-tools/abis/call-used-registers.txt: Add info about x86_64-ms ABI. * porting-tools/abis/reg-struct-return.txt: Likewise. * porting-tools/abis/stack-frame.txt: Likewise. * common/asm-x86_64.h: Add support for compilers on Windows. (TEXT, GLOBL): New macros. * common/asm-x86_64.sh: Truncate the EH_FRAME_SECTION also on Windows. Eliminate .file pseudo-op. Macroize .text, .p2align, .globl directives. * avcall/avcall-alist.h (__x86_64_ms__, __x86_64_sysv__): New macros. (__av_alist): Add support for __x86_64_ms__. * avcall/avcall-internal.h (__av_start1, __av_reg_struct_return, __av_start_struct3, __av_start_struct4, __av_word, _av_float, _av_double, __av_struct): Add support for __x86_64_ms__. * avcall/avcall-x86_64.c: Improve comments. * avcall/avcall-x86_64-windows.c: New file. * avcall/Makefile.devel (avcall-x86_64-windows.s, avcall-x86_64-windows-macro.S): New targets. * avcall/Makefile.in (avcall-x86_64.s): On Windows, use avcall-x86_64-windows-macro.S. (SOURCE_FILES): Add avcall-x86_64-windows.c, avcall-x86_64-windows.s, avcall-x86_64-windows-macro.S. * vacall/vacall-internal.h (__x86_64_ms__, __x86_64_sysv__): New macros. (__VA_FARG_NUM): Define also for __mipsn32__ || __mips64__. (__va_alist): Add support for __x86_64_ms__. (__va_reg_struct_return, __va_start_struct1, __va_start_struct2, __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted, _va_arg_float, _va_arg_double, __va_arg_struct): Likewise. * vacall/vacall-x86_64.c: Update comments. * vacall/vacall-x86_64-windows.c: New file. * vacall/Makefile.devel (vacall-x86_64-windows.s, vacall-x86_64-windows-macro.S): New targets. * vacall/Makefile.in (vacall-x86_64.s): On Windows, use vacall-x86_64-windows-macro.S. (SOURCE_FILES): Add vacall-x86_64-windows.c, vacall-x86_64-windows.s, vacall-x86_64-windows-macro.S. * callback/vacall_r/Makefile.devel (vacall-x86_64-windows.s, vacall-x86_64-windows-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-x86_64.s): On Windows, use vacall-x86_64-windows-macro.S. (SOURCE_FILES): Add vacall-x86_64-windows.s, vacall-x86_64-windows-macro.S. * PLATFORMS, */PLATFORMS: List the 64-bit Cygwin machine. * NEWS: Mention the new port. 2017-09-03 Bruno Haible Remove special build infrastructure for MSVC. The generic one works. * avcall/Makefile.msvc: Remove file. * avcall/Makefile.in (SOURCE_FILES): Remove it. * vacall/Makefile.maint (config.h.msvc): Remove target. (totally-clean): Don't remove config.h.msvc. * vacall/Makefile.msvc: Remove file. * vacall/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.msvc. * trampoline/Makefile.maint (config.h.msvc): Remove target. (totally-clean): Don't remove config.h.msvc. * trampoline/Makefile.msvc: Remove file. * trampoline/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.msvc. * callback/vacall_r/Makefile.maint (config.h.msvc): Remove target. (totally-clean): Don't remove config.h.msvc. * callback/vacall_r/Makefile.msvc: Remove file. * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.msvc. * callback/trampoline_r/Makefile.maint (config.h.msvc): Remove target. (totally-clean): Don't remove config.h.msvc. * callback/trampoline_r/Makefile.msvc: Remove file. * callback/trampoline_r/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.msvc. * callback/Makefile.maint (vacall_r/config.h.msvc, trampoline_r/config.h.msvc): Remove targets. * callback/Makefile.msvc: Remove file. * callback/Makefile.in (SOURCE_FILES): Remove it. * Makefile.msvc: Remove file. * Makefile.in (SOURCE_FILES): Remove it. 2017-09-03 Bruno Haible Make the generic build infrastructure work on MSVC. * m4/as-underscore.m4: Rely on gl_ASM_SYMBOL_PREFIX from gnulib. Don't define ASM_UNDERSCORE any more. * configure.ac: Set IF_MSVC, IFNOT_MSVC. * common/asm-i386.hh: Fix P2ALIGN parameter list. * common/asm-i386.sh: Improve handling of indirect calls and jmps. * avcall/Makefile.in: Use OBJEXT. (avcall-i386.lo): Use a different rule for MSVC. * vacall/Makefile.devel: Transform 'vacall_function' before the asm-i386.sh script, not afterwards. * vacall/Makefile.in: Use OBJEXT. (vacall-i386.o): Use a different rule for MSVC. * trampoline/trampoline.c: On native Windows, when CODE_EXECUTABLE is not defined, use VirtualAlloc. * trampoline/Makefile.in: Use OBJEXT. * callback/vacall_r/get_receiver.c: New file. * callback/vacall_r/Makefile.maint (vacall-i386-msvc.c): Use the C source code of callback_get_receiver. * callback/vacall_r/Makefile.in: Use OBJEXT. (vacall-i386.lo): Use a different rule for MSVC. (SOURCE_FILES): Add get_receiver.c. * callback/trampoline_r/trampoline.c: On native Windows, when CODE_EXECUTABLE is not defined, use VirtualAlloc. * callback/trampoline_r/Makefile.in: Use OBJEXT. * callback/Makefile.in: Use OBJEXT. * README.win32: Remove file. * README.windows: New file, from GNU gettext. * Makefile.in (SOURCE_FILES): Remove README.win32. Add README.windows. * PLATFORMS, */PLATFORMS: List the 32-bit mingw and MSVC machine. * NEWS: Mention MSVC support. 2017-09-03 Bruno Haible Don't use symbolic links for .h files. MSVC 14 does not follow the symbolic links set by Cygwin's 'ln -s'. * trampoline/Makefile.in (LN_S): Remove variable. * callback/trampoline_r/Makefile.in (LN_S): Remove variable. * callback/Makefile.in (INCLUDES): Add an -I option for vacall_r.h. (LN_S): Remove variable. (vacall_r.h, trampoline_r.h): Remove targets. (callback-libapi.lo): Use explicit -I option for trampoline_r.h. Update dependencies. (test1.o, minitests.o, minitests.s, minitests-c++.o, tests.o, tests.s): Update dependencies. (MOSTLYCLEANFILES): Remove vacall_r.h, trampoline_r.h. * configure.ac: Don't invoke CL_PROG_LN_S. 2017-09-03 Bruno Haible Remove special build infrastructure for mingw. The generic one works. * avcall/Makefile.maint (avcall-i386-mingw32.c): Remove target. (totally-clean): Don't remove avcall-i386-mingw32.c. * avcall/Makefile.mingw32: Remove file. * avcall/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove avcall-i386-mingw32.c. * vacall/Makefile.maint (config.h.mingw32, vacall-i386-mingw32.c): Remove targets. (totally-clean): Don't remove config.h.mingw32, vacall-i386-mingw32.c. * vacall/Makefile.mingw32: Remove file. * vacall/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.mingw32, vacall-i386-mingw32.c. * trampoline/Makefile.maint (config.h.mingw32): Remove target. (totally-clean): Don't remove config.h.mingw32. * trampoline/Makefile.mingw32: Remove file. * trampoline/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.mingw32. * callback/vacall_r/Makefile.maint (config.h.mingw32, vacall-i386-mingw32.c): Remove targets. (totally-clean): Don't remove config.h.mingw32, vacall-i386-mingw32.c. * callback/vacall_r/Makefile.mingw32: Remove file. * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.mingw32, vacall-i386-mingw32.c). * callback/trampoline_r/Makefile.maint (config.h.mingw32): Remove target. (totally-clean): Don't remove config.h.mingw32. * callback/trampoline_r/Makefile.mingw32: Remove file. * callback/trampoline_r/Makefile.in (SOURCE_FILES): Remove it. (GENERATED_FILES): Remove config.h.mingw32. * callback/Makefile.maint (vacall_r/config.h.mingw32, vacall_r/vacall-i386-mingw32.c, trampoline_r/config.h.mingw32): Remove targets. * callback/Makefile.mingw32: Remove file. * callback/Makefile.in (SOURCE_FILES): Remove it. * Makefile.mingw32: Remove file. * Makefile.in (SOURCE_FILES): Remove it. 2017-09-03 Bruno Haible Fix leftover files after "make distclean" (regression from 2017-08-27). * avcall/Makefile.in (distclean): Also remove minitests-c++.output.*. * vacall/Makefile.in (distclean): Likewise. * callback/Makefile.in (DISTCLEANFILES): Add minitests-c++.output.*. 2017-08-27 Bruno Haible Enable building shared libraries on Windows. * avcall/Makefile.in (libavcall.la): Pass option '-no-undefined' to $(LIBTOOL_LINK). * trampoline/Makefile.in (libtrampoline.la): Likewise. * callback/vacall_r/Makefile.in (libvacall.la): Likewise. * callback/trampoline_r/Makefile.in (libtrampoline.la): Likewise. * callback/Makefile.in (libcallback.la): Likewise. 2017-08-27 Bruno Haible Do proper versioning of shared libraries. * avcall/Makefile.in (LIBAVCALL_VERSION_INFO): New variable. (libavcall.la): Use libtool option -version-info. * trampoline/Makefile.in (LIBTRAMPOLINE_VERSION_INFO): New variable. (libtrampoline.la): Use libtool option -version-info. * callback/Makefile.in (LIBCALLBACK_VERSION_INFO): New variable. (libcallback.la): Use libtool option -version-info. * README: Remove statement of problem. Update figures about code size. * NEWS: Mention the change. 2017-08-27 Bruno Haible Fix warnings on 64-bit native Windows. * testcases.c (vp_vpdpcpsp): Use %p to display the value of a pointer. * vacall/tests.c (simulator): Likewise. * callback/tests.c (vp_vpdpcpsp_simulator): Likewise, 2017-08-27 Bruno Haible Remove code duplication of test cases. * testcases.c: New file, extracted from avcall/tests.c. * Makefile.in (SOURCE_FILES): Add it. * avcall/tests.c: Remove testcases functions. Include testcases.c instead. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. * porting-tools/abis/README: Update. 2017-08-27 Bruno Haible avcall: Fix weakness in tests (added on 2017-01-29). * avcall/tests.c (ll_l2ll, ll_l3ll, ll_l4ll, ll_l5ll, ll_l6ll, ll_l7ll): Use a temporary variable of type 'long long'. 2017-08-27 Bruno Haible vacall, callback: Remove workarounds for obsolete platforms. * vacall/tests.c: Remove workarounds for SunOS 4 cc, gcc-2.5, gcc-2.7.x. * callback/tests.c: Likewise. 2017-08-27 Bruno Haible Add tests that verify the C++ support. * Makefile.maint (GNULIB_MODULES): Add ansi-c++-opt. * configure.ac: Invoke gl_PROG_ANSI_CXX. Set IF_CXX. * avcall/minitests-c++.cc: New file. * avcall/Makefile.in (CXX, CXXFLAGS): New variables. (minitests-c++.o, minitests-c++): New targets. (check): Optionally, test also minitests-c++. (clean): Remove minitests-c++.o, minitests-c++, minitests-c++.out. (SOURCE_FILES): Add minitests-c++.cc. * vacall/minitests-c++.cc: New file. * vacall/Makefile.in (CXX, CXXFLAGS): New variables. (minitests-c++.o, minitests-c++): New targets. (check): Optionally, test also minitests-c++. (clean): Remove minitests-c++.o, minitests-c++, minitests-c++.out. (SOURCE_FILES): Add minitests-c++.cc. * trampoline/test2-c++.cc: New file. * trampoline/test2.c (main): Don't test &main in C++ mode. * trampoline/Makefile.in (CXX, CXXFLAGS): New variables. (test2-c++.o, test2-c++): New targets. (check): Optionally, test also test2-c++. (clean): Remove test2-c++.o, test2-c++. (SOURCE_FILES): test2-c++.cc. * callback/minitests-c++.cc: New file. * callback/Makefile.in (CXX, CXXFLAGS): New variables. (minitests-c++.o, minitests-c++): New targets. (check): Optionally, test also minitests-c++. (MOSTLYCLEANFILES): Add minitests-c++.o, minitests-c++, minitests-c++.out. (SOURCE_FILES): Add minitests-c++.cc. 2017-08-27 Bruno Haible Add support for SUNWspro C++ on Solaris. * avcall/avcall.h: Treat SUNWspro C++ like SUNWspro C. * vacall/vacall.h: Likewise. * callback/vacall_r/vacall_r.h: Likewise. 2017-08-27 Bruno Haible Make the include files C++-safe. * avcall/avcall.h: Add C++ guards. (__AV_alignof): Test __IBM__ALIGNOF__. Use template-based definition for C++. * vacall/vacall.h: Add C++ guards. (__VA_alignof): Test __IBM__ALIGNOF__. Use template-based definition for C++. * callback/vacall_r/vacall_r.h: Add C++ guards. (__VA_alignof): Test __IBM__ALIGNOF__. Use template-based definition for C++. 2017-08-27 Bruno Haible Make sure the tests use only the public include files. * avcall/tests.c: Don't include config.h. * vacall/tests.c: Don't include config.h. * callback/tests.c: Likewise. * callback/trampoline_r/test1.c: Likewise. Include ffcall-abi.h instead. * avcall/Makefile.in (avcall-libapi.lo): Use $(INCLUDES). * vacall/Makefile.in (INCLUDES): Remove -I options that reference gnulib-lib. (INCLUDES_WITH_GNULIB): New variable. (vacall-libapi.o): Use INCLUDES_WITH_GNULIB instead of INCLUDES. * trampoline/Makefile.in (INCLUDES): Remove -I options that reference gnulib-lib. (INCLUDES_WITH_GNULIB): New variable. (trampoline.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES. * callback/vacall_r/Makefile.in (INCLUDES): Remove -I options that reference gnulib-lib. (INCLUDES_WITH_GNULIB): New variable. (vacall-libapi.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES. * callback/trampoline_r/Makefile.in (INCLUDES): Remove -I options that reference gnulib-lib. (INCLUDES_WITH_GNULIB): New variable. (trampoline.lo): Use INCLUDES_WITH_GNULIB instead of INCLUDES. 2017-08-27 Bruno Haible Make recognition of Solaris more robust. * avcall/avcall.h: Test for '__sun', not for 'sun'. * vacall/vacall.h: Likewise. * callback/vacall_r/vacall_r.h: Likewise. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. 2017-08-27 Bruno Haible avcall: Align field names. * avcall/avcall-alist.h (__av_alist): Rename field 'farg' to 'fargs'. * avcall/avcall-internal.h (_av_float): Update. * avcall/avcall-mipsn32.c (avcall_call): Likewise. * avcall/avcall-mips64.c (avcall_call): Likewise. 2017-08-27 Bruno Haible Remove support for old NeXTstep. * avcall/avcall.h (__AV_NEXTGCC_STRUCT_RETURN): Remove enum value. * avcall/avcall-internal.h (__av_start_struct4) [__i386__]: Remove test for __AV_NEXTGCC_STRUCT_RETURN. * avcall/avcall-i386.c (avcall_call): Likewise. * avcall/PLATFORMS: Update. * vacall/vacall.h (__VA_NEXTGCC_STRUCT_RETURN): Remove enum value. * callback/vacall_r/vacall_r.h: Likewise. * vacall/vacall-internal.h (__va_start_struct2) [__i386__]: Remove test for __VA_NEXTGCC_STRUCT_RETURN. * vacall/vacall-i386.c (vacall_receiver): Likewise. * trampoline/trampoline.c: Don't include . * callback/trampoline_r/trampoline.c: Likewise. 2017-08-27 Bruno Haible hppa: Remove support for old gcc-2.6.3. * avcall/avcall.h (__AV_OLDGCC_STRUCT_RETURN): Remove enum value. * avcall/avcall-internal.h (__av_reg_struct_return) [__hppa__]: Remove test for __AV_OLDGCC_STRUCT_RETURN. * avcall/avcall-hppa.c (avcall_call): Likewise. * vacall/vacall.h (__VA_OLDGCC_STRUCT_RETURN): Remove enum value. * callback/vacall_r/vacall_r.h (__VA_OLDGCC_STRUCT_RETURN): Likewise. * vacall/vacall-internal.h (__va_reg_struct_return) [__hppa__]: Remove test for __VA_OLDGCC_STRUCT_RETURN. * vacall/vacall-hppa.c (vacall_receiver): Likewise. 2017-08-27 Bruno Haible avcall: Evaluate __AV_ALIST_WORDS only during av_start_* macros. Part 2. * avcall/avcall-alist.h (__av_alist) [__hppa__]: Add 'args_end' field. * avcall/avcall-internal.h (__av_start1) [__hppa__]: Initialize it. * avcall/avcall-hppa.c (avcall_call): Use it to reduce the use of __AV_ALIST_WORDS. 2017-08-27 Bruno Haible avcall: Fix overflow detection bug on hppa. * avcall/avcall-internal.h (__av_struct) [__hppa__]: Use LIST.eptr instead of &LIST.args[0]. 2017-08-27 Bruno Haible Fix build failure with --enable-shared on Solaris/SPARC with cc. * common/asm-sparc.h: Test __SVR4, not __svr4__. * common/asm-sparc.sh: Fix comment about postprocessing. * avcall/Makefile.in (avcall-sparc.s, avcall-sparc64.s): Remove space after '#'. * vacall/Makefile.in (vacall-sparc.s, vacall-sparc64.s): Likewise. * trampoline/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise. * callback/vacall_r/Makefile.in (vacall-sparc.s, vacall-sparc64.s): Likewise. * callback/trampoline_r/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise. 2017-08-27 Bruno Haible vacall: Fix build failure with gcc configured with --enable-default-pie. Works around a GCC bug, reported at . * vacall/Makefile.devel (vacall-sparc-linux-pic.s): New target. (vacall-sparc-macro.S): Combine vacall-sparc-linux.s and vacall-sparc-linux-pic.s in one file. (vacall-sparc64-linux-pic.s): New target. (vacall-sparc64-macro.S): Combine vacall-sparc64-linux.s and vacall-sparc64-linux-pic.s in one file. * vacall/Makefile.in (SOURCE_FILES): Add vacall-sparc-linux-pic.s, vacall-sparc64-linux-pic.s. 2017-08-27 Bruno Haible mips: Avoid warning about undeclared function 'cacheflush' on Linux. * trampoline/trampoline.c: On Linux, include , not . * callback/trampoline_r/trampoline.c: Likewise. 2017-08-27 Bruno Haible vacall: Fix struct returns on mips (o32 ABI). * vacall/vacall-mips.c (vacall_receiver): Return the struct return address in register $2. 2017-08-27 Bruno Haible ia64: Test __GNUC__ only in av/va_start_* (regression from 2017-07-30). * avcall/avcall.h (__AV_OLDGCC_STRUCT_ARGS): New enum item. (__AV_STRUCT_ARGS): Use it. * avcall/avcall-internal.h (__av_struct) [__ia64__]: Test flag __AV_OLDGCC_STRUCT_ARGS, not __GNUC__. * vacall/vacall.h (__VA_OLDGCC_STRUCT_ARGS): New enum item. (__VA_STRUCT_ARGS): Use it. * callback/vacall_r/vacall_r.h: Likewise. * vacall/vacall-internal.h (__va_arg_struct): Test flag __VA_OLDGCC_STRUCT_ARGS, not __GNUC__. 2017-08-27 Bruno Haible Fix "make check" failure on Linux/mips (regression from 2017-07-30). * ffcall-abi.h: For mipsn32, test _MIPS_SIM, because defines both _ABIO32 and _ABIN32. 2017-07-31 Bruno Haible Fix preprocessor warning "does not give a valid preprocessing token". Reported by Reini Urban at . * common/asm-arm.sh: Don't put a colon inside the C() or L() argument. * common/asm-i386.sh: Likewise. * common/asm-m68k.sh: Likewise. * common/asm-sparc.sh: Likewise. * common/asm-x86_64.sh: Likewise. * common/asm-arm.h (FUNBEGIN): Don't put a colon inside the C() argument. * common/asm-i386.hh (FUNBEGIN): Likewise. * common/asm-m68k.h (FUNBEGIN): Likewise. * common/asm-sparc.h (FUNBEGIN): Likewise. * common/asm-x86_64.h (FUNBEGIN): Likewise. 2017-07-31 Bruno Haible Fix preprocessor warning "Unknown preprocessing directive". * common/asm-hppa.sh: Eliminate #APP, #NO_APP lines. * common/asm-powerpc.sh: Likewise. 2017-07-31 Bruno Haible trampoline_r: Rework API. * callback/trampoline_r/trampoline_r.h (trampoline_r_address, trampoline_r_data0, trampoline_r_data1): Change signatures. * callback/trampoline_r/trampoline.c (trampoline_r_address, trampoline_r_data0, trampoline_r_data1): Update accordingly. * callback/trampoline_r/test2.c: Update. * callback/callback-libapi.c (is_callback): Likewise. 2017-07-31 Bruno Haible vacall: Fix build error on IRIX with cc (regression from 2017-07-30). * vacall/vacall-internal.h (__va_arg_adjusted, __va_arg_struct): Cast result of __va_arg_leftadjusted and __va_arg_rightadjusted to 'void*'. 2017-07-31 Bruno Haible Fix "make check" failure on arm (regression from 2017-07-30). * vacall/vacall-internal.h (__va_alist): Move the 'filler1' field right before the 'tmp' field. * callback/vacall_r/vacall_r.h (vacall_alist): Add 'filler1' field between 'flags' and 'tmp' fields. 2017-07-31 Bruno Haible Fix build error (regression from 2017-07-30). * vacall/Makefile.in (INCLUDES): Add -I options for . * callback/vacall_r/Makefile.in (INCLUDES): Likewise. 2017-07-30 Bruno Haible vacall: Polish Makefile.in. * vacall/Makefile.in (vacall-x86_64-x32.o): Remove spurious reference to LIBTOOL_COMPILE. 2017-07-30 Bruno Haible m68k: Fix callback test crash on Linux. * avcall/Makefile.in (avcall-m68k.s): Use the .S file in Motorola syntax (cross-compiled for m68k-linux), not the one in MIT syntax (cross-compiled for m68k-sun). * vacall/Makefile.in (vacall-m68k.s): Likewise. * callback/vacall_r/Makefile.in (vacall-m68k.s): Likewise. * avcall/PLATFORM, NEWS: Update. 2017-07-30 Bruno Haible m68k: Fix build failure on Linux. * common/asm-m68k.sh: In mit syntax, recognize 'pc' as a register name. 2017-07-30 Bruno Haible Limit the exported symbols of the installed shared libraries. * avcall/Makefile.in (LIBAVCALL_EXPORTED_SYMBOLS_REGEX): New variable. (libavcall.la): Use libtool's -export-symbols-regex option. * trampoline/Makefile.in (LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX): New variable. (libtrampoline.la): Use libtool's -export-symbols-regex option. * callback/Makefile.in (LIBCALLBACK_EXPORTED_SYMBOLS_REGEX): New variable. (libcallback.la): Use libtool's -export-symbols-regex option. 2017-07-30 Bruno Haible Ensure source compatibility with existing versions of GNU clisp, part 3. * vacall/vacall-internal.h (__va_alist): Move the 'flags' and 'tmp' fields to the beginning. * callback/vacall_r/vacall_r.h (vacall_alist): When used by GNU clisp, declare 'flags' and 'tmp' members. 2017-07-30 Bruno Haible Ensure source compatibility with existing versions of GNU clisp, part 2. * avcall/avcall-alist.h (__av_alist): Move the 'flags' field to the beginning. * avcall/avcall.h (av_alist): When used by GNU clisp, declare a 'flags' member. 2017-07-30 Bruno Haible Ensure source compatibility with existing versions of GNU clisp, part 1. * avcall/avcall-libapi.c (__builtin_avcall): New dummy function. * callback/callback-libapi.c (trampoline_r_data0): New dummy function. 2017-07-30 Bruno Haible Remove copied files from callback/vacall_r/. * callback/vacall_r/Makefile.devel (vacall-*.s): Compile ../../vacall/vacall-*.c directly. * autogen.sh: Don't invoke target 'copied-files' in callback/vacall_r/. * Makefile.devel (precompiled): Likewise. * Makefile.in (COPIED_FILES): Remove callback/vacall_r/*. * callback/vacall_r/Makefile.maint (COPIED_FILES): Remove variable. (copied-files): Remove target. * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove vacall-*.c. 2017-07-30 Bruno Haible callback: Allow for binary-compatible future changes of main API. * callback/callback.h: Renamed from callback/callback.h.in. Don't include trampoline_r.h. (callback_t, __TR_function): New types. (callback_function_t): Renamed from __VA_function. (alloc_callback, free_callback, is_callback, callback_address, callback_data): Declare as functions, not as macros. * callback/callback-libapi.c: New file. * configure.ac: Don't create callback/callback.h. * callback/Makefile.in (LIBTOOL_COMPILE): New variable. (callback.h): Remove target (callback-libapi.lo): New target. (libcallback.la): Include it. (install-lib, install, installdirs, uninstall): Don't recurse into 'trampoline_r' directory. (test1.o, minitests.o, minitests.s, tests.o, tests.s): Update dependency. (MOSTLYCLEANFILES): Remove callback.h. (SOURCE_FILES): Add callback.h, callback-libapi.c. Remove callback.h.in. * callback/test1.c (function): Remove type. (main): Remove a cast. * callback/tests.c (main): Use the type 'callback_t'. * Makefile.in (DISTCLEANFILES): Update stamp file list. * NEWS: Mention the improvement. 2017-07-30 Bruno Haible callback: Remove version number from trampoline_r.h. Rationale: It is already present in callback.h. * callback/trampoline_r/trampoline_r.h: Renamed from callback/trampoline_r/trampoline_r.h.in. (LIBFFCALL_VERSION): Remove macro. * configure.ac: Don't create callback/trampoline_r/trampoline_r.h. * callback/trampoline_r/Makefile.in (trampoline_r.h): Remove target. (trampoline.lo, test1.o, test2.o): Update dependencies. (install-lib, install): Update. (distclean): Don't remove trampoline_r.h. (SOURCE_FILES): Add trampoline_r.h. Remove trampoline_r.h.in. * callback/Makefile.in (trampoline_r.h): Link to $(srcdir)/trampoline_r/trampoline_r.h. * Makefile.in (DISTCLEANFILES): Update stamp file list. 2017-07-30 Bruno Haible vacall, callback: Allow compiler optimizations regarding noreturn. * Makefile.maint (GNULIB_MODULES): Add 'stdnoreturn'. * vacall/vacall-libapi.c: Include . (__va_struct_buffer_t): Moved to here. (vacall_struct_buffer): Declare static. (vacall_error_type_mismatch, vacall_error_struct_too_large): Declare static and noreturn. * callback/vacall_r/vacall-libapi.c: Likewise. * vacall/vacall-internal.h (__va_start_struct, __va_return): Update. (vacall_error_type_mismatch, vacall_error_struct_too_large, __va_struct_buffer_t, vacall_struct_buffer): Remove declarations. 2017-07-30 Bruno Haible vacall, callback: Move copyright notice up. * vacall/vacall.h: Put double-inclusion guard after copyright header. * callback/vacall_r/vacall_r.h: Likewise. 2017-07-30 Bruno Haible callback: Allow for binary-compatible future changes of __va_* macros. * callback/vacall_r/vacall_r.h: New file, extracted from callback/vacall_r/vacall_r.h.in. Include , ffcall-abi.h. (vacall_*): Define to symbols that start with 'callback_'. (va_alist): Define als pointer to 'struct vacall_alist'. (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar, vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int, vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong, vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double, vacall_arg_ptr, vacall_arg_struct, vacall_return_void, vacall_return_char, vacall_return_schar, vacall_return_uchar, vacall_return_short, vacall_return_ushort, vacall_return_int, vacall_return_uint, vacall_return_long, vacall_return_ulong, vacall_return_longlong, vacall_return_ulonglong, vacall_return_float, vacall_return_double, vacall_return_ptr, vacall_return_struct): New declarations. (va_start_void, va_start_char, va_start_schar, va_start_uchar, va_start_short, va_start_ushort, va_start_int, va_start_uint, va_start_long, va_start_ulong, va_start_longlong, va_start_ulonglong, va_start_float, va_start_double, va_start_ptr, _va_start_struct, va_arg_char, va_arg_schar, va_arg_uchar, va_arg_short, va_arg_ushort, va_arg_int, va_arg_uint, va_arg_long, va_arg_ulong, va_arg_longlong, va_arg_ulonglong, va_arg_float, va_arg_double, va_arg_ptr, va_arg_struct, _va_arg_struct, va_return_void, va_return_char, va_return_schar, va_return_uchar, va_return_short, va_return_ushort, va_return_int, va_return_uint, va_return_long, va_return_ulong, va_return_longlong, va_return_ulonglong, va_return_float, va_return_double, va_return_ptr, _va_return_struct): Define in terms of these functions. * callback/vacall_r/vacall-libapi.c: Include vacall-internal.h instead of vacall_r.h.in. (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar, vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int, vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong, vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double, vacall_arg_ptr, vacall_arg_struct, vacall_return_void, vacall_return_char, vacall_return_schar, vacall_return_uchar, vacall_return_short, vacall_return_ushort, vacall_return_int, vacall_return_uint, vacall_return_long, vacall_return_ulong, vacall_return_longlong, vacall_return_ulonglong, vacall_return_float, vacall_return_double, vacall_return_ptr, vacall_return_struct): New functions. * vacall/vacall-internal.h: If REENTRANT, include vacall_r.h. * callback/vacall_r/vacall_r.h.in: Remove file. * vacall/vacall-*.c: Include vacall-internal.h instead of vacall_r.h.in. * vacall/vacall-libapi.c: Likewise. * callback/vacall_r/Makefile.devel (GCCFLAGS): Add -I option for ffcall-abi.h. (vacall-*.s): Update dependencies. Pass -I options to gcc. * configure.ac: Don't create callback/vacall_r/vacall_r.h. * callback/vacall_r/Makefile.maint (vacall_r.h.msvc, vacall_r.h.mingw32): Remove targets. (totally-clean): Don't remove vacall_r.h.msvc, vacall_r.h.mingw32. * callback/Makefile.maint (vacall_r/vacall_r.h.msvc, vacall_r/vacall_r.h.mingw32): Remove targets. * callback/vacall_r/Makefile.in (INCLUDES): Add -I options for vacall-internal.h and ffcall-abi.h. (all): Don't depend on vacall_r.h. (vacall-libapi.lo): Update dependencies. Pass -DREENTRANT option. (install-lib, install): Update. (distclean): Don't remove vacall_r.h. (SOURCE_FILES): Add vacall_r.h. Remove vacall_r.h.in. (GENERATED_FILES): Remove vacall_r.h.mingw32, vacall_r.h.msvc. * callback/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h. (vacall_r.h): Link to $(srcdir)/vacall_r/vacall_r.h. * Makefile.in (DISTCLEANFILES): Update. * porting-tools/abis/README: Update. 2017-07-30 Bruno Haible vacall: Allow for binary-compatible future changes of the __va_* macros. * vacall/vacall.h: New file, extracted from vacall/vacall.h.in. Include , ffcall-abi.h. (va_alist): Define als pointer to 'struct vacall_alist'. (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar, vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int, vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong, vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double, vacall_arg_ptr, vacall_arg_struct, vacall_return_void, vacall_return_char, vacall_return_schar, vacall_return_uchar, vacall_return_short, vacall_return_ushort, vacall_return_int, vacall_return_uint, vacall_return_long, vacall_return_ulong, vacall_return_longlong, vacall_return_ulonglong, vacall_return_float, vacall_return_double, vacall_return_ptr, vacall_return_struct): New declarations. (va_start_void, va_start_char, va_start_schar, va_start_uchar, va_start_short, va_start_ushort, va_start_int, va_start_uint, va_start_long, va_start_ulong, va_start_longlong, va_start_ulonglong, va_start_float, va_start_double, va_start_ptr, _va_start_struct, va_arg_char, va_arg_schar, va_arg_uchar, va_arg_short, va_arg_ushort, va_arg_int, va_arg_uint, va_arg_long, va_arg_ulong, va_arg_longlong, va_arg_ulonglong, va_arg_float, va_arg_double, va_arg_ptr, va_arg_struct, _va_arg_struct, va_return_void, va_return_char, va_return_schar, va_return_uchar, va_return_short, va_return_ushort, va_return_int, va_return_uint, va_return_long, va_return_ulong, va_return_longlong, va_return_ulonglong, va_return_float, va_return_double, va_return_ptr, _va_return_struct): Define in terms of these functions. * vacall/vacall-libapi.c: Include vacall-internal.h instead of vacall.h.in. (vacall_start, vacall_start_struct, vacall_arg_char, vacall_arg_schar, vacall_arg_uchar, vacall_arg_short, vacall_arg_ushort, vacall_arg_int, vacall_arg_uint, vacall_arg_long, vacall_arg_ulong, vacall_arg_longlong, vacall_arg_ulonglong, vacall_arg_float, vacall_arg_double, vacall_arg_ptr, vacall_arg_struct, vacall_return_void, vacall_return_char, vacall_return_schar, vacall_return_uchar, vacall_return_short, vacall_return_ushort, vacall_return_int, vacall_return_uint, vacall_return_long, vacall_return_ulong, vacall_return_longlong, vacall_return_ulonglong, vacall_return_float, vacall_return_double, vacall_return_ptr, vacall_return_struct): New functions. * vacall/vacall-internal.h: New file, extracted from vacall/vacall.h.in. (__VA_ALIST_WORDS): Fix comment. (__va_alist): Declare as 'struct vacall_alist'. (__va_start): Add FLAGS argument. (__va_start_struct): Renamed from _va_start_struct. Add FLAGS argument. (_va_arg_*): Renamed from va_arg_*. (_va_arg_ptr): Renamed from va_arg_ptr. Remove TYPE argument. (_va_return_*): Renamed from va_return_*. (_va_return_ptr): Renamed from va_return_ptr. Remove TYPE argument. (__va_return_struct): Renamed from _va_return_struct. * vacall/vacall.h.in: Remove file. * configure.ac: Don't create vacall.h by substitution. * vacall/vacall-*.c: Include vacall-internal.h instead of vacall.h.in. * vacall/Makefile.devel (GCCFLAGS): Add -I option for ffcall-abi.h. (vacall-*.s): Update dependencies. (tests-*.s): Likewise. No more need to symlink vacall.h. * vacall/Makefile.maint (vacall.h.msvc, vacall.h.mingw32): Remove targets. (totally-clean): Don't remove them. * vacall/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h. (vacall-libapi.o): Update dependencies. (install): Update. (minitests.o, minitests.s, tests.o, tests.s): Update dependency. (distclean): Don't remove vacall.h. (SOURCE_FILES): Add vacall.h, vacall-internal.h. Remove vacall.h.in. (GENERATED_FILES): Remove vacall.h.mingw32, vacall.h.msvc. * Makefile.in (DISTCLEANFILES): Update stamp file list. * vacall/README: Update. * porting-tools/abis/README: Update. 2017-07-30 Bruno Haible vacall: Remove special optimization of va_return_struct macro. * vacall/vacall.h.in (va_return_struct): Define through _va_return_struct. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-07-30 Bruno Haible vacall, callback: Prefix all exported symbols at linker level. * vacall/vacall-*.c: Define vacall_receiver instead of __vacall, callback_receiver instead of __vacall_r, callback_get_receiver instead of get__vacall_r. * vacall/vacall-libapi.c: Include config.h first. (vacall_receiver): Renamed from __vacall. (vacall_struct_buffer): Renamed from __va_struct_buffer. (vacall_error_type_mismatch): Renamed from __va_error1. (vacall_error_struct_too_large): Renamed from __va_error2. * vacall/vacall.h.in (_va_start_struct, __va_return): Update. (vacall_error_type_mismatch): Renamed from __va_error1. (vacall_error_struct_too_large): Renamed from __va_error2. (vacall_struct_buffer): Renamed from __va_struct_buffer. * callback/vacall_r/vacall-libapi.c: Include config.h first. (vacall_struct_buffer): Renamed from __va_struct_buffer. (vacall_error_type_mismatch): Renamed from __va_error1. (vacall_error_struct_too_large): Renamed from __va_error2. * callback/vacall_r/vacall_r.h.in (vacall_error_type_mismatch, vacall_error_struct_too_large, vacall_structcpy, vacall_struct_buffer): Define to symbols that start with 'callback_'. (_va_start_struct, __va_return): Update. (callback_receiver): Renamed from __vacall_r. (callback_get_receiver): Renamed from get__vacall_r. (vacall_error_type_mismatch): Renamed from __va_error1. (vacall_error_struct_too_large): Renamed from __va_error2. (vacall_struct_buffer): Renamed from __va_struct_buffer. * callback/callback.h.in: Update. * callback/trampoline_r/trampoline_r.h.in (alloc_trampoline_r, free_trampoline_r, is_trampoline_r, trampoline_r_address, trampoline_r_data0, trampoline_r_data1): Define to symbols that start with 'callback_trampoline_'. * callback/elf-hack.txt: Update. * porting-tools/abis/call-used-registers.txt: Update. 2017-07-30 Bruno Haible callback: Use distinct object file names in static library. * callback/vacall_r/vacall-libapi.c: Renamed from callback/vacall_r/misc.c. * callback/vacall_r/Makefile.in (OBJECTS, SOURCE_FILES): Update. (vacall-libapi.lo): Renamed from misc.lo. * callback/Makefile.in (libcallback.la): Update. 2017-07-30 Bruno Haible vacall: Use distinct object file names in static library. * vacall/vacall-libapi.c: Renamed from vacall/misc.c. * vacall/Makefile.in (OBJECTS, SOURCE_FILES): Update. (vacall-libapi.o): Renamed from misc.o. * vacall/README: Update. 2017-07-30 Bruno Haible avcall: Modernize. * avcall/avcall.h: Change double-include guard. Modernize copyright header. 2017-07-30 Bruno Haible avcall: Allow for binary-compatible future changes of the __av_* macros. * avcall/avcall.h: New file, extracted from avcall/avcall.h.in. Include , ffcall-abi.h. When included from avcall-internal.h, include avcall-alist.h and add member '_av_m_alist' in av_alist type. (avcall_overflown, avcall_start, avcall_start_struct, avcall_arg_long, avcall_arg_ulong, avcall_arg_ptr, avcall_arg_longlong, avcall_arg_ulonglong, avcall_arg_float, avcall_arg_double, avcall_arg_struct): New declarations. (av_overflown, av_start_void, av_start_char, av_start_schar, av_start_uchar, av_start_short, av_start_ushort, av_start_int, av_start_uint, av_start_long, av_start_ulong, av_start_longlong, av_start_ulonglong, av_start_float, av_start_double, av_start_ptr, _av_start_struct, av_char, av_schar, av_short, av_int, av_long, av_uchar, av_ushort, av_uint, av_ulong, av_ptr, av_longlong, av_ulonglong, av_float, av_double, av_struct, _av_struct, av_call): Define in terms of these functions. * avcall/avcall-libapi.c: New file. * avcall/avcall-alist.h: New file, extracted from avcall/avcall.h.in. * avcall/avcall-internal.h: New file, extracted from avcall/avcall.h.in. (__av_start): Add LIST_ARGS_END and FLAGS arguments. (__av_start1, __av_start_init_eptr): Add LIST_ARGS_END argument. (__av_start_struct): Add LIST_ARGS, LIST_ARGS_END, FLAGS arguments. (__av_long): Renamed from _av_long. (__av_ulong): Renamed from _av_ulong. (__av_ptr): Renamed from _av_ptr. Remove TYPE argument. (__av_arg_longlong): Renamed from __av_longlong. (__av_longlong): Renamed from _av_longlong. (__av_ulonglong): Renamed from _av_ulonglong. * avcall/avcall.h.in: Remove file. * configure.ac: Don't create avcall.h by substitution. * avcall/avcall-*.c: Include avcall-internal.h instead of avcall.h.in. (avcall_call): Change argument type to 'av_alist*'. * avcall/Makefile.devel (GCCFLAGS): Add -I option for ffcall-abi.h. (avcall-*.s): Update dependencies. (tests-*.s): Likewise. No more need to symlink avcall.h. * avcall/Makefile.maint (avcall.h.msvc, avcall.h.mingw32): Remove targets. (totally-clean): Don't remove them. * avcall/Makefile.in (INCLUDES): Add -I option for ffcall-abi.h. (OBJECTS): Add avcall-libapi.lo. (avcall-libapi.lo): New target. (install-lib, install): Update. (minitests.o, minitests.s, tests.o, tests.s): Update dependency. (distclean): Don't remove avcall.h. (SOURCE_FILES): Add avcall.h, avcall-internal.h, avcall-alist.h, avcall-libapi.c. Remove avcall.h.in. (GENERATED_FILES): Remove avcall.h.mingw32, avcall.h.msvc. * Makefile.in (DISTCLEANFILES): Update stamp file list. * avcall/README: Update. * porting-tools/abis/README: Update. 2017-07-30 Bruno Haible avcall: Allow for binary-compatible future changes of __av_alist. * avcall/avcall.h.in (__AV_ALIST_SIZE_BOUND): New macro. (__av_alist_verify): New verification. (av_alist): Use it to allocate room. 2017-07-30 Bruno Haible avcall: Separate the fixed-size part from the variable part of av_alist. * avcall/avcall.h.in (__av_alist): Renamed from av_alist. Add 'args' field as a pointer. (av_alist): New type. (_av_overflown): Renamed from av_overflown. (av_overflown): New macro. (__av_start): Add LIST_ARGS argument. (av_start_*, _av_start_struct): Update accordingly. (_av_long): Renamed from av_long. (_av_ulong): Renamed from av_ulong. (_av_ptr): Renamed from av_ptr. (av_long, av_ulong, av_ptr): New macros. (_av_longlong): Renamed from av_longlong. (_av_ulonglong): Renamed from av_ulonglong. (av_longlong, av_ulonglong): New macros. (_av_float): Renamed from av_float. (_av_double): Renamed from av_double. (av_float, av_double): New macros. (av_struct, _av_struct, av_call): Update. (avcall_call): Take an '__av_alist*' parameter. * avcall/avcall-*.c (avcall_call): Take an '__av_alist*' parameter. 2017-07-30 Bruno Haible avcall: Remove unused macro argument TYPE. * avcall/avcall.h.in (__av_struct_copy, __av_struct_leftadjusted, __av_struct_rightadjusted, __av_struct): Remove TYPE argument. 2017-07-30 Bruno Haible avcall: Remove special optimization of av_struct macro. * avcall/avcall.h.in (av_struct): Take the address of VAL. (__av_struct_assign): Remove macro. (__av_struct, __av_struct_leftadjusted, __av_struct_rightadjusted): Remove ASSIGN argument; use __av_struct_copy instead. 2017-07-30 Bruno Haible avcall: Evaluate __AV_ALIST_WORDS only during av_start_* macros. Part 1. * avcall/avcall.h.in (av_alist): Enable 'eptr' field on all platforms. (__av_eptr): Remove macro. Use (LIST).eptr eveywhere instead. (__av_start_init_eptr): New macro. (__av_start): Invoke it. (__av_start1): Don't initialize (LIST).eptr here. 2017-07-30 Bruno Haible avcall: Prefix all exported symbols at linker level with 'avcall_'. * avcall/avcall.h.in (avcall_call): Renamed from __builtin_avcall. * avcall/avcall-*.c: Update accordingly. * avcall/DOC: Likewise. * avcall/avcall.3: Likewise. * avcall/avcall.html: Likewise. 2017-07-30 Bruno Haible trampoline: Rework API. * trampoline/trampoline.h: Add C++ guards. Add comments. (trampoline_function_t): Renamed from __TR_function. (alloc_trampoline, trampoline_address, trampoline_variable, trampoline_data): Change signatures. * trampoline/trampoline.c: Update accordingly. * trampoline/test1.c (function): Remove type. (main): Update. * trampoline/test2.c (function): Remove type. (main): Update. * NEWS: Mention the changes. 2017-07-30 Bruno Haible trampoline: Restructure include file. * trampoline/trampoline.h: Renamed from trampoline/trampoline.h.in. * configure.ac: Don't create trampoline.h by substitution. * trampoline/Makefile.in (trampoline.h): Remove target. (trampoline.lo, test1.o, test2.o): Update dependency. (install, SOURCE_FILES): Update. (distclean): Don't remove trampoline.h. * trampoline/README: Update. * Makefile.in (DISTCLEANFILES): Update stamp file list. 2017-07-30 Bruno Haible Move ABI indicator macro definitions to a separate include file. Rationale: Prepare for getting rid of most .h.in -> .h substitutions. * ffcall-abi.h: New file. * Makefile.in (install, uninstall): Install/uninstall ffcall-abi.h. (SOURCE_FILES): Add ffcall-abi.h. * porting-tools/abis/predefines.c: New file. * porting-tools/abis/README: Update. 2017-07-30 Bruno Haible Move libffcall version number to a separate include file. Rationale: Prepare for getting rid of most .h.in -> .h substitutions. * ffcall-version.in.h: New file. * configure.ac: Invoke AC_CONFIG_HEADERS for ffcall-version.h. * avcall/avcall.h.in (LIBFFCALL_VERSION): Remove definition. Include ffcall-version.h instead. * vacall/vacall.h.in: Likewise. * trampoline/trampoline.h.in: Likewise. * callback/callback.h.in: Likewise. * callback/vacall_r/vacall_r.h.in (LIBFFCALL_VERSION): Remove definition. * callback/trampoline_r/trampoline_r.h.in (LIBFFCALL_VERSION): Likewise. * dummy/ffcall-version.h: New file. * avcall/Makefile.devel (GCCFLAGS): Add -I option to find a dummy ffcall-version.h. * vacall/Makefile.devel (GCCFLAGS): Likewise. * callback/vacall_r/Makefile.devel (GCCFLAGS): Likewise. * vacall/Makefile.maint (VERSION): Remove macro. (vacall.h.msvc, vacall.h.mingw32): Don't substitute LIBFFCALL_VERSION. * callback/vacall_r/Makefile.maint (VERSION): Remove macro. (vacall_r.h.msvc, vacall_r.h.mingw32): Don't substitute LIBFFCALL_VERSION. * Makefile.in (ffcall-version.h): New target. (install, installdirs, uninstall): Install/uninstall ffcall-version.h. (DISTCLEANFILES): Add ffcall-version.h. Update stamp file list. (SOURCE_FILES): Add ffcall-version.in.h, dummy/ffcall-version.h. 2017-07-30 Bruno Haible Remove configure test for 'long long'. Assume the compiler has it. Rationale: All compilers nowadays have 'long long', for years. * configure.ac: Don't invoke AC_TYPE_LONG_LONG_INT. * avcall/avcall.h.in (HAVE_LONG_LONG_INT): Remove macro. * vacall/vacall.h.in (HAVE_LONG_LONG_INT): Likewise. * callback/vacall_r/vacall_r.h.in (HAVE_LONG_LONG_INT): Likewise. * vacall/Makefile.devel (GCCFLAGS): Remove -DHAVE_LONG_LONG_INT. * callback/vacall_r/Makefile.devel (GCCFLAGS): Likewise. * avcall/tests.c: Remove test for HAVE_LONG_LONG_INT. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. * porting-tools/abis/README: Update. 2017-07-30 Bruno Haible Remove unused configure test AC_C_CHAR_UNSIGNED. * vacall/vacall.h.in (__CHAR_UNSIGNED__): Remove unuseed macro. * callback/vacall_r/vacall_r.h.in (__CHAR_UNSIGNED__): Likewise. * configure.ac: Don't invoke AC_C_CHAR_UNSIGNED. 2017-07-30 Bruno Haible Don't depend on FFCALL_IREG_FLOAT_RETURN configure result. Rationale: The installed .h files should be compiler independent. * avcall/avcall.h.in (__IREG_FLOAT_RETURN__): Remove macro. Assume it is not defined on m68k. * vacall/vacall.h.in (__IREG_FLOAT_RETURN__): Likewise. * callback/vacall_r/vacall_r.h.in (__IREG_FLOAT_RETURN__): Likewise. 2017-07-30 Bruno Haible Don't depend on FFCALL_SMALL_STRUCT_RETURN configure result. Rationale: The installed .h files should be compiler independent. * avcall/avcall.h.in (__SMALL_STRUCT_RETURN__): Remove macro. Use explicit ABI conditional instead. * vacall/vacall.h.in (__SMALL_STRUCT_RETURN__): Likewise. * callback/vacall_r/vacall_r.h.in (__SMALL_STRUCT_RETURN__): Likewise. * avcall/Makefile.maint (avcall.h.msvc, avcall.h.mingw32): Don't substitute __SMALL_STRUCT_RETURN__. * vacall/Makefile.maint (vacall.h.msvc, vacall.h.mingw32): Likewise. * callback/vacall_r/Makefile.maint (vacall_r.h.msvc, vacall_r.h.mingw32): Likewise. 2017-07-30 Bruno Haible Move a file. * avcall/port-structs.c: Moved to porting-tools/abis/. * porting-tools/abis/README: Mention it. 2017-07-30 Bruno Haible Remove support for old PCC struct return convention. It is not reentrant and therefore a fortiori not multithread-safe. * m4/pccstruct.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove it. * configure.ac: Remove FFCALL_PCC_STRUCT_RETURN invocation. * avcall/avcall.h.in (__PCC_STRUCT_RETURN__): Remove macro. (__AV_PCC_STRUCT_RETURN): Remove enum value. (__av_start_struct1): Remove macro. (_av_start_struct): Use __av_start_struct2 instead. * avcall/avcall-*.c: Remove support for __AV_PCC_STRUCT_RETURN flag. * vacall/vacall.h.in (__PCC_STRUCT_RETURN__): Remove macro. (__VA_PCC_STRUCT_RETURN): Remove enum value. (_va_start_struct): Update accordingly. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-*.c: Remove support for __VA_PCC_STRUCT_RETURN flag. * vacall/misc.c (__va_error2): Update error message. * callback/vacall_r/misc.c (__va_error2): Likewise. 2017-07-22 Bruno Haible ia64: Make vacall code more robust. * vacall/vacall-ia64.c: Use a split struct to allocate room for the 8 leading words in the callee's stack. * porting-tools/abis/stack-frame.txt: Mention the change. 2017-07-22 Bruno Haible alpha: Make vacall code more robust. * vacall/vacall-alpha.c: Use a split struct to allocate room for the 6 leading words in the callee's stack. * porting-tools/abis/stack-frame.txt: Mention the change. 2017-07-22 Bruno Haible alpha: Make vacall code more maintainable. * vacall/vacall.h.in (__va_alist, va_arg_double, va_arg_float) [alpha]: Add fields 'farg_offset', 'farg'. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-alpha.c (__vacall): Don't allocate the fargs in the 'locals' struct. Initialize 'farg_offset' field. 2017-07-22 Bruno Haible mipsn32, mips64: Remove unused field. * vacall/vacall.h.in (__va_alist) [__mipsn32__ || __mips64__]: Remove field 'memargptr'. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-mipsn32.c (__vacall): Update accordingly. * vacall/vacall-mips64.c (__vacall): Likewise. 2017-07-22 Bruno Haible mipsn32, mips64: Make vacall code more robust. * vacall/Makefile.devel (vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S, vacall-mips64el-macro.S): Remove post-processing hack. * callback/vacall_r/Makefile.devel (vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S, vacall-mips64el-macro.S): Likewise. * vacall/vacall-mipsn32.c: Use a split struct to allocate room for the 8 leading words in the callee's stack. * vacall/vacall-mips64.c: Likewise. * porting-tools/abis/stack-frame.txt: Mention the change. 2017-07-22 Bruno Haible mips: Don't store dynamic state in the flags. * avcall/avcall.h.in (__AV_FLOAT_1, __AV_FLOAT_2, __AV_DOUBLE_1, __AV_DOUBLE_2): Remove enum values. (av_alist) [mips]: Store the number of floating-point register arguments in fanum. Store bitmasks in farg_mask and darg_mask. Rename field 'floatarg' to 'fargs'. Rename field 'doublearg' to 'dargs'. (__av_start1, av_float, av_double): Update implementation accordingly. * avcall/avcall-mips.c (__builtin_avcall): Access farg_mask and darg_mask instead of the flags. * vacall/vacall.h.in (__VA_FLOAT_1, __VA_FLOAT_2): Remove enum values. (__VA_REGISTER_FLOATSTRUCT_RETURN, __VA_REGISTER_DOUBLESTRUCT_RETURN): Change values. (__va_alist, va_arg_float, va_arg_double) [mips]: Store the number of floating-point register arguments in fanum. Use it instead of the __VA_FLOAT_1 flag. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-mips.c (__vacall): Update accordingly. 2017-07-22 Bruno Haible powerpc, powerpc64, ia64, x86_64: Undo premature optimization. * vacall/vacall.h.in: Use 'fanum' field instead of 'memfargptr' field. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-ia64.c: Update accordingly. * vacall/vacall-powerpc.c: Likewise. * vacall/vacall-powerpc64.c: Likewise. * vacall/vacall-x86_64.c: Likewise. 2017-07-22 Bruno Haible x86_64: Undo premature optimization. * vacall/vacall.h.in [__x86_64__]: Use 'ianum' field instead of 'memiargptr' field. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-x86_64.c (__vacall): Update accordingly. 2017-07-22 Bruno Haible x86_64: Undo premature optimization. * avcall/avcall.h.in [__x86_64__]: Use 'ianum' field instead of 'iaptr' field. 2017-07-22 Bruno Haible ia64, x86_64: Use symbolic constants. * avcall/avcall.h.in (__AV_FARG_NUM) [__ia64__ || __x86_64__]: New macro. (av_float, av_double): Use it. (__av_struct): Use __AV_IARG_NUM. * vacall/vacall.h.in (__VA_FARG_NUM) [__ia64__ || __x86_64__]: New macro. (va_arg_float, va_arg_double): Use it. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-07-22 Bruno Haible armhf: Fix a bug in vacall (failing tests d_d13i, f_f17l3L, d_d17l3L). * vacall/vacall.h.in (__va_alist, __va_start_struct2, __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_longlong) [__armhf__]: Use 'iarg' and 'ianum' fields instead of 'saptr' field. (va_arg_float, va_arg_double) [__armhf__]: Don't force all remaining integer arguments to the stack. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-armhf.c (__vacall): Update accordingly. 2017-07-22 Bruno Haible armhf: Fix a bug in avcall (failing tests f_f17l3L, d_d17l3L). * avcall/avcall.h.in [__armhf__]: Store integer argument count in ianum. (__av_start1, __av_start_struct4, __av_word, __av_longlong, av_float, av_double, __av_struct): Update implementation accordingly. * avcall/avcall-arm.c: Add comment. * avcall/avcall-armhf.c: Likewise. * porting-tools/abis/stack-frame.txt: Update information. * NEWS: Mention the fix. 2017-07-22 Bruno Haible powerpc: Make avcall code more robust. * avcall/avcall-powerpc.c (__builtin_avcall) [_AIX]: Don't rely on a particular stack frame layout produced by GCC. Use __builtin_alloca instead. * avcall/avcall-powerpc64.c (STACK_OFFSET): Remove unused macro. 2017-07-22 Bruno Haible powerpc: Don't ever access out-of-range array elements. * avcall/avcall-powerpc.c (__builtin_avcall): Access only 8 fargs when only 8 exist. 2017-07-22 Bruno Haible powerpc, powerpc64: Use symbolic constants. * avcall/avcall.h.in (__AV_FARG_NUM) [__powerpc__ || __powerpc64__]: New macro. (av_float, av_double): Use it. * vacall/vacall.h.in (__VA_FARG_NUM) [__powerpc__ || __powerpc64__]: New macro. (va_arg_float, va_arg_double): Use it. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-07-22 Bruno Haible powerpc: Fix a bug (failing tests f_f12i, f_f13i, d_d12i, d_d13i). * avcall/avcall.h.in [__powerpc_sysv4__]: Store integer register arguments in iargs[] and their count in ianum. (__av_start1, __av_start_struct4, av_long, av_ulong, av_ptr, __av_longlong, __av_struct): Update implementation accordingly. * avcall/avcall-powerpc.c (__builtin_avcall): Update accordingly. Ignore farglen in the arg copy loop. * vacall/vacall.h.in (__va_alist, __va_start_struct2, __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_longlong, va_arg_float, va_arg_double) [__powerpc_sysv4__]: Use 'ianum' field instead of 'saptr', 'onstack' fields. Don't bump 'ianum' in va_arg_float, va_arg_double. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-powerpc.c (__vacall): Update accordingly * porting-tools/abis/stack-frame.txt: Fix information. * NEWS: Mention the fix. 2017-07-22 Bruno Haible powerpc: Simplify #if expressions. * avcall/avcall.h.in (__powerpc_aix__, __powerpc_sysv4__): New macros. Use them in #if expressions. * vacall/vacall.h.in: Likewise. * callback/vacall_r/vacall_r.h.in: Likewise. * avcall/avcall-powerpc.c: Add comments. * vacall/vacall-powerpc.c: Likewise. 2017-07-22 Bruno Haible s390, s390x: Merge common code. * vacall/vacall.h.in (va_arg_float, va_arg_double) [s390,s390x]: Merge. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-07-22 Bruno Haible s390: Fix a bug (failing tests f_f3i...f_f13i, d_d3i...d_d13i). * vacall/vacall.h.in (va_arg_float, va_arg_double) [s390]: Don't bump ianum, * callback/vacall_r/vacall_r.h.in: Likewise. * NEWS: Mention the fix. 2017-07-22 Bruno Haible s390: Make vacall code more similar to s390x, arm64 cases. * vacall/vacall.h.in (__va_alist, __va_start_struct2, __va_arg_leftadjusted, __va_arg_rightadjusted, __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct) [s390]: Use 'ianum' field instead of 'saptr', 'onstack' fields. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-s390.c: Update accordingly. 2017-07-22 Bruno Haible Add some mixed-number args boundary tests. * avcall/tests.c (f_f17l3L, d_d17l3L): New tests. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. 2017-07-22 Bruno Haible Add more mixed-number tests. * avcall/tests.c (f_fi, ..., f_f13i, d_di, ..., d_d13i): New tests. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. 2017-07-19 Bruno Haible s390: Make avcall code more robust. * avcall/avcall-s390.c (STACK_OFFSET): Remove macro. (__builtin_avcall): Don't rely on a particular stack frame layout produced by GCC. Use __builtin_alloca instead. 2017-07-19 Bruno Haible s390: Make avcall code more similar to s390x, arm64, x86_64 cases. * avcall/avcall.h.in (av_alist, __av_start_struct4, __av_word, av_long, av_ulong, av_ptr, __av_longlong, __av_struct) [s390]: Use iargs[] array for the first 5 general-purpose argument words, like on s390x. (__av_struct_rightadjusted) [s390]: Remove macro. * avcall/avcall-s390.c (__builtin_avcall): Update accordingly. 2017-07-19 Bruno Haible s390: Simplify avcall code. * avcall/avcall.h.in (av_alist, __av_start1, __av_start_struct4, __av_word, __av_longlong, av_float, av_double, __av_struct_rightadjusted, __av_struct) [s390]: Use 'ianum' field instead of 'fargwords' field. * avcall/avcall-s390.c (__builtin_avcall): Update accordingly. 2017-07-16 Bruno Haible Allow building statically linked binaries, through LDFLAGS="-static". * Makefile.main (libtool-imported-files): Fetch and apply patch from : 2017-07-15 Bruno Haible * build-aux/ltmain.sh (func_mode_help, func_mode_link): In the link mode, accept option '-static-uninstalled-libs' in place of '-static', and make '-static' an equivalent of '-all-static'. 2017-07-07 Bruno Haible build: Avoid a hanging configure test on FreeBSD/arm64. Seen with FreeBSD 11.1-RC1 on arm64 (under qemu 2.9.0). * m4/codeexec.m4 (FFCALL_CODEEXEC): Avoid running the test on FreeBSD/arm64. 2017-06-27 Bruno Haible build: Fix warning in autoconf test. * m4/shm.m4 (CL_SHM): Include , to declare exit(). 2017-06-25 Bruno Haible Add doc about ABIs and calling conventions. * porting-tools/abis: New directory. * common/reg-struct-return.txt: Moved to porting-tools/abis/. * callback/call-used-registers.txt: Likewise. 2017-06-25 Bruno Haible Add doc about emulation of target platforms. * porting-tools/emulation: New directory. 2017-06-24 Bruno Haible s390: Simplify code. * vacall/vacall.h.in (__va_alist) [s390]: Use a counter instead of 2 pointers. (va_arg_float, va_arg_double): Update accordingly; * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-s390.c: Update accordingly. 2017-06-24 Bruno Haible s390: Simplify code. * avcall/avcall.h.in (av_alist) [s390]: Use a counter instead of 4 pointers. Use 2 bitmasks instead of 2 int[] arrays. (__av_start1, av_float, av_double): Update accordingly. * avcall/avcall-s390.c (__builtin_avcall): Likewise. 2017-06-24 Bruno Haible build: Improve guesses when cross-compiling. * m4/codeexec.m4 (FFCALL_CODEEXEC, FFCALL_CODEEXEC_PAX): When cross-compiling, use the known autoconf test results. * m4/mmap.m4 (FFCALL_MMAP): Likewise. * m4/mprotect.m4 (FFCALL_MPROTECT): Likewise. * m4/pccstruct.m4 (FFCALL_PCC_STRUCT_RETURN): Likewise. * m4/shm.m4 (CL_SHM): Likewise. * m4/smallstruct.m4 (FFCALL_SMALL_STRUCT_RETURN): Likewise. 2017-06-24 Bruno Haible Bump version number. * VERSION: Set to 2.0. * NEWS: Open new section for 2.0. 2017-06-24 Bruno Haible build: Use decimal notation for the version number. * VERSION: Set to 1.13. * configure.ac: Simplify AC_CONFIG_HEADERS invocations. Define LIBFFCALL_VERSION as C macro, based on PACKAGE_VERSION. * avcall/avcall.h.in (LIBFFCALL_VERSION): Use a plain #define, for substitution by config.status. * vacall/vacall.h.in: Likewise. * trampoline/trampoline.h.in: Likewise. * callback/callback.h.in: Likewise. * callback/vacall_r/vacall_r.h.in: Likewise. * callback/trampoline_r/trampoline_r.h.in: Likewise. 2017-06-24 Bruno Haible trampoline, callback: Make multithread-safe. * Makefile.maint (AUTOMAKE): New variable. (all): Depend on Makefile-ins. (GNULIB_MODULES): Add 'lock'. (gnulib-m4/gnulib-cache.m4): Don't remove generated gnulib-lib files. (ALL_MAKEFILE_IN_FROM_AM): New variable. (Makefile-ins, gnulib-lib/Makefile.in): New targets. * configure.ac: Invoke AM_INIT_AUTOMAKE. Arrange to generate gnulib-lib/Makefile. Invoke gl_EARLY earlier. Recurse into gnulib-lib directory. * Makefile.in (DISTCLEANFILES): Add the various stamp-h* files created by config.status at the end of the 'configure' run. (AUTOMAKE_IMPORTED_FILES): New variable. (IMPORTED_FILES): Use it. * trampoline/Makefile.in (INCLUDES): Reference the gnulib build dir and source dir. (LTLIBTHREAD): New variable. (libtrampoline.la): Link against libgnu.la, with options $(LTLIBTHREAD). (test1, test2): Link against libtrampoline.la. * trampoline/trampoline.c: Include glthread/lock.h. (zero_fd, file_fd, file_length): Move to file scope. (for_mmap_init): New function, extracted from alloc_trampoline. (for_mmap_once): New variable. (freelist_lock): New variable. (alloc_trampoline): Use once-only execution and locking. * callback/trampoline_r/Makefile.in (INCLUDES): Reference the gnulib build dir and source dir. (LTLIBTHREAD): New variable. (libtrampoline.la): Link against libgnu.la, with options $(LTLIBTHREAD). (test1, test2): Link against libtrampoline.la. * callback/trampoline_r/trampoline.c: Include glthread/lock.h. (zero_fd, file_fd, file_length): Move to file scope. (for_mmap_init): New function, extracted from alloc_trampoline. (for_mmap_once): New variable. (freelist_lock): New variable. (alloc_trampoline_r): Use once-only execution and locking. * callback/Makefile.in (LTLIBTHREAD): New variable. (libcallback.la): Link against libgnu.la, with options $(LTLIBTHREAD). 2017-06-24 Bruno Haible build: Rename glm4 to gnulib-m4. * autogen.sh: Write gnulib-m4 instead of glm4. * Makefile.maint: Likewise. * Makefile.in (GNULIB_IMPORTED_FILES): Likewise. 2017-06-24 Bruno Haible build: Assume a single configure.ac file. * Makefile.maint (ALL_CONFIGURE_AC, aclocal.m4): Simplify. 2017-06-24 Bruno Haible Merge all autoconf configurations into a single one. * configure.ac: Include the body of all other configure.ac files. Use a single config.h file. Inline FFCALL_COMMON_LIBTOOL and FFCALL_COMMON_TRAMPOLINE. * avcall/configure.ac: Remove file. * vacall/configure.ac: Remove file. * trampoline/configure.ac: Remove file. * callback/configure.ac: Remove file. * callback/vacall_r/configure.ac: Remove file. * callback/trampoline_r/configure.ac: Remove file. * m4/general.m4 (FFCALL_COMMON_LIBTOOL, FFCALL_COMMON_TRAMPOLINE): Remove macros. * build-aux/ac-help.sed: Remove file. * Makefile.maint (CONFIGURED_SUBDIRS, SUBDIRS_CONFIGURE): Remove variables. (ALL_CONFIGURE): Keep only the top-level configure. (%/configure): Remove rule. (ALL_CONFIG_H_IN): Set to only the top-level config.h.in. (config.h.in): Replace the %/config.h.in rule. * vacall/Makefile.maint (config.h.msvc, config.h.mingw32): Use top-level config.h.in. * trampoline/Makefile.maint (config.h.msvc, config.h.mingw32): Use top-level config.h.in. * callback/Makefile.maint (vacall_r/config.h.msvc, vacall_r/config.h.mingw32, trampoline_r/config.h.msvc, trampoline_r/config.h.mingw32): Update dependencies. * callback/vacall_r/Makefile.maint (config.h.msvc, config.h.mingw32): Use top-level config.h.in. * callback/trampoline_r/Makefile.maint (config.h.msvc, config.h.mingw32): Use top-level config.h.in. * Makefile.in (DISTCLEANFILES): Add config.h, libtool. (SOURCE_FILES): Remove build-aux/ac-help.sed. (GENERATED_FILES): Add config.h.in. Remove */config* and callback/*/config*. * avcall/Makefile.in (INCLUDES): Look also in '..'. (top_builddir): Set to '..'. (distclean): Don't remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * vacall/Makefile.in (INCLUDES): Look also in '..'. (misc.o): Update dependency. (distclean): Don't remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * trampoline/Makefile.in (INCLUDES): Look also in '..'. (top_builddir): Set to '..'. (distclean): Don't remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * callback/Makefile.in (INCLUDES): Look also in '..'. (top_builddir): Set to '..'. (DISTCLEANFILES): Remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * callback/vacall_r/Makefile.in (INCLUDES): Look also in '../..'. (top_builddir): Set to '../..'. (misc.lo): Update dependency. (distclean): Don't remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * callback/trampoline_r/Makefile.in (INCLUDES): Look also in '../..'. (top_builddir): Set to '../..'. (distclean): Don't remove config* and libtool. (SOURCE_FILES): Remove configure.ac. * README, */README: Update. 2017-06-24 Bruno Haible trampoline: Build library using libtool. * trampoline/configure.ac: Invoke FFCALL_COMMON_LIBTOOL. (CPU_OBJECTS): Now contains .lo file names instead of .o file names. * trampoline/Makefile.in (LIBTOOL*, top_builddir): New variables. (*.lo): Targets renamed from *.o. (libtrampoline.la): Replaces target libtrampoline.a. Use LIBTOOL* variables as appropriate. (clean): Remove also *.lo, libtrampoline.*, .libs, _libs. (distclean): Remove also 'libtool'. 2017-06-24 Bruno Haible trampoline: Generate position-independent code. * trampoline/Makefile.devel (GCCFLAGS): Add -fPIC. 2017-06-24 Bruno Haible vacall: Explain why not using libtool. * vacall/README: Add comment about libtool. 2017-06-24 Bruno Haible Fix result of an autoconf test on AIX. * m4/codeexec.m4 (FFCALL_CODEEXEC): Don't actually run the test on powerpc64 (AIX and Linux) and ia64 (Linux). 2017-06-24 Bruno Haible build: Avoid testing an undefined variable. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Before testing cl_cv_func_mprotect_works, test ac_cv_func_mprotect. 2017-06-24 Bruno Haible build: Add necessary AC_REQUIREs. * m4/codeexec.m4 (FFCALL_CODEEXEC): Require AC_CANONICAL_HOST and gl_HOST_CPU_C_ABI. 2017-06-24 Bruno Haible Fix build error on Solaris 11 with Oracle Developer Studio 12.5. * common/asm-x86_64.sh: Clarify the necessary postprocessing. * common/asm-i386.sh: Document the necessary postprocessing. * avcall/Makefile.in (avcall-i386.s): Do more postprocessing. * vacall/Makefile.in (vacall-i386.s): Likewise. * callback/vacall_r/Makefile.in (vacall-i386.s): Likewise. 2017-06-24 Bruno Haible Fix compilation error on CentOS 5. * trampoline/trampoline.c (open_noinherit): New function. (alloc_trampoline): Use it. * callback/trampoline_r/trampoline.c: Likewise. 2017-06-24 Bruno Haible Prefer https over http URLs. * autogen.sh: Access ftp.gnu.org through https. 2017-06-24 Bruno Haible Remove obsolete mention of nonexistent file. * avcall/README: Don't mention underscore.h. * vacall/README: Likewise. 2017-06-24 Bruno Haible Remove obsolete protexec.c file. * trampoline/protexec.c: Remove file. * trampoline/README: Update. * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove protexec.c. 2017-06-21 Bruno Haible Fix list of distributed files. * Makefile.in (SOURCE_FILES): Add m4/endianness.m4, common/asm-s390.sh. 2017-06-19 Bruno Haible Fix a misnomer. * vacall/vacall.h.in: Rename 'regarg' to 'iarg'. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-powerpc.c: Update accordingly. * vacall/vacall-s390.c: Likewise. 2017-06-18 Bruno Haible s390x: Add support for s390x CPU (64-bit S/390). * cross-tools/cross.conf: Add configuration for s390x cross tools. * common/reg-struct-return.txt: Add info about s390x. * callback/call-used-registers.txt: Likewise. * common/asm-s390.sh: New file. * avcall/avcall.h.in: Optionally define __s390x__. Add code for __s390x__, especially __av_start_struct4, av_float, av_double, __av_struct. * avcall/avcall-s390x.c: New file. * avcall/Makefile.devel (avcall-s390-macro.S): Use asm-s390.sh. (avcall-s390x-linux.s, avcall-s390x-macro.S): New targets. * avcall/Makefile.in (avcall-s390x.lo, avcall-s390x.s): New targets. (clean): Remove avcall-s390x.s. (SOURCE_FILES): Add avcall-s390x.c, avcall-s390x-linux.s, avcall-s390x-macro.S. * vacall/vacall.h.in: Optionally define __s390x__. Add code for __s390x__, especially __va_start_struct2, __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct. * vacall/vacall-s390x.c: New file. * vacall/Makefile.devel (vacall-s390-macro.S): Use asm-s390.sh. (vacall-s390x-linux.s, vacall-s390x-macro.S): New targets. * vacall/Makefile.in (vacall-s390x.o, vacall-s390x.s): New targets. (clean): Remove vacall-s390x.s. (SOURCE_FILES): Add vacall-s390x.c, vacall-s390x-linux.s, vacall-s390x-macro.S. * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-s390x.c. * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-s390x.c. * callback/vacall_r/vacall_r.h.in: Optionally define __s390x__. Add code for __s390x__, especially __va_start_struct2, __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct. * callback/vacall_r/Makefile.devel (vacall-s390-macro.S): Use asm-s390.sh. (vacall-s390x-linux.s, vacall-s390x-macro.S): New targets. * callback/vacall_r/Makefile.in (vacall-s390x.lo, vacall-s390x.s): New targets. (clean): Remove vacall-s390x.s. (SOURCE_FILES): Add vacall-s390x.c, vacall-s390x-linux.s, vacall-s390x-macro.S. * trampoline/Makefile.devel (proto-s390x.s, tramp-s390x.o): New targets. * trampoline/proto-s390x.s: New generated file. * trampoline/tramp-s390x.s: New file. * trampoline/tramp-s390x.o: New generated file. * trampoline/trampoline.c: Implement for __s390x__. * callback/trampoline_r/Makefile.devel (proto-s390x.s, tramp-s390x.o): New targets. * callback/trampoline_r/proto64.c: Add support for __s390x__. * callback/trampoline_r/proto-s390x.s: New generated file. * callback/trampoline_r/tramp-s390x.s: New file. * callback/trampoline_r/tramp-s390x.o: New generated file. * callback/trampoline_r/trampoline.c: Implement for __s390x__. * callback/trampoline_r/test1.c: Add support for __s390x__. * PLATFORMS, */PLATFORMS: List the s390x machine. * NEWS: Mention the new port. 2017-06-18 Bruno Haible Small code style improvements. * avcall/avcall.h.in [__arm64__]: Define and use __AV_FARG_NUM. [__s390__, __arm64__] (__av_struct): Avoid a boolean negation. * vacall/vacall.h.in [__arm64__]: Define and use __VA_IARG_NUM, __VA_FARG_NUM. [__x86_64__]: Define and use __VA_IARG_NUM. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-06-18 Bruno Haible s390: Reorder code. * avcall/avcall.h.in: Move s390 specific code to the end (after ia64 and x86_64 specific code). * vacall/vacall.h.in: Likewise. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-06-18 Bruno Haible s390: Improve trampolines. * trampoline/Makefile.devel (proto-s390.s): New target. (tramp-s390.o): Use cross tools. * trampoline/proto-s390.s: Regenerated with gcc 3.1. * trampoline/tramp-s390.s: Rewritten from scratch, to not use %r13. * trampoline/tramp-s390.o: New generated file. * trampoline/trampoline.c (alloc_trampoline) [__s390__]: Change the trampoline to not use %r13. * callback/trampoline_r/Makefile.devel (proto-s390.s): New target. (tramp-s390.o): Use cross tools. * callback/trampoline_r/proto-s390.s: Regenerated with gcc 3.1. * callback/trampoline_r/tramp-s390.s: Rewritten from scratch. Use 'lm' instruction. * callback/trampoline_r/tramp-s390.o: Regenerated. * callback/trampoline_r/trampoline.c (alloc_trampoline_r) [__s390__]: Change the trampoline accordingly. 2017-06-17 Bruno Haible arm64: Add support for arm64 CPU (a.k.a. aarch64). * cross-tools/cross.conf: Add configuration for arm64 cross tools. * common/reg-struct-return.txt: Add info about arm64. * callback/call-used-registers.txt: Likewise. * avcall/avcall.h.in: Add code for __arm64__, especially __av_start1, av_long, av_ulong, av_ptr, av_float, av_double, __av_struct. * avcall/avcall-arm64.c: New file. * avcall/Makefile.devel (avcall-arm64-macro.S): New target. * avcall/Makefile.in (avcall-arm64.lo, avcall-arm64.s): New targets. (clean): Remove avcall-arm64.s. (SOURCE_FILES): Add avcall-arm64.c, avcall-arm64-macro.S. * vacall/vacall.h.in: Add code for __arm64__, especially __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct. * vacall/vacall-arm64.c: New file. * vacall/Makefile.devel (vacall-arm64-macro.S): New target. * vacall/Makefile.in (vacall-arm64.o, vacall-arm64.s): New targets. (clean): Remove vacall-arm64.s. (SOURCE_FILES): Add vacall-arm64.c, vacall-arm64-macro.S. * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-arm64.c. * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-arm64.c. * callback/vacall_r/vacall_r.h.in: Add code for __arm64__, especially __va_arg_adjusted, va_arg_float, va_arg_double, __va_arg_struct. * callback/vacall_r/Makefile.devel (vacall-arm64-macro.S): New target. * callback/vacall_r/Makefile.in (vacall-arm64.lo, vacall-arm64.s): New targets. (clean): Remove vacall-arm64.s. (SOURCE_FILES): Add vacall-arm64.c, vacall-arm64-macro.S. * trampoline/Makefile.devel (proto-arm64.s, tramp-arm64.o): New targets. * trampoline/proto-arm64.s: New generated file. * trampoline/tramp-arm64.s: New file. * trampoline/tramp-arm64.o: New generated file. * trampoline/trampoline.c: Implement for __arm64__. * callback/trampoline_r/Makefile.devel (proto-arm64.s, tramp-arm64.o): New targets. * callback/trampoline_r/proto64.c: Add support for __arm64__. * callback/trampoline_r/proto-arm64.s: New generated file. * callback/trampoline_r/tramp-arm64.s: New file. * callback/trampoline_r/tramp-arm64.o: New generated file. * callback/trampoline_r/trampoline.c: Implement for __arm64__. * callback/trampoline_r/test1.c: Add support for __arm64__. * PLATFORMS, */PLATFORMS: List the arm64 machine. * NEWS: Mention the new port. 2017-06-16 Bruno Haible Remove unused fields from __va_alist. * vacall/vacall.h.in (__va_alist): Don't include _longlong and _ulonglong on platforms where they are unused. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-06-15 Bruno Haible Reduce the amount of cache invalidation to the necessary minimum. * trampoline/trampoline.c (alloc_trampoline): New macro TRAMP_CODE_LENGTH. Use it instead of TRAMP_LENGTH for cache invalidation. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2017-06-10 Bruno Haible Make the top-level "./configure --help" output complete. Reported by Karl Berry in . * build-aux/ac-help.sed: New file, from GNU gettext with modifications. * Makefile.in (SOURCE_FILES): Add it. * configure.ac: Collect the AC_ARG_* options from the subdirectories, like in GNU gettext. * callback/configure.ac: Likewise. * Makefile.maint (aclocal.m4): Disable esyscmd invocations while running aclocal. 2017-06-10 Bruno Haible In comments, write 'libffcall' instead of 'ffcall'. 2017-06-10 Bruno Haible Add cache invalidation for 64-bit powerpc. * trampoline/cache-powerpc64.c: New file. * trampoline/Makefile.devel (cache-powerpc64-elfv2-linux.s, cache-powerpc64-elfv2-macro.S): New rules. * trampoline/configure.ac (CPU_OBJECTS): Augment also for powerpc64-elfv2 ABI. * trampoline/Makefile.in (cache-powerpc64-elfv2.o, cache-powerpc64-elfv2.s): New rules. (clean): Remove also cache-powerpc64-elfv2.s. (SOURCE_FILES): Add cache-powerpc64.c, cache-powerpc64-elfv2-linux.s, cache-powerpc64-elfv2-macro.S. * trampoline/trampoline.c (__TR_clear_cache): Declare also for powerpc64-elfv2 ABI. (alloc_trampoline): Invoke __TR_clear_cache also on powerpc64-elfv2 ABI. * callback/trampoline_r/cache-powerpc64.c: New file. * callback/trampoline_r/Makefile.devel (cache-powerpc64-elfv2-linux.s, cache-powerpc64-elfv2-macro.S): New rules. * trampoline/configure.ac (CPU_OBJECTS): Augment also for powerpc64-elfv2 ABI. * callback/trampoline_r/Makefile.in (cache-powerpc64-elfv2.lo, cache-powerpc64-elfv2.s): New rules. (clean): Remove also cache-powerpc64-elfv2.s. (SOURCE_FILES): Add cache-powerpc64.c, cache-powerpc64-elfv2-linux.s, cache-powerpc64-elfv2-macro.S. * callback/trampoline_r/trampoline.c (__TR_clear_cache): Declare also for powerpc64-elfv2 ABI. (alloc_trampoline_r): Invoke __TR_clear_cache also on powerpc64-elfv2 ABI. 2017-06-10 Bruno Haible Fix cache invalidation for 32-bit powerpc. * trampoline/cache-powerpc.c: Add comment. * callback/trampoline_r/cache-powerpc.c: New file, based on trampoline/cache-powerpc.c. * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove cache-powerpc.c. * Makefile.in (COPIED_FILES): Remove callback/trampoline_r/cache-powerpc.c. 2017-06-10 Bruno Haible Don't declare the need for an executable stack on Linux and FreeBSD. * porting-tools: New directory. * common/asm-alpha.sh: New file. * common/asm-powerpc.sh: New file. * common/asm-arm.sh: Remove the GNU-stack note line. * common/asm-sparc.sh: Likewise. * common/asm-x86_64.sh: Likewise. * common/noexecstack.h: New file. * common/noexecstack-arm.h: New file. * avcall/Makefile.devel (precompiled): Add avcall-alpha-macro.S, avcall-powerpc-linux-macro.S, avcall-powerpc-sysv4-macro.S, avcall-powerpc64-linux.S, avcall-powerpc64-elfv2-linux.S, avcall-ia64-macro.S, avcall-s390-macro.S. Remove avcall-alpha.s, avcall-powerpc-linux.s, avcall-powerpc-sysv4.s, avcall-powerpc64-linux.s, avcall-powerpc64-elfv2-linux.s, avcall-ia64.s, avcall-s390.s. (avcall-i386-macro.S, avcall-m68k.mit.S, avcall-m68k.motorola.S, avcall-sparc-macro.S, avcall-sparc64-macro.S, avcall-hppa-macro.S, avcall-x86_64-macro.S): Include noexecstack.h. (avcall-alpha-linux.s): Renamed from avcall-alpha.s. (avcall-alpha-macro.S): New rule. (avcall-arm-macro.S, avcall-armhf-macro.S): Include noexecstack-arm.h. (avcall-powerpc-linux-macro.S): New rule. (avcall-powerpc-sysv4-macro.S): Replaces rule for avcall-powerpc-sysv4.s. (avcall-powerpc64-linux.S): Replaces rule for avcall-powerpc64-linux.s. (avcall-powerpc64-elfv2-linux.S): Replaces rule for avcall-powerpc64-elfv2-linux.s. (avcall-ia64-linux.s): Renamed from avcall-ia64.s. (avcall-ia64-macro.S): New rule. (avcall-s390-linux.s): Renamed from avcall-s390.s. (avcall-s390-macro.S): New rule. * avcall/Makefile.in (avcall-alpha.s): New rule. (avcall-alpha.lo): Update. (avcall-powerpc.s): Use avcall-powerpc-linux-macro.S, avcall-powerpc-sysv4-macro.S instead of avcall-powerpc-linux.s, avcall-powerpc-sysv4.s. (avcall-powerpc64.s): Use avcall-powerpc64-linux.S instead of avcall-powerpc64-linux.s. (avcall-powerpc64-elfv2.s): Use avcall-powerpc64-elfv2-linux.S instead of avcall-powerpc64-elfv2-linux.s. (avcall-ia64.s): New rule. (avcall-ia64.lo): Update. (avcall-s390.s): New rule. (avcall-s390.lo): Update. (clean): Remove also avcall-alpha.s, avcall-ia64.s, avcall-s390.s. (SOURCE_FILES): Update. * vacall/Makefile.devel (precompiled): Add vacall-alpha-macro.S, vacall-powerpc-linux-macro.S, vacall-powerpc-sysv4-macro.S, vacall-powerpc64-linux.S, vacall-powerpc64-elfv2-linux.S, vacall-ia64-macro.S, vacall-s390-macro.S. Remove vacall-alpha.s, vacall-powerpc-linux.s, vacall-powerpc-sysv4.s, vacall-powerpc64-linux.s, vacall-powerpc64-elfv2-linux.s, vacall-ia64.s, vacall-s390.s. (vacall-i386-macro.S, vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-sparc-macro.S, vacall-sparc64-macro.S, vacall-hppa-macro.S, vacall-x86_64-macro.S): Include noexecstack.h. (vacall-alpha-linux.s): Renamed from vacall-alpha.s. (vacall-alpha-macro.S): New rule. (vacall-arm-macro.S, vacall-armhf-macro.S): Include noexecstack-arm.h. (vacall-powerpc-linux-macro.S): New rule. (vacall-powerpc-sysv4-macro.S): Replaces rule for vacall-powerpc-sysv4.s. (vacall-powerpc64-linux.S): Replaces rule for vacall-powerpc64-linux.s. (vacall-powerpc64-elfv2-linux.S): Replaces rule for vacall-powerpc64-elfv2-linux.s. (vacall-ia64-linux.s): Renamed from vacall-ia64.s. (vacall-ia64-macro.S): New rule. (vacall-s390-linux.s): Renamed from vacall-s390.s. (vacall-s390-macro.S): New rule. * vacall/Makefile.in (vacall-alpha.s): New rule. (vacall-alpha.o): Update. (vacall-powerpc.s): Use vacall-powerpc-linux-macro.S, vacall-powerpc-sysv4-macro.S instead of vacall-powerpc-linux.s, vacall-powerpc-sysv4.s. (vacall-powerpc64.s): Use vacall-powerpc64-linux.S instead of vacall-powerpc64-linux.s. (vacall-powerpc64-elfv2.s): Use vacall-powerpc64-elfv2-linux.S instead of vacall-powerpc64-elfv2-linux.s. (vacall-ia64.s): New rule. (vacall-ia64.o): Update. (vacall-s390.s): New rule. (vacall-s390.o): Update. (clean): Remove also vacall-alpha.s, vacall-ia64.s, vacall-s390.s. (SOURCE_FILES): Update. * callback/vacall_r/Makefile.devel (precompiled): Add vacall-powerpc64-linux.S, vacall-powerpc64-elfv2-linux.S, vacall-ia64-macro.S. Remove vacall-powerpc64-linux.s, vacall-powerpc64-elfv2-linux.s, vacall-ia64.s. (vacall-i386-macro.S, vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-sparc-macro.S, vacall-sparc64-macro.S, vacall-alpha-macro.S, vacall-hppa-macro.S, vacall-powerpc-linux-macro.S, vacall-powerpc-sysv4-macro.S, vacall-x86_64-macro.S, vacall-s390-macro.S): Include noexecstack.h. (vacall-arm-macro.S, vacall-armhf-macro.S): Include noexecstack-arm.h. (vacall-powerpc64-linux.S): Replaces rule for vacall-powerpc64-linux.s. (vacall-powerpc64-elfv2-linux.S): Replaces rule for vacall-powerpc64-elfv2-linux.s. (vacall-ia64-linux.s): Renamed from vacall-ia64.s. (vacall-ia64-macro.S): New rule. * callback/vacall_r/Makefile.in (vacall-powerpc64.s): Use vacall-powerpc64-linux.S instead of vacall-powerpc64-linux.s. (vacall-powerpc64-elfv2.s): Use vacall-powerpc64-elfv2-linux.S instead of vacall-powerpc64-elfv2-linux.s. (vacall-ia64.s): New rule. (vacall-ia64.lo): Update. (vacall-s390.s): New rule. (vacall-s390.lo): Update. (clean): Remove also vacall-ia64.s. (SOURCE_FILES): Update. * trampoline/cache-alpha.s: Remove file. * trampoline/cache-hppa.s: Remove file. * trampoline/cache-powerpc-macos.s, trampoline/cache-powerpc-sysv4.s: Remove files. * trampoline/cache-sparc-macro.S: Remove file. * trampoline/tramp-hppa-macro.S: Renamed from trampoline/tramp-hppa.s. Include "noexecstack.h". * trampoline/tramp-ia64-macro.S: Renamed from trampoline/tramp-ia64.s. Include "noexecstack.h". * trampoline/tramp-powerpc64-aix.S: Include "noexecstack.h". * trampoline/Makefile.devel: Rename GCCFLAGS to OLDGCCFLAGS in old rules. (cache-*): Remove old rules. (precompiled): New target. (cache-sparc-linux.s, cache-sparc-macro.S, cache-sparc64-linux.s, cache-sparc64-macro.S, cache-alpha-linux.s, cache-alpha-macro.S, cache-hppa-linux.s, cache-hppa-macro.S, cache-powerpc-linux.s, cache-powerpc-linux-macro.S, cache-powerpc-macos.s): New rules. * trampoline/Makefile.in (tramp-hppa.s): New rule. (tramp-hppa.o): Update. (tramp-powerpc64.s: Depend on noexecstack.h. (tramp-ia64.s): New rule. (tramp-ia64.o): Update. (cache-sparc64.s): Update. (cache-alpha.s): New rule. (cache-alpha.o): Update. (cache-hppa.s): New rule. (cache-hppa.o): Update. (cache-powerpc.s): New rule. (cache-powerpc.o): Update. (clean): Remove also tramp-hppa.s, tramp-ia64.s, cache-alpha.s, cache-hppa.s, cache-powerpc.s. (SOURCE_FILES): Update. * callback/trampoline_r/cache-sparc-macro.S: Remove file. * callback/trampoline_r/tramp-hppa-macro.S: Renamed from callback/trampoline_r/tramp-hppa.s. Include "noexecstack.h". * callback/trampoline_r/tramp-ia64-macro.S: Renamed from callback/trampoline_r/tramp-ia64.s. Include "noexecstack.h". * callback/trampoline_r/tramp-powerpc64-aix.S: Include "noexecstack.h". * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove cache-alpha.s, cache-hppa.s, cache-powerpc-macos.s, cache-powerpc-sysv4.s. * callback/trampoline_r/Makefile.devel: Rename GCCFLAGS to OLDGCCFLAGS in old rules. (cache-*): Remove old rules. (precompiled): New target. (cache-sparc-linux.s, cache-sparc-macro.S, cache-sparc64-linux.s, cache-sparc64-macro.S, cache-alpha-linux.s, cache-alpha-macro.S, cache-hppa-linux.s, cache-hppa-macro.S, cache-powerpc-linux.s, cache-powerpc-linux-macro.S, cache-powerpc-macos.s): New rules. * callback/trampoline_r/Makefile.in (tramp-hppa.s): New rule. (tramp-hppa.lo): Update. (tramp-powerpc64.s: Depend on noexecstack.h. (tramp-ia64.s): New rule. (tramp-ia64.lo): Update. (cache-sparc64.s): Update. (cache-alpha.s): New rule. (cache-alpha.lo): Update. (cache-hppa.s): New rule. (cache-hppa.lo): Update. (cache-powerpc.s): New rule. (cache-powerpc.lo): Update. (clean): Remove also tramp-hppa.s, tramp-ia64.s, cache-alpha.s, cache-hppa.s, cache-powerpc.s. (SOURCE_FILES): Update. * Makefile.devel (precompiled): Recurse also into trampoline and callback/trampoline_r directories. * Makefile.in (SOURCE_FILES): Update. (COPIED_FILES): Remove callback/trampoline_r/cache-alpha.s, callback/trampoline_r/cache-hppa.s, callback/trampoline_r/cache-powerpc-macos.s, callback/trampoline_r/cache-powerpc-sysv4.s. * NEWS: Mention the change. 2017-06-10 Bruno Haible Simplify Makefile.devel. * avcall/Makefile.devel (HOST, CPU): Remove unused variables. * vacall/Makefile.devel (HOST, CPU): Likewise. * trampoline/Makefile.devel (HOST, CPU): Likewise. * callback/vacall_r/Makefile.devel (HOST, CPU): Likewise. * callback/trampoline_r/Makefile.devel (HOST, CPU): Likewise. 2017-06-10 Bruno Haible Make the EXECUTABLE_VIA_MMAP_FILE_SHARED support work on i386. * trampoline/trampoline.c (alloc_trampoline): New local variable 'function_x'. Use it instead of 'function' for the computation of the relative address in the i386 trampoline. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2017-06-04 Bruno Haible build: Get rid of autom4te.cache directories. * Makefile.maint (configure, $(SUBDIRS_CONFIGURE), $(ALL_CONFIG_H_IN)): Remove autom4te.cache subdirectory. 2017-06-04 Bruno Haible Change the license from GPLv2 to GPLv2+. * **/configure.ac, **/*.3, **/*.html, **/minitests.c, callback/MIGRATION, common/asm-*: Add copyright notice. * m4/*.m4: Use GPLv2+ with exception notice. * Everywhere else: Change GPLv2 copyright notice to GPLv2+ copyright notice. Update copyright years. 2017-06-03 Bruno Haible Make the cross-build.sh script work with argument 'all'. * cross-tools/cross-build.sh: Fix typo. 2017-06-03 Bruno Haible Improve support for SELinux. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): On SELinux systems, define HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC to -1. * trampoline/trampoline.c: When HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC is -1, assume the worst and don't set EXECUTABLE_VIA_MALLOC_THEN_MPROTECT. * callback/trampoline_r/trampoline.c: Likewise. 2017-06-03 Bruno Haible Improve support for SELinux. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): On SELinux systems, define HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC to -1. * trampoline/trampoline.c: When HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC is -1, assume the worst and don't set EXECUTABLE_VIA_MMAP_THEN_MPROTECT. * callback/trampoline_r/trampoline.c: Likewise. 2017-06-03 Bruno Haible Indent the *.m4 files. * m4/as-underscore.m4: Use reasonable indentation. * m4/cc-gcc.m4: Likewise. * m4/codeexec.m4: Likewise. * m4/endianness.m4: Likewise. * m4/general.m4: Likewise. * m4/getpagesize.m4: Likewise. * m4/ireg.m4: Likewise. * m4/ln.m4: Likewise. * m4/mach-vm.m4: Likewise. * m4/mmap.m4: Likewise. * m4/mprotect.m4: Likewise. * m4/pccstruct.m4: Likewise. * m4/shm.m4: Likewise. * m4/smallstruct.m4: Likewise. * m4/proto.m4: Likewise. (CL_PROTO_TRY, CL_PROTO_CONST, CL_PROTO_MISSING, CONST_VARIANTS, SIZE_VARIANTS): Remove macros. 2017-02-26 Bruno Haible Document more clearly the maintainer prerequisites. * Makefile.in (ACLOCAL, AUTOCONF, AUTOHEADER): Add comments. * README-hacking: Likewise. Reported by Don Cohen in and Sam Steingold . 2017-02-26 Bruno Haible Document the support for GNU Hurd. * PLATFORMS, */PLATFORMS: List i686-unknown-gnu0.9 (gcc). 2017-02-19 Bruno Haible configuration: Avoid running an unneeded test. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): Require FFCALL_CODEEXEC. Do nothing if its result is that malloc()ed memory is already executable. 2017-02-19 Bruno Haible Remove useless double-inclusion guard on .c files. * avcall/tests.c: Remove double-inclusion guard. * avcall/avcall-*.c: Likewise. Fix comment. 2017-02-19 Bruno Haible powerpc: Fix build failure on MacOS X (regression from 2017-01-29). 1. * cross-tools/cross.conf: For powerpc-darwin, go back to gcc 3.3.6. * cross-tools/patches/gcc-3.3.6.patch: New file. * avcall/Makefile.devel (avcall-powerpc-macos.s): Use gcc 3.3.6. * vacall/Makefile.devel (vacall-powerpc-macos.s): Use gcc 3.3.6. * callback/vacall_r/Makefile.devel (vacall-powerpc-macos.s): Use gcc 3.3.6. 2. * avcall/Makefile.in (avcall-powerpc.s): For MacOS, remove the .machine pseudo-op. * vacall/Makefile.in (vacall-powerpc.s): Likewise. * callback/vacall_r/Makefile.in (vacall-powerpc.s): Likewise. 3. * PLATFORMS, */PLATFORMS: List powerpc-apple-darwin9.8.0 (gcc). * NEWS: Mention the status of MacOS X / powerpc. 2017-02-12 Bruno Haible Make the cross-build.sh script work on an x86_64-linux host. * cross-tools/cross-build.sh: Remove the binutils-*/gprof directory. * cross-tools/patches/binutils-*.patch: Backport a buffer overrun bug fix from binutils-2.17. 2017-02-12 Bruno Haible Make the cross-build.sh script more usable. * README-hacking: Add more text. * cross-tools/cross-build.sh: Don't assume the script is run from the current directory. Accept a relative HOST_CROSS_DIR. Reported by Don Cohen . 2017-02-11 Bruno Haible Update documentation. * NEWS: List the progress since version 1.12. 2017-02-11 Bruno Haible powerpc: Add support for OpenBSD. * avcall/Makefile.in (avcall-powerpc.s): Treat OpenBSD like NetBSD. * vacall/Makefile.in (vacall-powerpc.s): Likewise. * callback/vacall_r/Makefile.in (vacall-powerpc.s): Likewise. 2017-02-11 Bruno Haible mips64: Add support for OpenBSD. On OpenBSD, cacheflush() is declared in , see openbsd-src/blob/master/lib/libarch/mips64/cacheflush.3 . * trampoline/trampoline.c [__OpenBSD__]: Include . * callback/trampoline_r/trampoline.c: Likewise. 2017-02-11 Bruno Haible Support the LDFLAGS configure variable. * avcall/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. * vacall/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. * trampoline/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. * callback/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. * callback/vacall_r/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. * callback/trampoline_r/Makefile.in (LDFLAGS): New variable. Use it in all linking commands. 2017-02-11 Bruno Haible Fix build failure on Mac OS X 10.5 / x86_64. Regression from today. * common/asm-x86_64.sh: Recognize symbol in symbol(%rip) syntax. * vacall/Makefile.devel (vacall-x86_64-macro.S): Remove extra postprocessing, now done by common/asm-x86_64.sh. 2017-02-11 Bruno Haible Fix build failure on Mac OS X 10.5 / i386. Regression from today. * common/asm-i386.sh: Simplify the function referencing code, originally for PIC on ELF platforms, so that it works also on non-ELF platforms. 2017-02-11 Bruno Haible x86_64: Add support for the x32 ABI on Linux. * avcall/avcall.h.in: Optionally define __x86_64_x32__. (__avword, __av_longlong): Define differently for __x86_64_x32__. * avcall/Makefile.devel (avcall-x86_64-x32-linux.s): New target. * avcall/Makefile.in (avcall-x86_64-x32.lo, avcall-x86_64-x32.s): New targets. (clean): Remove also avcall-x86_64-x32.s. (SOURCE_FILES): Add avcall-x86_64-x32-linux.s. * vacall/vacall-x86_64.c: Don't declare a register variable in %rbp for GCC >= 4.9. For __x86_64_x32__, treat return of 'long long' and 'unsigned long long' differently. * vacall/vacall.h.in: Optionally define __x86_64_x32__. (__vaword, va_arg_longlong, va_return_longlong): Define differently for __x86_64_x32__. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/Makefile.devel (vacall-x86_64-x32-linux.s): New target. * vacall/Makefile.in (vacall-x86_64-x32.o, vacall-x86_64-x32.s): New targets. (clean): Remove also vacall-x86_64-x32.s. (SOURCE_FILES): Add vacall-x86_64-x32-linux.s. * trampoline/Makefile.devel (proto-x86_64-x32.s, tramp-x86_64-x32.o): New targets. * trampoline/proto-x86_64-x32.s: New generated file. * trampoline/tramp-x86_64-x32.s: New file. * trampoline/tramp-x86_64-x32.o: New generated file. * trampoline/trampoline.c: Add code for __x86_64_x32__. * callback/vacall_r/Makefile.devel (vacall-x86_64-x32-linux.s): New target. * callback/vacall_r/Makefile.in (vacall-x86_64-x32.lo, vacall-x86_64-x32.s): New targets. (clean): Remove also vacall-x86_64-x32.s. (SOURCE_FILES): Add vacall-x86_64-x32-linux.s. * callback/trampoline_r/Makefile.devel (proto-x86_64-x32.s, tramp-x86_64-x32.o): New targets. * callback/trampoline_r/proto.c: Specify env register for __x86_64_x32__. * callback/trampoline_r/proto-x86_64-x32.s: New generated file. * callback/trampoline_r/tramp-x86_64-x32.s: New file. * callback/trampoline_r/tramp-x86_64-x32.o: New generated file. * callback/trampoline_r/trampoline.c: Add code for __x86_64_x32__. * PLATFORMS, */PLATFORMS: List x86_64-unknown-linux (gcc -mx32). 2017-02-11 Bruno Haible Simplify platform defines. Reverts commit from 2010-07-20. * trampoline/trampoline.h.in: Remove CPU symbol definitions. * callback/trampoline_r/trampoline_r.h.in: Likewise. 2017-02-11 Bruno Haible powerpc64: Add support for the ELFv2 ABI on Linux. * avcall/avcall-powerpc64.c: Handle small struct return in registers when __AV_REGISTER_STRUCT_RETURN is set. * avcall/avcall.h.in: Optionally define __powerpc64_elfv2__. (__AV_REGISTER_STRUCT_RETURN): Define also for __powerpc64__. (__av_reg_struct_return, __av_start_struct3): Define differently for __powerpc64_elfv2__. (av_float) [__powerpc64__]: Define in a simplified way if __AV_AIXCC_FLOAT_ARGS cannot be set. (__av_struct): Define differently for little-endian __powerpc64__. * avcall/Makefile.devel (avcall-powerpc64-elfv2-linux.s): New target. * avcall/Makefile.in (avcall-powerpc64-elfv2.lo, avcall-powerpc64-elfv2.s): New targets. (clean): Remove also avcall-powerpc64-elfv2.s. (SOURCE_FILES): Add avcall-powerpc64-elfv2-linux.s. * vacall/vacall-powerpc64.c: Handle small struct return in registers when __VA_REGISTER_STRUCT_RETURN is set. * vacall/vacall.h.in: Optionally define __powerpc64_elfv2__. (__VA_REGISTER_STRUCT_RETURN): Define also for __powerpc64__. (__va_reg_struct_return, __va_start_struct1): Define differently for __powerpc64_elfv2__. (__va_arg_adjusted): Define differently for little-endian __powerpc64__. (va_arg_float) [__powerpc64__]: Define in a simplified way if __VA_AIXCC_FLOAT_ARGS cannot be set. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/Makefile.devel (vacall-powerpc64-elfv2-linux.s): New target. * vacall/Makefile.in (vacall-powerpc64-elfv2.o, vacall-powerpc64-elfv2.s): New targets. (clean): Remove also vacall-powerpc64-elfv2.s. (SOURCE_FILES): Add vacall-powerpc64-elfv2-linux.s. * trampoline/Makefile.devel (proto-powerpc64-elfv2.s, tramp-powerpc64-elfv2.o): New targets. * trampoline/proto-powerpc64elfv2.s: New generated file. * trampoline/tramp-powerpc64elfv2.s: New file. * trampoline/tramp-powerpc64elfv2.o: New generated file. * trampoline/trampoline.c: Add code for __powerpc64_elfv2__. * callback/vacall_r/Makefile.devel (vacall-powerpc64-elfv2-linux.s): New target. * callback/vacall_r/Makefile.in (vacall-powerpc64-elfv2.lo, vacall-powerpc64-elfv2.s): New targets. (clean): Remove also vacall-powerpc64-elfv2.s. (SOURCE_FILES): Add vacall-powerpc64-elfv2-linux.s. * callback/trampoline_r/Makefile.devel (proto-powerpc64-elfv2.s, tramp-powerpc64-elfv2.o): New targets. * callback/trampoline_r/proto-powerpc64elfv2.s: New generated file. * callback/trampoline_r/tramp-powerpc64elfv2.s: New file. * callback/trampoline_r/tramp-powerpc64elfv2.o: New generated file. * callback/trampoline_r/trampoline.c: Add code for __powerpc64_elfv2__. * PLATFORMS, */PLATFORMS: List powerpc64le-unknown-linux (gcc). 2017-02-11 Bruno Haible powerpc64: Add support for AIX in a 64-bit build, with xlc. * avcall/avcall.h.in (__AV_AIXCC_FLOAT_ARGS, __AV_FLOAT_ARGS): New enum values. (__AV_START_FLAGS): Include __AV_FLOAT_ARGS. (av_float) [__powerpc64__]: Pick word according to whether __AV_AIXCC_FLOAT_ARGS is set. * vacall/vacall.h.in (__VA_AIXCC_FLOAT_ARGS, __VA_FLOAT_ARGS): New enum values. (__VA_START_FLAGS): Include __VA_FLOAT_ARGS. (va_arg_float) [__powerpc64__]: Pick word according to whether __VA_AIXCC_FLOAT_ARGS is set. * callback/vacall_r/vacall_r.h.in: Likewise. * PLATFORMS, */PLATFORMS: List powerpc-ibm-aix7.1.3.0 (xlc -q64). 2017-02-11 Bruno Haible powerpc64: Add support for AIX in a 64-bit build, with gcc. * avcall/avcall.h.in (__AV_AIXCC_STRUCT_ARGS): Define also on __powerpc64__. (__AV_STRUCT_ARGS): Set to __AV_AIXCC_STRUCT_ARGS on __powerpc64__ with AIX. (__av_struct): Define for __powerpc64__ like for __powerpc__. * vacall/vacall.h.in (__VA_AIXCC_STRUCT_ARGS): Define also on __powerpc64__. (__VA_STRUCT_ARGS): Set to __VA_AIXCC_STRUCT_ARGS on __powerpc64__ with AIX. (__va_arg_struct): Define for __powerpc64__ with AIX like for __powerpc__ with AIX. * callback/vacall_r/vacall_r.h.in: Likewise. * PLATFORMS, */PLATFORMS: List powerpc-ibm-aix7.1.3.0 (gcc -maix64). 2017-02-11 Bruno Haible powerpc64: Add support for AIX in a 64-bit build, part 1. * avcall/Makefile.devel (avcall-powerpc64-aix.s, avcall-powerpc64-linux.s): New targets. (avcall-powerpc64.s): Remove target. * avcall/Makefile.in (avcall-powerpc64.s): New target. (avcall-powerpc64.lo): Update. (clean): Remove also avcall-powerpc64.s. (SOURCE_FILES): Add avcall-powerpc64-aix.s, avcall-powerpc64-linux.s. Remove avcall-powerpc64.s. * vacall/Makefile.devel (vacall-powerpc64-aix.s, vacall-powerpc64-linux.s): New targets. (vacall-powerpc64.s): Remove target. * vacall/Makefile.in (vacall-powerpc64.s): New target. (vacall-powerpc64.o): Update. (clean): Remove also vacall-powerpc64.s. (SOURCE_FILES): Add vacall-powerpc64-aix.s, vacall-powerpc64-linux.s. Remove vacall-powerpc64.s. * callback/vacall_r/Makefile.devel (vacall-powerpc64-aix.s, vacall-powerpc64-linux.s): New targets. (vacall-powerpc64.s): Remove target. * callback/vacall_r/Makefile.in (vacall-powerpc64.s): New target. (vacall-powerpc64.lo): Update. (clean): Remove also vacall-powerpc64.s. (SOURCE_FILES): Add vacall-powerpc64-aix.s, vacall-powerpc64-linux.s. Remove vacall-powerpc64.s. 2017-02-11 Bruno Haible powerpc64: Update Makefile.devel rules. * trampoline/Makefile.devel (CROSS_TOOL): New variable. (proto-powerpc64-aix.s): Update rule. * callback/trampoline_r/Makefile.devel (proto-powerpc64-aix.s): Update rule. 2017-02-11 Bruno Haible hppa: Fix bug with structure return for sizes 5, 6, 7. * avcall/avcall-hppa.c: For structure return for sizes > 4, get 4 bytes from iret2. * vacall/vacall-hppa.c: For structure return for sizes > 4, put 4 bytes into iret2. 2017-02-11 Bruno Haible x86_64: Fix bug with structure return for sizes < 16, != 1, 2, 4, 8. * avcall/avcall-x86_64.c: Treat structure returns for all sizes <= 16 like those with sizes 1, 2, 4, 8, 16. 2017-02-11 Bruno Haible Add some dedicated small structure return tests. * avcall/tests.c (Size1, Size2, Size3, Size4, Size7, Size8, Size12, Size15, Size16): New types. (S1_v, S2_v, S3_v, S4_v, S7_v, S8_v, S12_v, S15_v, S15_v): New tests. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. 2017-02-11 Bruno Haible Remove outdated no-op definition. * vacall/vacall.h.in (__VA_ANSI_FLOAT_ARGS): Remove enum value. 2017-02-11 Bruno Haible powerpc: Don't special-case NetBSD. * vacall/vacall-powerpc.c: Remove special case of NetBSD. * callback/vacall_r/Makefile.devel (vacall-powerpc-netbsd-macro.S): Remove target. * callback/vacall_r/vacall-powerpc-netbsd.s: Remove file. * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Remove file. * callback/vacall_r/Makefile.in (vacall-powerpc.s): Use vacall-powerpc-linux-macro.S instead of vacall-powerpc-netbsd-macro.S. (SOURCE_FILES): Remove vacall-powerpc-netbsd.s, vacall-powerpc-netbsd-macro.S. * callback/trampoline_r/proto.c: Remove special case of powerpc/NetBSD. * callback/trampoline_r/trampoline.c: Remove special case of powerpc/NetBSD. * callback/trampoline_r/test1.c: Likewise. 2017-02-11 Bruno Haible m68k: Don't special-case NetBSD. * callback/call-used-registers.txt: Add comment about NetBSD. * vacall/vacall-m68k.c: Remove special case of NetBSD. * callback/vacall_r/Makefile.devel (vacall-m68k-netbsd-macro.S): Remove target. * callback/vacall_r/Makefile.in (vacall-m68k.s): Always use vacall-m68k.mit.S. (SOURCE_FILES): Remove vacall-m68k-netbsd-macro.S. * callback/trampoline_r/proto.c: Remove special case of m68k/NetBSD. * callback/trampoline_r/proto-m68k-netbsd.s: Remove file. * callback/trampoline_r/tramp-m68k-netbsd.s: Remove file. * callback/trampoline_r/tramp-m68k-netbsd.o: Remove file. * callback/trampoline_r/Makefile.devel (proto-m68k-netbsd.s, tramp-m68k-netbsd.o): Remove targets. * callback/trampoline_r/trampoline.c: Remove special case of m68k/NetBSD. * callback/trampoline_r/test1.c: Likewise. 2017-02-11 Bruno Haible Revert BINFMT_ELF hack. * callback/elf-hack.txt: Explain the new workaround. * callback/vacall_r/Makefile.devel (vacall-i386-macro.S, vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S, vacall-mipseb-macro.S, vacall-mipsel-macro.S, vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S, vacall-mips64eb-macro.S, vacall-mips64el-macro.S, vacall-alpha-macro.S, vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S, vacall-powerpc-sysv4-macro.S, vacall-x86_64-macro.S, vacall-s390-macro.S): Don't postprocess through elfhack-*.sed. * callback/vacall_r/elfhack-alpha.S: Remove file. * callback/vacall_r/elfhack-alpha.sed: Remove file. * callback/vacall_r/elfhack-i386.S: Remove file. * callback/vacall_r/elfhack-i386.sed: Remove file. * callback/vacall_r/elfhack-m68k.S: Remove file. * callback/vacall_r/elfhack-m68k.sed: Remove file. * callback/vacall_r/elfhack-mips.S: Remove file. * callback/vacall_r/elfhack-mips.sed: Remove file. * callback/vacall_r/elfhack-mips64.S: Remove file. * callback/vacall_r/elfhack-mips64.sed: Remove file. * callback/vacall_r/elfhack-powerpc.S: Remove file. * callback/vacall_r/elfhack-powerpc.sed: Remove file. * callback/vacall_r/elfhack-s390.S: Remove file. * callback/vacall_r/elfhack-s390.sed: Remove file. * callback/vacall_r/elfhack-x86_64.S: Remove file. * callback/vacall_r/elfhack-x86_64.sed: Remove file. * callback/vacall_r/Makefile.in (ASPFLAGS): Don't set BINFMT_ELF. (SOURCE_FILES): Remove elhack-*.S and elfhack-*.sed. * callback/vacall_r/configure.ac: Don't invoke FFCALL_BINFMT_ELF. * callback/trampoline_r/trampoline.c: Remove code for BINFMT_ELF. * callback/trampoline_r/tramp-alpha.s: Remove trampelf. * callback/trampoline_r/tramp-alpha.o: Regenerated. * callback/trampoline_r/tramp-i386.s: Remove trampelf. * callback/trampoline_r/tramp-i386.o: Regenerated. * callback/trampoline_r/tramp-m68k-netbsd.s: Remove trampelf. * callback/trampoline_r/tramp-m68k-netbsd.o: Regenerated. * callback/trampoline_r/tramp-m68k.s: Remove trampelf. * callback/trampoline_r/tramp-m68k.o: Regenerated. * callback/trampoline_r/tramp-mips.s: Remove trampelf. * callback/trampoline_r/tramp-mips.o: Regenerated. * callback/trampoline_r/tramp-mips64.s: Remove trampelf. * callback/trampoline_r/tramp-mips64.o: Regenerated. * callback/trampoline_r/tramp-powerpc-sysv4.s: Remove trampelf. * callback/trampoline_r/tramp-powerpc-sysv4.o: Regenerated. * callback/trampoline_r/tramp-s390.s: Remove trampelf. * callback/trampoline_r/tramp-s390.o: Regenerated. * callback/trampoline_r/tramp-x86_64.s: Remove trampelf. * callback/trampoline_r/tramp-x86_64.o: Regenerated. * callback/trampoline_r/test1.c: Reenable on ELF platforms. * callback/trampoline_r/configure.ac: Don't invoke FFCALL_BINFMT_ELF. * callback/configure.ac: Don't invoke FFCALL_BINFMT_ELF_OPTION. * configure.ac: Don't invoke FFCALL_BINFMT_ELF_OPTION. * m4/binfmt-elf.m4: Remove file. * Makefile.in (SOURCE_FILES): Remove it. * README: Update regarding the ELF problem. 2017-02-11 Bruno Haible Access __vacall_r through an indirection, except on SPARC. * callback/vacall_r/vacall_r.h.in (__vacall_r_t): New type. (get__vacall_r): New declaration. (__vacall_r): Remove declaration. * vacall/vacall-alpha.c [REENTRANT]: Make __vacall_r static. (get__vacall_r): New function. * vacall/vacall-arm.c: Likewise. * vacall/vacall-armhf.c: Likewise. * vacall/vacall-hppa.c: Likewise. * vacall/vacall-i386.c: Likewise. * vacall/vacall-ia64.c: Likewise. * vacall/vacall-m68k.c: Likewise. * vacall/vacall-mips.c: Likewise. * vacall/vacall-mipsn32.c: Likewise. * vacall/vacall-mips64.c: Likewise. * vacall/vacall-powerpc.c: Likewise. * vacall/vacall-powerpc64.c: Likewise. * vacall/vacall-s390.c: Likewise. * vacall/vacall-x86_64.c: Likewise. * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Update accordingly. * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s, vacall-mipsel-linux.s): Use option -mno-explicit-relocs. Needed for IRIX. * callback/vacall_r/Makefile.in (vacall-i386.s): Remove space after '@'. Needed on Solaris/x86. * callback/callback.h.in (alloc_callback, is_callback): Use get__vacall_r(). 2017-01-29 Bruno Haible s390: Regenerate .s and .S files with known compilers. * avcall/avcall-s390.c: Fix include statement. * avcall/Makefile.devel (avcall-s390.s): New target. * vacall/Makefile.devel (vacall-s390.s): New target. * callback/vacall_r/Makefile.devel (vacall-s390-linux.s): New target. * avcall/Makefile.in: Move avcall-s390.lo target. * vacall/Makefile.in: Move vacall-s390.o target. * avcall/avcall-s390.s: Remove from version control. * vacall/vacall-s390.s: Likewise. * callback/vacall_r/vacall-s390-linux.s: Likewise. * callback/vacall_r/vacall-s390-macro.S: Likewise. 2017-01-29 Bruno Haible x86_64: Regenerate .s and .S files with known compilers. * common/asm-x86_64.h (P2ALIGN): New macro. (ALIGN): Remove macro. * common/asm-x86_64.sh: Rewritten to consume ELF input. Produce L, P2ALIGN macros. * avcall/avcall-x86_64.c: Use __builtin_alloca instead of hacking on the 'sp' register. * avcall/Makefile.devel (avcall-x86_64-linux.s): Rewritten. * vacall/Makefile.devel (vacall-x86_64-linux.s): Rewritten. * callback/vacall_r/Makefile.devel (vacall-x86_64-linux.s): Rewritten. * avcall/avcall-x86_64-linux.s: Remove from version control. * avcall/avcall-x86_64-macro.S: Likewise. * vacall/vacall-x86_64-linux.s: Likewise. * vacall/vacall-x86_64-macro.S: Likewise. * callback/vacall_r/vacall-x86_64-linux.s: Likewise. * callback/vacall_r/vacall-x86_64-macro.S: Likewise. 2017-01-29 Bruno Haible ia64: Regenerate .s and .S files with known compilers. * avcall/Makefile.devel (avcall-ia64.s): Rewritten. * vacall/Makefile.devel (vacall-ia64.s): Rewritten. * callback/vacall_r/Makefile.devel (vacall-ia64.s): Rewritten. * vacall/vacall-ia64.c: Put all local variables in a struct. * avcall/avcall-ia64.s: Remove from version control. * vacall/vacall-ia64.s: Likewise. * callback/vacall_r/vacall-ia64.s: Likewise. 2017-01-29 Bruno Haible powerpc, powerpc64: Regenerate .s and .S files with known compilers. * avcall/avcall-powerpc64.c: Use __builtin_alloca. Use an 'if' cascade instead of gotos. * avcall/Makefile.devel (avcall-powerpc-linux.s): New target. (avcall-powerpc-aix.s, avcall-powerpc-sysv4.s, avcall-powerpc-macos.s, avcall-powerpc64.s): Rewritten. * vacall/Makefile.devel (vacall-powerpc-linux.s): New target. (vacall-powerpc-aix.s, vacall-powerpc-sysv4.s, vacall-powerpc-macos.s, vacall-powerpc64.s): Rewritten. * callback/vacall_r/Makefile.devel (vacall-powerpc-linux.s): New target. (vacall-powerpc-aix.s, vacall-powerpc-sysv4-macro.S, vacall-powerpc-macos.s, vacall-powerpc64.s): Rewritten. * avcall/avcall-powerpc-aix.s: Remove from version control. * avcall/avcall-powerpc-linux.s: Likewise. * avcall/avcall-powerpc-sysv4.s: Likewise. * avcall/avcall-powerpc-macos.s: Likewise. * avcall/avcall-powerpc64.s: Likewise. * vacall/vacall-powerpc-aix.s: Likewise. * vacall/vacall-powerpc-linux.s: Likewise. * vacall/vacall-powerpc-sysv4.s: Likewise. * vacall/vacall-powerpc-macos.s: Likewise. * vacall/vacall-powerpc64.s: Likewise. * callback/vacall_r/vacall-powerpc-aix.s: Likewise. * callback/vacall_r/vacall-powerpc-linux.s: Likewise. * callback/vacall_r/vacall-powerpc-linux-macro.S: Likewise. * callback/vacall_r/vacall-powerpc-sysv4-macro.S: Likewise. * callback/vacall_r/vacall-powerpc-macos.s: Likewise. * callback/vacall_r/vacall-powerpc64.s: Likewise. 2017-02-11 Bruno Haible armhf: Add support for arm with -mfloat-abi=hard. * avcall/avcall.h.in: Add code for __armhf__, especially __av_start1, __av_start_struct4, av_long, av_ulong, av_ptr, __av_longlong, av_float, av_double, __av_struct. * avcall/avcall-armhf.c: New file. * avcall/Makefile.devel (avcall-armhf-macro.S): New target. * avcall/Makefile.in (avcall-armhf.lo, avcall-armhf.s): New targets. (clean): Remove avcall-armhf.s. (SOURCE_FILES): Add avcall-armhf.c, avcall-armhf-macro.S. * vacall/vacall.h.in: Add code for __armhf__, especially va_arg_float, va_arg_double. * vacall/vacall-armhf.c: New file. * vacall/Makefile.devel (vacall-armhf-macro.S): New target. * vacall/Makefile.in (vacall-armhf.o, vacall-armhf.s): New targets. (clean): Remove vacall-armhf.s. (SOURCE_FILES): Add vacall-armhf.c, vacall-armhf-macro.S. * callback/vacall_r/Makefile.maint (COPIED_FILES): Add vacall-armhf.c. * Makefile.in (COPIED_FILES): Add callback/vacall_r/vacall-armhf.c. * callback/vacall_r/vacall_r.h.in: Add code for __armhf__, especially va_arg_float, va_arg_double. * callback/vacall_r/Makefile.devel (vacall-armhf-macro.S): New target. * callback/vacall_r/Makefile.in (vacall-armhf.lo, vacall-armhf.s): New targets. (clean): Remove vacall-armhf.s. (SOURCE_FILES): Add vacall-armhf.c, vacall-armhf-macro.S. * trampoline/trampoline.h.in: Optionally define __armhf__. * trampoline/trampoline.c: Treat __armhf__ like __arm__. * callback/trampoline_r/trampoline_r.h.in: Optionally define __armhf__. * callback/trampoline_r/trampoline.c: Treat __armhf__ like __arm__. * PLATFORMS, */PLATFORMS: List the armv7 machine with 'hard' floats. 2017-02-11 Bruno Haible arm: Make callback work, for -mfloat-abi=soft. * callback/trampoline_r/Makefile.devel (CROSS_TOOL): New variable. (proto-arm.s): Use known cross-compiler and -fno-omit-frame-pointer. (tramp-arm.o): Use known cross-assembler. * callback/trampoline_r/proto-arm.s: Regenerated. * callback/trampoline_r/tramp-arm.s: Try three different trampolines. The third one, trampcallwithframe, works. * callback/trampoline_r/tramp-arm.o: Regenerated. * callback/call-used-registers.txt: Add comments about arm. * callback/trampoline_r/trampoline.c: For arm, use a trampoline with standard prologue with struct args and standard epilogue. * callback/trampoline_r/test1.c: On arm platforms, don't check the passing of env. * vacall/vacall-arm.c [REENTRANT]: Expect to find env on the stack, not in r12. * callback/vacall_r/Makefile.devel (vacall-arm-macro.S): Don't postprocess through elfhack-arm.sed. * callback/vacall_r/elfhack-arm.S: Remove file. * callback/vacall_r/elfhack-arm.sed: Remove file. * callback/vacall_r/Makefile.in (SOURCE_FILES): Remove elfhack-arm.S, elfhack-arm.sed. * PLATFORMS: List the arm5 machine with 'soft' floats. * callback/PLATFORMS: Likewise. 2017-01-31 Bruno Haible arm: Make vacall work, for -mfloat-abi=soft. * vacall/vacall.h.in [__arm__] (__va_alist): Enable the filler word. * callback/vacall_r/vacall_r.h.in: Likewise. * vacall/vacall-arm.c: Use a split struct to convince GCC to allocate room on the stack for the first 4 general-purpose argument words. * vacall/PLATFORMS: List the arm5 machine with 'soft' floats. * avcall/PLATFORMS: Likewise. 2017-01-29 Bruno Haible arm: Fulfil the constraint that the sp register must be 8-bytes-aligned. * avcall/avcall-arm.c: Enforce 8-bytes-alignment of the stack pointer. * vacall/vacall-arm.c: Likewise. arm: Remove support for old arm platforms without the ARM EABI. * avcall/avcall.h.in: Revisit all __arm__ and __ARMEL__ conditionals. * vacall/vacall.h.in: Likewise. * callback/vacall_r/vacall_r.h.in: Likewise. * avcall/avcall-arm.c: Renamed from avcall/avcall-armel.c. * avcall/Makefile.devel (avcall-arm-macro.S): Make sure it's usable for both endiannesses. (avcall-armel.s): Remove target. * avcall/Makefile.in (avcall-armel.lo): Remove target. (SOURCE_FILES): Remove avcall-armel.[cs]. * vacall/vacall-arm.c: Renamed from vacall/vacall-armel.c. * vacall/Makefile.devel (vacall-arm-macro.S): Make sure it's usable for both endiannesses. (vacall-armel.s): Remove target. * vacall/Makefile.in (vacall-armel.o): Remove target. (SOURCE_FILES): Remove vacall-armel.[cs]. * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-armel.c. * callback/vacall_r/Makefile.devel (vacall-arm-macro.S): Make sure it's usable for both endiannesses. (vacall-armel-macro.S): Remove target. * callback/vacall_r/Makefile.maint (COPIED_FILES): Remove vacall-armel.c. * callback/vacall_r/Makefile.in (vacall-armel.lo, vacall-armel.s): Remove targets. (clean): Don't remove vacall-armel.s. (SOURCE_FILES): Remove vacall-armel.c, vacall-armel-macro.S. arm: Regenerate .s and .S files with known compilers. * common/asm-arm.h (L, FUNBEGIN, FUNEND): New macros. * common/asm-arm.sh: Rewritten to consume ELF input. Produce L, FUNBEGIN, FUNEND macros. * avcall/Makefile.devel (avcall-arm-macro.S, avcall-armel.s): Rewritten. * vacall/Makefile.devel (vacall-arm-macro.S, vacall-armel.s): Rewritten. * callback/vacall_r/Makefile.devel (vacall-arm-macro.S, vacall-armel-macro.S): Rewritten. * avcall/avcall-arm-macro.S: Remove from version control. * avcall/avcall-armel.s: Likewise. * vacall/vacall-arm-macro.S: Likewise. * vacall/vacall-armel.s: Likewise. * callback/vacall_r/vacall-arm-macro.S: Likewise. * callback/vacall_r/vacall-armel-macro.S: Likewise. 2017-01-29 Bruno Haible hppa: Regenerate .s and .S files with known compilers. * common/asm-hppa.sh: New file. * common/asm-hppa.h: New file. * Makefile.in (SOURCE_FILES): Add them. * avcall/Makefile.devel (avcall-hppa-linux.s, avcall-hppa-macro.S): New targets. (avcall-hppa.s): Remove target. * avcall/Makefile.in (avcall-hppa.s): New target. (avcall-hppa.lo): Update. (clean): Remove also avcall-hppa.s. (SOURCE_FILES): Add avcall-hppa-linux.s, avcall-hppa-macro.S. Remove avcall-hppa.s. * vacall/vacall-hppa.c: Use explicit assignments to move the arguments to their stack locations. * vacall/Makefile.devel (vacall-hppa-linux.s, vacall-hppa-macro.S): New targets. (vacall-hppa.s): Remove target. * vacall/Makefile.in (vacall-hppa.s): New target. (vacall-hppa.o): Update. (clean): Remove also vacall-hppa.s. (SOURCE_FILES): Add vacall-hppa-linux.s, vacall-hppa-macro.S. Remove vacall-hppa.s. * callback/vacall_r/Makefile.devel (vacall-hppa-linux.s, vacall-hppa-macro.S): New targets. (vacall-hppa.s): Remove target. * callback/vacall_r/Makefile.in (vacall-hppa.s): New target. (vacall-hppa.lo): Update. (clean): Remove also vacall-hppa.s. (SOURCE_FILES): Add vacall-hppa-linux.s, vacall-hppa-macro.S. Remove vacall-hppa.s. * avcall/avcall-hppa.s: Remove from version control. * vacall/vacall-hppa.s: Likewise. * callback/vacall_r/vacall-hppa.s: Likewise. * PLATFORMS, */PLATFORMS: List hppa2.0w-hp-hpux11.31 (cc). 2017-01-29 Bruno Haible alpha: Regenerate .s and .S files with known compilers. * avcall/avcall-alpha.c: Use __builtin_alloca. * avcall/Makefile.devel (precompiled): Depend on avcall-alpha.s. (avcall-alpha.s): Rewritten. * vacall/vacall-alpha.c: Put all local variables in a struct. * vacall/Makefile.devel (precompiled): Depend on vacall-alpha.s. (vacall-alpha.s): Rewritten. * callback/vacall_r/Makefile.devel (precompiled): Depend on vacall-alpha-macro.S. (vacall-alpha-linux.s): New target. (vacall-alpha-macro.S): Rewritten. * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-alpha-linux.s. * avcall/avcall-alpha.s: Remove from version control. * vacall/vacall-alpha.s: Likewise. * callback/vacall_r/vacall-alpha-macro.S: Likewise. 2017-01-29 Bruno Haible sparc64: Fix for Solaris. * vacall/Makefile.devel (vacall-sparc64-linux.s): Produce code that does not make assumptions about the address space. * PLATFORMS, */PLATFORMS: List sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64). 2017-01-29 Bruno Haible sparc, sparc64: Regenerate .s and .S files with known compilers. * common/asm-sparc.h (L, FUNBEGIN, FUNEND): New macros. * common/asm-sparc.sh: Rewritten to consume ELF input. Produce L, FUNBEGIN, FUNEND macros. * common/asm-sparc64.sh: Remove file. * Makefile.in (SOURCE_FILES): Remove common/asm-sparc64.sh. * avcall/Makefile.devel (precompiled): Depend on avcall-sparc-macro.S and avcall-sparc64-macro.S. (avcall-sparc-linux.s, avcall-sparc64-linux.s): New target. (avcall-sparc-macro.S, avcall-sparc64-macro.S): Rewritten. * avcall/Makefile.in (SOURCE_FILES): Add avcall-sparc-linux.s, avcall-sparc64-linux.s. * vacall/Makefile.devel (precompiled): Depend on vacall-sparc-macro.S and vacall-sparc64-macro.S. (vacall-sparc-linux.s, vacall-sparc64-linux.s): New target. (vacall-sparc-macro.S, vacall-sparc64-macro.S): Rewritten. * vacall/Makefile.in (SOURCE_FILES): Add vacall-sparc-linux.s, vacall-sparc64-linux.s. * callback/vacall_r/Makefile.devel (precompiled): Depend on vacall-sparc-macro.S and vacall-sparc64-macro.S. (vacall-sparc-linux.s, vacall-sparc64-linux.s): New target. (vacall-sparc-macro.S, vacall-sparc64-macro.S): Rewritten. * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-sparc-linux.s, vacall-sparc64-linux.s. * avcall/avcall-sparc-macro.S: Remove from version control. * avcall/avcall-sparc64-macro.S: Likewise. * vacall/vacall-sparc-macro.S: Likewise. * vacall/vacall-sparc64-macro.S: Likewise. * callback/vacall_r/vacall-sparc-macro.S: Likewise. * callback/vacall_r/vacall-sparc64-macro.S: Likewise. 2017-01-29 Bruno Haible mips64: Make it work on Linux (mips64, mips64el) with "gcc -mabi=64". * avcall/avcall-mips64.c: Add code for struct returns on _MIPSEL. * avcall/Makefile.devel (avcall-mips64eb-linux.s, avcall-mips64eb-macro.S, avcall-mips64el-linux.s, avcall-mips64el-macro.S): New targets. (avcall-mips64-linux.s, avcall-mips64-macro.S): Remove targets. * avcall/Makefile.in (avcall-mips64.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add avcall-mips64eb-linux.s, avcall-mips64el-linux.s, avcall-mips64eb-macro.S, avcall-mips64el-macro.S. Remove avcall-mips64-linux.s, avcall-mips64-macro.S. * vacall/vacall-mips64.c: Add code for struct returns on _MIPSEL. * vacall/Makefile.devel (vacall-mips64eb-linux.s, vacall-mips64eb-macro.S, vacall-mips64el-linux.s, vacall-mips64el-macro.S): New targets. (vacall-mips64-linux.s, vacall-mips64-macro.S): Remove targets. * vacall/Makefile.in (vacall-mips64.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mips64eb-linux.s, vacall-mips64el-linux.s, vacall-mips64eb-macro.S, vacall-mips64el-macro.S. Remove vacall-mips64-linux.s, vacall-mips64-macro.S. * callback/vacall_r/Makefile.devel (vacall-mips64eb-linux.s, vacall-mips64eb-macro.S, vacall-mips64el-linux.s, vacall-mips64el-macro.S): New targets. (vacall-mips64-linux.s, vacall-mips64-macro.S): Remove targets. * callback/vacall_r/Makefile.in (vacall-mips64.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mips64eb-linux.s, vacall-mips64el-linux.s, vacall-mips64eb-macro.S, vacall-mips64el-macro.S. Remove vacall-mips64-linux.s, vacall-mips64-macro.S. * PLATFORMS, */PLATFORMS: List mips64-unknown-linux (gcc -mabi=64). 2017-01-29 Bruno Haible mipsn32: Make it work on Linux (mips64, mips64el) with "gcc -mabi=n32". * avcall/avcall-mipsn32.c: Add code for struct returns on _MIPSEL. * avcall/Makefile.devel (avcall-mipsn32eb-linux.s, avcall-mipsn32eb-macro.S, avcall-mipsn32el-linux.s, avcall-mipsn32el-macro.S): New targets. (avcall-mipsn32-linux.s, avcall-mipsn32-macro.S): Remove targets. * avcall/Makefile.in (avcall-mipsn32.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add avcall-mipsn32eb-linux.s, avcall-mipsn32el-linux.s, avcall-mipsn32eb-macro.S, avcall-mipsn32el-macro.S. Remove avcall-mipsn32-linux.s, avcall-mipsn32-macro.S. * vacall/vacall-mipsn32.c: Add code for struct returns on _MIPSEL. * vacall/Makefile.devel (vacall-mipsn32eb-linux.s, vacall-mipsn32eb-macro.S, vacall-mipsn32el-linux.s, vacall-mipsn32el-macro.S): New targets. (vacall-mipsn32-linux.s, vacall-mipsn32-macro.S): Remove targets. * vacall/Makefile.in (vacall-mipsn32.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s, vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S. Remove vacall-mipsn32-linux.s, vacall-mipsn32-macro.S. * callback/vacall_r/Makefile.devel (vacall-mipsn32eb-linux.s, vacall-mipsn32eb-macro.S, vacall-mipsn32el-linux.s, vacall-mipsn32el-macro.S): New targets. (vacall-mipsn32-linux.s, vacall-mipsn32-macro.S): Remove targets. * callback/vacall_r/Makefile.in (vacall-mipsn32.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mipsn32eb-linux.s, vacall-mipsn32el-linux.s, vacall-mipsn32eb-macro.S, vacall-mipsn32el-macro.S. Remove vacall-mipsn32-linux.s, vacall-mipsn32-macro.S. * PLATFORMS, */PLATFORMS: List mips64-unknown-linux (gcc -mabi=n32). 2017-01-29 Bruno Haible mips: Make it work on Linux (mips, mipsel) with "gcc -mabi=32". * m4/endianness.m4: New file. * avcall/Makefile.devel (avcall-mipseb-linux.s, avcall-mipseb-macro.S, avcall-mipsel-linux.s, avcall-mipsel-macro.S): New targets. (avcall-mips-linux.s, avcall-mips-macro.S): Remove targets. * avcall/configure.ac: Invoke FFCALL_ENDIANNESS. * avcall/Makefile.in (avcall-mips.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add avcall-mipseb-linux.s, avcall-mipsel-linux.s, avcall-mipseb-macro.S, avcall-mipsel-macro.S. Remove avcall-mips-linux.s, avcall-mips-macro.S. * vacall/Makefile.devel (vacall-mipseb-linux.s, vacall-mipseb-macro.S, vacall-mipsel-linux.s, vacall-mipsel-macro.S): New targets. (vacall-mips-linux.s, vacall-mips-macro.S): Remove targets. * vacall/configure.ac: Invoke FFCALL_ENDIANNESS. * vacall/Makefile.in (vacall-mips.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mipseb-linux.s, vacall-mipsel-linux.s, vacall-mipseb-macro.S, vacall-mipsel-macro.S. Remove vacall-mips-linux.s, vacall-mips-macro.S. * callback/vacall_r/Makefile.devel (vacall-mipseb-linux.s, vacall-mipseb-macro.S, vacall-mipsel-linux.s, vacall-mipsel-macro.S): New targets. * callback/vacall_r/configure.ac: Invoke FFCALL_ENDIANNESS. * callback/vacall_r/Makefile.in (vacall-mips.s): Take into account the ENDIANNESS. (SOURCE_FILES): Add vacall-mipseb-linux.s, vacall-mipsel-linux.s, vacall-mipseb-macro.S, vacall-mipsel-macro.S. Remove vacall-mips-linux.s, vacall-mips-macro.S. * PLATFORMS, */PLATFORMS: List mips-unknown-linux (gcc -mabi=32). 2017-01-29 Bruno Haible mips, mipsn32, mips64: Regenerate .s and .S files with known compilers. This restores support for IRIX with cc -32 (regression from 2008-09-26). * common/asm-mips.sh: Rewritten to consume ELF input. * avcall/avcall-mips.c: Rely on the compiler to set $25 at each function call. Add comment about broken GCC 3.3.x and 3.4.x. Avoid 'switch' statements, to make the generated code position-independent. Declare iret2 as single __avword. * avcall/avcall-mipsn32.c: Use __builtin_alloca. Rely on the compiler to set $25 at each function call. * avcall/avcall-mips64.c: Likewise. * avcall/Makefile.devel (precompiled): Depend on avcall-mips-macro.S, avcall-mipsn32-macro.S, avcall-mips64-macro.S. (avcall-mips-linux.s, avcall-mipsn32-linux.s, avcall-mips64-linux.s): New targets. (avcall-mips-macro.S, avcall-mipsn32-macro.S, avcall-mips64-macro.S): Rewritten. * avcall/Makefile.in (SOURCE_FILES): Add avcall-mips-linux.s, avcall-mipsn32-linux.s, avcall-mips64-linux.s. * vacall/vacall-mips.c: Rely on the compiler to set $25 at each function call. * vacall/vacall-mipsn32.c: Likewise. * vacall/vacall-mips64.c: Likewise. Add offset to references of arguments in the stack. * vacall/Makefile.devel (precompiled): Depend on vacall-mips-macro.S, vacall-mipsn32-macro.S, vacall-mips64-macro.S. (vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s): New targets. (vacall-mips-macro.S): Rewritten. (vacall-mipsn32-macro.S): Rewritten. Update the postprocessing hack. (vacall-mips64-macro.S): Rewritten. Add a postprocessing hack. * vacall/Makefile.in (SOURCE_FILES): Add vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s. * callback/vacall_r/Makefile.devel (precompiled): Depend on vacall-mips-macro.S, vacall-mipsn32-macro.S, vacall-mips64-macro.S. (vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s): New targets. (vacall-mips-macro.S): Rewritten. (vacall-mipsn32-macro.S): Rewritten. Update the postprocessing hack. (vacall-mips64-macro.S): Rewritten. Add a postprocessing hack. * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-mips-linux.s, vacall-mipsn32-linux.s, vacall-mips64-linux.s. * avcall/avcall-mips-macro.S: Remove from version control. * avcall/avcall-mipsn32-macro.S: Likewise. * avcall/avcall-mips64-macro.S: Likewise. * vacall/vacall-mips-macro.S: Likewise. * vacall/vacall-mipsn32-macro.S: Likewise. * vacall/vacall-mips64-macro.S: Likewise. * callback/vacall_r/vacall-mips-macro.S: Likewise. * callback/vacall_r/vacall-mipsn32-macro.S: Likewise. * callback/vacall_r/vacall-mips64-macro.S: Likewise. * PLATFORMS, */PLATFORMS: List mips-sgi-irix6.5 (cc -32). 2017-01-29 Bruno Haible m68k: Regenerate .s and .S files with known compilers. * common/asm-m68k.h (L, FUNBEGIN, FUNEND): New macros. * common/asm-m68k.sh: Expect a syntax argument. Produce L, FUNBEGIN, FUNEND macros. * avcall/avcall-m68k.c: Use __builtin_alloca instead of hacking on the 'sp' register. * avcall/Makefile.devel (precompiled): Depend on avcall-m68k.mit.S and avcall-m68k.motorola.S. (avcall-m68k-linux.s, avcall-m68k-sun.s): New targets. (avcall-m68k.mit.S, avcall-m68k.motorola.S): Rewritten. * avcall/Makefile.in (avcall-m68k.s): Depend on avcall-m68k.motorola.S instead of avcall-m68k.mot.s. (SOURCE_FILES): Add avcall-m68k-linux.s, avcall-m68k-sun.s. Replace avcall-m68k.mot.s with avcall-m68k.motorola.S. * vacall/Makefile.devel (precompiled): Depend on vacall-m68k.mit.S and vacall-m68k.motorola.S. (vacall-m68k-linux.s, vacall-m68k-sun.s): New targets. (vacall-m68k.mit.S, vacall-m68k.motorola.S): Rewritten. * vacall/Makefile.in (vacall-m68k.s): Depend on vacall-m68k.motorola.S instead of vacall-m68k.mot.s. (SOURCE_FILES): Add vacall-m68k-linux.s, vacall-m68k-sun.s, vacall-mips-linux.s, vacall-mipsn32-linux.s, Replace vacall-m68k.mot.s with vacall-m68k.motorola.S. * callback/vacall_r/Makefile.devel (precompiled): Depend on vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S. (vacall-m68k-linux.s, vacall-m68k-sun.s): New targets. (vacall-m68k.mit.S, vacall-m68k.motorola.S, vacall-m68k-netbsd-macro.S): Rewritten. * callback/vacall_r/Makefile.in (vacall-m68k.s): Depend on vacall-m68k.motorola.S instead of vacall-m68k.mot.s. (SOURCE_FILES): Add vacall-m68k-linux.s, vacall-m68k-sun.s. Replace vacall-m68k.mot.s with vacall-m68k.motorola.S. * avcall/avcall-m68k.mit.S: Remove from version control. * avcall/avcall-m68k.mot.s: Likewise. * callback/vacall_r/vacall-m68k-netbsd-macro.S: Likewise. * callback/vacall_r/vacall-m68k.mit.S: Likewise. * callback/vacall_r/vacall-m68k.mot.s: Likewise. * vacall/vacall-m68k.mit.S: Likewise. * vacall/vacall-m68k.mot.s: Likewise. 2017-01-29 Bruno Haible i386: Regenerate .s and .S files with known compilers. * common/asm-i386.hh (P2ALIGN): New macro. (FUNEND): Take two arguments. * common/asm-i386.sh: Rewritten to consume ELF input. Produce P2ALIGN macro. Handle indirect call statements. * avcall/avcall-i386.c: Use __builtin_alloca instead of hacking on the 'sp' register. * avcall/Makefile.devel (precompiled): Depend on avcall-i386-macro.S. (avcall-i386-linux.s): New target. (avcall-i386-macro.S): Rewritten. * avcall/Makefile.in (SOURCE_FILES): Add avcall-i386-linux.s. * vacall/vacall-i386.c: Insert the appropriate stack cleanup before 'ret $4'. * vacall/Makefile.devel (precompiled): Depend on vacall-i386-macro.S. (vacall-i386-linux.s): New target. (vacall-i386-macro.S): Rewritten. * vacall/Makefile.in (SOURCE_FILES): Add vacall-i386-linux.s. * callback/vacall_r/Makefile.devel (precompiled): Depend on vacall-i386-macro.S. (vacall-i386-linux.s): New target. (vacall-i386-macro.S): Rewritten. * callback/vacall_r/Makefile.in (SOURCE_FILES): Add vacall-i386-linux.s. * avcall/avcall-i386-macro.S: Remove from version control. * vacall/vacall-i386-macro.S: Likewise. * callback/vacall_r/vacall-i386-macro.S: Likewise. 2017-02-11 Bruno Haible Prepare for regenerating .s and .S files with known compilers. This serves three purposes: 1. Being able to regenerate everything if avcall.h.in or vacall.h.in changes. 2. Allow safe stack unwinding across avcall and vacall invocations. 3. Allow distributing libavcall and libcallback as shared libraries. * README-hacking: Document the cross compilers. * cross-tools/cross.conf: New file. * cross-tools/cross-build.sh: New file. * cross-tools/cross.in: New file. * cross-tools/patches/*.patch: New files. * avcall/Makefile.devel (GCCFLAGS): Add -fno-omit-frame-pointer, -fPIC. (CROSS_TOOL): New variable. * vacall/Makefile.devel (GCCFLAGS): Add -fno-omit-frame-pointer. (CROSS_TOOL): New variable. * callback/vacall_r/Makefile.devel (GCCFLAGS): Add -fno-omit-frame-pointer, -fPIC. (CROSS_TOOL): New variable. 2017-01-29 Bruno Haible s390: Fix long long args. * avcall/avcall.h.in (__av_longlong): Align only on a 4-bytes boundary, not on an 8-bytes boundary. Fix condition for switching from register args to stack args. * vacall/vacall.h.in (__va_arg_leftadjusted, __va_arg_rightadjusted): Fix condition for switching from register args to stack args. (__va_arg_longlong): Use __va_arg. * callback/vacall_r/vacall_r.h.in (__va_arg_leftadjusted, __va_arg_rightadjusted): Fix condition for switching from register args to stack args. (__va_arg_longlong): Use __va_arg. * PLATFORMS, */PLATFORMS: List s390x-ibm-linux with "gcc -m31". 2017-01-29 Bruno Haible s390: Fix trampoline. * trampoline/trampoline.c [__s390__]: Fix is_tramp macro. 2017-01-29 Bruno Haible ia64: Fix struct args. * avcall/avcall.h.in (__av_struct): Tweak #if. * avcall/avcall-ia64.c: Fix comment. * vacall/vacall.h.in (__va_arg_struct): Change #if to match callback/vacall_r/vacall_r.h.in. * callback/call-used-registers.txt: Fix info about ia64. * callback/vacall_r/vacall_r.h.in (__va_arg_struct): Tweak #if. * callback/trampoline_r/trampoline.c [__ia64__]: Fix is_tramp macro. 2017-01-29 Bruno Haible powerpc64: Make trampoline work on AIX in a 64-bit build. * trampoline/tramp-powerpc64-aix.S: Add assembler pseudo-ops for AIX. * callback/trampoline_r/tramp-powerpc64-aix.S: Likewise. 2017-01-29 Bruno Haible arm: Comments. * avcall/avcall-arm.c: Add comments. * avcall/avcall.h.in: Fix comment. 2017-01-29 Bruno Haible arm: Make trampoline work on real ARM harware. The cache flushing code in cache-arm.c and cache-armel.c are for old Linux versions. Nowadays the best way is through the GCC builtin function __clear_cache (which makes the appropriate Linux system call). * trampoline/trampoline.c (alloc_trampoline) [__arm__]: Invoke GCC builtin function __clear_cache. Remove call to __TR_clear_cache. * callback/trampoline_r/trampoline.c (alloc_trampoline_r) [__arm__]: Likewise. * trampoline/cache-arm.[cs]: Remove files. * trampoline/cache-armel.[cs]: Remove files. * callback/trampoline_r/Makefile.maint (COPIED_FILES): Remove cache-arm*. * Makefile.in (COPIED_FILES): Remove callback/trampoline_r/cache-arm*. * trampoline/Makefile.devel (cache-armel.s): Remove target. * trampoline/configure.ac (CPU_OBJECTS): Leave empty for arm and armel. * trampoline/Makefile.in (cache-arm.o, cache-armel.o): Remove targets. (SOURCE_FILES): Remove cache-arm.[cs], cache-armel.[cs]. * callback/trampoline_r/Makefile.devel (cache-armel.s): Remove target. * callback/trampoline_r/configure.ac (CPU_OBJECTS): Leave empty for arm and armel. * callback/trampoline_r/Makefile.in (cache-arm.lo, cache-armel.lo): Remove targets. (SOURCE_FILES): Remove cache-arm.[cs], cache-armel.[cs]. * trampoline/PLATFORMS: Add two ARM platforms. 2017-01-29 Bruno Haible hppa: Fix struct returns. * avcall/avcall.h.in [__hppa__]: Don't set __AV_PCC_STRUCT_RETURN by default. * avcall/avcall-hppa.c: Fix comment. * vacall/vacall.h.in [__hppa__]: Don't set __VA_PCC_STRUCT_RETURN by default. * callback/vacall_r/vacall_r.h.in [__hppa__]: Don't set __VA_PCC_STRUCT_RETURN by default. 2017-01-29 Bruno Haible sparc64: Fix the passing of 'float' arguments. * vacall/vacall.h.in (va_arg_float): Expect the float in the upper half of the 8-bytes word. * callback/vacall_r/vacall_r.h.in (va_arg_float): Likewise. * PLATFORMS, */PLATFORMS: List sparc64-unknown-linux (gcc). 2017-01-29 Bruno Haible sparc64: Fix a compiler warning. * vacall/vacall.h.in (__va_arg_struct): Add a cast to pointer. * callback/vacall_r/vacall_r.h.in: Likewise. 2017-01-29 Bruno Haible mips64: Fix trampoline_r. * callback/trampoline_r/trampoline.c: Fix conditionals that involve __mips64__. * callback/trampoline_r/test1.c: Fix duplicate declaration of 'env' on mips64. 2017-01-29 Bruno Haible mipsn32, mips64: Fix for little-endian platforms. * vacall/vacall.h.in (__va_arg_adjusted): Use same conditional on _MIPSEB and _MIPSEL as in callback/vacall_r/vacall_r.h.in. * callback/vacall_r/vacall_r.h.in: Reorder parts of a #if condition. 2017-01-29 Bruno Haible mips: Fix for Linux with "gcc -mabi=32". * trampoline/tramp-mips.old.o: Renamed from trampoline/tramp-mips.o. * trampoline/tramp-mips.old.s: Renamed from trampoline/tramp-mips.s. * trampoline/tramp-mips.s: New file, based on trampoline/tramp-mipsn32.s. * trampoline/tramp-mips.o: New generated file. * trampoline/trampoline.c: For __mips__, use the same trampoline as for __mipsn32__. 2017-01-29 Bruno Haible mips: Fix for Linux with "gcc -mabi=32". * vacall/vacall.h.in (__va_arg_adjusted): Use same conditional on _MIPSEB as in callback/vacall_r/vacall_r.h.in. 2017-01-29 Bruno Haible mipsn32, mips64: Fix struct args and struct returns with newer GCC. * avcall/avcall.h.in: For mipsn32 and mips64 in gcc >= 3.4: 1. Don't set __AV_GCC_STRUCT_RETURN. 2. Use __AV_SGICC_STRUCT_ARGS. * vacall/vacall.h.in: For mipsn32 and mips64 in gcc >= 3.4: 1. Don't set __VA_GCC_STRUCT_RETURN. 2. Use __VA_SGICC_STRUCT_ARGS. * callback/vacall_r/vacall_r.h.in: Likewise. * PLATFORMS, */PLATFORMS: List mips-sgi-irix6.5 (gcc -mabi=n32). 2017-01-29 Bruno Haible x86_64: Fix bug with structure arguments larger than 16 bytes. * avcall/avcall.h.in (__av_struct): Pass structures > 16 bytes on the stack. * vacall/vacall.h.in (__va_arg_adjusted): Expect types > 16 bytes passed on the stack. * callback/vacall_r/vacall_r.h.in (__va_arg_adjusted): Likewise. 2017-01-29 Bruno Haible i386, x86_64, sparc, sparc64: Fix for the Sun Studio 11 compiler. When preprocessing a .S file, "cc -E" activates some other preprocessor than the usual C preprocessor. * avcall/Makefile.in (avcall-i386.s, avcall-sparc.s, avcall-sparc64.s, avcall-x86_64.s): Feed the input to the preprocessor through standard input. Postprocess to remove space after '.' and '@'. * vacall/Makefile.in (vacall-i386.s, vacall-sparc.s, vacall-sparc64.s, vacall-x86_64.s): Likewise. * trampoline/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise. * callback/vacall_r/Makefile.in (vacall-i386.s, vacall-sparc.s, vacall-sparc64.s, vacall-x86_64.s): Likewise. * callback/trampoline_r/Makefile.in (cache-sparc.s, cache-sparc64.s): Likewise. 2017-01-29 Bruno Haible List platforms on which libffcall is known to work. * PLATFORMS, */PLATFORMS: List i386-pc-solaris2.10 (gcc), mips-sgi-irix6.5 (cc -n32), sparc-unknown-linux (gcc), alphaev67-unknown-linux (gcc), powerpc-ibm-aix7.1.3.0 (xlc, gcc). 2017-01-29 Bruno Haible Don't violate ISO C rules. * avcall/avcall.h.in (__av_struct): Don't store an unaligned pointer in (LIST).aptr. 2017-01-29 Bruno Haible Don't make side-effects before overflow checking. * avcall/avcall.h.in: In most macro definitions, modify (LIST).aptr after checking that it will remain within range, not before. But continue to modify (LIST).aptr before storing the argument, as this makes it easier w.r.t. to the alignment. This produces some more duplicate expressions that the compiler will eliminate. But the code is clearer this way. 2017-01-29 Bruno Haible Add more floating-point, mixed-number, general-purpose args tests. * avcall/tests.c (f_f24, d_iiidi, d_fdi, ll_iiilli, D_Dfd, l_l0K, ..., l_l6K, ll_l2ll, ..., ll_l7ll, d_l2d, ... d_l7d): New tests. * vacall/tests.c: Likewise. * callback/tests.c: Likewise. 2017-01-29 Bruno Haible Enable the 'long long' tests in callback. * callback/configure.ac: Invoke AC_TYPE_LONG_LONG_INT. * callback/tests.c: Test HAVE_LONG_LONG_INT, not HAVE_LONG_LONG. * avcall/avcall.h.in: Fix comment. * vacall/vacall.h.in: Likewise. 2017-01-29 Bruno Haible devel: Make it easy to keep the autogenerated files up-to-date. * avcall/Makefile.devel: Make all *.[sS] files depend on this file. (precompiled): Comment out all dependencies. * vacall/Makefile.devel: Likewise. * callback/vacall_r/Makefile.devel: Likewise. * callback/vacall_r/Makefile.maint (copied-files): New target. * callback/trampoline_r/Makefile.maint (copied-files): New target. * autogen.sh: To copy the files, just invoke these targets. * Makefile.devel (precompiled): New target. 2017-01-29 Bruno Haible configuration: Support the AR configure variable. Needed for a 64-bit build on AIX. * vacall/configure.ac: Invoke gl_PROG_AR_RANLIB instead of AC_PROG_RANLIB. * trampoline/configure.ac: Likewise. * vacall/Makefile.in (AR): Use value determined by gl_PROG_AR_RANLIB. * trampoline/Makefile.in (AR): Likewise. * avcall/Makefile.in (AR): Use value determined by libtool. * callback/Makefile.in (AR): Likewise. * callback/vacall_r/Makefile.in (AR): Likewise. * callback/trampoline_r/Makefile.in (AR): Likewise. * avcall/configure.ac: Reorder (a no-op). * callback/configure.ac: Likewise. * callback/vacall_r/configure.ac: Likewise. * callback/trampoline_r/configure.ac: Likewise. 2017-01-29 Bruno Haible configuration: Simplification. * m4/general.m4 (CL_CONFIG_SUBDIRS): Remove macro. * configure.ac: Use AC_CONFIG_SUBDIRS instead of CL_CONFIG_SUBDIRS. * callback/configure.ac: Likewise. 2017-01-29 Bruno Haible Revert the addition of a powerpc64le port by Masanori Mitsugi (commit from 2015-08-23). 2017-01-29 Bruno Haible Add support for some Linux+PaX or SELinux kernels and for HardenedBSD. Reported - by Gerard Milmeister in https://sourceforge.net/p/clisp/bugs/356/, - by Pradeep Kumar in https://sourceforge.net/p/clisp/bugs/415/, - by Don Cohen in https://lists.gnu.org/archive/html/libffcall/2016-12/msg00002.html, - by Nelson Beebe. * m4/codeexec.m4 (FFCALL_CODEEXEC_PAX): New macro. * m4/general.m4 (FFCALL_COMMON_TRAMPOLINE): Require it. * trampoline/trampoline.c (EXECUTABLE_VIA_MALLOC_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_FILE_SHARED): New macros. (EXECUTABLE_VIA_MPROTECT, EXECUTABLE_VIA_MMAP_ANONYMOUS, EXECUTABLE_VIA_MMAP_DEVZERO): Remove macros. (MAP_FILE, MAP_VARIABLE): Define fallbacks. (pagesize): Define outside of functions. (alloc_trampoline): If EXECUTABLE_VIA_MMAP_FILE_SHARED is defined, create separate mappings of a file, for writing and for executing. If EXECUTABLE_VIA_MMAP_THEN_MPROTECT is defined, use mmap of an anonymous page, then mprotect. (free_trampoline): Convert back from executable address to writable address. * callback/trampoline_r/trampoline.c (EXECUTABLE_VIA_MALLOC_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_THEN_MPROTECT, EXECUTABLE_VIA_MMAP_FILE_SHARED): New macros. (EXECUTABLE_VIA_MPROTECT, EXECUTABLE_VIA_MMAP_ANONYMOUS, EXECUTABLE_VIA_MMAP_DEVZERO): Remove macros. (MAP_FILE, MAP_VARIABLE): Define fallbacks. (pagesize): Define outside of functions. (alloc_trampoline_r): If EXECUTABLE_VIA_MMAP_FILE_SHARED is defined, create separate mappings of a file, for writing and for executing. If EXECUTABLE_VIA_MMAP_THEN_MPROTECT is defined, use mmap of an anonymous page, then mprotect. (free_trampoline_r, is_trampoline_r): Convert back from executable address to writable address. 2017-01-29 Bruno Haible Fix "Generic workaround against the ELF symbol resolving routine". * callback/vacall_r/elfhack-alpha.S: Put env in register $1, not $2. * callback/vacall_r/elfhack-alpha.sed: Make it find the correct line. * callback/trampoline_r/trampoline.c [__ia64__]: Fix code for BINFMT_ELF. [__mips64__]: Fix a typo in the trampoline for BINFMT_ELF. [__s390__]: Fix typo in is_tramp macro for BINFMT_ELF. 2017-01-10 Bruno Haible Update documentation. * README: Refer to the git repository, not to the last release. * DEPENDENCIES: New file. * Makefile.in (SOURCE_FILES): Add it. * README-hacking: New file. 2017-01-09 Bruno Haible Remove support for m68k/HP-UX, m68k/NeXT, apollo, mips/Ultrix. * trampoline/trampoline.c: Remove hpux, NeXT, apollo, ultrix conditionals. * trampoline/cache.c: Likewise. * callback/trampoline_r/trampoline.c: Likewise. 2017-01-09 Bruno Haible Remove support for m68k/AmigaOS. * avcall/Makefile.devel (avcall-m68k-amiga.s): Remove target. * avcall/avcall-m68k-amiga.c: Remove file. * avcall/avcall-m68k-amiga.s: Remove file. * avcall/Makefile.in (SOURCE_FILES): Remove them. * avcall/avcall.h.in: Remove AMIGA conditionals. * avcall/tests.c: Likewise. * trampoline/trampoline.c: Likewise. * callback/trampoline_r/trampoline.c: Likewise. 2017-01-09 Bruno Haible Remove support for the AIX 3 operating system. * avcall/Makefile.devel (avcall-powerpc-aix.s): Renamed from avcall-powerpc-aix.new.s. (avcall-powerpc-aix.old.s): Remove target. * avcall/avcall-powerpc-aix.s: Renamed from avcall/avcall-powerpc-aix.new.s. * avcall/avcall-powerpc-aix.old.s: Remove file. * avcall/Makefile.in (avcall-powerpc.s): No longer use avcall-powerpc-aix.old.s. (SOURCE_FILES): Add avcall-powerpc-aix.s. Remove avcall-powerpc-aix.new.s, avcall-powerpc-aix.old.s. * vacall/Makefile.devel (vacall-powerpc-aix.s): Renamed from vacall-powerpc-aix.new.s. (vacall-powerpc-aix.old.s): Remove target. * vacall/vacall-powerpc-aix.s: Renamed from vacall/vacall-powerpc-aix.new.s. * vacall/vacall-powerpc-aix.old.s: Remove file. * vacall/Makefile.in (vacall-powerpc.s): No longer use vacall-powerpc-aix.old.s. (SOURCE_FILES): Add vacall-powerpc-aix.s. Remove vacall-powerpc-aix.new.s, vacall-powerpc-aix.old.s. * callback/vacall_r/Makefile.devel (vacall-powerpc-aix.s): Renamed from vacall-powerpc-aix.new.s. (vacall-powerpc-aix.old.s): Remove target. * callback/vacall_r/vacall-powerpc-aix.s: Renamed from callback/vacall_r/vacall-powerpc-aix.new.s. * callback/vacall_r/vacall-powerpc-aix.old.s: Remove file. * callback/vacall_r/Makefile.in (vacall-powerpc.s): No longer use vacall-powerpc-aix.old.s. (SOURCE_FILES): Add vacall-powerpc-aix.s. Remove vacall-powerpc-aix.new.s, vacall-powerpc-aix.old.s. * trampoline/Makefile.devel (proto-powerpc-aix.s): Renamed from proto-powerpc-aix.new.s. (proto-powerpc-aix.old.s): Remove target. * trampoline/proto-powerpc-aix.s: Renamed from trampoline/proto-powerpc-aix.new.s. * trampoline/proto-powerpc-aix.old.s: Remove file. * trampoline/tramp-powerpc-aix.S: Renamed from trampoline/tramp-powerpc.new.S. * trampoline/tramp-powerpc.old.S: Remove file. * trampoline/tramp-powerpc64-aix.S: Renamed from trampoline/tramp-powerpc64.new.S. * trampoline/Makefile.in (tramp-powerpc.s): No longer use tramp-powerpc.old.S. (tramp-powerpc64.s): Update. (SOURCE_FILES): Add tramp-powerpc-aix.S, tramp-powerpc64-aix.S. Remove tramp-powerpc.old.S, tramp-powerpc.new.S tramp-powerpc64.new.S. * callback/trampoline_r/Makefile.devel (proto-powerpc-aix.s): Renamed from proto-powerpc-aix.new.s. (proto-powerpc-aix.old.s): Remove target. * callback/trampoline_r/proto-powerpc-aix.s: Renamed from callback/trampoline_r/proto-powerpc-aix.new.s. * callback/trampoline_r/proto-powerpc-aix.old.s: Remove file. * callback/trampoline_r/tramp-powerpc-aix.S: Renamed from callback/trampoline_r/tramp-powerpc.new.S. * callback/trampoline_r/tramp-powerpc.old.S: Remove file. * callback/trampoline_r/tramp-powerpc64-aix.S: Renamed from callback/trampoline_r/tramp-powerpc64.new.S. * callback/trampoline_r/Makefile.in (tramp-powerpc.s): No longer use tramp-powerpc.old.S. (tramp-powerpc64.s): Update. (SOURCE_FILES): Add tramp-powerpc-aix.S, tramp-powerpc64-aix.S. Remove tramp-powerpc.old.S, tramp-powerpc.new.S tramp-powerpc64.new.S. * PLATFORMS, **/PLATFORMS: Update. 2017-01-08 Bruno Haible Remove support for the m88k CPU. The only place where this CPU is still used is in the OpenBSD 5.8 luna88k port. The luna88k is museum hardware. They use the ELF binary format, through an inofficial port of the 10-years old binutils-2.17. * avcall/Makefile.devel (avcall-m88k.s, tests-m88k.s): Remove targets. * avcall/avcall-m88k.[cs]: Remove files. * avcall/Makefile.in (avcall-m88k.lo): Remove target. (SOURCE_FILES): Remove avcall-m88k.[cs]. * avcall/avcall.h.in: Remove defined(__m88k__) conditionals. * vacall/Makefile.devel (vacall-m88k.s, tests-m88k.s): Remove targets. * vacall/vacall-m88k.[cs]: Remove files. * vacall/Makefile.in (vacall-m88k.o): Remove target. (SOURCE_FILES): Remove vacall-m88k.[cs]. * vacall/vacall.h.in: Remove defined(__m88k__) conditionals. * trampoline/Makefile.devel (proto-m88k.s, tramp-m88k.s): Remove targets. * trampoline/proto-m88k.s: Remove file. * trampoline/tramp-m88k.s: Remove file. * trampoline/protexec.c: Remove __DOLPHIN__ conditionals. * trampoline/trampoline.c: Remove defined(__m88k__), HAVE_SYS_M88KBCS_H conditionals. * trampoline/trampoline.h.in: Don't test for m88k host. * trampoline/configure.ac: Don't test for m88k host. * callback/vacall_r/Makefile.devel (vacall-m88k.s): Remove target. * callback/vacall_r/vacall-m88k.s: Remove file. * callback/vacall_r/Makefile.in (vacall-m88k.lo): Remove target. (SOURCE_FILES): Remove vacall-m88k.[cs]. * callback/vacall_r/vacall_r.h.in: Remove defined(__m88k__) conditionals. * callback/trampoline_r/Makefile.devel (proto-m88k.s, tramp-m88k.s): Remove targets. * callback/trampoline_r/proto-m88k.s: Remove file. * callback/trampoline_r/tramp-m88k.s: Remove file. * callback/trampoline_r/proto.c: Remove defined(__m88k__) conditional. * callback/trampoline_r/trampoline.c: Remove defined(__m88k__), HAVE_SYS_M88KBCS_H conditionals. * callback/trampoline_r/trampoline_r.h.in: Don't test for m88k host. * callback/trampoline_r/test1.c: Remove defined(__m88k__) conditionals. * callback/trampoline_r/configure.ac: Don't test for m88k host. * callback/call-used-registers.txt: Update. * callback/elf-hack.txt: Update. * common/reg-struct-return.txt: Update. * PLATFORMS, **/PLATFORMS: Update. * README: Update. * autogen.sh: Don't copy vacall-m88k.c. * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-m88k.c. 2017-01-08 Bruno Haible Fix last commit. * common/asm-x86_64.sh: Escape '&' characters in replacement string. 2017-01-03 Bruno Haible Add support for the Mac OS X 10.5 / x86_64 platform. * common/asm-x86_64.sh: Disable the frame info for exception handlers on Mac OS X. * avcall/avcall-x86_64-macro.S: Regenerated. * vacall/vacall-x86_64-macro.S: Likewise. * callback/vacall_r/vacall-x86_64-macro.S: Likewise. * m4/mmap.m4 (FFCALL_MMAP): Renamed from CL_MMAP. Remove AC_BEFORE invocations. Test mmap without MAP_FIXED only. Don't define HAVE_MMAP_DEVZERO_SUN4_29. * m4/mprotect.m4 (FFCALL_MPROTECT): Renamed from CL_MPROTECT. Update dependency. * m4/getpagesize.m4 (CL_GETPAGESIZE): Remove AC_BEFORE invocations. * m4/general.m4 (FFCALL_COMMON_TRAMPOLINE): Update dependencies. 2017-01-02 Bruno Haible Ensure the alignment of trampolines when we use the free-list approach. * trampoline/trampoline.c (alloc_trampoline): Consider TRAMP_ALIGN when allocating a page of trampolines. * callback/trampoline_r/trampoline.c (alloc_trampoline_r): Likewise. 2017-01-02 Bruno Haible Fix a build failure on Solaris/SPARC with newer gcc. * trampoline/trampoline.c: Remove 'extern inline' declarations. * callback/trampoline_r/trampoline.c: Likewise. For SPARC, declare __TR_clear_cache_2, not __TR_clear_cache_4. * PLATFORMS: Update. * avcall/PLATFORMS: Likewise. * vacall/PLATFORMS: Likewise. * trampoline/PLATFORMS: Likewise. * callback/PLATFORMS: Likewise. 2017-01-02 Bruno Haible Add support for the Solaris/x86 platform with cc. * common/asm-i386.sh: Remove the whitespace in the second argument of INSN2MOVX. * vacall/vacall-i386-macro.S: Regenerated. * callback/vacall_r/vacall-i386-macro.S: Likewise. * avcall/Makefile.in (avcall-i386.s): Eliminate ##. * vacall/Makefile.in (vacall-i386.s): Likewise. * callback/vacall_r/Makefile.in (vacall-i386.s): Likewise. * PLATFORMS: Update. * avcall/PLATFORMS: Likewise. * vacall/PLATFORMS: Likewise. * trampoline/PLATFORMS: Likewise. * callback/PLATFORMS: Likewise. 2017-01-02 Bruno Haible Add support for the Solaris/x86_64 platform. * common/asm-x86_64.sh: Introduce ALIGN macro. Disable the frame info for exception handlers on Solaris. * common/asm-x86_64.h (ALIGN): New macro. (FUNEND, EH_FRAME_SECTION): Define differently for Solaris. * vacall/Makefile.devel (vacall-x86_64-macro.S): Don't use a #define that assumes an ANSI C preprocessor. * avcall/avcall-x86_64-macro.S: Regenerated. * vacall/vacall-x86_64-macro.S: Likewise. * callback/vacall_r/vacall-x86_64-macro.S: Likewise. * avcall/Makefile.in (avcall-x86_64.s): Eliminate ##. * vacall/Makefile.in (vacall-x86_64.s): Likewise. * callback/vacall_r/Makefile.in (vacall-x86_64.s): Likewise. * PLATFORMS: Update. * avcall/PLATFORMS: Likewise. * vacall/PLATFORMS: Likewise. * trampoline/PLATFORMS: Likewise. * callback/PLATFORMS: Likewise. 2017-01-01 Bruno Haible Assume ANSI C in the documentation. * vacall/vacall.{3,html}: Use ANSI C declaration syntax. Stop mentioning . Reference stdarg(3). * trampoline/trampoline.{3,html}: Reference stdarg(3). * callback/callback.{3,html}: Use ANSI C declaration syntax. Stop mentioning . * callback/trampoline_r/trampoline_r.{3,html}: Reference stdarg(3). 2017-01-01 Bruno Haible Support the CPPFLAGS configure variable. * avcall/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. * vacall/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. * trampoline/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. * callback/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. * callback/vacall_r/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. * callback/trampoline_r/Makefile.in (CPPFLAGS): New variable. Use it in all .c file compilations. 2017-01-01 Bruno Haible Add option --disable-elf-hack to disable the ELF workaround. * m4/binfmt-elf.m4 (FFCALL_BINFMT_ELF_OPTION): New macro. (FFCALL_BINFMT_ELF): Require it. Set BINFMT_ELF to false and define BINFMT_ELF to 0 if --disable-elf-hack was specified. * configure.ac: Invoke FFCALL_BINFMT_ELF_OPTION. * callback/configure.ac: Likewise. * callback/elf-hack.txt: Explain how to use --disable-elf-hack for testing. 2017-01-01 Bruno Haible Generic workaround against the ELF symbol resolving routine. Reported for x86_64 by Andrey Kutejko at https://savannah.gnu.org/bugs/?32466 . * m4/binfmt-elf.m4: New file. * Makefile.in (SOURCE_FILES): Add it. * callback/elf-hack.txt: New file. * callback/test1.c: New file. * callback/Makefile.in (SOURCE_FILES): Add both. (test1.o, test1): New targets. (check): Also run test1. (MOSTLYCLEANFILES): Add test1.o, test1. * callback/trampoline_r/configure.ac: Invoke FFCALL_BINFMT_ELF. * callback/trampoline_r/Makefile.devel: Update the paths to the cross assemblers. * callback/trampoline_r/tramp-*.s: Add a 'trampelf' function. * callback/trampoline_r/tramp-*.S: Likewise. * callback/trampoline_r/tramp-*.o: Regenerated. * callback/trampoline_r/trampoline.c: Implement alternate trampolines on platforms with BINFMT_ELF. * callback/trampoline_r/test1.c: Skip the test if BINFMT_ELF. * callback/vacall_r/configure.ac: Invoke FFCALL_BINFMT_ELF. * callback/vacall_r/elfhack-alpha.S: New file. * callback/vacall_r/elfhack-alpha.sed: New file. * callback/vacall_r/elfhack-arm.S: New file. * callback/vacall_r/elfhack-arm.sed: New file. * callback/vacall_r/elfhack-i386.S: New file. * callback/vacall_r/elfhack-i386.sed: New file. * callback/vacall_r/elfhack-m68k.S: New file. * callback/vacall_r/elfhack-m68k.sed: New file. * callback/vacall_r/elfhack-mips.S: New file. * callback/vacall_r/elfhack-mips.sed: New file. * callback/vacall_r/elfhack-mips64.S: New file. * callback/vacall_r/elfhack-mips64.sed: New file. * callback/vacall_r/elfhack-powerpc.S: New file. * callback/vacall_r/elfhack-powerpc.sed: New file. * callback/vacall_r/elfhack-powerpc64le.S: New file. * callback/vacall_r/elfhack-powerpc64le.sed: New file. * callback/vacall_r/elfhack-s390.S: New file. * callback/vacall_r/elfhack-s390.sed: New file. * callback/vacall_r/elfhack-x86_64.S: New file. * callback/vacall_r/elfhack-x86_64.sed: New file. * callback/vacall_r/Makefile.devel (vacall-i386-macro.S): Insert an include of elfhack-i386.S. (vacall-m68k.mit.S, vacall-m68k-netbsd-macro.S): Insert an include of elfhack-m68k.S. (vacall-mips-macro.S, vacall-mipsn32-macro.S): Insert an include of elfhack-mips.S. (vacall-mips64-macro.S): Insert an include of elfhack-mips64.S. (vacall-alpha-macro.S): Renamed from vacall-alpha.s. Insert an include of elfhack-alpha.S. (vacall-arm-macro.S): Insert an include of elfhack-arm.S. (vacall-armel-macro.S): Renamed from vacall-armel.s. Insert an include of asm-arm.h and elfhack-arm.S. (vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S): New targets. (vacall-powerpc-sysv4-macro.S): Renamed from vacall-powerpc-sysv4.s. Insert an include of elfhack-powerpc.S. (vacall-powerpc64le-macro.S): Renamed from vacall-powerpc64le.s. Insert an include of elfhack-powerpc64.S. (vacall-x86_64-macro.S): Insert an include of elfhack-x86_64.S. (vacall-s390-macro.S): New target. * callback/vacall_r/vacall-alpha-macro.S: Renamed from callback/vacall_r/vacall-alpha.s. Include elfhack-alpha.S. * callback/vacall_r/vacall-arm-macro.S: Include elfhack-arm.S. * callback/vacall_r/vacall-armel-macro.S: Renamed from callback/vacall_r/vacall-armel.s. Include asm-arm.h and elfhack-arm.S. * callback/vacall_r/vacall-i386-macro.S: Include elfhack-i386.S. * callback/vacall_r/vacall-m68k.mit.S: Include elfhack-m68k.S. * callback/vacall_r/vacall-m68k-netbsd-macro.S: Likewise. * callback/vacall_r/vacall-mips-macro.S: Include elfhack-mips.S. * callback/vacall_r/vacall-mipsn32-macro.S: Likewise. * callback/vacall_r/vacall-mips64-macro.S: Include elfhack-mips64.S. * callback/vacall_r/vacall-powerpc-linux-macro.S: Generated, to include elfhack-powerpc.S. * callback/vacall_r/vacall-powerpc-netbsd-macro.S: Generated, to include elfhack-powerpc.S. * callback/vacall_r/vacall-powerpc-sysv4-macro.S: Renamed from callback/vacall_r/vacall-powerpc-sysv4.s. Include elfhack-powerpc.S. * callback/vacall_r/vacall-powerpc64le-macro.S: Renamed from callback/vacall_r/vacall-powerpc64le.s. Include elfhack-powerpc64le.S. * callback/vacall_r/vacall-s390-linux.s: Renamed from callback/vacall_r/vacall-s390.s. * callback/vacall_r/vacall-s390-macro.S: Generated, to include elfhack-s390.S. * callback/vacall_r/vacall-x86_64-macro.S: Include elfhack-x86_64.S. * callback/vacall_r/Makefile.in (ASPFLAGS): Conditionally define BINFMT_ELF. (vacall-i386.s, vacall-m68k.s, vacall-mips.s, vacall-mipsn32.s, vacall-mips64.s): Add a -I option for elfhack-*.S. (vacall-alpha.s): New target. (vacall-alpha.lo): Depend on it. (vacall-arm.s): Add a -I option for elfhack-*.S. (vacall-armel.s): New target. (vacall-armel.lo): Depend on it. (vacall-powerpc.s): For the linux, netbsd, sysv4 syntaxes, use the corresponding *.S file. (vacall-powerpc64le.s): New target. (vacall-powerpc64le.lo): Depend on it. (vacall-x86_64.s): Add a -I option for elfhack-*.S. (vacall-s390.s): New target. (vacall-s390.lo): Depend on it. (clean): Remove also vacall-alpha.s, vacall-armel.s, vacall-powerpc64le.s, vacall-s390.s. (SOURCE_FILES): Update for the renamed files. Add vacall-powerpc-linux-macro.S, vacall-powerpc-netbsd-macro.S, vacall-s390-macro.S, elfhack-*.S, elfhack-*.sed. * README: Clarify on which platforms the problem with the ELF symbol resolving routine still exists. 2016-12-31 Bruno Haible Update doc about available registers. * callback/call-used-registers.txt: Clarify call-used registers versus registers available for use in trampolines. * trampoline/tramp-powerpc-old.s: Mark as obsolete. * callback/trampoline_r/tramp-powerpc-old.s: Likewise. * trampoline/tramp-x86_64.s: Fix comment about available registers. * callback/trampoline_r/tramp-x86_64.s: Likewise. * trampoline/tramp-powerpc-sysv4.s: Likewise. * callback/trampoline_r/tramp-powerpc-sysv4.s: Likewise. * trampoline/tramp-*.s: Update comment about available registers. * trampoline/tramp-*.S: Likewise. * callback/trampoline_r/tramp-*.s: Likewise. * callback/trampoline_r/tramp-*.S: Likewise. 2016-12-31 Bruno Haible Simplify powerpc compilation rules. * avcall/Makefile.in (avcall-powerpc.s): New rule. (avcall-powerpc.lo): Depend on it. Remove libtool specific workaround. (clean): Remove also avcall-powerpc.s. * vacall/Makefile.in (vacall-powerpc.s): New rule. (vacall-powerpc.o): Depend on it. (clean): Remove also vacall-powerpc.s. * callback/vacall_r/Makefile.in (vacall-powerpc.s): New rule. (vacall-powerpc.lo): Depend on it. Remove libtool specific workaround. (clean): Remove also vacall-powerpc.s. 2016-12-29 Bruno Haible Revert "Pass the environment argument through the stack, not in a register." commit from 1999-06-01. * vacall/vacall-i386.c: Revert: Allow use of registers %esi, %edi, %ebp. Expect env in %ecx, not as first stack argument. * vacall/vacall-i386-macro.S: Revert. * callback/vacall_r/vacall-i386-macro.S: Revert. * callback/trampoline_r/proto.c (tramp2): Remove function. * callback/trampoline_r/proto-i386.s: Revert accordingly. * callback/trampoline_r/tramp-i386.s: Put the data in %ecx, not as first stack argument. * callback/trampoline_r/trampoline.c [i386]: Revert to simple trampoline. * callback/trampoline_r/test1.c (f) [i386]: Expect env in %ecx, not as first stack argument. 2016-12-29 Bruno Haible Revert "Never build shared libraries: --enable-shared has no effect." commit from 2012-04-24. * README: Revert, but still recommend --disable-shared. * avcall/Makefile.in (libavcall.la): Don't pass -static to libtool. * callback/Makefile.in (libcallback.la): Likewise. * callback/vacall_r/Makefile.in (libvacall.la): Likewise. * callback/trampoline_r/Makefile.in (libtrampoline.la): Likewise. 2016-12-30 Bruno Haible Rename text files. * common/reg-struct-return.txt: Renamed from common/reg-struct-return. * callback/call-used-registers.txt: Renamed from callback/call-used-registers. * trampoline/PORTING: Update. * callback/README: Likewise. 2016-12-29 Bruno Haible Update documentation about register usage. * callback/call-used-registers: Update regarding powerpc/NetBSD. 2016-12-29 Bruno Haible Remove support for the 'convex' CPU. * avcall/Makefile.devel (avcall-convex.s, tests-convex.s): Remove targets. * avcall/avcall-convex.[cs]: Remove files. * avcall/Makefile.in (avcall-convex.lo): Remove target. (SOURCE_FILES): Remove avcall-convex.[cs]. * avcall/avcall.h.in: Remove defined(__convex__) conditionals. * vacall/Makefile.devel (vacall-convex.s, tests-convex.s): Remove targets. * vacall/vacall-convex.[cs]: Remove files. * vacall/Makefile.in (vacall-convex.o): Remove target. (SOURCE_FILES): Remove vacall-convex.[cs]. * vacall/vacall.h.in: Remove defined(__convex__) conditionals. * trampoline/Makefile.devel (proto-convex.s, cache-convex.s, tramp-convex.s): Remove targets. * trampoline/proto-convex.s: Remove file. * trampoline/cache-convex.[cs]: Remove files. * trampoline/tramp-convex.s: Remove file. * trampoline/Makefile.in (cache-convex.o): Remove target. (SOURCE_FILES): Remove cache-convex.[cs]. * trampoline/cache.c: Remove defined(__convex__) conditionals. * trampoline/protexec.c: Remove defined(__convex__) conditionals. * trampoline/trampoline.c: Remove defined(__convex__) conditionals. * trampoline/trampoline.h.in: Don't test for convex host. * trampoline/configure.ac: Don't test for convex host. * callback/vacall_r/Makefile.devel (vacall-convex.s): Remove target. * callback/vacall_r/vacall-convex.s: Remove file. * callback/vacall_r/Makefile.in (vacall-convex.lo): Remove target. (SOURCE_FILES): Remove vacall-convex.[cs]. * callback/vacall_r/vacall_r.h.in: Remove defined(__convex__) conditionals. * callback/trampoline_r/Makefile.devel (proto-convex.s, cache-convex.s, tramp-convex.s): Remove targets. * callback/trampoline_r/proto-convex.s: Remove file. * callback/trampoline_r/tramp-convex.s: Remove file. * callback/trampoline_r/Makefile.in (cache-convex.lo): Remove target. (SOURCE_FILES): Remove cache-convex.[cs]. * callback/trampoline_r/proto.c: Remove defined(__convex__) conditionals. * callback/trampoline_r/trampoline.c: Remove defined(__convex__) conditionals. * callback/trampoline_r/trampoline_r.h.in: Don't test for convex host. * callback/trampoline_r/test1.c: Remove defined(__convex__) conditionals. * callback/trampoline_r/configure.ac: Don't test for convex host. * callback/call-used-registers: Update. * common/reg-struct-return: Update. * PLATFORMS, **/PLATFORMS: Update. * autogen.sh: Don't copy vacall-convex.c, cache-convex.[cs]. * Makefile.in (COPIED_FILES): Remove callback/vacall_r/vacall-convex.c, callback/trampoline_r/cache-convex.[cs]. 2016-12-29 Bruno Haible Fix collision between different copies of __structcpy. Reported in https://savannah.gnu.org/bugs/?23474 . * avcall/avcall-structcpy.c: New file. * avcall/Makefile.in (avcall-structcpy.lo): Renamed from structcpy.lo. (SOURCE_FILES): Add avcall-structcpy.c. * avcall/Makefile.mingw32 (avcall-structcpy.o): Renamed from structcpy.o. * avcall/Makefile.msvc (avcall-structcpy.obj): Renamed from structcpy.obj. * avcall/avcall.h.in: Declare and use avcall_structcpy instead of __structcpy. * avcall/README: Update. * vacall/vacall-structcpy.c: New file. * vacall/Makefile.in (vacall-structcpy.o): Renamed from structcpy.o. (SOURCE_FILES): Add vacall-structcpy.c. * vacall/Makefile.mingw32 (vacall-structcpy.o): Renamed from structcpy.o. * vacall/Makefile.msvc (vacall-structcpy.obj): Renamed from structcpy.obj. * vacall/vacall.h.in: Declare and use vacall_structcpy instead of __structcpy. * callback/vacall_r/vacall-structcpy.c: New file. * callback/vacall_r/Makefile.in (vacall-structcpy.lo): Renamed from structcpy.lo. (SOURCE_FILES): Add vacall-structcpy.c. * callback/vacall_r/Makefile.mingw32 (vacall-structcpy.o): Renamed from structcpy.o. * callback/vacall_r/Makefile.msvc (vacall-structcpy.obj): Renamed from structcpy.obj. * callback/vacall_r/vacall_r.h.in: Declare and use callback_structcpy instead of __structcpy. * callback/Makefile.in (libcallback.la): Use vacall-structcpy.lo, not structcpy.lo. * callback/Makefile.mingw32 (OBJECTS): Use vacall-structcpy.o, not structcpy.o. * callback/Makefile.msvc (OBJECTS): Use vacall-structcpy.obj, not structcpy.obj. (vacall_r/vacall-structcpy.obj): Renamed from vacall_r/structcpy.obj. (clean): Update accordingly. 2016-12-29 Bruno Haible Put duplicated files under version control only once, part 2. * vacall/vacall-powerpc.c: Update with the 'REENTRANT' code from callback/vacall_r/. * vacall/vacall-s390.c: Likewise. * callback/vacall_r/vacall-alpha.c: Remove file. * callback/vacall_r/vacall-arm.c: Remove file. * callback/vacall_r/vacall-armel.c: Remove file. * callback/vacall_r/vacall-convex.c: Remove file. * callback/vacall_r/vacall-hppa.c: Remove file. * callback/vacall_r/vacall-i386.c: Remove file. * callback/vacall_r/vacall-ia64.c: Remove file. * callback/vacall_r/vacall-m68k.c: Remove file. * callback/vacall_r/vacall-m88k.c: Remove file. * callback/vacall_r/vacall-mips.c: Remove file. * callback/vacall_r/vacall-mipsn32.c: Remove file. * callback/vacall_r/vacall-mips64.c: Remove file. * callback/vacall_r/vacall-powerpc.c: Remove file. * callback/vacall_r/vacall-powerpc64.c: Remove file. * callback/vacall_r/vacall-powerpc64le.c: Remove file. * callback/vacall_r/vacall-s390.c: Remove file. * callback/vacall_r/vacall-sparc.c: Remove file. * callback/vacall_r/vacall-sparc64.c: Remove file. * callback/vacall_r/vacall-x86_64.c: Remove file. * autogen.sh: Copy these files from vacall/. * Makefile.in (COPIED_FILES): Add these files. 2016-12-28 Bruno Haible More robust quoting in Autoconf macros. * configure.ac: Add brackets around Autoconf macro arguments. * avcall/configure.ac: Likewise. * vacall/configure.ac: Likewise. * trampoline/configure.ac: Likewise. * callback/configure.ac: Likewise. * callback/vacall_r/configure.ac: Likewise. * callback/trampoline_r/configure.ac: Likewise. * m4/as-underscore.m4: Likewise. * m4/cc-gcc.m4: Likewise. * m4/codeexec.m4: Likewise. * m4/general.m4: Likewise. * m4/getpagesize.m4: Likewise. * m4/ireg.m4: Likewise. * m4/ln.m4: Likewise. * m4/mach-vm.m4: Likewise. * m4/mmap.m4: Likewise. * m4/mprotect.m4: Likewise. * m4/pccstruct.m4: Likewise. * m4/proto.m4: Likewise. * m4/shm.m4: Likewise. * m4/smallstruct.m4: Likewise. 2016-12-28 Bruno Haible Update list of contributors. * README: List all contributors. 2016-12-28 Bruno Haible Add support for 64-bit mode (x86_64) on Mac OS X. * common/asm-x86_64.sh: New file. * common/asm-x86_64.h: New file. * Makefile.in (SOURCE_FILES): Add them. * avcall/avcall-x86_64-linux.s: Renamed from avcall/avcall-x86_64.s. * avcall/Makefile.devel (avcall-x86_64-linux.s): Renamed from avcall-x86_64.s. (avcall-x86_64-macro.S): New target. * avcall/avcall-x86_64-macro.S: New file, generated through avcall/Makefile.devel. * avcall/Makefile.in (avcall-x86_64.s): New target. (avcall-x86_64.lo): Use it, in the build dir. (clean): Remove it. (SOURCE_FILES): Add avcall-x86_64-linux.s, avcall-x86_64-macro.S. Remove avcall-x86_64.s. * vacall/vacall-x86_64-linux.s: Renamed from vacall/vacall-x86_64.s. * vacall/Makefile.devel (vacall-x86_64-linux.s): Renamed from vacall-x86_64.s. (vacall-x86_64-macro.S): New target. * vacall/vacall-x86_64-macro.S: New file, generated through vacall/Makefile.devel. * vacall/Makefile.in (vacall-x86_64.s): New target. (vacall-x86_64.o): Use it, in the build dir. (clean): Remove it. (SOURCE_FILES): Add vacall-x86_64-linux.s, vacall-x86_64-macro.S. Remove vacall-x86_64.s. * callback/vacall_r/vacall-x86_64-linux.s: Renamed from callback/vacall_r/vacall-x86_64.s. * callback/vacall_r/Makefile.devel (vacall-x86_64-linux.s): Renamed from vacall-x86_64.s. (vacall-x86_64-macro.S): New target. * callback/vacall_r/vacall-x86_64-macro.S: New file, generated through callback/vacall_r/Makefile.devel. * callback/vacall_r/Makefile.in (vacall-x86_64.s): New target. (vacall-x86_64.lo): Use it, in the build dir. (clean): Remove it. (SOURCE_FILES): Add vacall-x86_64-linux.s, vacall-x86_64-macro.S. Remove vacall-x86_64.s. * callback/trampoline_r/test1.c (CHECK_ENV_REGISTER): New macro. (f, main): Use it instead of __GNUC__. * NEWS: Mention the change. 2016-12-28 Bruno Haible Rename the asm* files. * common/asm-arm.h: Renamed from common/asmarm.h. * common/asm-arm.sh: Renamed from common/asmarm.sh. * common/asm-i386.hh: Renamed from common/asmi386.hh. * common/asm-i386.sh: Renamed from common/asmi386.sh. * common/asm-m68k.h: Renamed from common/asmm68k.h. * common/asm-m68k.sh: Renamed from common/asmm68k.sh. * common/asm-mips.h: Renamed from common/asmmips.h. * common/asm-mips.sh: Renamed from common/asmmips.sh. * common/asm-sparc.h: Renamed from common/asmsparc.h. * common/asm-sparc.sh: Renamed from common/asmsparc.sh. * common/asm-sparc64.sh: Renamed from common/asmsparc64.sh. * **/Makefile.devel, **/*.S: Update. * Makefile.maint (common/asm-i386.h): Renamed from common/asmi386.h. * Makefile.in (SOURCE_FILES, GENERATED_FILES): Update. 2016-12-27 Bruno Haible Add the real source of asmi386.h. * common/asmi386.hh: New file, from GNU clisp. * common/asmi386.h: Remove file. * Makefile.maint (common/asmi386.h): New target. Rule copied from GNU clisp's Makefile.devel. (all): Depend on it. * Makefile.in (SOURCE_FILES): Add common/asmi386.hh. Remove common/asmi386.h. (GENERATED_FILES): Add common/asmi386.h. 2016-12-27 Bruno Haible Modernize Cygwin detection. * common/asmi386.h: Test __CYGWIN__, not __CYGWIN32__. From Ken Brown on 2015-03-05. 2016-12-27 Bruno Haible Create tarballs through an Automake-like "make dist" command. * Makefile.in (SOURCE_FILES, LIBTOOL_IMPORTED_FILES, GNULIB_IMPORTED_FILES, IMPORTED_FILES, COPIED_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. (PACKAGE, VERSION, TAR, GZIP): New macros. (dist): New target. * avcall/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * vacall/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * trampoline/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * callback/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * callback/vacall_r/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * callback/trampoline_r/Makefile.in (SOURCE_FILES, GENERATED_FILES, DISTFILES): New macros. (distdir): New target. * configure.ac (extrasub): Replace all occurrences of @subdir@. * callback/configure.ac (extrasub): Likewise. 2016-12-27 Bruno Haible Bump version number. * VERSION: Set to 0x010D (= 1.13). 2016-12-27 Bruno Haible Rename each configure.in to configure.ac. * configure.ac: Renamed from configure.in. * avcall/configure.ac: Renamed from avcall/configure.in. * vacall/configure.ac: Renamed from vacall/configure.in. * trampoline/configure.ac: Renamed from trampoline/configure.in. * callback/configure.ac: Renamed from callback/configure.in. * callback/vacall_r/configure.ac: Renamed from callback/vacall_r/configure.in. * callback/trampoline_r/configure.ac: Renamed from callback/trampoline_r/configure.in. * Makefile.maint (ALL_CONFIGURE_AC): Renamed from ALL_CONFIGURE_IN. (aclocal.m4, configure, %/configure, %/config.h.in): Update. * README, */README: Update. 2016-12-27 Bruno Haible Modernize quoting. * NEWS: Quote ‘like this’, not `like this'. * README.os2: Likewise. * common/uniq-u.c: Likewise. * avcall/DOC: Likewise. * avcall/avcall-i386.c: Likewise. * avcall/avcall-sparc.c: Likewise. * avcall/avcall-sparc64.c: Likewise. * avcall/avcall.h.in: Likewise. * avcall/avcall.html: Likewise. * vacall/vacall.h.in: Likewise. * callback/trampoline_r/trampoline.c: Likewise. * callback/trampoline_r/trampoline_r.h.in: Likewise. * trampoline/PORTING: Likewise. * trampoline/trampoline.c: Likewise. * trampoline/trampoline.h.in: Likewise. * callback/vacall_r/vacall_r.h.in: Likewise. * configurations/README: Likewise. * avcall/Makefile.maint (ROFF_MAN): Produce UTF-8 output instead of ASCII output. * vacall/Makefile.maint (ROFF_MAN): Likewise. * trampoline/Makefile.maint (ROFF_MAN): Likewise. * callback/Makefile.maint (ROFF_MAN): Likewise. * callback/trampoline_r/Makefile.maint (ROFF_MAN): Likewise. 2016-12-27 Bruno Haible Avoid unnecessary recursion in "make maintainer-clean". * Makefile.in (DISTCLEANFILES): New variable. (distclean, maintainer-clean): Use it. * callback/Makefile.in (DISTCLEANFILES): New variable. (distclean): Use it. Don't depend on 'clean'. Instead, use MOSTLYCLEANDIRS, MOSTLYCLEANFILES. (maintainer-clean): Don't depend on 'distclean'. Instead, use MOSTLYCLEANDIRS, MOSTLYCLEANFILES, DISTCLEANFILES. (distclean-subdirs, maintainerclean-subdirs): Inline and remove targets. 2016-12-27 Bruno Haible Make "make mostlyclean" act like "make clean". * callback/Makefile.in (MOSTLYCLEANDIRS, MOSTLYCLEANFILES): New variables. (mostlyclean, clean): Use them. (clean-subdirs): Inline and remove target. 2016-12-27 Bruno Haible Fix Makefile rules for powerpc64, from 2006-04-27. * trampoline/Makefile.in (clean): Also remove tramp-powerpc64.s. * callback/trampoline_r/Makefile.in (clean): Likewise. 2016-12-26 Bruno Haible Reorder Makefile targets. * trampoline/Makefile.in: Reorder. * callback/trampoline_r/Makefile.in: Reorder. 2016-12-26 Bruno Haible Fix Makefile rules for powerpc64le, from 2015-08-23. * trampoline/Makefile.devel (CPP): New variable. (tramp-powerpc64le.o, tramp-powerpc64le.s): New targets. * trampoline/Makefile.in (tramp-powerpc64le.o, tramp-powerpc64le.s): Remove targets. * callback/trampoline_r/Makefile.devel (CPP): New variable. (tramp-powerpc64le.o, tramp-powerpc64le.s): New targets. * callback/trampoline_r/Makefile.in (tramp-powerpc64le.lo, tramp-powerpc64le.s): Remove targets. 2016-12-26 Bruno Haible Fix Makefile rules for s390, from 2002-03-24. * trampoline/Makefile.devel (tramp-s390.o): New target. * trampoline/Makefile.in (tramp-s390.o): Remove target. * callback/trampoline_r/Makefile.devel (tramp-s390.o): New target. * callback/trampoline_r/Makefile.in (tramp-s390.lo): Remove target. 2016-12-26 Bruno Haible Fix "make distclean". * avcall/Makefile.in (distclean): Also remove config.h. * callback/Makefile.in (distclean): Likewise. 2016-12-26 Bruno Haible Make it possible to build in $(srcdir) on case-insensitive file systems. * avcall/avcall-${cpu}-macro.S: Renamed from avcall/avcall-${cpu}.S. * avcall/Makefile.devel: Update accordingly. * avcall/Makefile.in: Likewise. * vacall/vacall-${cpu}-macro.S: Renamed from vacall/vacall-${cpu}.S. * vacall/Makefile.devel: Update accordingly. * vacall/Makefile.in: Likewise. * trampoline/cache-sparc-macro.S: Renamed from trampoline/cache-sparc.S. * trampoline/Makefile.devel: Update accordingly. * trampoline/Makefile.in: Update accordingly. * callback/vacall_r/vacall-${cpu}-macro.S: Renamed from callback/vacall_r/vacall-${cpu}.S. * callback/vacall_r/Makefile.devel: Update accordingly. * callback/vacall_r/Makefile.in: Likewise. * callback/trampoline_r/cache-sparc-macro.S: Renamed from callback/trampoline_r/cache-sparc.S. * callback/trampoline_r/Makefile.devel: Update accordingly. * callback/trampoline_r/Makefile.in: Update accordingly. 2016-12-26 Bruno Haible Simplify armel build rule. * avcall/Makefile.devel (avcall-armel.s): Renamed from avcall-armel.S. Simplify. * avcall/Makefile.in (avcall-armel.lo): Use $(srcdir)/avcall-armel.s. (avcall-armel.s): Remove target. 2016-12-26 Bruno Haible Put duplicated files under version control only once. * autogen.sh: Copy some files from trampoline/ to callback/trampoline_r. * common/asm*.sh: Moved here from avcall/, vacall/, callback/vacall_r. * common/asm*.h: Likewise. * common/reg-struct-return: Likewise. * common/structcpy.c: Likewise. * common/uniq-u.c: Moved here from avcall/, vacall/, callback/. * avcall/Makefile.devel: Update paths of asm*.sh. * avcall/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c. * avcall/Makefile.mingw32: Likewise. * avcall/Makefile.msvc: Likewise. Update path of uniq-u.c. * vacall/Makefile.devel: Update paths of asm*.sh. * vacall/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c. * vacall/Makefile.mingw32: Likewise. * vacall/Makefile.msvc: Likewise. Update path of uniq-u.c. * trampoline/Makefile.devel: Update paths of asm*.sh. * trampoline/Makefile.in: Add -I options for asm*.h. * callback/Makefile.msvc: Update path of uniq-u.c. * callback/vacall_r/Makefile.devel: Update paths of asm*.sh. * callback/vacall_r/Makefile.in: Add -I options for asm*.h. Update path of structcpy.c. * callback/vacall_r/Makefile.mingw32: Likewise. * callback/vacall_r/Makefile.msvc: Likewise. * callback/trampoline_r/Makefile.devel: Update paths of asm*.sh. * callback/trampoline_r/Makefile.in: Add -I options for asm*.h. 2016-12-26 Bruno Haible Fix dependencies. * avcall/Makefile.devel (avcall-sparc64.S): Depend on asmsparc64.sh, not asmsparc.sh. * vacall/Makefile.devel (vacall-sparc64.S): Likewise. * callback/vacall_r/Makefile.devel (vacall-sparc64.S): Likewise. * callback/Makefile.maint (vacall_r/vacall-i386-*.c): Don't depend on vacall_r/asmi386.sh. 2016-12-26 Bruno Haible Add missing dependency. * callback/vacall_r/Makefile.devel (vacall-m68k-netbsd.S): Depend on asmm68k.sh. 2016-12-26 Bruno Haible Switch to libtool-2.4.6. * autogen.sh (LIBTOOL_VERSION): Set to 2.4.6. * Makefile.maint (libtool-imported-files): Import also m4/ltoptions.m4, m4/ltsugar.m4, m4/ltversion.m4, m4/lt~obsolete.m4. * m4/general.m4 (FFCALL_COMMON_LIBTOOL): Invoke LT_INIT. 2016-12-26 Bruno Haible Switch to autoconf 2.69 and automake 1.15. * Makefile.maint (ACLOCAL, AUTOCONF, AUTOHEADER): Bump version numbers. 2016-12-26 Bruno Haible Remove files that can easily be autogenerated from version control. * autogen.sh: New file. * Makefile.maint: New file, partially inspired by Makefile.devel. * Makefile.devel (all): Remove target and its subtargets. * avcall/Makefile.maint: New file, extracted from avcall/Makefile.devel. * avcall/Makefile.devel (precompiled): Renamed from 'all'. Remove all targets that are moved to avcall/Makefile.maint. * vacall/Makefile.maint: New file, extracted from vacall/Makefile.devel. * vacall/Makefile.devel (precompiled): Renamed from 'all'. Remove all targets that are moved to vacall/Makefile.maint. * trampoline/Makefile.maint: New file, extracted from trampoline/Makefile.devel. * trampoline/Makefile.devel (precompiled): Renamed from 'all'. Remove all targets that are moved to trampoline/Makefile.maint. * callback/Makefile.maint: Renamed from callback/Makefile.devel. (trampoline_r/trampoline_r.man): New target. (totally-clean, force): New targets. * callback/vacall_r/Makefile.maint: New file, extracted from callback/vacall_r/Makefile.devel. * callback/vacall_r/Makefile.devel (precompiled): Renamed from 'all'. Remove all targets that are moved to callback/vacall_r/Makefile.maint. (vacall_r.man): Remove target. * callback/trampoline_r/Makefile.maint: New file, extracted from callback/trampoline_r/Makefile.devel. * callback/trampoline_r/Makefile.devel (precompiled): Renamed from 'all'. Remove all targets that are moved to callback/trampoline_r/Makefile.maint. 2016-12-26 Bruno Haible Remove test result files from version control. * callback/trampoline_r/tests.passed.i386-pc-win32-gcc: Remove file. 2015-08-23 Hernán Erasmo Added compatibility with ppc64le architecture. Credit goes to Masanori Mitsugi 2012-04-24 Sam Steingold Never build shared libraries: --enable-shared has no effect. * avcall/Makefile.in (libavcall.la): pass -static to LIBTOOL_LINK * callback/Makefile.in (libcallback.la): ditto * callback/trampoline_r/Makefile.in (libtrampoline.la): ditto * callback/vacall_r/Makefile.in (libvacall.la): ditto 2010-09-03 Sam Steingold * configure.in: call AC_CONFIG_AUX_DIR(build-aux) 2010-09-03 Sam Steingold * Makefile.devel (gnulib-imported): also import host-cpu-c-abi * avcall/configure.in, callback/configure.in: * callback/trampoline_r/configure.in, callback/vacall_r/configure.in: * trampoline/configure.in, vacall/configure.in: use gl_HOST_CPU_C_ABI instead of FFCALL_CANONICAL_HOST_CPU * m4/general.m4: remove FFCALL_CANONICAL_HOST_CPU, FFCALL_CACHE_EGREP_CPP, FFCALL_SET_CPU_ABI * glm4/host-cpu-c-abi.m4: add * avcall/Makefile.in, callback/Makefile.in: * callback/trampoline_r/Makefile.in, callback/vacall_r/Makefile.in: * trampoline/Makefile.in, vacall/Makefile.in, use @HOST_CPU_C_ABI@ instead of @host_cpu_abi@ * callback/trampoline_r/configure.in, trampoline/configure.in: * m4/codeexec.m4: use $HOST_CPU_C_ABI instead of $host_cpu_abi 2010-07-20 Sam Steingold * callback/trampoline_r/trampoline_r.h.in, trampoline/trampoline.h.in: add autoconf CPU detection block; this fixes trampoline on sparc64/linux Suggested by Valeriy E. Ushakov 2010-07-20 Valeriy E. Ushakov https://savannah.gnu.org/bugs/?22081 support sparc64 for solaris & *bsd * avcall/avcall-sparc64.c, avcall/avcall.h.in: Kill callee (%g2). Sparc64 doesn't need that code. Delete space[] - gcc optimizes it away anyway, and it doesn't guarantee correct operation even if it's not removed - if compiler allocs it below other local vars on the stack, then calling function with enough arguments will clobber local vars. Instead i've changed the code to use alloca, see the comment in the code for details on why this works. It also doesn't waste 2K of stack on each call, we only grab the space we actually need. I nuked farg_mask. It's not necessary for float args, marking them in darg_mask does the right thing (new av_float). And they just hurt structure passing, where, again, marking up darg_mask does the right thing. * avcall/avcall-saprc64.S: Regenerated with NetBSD gcc4 * vacall/vacall-sparc64.S, callback/vacall_r/vacall-sparc64.S: New binutils on sparc64 insist on having global registers properly declared with .register. I've just added the declarations manually w/out actually regenerating the files to demonstrate that's the only change needed there. IF the files are regenerated with a newer compiler you will get them automatically. 2009-11-10 Sam Steingold * vacall/Makefile.in (vacall-armel.o): vacall-armel.s is in $(srcdir) * callback/vacall_r/Makefile.in (vacall-armel.lo): ditto 2009-10-16 Sam Steingold the final fix for LIBFFCALL_VERSION * Makefile.devel (vacall/vacall.h.msvc, vacall/vacall.h.mingw32) (callback/vacall_r/vacall_r.h.msvc) (callback/vacall_r/vacall_r.h.mingw32): depend on VERSION * avcall/avcall.h.in, callback/callback.h.in, * callback/trampoline_r/trampoline_r.h.in, vacall/vacall.h.in, * callback/vacall_r/vacall_r.h.in, trampoline/trampoline.h.in: use @LIBFFCALL_VERSION@ instead of @PACKAGE_VERSION@ * avcall/configure.in: additional processing for avcall.h to substitute @LIBFFCALL_VERSION@ * callback/configure.in: ditto for callback.h * callback/trampoline_r/configure.in: ditto for trampoline_r.h * callback/vacall_r/configure.in: ditto for vacall_r.h * trampoline/configure.in: ditto for trampoline.h * vacall/configure.in: ditto for vacall.h * callback/vacall_r/Makefile.devel (vacall_r.h.msvc) (vacall_r.h.mingw32): depend on ../../VERSION; substitute @LIBFFCALL_VERSION@ * vacall/Makefile.devel (vacall.h.msvc, vacall.h.mingw32): depend on ../VERSION; substitute @LIBFFCALL_VERSION@ 2009-10-16 Sam Steingold * glm4/longlong.m4, glm4/nocrash.m4: update from gnulib 2009-10-16 Sam Steingold * Makefile.devel (update-gnulib): use git when available 2009-10-16 Sam Steingold * avcall/configure.in, callback/configure.in, * callback/trampoline_r/configure.in, callback/vacall_r/configure.in, * trampoline/configure.in, vacall/configure.in: list the main generated header (avcall.h et al) in AC_CONFIG_HEADERS, not in AC_CONFIG_FILES fixes the bug#27706 (introduced on 2009-04-24) 2009-04-28 Sam Steingold * m4/general.m4 (FFCALL_CACHE_EGREP_CPP, FFCALL_SET_CPU_ABI): abstracted out of FFCALL_CANONICAL_HOST_CPU (FFCALL_CANONICAL_HOST_CPU): use them 2009-04-27 Max Lapan Sam Steingold * avcall/Makefile.devel, avcall/Makefile.in, avcall/avcall.h.in, * callback/trampoline_r/Makefile.devel, * callback/trampoline_r/Makefile.in, * callback/trampoline_r/configure.in, * callback/vacall_r/Makefile.devel, callback/vacall_r/Makefile.in, * callback/vacall_r/vacall_r.h.in, trampoline/Makefile.devel, * trampoline/Makefile.in, trampoline/configure.in, * vacall/Makefile.devel, vacall/Makefile.in, vacall/vacall.h.in: Add ARMel support * m4/general.m4 (FFCALL_CANONICAL_HOST_CPU): use AC_EGREP_CPP to distinguish between arm and armel * avcall/avcall-armel.S, avcall/avcall-armel.c, * callback/trampoline_r/cache-armel.c, * callback/trampoline_r/cache-armel.s, * callback/vacall_r/vacall-armel.c, callback/vacall_r/vacall-armel.s, * trampoline/cache-armel.c, trampoline/cache-armel.s, * vacall/vacall-armel.c, vacall/vacall-armel.s: new files 2009-04-27 Max Lapan * avcall/tests.c, callback/tests.c, vacall/tests.c: #include "config.h" for HAVE_LONG_LONG_INT 2009-04-27 Max Lapan * callback/trampoline_r/trampoline.c (is_tramp) [__arm__]: fix bug in the last patch 2009-04-24 Sam Steingold * avcall/configure.in, callback/configure.in, * callback/trampoline_r/configure.in, callback/vacall_r/configure.in, * trampoline/configure.in, vacall/configure.in: use AC_CONFIG_FILES instead of AC_OUTPUT with argument * Makefile.devel (aclocal.m4): adjust the grep regexp 2009-04-24 Sam Steingold * Makefile.in, avcall/Makefile.in, callback/Makefile.in, * callback/trampoline_r/Makefile.in, callback/vacall_r/Makefile.in, * trampoline/Makefile.in, vacall/Makefile.in (datarootdir): set to @datarootdir@ to avoid a configure warning 2009-04-24 Sam Steingold * Makefile.devel (SUBDIRS_CONFIG_H): add avcall and callback 2009-04-24 Sam Steingold * VERSION: new file * configure.in: use AC_INIT with the version argument * avcall/Makefile.mingw32: use sed to set LIBFFCALL_VERSION in avcall.h * callback/vacall_r/Makefile.mingw32: use sed to set LIBFFCALL_VERSION in vacall_r.h * vacall/Makefile.mingw32: use sed to set LIBFFCALL_VERSION in vacall.h * avcall/avcall.h.in, callback/callback.h.in, * callback/trampoline_r/trampoline_r.h.in, * callback/vacall_r/vacall_r.h.in, * trampoline/trampoline.h.in, vacall/vacall.h.in: (LIBFFCALL_VERSION): define to @PACKAGE_VERSION@ * avcall/configure.in, callback/configure.in, * callback/trampoline_r/configure.in, callback/vacall_r/configure.in, * trampoline/configure.in, vacall/configure.in: use AC_INIT with the version argument, pass [config.h] to AC_CONFIG_HEADERS 2009-04-23 Sam Steingold * m4/codeexec.m4, m4/ireg.m4, m4/pccstruct.m4, m4/smallstruct.m4: all 3 arguments of AC_DEFINE are now required 2009-04-21 Sam Steingold * m4/as-underscore.m4, m4/codeexec.m4, m4/general.m4: * m4/getpagesize.m4, m4/ireg.m4, m4/mach-vm.m4, m4/mmap.m4: * m4/mprotect.m4, m4/pccstruct.m4, m4/shm.m4, m4/smallstruct.m4: quote AC_DEFINE arguments 2008-09-28 Sam Steingold * Makefile.devel (aclocal.m4): include glm4 (this defined gl_EARLY and gl_INIT and fixes make check on x86_64) 2008-09-26 Sam Steingold * avcall/avcall-ia64.s, avcall/avcall.h.in: * callback/vacall_r/vacall_r.h.in: support IA64 on Linux (kernel 2.6.16+ and gcc 4.1.0+) https://savannah.gnu.org/bugs/index.php?22130 https://sourceforge.net/tracker/index.php?func=detail&aid=1528895&group_id=1355&atid=301355 2008-09-26 Sam Steingold * callback/trampoline_r/Makefile.in, callback/trampoline_r/cache-arm.c: * callback/trampoline_r/cache-arm.s, callback/trampoline_r/configure.in: * callback/trampoline_r/tramp-arm.s, callback/trampoline_r/tramp-mips.s: * callback/trampoline_r/trampoline.c, trampoline/cache-arm.c: * trampoline/cache-arm.s, trampoline/configure.in: * trampoline/tramp-arm.s, trampoline/trampoline.c: add arm support from Jonathan Olson (debian 1.10-2) https://savannah.gnu.org/bugs/?func=detailitem&item_id=9468 2008-09-26 Sam Steingold * avcall/avcall-mips.S, avcall/avcall-mips.c, avcall/avcall.h.in: * callback/trampoline_r/trampoline.c, callback/vacall_r/vacall_r.h.in: * m4/general.m4, trampoline/trampoline.c, vacall/vacall.h.in: add mipsel support from Thiemo Seufer (debian 1.10-2) 2008-09-26 Sam Steingold * Makefile.devel, Makefile.in, callback/Makefile.devel, * callback/Makefile.in: use "&&" instead of ";" for all targets 2008-07-13 Sam Steingold * glm4/gnulib-cache.m4, glm4/gnulib-common.m4, glm4/gnulib-comp.m4: * glm4/gnulib-tool.m4, glm4/onceonly.m4: add from gnulib * glm4/nocrash.m4: update from gnulib * Makefile.devel (gnulib-imported): remove gllib * configure.ac: call gl_EARLY and gl_INIT 2008-07-08 Sam Steingold * Makefile.devel (SUBDIRS_CONFIGURE): use $(CURDIR) instead of . (%/configure): use "&&" instead of ";" 2008-07-03 Sam Steingold * Makefile.devel (all): split into a few manageable targets (config-h-in, woe32-h, woe32-c): new targets (configure): use patterns 2008-07-03 Sam Steingold * m4/smallstruct.m4 (FFCALL_SMALL_STRUCT_RETURN): rename from CL_SMALL_STRUCT_RETURN; use ffcall_cv_* instead of cl_cv_*; use return instead of exit() * m4/pccstruct.m4 (FFCALL_PCC_STRUCT_RETURN): rename from CL_PCC_STRUCT_RETURN; use ffcall_cv_* instead of cl_cv_*; use return instead of exit() * m4/ireg.m4 (FFCALL_IREG_FLOAT_RETURN): remame from CL_IREG_FLOAT_RETURN; use ffcall_cv_* instead of cl_cv_*; use return instead of exit() * m4/codeexec.m4 (FFCALL_CODEEXEC): rename from CL_CODEEXEC use ffcall_cv_* instead of cl_cv_*; use return instead of exit() * m4/general.m4: remove non-FFCALL code (FFCALL_COMMON_LIBTOOL): rename from CL_FFCALL_COMMON_LIBTOOL (FFCALL_COMMON_TRAMPOLINE): rename from CL_FFCALL_COMMON_TRAMPOLINE (FFCALL_CANONICAL_HOST_CPU): <- CL_CANONICAL_HOST_CPU_FOR_FFCALL 2008-07-03 Sam Steingold * Makefile.devel (build-aux-update): new target 2008-07-02 Sam Steingold * Makefile.devel (gnulib-imported, update-gnulib): new targets * glm4: new directory * longlong.m4, nocrash.m4: move from m4 to glm4 2008-07-02 Sam Steingold * m4/ln.m4: update from clisp * m4/cp.m4: remove * m4/getpagesize.m4: update from clisp * m4/general.m4: update from clisp * m4/mmap.m4: update from clisp * m4/mprotect.m4: update from clisp * m4/proto.m4: update from clisp * m4/openflags.m4: remove * m4/cc-void.m4: remove 2008-07-02 Sam Steingold * Makefile.devel, aclocal.m4: move autoconf/aclocal.m4 to aclocal.m4 * aclocal/autoconf.m4: remove * Makefile.devel (CLISP_DIR): remove 2008-07-02 Sam Steingold * m4/ffcall-pccstruct.m4, m4/ffcall-smallstruct.m4, m4/ffcall-ireg.m4: * m4/ffcall-codeexec.m4: remove "ffcall-" prefix * Makefile.devel: update See clisp ChangeLog for earlier changes. libffcall-2.5/dummy/0000775000000000000000000000000014665334231011411 500000000000000libffcall-2.5/dummy/ffcall-version.h0000664000000000000000000000005013146127475014412 00000000000000/* This file is intentionally empty. */ libffcall-2.5/INSTALL.os20000644000000000000000000000051713030557144011725 00000000000000Installation on OS/2: - Requires emx+gcc and a working shell (Bourne shell, Korn shell or GNU bash). - Set the environment variables CC=gcc CFLAGS="-Zexe" before calling ‘configure’. - Must build in a separate directory and pass the --srcdir option to ‘configure’, otherwise avcall-i386.s will overwrite avcall-i386.S. libffcall-2.5/Makefile.devel0000664000000000000000000000165714236066227012746 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! # ============ Rules that require cross-compilation tools ============ precompiled : force cd avcall && $(MAKE) -f Makefile.devel precompiled cd vacall && $(MAKE) -f Makefile.devel precompiled cd trampoline && $(MAKE) -f Makefile.devel precompiled cd callback/vacall_r \ && $(MAKE) -f Makefile.devel precompiled cd callback/trampoline_r \ && $(MAKE) -f Makefile.maint copied-files \ && $(MAKE) -f Makefile.devel precompiled # ==================== Targets for testing ==================== COMPILERS="cc -O" "gcc -freg-struct-return" "gcc -fpcc-struct-return" multibuild : force for compiler in $(COMPILERS) ; do \ dir=build-`echo $$compiler | sed -e 's, ,,g' -e 's,/,_,g'`; \ mkdir $$dir; cd $$dir; \ CC="$$compiler" ../configure --srcdir=.. && make && make check; \ cd ..; \ done force : libffcall-2.5/configure0000775000000000000000000433515414665326515012132 00000000000000#! /bin/sh # Guess values for system-dependent variables and create Makefiles. # Generated by GNU Autoconf 2.72 for GNU libffcall 2.5. # # Report bugs to . # # # Copyright (C) 1992-1996, 1998-2017, 2020-2023 Free Software Foundation, # Inc. # # # This configure script is free software; the Free Software Foundation # gives unlimited permission to copy, distribute and modify it. ## -------------------- ## ## M4sh Initialization. ## ## -------------------- ## # Be more Bourne compatible DUALCASE=1; export DUALCASE # for MKS sh if test ${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 then : emulate sh NULLCMD=: # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which # is contrary to our usage. Disable this feature. alias -g '${1+"$@"}'='"$@"' setopt NO_GLOB_SUBST else case e in #( e) case `(set -o) 2>/dev/null` in #( *posix*) : set -o posix ;; #( *) : ;; esac ;; esac fi # Reset variables that may have inherited troublesome values from # the environment. # IFS needs to be set, to space, tab, and newline, in precisely that order. # (If _AS_PATH_WALK were called with IFS unset, it would have the # side effect of setting IFS to empty, thus disabling word splitting.) # Quoting is to prevent editors from complaining about space-tab. as_nl=' ' export as_nl IFS=" "" $as_nl" PS1='$ ' PS2='> ' PS4='+ ' # Ensure predictable behavior from utilities with locale-dependent output. LC_ALL=C export LC_ALL LANGUAGE=C export LANGUAGE # We cannot yet rely on "unset" to work, but we need these variables # to be unset--not just set to an empty or harmless value--now, to # avoid bugs in old shells (e.g. pre-3.0 UWIN ksh). This construct # also avoids known problems related to "unset" and subshell syntax # in other old shells (e.g. bash 2.01 and pdksh 5.2.14). for as_var in BASH_ENV ENV MAIL MAILPATH CDPATH do eval test \${$as_var+y} \ && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || : done # Ensure that fds 0, 1, and 2 are open. if (exec 3>&0) 2>/dev/null; then :; else exec 0&1) 2>/dev/null; then :; else exec 1>/dev/null; fi if (exec 3>&2) ; then :; else exec 2>/dev/null; fi # The user is always right. if ${PATH_SEPARATOR+false} :; then PATH_SEPARATOR=: (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || PATH_SEPARATOR=';' } fi # Find who we are. Look in the path if we contain no directory separator. as_myself= case $0 in #(( *[\\/]* ) as_myself=$0 ;; *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac test -r "$as_dir$0" && as_myself=$as_dir$0 && break done IFS=$as_save_IFS ;; esac # We did not find ourselves, most probably we were run as 'sh COMMAND' # in which case we are not to be found in the path. if test "x$as_myself" = x; then as_myself=$0 fi if test ! -f "$as_myself"; then printf "%s\n" "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2 exit 1 fi # Use a proper internal environment variable to ensure we don't fall # into an infinite loop, continuously re-executing ourselves. if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then _as_can_reexec=no; export _as_can_reexec; # We cannot yet assume a decent shell, so we have to provide a # neutralization value for shells without unset; and this also # works around shells that cannot unset nonexistent variables. # Preserve -v and -x to the replacement shell. BASH_ENV=/dev/null ENV=/dev/null (unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV case $- in # (((( *v*x* | *x*v* ) as_opts=-vx ;; *v* ) as_opts=-v ;; *x* ) as_opts=-x ;; * ) as_opts= ;; esac exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"} # Admittedly, this is quite paranoid, since all the known shells bail # out after a failed 'exec'. printf "%s\n" "$0: could not re-execute with $CONFIG_SHELL" >&2 exit 255 fi # We don't want this to propagate to other subprocesses. { _as_can_reexec=; unset _as_can_reexec;} if test "x$CONFIG_SHELL" = x; then as_bourne_compatible="if test \${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 then : emulate sh NULLCMD=: # Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which # is contrary to our usage. Disable this feature. alias -g '\${1+\"\$@\"}'='\"\$@\"' setopt NO_GLOB_SUBST else case e in #( e) case \`(set -o) 2>/dev/null\` in #( *posix*) : set -o posix ;; #( *) : ;; esac ;; esac fi " as_required="as_fn_return () { (exit \$1); } as_fn_success () { as_fn_return 0; } as_fn_failure () { as_fn_return 1; } as_fn_ret_success () { return 0; } as_fn_ret_failure () { return 1; } exitcode=0 as_fn_success || { exitcode=1; echo as_fn_success failed.; } as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; } as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; } as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; } if ( set x; as_fn_ret_success y && test x = \"\$1\" ) then : else case e in #( e) exitcode=1; echo positional parameters were not saved. ;; esac fi test x\$exitcode = x0 || exit 1 blah=\$(echo \$(echo blah)) test x\"\$blah\" = xblah || exit 1 test -x / || exit 1" as_suggested=" as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" && test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1 test \$(( 1 + 1 )) = 2 || exit 1 test -n \"\${ZSH_VERSION+set}\${BASH_VERSION+set}\" || ( ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\' ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO ECHO=\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO\$ECHO PATH=/empty FPATH=/empty; export PATH FPATH test \"X\`printf %s \$ECHO\`\" = \"X\$ECHO\" \\ || test \"X\`print -r -- \$ECHO\`\" = \"X\$ECHO\" ) || exit 1" if (eval "$as_required") 2>/dev/null then : as_have_required=yes else case e in #( e) as_have_required=no ;; esac fi if test x$as_have_required = xyes && (eval "$as_suggested") 2>/dev/null then : else case e in #( e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR as_found=false for as_dir in /bin$PATH_SEPARATOR/usr/bin$PATH_SEPARATOR$PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac as_found=: case $as_dir in #( /*) for as_base in sh bash ksh sh5; do # Try only shells that exist, to save several forks. as_shell=$as_dir$as_base if { test -f "$as_shell" || test -f "$as_shell.exe"; } && as_run=a "$as_shell" -c "$as_bourne_compatible""$as_required" 2>/dev/null then : CONFIG_SHELL=$as_shell as_have_required=yes if as_run=a "$as_shell" -c "$as_bourne_compatible""$as_suggested" 2>/dev/null then : break 2 fi fi done;; esac as_found=false done IFS=$as_save_IFS if $as_found then : else case e in #( e) if { test -f "$SHELL" || test -f "$SHELL.exe"; } && as_run=a "$SHELL" -c "$as_bourne_compatible""$as_required" 2>/dev/null then : CONFIG_SHELL=$SHELL as_have_required=yes fi ;; esac fi if test "x$CONFIG_SHELL" != x then : export CONFIG_SHELL # We cannot yet assume a decent shell, so we have to provide a # neutralization value for shells without unset; and this also # works around shells that cannot unset nonexistent variables. # Preserve -v and -x to the replacement shell. BASH_ENV=/dev/null ENV=/dev/null (unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV case $- in # (((( *v*x* | *x*v* ) as_opts=-vx ;; *v* ) as_opts=-v ;; *x* ) as_opts=-x ;; * ) as_opts= ;; esac exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"} # Admittedly, this is quite paranoid, since all the known shells bail # out after a failed 'exec'. printf "%s\n" "$0: could not re-execute with $CONFIG_SHELL" >&2 exit 255 fi if test x$as_have_required = xno then : printf "%s\n" "$0: This script requires a shell more modern than all" printf "%s\n" "$0: the shells that I found on your system." if test ${ZSH_VERSION+y} ; then printf "%s\n" "$0: In particular, zsh $ZSH_VERSION has bugs and should" printf "%s\n" "$0: be upgraded to zsh 4.3.4 or later." else printf "%s\n" "$0: Please tell bug-autoconf@gnu.org and $0: https://savannah.gnu.org/projects/libffcall about your $0: system, including any error possibly output before this $0: message. Then install a modern shell, or manually run $0: the script under such a shell if you do have one." fi exit 1 fi ;; esac fi fi SHELL=${CONFIG_SHELL-/bin/sh} export SHELL # Unset more variables known to interfere with behavior of common tools. CLICOLOR_FORCE= GREP_OPTIONS= unset CLICOLOR_FORCE GREP_OPTIONS ## --------------------- ## ## M4sh Shell Functions. ## ## --------------------- ## # as_fn_unset VAR # --------------- # Portably unset VAR. as_fn_unset () { { eval $1=; unset $1;} } as_unset=as_fn_unset # as_fn_set_status STATUS # ----------------------- # Set $? to STATUS, without forking. as_fn_set_status () { return $1 } # as_fn_set_status # as_fn_exit STATUS # ----------------- # Exit the shell with STATUS, even in a "trap 0" or "set -e" context. as_fn_exit () { set +e as_fn_set_status $1 exit $1 } # as_fn_exit # as_fn_mkdir_p # ------------- # Create "$as_dir" as a directory, including parents if necessary. as_fn_mkdir_p () { case $as_dir in #( -*) as_dir=./$as_dir;; esac test -d "$as_dir" || eval $as_mkdir_p || { as_dirs= while :; do case $as_dir in #( *\'*) as_qdir=`printf "%s\n" "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'( *) as_qdir=$as_dir;; esac as_dirs="'$as_qdir' $as_dirs" as_dir=`$as_dirname -- "$as_dir" || $as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$as_dir" : 'X\(//\)[^/]' \| \ X"$as_dir" : 'X\(//\)$' \| \ X"$as_dir" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$as_dir" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'` test -d "$as_dir" && break done test -z "$as_dirs" || eval "mkdir $as_dirs" } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir" } # as_fn_mkdir_p # as_fn_executable_p FILE # ----------------------- # Test if FILE is an executable regular file. as_fn_executable_p () { test -f "$1" && test -x "$1" } # as_fn_executable_p # as_fn_append VAR VALUE # ---------------------- # Append the text in VALUE to the end of the definition contained in VAR. Take # advantage of any shell optimizations that allow amortized linear growth over # repeated appends, instead of the typical quadratic growth present in naive # implementations. if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null then : eval 'as_fn_append () { eval $1+=\$2 }' else case e in #( e) as_fn_append () { eval $1=\$$1\$2 } ;; esac fi # as_fn_append # as_fn_arith ARG... # ------------------ # Perform arithmetic evaluation on the ARGs, and store the result in the # global $as_val. Take advantage of shells that can avoid forks. The arguments # must be portable across $(()) and expr. if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null then : eval 'as_fn_arith () { as_val=$(( $* )) }' else case e in #( e) as_fn_arith () { as_val=`expr "$@" || test $? -eq 1` } ;; esac fi # as_fn_arith # as_fn_error STATUS ERROR [LINENO LOG_FD] # ---------------------------------------- # Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are # provided, also output the error to LOG_FD, referencing LINENO. Then exit the # script with STATUS, using 1 if that was 0. as_fn_error () { as_status=$1; test $as_status -eq 0 && as_status=1 if test "$4"; then as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: $2" >&$4 fi printf "%s\n" "$as_me: error: $2" >&2 as_fn_exit $as_status } # as_fn_error if expr a : '\(a\)' >/dev/null 2>&1 && test "X`expr 00001 : '.*\(...\)'`" = X001; then as_expr=expr else as_expr=false fi if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then as_basename=basename else as_basename=false fi if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then as_dirname=dirname else as_dirname=false fi as_me=`$as_basename -- "$0" || $as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \ X"$0" : 'X\(//\)$' \| \ X"$0" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X/"$0" | sed '/^.*\/\([^/][^/]*\)\/*$/{ s//\1/ q } /^X\/\(\/\/\)$/{ s//\1/ q } /^X\/\(\/\).*/{ s//\1/ q } s/.*/./; q'` # Avoid depending upon Character Ranges. as_cr_letters='abcdefghijklmnopqrstuvwxyz' as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ' as_cr_Letters=$as_cr_letters$as_cr_LETTERS as_cr_digits='0123456789' as_cr_alnum=$as_cr_Letters$as_cr_digits as_lineno_1=$LINENO as_lineno_1a=$LINENO as_lineno_2=$LINENO as_lineno_2a=$LINENO eval 'test "x$as_lineno_1'$as_run'" != "x$as_lineno_2'$as_run'" && test "x`expr $as_lineno_1'$as_run' + 1`" = "x$as_lineno_2'$as_run'"' || { # Blame Lee E. McMahon (1931-1989) for sed's syntax. :-) sed -n ' p /[$]LINENO/= ' <$as_myself | sed ' t clear :clear s/[$]LINENO.*/&-/ t lineno b :lineno N :loop s/[$]LINENO\([^'$as_cr_alnum'_].*\n\)\(.*\)/\2\1\2/ t loop s/-\n.*// ' >$as_me.lineno && chmod +x "$as_me.lineno" || { printf "%s\n" "$as_me: error: cannot create $as_me.lineno; rerun with a POSIX shell" >&2; as_fn_exit 1; } # If we had to re-execute with $CONFIG_SHELL, we're ensured to have # already done that, so ensure we don't try to do so again and fall # in an infinite loop. This has already happened in practice. _as_can_reexec=no; export _as_can_reexec # Don't try to exec as it changes $[0], causing all sort of problems # (the dirname of $[0] is not the place where we might find the # original and so on. Autoconf is especially sensitive to this). . "./$as_me.lineno" # Exit status is that of the last command. exit } # Determine whether it's possible to make 'echo' print without a newline. # These variables are no longer used directly by Autoconf, but are AC_SUBSTed # for compatibility with existing Makefiles. ECHO_C= ECHO_N= ECHO_T= case `echo -n x` in #((((( -n*) case `echo 'xy\c'` in *c*) ECHO_T=' ';; # ECHO_T is single tab character. xy) ECHO_C='\c';; *) echo `echo ksh88 bug on AIX 6.1` > /dev/null ECHO_T=' ';; esac;; *) ECHO_N='-n';; esac # For backward compatibility with old third-party macros, we provide # the shell variables $as_echo and $as_echo_n. New code should use # AS_ECHO(["message"]) and AS_ECHO_N(["message"]), respectively. as_echo='printf %s\n' as_echo_n='printf %s' rm -f conf$$ conf$$.exe conf$$.file if test -d conf$$.dir; then rm -f conf$$.dir/conf$$.file else rm -f conf$$.dir mkdir conf$$.dir 2>/dev/null fi if (echo >conf$$.file) 2>/dev/null; then if ln -s conf$$.file conf$$ 2>/dev/null; then as_ln_s='ln -s' # ... but there are two gotchas: # 1) On MSYS, both 'ln -s file dir' and 'ln file dir' fail. # 2) DJGPP < 2.04 has no symlinks; 'ln -s' creates a wrapper executable. # In both cases, we have to default to 'cp -pR'. ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || as_ln_s='cp -pR' elif ln conf$$.file conf$$ 2>/dev/null; then as_ln_s=ln else as_ln_s='cp -pR' fi else as_ln_s='cp -pR' fi rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file rmdir conf$$.dir 2>/dev/null if mkdir -p . 2>/dev/null; then as_mkdir_p='mkdir -p "$as_dir"' else test -d ./-p && rmdir ./-p as_mkdir_p=false fi as_test_x='test -x' as_executable_p=as_fn_executable_p # Sed expression to map a string onto a valid CPP name. as_sed_cpp="y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g" as_tr_cpp="eval sed '$as_sed_cpp'" # deprecated # Sed expression to map a string onto a valid variable name. as_sed_sh="y%*+%pp%;s%[^_$as_cr_alnum]%_%g" as_tr_sh="eval sed '$as_sed_sh'" # deprecated SHELL=${CONFIG_SHELL-/bin/sh} test -n "$DJDIR" || exec 7<&0 &1 # Name of the host. # hostname on some systems (SVR3.2, old GNU/Linux) returns a bogus exit status, # so uname gets run too. ac_hostname=`(hostname || uname -n) 2>/dev/null | sed 1q` # # Initializations. # ac_default_prefix=/usr/local ac_clean_files= ac_config_libobj_dir=. LIBOBJS= cross_compiling=no subdirs= MFLAGS= MAKEFLAGS= # Identity of this package. PACKAGE_NAME='GNU libffcall' PACKAGE_TARNAME='libffcall' PACKAGE_VERSION='2.5' PACKAGE_STRING='GNU libffcall 2.5' PACKAGE_BUGREPORT='https://savannah.gnu.org/projects/libffcall' PACKAGE_URL='https://www.gnu.org/software/libffcall/' ac_unique_file="trampoline/trampoline.h" # Factoring default headers for most tests. ac_includes_default="\ #include #ifdef HAVE_STDIO_H # include #endif #ifdef HAVE_STDLIB_H # include #endif #ifdef HAVE_STRING_H # include #endif #ifdef HAVE_INTTYPES_H # include #endif #ifdef HAVE_STDINT_H # include #endif #ifdef HAVE_STRINGS_H # include #endif #ifdef HAVE_SYS_TYPES_H # include #endif #ifdef HAVE_SYS_STAT_H # include #endif #ifdef HAVE_UNISTD_H # include #endif" ac_header_c_list= gl_use_threads_default= gl_use_winpthreads_default=no ac_func_c_list= enable_year2038=no ac_subst_vars='gltests_LIBOBJDEPS gltests_LTLIBOBJS gltests_LIBOBJS gl_LIBOBJDEPS gl_LTLIBOBJS gl_LIBOBJS am__EXEEXT_FALSE am__EXEEXT_TRUE LTLIBOBJS LIBOBJS GL_CFLAG_GNULIB_WARNINGS GL_CFLAG_ALLOW_WARNINGS gltests_WITNESS gl_GNULIB_ENABLED_xsize_FALSE gl_GNULIB_ENABLED_xsize_TRUE gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_FALSE gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_TRUE gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_FALSE gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_FALSE gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_FALSE gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_FALSE gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_FALSE gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_FALSE gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_FALSE gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE gl_GNULIB_ENABLED_vararrays_FALSE gl_GNULIB_ENABLED_vararrays_TRUE gl_GNULIB_ENABLED_unistd_FALSE gl_GNULIB_ENABLED_unistd_TRUE gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_FALSE gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_FALSE gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_TRUE gl_GNULIB_ENABLED_sys_stat_FALSE gl_GNULIB_ENABLED_sys_stat_TRUE gl_GNULIB_ENABLED_string_FALSE gl_GNULIB_ENABLED_string_TRUE gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_FALSE gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE gl_GNULIB_ENABLED_strerror_FALSE gl_GNULIB_ENABLED_strerror_TRUE gl_GNULIB_ENABLED_stdlib_FALSE gl_GNULIB_ENABLED_stdlib_TRUE gl_GNULIB_ENABLED_stdio_FALSE gl_GNULIB_ENABLED_stdio_TRUE gl_GNULIB_ENABLED_stddef_FALSE gl_GNULIB_ENABLED_stddef_TRUE gl_GNULIB_ENABLED_stdckdint_FALSE gl_GNULIB_ENABLED_stdckdint_TRUE gl_GNULIB_ENABLED_stdbool_FALSE gl_GNULIB_ENABLED_stdbool_TRUE gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_FALSE gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_TRUE gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_FALSE gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE gl_GNULIB_ENABLED_stat_FALSE gl_GNULIB_ENABLED_stat_TRUE gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_FALSE gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_TRUE gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_FALSE gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_TRUE gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_FALSE gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_TRUE gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_FALSE gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_TRUE gl_GNULIB_ENABLED_size_max_FALSE gl_GNULIB_ENABLED_size_max_TRUE gl_GNULIB_ENABLED_sigprocmask_FALSE gl_GNULIB_ENABLED_sigprocmask_TRUE gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_FALSE gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE gl_GNULIB_ENABLED_sigaction_FALSE gl_GNULIB_ENABLED_sigaction_TRUE gl_GNULIB_ENABLED_sched_FALSE gl_GNULIB_ENABLED_sched_TRUE gl_GNULIB_ENABLED_rmdir_FALSE gl_GNULIB_ENABLED_rmdir_TRUE gl_GNULIB_ENABLED_raise_FALSE gl_GNULIB_ENABLED_raise_TRUE gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_FALSE gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_FALSE gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE gl_GNULIB_ENABLED_pathmax_FALSE gl_GNULIB_ENABLED_pathmax_TRUE gl_GNULIB_ENABLED_open_FALSE gl_GNULIB_ENABLED_open_TRUE gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_FALSE gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_FALSE gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE gl_GNULIB_ENABLED_mntent_FALSE gl_GNULIB_ENABLED_mntent_TRUE gl_GNULIB_ENABLED_malloca_FALSE gl_GNULIB_ENABLED_malloca_TRUE gl_GNULIB_ENABLED_list_FALSE gl_GNULIB_ENABLED_list_TRUE gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_FALSE gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE gl_GNULIB_ENABLED_largefile_FALSE gl_GNULIB_ENABLED_largefile_TRUE gl_GNULIB_ENABLED_intprops_FALSE gl_GNULIB_ENABLED_intprops_TRUE gl_GNULIB_ENABLED_idx_FALSE gl_GNULIB_ENABLED_idx_TRUE gl_GNULIB_ENABLED_hasmntopt_FALSE gl_GNULIB_ENABLED_hasmntopt_TRUE gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_FALSE gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_TRUE gl_GNULIB_ENABLED_getprogname_FALSE gl_GNULIB_ENABLED_getprogname_TRUE gl_GNULIB_ENABLED_getpagesize_FALSE gl_GNULIB_ENABLED_getpagesize_TRUE gl_GNULIB_ENABLED_getdtablesize_FALSE gl_GNULIB_ENABLED_getdtablesize_TRUE gl_GNULIB_ENABLED_fstat_FALSE gl_GNULIB_ENABLED_fstat_TRUE gl_GNULIB_ENABLED_filename_FALSE gl_GNULIB_ENABLED_filename_TRUE gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_FALSE gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_FALSE gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE gl_GNULIB_ENABLED_fcntl_FALSE gl_GNULIB_ENABLED_fcntl_TRUE gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_FALSE gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_FALSE gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_TRUE gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_FALSE gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_TRUE gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_FALSE gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE gl_GNULIB_ENABLED_error_FALSE gl_GNULIB_ENABLED_error_TRUE gl_GNULIB_ENABLED_errno_FALSE gl_GNULIB_ENABLED_errno_TRUE gl_GNULIB_ENABLED_dup2_FALSE gl_GNULIB_ENABLED_dup2_TRUE gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_FALSE gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_TRUE gl_GNULIB_ENABLED_close_FALSE gl_GNULIB_ENABLED_close_TRUE gl_GNULIB_ENABLED_cloexec_FALSE gl_GNULIB_ENABLED_cloexec_TRUE gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_FALSE gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE gl_GNULIB_ENABLED_c99_FALSE gl_GNULIB_ENABLED_c99_TRUE gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_FALSE gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE gl_GNULIB_ENABLED_attribute_FALSE gl_GNULIB_ENABLED_attribute_TRUE gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_FALSE gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_FALSE gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_FALSE gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE GL_COND_OBJ_WINDOWS_SPIN_FALSE GL_COND_OBJ_WINDOWS_SPIN_TRUE GL_COND_OBJ_WINDOWS_RWLOCK_FALSE GL_COND_OBJ_WINDOWS_RWLOCK_TRUE GL_COND_OBJ_WINDOWS_RECMUTEX_FALSE GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE GL_COND_OBJ_WINDOWS_ONCE_FALSE GL_COND_OBJ_WINDOWS_ONCE_TRUE GL_COND_OBJ_WINDOWS_MUTEX_FALSE GL_COND_OBJ_WINDOWS_MUTEX_TRUE HAVE_UNISTD_H NEXT_AS_FIRST_DIRECTIVE_UNISTD_H NEXT_UNISTD_H GL_GNULIB_MDA_TZSET GL_GNULIB_TZSET GL_GNULIB_TZNAME GL_GNULIB_TIME_RZ GL_GNULIB_TIME_R GL_GNULIB_TIMESPEC_GETRES GL_GNULIB_TIMESPEC_GET GL_GNULIB_TIMEGM GL_GNULIB_TIME GL_GNULIB_STRPTIME GL_GNULIB_STRFTIME GL_GNULIB_NANOSLEEP GL_GNULIB_LOCALTIME GL_GNULIB_MKTIME GL_GNULIB_CTIME TIME_H_DEFINES_TIME_UTC UNISTD_H_DEFINES_STRUCT_TIMESPEC PTHREAD_H_DEFINES_STRUCT_TIMESPEC SYS_TIME_H_DEFINES_STRUCT_TIMESPEC TIME_H_DEFINES_STRUCT_TIMESPEC NEXT_AS_FIRST_DIRECTIVE_TIME_H NEXT_TIME_H REPLACE_TZSET REPLACE_TIMESPEC_GETRES REPLACE_TIMESPEC_GET REPLACE_TIMEGM REPLACE_TIME REPLACE_STRFTIME REPLACE_NANOSLEEP REPLACE_MKTIME REPLACE_LOCALTIME_R REPLACE_LOCALTIME REPLACE_GMTIME REPLACE_CTIME HAVE_TIMEZONE_T HAVE_TIMESPEC_GETRES HAVE_TIMESPEC_GET HAVE_TIMEGM HAVE_STRPTIME HAVE_NANOSLEEP HAVE_DECL_LOCALTIME_R NEXT_AS_FIRST_DIRECTIVE_STRING_H NEXT_STRING_H GL_COND_OBJ_STRERROR_OVERRIDE_FALSE GL_COND_OBJ_STRERROR_OVERRIDE_TRUE GL_GNULIB_MDA_STRDUP GL_GNULIB_MDA_MEMCCPY GL_GNULIB_STRVERSCMP GL_GNULIB_STRSIGNAL GL_GNULIB_SIGDESCR_NP GL_GNULIB_SIGABBREV_NP GL_GNULIB_STRERRORNAME_NP GL_GNULIB_STRERROR_R GL_GNULIB_STRERROR GL_GNULIB_MBSTOK_R GL_GNULIB_MBSSEP GL_GNULIB_MBSSPN GL_GNULIB_MBSPBRK GL_GNULIB_MBSCSPN GL_GNULIB_MBSCASESTR GL_GNULIB_MBSPCASECMP GL_GNULIB_MBSNCASECMP GL_GNULIB_MBSCASECMP GL_GNULIB_MBSSTR GL_GNULIB_MBSRCHR GL_GNULIB_MBSCHR GL_GNULIB_MBSNLEN GL_GNULIB_MBSLEN GL_GNULIB_STRTOK_R GL_GNULIB_STRCASESTR GL_GNULIB_STRSTR GL_GNULIB_STRSEP GL_GNULIB_STRPBRK GL_GNULIB_STRNLEN GL_GNULIB_STRNDUP GL_GNULIB_STRNCAT GL_GNULIB_STRDUP GL_GNULIB_STRCHRNUL GL_GNULIB_STPNCPY GL_GNULIB_STPCPY GL_GNULIB_RAWMEMCHR GL_GNULIB_MEMSET_EXPLICIT GL_GNULIB_MEMRCHR GL_GNULIB_MEMPCPY GL_GNULIB_MEMMEM GL_GNULIB_MEMCHR GL_GNULIB_FFSLL GL_GNULIB_FFSL GL_GNULIB_EXPLICIT_BZERO GL_COND_OBJ_STRERROR_FALSE GL_COND_OBJ_STRERROR_TRUE UNDEFINE_STRTOK_R REPLACE_STRVERSCMP REPLACE_STRSIGNAL REPLACE_STRERRORNAME_NP REPLACE_STRERROR_R REPLACE_STRERROR REPLACE_STRTOK_R REPLACE_STRCASESTR REPLACE_STRSTR REPLACE_STRNLEN REPLACE_STRNDUP REPLACE_STRNCAT REPLACE_STRDUP REPLACE_STRCHRNUL REPLACE_STPNCPY REPLACE_STPCPY REPLACE_MEMSET_EXPLICIT REPLACE_MEMPCPY REPLACE_MEMMEM REPLACE_MEMCHR REPLACE_FFSLL HAVE_STRVERSCMP HAVE_DECL_STRSIGNAL HAVE_SIGDESCR_NP HAVE_SIGABBREV_NP HAVE_STRERRORNAME_NP HAVE_DECL_STRERROR_R HAVE_DECL_STRTOK_R HAVE_STRCASESTR HAVE_STRSEP HAVE_STRPBRK HAVE_DECL_STRNLEN HAVE_DECL_STRNDUP HAVE_DECL_STRDUP HAVE_STRCHRNUL HAVE_STPNCPY HAVE_STPCPY HAVE_RAWMEMCHR HAVE_DECL_MEMRCHR HAVE_MEMSET_EXPLICIT HAVE_MEMPCPY HAVE_DECL_MEMMEM HAVE_FFSLL HAVE_FFSL HAVE_EXPLICIT_BZERO HAVE_MBSLEN LOCALE_EN_UTF8 NEXT_AS_FIRST_DIRECTIVE_STDLIB_H NEXT_STDLIB_H GL_COND_OBJ_STDIO_WRITE_FALSE GL_COND_OBJ_STDIO_WRITE_TRUE GL_COND_OBJ_STDIO_READ_FALSE GL_COND_OBJ_STDIO_READ_TRUE GL_GNULIB_MDA_TEMPNAM GL_GNULIB_MDA_PUTW GL_GNULIB_MDA_GETW GL_GNULIB_MDA_FILENO GL_GNULIB_MDA_FDOPEN GL_GNULIB_MDA_FCLOSEALL GL_GNULIB_ZPRINTF GL_GNULIB_VZPRINTF GL_GNULIB_VSZPRINTF GL_GNULIB_VSPRINTF_POSIX GL_GNULIB_VSNZPRINTF GL_GNULIB_VSNPRINTF GL_GNULIB_VPRINTF_POSIX GL_GNULIB_VPRINTF GL_GNULIB_VFZPRINTF GL_GNULIB_VFPRINTF_POSIX GL_GNULIB_VFPRINTF GL_GNULIB_VDZPRINTF GL_GNULIB_VDPRINTF GL_GNULIB_VSCANF GL_GNULIB_VFSCANF GL_GNULIB_VASZPRINTF GL_GNULIB_VASPRINTF GL_GNULIB_TMPFILE GL_GNULIB_SZPRINTF GL_GNULIB_STDIO_H_SIGPIPE GL_GNULIB_STDIO_H_NONBLOCKING GL_GNULIB_SPRINTF_POSIX GL_GNULIB_SNZPRINTF GL_GNULIB_SNPRINTF GL_GNULIB_SCANF GL_GNULIB_RENAMEAT GL_GNULIB_RENAME GL_GNULIB_REMOVE GL_GNULIB_PUTS GL_GNULIB_PUTCHAR GL_GNULIB_PUTC GL_GNULIB_PRINTF_POSIX GL_GNULIB_PRINTF GL_GNULIB_POPEN GL_GNULIB_PERROR GL_GNULIB_PCLOSE GL_GNULIB_OBSTACK_ZPRINTF GL_GNULIB_OBSTACK_PRINTF_POSIX GL_GNULIB_OBSTACK_PRINTF GL_GNULIB_GETLINE GL_GNULIB_GETDELIM GL_GNULIB_GETCHAR GL_GNULIB_GETC GL_GNULIB_FZPRINTF GL_GNULIB_FWRITE GL_GNULIB_FTELLO GL_GNULIB_FTELL GL_GNULIB_FSEEKO GL_GNULIB_FSEEK GL_GNULIB_FSCANF GL_GNULIB_FREOPEN GL_GNULIB_FREAD GL_GNULIB_FPUTS GL_GNULIB_FPUTC GL_GNULIB_FPURGE GL_GNULIB_FPRINTF_POSIX GL_GNULIB_FPRINTF GL_GNULIB_FOPEN_GNU GL_GNULIB_FOPEN GL_GNULIB_FGETS GL_GNULIB_FGETC GL_GNULIB_FFLUSH GL_GNULIB_FDOPEN GL_GNULIB_FCLOSE GL_GNULIB_DZPRINTF GL_GNULIB_DPRINTF NEXT_AS_FIRST_DIRECTIVE_STDIO_H NEXT_STDIO_H REPLACE_VSPRINTF REPLACE_VSNPRINTF REPLACE_VPRINTF REPLACE_VFPRINTF REPLACE_VDPRINTF REPLACE_VASPRINTF REPLACE_TMPFILE REPLACE_STDIO_WRITE_FUNCS REPLACE_STDIO_READ_FUNCS REPLACE_SPRINTF REPLACE_SNPRINTF REPLACE_RENAMEAT REPLACE_RENAME REPLACE_REMOVE REPLACE_PRINTF REPLACE_POPEN REPLACE_PERROR REPLACE_OBSTACK_PRINTF REPLACE_GETLINE REPLACE_GETDELIM REPLACE_FTELLO REPLACE_FTELL REPLACE_FSEEKO REPLACE_FSEEK REPLACE_FREOPEN REPLACE_FPURGE REPLACE_FPRINTF REPLACE_FOPEN_FOR_FOPEN_GNU REPLACE_FOPEN REPLACE_FFLUSH REPLACE_FDOPEN REPLACE_FCLOSE REPLACE_DPRINTF HAVE_VDPRINTF HAVE_VASPRINTF HAVE_RENAMEAT HAVE_POPEN HAVE_PCLOSE HAVE_FTELLO HAVE_FSEEKO HAVE_DPRINTF HAVE_DECL_VSNPRINTF HAVE_DECL_SNPRINTF HAVE_DECL_PUTW HAVE_DECL_OBSTACK_PRINTF HAVE_DECL_GETW HAVE_DECL_GETLINE HAVE_DECL_GETDELIM HAVE_DECL_FTELLO HAVE_DECL_FSEEKO HAVE_DECL_FPURGE HAVE_DECL_FCLOSEALL GL_GENERATE_STDDEF_H_FALSE GL_GENERATE_STDDEF_H_TRUE STDDEF_H NEXT_AS_FIRST_DIRECTIVE_STDDEF_H NEXT_STDDEF_H HAVE_MAX_ALIGN_T REPLACE_NULL STDDEF_NOT_IDEMPOTENT NULLPTR_T_NEEDS_STDDEF GL_GENERATE_STDCKDINT_H_FALSE GL_GENERATE_STDCKDINT_H_TRUE STDCKDINT_H GL_COND_OBJ_STAT_FALSE GL_COND_OBJ_STAT_TRUE GL_COND_OBJ_SIGPROCMASK_FALSE GL_COND_OBJ_SIGPROCMASK_TRUE NEXT_AS_FIRST_DIRECTIVE_SIGNAL_H NEXT_SIGNAL_H GL_COND_OBJ_SIGACTION_FALSE GL_COND_OBJ_SIGACTION_TRUE GL_GNULIB_SCHED_YIELD HAVE_STRUCT_SCHED_PARAM HAVE_SCHED_H NEXT_AS_FIRST_DIRECTIVE_SCHED_H NEXT_SCHED_H HAVE_SYS_CDEFS_H REPLACE_SCHED_YIELD HAVE_SCHED_YIELD GL_COND_OBJ_RMDIR_FALSE GL_COND_OBJ_RMDIR_TRUE GL_GNULIB_SIGACTION GL_GNULIB_SIGPROCMASK GL_GNULIB_SIGNAL_H_SIGPIPE GL_GNULIB_SIG2STR GL_GNULIB_RAISE GL_GNULIB_PTHREAD_SIGMASK GL_COND_OBJ_RAISE_FALSE GL_COND_OBJ_RAISE_TRUE REPLACE_RAISE REPLACE_PTHREAD_SIGMASK HAVE_SIGHANDLER_T HAVE_TYPE_VOLATILE_SIG_ATOMIC_T HAVE_STRUCT_SIGACTION_SA_SIGACTION HAVE_STR2SIG HAVE_SIGACTION HAVE_SIGINFO_T HAVE_SIGSET_T HAVE_SIG2STR HAVE_RAISE HAVE_PTHREAD_SIGMASK HAVE_POSIX_SIGNALBLOCKING GL_COND_OBJ_PTHREAD_ONCE_FALSE GL_COND_OBJ_PTHREAD_ONCE_TRUE GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK GL_GNULIB_PTHREAD_SPIN GL_GNULIB_PTHREAD_TSS GL_GNULIB_PTHREAD_COND GL_GNULIB_PTHREAD_RWLOCK GL_GNULIB_PTHREAD_MUTEX GL_GNULIB_PTHREAD_ONCE GL_GNULIB_PTHREAD_THREAD LIB_PTHREAD HAVE_PTHREAD_H NEXT_AS_FIRST_DIRECTIVE_PTHREAD_H NEXT_PTHREAD_H REPLACE_PTHREAD_SPIN_DESTROY REPLACE_PTHREAD_SPIN_UNLOCK REPLACE_PTHREAD_SPIN_TRYLOCK REPLACE_PTHREAD_SPIN_LOCK REPLACE_PTHREAD_SPIN_INIT REPLACE_PTHREAD_KEY_DELETE REPLACE_PTHREAD_GETSPECIFIC REPLACE_PTHREAD_SETSPECIFIC REPLACE_PTHREAD_KEY_CREATE REPLACE_PTHREAD_COND_DESTROY REPLACE_PTHREAD_COND_BROADCAST REPLACE_PTHREAD_COND_SIGNAL REPLACE_PTHREAD_COND_TIMEDWAIT REPLACE_PTHREAD_COND_WAIT REPLACE_PTHREAD_CONDATTR_DESTROY REPLACE_PTHREAD_CONDATTR_INIT REPLACE_PTHREAD_COND_INIT REPLACE_PTHREAD_RWLOCK_DESTROY REPLACE_PTHREAD_RWLOCK_UNLOCK REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK REPLACE_PTHREAD_RWLOCK_TRYWRLOCK REPLACE_PTHREAD_RWLOCK_TRYRDLOCK REPLACE_PTHREAD_RWLOCK_WRLOCK REPLACE_PTHREAD_RWLOCK_RDLOCK REPLACE_PTHREAD_RWLOCKATTR_DESTROY REPLACE_PTHREAD_RWLOCKATTR_INIT REPLACE_PTHREAD_RWLOCK_INIT REPLACE_PTHREAD_MUTEX_DESTROY REPLACE_PTHREAD_MUTEX_UNLOCK REPLACE_PTHREAD_MUTEX_TIMEDLOCK REPLACE_PTHREAD_MUTEX_TRYLOCK REPLACE_PTHREAD_MUTEX_LOCK REPLACE_PTHREAD_MUTEXATTR_DESTROY REPLACE_PTHREAD_MUTEXATTR_SETROBUST REPLACE_PTHREAD_MUTEXATTR_GETROBUST REPLACE_PTHREAD_MUTEXATTR_SETTYPE REPLACE_PTHREAD_MUTEXATTR_GETTYPE REPLACE_PTHREAD_MUTEXATTR_INIT REPLACE_PTHREAD_MUTEX_INIT REPLACE_PTHREAD_ONCE REPLACE_PTHREAD_EXIT REPLACE_PTHREAD_JOIN REPLACE_PTHREAD_DETACH REPLACE_PTHREAD_EQUAL REPLACE_PTHREAD_SELF REPLACE_PTHREAD_ATTR_DESTROY REPLACE_PTHREAD_ATTR_SETDETACHSTATE REPLACE_PTHREAD_ATTR_GETDETACHSTATE REPLACE_PTHREAD_ATTR_INIT REPLACE_PTHREAD_CREATE HAVE_PTHREAD_SPIN_DESTROY HAVE_PTHREAD_SPIN_UNLOCK HAVE_PTHREAD_SPIN_TRYLOCK HAVE_PTHREAD_SPIN_LOCK HAVE_PTHREAD_SPIN_INIT HAVE_PTHREAD_KEY_DELETE HAVE_PTHREAD_GETSPECIFIC HAVE_PTHREAD_SETSPECIFIC HAVE_PTHREAD_KEY_CREATE HAVE_PTHREAD_COND_DESTROY HAVE_PTHREAD_COND_BROADCAST HAVE_PTHREAD_COND_SIGNAL HAVE_PTHREAD_COND_TIMEDWAIT HAVE_PTHREAD_COND_WAIT HAVE_PTHREAD_CONDATTR_DESTROY HAVE_PTHREAD_CONDATTR_INIT HAVE_PTHREAD_COND_INIT HAVE_PTHREAD_RWLOCK_DESTROY HAVE_PTHREAD_RWLOCK_UNLOCK HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK HAVE_PTHREAD_RWLOCK_TRYWRLOCK HAVE_PTHREAD_RWLOCK_TRYRDLOCK HAVE_PTHREAD_RWLOCK_WRLOCK HAVE_PTHREAD_RWLOCK_RDLOCK HAVE_PTHREAD_RWLOCKATTR_DESTROY HAVE_PTHREAD_RWLOCKATTR_INIT HAVE_PTHREAD_RWLOCK_INIT HAVE_PTHREAD_MUTEX_DESTROY HAVE_PTHREAD_MUTEX_UNLOCK HAVE_PTHREAD_MUTEX_TIMEDLOCK HAVE_PTHREAD_MUTEX_TRYLOCK HAVE_PTHREAD_MUTEX_LOCK HAVE_PTHREAD_MUTEXATTR_DESTROY HAVE_PTHREAD_MUTEXATTR_SETROBUST HAVE_PTHREAD_MUTEXATTR_GETROBUST HAVE_PTHREAD_MUTEXATTR_SETTYPE HAVE_PTHREAD_MUTEXATTR_GETTYPE HAVE_PTHREAD_MUTEXATTR_INIT HAVE_PTHREAD_MUTEX_INIT HAVE_PTHREAD_ONCE HAVE_PTHREAD_EXIT HAVE_PTHREAD_JOIN HAVE_PTHREAD_DETACH HAVE_PTHREAD_EQUAL HAVE_PTHREAD_SELF HAVE_PTHREAD_ATTR_DESTROY HAVE_PTHREAD_ATTR_SETDETACHSTATE HAVE_PTHREAD_ATTR_GETDETACHSTATE HAVE_PTHREAD_ATTR_INIT HAVE_PTHREAD_CREATE HAVE_PTHREAD_PROCESS_SHARED HAVE_PTHREAD_MUTEX_ROBUST HAVE_PTHREAD_MUTEX_RECURSIVE HAVE_PTHREAD_CREATE_DETACHED HAVE_PTHREAD_SPINLOCK_T HAVE_PTHREAD_T GL_COND_OBJ_OPEN_FALSE GL_COND_OBJ_OPEN_TRUE GL_COND_OBJ_MSVC_NOTHROW_FALSE GL_COND_OBJ_MSVC_NOTHROW_TRUE GL_COND_OBJ_MSVC_INVAL_FALSE GL_COND_OBJ_MSVC_INVAL_TRUE GL_GENERATE_MNTENT_H_FALSE GL_GENERATE_MNTENT_H_TRUE MNTENT_H NEXT_AS_FIRST_DIRECTIVE_MNTENT_H NEXT_MNTENT_H GL_GNULIB_HASMNTOPT GL_COND_OBJ_HASMNTOPT_FALSE GL_COND_OBJ_HASMNTOPT_TRUE REPLACE_HASMNTOPT HAVE_SETMNTENT HAVE_HASMNTOPT LTLIBINTL LIBINTL GL_GNULIB_MDA_PUTENV GL_GNULIB_MDA_MKTEMP GL_GNULIB_MDA_GCVT GL_GNULIB_MDA_FCVT GL_GNULIB_MDA_ECVT GL_GNULIB_WCTOMB GL_GNULIB_UNSETENV GL_GNULIB_UNLOCKPT GL_GNULIB_SYSTEM_POSIX GL_GNULIB_STRTOULL GL_GNULIB_STRTOUL GL_GNULIB_STRTOLL GL_GNULIB_STRTOLD GL_GNULIB_STRTOL GL_GNULIB_STRTOF GL_GNULIB_STRTOD GL_GNULIB_STACK_TRACE GL_GNULIB_SETENV GL_GNULIB_SECURE_GETENV GL_GNULIB_RPMATCH GL_GNULIB_REALPATH GL_GNULIB_REALLOC_POSIX GL_GNULIB_REALLOC_GNU GL_GNULIB_REALLOCARRAY GL_GNULIB_RANDOM_R GL_GNULIB_RANDOM GL_GNULIB_RAND GL_GNULIB_QSORT_R GL_GNULIB_PUTENV GL_GNULIB_PTSNAME_R GL_GNULIB_PTSNAME GL_GNULIB_POSIX_OPENPT GL_GNULIB_POSIX_MEMALIGN GL_GNULIB_MKSTEMPS GL_GNULIB_MKSTEMP GL_GNULIB_MKOSTEMPS GL_GNULIB_MKOSTEMP GL_GNULIB_MKDTEMP GL_GNULIB_MBTOWC GL_GNULIB_MBSTOWCS GL_GNULIB_MALLOC_POSIX GL_GNULIB_MALLOC_GNU GL_GNULIB_GRANTPT GL_GNULIB_GETSUBOPT GL_GNULIB_GETPROGNAME GL_GNULIB_GETLOADAVG GL_GNULIB_FREE_POSIX GL_GNULIB_CANONICALIZE_FILE_NAME GL_GNULIB_CALLOC_POSIX GL_GNULIB_CALLOC_GNU GL_GNULIB_ATOLL GL_GNULIB_ALIGNED_ALLOC GL_GNULIB_ABORT_DEBUG GL_GNULIB__EXIT GL_COND_OBJ_GETPROGNAME_FALSE GL_COND_OBJ_GETPROGNAME_TRUE CAN_PRINT_STACK_TRACE REPLACE_WCTOMB REPLACE_UNSETENV REPLACE_STRTOULL REPLACE_STRTOUL REPLACE_STRTOLL REPLACE_STRTOLD REPLACE_STRTOL REPLACE_STRTOF REPLACE_STRTOD REPLACE_SETSTATE REPLACE_SETENV REPLACE_REALPATH REPLACE_REALLOCARRAY REPLACE_REALLOC_FOR_REALLOC_POSIX REPLACE_REALLOC_FOR_REALLOC_GNU REPLACE_RANDOM_R REPLACE_RANDOM REPLACE_RAND REPLACE_QSORT_R REPLACE_PUTENV REPLACE_PTSNAME_R REPLACE_PTSNAME REPLACE_POSIX_OPENPT REPLACE_POSIX_MEMALIGN REPLACE_MKSTEMP REPLACE_MKOSTEMPS REPLACE_MKOSTEMP REPLACE_MBTOWC REPLACE_MBSTOWCS REPLACE_MB_CUR_MAX REPLACE_MALLOC_FOR_MALLOC_POSIX REPLACE_MALLOC_FOR_MALLOC_GNU REPLACE_INITSTATE REPLACE_GETSUBOPT REPLACE_GETPROGNAME REPLACE_GETLOADAVG REPLACE_FREE REPLACE_CANONICALIZE_FILE_NAME REPLACE_CALLOC_FOR_CALLOC_POSIX REPLACE_CALLOC_FOR_CALLOC_GNU REPLACE_ALIGNED_ALLOC REPLACE_ABORT REPLACE__EXIT HAVE_DECL_UNSETENV HAVE_UNLOCKPT HAVE_SYS_LOADAVG_H HAVE_STRUCT_RANDOM_DATA HAVE_STRTOULL HAVE_STRTOUL HAVE_STRTOLL HAVE_STRTOLD HAVE_STRTOL HAVE_STRTOF HAVE_STRTOD HAVE_DECL_SETSTATE HAVE_SETSTATE HAVE_DECL_SETENV HAVE_SETENV HAVE_SECURE_GETENV HAVE_RPMATCH HAVE_REALPATH HAVE_REALLOCARRAY HAVE_RANDOM_R HAVE_RANDOM_H HAVE_RANDOM HAVE_QSORT_R HAVE_PTSNAME_R HAVE_PTSNAME HAVE_POSIX_OPENPT HAVE_POSIX_MEMALIGN HAVE_MKSTEMPS HAVE_MKSTEMP HAVE_MKOSTEMPS HAVE_MKOSTEMP HAVE_MKDTEMP HAVE_MBTOWC HAVE_DECL_INITSTATE HAVE_INITSTATE HAVE_GRANTPT HAVE_GETSUBOPT HAVE_GETPROGNAME HAVE_DECL_PROGRAM_INVOCATION_NAME HAVE_DECL_GETLOADAVG HAVE_DECL_GCVT HAVE_DECL_FCVT HAVE_DECL_ECVT HAVE_CANONICALIZE_FILE_NAME HAVE_ATOLL HAVE_ALIGNED_ALLOC HAVE__EXIT GL_COND_OBJ_GETPAGESIZE_FALSE GL_COND_OBJ_GETPAGESIZE_TRUE GL_COND_OBJ_GETDTABLESIZE_FALSE GL_COND_OBJ_GETDTABLESIZE_TRUE GL_GNULIB_MDA_UMASK GL_GNULIB_MDA_MKDIR GL_GNULIB_MDA_CHMOD GL_GNULIB_OVERRIDES_STRUCT_STAT GL_GNULIB_UTIMENSAT GL_GNULIB_STAT GL_GNULIB_MKNODAT GL_GNULIB_MKNOD GL_GNULIB_MKFIFOAT GL_GNULIB_MKFIFO GL_GNULIB_MKDIRAT GL_GNULIB_MKDIR GL_GNULIB_LSTAT GL_GNULIB_LCHMOD GL_GNULIB_GETUMASK GL_GNULIB_FUTIMENS GL_GNULIB_FSTATAT GL_GNULIB_FSTAT GL_GNULIB_FCHMODAT GL_GNULIB_CHMOD WINDOWS_64_BIT_ST_SIZE WINDOWS_STAT_TIMESPEC NEXT_AS_FIRST_DIRECTIVE_SYS_STAT_H NEXT_SYS_STAT_H GL_COND_OBJ_FSTAT_FALSE GL_COND_OBJ_FSTAT_TRUE REPLACE_UTIMENSAT REPLACE_STAT REPLACE_MKNODAT REPLACE_MKNOD REPLACE_MKFIFOAT REPLACE_MKFIFO REPLACE_MKDIR REPLACE_LSTAT REPLACE_FUTIMENS REPLACE_FSTATAT REPLACE_FSTAT REPLACE_FCHMODAT REPLACE_CHMOD HAVE_UTIMENSAT HAVE_MKNODAT HAVE_MKNOD HAVE_MKFIFOAT HAVE_MKFIFO HAVE_MKDIRAT HAVE_LSTAT HAVE_LCHMOD HAVE_GETUMASK HAVE_FUTIMENS HAVE_FSTATAT HAVE_FCHMODAT NEXT_AS_FIRST_DIRECTIVE_FCNTL_H NEXT_FCNTL_H GL_GNULIB_MDA_OPEN GL_GNULIB_MDA_CREAT GL_GNULIB_OPENAT GL_GNULIB_OPEN GL_GNULIB_NONBLOCKING GL_GNULIB_FCNTL GL_GNULIB_CREAT GL_COND_OBJ_FCNTL_FALSE GL_COND_OBJ_FCNTL_TRUE REPLACE_OPENAT REPLACE_OPEN REPLACE_FCNTL REPLACE_CREAT HAVE_OPENAT HAVE_FCNTL GL_COND_OBJ_ERROR_FALSE GL_COND_OBJ_ERROR_TRUE REPLACE_ERROR_AT_LINE REPLACE_ERROR HAVE_ERROR_AT_LINE HAVE_ERROR HAVE_ERROR_H NEXT_AS_FIRST_DIRECTIVE_ERROR_H NEXT_ERROR_H GL_GENERATE_ERRNO_H_FALSE GL_GENERATE_ERRNO_H_TRUE ERRNO_H EOVERFLOW_VALUE EOVERFLOW_HIDDEN ENOLINK_VALUE ENOLINK_HIDDEN EMULTIHOP_VALUE EMULTIHOP_HIDDEN NEXT_AS_FIRST_DIRECTIVE_ERRNO_H NEXT_ERRNO_H GL_COND_OBJ_DUP2_FALSE GL_COND_OBJ_DUP2_TRUE GL_GNULIB_MDA_WRITE GL_GNULIB_MDA_UNLINK GL_GNULIB_MDA_SWAB GL_GNULIB_MDA_RMDIR GL_GNULIB_MDA_READ GL_GNULIB_MDA_LSEEK GL_GNULIB_MDA_ISATTY GL_GNULIB_MDA_GETPID GL_GNULIB_MDA_GETCWD GL_GNULIB_MDA_EXECVPE GL_GNULIB_MDA_EXECVP GL_GNULIB_MDA_EXECVE GL_GNULIB_MDA_EXECV GL_GNULIB_MDA_EXECLP GL_GNULIB_MDA_EXECLE GL_GNULIB_MDA_EXECL GL_GNULIB_MDA_DUP2 GL_GNULIB_MDA_DUP GL_GNULIB_MDA_CLOSE GL_GNULIB_MDA_CHDIR GL_GNULIB_MDA_ACCESS GL_GNULIB_WRITE GL_GNULIB_USLEEP GL_GNULIB_UNLINKAT GL_GNULIB_UNLINK GL_GNULIB_UNISTD_H_SIGPIPE GL_GNULIB_UNISTD_H_NONBLOCKING GL_GNULIB_UNISTD_H_GETOPT GL_GNULIB_TTYNAME_R GL_GNULIB_TRUNCATE GL_GNULIB_SYMLINKAT GL_GNULIB_SYMLINK GL_GNULIB_SLEEP GL_GNULIB_SETHOSTNAME GL_GNULIB_RMDIR GL_GNULIB_READLINKAT GL_GNULIB_READLINK GL_GNULIB_READ GL_GNULIB_PWRITE GL_GNULIB_PREAD GL_GNULIB_PIPE2 GL_GNULIB_PIPE GL_GNULIB_LSEEK GL_GNULIB_LINKAT GL_GNULIB_LINK GL_GNULIB_LCHOWN GL_GNULIB_ISATTY GL_GNULIB_GROUP_MEMBER GL_GNULIB_GETUSERSHELL GL_GNULIB_GETPASS_GNU GL_GNULIB_GETPASS GL_GNULIB_GETPAGESIZE GL_GNULIB_GETOPT_POSIX GL_GNULIB_GETLOGIN_R GL_GNULIB_GETLOGIN GL_GNULIB_GETHOSTNAME GL_GNULIB_GETGROUPS GL_GNULIB_GETENTROPY GL_GNULIB_GETDTABLESIZE GL_GNULIB_GETDOMAINNAME GL_GNULIB_GETCWD GL_GNULIB_FTRUNCATE GL_GNULIB_FSYNC GL_GNULIB_FDATASYNC GL_GNULIB_FCHOWNAT GL_GNULIB_FCHDIR GL_GNULIB_FACCESSAT GL_GNULIB_EXECVPE GL_GNULIB_EXECVP GL_GNULIB_EXECVE GL_GNULIB_EXECV GL_GNULIB_EXECLP GL_GNULIB_EXECLE GL_GNULIB_EXECL GL_GNULIB_EUIDACCESS GL_GNULIB_ENVIRON GL_GNULIB_DUP3 GL_GNULIB_DUP2 GL_GNULIB_DUP GL_GNULIB_COPY_FILE_RANGE GL_GNULIB_CLOSE GL_GNULIB_CHOWN GL_GNULIB_CHDIR GL_GNULIB_ACCESS GL_COND_OBJ_CLOSE_FALSE GL_COND_OBJ_CLOSE_TRUE HAVE_WINSOCK2_H HAVE_MSVC_INVALID_PARAMETER_HANDLER UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS UNISTD_H_HAVE_WINSOCK2_H UNISTD_H_HAVE_SYS_RANDOM_H REPLACE_WRITE REPLACE_USLEEP REPLACE_UNLINKAT REPLACE_UNLINK REPLACE_TTYNAME_R REPLACE_TRUNCATE REPLACE_SYMLINKAT REPLACE_SYMLINK REPLACE_SLEEP REPLACE_SETHOSTNAME REPLACE_RMDIR REPLACE_READLINKAT REPLACE_READLINK REPLACE_READ REPLACE_PWRITE REPLACE_PREAD REPLACE_PIPE2 REPLACE_LSEEK REPLACE_LINKAT REPLACE_LINK REPLACE_LCHOWN REPLACE_ISATTY REPLACE_GETUSERSHELL REPLACE_GETPASS_FOR_GETPASS_GNU REPLACE_GETPASS REPLACE_GETPAGESIZE REPLACE_GETGROUPS REPLACE_GETLOGIN_R REPLACE_GETENTROPY REPLACE_GETDTABLESIZE REPLACE_GETDOMAINNAME REPLACE_GETCWD REPLACE_FTRUNCATE REPLACE_FDATASYNC REPLACE_FCHOWNAT REPLACE_FCHDIR REPLACE_FACCESSAT REPLACE_EXECVPE REPLACE_EXECVP REPLACE_EXECVE REPLACE_EXECV REPLACE_EXECLP REPLACE_EXECLE REPLACE_EXECL REPLACE_DUP3 REPLACE_DUP2 REPLACE_DUP REPLACE_COPY_FILE_RANGE REPLACE_CLOSE REPLACE_CHOWN REPLACE_ACCESS HAVE_SYS_PARAM_H HAVE_OS_H HAVE_DECL_TTYNAME_R HAVE_DECL_TRUNCATE HAVE_DECL_SETHOSTNAME HAVE_DECL_GETUSERSHELL HAVE_DECL_GETPAGESIZE HAVE_DECL_GETLOGIN_R HAVE_DECL_GETLOGIN HAVE_DECL_GETDOMAINNAME HAVE_DECL_FDATASYNC HAVE_DECL_FCHDIR HAVE_DECL_EXECVPE HAVE_DECL_ENVIRON HAVE_USLEEP HAVE_UNLINKAT HAVE_SYMLINKAT HAVE_SYMLINK HAVE_SLEEP HAVE_SETHOSTNAME HAVE_READLINKAT HAVE_READLINK HAVE_PWRITE HAVE_PREAD HAVE_PIPE2 HAVE_PIPE HAVE_LINKAT HAVE_LINK HAVE_LCHOWN HAVE_GROUP_MEMBER HAVE_GETPASS HAVE_GETPAGESIZE HAVE_GETLOGIN HAVE_GETHOSTNAME HAVE_GETGROUPS HAVE_GETENTROPY HAVE_GETDTABLESIZE HAVE_FTRUNCATE HAVE_FSYNC HAVE_FDATASYNC HAVE_FCHOWNAT HAVE_FCHDIR HAVE_FACCESSAT HAVE_EXECVPE HAVE_EUIDACCESS HAVE_DUP3 HAVE_COPY_FILE_RANGE HAVE_CHOWN GL_GENERATE_ASSERT_H_FALSE GL_GENERATE_ASSERT_H_TRUE ASSERT_H NEXT_AS_FIRST_DIRECTIVE_ASSERT_H NEXT_ASSERT_H GL_GENERATE_ALLOCA_H_FALSE GL_GENERATE_ALLOCA_H_TRUE ALLOCA_H HAVE_ALLOCA_H ALLOCA WINDOWS_STAT_INODES HAVE_OFF64_T WINDOWS_64_BIT_OFF_T NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H NEXT_SYS_TYPES_H GL_GENERATE_STDNORETURN_H_FALSE GL_GENERATE_STDNORETURN_H_TRUE STDNORETURN_H GL_GENERATE_STDINT_H_FALSE GL_GENERATE_STDINT_H_TRUE STDINT_H HAVE_SYS_INTTYPES_H HAVE_SYS_BITYPES_H HAVE_C99_STDINT_H WINT_T_SUFFIX WCHAR_T_SUFFIX SIG_ATOMIC_T_SUFFIX SIZE_T_SUFFIX PTRDIFF_T_SUFFIX HAVE_SIGNED_WINT_T HAVE_SIGNED_WCHAR_T HAVE_SIGNED_SIG_ATOMIC_T BITSIZEOF_WINT_T BITSIZEOF_WCHAR_T BITSIZEOF_SIG_ATOMIC_T BITSIZEOF_SIZE_T BITSIZEOF_PTRDIFF_T HAVE_STDINT_H NEXT_AS_FIRST_DIRECTIVE_STDINT_H NEXT_STDINT_H HAVE_SYS_TYPES_H HAVE_INTTYPES_H HAVE_WCHAR_H GNULIBHEADERS_OVERRIDE_WINT_T APPLE_UNIVERSAL_BUILD LTLIBMULTITHREAD LIBMULTITHREAD LTLIBTHREAD LIBTHREAD LIBSTDTHREAD LIB_SCHED_YIELD SCHED_YIELD_LIB LIBPMULTITHREAD LIBPTHREAD GL_GENERATE_LIMITS_H_FALSE GL_GENERATE_LIMITS_H_TRUE LIMITS_H NEXT_AS_FIRST_DIRECTIVE_LIMITS_H NEXT_LIMITS_H PRAGMA_COLUMNS PRAGMA_SYSTEM_HEADER INCLUDE_NEXT_AS_FIRST_DIRECTIVE INCLUDE_NEXT GL_COND_LIBTOOL_FALSE GL_COND_LIBTOOL_TRUE DISABLE_TYPE_BASED_ALIASING WORKAROUND_BUG_81653 CPU_OBJECTS CXXCPP LT_SYS_LIBRARY_PATH OTOOL64 OTOOL LIPO NMEDIT DSYMUTIL MANIFEST_TOOL ac_ct_AR FILECMD LN_S NM ac_ct_DUMPBIN DUMPBIN LD FGREP SED LIBTOOL OBJDUMP DLLTOOL AS ENDIANNESS HOST_CPU_C_ABI HOST_CPU host_os host_vendor host_cpu host build_os build_vendor build_cpu build LN IFNOT_MSVC IF_MSVC RANLIB ARFLAGS AR IF_CXX am__fastdepCXX_FALSE am__fastdepCXX_TRUE CXXDEPMODE ANSICXX_FALSE ANSICXX_TRUE CXXFLAGS ac_ct_CXX CXX CXX_CHOICE AS_UNDERSCORE ASM_SYMBOL_PREFIX EGREP GREP GCC_X_NONE CC_GCC CPP am__fastdepCC_FALSE am__fastdepCC_TRUE CCDEPMODE am__nodep AMDEPBACKSLASH AMDEP_FALSE AMDEP_TRUE am__include DEPDIR OBJEXT EXEEXT ac_ct_CC CPPFLAGS LDFLAGS CFLAGS CC am__xargs_n am__rm_f_notfound AM_BACKSLASH AM_DEFAULT_VERBOSITY AM_DEFAULT_V AM_V CSCOPE ETAGS CTAGS am__untar am__tar AMTAR am__leading_dot SET_MAKE AWK mkdir_p MKDIR_P INSTALL_STRIP_PROGRAM STRIP install_sh MAKEINFO AUTOHEADER AUTOMAKE AUTOCONF ACLOCAL VERSION PACKAGE CYGPATH_W am__isrc INSTALL_DATA INSTALL_SCRIPT INSTALL_PROGRAM target_alias host_alias build_alias LIBS ECHO_T ECHO_N ECHO_C DEFS mandir localedir libdir psdir pdfdir dvidir htmldir infodir docdir oldincludedir includedir runstatedir localstatedir sharedstatedir sysconfdir datadir datarootdir libexecdir sbindir bindir program_transform_name prefix exec_prefix PACKAGE_URL PACKAGE_BUGREPORT PACKAGE_STRING PACKAGE_VERSION PACKAGE_TARNAME PACKAGE_NAME PATH_SEPARATOR SHELL am__quote' ac_subst_files='' ac_user_opts=' enable_option_checking enable_silent_rules enable_dependency_tracking enable_c__ enable_largefile enable_threads enable_shared enable_static with_pic enable_fast_install with_aix_soname with_gnu_ld with_sysroot enable_libtool_lock enable_cross_guesses enable_year2038 ' ac_precious_vars='build_alias host_alias target_alias CC CFLAGS LDFLAGS LIBS CPPFLAGS CPP CXX CXXFLAGS LT_SYS_LIBRARY_PATH CXXCPP' # Initialize some variables set by options. ac_init_help= ac_init_version=false ac_unrecognized_opts= ac_unrecognized_sep= # The variables have the same names as the options, with # dashes changed to underlines. cache_file=/dev/null exec_prefix=NONE no_create= no_recursion= prefix=NONE program_prefix=NONE program_suffix=NONE program_transform_name=s,x,x, silent= site= srcdir= verbose= x_includes=NONE x_libraries=NONE # Installation directory options. # These are left unexpanded so users can "make install exec_prefix=/foo" # and all the variables that are supposed to be based on exec_prefix # by default will actually change. # Use braces instead of parens because sh, perl, etc. also accept them. # (The list follows the same order as the GNU Coding Standards.) bindir='${exec_prefix}/bin' sbindir='${exec_prefix}/sbin' libexecdir='${exec_prefix}/libexec' datarootdir='${prefix}/share' datadir='${datarootdir}' sysconfdir='${prefix}/etc' sharedstatedir='${prefix}/com' localstatedir='${prefix}/var' runstatedir='${localstatedir}/run' includedir='${prefix}/include' oldincludedir='/usr/include' docdir='${datarootdir}/doc/${PACKAGE_TARNAME}' infodir='${datarootdir}/info' htmldir='${docdir}' dvidir='${docdir}' pdfdir='${docdir}' psdir='${docdir}' libdir='${exec_prefix}/lib' localedir='${datarootdir}/locale' mandir='${datarootdir}/man' ac_prev= ac_dashdash= for ac_option do # If the previous option needs an argument, assign it. if test -n "$ac_prev"; then eval $ac_prev=\$ac_option ac_prev= continue fi case $ac_option in *=?*) ac_optarg=`expr "X$ac_option" : '[^=]*=\(.*\)'` ;; *=) ac_optarg= ;; *) ac_optarg=yes ;; esac case $ac_dashdash$ac_option in --) ac_dashdash=yes ;; -bindir | --bindir | --bindi | --bind | --bin | --bi) ac_prev=bindir ;; -bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*) bindir=$ac_optarg ;; -build | --build | --buil | --bui | --bu) ac_prev=build_alias ;; -build=* | --build=* | --buil=* | --bui=* | --bu=*) build_alias=$ac_optarg ;; -cache-file | --cache-file | --cache-fil | --cache-fi \ | --cache-f | --cache- | --cache | --cach | --cac | --ca | --c) ac_prev=cache_file ;; -cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \ | --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*) cache_file=$ac_optarg ;; --config-cache | -C) cache_file=config.cache ;; -datadir | --datadir | --datadi | --datad) ac_prev=datadir ;; -datadir=* | --datadir=* | --datadi=* | --datad=*) datadir=$ac_optarg ;; -datarootdir | --datarootdir | --datarootdi | --datarootd | --dataroot \ | --dataroo | --dataro | --datar) ac_prev=datarootdir ;; -datarootdir=* | --datarootdir=* | --datarootdi=* | --datarootd=* \ | --dataroot=* | --dataroo=* | --dataro=* | --datar=*) datarootdir=$ac_optarg ;; -disable-* | --disable-*) ac_useropt=`expr "x$ac_option" : 'x-*disable-\(.*\)'` # Reject names that are not valid shell variable names. expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && as_fn_error $? "invalid feature name: '$ac_useropt'" ac_useropt_orig=$ac_useropt ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` case $ac_user_opts in *" "enable_$ac_useropt" "*) ;; *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--disable-$ac_useropt_orig" ac_unrecognized_sep=', ';; esac eval enable_$ac_useropt=no ;; -docdir | --docdir | --docdi | --doc | --do) ac_prev=docdir ;; -docdir=* | --docdir=* | --docdi=* | --doc=* | --do=*) docdir=$ac_optarg ;; -dvidir | --dvidir | --dvidi | --dvid | --dvi | --dv) ac_prev=dvidir ;; -dvidir=* | --dvidir=* | --dvidi=* | --dvid=* | --dvi=* | --dv=*) dvidir=$ac_optarg ;; -enable-* | --enable-*) ac_useropt=`expr "x$ac_option" : 'x-*enable-\([^=]*\)'` # Reject names that are not valid shell variable names. expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && as_fn_error $? "invalid feature name: '$ac_useropt'" ac_useropt_orig=$ac_useropt ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` case $ac_user_opts in *" "enable_$ac_useropt" "*) ;; *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--enable-$ac_useropt_orig" ac_unrecognized_sep=', ';; esac eval enable_$ac_useropt=\$ac_optarg ;; -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \ | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \ | --exec | --exe | --ex) ac_prev=exec_prefix ;; -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \ | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \ | --exec=* | --exe=* | --ex=*) exec_prefix=$ac_optarg ;; -gas | --gas | --ga | --g) # Obsolete; use --with-gas. with_gas=yes ;; -help | --help | --hel | --he | -h) ac_init_help=long ;; -help=r* | --help=r* | --hel=r* | --he=r* | -hr*) ac_init_help=recursive ;; -help=s* | --help=s* | --hel=s* | --he=s* | -hs*) ac_init_help=short ;; -host | --host | --hos | --ho) ac_prev=host_alias ;; -host=* | --host=* | --hos=* | --ho=*) host_alias=$ac_optarg ;; -htmldir | --htmldir | --htmldi | --htmld | --html | --htm | --ht) ac_prev=htmldir ;; -htmldir=* | --htmldir=* | --htmldi=* | --htmld=* | --html=* | --htm=* \ | --ht=*) htmldir=$ac_optarg ;; -includedir | --includedir | --includedi | --included | --include \ | --includ | --inclu | --incl | --inc) ac_prev=includedir ;; -includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \ | --includ=* | --inclu=* | --incl=* | --inc=*) includedir=$ac_optarg ;; -infodir | --infodir | --infodi | --infod | --info | --inf) ac_prev=infodir ;; -infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*) infodir=$ac_optarg ;; -libdir | --libdir | --libdi | --libd) ac_prev=libdir ;; -libdir=* | --libdir=* | --libdi=* | --libd=*) libdir=$ac_optarg ;; -libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \ | --libexe | --libex | --libe) ac_prev=libexecdir ;; -libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \ | --libexe=* | --libex=* | --libe=*) libexecdir=$ac_optarg ;; -localedir | --localedir | --localedi | --localed | --locale) ac_prev=localedir ;; -localedir=* | --localedir=* | --localedi=* | --localed=* | --locale=*) localedir=$ac_optarg ;; -localstatedir | --localstatedir | --localstatedi | --localstated \ | --localstate | --localstat | --localsta | --localst | --locals) ac_prev=localstatedir ;; -localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \ | --localstate=* | --localstat=* | --localsta=* | --localst=* | --locals=*) localstatedir=$ac_optarg ;; -mandir | --mandir | --mandi | --mand | --man | --ma | --m) ac_prev=mandir ;; -mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*) mandir=$ac_optarg ;; -nfp | --nfp | --nf) # Obsolete; use --without-fp. with_fp=no ;; -no-create | --no-create | --no-creat | --no-crea | --no-cre \ | --no-cr | --no-c | -n) no_create=yes ;; -no-recursion | --no-recursion | --no-recursio | --no-recursi \ | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) no_recursion=yes ;; -oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \ | --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \ | --oldin | --oldi | --old | --ol | --o) ac_prev=oldincludedir ;; -oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \ | --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \ | --oldin=* | --oldi=* | --old=* | --ol=* | --o=*) oldincludedir=$ac_optarg ;; -prefix | --prefix | --prefi | --pref | --pre | --pr | --p) ac_prev=prefix ;; -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*) prefix=$ac_optarg ;; -program-prefix | --program-prefix | --program-prefi | --program-pref \ | --program-pre | --program-pr | --program-p) ac_prev=program_prefix ;; -program-prefix=* | --program-prefix=* | --program-prefi=* \ | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*) program_prefix=$ac_optarg ;; -program-suffix | --program-suffix | --program-suffi | --program-suff \ | --program-suf | --program-su | --program-s) ac_prev=program_suffix ;; -program-suffix=* | --program-suffix=* | --program-suffi=* \ | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*) program_suffix=$ac_optarg ;; -program-transform-name | --program-transform-name \ | --program-transform-nam | --program-transform-na \ | --program-transform-n | --program-transform- \ | --program-transform | --program-transfor \ | --program-transfo | --program-transf \ | --program-trans | --program-tran \ | --progr-tra | --program-tr | --program-t) ac_prev=program_transform_name ;; -program-transform-name=* | --program-transform-name=* \ | --program-transform-nam=* | --program-transform-na=* \ | --program-transform-n=* | --program-transform-=* \ | --program-transform=* | --program-transfor=* \ | --program-transfo=* | --program-transf=* \ | --program-trans=* | --program-tran=* \ | --progr-tra=* | --program-tr=* | --program-t=*) program_transform_name=$ac_optarg ;; -pdfdir | --pdfdir | --pdfdi | --pdfd | --pdf | --pd) ac_prev=pdfdir ;; -pdfdir=* | --pdfdir=* | --pdfdi=* | --pdfd=* | --pdf=* | --pd=*) pdfdir=$ac_optarg ;; -psdir | --psdir | --psdi | --psd | --ps) ac_prev=psdir ;; -psdir=* | --psdir=* | --psdi=* | --psd=* | --ps=*) psdir=$ac_optarg ;; -q | -quiet | --quiet | --quie | --qui | --qu | --q \ | -silent | --silent | --silen | --sile | --sil) silent=yes ;; -runstatedir | --runstatedir | --runstatedi | --runstated \ | --runstate | --runstat | --runsta | --runst | --runs \ | --run | --ru | --r) ac_prev=runstatedir ;; -runstatedir=* | --runstatedir=* | --runstatedi=* | --runstated=* \ | --runstate=* | --runstat=* | --runsta=* | --runst=* | --runs=* \ | --run=* | --ru=* | --r=*) runstatedir=$ac_optarg ;; -sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb) ac_prev=sbindir ;; -sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \ | --sbi=* | --sb=*) sbindir=$ac_optarg ;; -sharedstatedir | --sharedstatedir | --sharedstatedi \ | --sharedstated | --sharedstate | --sharedstat | --sharedsta \ | --sharedst | --shareds | --shared | --share | --shar \ | --sha | --sh) ac_prev=sharedstatedir ;; -sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \ | --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \ | --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \ | --sha=* | --sh=*) sharedstatedir=$ac_optarg ;; -site | --site | --sit) ac_prev=site ;; -site=* | --site=* | --sit=*) site=$ac_optarg ;; -srcdir | --srcdir | --srcdi | --srcd | --src | --sr) ac_prev=srcdir ;; -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*) srcdir=$ac_optarg ;; -sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \ | --syscon | --sysco | --sysc | --sys | --sy) ac_prev=sysconfdir ;; -sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \ | --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*) sysconfdir=$ac_optarg ;; -target | --target | --targe | --targ | --tar | --ta | --t) ac_prev=target_alias ;; -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*) target_alias=$ac_optarg ;; -v | -verbose | --verbose | --verbos | --verbo | --verb) verbose=yes ;; -version | --version | --versio | --versi | --vers | -V) ac_init_version=: ;; -with-* | --with-*) ac_useropt=`expr "x$ac_option" : 'x-*with-\([^=]*\)'` # Reject names that are not valid shell variable names. expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && as_fn_error $? "invalid package name: '$ac_useropt'" ac_useropt_orig=$ac_useropt ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` case $ac_user_opts in *" "with_$ac_useropt" "*) ;; *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--with-$ac_useropt_orig" ac_unrecognized_sep=', ';; esac eval with_$ac_useropt=\$ac_optarg ;; -without-* | --without-*) ac_useropt=`expr "x$ac_option" : 'x-*without-\(.*\)'` # Reject names that are not valid shell variable names. expr "x$ac_useropt" : ".*[^-+._$as_cr_alnum]" >/dev/null && as_fn_error $? "invalid package name: '$ac_useropt'" ac_useropt_orig=$ac_useropt ac_useropt=`printf "%s\n" "$ac_useropt" | sed 's/[-+.]/_/g'` case $ac_user_opts in *" "with_$ac_useropt" "*) ;; *) ac_unrecognized_opts="$ac_unrecognized_opts$ac_unrecognized_sep--without-$ac_useropt_orig" ac_unrecognized_sep=', ';; esac eval with_$ac_useropt=no ;; --x) # Obsolete; use --with-x. with_x=yes ;; -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \ | --x-incl | --x-inc | --x-in | --x-i) ac_prev=x_includes ;; -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \ | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*) x_includes=$ac_optarg ;; -x-libraries | --x-libraries | --x-librarie | --x-librari \ | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l) ac_prev=x_libraries ;; -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \ | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*) x_libraries=$ac_optarg ;; -*) as_fn_error $? "unrecognized option: '$ac_option' Try '$0 --help' for more information" ;; *=*) ac_envvar=`expr "x$ac_option" : 'x\([^=]*\)='` # Reject names that are not valid shell variable names. case $ac_envvar in #( '' | [0-9]* | *[!_$as_cr_alnum]* ) as_fn_error $? "invalid variable name: '$ac_envvar'" ;; esac eval $ac_envvar=\$ac_optarg export $ac_envvar ;; *) # FIXME: should be removed in autoconf 3.0. printf "%s\n" "$as_me: WARNING: you should use --build, --host, --target" >&2 expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null && printf "%s\n" "$as_me: WARNING: invalid host type: $ac_option" >&2 : "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}" ;; esac done if test -n "$ac_prev"; then ac_option=--`echo $ac_prev | sed 's/_/-/g'` as_fn_error $? "missing argument to $ac_option" fi if test -n "$ac_unrecognized_opts"; then case $enable_option_checking in no) ;; fatal) as_fn_error $? "unrecognized options: $ac_unrecognized_opts" ;; *) printf "%s\n" "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2 ;; esac fi # Check all directory arguments for consistency. for ac_var in exec_prefix prefix bindir sbindir libexecdir datarootdir \ datadir sysconfdir sharedstatedir localstatedir includedir \ oldincludedir docdir infodir htmldir dvidir pdfdir psdir \ libdir localedir mandir runstatedir do eval ac_val=\$$ac_var # Remove trailing slashes. case $ac_val in */ ) ac_val=`expr "X$ac_val" : 'X\(.*[^/]\)' \| "X$ac_val" : 'X\(.*\)'` eval $ac_var=\$ac_val;; esac # Be sure to have absolute directory names. case $ac_val in [\\/$]* | ?:[\\/]* ) continue;; NONE | '' ) case $ac_var in *prefix ) continue;; esac;; esac as_fn_error $? "expected an absolute directory name for --$ac_var: $ac_val" done # There might be people who depend on the old broken behavior: '$host' # used to hold the argument of --host etc. # FIXME: To remove some day. build=$build_alias host=$host_alias target=$target_alias # FIXME: To remove some day. if test "x$host_alias" != x; then if test "x$build_alias" = x; then cross_compiling=maybe elif test "x$build_alias" != "x$host_alias"; then cross_compiling=yes fi fi ac_tool_prefix= test -n "$host_alias" && ac_tool_prefix=$host_alias- test "$silent" = yes && exec 6>/dev/null ac_pwd=`pwd` && test -n "$ac_pwd" && ac_ls_di=`ls -di .` && ac_pwd_ls_di=`cd "$ac_pwd" && ls -di .` || as_fn_error $? "working directory cannot be determined" test "X$ac_ls_di" = "X$ac_pwd_ls_di" || as_fn_error $? "pwd does not report name of working directory" # Find the source files, if location was not specified. if test -z "$srcdir"; then ac_srcdir_defaulted=yes # Try the directory containing this script, then the parent directory. ac_confdir=`$as_dirname -- "$as_myself" || $as_expr X"$as_myself" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$as_myself" : 'X\(//\)[^/]' \| \ X"$as_myself" : 'X\(//\)$' \| \ X"$as_myself" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$as_myself" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'` srcdir=$ac_confdir if test ! -r "$srcdir/$ac_unique_file"; then srcdir=.. fi else ac_srcdir_defaulted=no fi if test ! -r "$srcdir/$ac_unique_file"; then test "$ac_srcdir_defaulted" = yes && srcdir="$ac_confdir or .." as_fn_error $? "cannot find sources ($ac_unique_file) in $srcdir" fi ac_msg="sources are in $srcdir, but 'cd $srcdir' does not work" ac_abs_confdir=`( cd "$srcdir" && test -r "./$ac_unique_file" || as_fn_error $? "$ac_msg" pwd)` # When building in place, set srcdir=. if test "$ac_abs_confdir" = "$ac_pwd"; then srcdir=. fi # Remove unnecessary trailing slashes from srcdir. # Double slashes in file names in object file debugging info # mess up M-x gdb in Emacs. case $srcdir in */) srcdir=`expr "X$srcdir" : 'X\(.*[^/]\)' \| "X$srcdir" : 'X\(.*\)'`;; esac for ac_var in $ac_precious_vars; do eval ac_env_${ac_var}_set=\${${ac_var}+set} eval ac_env_${ac_var}_value=\$${ac_var} eval ac_cv_env_${ac_var}_set=\${${ac_var}+set} eval ac_cv_env_${ac_var}_value=\$${ac_var} done # # Report the --help message. # if test "$ac_init_help" = "long"; then # Omit some internal or obsolete options to make the list less imposing. # This message is too long to be a string in the A/UX 3.1 sh. cat <<_ACEOF 'configure' configures GNU libffcall 2.5 to adapt to many kinds of systems. Usage: $0 [OPTION]... [VAR=VALUE]... To assign environment variables (e.g., CC, CFLAGS...), specify them as VAR=VALUE. See below for descriptions of some of the useful variables. Defaults for the options are specified in brackets. Configuration: -h, --help display this help and exit --help=short display options specific to this package --help=recursive display the short help of all the included packages -V, --version display version information and exit -q, --quiet, --silent do not print 'checking ...' messages --cache-file=FILE cache test results in FILE [disabled] -C, --config-cache alias for '--cache-file=config.cache' -n, --no-create do not create output files --srcdir=DIR find the sources in DIR [configure dir or '..'] Installation directories: --prefix=PREFIX install architecture-independent files in PREFIX [$ac_default_prefix] --exec-prefix=EPREFIX install architecture-dependent files in EPREFIX [PREFIX] By default, 'make install' will install all the files in '$ac_default_prefix/bin', '$ac_default_prefix/lib' etc. You can specify an installation prefix other than '$ac_default_prefix' using '--prefix', for instance '--prefix=\$HOME'. For better control, use the options below. Fine tuning of the installation directories: --bindir=DIR user executables [EPREFIX/bin] --sbindir=DIR system admin executables [EPREFIX/sbin] --libexecdir=DIR program executables [EPREFIX/libexec] --sysconfdir=DIR read-only single-machine data [PREFIX/etc] --sharedstatedir=DIR modifiable architecture-independent data [PREFIX/com] --localstatedir=DIR modifiable single-machine data [PREFIX/var] --runstatedir=DIR modifiable per-process data [LOCALSTATEDIR/run] --libdir=DIR object code libraries [EPREFIX/lib] --includedir=DIR C header files [PREFIX/include] --oldincludedir=DIR C header files for non-gcc [/usr/include] --datarootdir=DIR read-only arch.-independent data root [PREFIX/share] --datadir=DIR read-only architecture-independent data [DATAROOTDIR] --infodir=DIR info documentation [DATAROOTDIR/info] --localedir=DIR locale-dependent data [DATAROOTDIR/locale] --mandir=DIR man documentation [DATAROOTDIR/man] --docdir=DIR documentation root [DATAROOTDIR/doc/libffcall] --htmldir=DIR html documentation [DOCDIR] --dvidir=DIR dvi documentation [DOCDIR] --pdfdir=DIR pdf documentation [DOCDIR] --psdir=DIR ps documentation [DOCDIR] _ACEOF cat <<\_ACEOF Program names: --program-prefix=PREFIX prepend PREFIX to installed program names --program-suffix=SUFFIX append SUFFIX to installed program names --program-transform-name=PROGRAM run sed PROGRAM on installed program names System types: --build=BUILD configure for building on BUILD [guessed] --host=HOST cross-compile to build programs to run on HOST [BUILD] _ACEOF fi if test -n "$ac_init_help"; then case $ac_init_help in short | recursive ) echo "Configuration of GNU libffcall 2.5:";; esac cat <<\_ACEOF Optional Features: --disable-option-checking ignore unrecognized --enable/--with options --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) --enable-FEATURE[=ARG] include FEATURE [ARG=yes] --enable-silent-rules less verbose build output (undo: "make V=1") --disable-silent-rules verbose build output (undo: "make V=0") --enable-dependency-tracking do not reject slow dependency extractors --disable-dependency-tracking speeds up one-time build --disable-c++ do not build C++ sources --disable-largefile omit support for large files --enable-threads={isoc|posix|isoc+posix|windows} specify multithreading API --disable-threads build without multithread safety --enable-shared[=PKGS] build shared libraries [default=yes] --enable-static[=PKGS] build static libraries [default=yes] --enable-fast-install[=PKGS] optimize for fast installation [default=yes] --disable-libtool-lock avoid locking (might break parallel builds) --enable-cross-guesses={conservative|risky} specify policy for cross-compilation guesses --enable-year2038 support timestamps after 2038 Optional Packages: --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) --with-pic[=PKGS] try to use only PIC/non-PIC objects [default=use both] --with-aix-soname=aix|svr4|both shared library versioning (aka "SONAME") variant to provide on AIX, [default=aix]. --with-gnu-ld assume the C compiler uses GNU ld [default=no] --with-sysroot[=DIR] Search for dependent libraries within DIR (or the compiler's sysroot if not specified). Some influential environment variables: CC C compiler command CFLAGS C compiler flags LDFLAGS linker flags, e.g. -L if you have libraries in a nonstandard directory LIBS libraries to pass to the linker, e.g. -l CPPFLAGS (Objective) C/C++ preprocessor flags, e.g. -I if you have headers in a nonstandard directory CPP C preprocessor CXX C++ compiler command CXXFLAGS C++ compiler flags LT_SYS_LIBRARY_PATH User-defined run-time library search path. CXXCPP C++ preprocessor Use these variables to override the choices made by 'configure' or to help it to find libraries and programs with nonstandard names/locations. Report bugs to . GNU libffcall home page: . General help using GNU software: . _ACEOF ac_status=$? fi if test "$ac_init_help" = "recursive"; then # If there are subdirs, report their specific --help. for ac_dir in : $ac_subdirs_all; do test "x$ac_dir" = x: && continue test -d "$ac_dir" || { cd "$srcdir" && ac_pwd=`pwd` && srcdir=. && test -d "$ac_dir"; } || continue ac_builddir=. case "$ac_dir" in .) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;; *) ac_dir_suffix=/`printf "%s\n" "$ac_dir" | sed 's|^\.[\\/]||'` # A ".." for each directory in $ac_dir_suffix. ac_top_builddir_sub=`printf "%s\n" "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'` case $ac_top_builddir_sub in "") ac_top_builddir_sub=. ac_top_build_prefix= ;; *) ac_top_build_prefix=$ac_top_builddir_sub/ ;; esac ;; esac ac_abs_top_builddir=$ac_pwd ac_abs_builddir=$ac_pwd$ac_dir_suffix # for backward compatibility: ac_top_builddir=$ac_top_build_prefix case $srcdir in .) # We are building in place. ac_srcdir=. ac_top_srcdir=$ac_top_builddir_sub ac_abs_top_srcdir=$ac_pwd ;; [\\/]* | ?:[\\/]* ) # Absolute name. ac_srcdir=$srcdir$ac_dir_suffix; ac_top_srcdir=$srcdir ac_abs_top_srcdir=$srcdir ;; *) # Relative name. ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix ac_top_srcdir=$ac_top_build_prefix$srcdir ac_abs_top_srcdir=$ac_pwd/$srcdir ;; esac ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix cd "$ac_dir" || { ac_status=$?; continue; } # Check for configure.gnu first; this name is used for a wrapper for # Metaconfig's "Configure" on case-insensitive file systems. if test -f "$ac_srcdir/configure.gnu"; then echo && $SHELL "$ac_srcdir/configure.gnu" --help=recursive elif test -f "$ac_srcdir/configure"; then echo && $SHELL "$ac_srcdir/configure" --help=recursive else printf "%s\n" "$as_me: WARNING: no configuration information is in $ac_dir" >&2 fi || ac_status=$? cd "$ac_pwd" || { ac_status=$?; break; } done fi test -n "$ac_init_help" && exit $ac_status if $ac_init_version; then cat <<\_ACEOF GNU libffcall configure 2.5 generated by GNU Autoconf 2.72 Copyright (C) 2023 Free Software Foundation, Inc. This configure script is free software; the Free Software Foundation gives unlimited permission to copy, distribute and modify it. _ACEOF exit fi ## ------------------------ ## ## Autoconf initialization. ## ## ------------------------ ## # ac_fn_c_try_compile LINENO # -------------------------- # Try to compile conftest.$ac_ext, and return whether this succeeded. ac_fn_c_try_compile () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack rm -f conftest.$ac_objext conftest.beam if { { ac_try="$ac_compile" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_compile") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && { test -z "$ac_c_werror_flag" || test ! -s conftest.err } && test -s conftest.$ac_objext then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_c_try_compile # ac_fn_c_try_cpp LINENO # ---------------------- # Try to preprocess conftest.$ac_ext, and return whether this succeeded. ac_fn_c_try_cpp () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if { { ac_try="$ac_cpp conftest.$ac_ext" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_cpp conftest.$ac_ext") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } > conftest.i && { test -z "$ac_c_preproc_warn_flag$ac_c_werror_flag" || test ! -s conftest.err } then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_c_try_cpp # ac_fn_cxx_try_compile LINENO # ---------------------------- # Try to compile conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_try_compile () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack rm -f conftest.$ac_objext conftest.beam if { { ac_try="$ac_compile" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_compile") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && { test -z "$ac_cxx_werror_flag" || test ! -s conftest.err } && test -s conftest.$ac_objext then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_cxx_try_compile # ac_fn_c_check_header_compile LINENO HEADER VAR INCLUDES # ------------------------------------------------------- # Tests whether HEADER exists and can be compiled using the include files in # INCLUDES, setting the cache variable VAR accordingly. ac_fn_c_check_header_compile () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 printf %s "checking for $2... " >&6; } if eval test \${$3+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 #include <$2> _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval "$3=yes" else case e in #( e) eval "$3=no" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi eval ac_res=\$$3 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno } # ac_fn_c_check_header_compile # ac_fn_c_try_link LINENO # ----------------------- # Try to link conftest.$ac_ext, and return whether this succeeded. ac_fn_c_try_link () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack rm -f conftest.$ac_objext conftest.beam conftest$ac_exeext if { { ac_try="$ac_link" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && { test -z "$ac_c_werror_flag" || test ! -s conftest.err } && test -s conftest$ac_exeext && { test "$cross_compiling" = yes || test -x conftest$ac_exeext } then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi # Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information # created by the PGI compiler (conftest_ipa8_conftest.oo), as it would # interfere with the next link command; also delete a directory that is # left behind by Apple's compiler. We do this before executing the actions. rm -rf conftest.dSYM conftest_ipa8_conftest.oo eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_c_try_link # ac_fn_c_check_func LINENO FUNC VAR # ---------------------------------- # Tests whether FUNC exists, setting the cache variable VAR accordingly ac_fn_c_check_func () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 printf %s "checking for $2... " >&6; } if eval test \${$3+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Define $2 to an innocuous variant, in case declares $2. For example, HP-UX 11i declares gettimeofday. */ #define $2 innocuous_$2 /* System header to define __stub macros and hopefully few prototypes, which can conflict with char $2 (void); below. */ #include #undef $2 /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. */ #ifdef __cplusplus extern "C" #endif char $2 (void); /* The GNU C library defines this for functions which it implements to always fail with ENOSYS. Some functions are actually named something starting with __ and the normal name is an alias. */ #if defined __stub_$2 || defined __stub___$2 choke me #endif int main (void) { return $2 (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : eval "$3=yes" else case e in #( e) eval "$3=no" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi eval ac_res=\$$3 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno } # ac_fn_c_check_func # ac_fn_cxx_try_cpp LINENO # ------------------------ # Try to preprocess conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_try_cpp () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if { { ac_try="$ac_cpp conftest.$ac_ext" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_cpp conftest.$ac_ext") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } > conftest.i && { test -z "$ac_cxx_preproc_warn_flag$ac_cxx_werror_flag" || test ! -s conftest.err } then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_cxx_try_cpp # ac_fn_cxx_try_link LINENO # ------------------------- # Try to link conftest.$ac_ext, and return whether this succeeded. ac_fn_cxx_try_link () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack rm -f conftest.$ac_objext conftest.beam conftest$ac_exeext if { { ac_try="$ac_link" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link") 2>conftest.err ac_status=$? if test -s conftest.err; then grep -v '^ *+' conftest.err >conftest.er1 cat conftest.er1 >&5 mv -f conftest.er1 conftest.err fi printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && { test -z "$ac_cxx_werror_flag" || test ! -s conftest.err } && test -s conftest$ac_exeext && { test "$cross_compiling" = yes || test -x conftest$ac_exeext } then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=1 ;; esac fi # Delete the IPA/IPO (Inter Procedural Analysis/Optimization) information # created by the PGI compiler (conftest_ipa8_conftest.oo), as it would # interfere with the next link command; also delete a directory that is # left behind by Apple's compiler. We do this before executing the actions. rm -rf conftest.dSYM conftest_ipa8_conftest.oo eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_cxx_try_link # ac_fn_c_try_run LINENO # ---------------------- # Try to run conftest.$ac_ext, and return whether this succeeded. Assumes that # executables *can* be run. ac_fn_c_try_run () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if { { ac_try="$ac_link" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && { ac_try='./conftest$ac_exeext' { { case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_try") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } then : ac_retval=0 else case e in #( e) printf "%s\n" "$as_me: program exited with status $ac_status" >&5 printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 ac_retval=$ac_status ;; esac fi rm -rf conftest.dSYM conftest_ipa8_conftest.oo eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno as_fn_set_status $ac_retval } # ac_fn_c_try_run # ac_fn_check_decl LINENO SYMBOL VAR INCLUDES EXTRA-OPTIONS FLAG-VAR # ------------------------------------------------------------------ # Tests whether SYMBOL is declared in INCLUDES, setting cache variable VAR # accordingly. Pass EXTRA-OPTIONS to the compiler, using FLAG-VAR. ac_fn_check_decl () { ac_saved_ac_compile="$ac_compile" if test -n "$ac_compile_for_check_decl"; then ac_compile="$ac_compile_for_check_decl" fi as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack as_decl_name=`echo $2|sed 's/ *(.*//'` { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $as_decl_name is declared" >&5 printf %s "checking whether $as_decl_name is declared... " >&6; } if eval test \${$3+y} then : printf %s "(cached) " >&6 else case e in #( e) as_decl_use=`echo $2|sed -e 's/(/((/' -e 's/)/) 0&/' -e 's/,/) 0& (/g'` eval ac_save_FLAGS=\$$6 as_fn_append $6 " $5" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { #ifndef $as_decl_name #ifdef __cplusplus (void) $as_decl_use; #else (void) $as_decl_name; #endif #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval "$3=yes" else case e in #( e) eval "$3=no" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext eval $6=\$ac_save_FLAGS ;; esac fi eval ac_res=\$$3 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno ac_compile="$ac_saved_ac_compile" } # ac_fn_check_decl # ac_fn_c_check_type LINENO TYPE VAR INCLUDES # ------------------------------------------- # Tests whether TYPE exists after having included INCLUDES, setting cache # variable VAR accordingly. ac_fn_c_check_type () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 printf %s "checking for $2... " >&6; } if eval test \${$3+y} then : printf %s "(cached) " >&6 else case e in #( e) eval "$3=no" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { if (sizeof ($2)) return 0; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { if (sizeof (($2))) return 0; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : else case e in #( e) eval "$3=yes" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi eval ac_res=\$$3 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno } # ac_fn_c_check_type # ac_fn_c_compute_int LINENO EXPR VAR INCLUDES # -------------------------------------------- # Tries to find the compile-time value of EXPR in a program that includes # INCLUDES, setting VAR accordingly. Returns whether the value could be # computed ac_fn_c_compute_int () { as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack if test "$cross_compiling" = yes; then # Depending upon the size, compute the lo and hi bounds. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { static int test_array [1 - 2 * !(($2) >= 0)]; test_array [0] = 0; return test_array [0]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_lo=0 ac_mid=0 while :; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { static int test_array [1 - 2 * !(($2) <= $ac_mid)]; test_array [0] = 0; return test_array [0]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_hi=$ac_mid; break else case e in #( e) as_fn_arith $ac_mid + 1 && ac_lo=$as_val if test $ac_lo -le $ac_mid; then ac_lo= ac_hi= break fi as_fn_arith 2 '*' $ac_mid + 1 && ac_mid=$as_val ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext done else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { static int test_array [1 - 2 * !(($2) < 0)]; test_array [0] = 0; return test_array [0]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_hi=-1 ac_mid=-1 while :; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { static int test_array [1 - 2 * !(($2) >= $ac_mid)]; test_array [0] = 0; return test_array [0]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_lo=$ac_mid; break else case e in #( e) as_fn_arith '(' $ac_mid ')' - 1 && ac_hi=$as_val if test $ac_mid -le $ac_hi; then ac_lo= ac_hi= break fi as_fn_arith 2 '*' $ac_mid && ac_mid=$as_val ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext done else case e in #( e) ac_lo= ac_hi= ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext # Binary search between lo and hi bounds. while test "x$ac_lo" != "x$ac_hi"; do as_fn_arith '(' $ac_hi - $ac_lo ')' / 2 + $ac_lo && ac_mid=$as_val cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 int main (void) { static int test_array [1 - 2 * !(($2) <= $ac_mid)]; test_array [0] = 0; return test_array [0]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_hi=$ac_mid else case e in #( e) as_fn_arith '(' $ac_mid ')' + 1 && ac_lo=$as_val ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext done case $ac_lo in #(( ?*) eval "$3=\$ac_lo"; ac_retval=0 ;; '') ac_retval=1 ;; esac else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $4 static long int longval (void) { return $2; } static unsigned long int ulongval (void) { return $2; } #include #include int main (void) { FILE *f = fopen ("conftest.val", "w"); if (! f) return 1; if (($2) < 0) { long int i = longval (); if (i != ($2)) return 1; fprintf (f, "%ld", i); } else { unsigned long int i = ulongval (); if (i != ($2)) return 1; fprintf (f, "%lu", i); } /* Do not output a trailing newline, as this causes \r\n confusion on some platforms. */ return ferror (f) || fclose (f) != 0; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : echo >>conftest.val; read $3 &5 printf %s "checking for $2.$3... " >&6; } if eval test \${$4+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $5 int main (void) { static $2 ac_aggr; if (ac_aggr.$3) return 0; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval "$4=yes" else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $5 int main (void) { static $2 ac_aggr; if (sizeof ac_aggr.$3) return 0; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval "$4=yes" else case e in #( e) eval "$4=no" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi eval ac_res=\$$4 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno } # ac_fn_c_check_member ac_configure_args_raw= for ac_arg do case $ac_arg in *\'*) ac_arg=`printf "%s\n" "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;; esac as_fn_append ac_configure_args_raw " '$ac_arg'" done case $ac_configure_args_raw in *$as_nl*) ac_safe_unquote= ;; *) ac_unsafe_z='|&;<>()$`\\"*?[ '' ' # This string ends in space, tab. ac_unsafe_a="$ac_unsafe_z#~" ac_safe_unquote="s/ '\\([^$ac_unsafe_a][^$ac_unsafe_z]*\\)'/ \\1/g" ac_configure_args_raw=` printf "%s\n" "$ac_configure_args_raw" | sed "$ac_safe_unquote"`;; esac cat >config.log <<_ACEOF This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. It was created by GNU libffcall $as_me 2.5, which was generated by GNU Autoconf 2.72. Invocation command line was $ $0$ac_configure_args_raw _ACEOF exec 5>>config.log { cat <<_ASUNAME ## --------- ## ## Platform. ## ## --------- ## hostname = `(hostname || uname -n) 2>/dev/null | sed 1q` uname -m = `(uname -m) 2>/dev/null || echo unknown` uname -r = `(uname -r) 2>/dev/null || echo unknown` uname -s = `(uname -s) 2>/dev/null || echo unknown` uname -v = `(uname -v) 2>/dev/null || echo unknown` /usr/bin/uname -p = `(/usr/bin/uname -p) 2>/dev/null || echo unknown` /bin/uname -X = `(/bin/uname -X) 2>/dev/null || echo unknown` /bin/arch = `(/bin/arch) 2>/dev/null || echo unknown` /usr/bin/arch -k = `(/usr/bin/arch -k) 2>/dev/null || echo unknown` /usr/convex/getsysinfo = `(/usr/convex/getsysinfo) 2>/dev/null || echo unknown` /usr/bin/hostinfo = `(/usr/bin/hostinfo) 2>/dev/null || echo unknown` /bin/machine = `(/bin/machine) 2>/dev/null || echo unknown` /usr/bin/oslevel = `(/usr/bin/oslevel) 2>/dev/null || echo unknown` /bin/universe = `(/bin/universe) 2>/dev/null || echo unknown` _ASUNAME as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac printf "%s\n" "PATH: $as_dir" done IFS=$as_save_IFS } >&5 cat >&5 <<_ACEOF ## ----------- ## ## Core tests. ## ## ----------- ## _ACEOF # Keep a trace of the command line. # Strip out --no-create and --no-recursion so they do not pile up. # Strip out --silent because we don't want to record it for future runs. # Also quote any args containing shell meta-characters. # Make two passes to allow for proper duplicate-argument suppression. ac_configure_args= ac_configure_args0= ac_configure_args1= ac_must_keep_next=false for ac_pass in 1 2 do for ac_arg do case $ac_arg in -no-create | --no-c* | -n | -no-recursion | --no-r*) continue ;; -q | -quiet | --quiet | --quie | --qui | --qu | --q \ | -silent | --silent | --silen | --sile | --sil) continue ;; *\'*) ac_arg=`printf "%s\n" "$ac_arg" | sed "s/'/'\\\\\\\\''/g"` ;; esac case $ac_pass in 1) as_fn_append ac_configure_args0 " '$ac_arg'" ;; 2) as_fn_append ac_configure_args1 " '$ac_arg'" if test $ac_must_keep_next = true; then ac_must_keep_next=false # Got value, back to normal. else case $ac_arg in *=* | --config-cache | -C | -disable-* | --disable-* \ | -enable-* | --enable-* | -gas | --g* | -nfp | --nf* \ | -q | -quiet | --q* | -silent | --sil* | -v | -verb* \ | -with-* | --with-* | -without-* | --without-* | --x) case "$ac_configure_args0 " in "$ac_configure_args1"*" '$ac_arg' "* ) continue ;; esac ;; -* ) ac_must_keep_next=true ;; esac fi as_fn_append ac_configure_args " '$ac_arg'" ;; esac done done { ac_configure_args0=; unset ac_configure_args0;} { ac_configure_args1=; unset ac_configure_args1;} # When interrupted or exit'd, cleanup temporary files, and complete # config.log. We remove comments because anyway the quotes in there # would cause problems or look ugly. # WARNING: Use '\'' to represent an apostrophe within the trap. # WARNING: Do not start the trap code with a newline, due to a FreeBSD 4.0 bug. trap 'exit_status=$? # Sanitize IFS. IFS=" "" $as_nl" # Save into config.log some information that might help in debugging. { echo printf "%s\n" "## ---------------- ## ## Cache variables. ## ## ---------------- ##" echo # The following way of writing the cache mishandles newlines in values, ( for ac_var in `(set) 2>&1 | sed -n '\''s/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'\''`; do eval ac_val=\$$ac_var case $ac_val in #( *${as_nl}*) case $ac_var in #( *_cv_*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5 printf "%s\n" "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;; esac case $ac_var in #( _ | IFS | as_nl) ;; #( BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #( *) { eval $ac_var=; unset $ac_var;} ;; esac ;; esac done (set) 2>&1 | case $as_nl`(ac_space='\'' '\''; set) 2>&1` in #( *${as_nl}ac_space=\ *) sed -n \ "s/'\''/'\''\\\\'\'''\''/g; s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\''\\2'\''/p" ;; #( *) sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p" ;; esac | sort ) echo printf "%s\n" "## ----------------- ## ## Output variables. ## ## ----------------- ##" echo for ac_var in $ac_subst_vars do eval ac_val=\$$ac_var case $ac_val in *\'\''*) ac_val=`printf "%s\n" "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;; esac printf "%s\n" "$ac_var='\''$ac_val'\''" done | sort echo if test -n "$ac_subst_files"; then printf "%s\n" "## ------------------- ## ## File substitutions. ## ## ------------------- ##" echo for ac_var in $ac_subst_files do eval ac_val=\$$ac_var case $ac_val in *\'\''*) ac_val=`printf "%s\n" "$ac_val" | sed "s/'\''/'\''\\\\\\\\'\'''\''/g"`;; esac printf "%s\n" "$ac_var='\''$ac_val'\''" done | sort echo fi if test -s confdefs.h; then printf "%s\n" "## ----------- ## ## confdefs.h. ## ## ----------- ##" echo cat confdefs.h echo fi test "$ac_signal" != 0 && printf "%s\n" "$as_me: caught signal $ac_signal" printf "%s\n" "$as_me: exit $exit_status" } >&5 rm -f core *.core core.conftest.* && rm -f -r conftest* confdefs* conf$$* $ac_clean_files && exit $exit_status ' 0 for ac_signal in 1 2 13 15; do trap 'ac_signal='$ac_signal'; as_fn_exit 1' $ac_signal done ac_signal=0 # confdefs.h avoids OS command line length limits that DEFS can exceed. rm -f -r conftest* confdefs.h printf "%s\n" "/* confdefs.h */" > confdefs.h # Predefined preprocessor variables. printf "%s\n" "#define PACKAGE_NAME \"$PACKAGE_NAME\"" >>confdefs.h printf "%s\n" "#define PACKAGE_TARNAME \"$PACKAGE_TARNAME\"" >>confdefs.h printf "%s\n" "#define PACKAGE_VERSION \"$PACKAGE_VERSION\"" >>confdefs.h printf "%s\n" "#define PACKAGE_STRING \"$PACKAGE_STRING\"" >>confdefs.h printf "%s\n" "#define PACKAGE_BUGREPORT \"$PACKAGE_BUGREPORT\"" >>confdefs.h printf "%s\n" "#define PACKAGE_URL \"$PACKAGE_URL\"" >>confdefs.h # Let the site file select an alternate cache file if it wants to. # Prefer an explicitly selected file to automatically selected ones. if test -n "$CONFIG_SITE"; then ac_site_files="$CONFIG_SITE" elif test "x$prefix" != xNONE; then ac_site_files="$prefix/share/config.site $prefix/etc/config.site" else ac_site_files="$ac_default_prefix/share/config.site $ac_default_prefix/etc/config.site" fi for ac_site_file in $ac_site_files do case $ac_site_file in #( */*) : ;; #( *) : ac_site_file=./$ac_site_file ;; esac if test -f "$ac_site_file" && test -r "$ac_site_file"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: loading site script $ac_site_file" >&5 printf "%s\n" "$as_me: loading site script $ac_site_file" >&6;} sed 's/^/| /' "$ac_site_file" >&5 . "$ac_site_file" \ || { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "failed to load site script $ac_site_file See 'config.log' for more details" "$LINENO" 5; } fi done if test -r "$cache_file"; then # Some versions of bash will fail to source /dev/null (special files # actually), so we avoid doing that. DJGPP emulates it as a regular file. if test /dev/null != "$cache_file" && test -f "$cache_file"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: loading cache $cache_file" >&5 printf "%s\n" "$as_me: loading cache $cache_file" >&6;} case $cache_file in [\\/]* | ?:[\\/]* ) . "$cache_file";; *) . "./$cache_file";; esac fi else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating cache $cache_file" >&5 printf "%s\n" "$as_me: creating cache $cache_file" >&6;} >$cache_file fi # Test code for whether the C compiler supports C89 (global declarations) ac_c_conftest_c89_globals=' /* Does the compiler advertise C89 conformance? Do not test the value of __STDC__, because some compilers set it to 0 while being otherwise adequately conformant. */ #if !defined __STDC__ # error "Compiler does not advertise C89 conformance" #endif #include #include struct stat; /* Most of the following tests are stolen from RCS 5.7 src/conf.sh. */ struct buf { int x; }; struct buf * (*rcsopen) (struct buf *, struct stat *, int); static char *e (char **p, int i) { return p[i]; } static char *f (char * (*g) (char **, int), char **p, ...) { char *s; va_list v; va_start (v,p); s = g (p, va_arg (v,int)); va_end (v); return s; } /* C89 style stringification. */ #define noexpand_stringify(a) #a const char *stringified = noexpand_stringify(arbitrary+token=sequence); /* C89 style token pasting. Exercises some of the corner cases that e.g. old MSVC gets wrong, but not very hard. */ #define noexpand_concat(a,b) a##b #define expand_concat(a,b) noexpand_concat(a,b) extern int vA; extern int vbee; #define aye A #define bee B int *pvA = &expand_concat(v,aye); int *pvbee = &noexpand_concat(v,bee); /* OSF 4.0 Compaq cc is some sort of almost-ANSI by default. It has function prototypes and stuff, but not \xHH hex character constants. These do not provoke an error unfortunately, instead are silently treated as an "x". The following induces an error, until -std is added to get proper ANSI mode. Curiously \x00 != x always comes out true, for an array size at least. It is necessary to write \x00 == 0 to get something that is true only with -std. */ int osf4_cc_array ['\''\x00'\'' == 0 ? 1 : -1]; /* IBM C 6 for AIX is almost-ANSI by default, but it replaces macro parameters inside strings and character constants. */ #define FOO(x) '\''x'\'' int xlc6_cc_array[FOO(a) == '\''x'\'' ? 1 : -1]; int test (int i, double x); struct s1 {int (*f) (int a);}; struct s2 {int (*f) (double a);}; int pairnames (int, char **, int *(*)(struct buf *, struct stat *, int), int, int);' # Test code for whether the C compiler supports C89 (body of main). ac_c_conftest_c89_main=' ok |= (argc == 0 || f (e, argv, 0) != argv[0] || f (e, argv, 1) != argv[1]); ' # Test code for whether the C compiler supports C99 (global declarations) ac_c_conftest_c99_globals=' /* Does the compiler advertise C99 conformance? */ #if !defined __STDC_VERSION__ || __STDC_VERSION__ < 199901L # error "Compiler does not advertise C99 conformance" #endif // See if C++-style comments work. #include extern int puts (const char *); extern int printf (const char *, ...); extern int dprintf (int, const char *, ...); extern void *malloc (size_t); extern void free (void *); // Check varargs macros. These examples are taken from C99 6.10.3.5. // dprintf is used instead of fprintf to avoid needing to declare // FILE and stderr. #define debug(...) dprintf (2, __VA_ARGS__) #define showlist(...) puts (#__VA_ARGS__) #define report(test,...) ((test) ? puts (#test) : printf (__VA_ARGS__)) static void test_varargs_macros (void) { int x = 1234; int y = 5678; debug ("Flag"); debug ("X = %d\n", x); showlist (The first, second, and third items.); report (x>y, "x is %d but y is %d", x, y); } // Check long long types. #define BIG64 18446744073709551615ull #define BIG32 4294967295ul #define BIG_OK (BIG64 / BIG32 == 4294967297ull && BIG64 % BIG32 == 0) #if !BIG_OK #error "your preprocessor is broken" #endif #if BIG_OK #else #error "your preprocessor is broken" #endif static long long int bignum = -9223372036854775807LL; static unsigned long long int ubignum = BIG64; struct incomplete_array { int datasize; double data[]; }; struct named_init { int number; const wchar_t *name; double average; }; typedef const char *ccp; static inline int test_restrict (ccp restrict text) { // Iterate through items via the restricted pointer. // Also check for declarations in for loops. for (unsigned int i = 0; *(text+i) != '\''\0'\''; ++i) continue; return 0; } // Check varargs and va_copy. static bool test_varargs (const char *format, ...) { va_list args; va_start (args, format); va_list args_copy; va_copy (args_copy, args); const char *str = ""; int number = 0; float fnumber = 0; while (*format) { switch (*format++) { case '\''s'\'': // string str = va_arg (args_copy, const char *); break; case '\''d'\'': // int number = va_arg (args_copy, int); break; case '\''f'\'': // float fnumber = va_arg (args_copy, double); break; default: break; } } va_end (args_copy); va_end (args); return *str && number && fnumber; } ' # Test code for whether the C compiler supports C99 (body of main). ac_c_conftest_c99_main=' // Check bool. _Bool success = false; success |= (argc != 0); // Check restrict. if (test_restrict ("String literal") == 0) success = true; char *restrict newvar = "Another string"; // Check varargs. success &= test_varargs ("s, d'\'' f .", "string", 65, 34.234); test_varargs_macros (); // Check flexible array members. struct incomplete_array *ia = malloc (sizeof (struct incomplete_array) + (sizeof (double) * 10)); ia->datasize = 10; for (int i = 0; i < ia->datasize; ++i) ia->data[i] = i * 1.234; // Work around memory leak warnings. free (ia); // Check named initializers. struct named_init ni = { .number = 34, .name = L"Test wide string", .average = 543.34343, }; ni.number = 58; int dynamic_array[ni.number]; dynamic_array[0] = argv[0][0]; dynamic_array[ni.number - 1] = 543; // work around unused variable warnings ok |= (!success || bignum == 0LL || ubignum == 0uLL || newvar[0] == '\''x'\'' || dynamic_array[ni.number - 1] != 543); ' # Test code for whether the C compiler supports C11 (global declarations) ac_c_conftest_c11_globals=' /* Does the compiler advertise C11 conformance? */ #if !defined __STDC_VERSION__ || __STDC_VERSION__ < 201112L # error "Compiler does not advertise C11 conformance" #endif // Check _Alignas. char _Alignas (double) aligned_as_double; char _Alignas (0) no_special_alignment; extern char aligned_as_int; char _Alignas (0) _Alignas (int) aligned_as_int; // Check _Alignof. enum { int_alignment = _Alignof (int), int_array_alignment = _Alignof (int[100]), char_alignment = _Alignof (char) }; _Static_assert (0 < -_Alignof (int), "_Alignof is signed"); // Check _Noreturn. int _Noreturn does_not_return (void) { for (;;) continue; } // Check _Static_assert. struct test_static_assert { int x; _Static_assert (sizeof (int) <= sizeof (long int), "_Static_assert does not work in struct"); long int y; }; // Check UTF-8 literals. #define u8 syntax error! char const utf8_literal[] = u8"happens to be ASCII" "another string"; // Check duplicate typedefs. typedef long *long_ptr; typedef long int *long_ptr; typedef long_ptr long_ptr; // Anonymous structures and unions -- taken from C11 6.7.2.1 Example 1. struct anonymous { union { struct { int i; int j; }; struct { int k; long int l; } w; }; int m; } v1; ' # Test code for whether the C compiler supports C11 (body of main). ac_c_conftest_c11_main=' _Static_assert ((offsetof (struct anonymous, i) == offsetof (struct anonymous, w.k)), "Anonymous union alignment botch"); v1.i = 2; v1.w.k = 5; ok |= v1.i != 5; ' # Test code for whether the C compiler supports C11 (complete). ac_c_conftest_c11_program="${ac_c_conftest_c89_globals} ${ac_c_conftest_c99_globals} ${ac_c_conftest_c11_globals} int main (int argc, char **argv) { int ok = 0; ${ac_c_conftest_c89_main} ${ac_c_conftest_c99_main} ${ac_c_conftest_c11_main} return ok; } " # Test code for whether the C compiler supports C99 (complete). ac_c_conftest_c99_program="${ac_c_conftest_c89_globals} ${ac_c_conftest_c99_globals} int main (int argc, char **argv) { int ok = 0; ${ac_c_conftest_c89_main} ${ac_c_conftest_c99_main} return ok; } " # Test code for whether the C compiler supports C89 (complete). ac_c_conftest_c89_program="${ac_c_conftest_c89_globals} int main (int argc, char **argv) { int ok = 0; ${ac_c_conftest_c89_main} return ok; } " as_fn_append ac_header_c_list " stdio.h stdio_h HAVE_STDIO_H" as_fn_append ac_header_c_list " stdlib.h stdlib_h HAVE_STDLIB_H" as_fn_append ac_header_c_list " string.h string_h HAVE_STRING_H" as_fn_append ac_header_c_list " inttypes.h inttypes_h HAVE_INTTYPES_H" as_fn_append ac_header_c_list " stdint.h stdint_h HAVE_STDINT_H" as_fn_append ac_header_c_list " strings.h strings_h HAVE_STRINGS_H" as_fn_append ac_header_c_list " sys/stat.h sys_stat_h HAVE_SYS_STAT_H" as_fn_append ac_header_c_list " sys/types.h sys_types_h HAVE_SYS_TYPES_H" as_fn_append ac_header_c_list " unistd.h unistd_h HAVE_UNISTD_H" as_fn_append ac_header_c_list " wchar.h wchar_h HAVE_WCHAR_H" as_fn_append ac_header_c_list " minix/config.h minix_config_h HAVE_MINIX_CONFIG_H" as_fn_append ac_header_c_list " limits.h limits_h HAVE_LIMITS_H" as_fn_append ac_header_c_list " threads.h threads_h HAVE_THREADS_H" as_fn_append ac_header_c_list " pthread.h pthread_h HAVE_PTHREAD_H" as_fn_append ac_func_c_list " _set_invalid_parameter_handler HAVE__SET_INVALID_PARAMETER_HANDLER" as_fn_append ac_header_c_list " sys/socket.h sys_socket_h HAVE_SYS_SOCKET_H" as_fn_append ac_header_c_list " error.h error_h HAVE_ERROR_H" as_fn_append ac_func_c_list " fcntl HAVE_FCNTL" as_fn_append ac_func_c_list " symlink HAVE_SYMLINK" as_fn_append ac_func_c_list " getdtablesize HAVE_GETDTABLESIZE" as_fn_append ac_func_c_list " getexecname HAVE_GETEXECNAME" as_fn_append ac_header_c_list " mntent.h mntent_h HAVE_MNTENT_H" as_fn_append ac_func_c_list " lstat HAVE_LSTAT" as_fn_append ac_header_c_list " sys/param.h sys_param_h HAVE_SYS_PARAM_H" as_fn_append ac_func_c_list " sigaction HAVE_SIGACTION" as_fn_append ac_func_c_list " sigaltstack HAVE_SIGALTSTACK" as_fn_append ac_func_c_list " siginterrupt HAVE_SIGINTERRUPT" as_fn_append ac_header_c_list " sys/time.h sys_time_h HAVE_SYS_TIME_H" as_fn_append ac_header_c_list " stdbool.h stdbool_h HAVE_STDBOOL_H" as_fn_append ac_header_c_list " stdckdint.h stdckdint_h HAVE_STDCKDINT_H" as_fn_append ac_func_c_list " mquery HAVE_MQUERY" as_fn_append ac_func_c_list " pstat_getprocvm HAVE_PSTAT_GETPROCVM" # Auxiliary files required by this configure script. ac_aux_files="ltmain.sh config.guess config.sub compile missing install-sh" # Locations in which to look for auxiliary files. ac_aux_dir_candidates="${srcdir}/build-aux" # Search for a directory containing all of the required auxiliary files, # $ac_aux_files, from the $PATH-style list $ac_aux_dir_candidates. # If we don't find one directory that contains all the files we need, # we report the set of missing files from the *first* directory in # $ac_aux_dir_candidates and give up. ac_missing_aux_files="" ac_first_candidate=: printf "%s\n" "$as_me:${as_lineno-$LINENO}: looking for aux files: $ac_aux_files" >&5 as_save_IFS=$IFS; IFS=$PATH_SEPARATOR as_found=false for as_dir in $ac_aux_dir_candidates do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac as_found=: printf "%s\n" "$as_me:${as_lineno-$LINENO}: trying $as_dir" >&5 ac_aux_dir_found=yes ac_install_sh= for ac_aux in $ac_aux_files do # As a special case, if "install-sh" is required, that requirement # can be satisfied by any of "install-sh", "install.sh", or "shtool", # and $ac_install_sh is set appropriately for whichever one is found. if test x"$ac_aux" = x"install-sh" then if test -f "${as_dir}install-sh"; then printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}install-sh found" >&5 ac_install_sh="${as_dir}install-sh -c" elif test -f "${as_dir}install.sh"; then printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}install.sh found" >&5 ac_install_sh="${as_dir}install.sh -c" elif test -f "${as_dir}shtool"; then printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}shtool found" >&5 ac_install_sh="${as_dir}shtool install -c" else ac_aux_dir_found=no if $ac_first_candidate; then ac_missing_aux_files="${ac_missing_aux_files} install-sh" else break fi fi else if test -f "${as_dir}${ac_aux}"; then printf "%s\n" "$as_me:${as_lineno-$LINENO}: ${as_dir}${ac_aux} found" >&5 else ac_aux_dir_found=no if $ac_first_candidate; then ac_missing_aux_files="${ac_missing_aux_files} ${ac_aux}" else break fi fi fi done if test "$ac_aux_dir_found" = yes; then ac_aux_dir="$as_dir" break fi ac_first_candidate=false as_found=false done IFS=$as_save_IFS if $as_found then : else case e in #( e) as_fn_error $? "cannot find required auxiliary files:$ac_missing_aux_files" "$LINENO" 5 ;; esac fi # These three variables are undocumented and unsupported, # and are intended to be withdrawn in a future Autoconf release. # They can cause serious problems if a builder's source tree is in a directory # whose full name contains unusual characters. if test -f "${ac_aux_dir}config.guess"; then ac_config_guess="$SHELL ${ac_aux_dir}config.guess" fi if test -f "${ac_aux_dir}config.sub"; then ac_config_sub="$SHELL ${ac_aux_dir}config.sub" fi if test -f "$ac_aux_dir/configure"; then ac_configure="$SHELL ${ac_aux_dir}configure" fi # Check that the precious variables saved in the cache have kept the same # value. ac_cache_corrupted=false for ac_var in $ac_precious_vars; do eval ac_old_set=\$ac_cv_env_${ac_var}_set eval ac_new_set=\$ac_env_${ac_var}_set eval ac_old_val=\$ac_cv_env_${ac_var}_value eval ac_new_val=\$ac_env_${ac_var}_value case $ac_old_set,$ac_new_set in set,) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' was set to '$ac_old_val' in the previous run" >&5 printf "%s\n" "$as_me: error: '$ac_var' was set to '$ac_old_val' in the previous run" >&2;} ac_cache_corrupted=: ;; ,set) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' was not set in the previous run" >&5 printf "%s\n" "$as_me: error: '$ac_var' was not set in the previous run" >&2;} ac_cache_corrupted=: ;; ,);; *) if test "x$ac_old_val" != "x$ac_new_val"; then # differences in whitespace do not lead to failure. ac_old_val_w=`echo x $ac_old_val` ac_new_val_w=`echo x $ac_new_val` if test "$ac_old_val_w" != "$ac_new_val_w"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: '$ac_var' has changed since the previous run:" >&5 printf "%s\n" "$as_me: error: '$ac_var' has changed since the previous run:" >&2;} ac_cache_corrupted=: else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: warning: ignoring whitespace changes in '$ac_var' since the previous run:" >&5 printf "%s\n" "$as_me: warning: ignoring whitespace changes in '$ac_var' since the previous run:" >&2;} eval $ac_var=\$ac_old_val fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: former value: '$ac_old_val'" >&5 printf "%s\n" "$as_me: former value: '$ac_old_val'" >&2;} { printf "%s\n" "$as_me:${as_lineno-$LINENO}: current value: '$ac_new_val'" >&5 printf "%s\n" "$as_me: current value: '$ac_new_val'" >&2;} fi;; esac # Pass precious variables to config.status. if test "$ac_new_set" = set; then case $ac_new_val in *\'*) ac_arg=$ac_var=`printf "%s\n" "$ac_new_val" | sed "s/'/'\\\\\\\\''/g"` ;; *) ac_arg=$ac_var=$ac_new_val ;; esac case " $ac_configure_args " in *" '$ac_arg' "*) ;; # Avoid dups. Use of quotes ensures accuracy. *) as_fn_append ac_configure_args " '$ac_arg'" ;; esac fi done if $ac_cache_corrupted; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: changes in the environment can compromise the build" >&5 printf "%s\n" "$as_me: error: changes in the environment can compromise the build" >&2;} as_fn_error $? "run '${MAKE-make} distclean' and/or 'rm $cache_file' and start over" "$LINENO" 5 fi ## -------------------- ## ## Main body of script. ## ## -------------------- ## ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu am__api_version='1.17' # Find a good install program. We prefer a C program (faster), # so one script is as good as another. But avoid the broken or # incompatible versions: # SysV /etc/install, /usr/sbin/install # SunOS /usr/etc/install # IRIX /sbin/install # AIX /bin/install # AmigaOS /C/install, which installs bootblocks on floppy discs # AIX 4 /usr/bin/installbsd, which doesn't work without a -g flag # AFS /usr/afsws/bin/install, which mishandles nonexistent args # SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff" # OS/2's system install, which has a completely different semantic # ./install, which can be erroneously created by make from ./install.sh. # Reject install programs that cannot install multiple files. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5 printf %s "checking for a BSD-compatible install... " >&6; } if test -z "$INSTALL"; then if test ${ac_cv_path_install+y} then : printf %s "(cached) " >&6 else case e in #( e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac # Account for fact that we put trailing slashes in our PATH walk. case $as_dir in #(( ./ | /[cC]/* | \ /etc/* | /usr/sbin/* | /usr/etc/* | /sbin/* | /usr/afsws/bin/* | \ ?:[\\/]os2[\\/]install[\\/]* | ?:[\\/]OS2[\\/]INSTALL[\\/]* | \ /usr/ucb/* ) ;; *) # OSF1 and SCO ODT 3.0 have their own names for install. # Don't use installbsd from OSF since it installs stuff as root # by default. for ac_prog in ginstall scoinst install; do for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_prog$ac_exec_ext"; then if test $ac_prog = install && grep dspmsg "$as_dir$ac_prog$ac_exec_ext" >/dev/null 2>&1; then # AIX install. It has an incompatible calling convention. : elif test $ac_prog = install && grep pwplus "$as_dir$ac_prog$ac_exec_ext" >/dev/null 2>&1; then # program-specific install script used by HP pwplus--don't use. : else rm -rf conftest.one conftest.two conftest.dir echo one > conftest.one echo two > conftest.two mkdir conftest.dir if "$as_dir$ac_prog$ac_exec_ext" -c conftest.one conftest.two "`pwd`/conftest.dir/" && test -s conftest.one && test -s conftest.two && test -s conftest.dir/conftest.one && test -s conftest.dir/conftest.two then ac_cv_path_install="$as_dir$ac_prog$ac_exec_ext -c" break 3 fi fi fi done done ;; esac done IFS=$as_save_IFS rm -rf conftest.one conftest.two conftest.dir ;; esac fi if test ${ac_cv_path_install+y}; then INSTALL=$ac_cv_path_install else # As a last resort, use the slow shell script. Don't cache a # value for INSTALL within a source directory, because that will # break other packages using the cache if that directory is # removed, or if the value is a relative name. INSTALL=$ac_install_sh fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $INSTALL" >&5 printf "%s\n" "$INSTALL" >&6; } # Use test -z because SunOS4 sh mishandles braces in ${var-val}. # It thinks the first close brace ends the variable substitution. test -z "$INSTALL_PROGRAM" && INSTALL_PROGRAM='${INSTALL}' test -z "$INSTALL_SCRIPT" && INSTALL_SCRIPT='${INSTALL}' test -z "$INSTALL_DATA" && INSTALL_DATA='${INSTALL} -m 644' { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether sleep supports fractional seconds" >&5 printf %s "checking whether sleep supports fractional seconds... " >&6; } if test ${am_cv_sleep_fractional_seconds+y} then : printf %s "(cached) " >&6 else case e in #( e) if sleep 0.001 2>/dev/null then : am_cv_sleep_fractional_seconds=yes else case e in #( e) am_cv_sleep_fractional_seconds=no ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_sleep_fractional_seconds" >&5 printf "%s\n" "$am_cv_sleep_fractional_seconds" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking filesystem timestamp resolution" >&5 printf %s "checking filesystem timestamp resolution... " >&6; } if test ${am_cv_filesystem_timestamp_resolution+y} then : printf %s "(cached) " >&6 else case e in #( e) # Default to the worst case. am_cv_filesystem_timestamp_resolution=2 # Only try to go finer than 1 sec if sleep can do it. # Don't try 1 sec, because if 0.01 sec and 0.1 sec don't work, # - 1 sec is not much of a win compared to 2 sec, and # - it takes 2 seconds to perform the test whether 1 sec works. # # Instead, just use the default 2s on platforms that have 1s resolution, # accept the extra 1s delay when using $sleep in the Automake tests, in # exchange for not incurring the 2s delay for running the test for all # packages. # am_try_resolutions= if test "$am_cv_sleep_fractional_seconds" = yes; then # Even a millisecond often causes a bunch of false positives, # so just try a hundredth of a second. The time saved between .001 and # .01 is not terribly consequential. am_try_resolutions="0.01 0.1 $am_try_resolutions" fi # In order to catch current-generation FAT out, we must *modify* files # that already exist; the *creation* timestamp is finer. Use names # that make ls -t sort them differently when they have equal # timestamps than when they have distinct timestamps, keeping # in mind that ls -t prints the *newest* file first. rm -f conftest.ts? : > conftest.ts1 : > conftest.ts2 : > conftest.ts3 # Make sure ls -t actually works. Do 'set' in a subshell so we don't # clobber the current shell's arguments. (Outer-level square brackets # are removed by m4; they're present so that m4 does not expand # ; be careful, easy to get confused.) if ( set X `ls -t conftest.ts[12]` && { test "$*" != "X conftest.ts1 conftest.ts2" || test "$*" != "X conftest.ts2 conftest.ts1"; } ); then :; else # If neither matched, then we have a broken ls. This can happen # if, for instance, CONFIG_SHELL is bash and it inherits a # broken ls alias from the environment. This has actually # happened. Such a system could not be considered "sane". printf "%s\n" ""Bad output from ls -t: \"`ls -t conftest.ts[12]`\""" >&5 { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "ls -t produces unexpected output. Make sure there is not a broken ls alias in your environment. See 'config.log' for more details" "$LINENO" 5; } fi for am_try_res in $am_try_resolutions; do # Any one fine-grained sleep might happen to cross the boundary # between two values of a coarser actual resolution, but if we do # two fine-grained sleeps in a row, at least one of them will fall # entirely within a coarse interval. echo alpha > conftest.ts1 sleep $am_try_res echo beta > conftest.ts2 sleep $am_try_res echo gamma > conftest.ts3 # We assume that 'ls -t' will make use of high-resolution # timestamps if the operating system supports them at all. if (set X `ls -t conftest.ts?` && test "$2" = conftest.ts3 && test "$3" = conftest.ts2 && test "$4" = conftest.ts1); then # # Ok, ls -t worked. If we're at a resolution of 1 second, we're done, # because we don't need to test make. make_ok=true if test $am_try_res != 1; then # But if we've succeeded so far with a subsecond resolution, we # have one more thing to check: make. It can happen that # everything else supports the subsecond mtimes, but make doesn't; # notably on macOS, which ships make 3.81 from 2006 (the last one # released under GPLv2). https://bugs.gnu.org/68808 # # We test $MAKE if it is defined in the environment, else "make". # It might get overridden later, but our hope is that in practice # it does not matter: it is the system "make" which is (by far) # the most likely to be broken, whereas if the user overrides it, # probably they did so with a better, or at least not worse, make. # https://lists.gnu.org/archive/html/automake/2024-06/msg00051.html # # Create a Makefile (real tab character here): rm -f conftest.mk echo 'conftest.ts1: conftest.ts2' >conftest.mk echo ' touch conftest.ts2' >>conftest.mk # # Now, running # touch conftest.ts1; touch conftest.ts2; make # should touch ts1 because ts2 is newer. This could happen by luck, # but most often, it will fail if make's support is insufficient. So # test for several consecutive successes. # # (We reuse conftest.ts[12] because we still want to modify existing # files, not create new ones, per above.) n=0 make=${MAKE-make} until test $n -eq 3; do echo one > conftest.ts1 sleep $am_try_res echo two > conftest.ts2 # ts2 should now be newer than ts1 if $make -f conftest.mk | grep 'up to date' >/dev/null; then make_ok=false break # out of $n loop fi n=`expr $n + 1` done fi # if $make_ok; then # Everything we know to check worked out, so call this resolution good. am_cv_filesystem_timestamp_resolution=$am_try_res break # out of $am_try_res loop fi # Otherwise, we'll go on to check the next resolution. fi done rm -f conftest.ts? # (end _am_filesystem_timestamp_resolution) ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_filesystem_timestamp_resolution" >&5 printf "%s\n" "$am_cv_filesystem_timestamp_resolution" >&6; } # This check should not be cached, as it may vary across builds of # different projects. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether build environment is sane" >&5 printf %s "checking whether build environment is sane... " >&6; } # Reject unsafe characters in $srcdir or the absolute working directory # name. Accept space and tab only in the latter. am_lf=' ' case `pwd` in *[\\\"\#\$\&\'\`$am_lf]*) as_fn_error $? "unsafe absolute working directory name" "$LINENO" 5;; esac case $srcdir in *[\\\"\#\$\&\'\`$am_lf\ \ ]*) as_fn_error $? "unsafe srcdir value: '$srcdir'" "$LINENO" 5;; esac # Do 'set' in a subshell so we don't clobber the current shell's # arguments. Must try -L first in case configure is actually a # symlink; some systems play weird games with the mod time of symlinks # (eg FreeBSD returns the mod time of the symlink's containing # directory). am_build_env_is_sane=no am_has_slept=no rm -f conftest.file for am_try in 1 2; do echo "timestamp, slept: $am_has_slept" > conftest.file if ( set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null` if test "$*" = "X"; then # -L didn't work. set X `ls -t "$srcdir/configure" conftest.file` fi test "$2" = conftest.file ); then am_build_env_is_sane=yes break fi # Just in case. sleep "$am_cv_filesystem_timestamp_resolution" am_has_slept=yes done { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_build_env_is_sane" >&5 printf "%s\n" "$am_build_env_is_sane" >&6; } if test "$am_build_env_is_sane" = no; then as_fn_error $? "newly created file is older than distributed files! Check your system clock" "$LINENO" 5 fi # If we didn't sleep, we still need to ensure time stamps of config.status and # generated files are strictly newer. am_sleep_pid= if test -e conftest.file || grep 'slept: no' conftest.file >/dev/null 2>&1 then : else case e in #( e) ( sleep "$am_cv_filesystem_timestamp_resolution" ) & am_sleep_pid=$! ;; esac fi rm -f conftest.file test "$program_prefix" != NONE && program_transform_name="s&^&$program_prefix&;$program_transform_name" # Use a double $ so make ignores it. test "$program_suffix" != NONE && program_transform_name="s&\$&$program_suffix&;$program_transform_name" # Double any \ or $. # By default was 's,x,x', remove it if useless. ac_script='s/[\\$]/&&/g;s/;s,x,x,$//' program_transform_name=`printf "%s\n" "$program_transform_name" | sed "$ac_script"` # Expand $ac_aux_dir to an absolute path. am_aux_dir=`cd "$ac_aux_dir" && pwd` if test x"${MISSING+set}" != xset; then MISSING="\${SHELL} '$am_aux_dir/missing'" fi # Use eval to expand $SHELL if eval "$MISSING --is-lightweight"; then am_missing_run="$MISSING " else am_missing_run= { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: 'missing' script is too old or missing" >&5 printf "%s\n" "$as_me: WARNING: 'missing' script is too old or missing" >&2;} fi if test x"${install_sh+set}" != xset; then case $am_aux_dir in *\ * | *\ *) install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;; *) install_sh="\${SHELL} $am_aux_dir/install-sh" esac fi # Installed binaries are usually stripped using 'strip' when the user # run "make install-strip". However 'strip' might not be the right # tool to use in cross-compilation environments, therefore Automake # will honor the 'STRIP' environment variable to overrule this program. if test "$cross_compiling" != no; then if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}strip", so it can be a program name with args. set dummy ${ac_tool_prefix}strip; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_STRIP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$STRIP"; then ac_cv_prog_STRIP="$STRIP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_STRIP="${ac_tool_prefix}strip" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi STRIP=$ac_cv_prog_STRIP if test -n "$STRIP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $STRIP" >&5 printf "%s\n" "$STRIP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_STRIP"; then ac_ct_STRIP=$STRIP # Extract the first word of "strip", so it can be a program name with args. set dummy strip; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_STRIP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_STRIP"; then ac_cv_prog_ac_ct_STRIP="$ac_ct_STRIP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_STRIP="strip" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_STRIP=$ac_cv_prog_ac_ct_STRIP if test -n "$ac_ct_STRIP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_STRIP" >&5 printf "%s\n" "$ac_ct_STRIP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_STRIP" = x; then STRIP=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac STRIP=$ac_ct_STRIP fi else STRIP="$ac_cv_prog_STRIP" fi fi INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a race-free mkdir -p" >&5 printf %s "checking for a race-free mkdir -p... " >&6; } if test -z "$MKDIR_P"; then if test ${ac_cv_path_mkdir+y} then : printf %s "(cached) " >&6 else case e in #( e) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/opt/sfw/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in mkdir gmkdir; do for ac_exec_ext in '' $ac_executable_extensions; do as_fn_executable_p "$as_dir$ac_prog$ac_exec_ext" || continue case `"$as_dir$ac_prog$ac_exec_ext" --version 2>&1` in #( 'mkdir ('*'coreutils) '* | \ *'BusyBox '* | \ 'mkdir (fileutils) '4.1*) ac_cv_path_mkdir=$as_dir$ac_prog$ac_exec_ext break 3;; esac done done done IFS=$as_save_IFS ;; esac fi test -d ./--version && rmdir ./--version if test ${ac_cv_path_mkdir+y}; then MKDIR_P="$ac_cv_path_mkdir -p" else # As a last resort, use plain mkdir -p, # in the hope it doesn't have the bugs of ancient mkdir. MKDIR_P='mkdir -p' fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $MKDIR_P" >&5 printf "%s\n" "$MKDIR_P" >&6; } for ac_prog in gawk mawk nawk awk do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_AWK+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$AWK"; then ac_cv_prog_AWK="$AWK" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_AWK="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi AWK=$ac_cv_prog_AWK if test -n "$AWK"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AWK" >&5 printf "%s\n" "$AWK" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$AWK" && break done { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5 printf %s "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } set x ${MAKE-make} ac_make=`printf "%s\n" "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` if eval test \${ac_cv_prog_make_${ac_make}_set+y} then : printf %s "(cached) " >&6 else case e in #( e) cat >conftest.make <<\_ACEOF SHELL = /bin/sh all: @echo '@@@%%%=$(MAKE)=@@@%%%' _ACEOF # GNU make sometimes prints "make[1]: Entering ...", which would confuse us. case `${MAKE-make} -f conftest.make 2>/dev/null` in *@@@%%%=?*=@@@%%%*) eval ac_cv_prog_make_${ac_make}_set=yes;; *) eval ac_cv_prog_make_${ac_make}_set=no;; esac rm -f conftest.make ;; esac fi if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } SET_MAKE= else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } SET_MAKE="MAKE=${MAKE-make}" fi rm -rf .tst 2>/dev/null mkdir .tst 2>/dev/null if test -d .tst; then am__leading_dot=. else am__leading_dot=_ fi rmdir .tst 2>/dev/null AM_DEFAULT_VERBOSITY=1 # Check whether --enable-silent-rules was given. if test ${enable_silent_rules+y} then : enableval=$enable_silent_rules; fi am_make=${MAKE-make} { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $am_make supports nested variables" >&5 printf %s "checking whether $am_make supports nested variables... " >&6; } if test ${am_cv_make_support_nested_variables+y} then : printf %s "(cached) " >&6 else case e in #( e) if printf "%s\n" 'TRUE=$(BAR$(V)) BAR0=false BAR1=true V=1 am__doit: @$(TRUE) .PHONY: am__doit' | $am_make -f - >/dev/null 2>&1; then am_cv_make_support_nested_variables=yes else am_cv_make_support_nested_variables=no fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_make_support_nested_variables" >&5 printf "%s\n" "$am_cv_make_support_nested_variables" >&6; } AM_BACKSLASH='\' am__rm_f_notfound= if (rm -f && rm -fr && rm -rf) 2>/dev/null then : else case e in #( e) am__rm_f_notfound='""' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking xargs -n works" >&5 printf %s "checking xargs -n works... " >&6; } if test ${am_cv_xargs_n_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "`echo 1 2 3 | xargs -n2 echo`" = "1 2 3" then : am_cv_xargs_n_works=yes else case e in #( e) am_cv_xargs_n_works=no ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_xargs_n_works" >&5 printf "%s\n" "$am_cv_xargs_n_works" >&6; } if test "$am_cv_xargs_n_works" = yes then : am__xargs_n='xargs -n' else case e in #( e) am__xargs_n='am__xargs_n () { shift; sed "s/ /\\n/g" | while read am__xargs_n_arg; do "" "$am__xargs_n_arg"; done; }' ;; esac fi if test "`cd $srcdir && pwd`" != "`pwd`"; then # Use -I$(srcdir) only when $(srcdir) != ., so that make's output # is not polluted with repeated "-I." am__isrc=' -I$(srcdir)' # test to see if srcdir already configured if test -f $srcdir/config.status; then as_fn_error $? "source directory already configured; run \"make distclean\" there first" "$LINENO" 5 fi fi # test whether we have cygpath if test -z "$CYGPATH_W"; then if (cygpath --version) >/dev/null 2>/dev/null; then CYGPATH_W='cygpath -w' else CYGPATH_W=echo fi fi # Define the identity of the package. PACKAGE='libffcall' VERSION='2.5' printf "%s\n" "#define PACKAGE \"$PACKAGE\"" >>confdefs.h printf "%s\n" "#define VERSION \"$VERSION\"" >>confdefs.h # Some tools Automake needs. ACLOCAL=${ACLOCAL-"${am_missing_run}aclocal-${am__api_version}"} AUTOCONF=${AUTOCONF-"${am_missing_run}autoconf"} AUTOMAKE=${AUTOMAKE-"${am_missing_run}automake-${am__api_version}"} AUTOHEADER=${AUTOHEADER-"${am_missing_run}autoheader"} MAKEINFO=${MAKEINFO-"${am_missing_run}makeinfo"} # For better backward compatibility. To be removed once Automake 1.9.x # dies out for good. For more background, see: # # mkdir_p='$(MKDIR_P)' # We need awk for the "check" target (and possibly the TAP driver). The # system "awk" is bad on some platforms. # Always define AMTAR for backward compatibility. Yes, it's still used # in the wild :-( We should find a proper way to deprecate it ... AMTAR='$${TAR-tar}' # We'll loop over all known methods to create a tar archive until one works. _am_tools='gnutar pax cpio none' am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -' # Variables for tags utilities; see am/tags.am if test -z "$CTAGS"; then CTAGS=ctags fi if test -z "$ETAGS"; then ETAGS=etags fi if test -z "$CSCOPE"; then CSCOPE=cscope fi ac_config_headers="$ac_config_headers config.h" ac_config_headers="$ac_config_headers ffcall-version.h:ffcall-version.in.h" ac_config_files="$ac_config_files Makefile" ac_config_files="$ac_config_files gnulib-lib/Makefile" ac_config_files="$ac_config_files avcall/Makefile" ac_config_files="$ac_config_files vacall/Makefile" ac_config_files="$ac_config_files trampoline/Makefile" ac_config_files="$ac_config_files callback/Makefile" ac_config_files="$ac_config_files callback/vacall_r/Makefile" ac_config_files="$ac_config_files callback/trampoline_r/Makefile" sed_extract_major='/^[0-9]/{s/^\([0-9]*\).*/\1/p;q;} i\ 0 q ' sed_extract_minor='/^[0-9][0-9]*[.][0-9]/{s/^[0-9]*[.]\([0-9]*\).*/\1/p;q;} i\ 0 q ' version_major=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_major"` version_minor=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_minor"` HEXVERSION=`printf '0x%02X%02X' $version_major $version_minor` printf "%s\n" "#define LIBFFCALL_VERSION $HEXVERSION" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} sets \$(MAKE)" >&5 printf %s "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } set x ${MAKE-make} ac_make=`printf "%s\n" "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` if eval test \${ac_cv_prog_make_${ac_make}_set+y} then : printf %s "(cached) " >&6 else case e in #( e) cat >conftest.make <<\_ACEOF SHELL = /bin/sh all: @echo '@@@%%%=$(MAKE)=@@@%%%' _ACEOF # GNU make sometimes prints "make[1]: Entering ...", which would confuse us. case `${MAKE-make} -f conftest.make 2>/dev/null` in *@@@%%%=?*=@@@%%%*) eval ac_cv_prog_make_${ac_make}_set=yes;; *) eval ac_cv_prog_make_${ac_make}_set=no;; esac rm -f conftest.make ;; esac fi if eval test \$ac_cv_prog_make_${ac_make}_set = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } SET_MAKE= else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } SET_MAKE="MAKE=${MAKE-make}" fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}gcc", so it can be a program name with args. set dummy ${ac_tool_prefix}gcc; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CC="${ac_tool_prefix}gcc" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CC=$ac_cv_prog_CC if test -n "$CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 printf "%s\n" "$CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_CC"; then ac_ct_CC=$CC # Extract the first word of "gcc", so it can be a program name with args. set dummy gcc; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_CC"; then ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CC="gcc" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_CC=$ac_cv_prog_ac_ct_CC if test -n "$ac_ct_CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 printf "%s\n" "$ac_ct_CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_CC" = x; then CC="" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac CC=$ac_ct_CC fi else CC="$ac_cv_prog_CC" fi if test -z "$CC"; then if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}cc", so it can be a program name with args. set dummy ${ac_tool_prefix}cc; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CC="${ac_tool_prefix}cc" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CC=$ac_cv_prog_CC if test -n "$CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 printf "%s\n" "$CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi fi if test -z "$CC"; then # Extract the first word of "cc", so it can be a program name with args. set dummy cc; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else ac_prog_rejected=no as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then if test "$as_dir$ac_word$ac_exec_ext" = "/usr/ucb/cc"; then ac_prog_rejected=yes continue fi ac_cv_prog_CC="cc" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS if test $ac_prog_rejected = yes; then # We found a bogon in the path, so make sure we never use it. set dummy $ac_cv_prog_CC shift if test $# != 0; then # We chose a different compiler from the bogus one. # However, it has the same basename, so the bogon will be chosen # first if we set CC to just the basename; use the full file name. shift ac_cv_prog_CC="$as_dir$ac_word${1+' '}$@" fi fi fi ;; esac fi CC=$ac_cv_prog_CC if test -n "$CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 printf "%s\n" "$CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$CC"; then if test -n "$ac_tool_prefix"; then for ac_prog in cl.exe do # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. set dummy $ac_tool_prefix$ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CC="$ac_tool_prefix$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CC=$ac_cv_prog_CC if test -n "$CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 printf "%s\n" "$CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$CC" && break done fi if test -z "$CC"; then ac_ct_CC=$CC for ac_prog in cl.exe do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_CC"; then ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CC="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_CC=$ac_cv_prog_ac_ct_CC if test -n "$ac_ct_CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 printf "%s\n" "$ac_ct_CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$ac_ct_CC" && break done if test "x$ac_ct_CC" = x; then CC="" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac CC=$ac_ct_CC fi fi fi if test -z "$CC"; then if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}clang", so it can be a program name with args. set dummy ${ac_tool_prefix}clang; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CC="${ac_tool_prefix}clang" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CC=$ac_cv_prog_CC if test -n "$CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CC" >&5 printf "%s\n" "$CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_CC"; then ac_ct_CC=$CC # Extract the first word of "clang", so it can be a program name with args. set dummy clang; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_CC+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_CC"; then ac_cv_prog_ac_ct_CC="$ac_ct_CC" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CC="clang" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_CC=$ac_cv_prog_ac_ct_CC if test -n "$ac_ct_CC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CC" >&5 printf "%s\n" "$ac_ct_CC" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_CC" = x; then CC="" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac CC=$ac_ct_CC fi else CC="$ac_cv_prog_CC" fi fi test -z "$CC" && { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "no acceptable C compiler found in \$PATH See 'config.log' for more details" "$LINENO" 5; } # Provide some information about the compiler. printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5 set X $ac_compile ac_compiler=$2 for ac_option in --version -v -V -qversion -version; do { { ac_try="$ac_compiler $ac_option >&5" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_compiler $ac_option >&5") 2>conftest.err ac_status=$? if test -s conftest.err; then sed '10a\ ... rest of stderr output deleted ... 10q' conftest.err >conftest.er1 cat conftest.er1 >&5 fi rm -f conftest.er1 conftest.err printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } done cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF ac_clean_files_save=$ac_clean_files ac_clean_files="$ac_clean_files a.out a.out.dSYM a.exe b.out" # Try to create an executable without -o first, disregard a.out. # It will help us diagnose broken compilers, and finding out an intuition # of exeext. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C compiler works" >&5 printf %s "checking whether the C compiler works... " >&6; } ac_link_default=`printf "%s\n" "$ac_link" | sed 's/ -o *conftest[^ ]*//'` # The possible output files: ac_files="a.out conftest.exe conftest a.exe a_out.exe b.out conftest.*" ac_rmfiles= for ac_file in $ac_files do case $ac_file in *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;; * ) ac_rmfiles="$ac_rmfiles $ac_file";; esac done rm -f $ac_rmfiles if { { ac_try="$ac_link_default" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link_default") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } then : # Autoconf-2.13 could set the ac_cv_exeext variable to 'no'. # So ignore a value of 'no', otherwise this would lead to 'EXEEXT = no' # in a Makefile. We should not override ac_cv_exeext if it was cached, # so that the user can short-circuit this test for compilers unknown to # Autoconf. for ac_file in $ac_files '' do test -f "$ac_file" || continue case $ac_file in *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;; [ab].out ) # We found the default executable, but exeext='' is most # certainly right. break;; *.* ) if test ${ac_cv_exeext+y} && test "$ac_cv_exeext" != no; then :; else ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'` fi # We set ac_cv_exeext here because the later test for it is not # safe: cross compilers may not add the suffix if given an '-o' # argument, so we may need to know it at that point already. # Even if this section looks crufty: it has the advantage of # actually working. break;; * ) break;; esac done test "$ac_cv_exeext" = no && ac_cv_exeext= else case e in #( e) ac_file='' ;; esac fi if test -z "$ac_file" then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error 77 "C compiler cannot create executables See 'config.log' for more details" "$LINENO" 5; } else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler default output file name" >&5 printf %s "checking for C compiler default output file name... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_file" >&5 printf "%s\n" "$ac_file" >&6; } ac_exeext=$ac_cv_exeext rm -f -r a.out a.out.dSYM a.exe conftest$ac_cv_exeext b.out ac_clean_files=$ac_clean_files_save { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for suffix of executables" >&5 printf %s "checking for suffix of executables... " >&6; } if { { ac_try="$ac_link" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } then : # If both 'conftest.exe' and 'conftest' are 'present' (well, observable) # catch 'conftest.exe'. For instance with Cygwin, 'ls conftest' will # work properly (i.e., refer to 'conftest.exe'), while it won't with # 'rm'. for ac_file in conftest.exe conftest conftest.*; do test -f "$ac_file" || continue case $ac_file in *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM | *.o | *.obj ) ;; *.* ) ac_cv_exeext=`expr "$ac_file" : '[^.]*\(\..*\)'` break;; * ) break;; esac done else case e in #( e) { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "cannot compute suffix of executables: cannot compile and link See 'config.log' for more details" "$LINENO" 5; } ;; esac fi rm -f conftest conftest$ac_cv_exeext { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5 printf "%s\n" "$ac_cv_exeext" >&6; } rm -f conftest.$ac_ext EXEEXT=$ac_cv_exeext ac_exeext=$EXEEXT cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { FILE *f = fopen ("conftest.out", "w"); if (!f) return 1; return ferror (f) || fclose (f) != 0; ; return 0; } _ACEOF ac_clean_files="$ac_clean_files conftest.out" # Check that the compiler produces executables we can run. If not, either # the compiler is broken, or we cross compile. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether we are cross compiling" >&5 printf %s "checking whether we are cross compiling... " >&6; } if test "$cross_compiling" != yes; then { { ac_try="$ac_link" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_link") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } if { ac_try='./conftest$ac_cv_exeext' { { case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_try") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; }; then cross_compiling=no else if test "$cross_compiling" = maybe; then cross_compiling=yes else { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error 77 "cannot run C compiled programs. If you meant to cross compile, use '--host'. See 'config.log' for more details" "$LINENO" 5; } fi fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $cross_compiling" >&5 printf "%s\n" "$cross_compiling" >&6; } rm -f conftest.$ac_ext conftest$ac_cv_exeext \ conftest.o conftest.obj conftest.out ac_clean_files=$ac_clean_files_save { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5 printf %s "checking for suffix of object files... " >&6; } if test ${ac_cv_objext+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF rm -f conftest.o conftest.obj if { { ac_try="$ac_compile" case "(($ac_try" in *\"* | *\`* | *\\*) ac_try_echo=\$ac_try;; *) ac_try_echo=$ac_try;; esac eval ac_try_echo="\"\$as_me:${as_lineno-$LINENO}: $ac_try_echo\"" printf "%s\n" "$ac_try_echo"; } >&5 (eval "$ac_compile") 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } then : for ac_file in conftest.o conftest.obj conftest.*; do test -f "$ac_file" || continue; case $ac_file in *.$ac_ext | *.xcoff | *.tds | *.d | *.pdb | *.xSYM | *.bb | *.bbg | *.map | *.inf | *.dSYM ) ;; *) ac_cv_objext=`expr "$ac_file" : '.*\.\(.*\)'` break;; esac done else case e in #( e) printf "%s\n" "$as_me: failed program was:" >&5 sed 's/^/| /' conftest.$ac_ext >&5 { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "cannot compute suffix of object files: cannot compile See 'config.log' for more details" "$LINENO" 5; } ;; esac fi rm -f conftest.$ac_cv_objext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_objext" >&5 printf "%s\n" "$ac_cv_objext" >&6; } OBJEXT=$ac_cv_objext ac_objext=$OBJEXT { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler supports GNU C" >&5 printf %s "checking whether the compiler supports GNU C... " >&6; } if test ${ac_cv_c_compiler_gnu+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { #ifndef __GNUC__ choke me #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_compiler_gnu=yes else case e in #( e) ac_compiler_gnu=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_cv_c_compiler_gnu=$ac_compiler_gnu ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_compiler_gnu" >&5 printf "%s\n" "$ac_cv_c_compiler_gnu" >&6; } ac_compiler_gnu=$ac_cv_c_compiler_gnu if test $ac_compiler_gnu = yes; then GCC=yes else GCC= fi ac_test_CFLAGS=${CFLAGS+y} ac_save_CFLAGS=$CFLAGS { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5 printf %s "checking whether $CC accepts -g... " >&6; } if test ${ac_cv_prog_cc_g+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_c_werror_flag=$ac_c_werror_flag ac_c_werror_flag=yes ac_cv_prog_cc_g=no CFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_prog_cc_g=yes else case e in #( e) CFLAGS="" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : else case e in #( e) ac_c_werror_flag=$ac_save_c_werror_flag CFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_prog_cc_g=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_c_werror_flag=$ac_save_c_werror_flag ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_g" >&5 printf "%s\n" "$ac_cv_prog_cc_g" >&6; } if test $ac_test_CFLAGS; then CFLAGS=$ac_save_CFLAGS elif test $ac_cv_prog_cc_g = yes; then if test "$GCC" = yes; then CFLAGS="-g -O2" else CFLAGS="-g" fi else if test "$GCC" = yes; then CFLAGS="-O2" else CFLAGS= fi fi ac_prog_cc_stdc=no if test x$ac_prog_cc_stdc = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C11 features" >&5 printf %s "checking for $CC option to enable C11 features... " >&6; } if test ${ac_cv_prog_cc_c11+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_prog_cc_c11=no ac_save_CC=$CC cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_c_conftest_c11_program _ACEOF for ac_arg in '' -std=gnu11 do CC="$ac_save_CC $ac_arg" if ac_fn_c_try_compile "$LINENO" then : ac_cv_prog_cc_c11=$ac_arg fi rm -f core conftest.err conftest.$ac_objext conftest.beam test "x$ac_cv_prog_cc_c11" != "xno" && break done rm -f conftest.$ac_ext CC=$ac_save_CC ;; esac fi if test "x$ac_cv_prog_cc_c11" = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 printf "%s\n" "unsupported" >&6; } else case e in #( e) if test "x$ac_cv_prog_cc_c11" = x then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 printf "%s\n" "none needed" >&6; } else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c11" >&5 printf "%s\n" "$ac_cv_prog_cc_c11" >&6; } CC="$CC $ac_cv_prog_cc_c11" ;; esac fi ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c11 ac_prog_cc_stdc=c11 ;; esac fi fi if test x$ac_prog_cc_stdc = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C99 features" >&5 printf %s "checking for $CC option to enable C99 features... " >&6; } if test ${ac_cv_prog_cc_c99+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_prog_cc_c99=no ac_save_CC=$CC cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_c_conftest_c99_program _ACEOF for ac_arg in '' -std=gnu99 -std=c99 -c99 -qlanglvl=extc1x -qlanglvl=extc99 -AC99 -D_STDC_C99= do CC="$ac_save_CC $ac_arg" if ac_fn_c_try_compile "$LINENO" then : ac_cv_prog_cc_c99=$ac_arg fi rm -f core conftest.err conftest.$ac_objext conftest.beam test "x$ac_cv_prog_cc_c99" != "xno" && break done rm -f conftest.$ac_ext CC=$ac_save_CC ;; esac fi if test "x$ac_cv_prog_cc_c99" = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 printf "%s\n" "unsupported" >&6; } else case e in #( e) if test "x$ac_cv_prog_cc_c99" = x then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 printf "%s\n" "none needed" >&6; } else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c99" >&5 printf "%s\n" "$ac_cv_prog_cc_c99" >&6; } CC="$CC $ac_cv_prog_cc_c99" ;; esac fi ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c99 ac_prog_cc_stdc=c99 ;; esac fi fi if test x$ac_prog_cc_stdc = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to enable C89 features" >&5 printf %s "checking for $CC option to enable C89 features... " >&6; } if test ${ac_cv_prog_cc_c89+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_prog_cc_c89=no ac_save_CC=$CC cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_c_conftest_c89_program _ACEOF for ac_arg in '' -qlanglvl=extc89 -qlanglvl=ansi -std -Ae "-Aa -D_HPUX_SOURCE" "-Xc -D__EXTENSIONS__" do CC="$ac_save_CC $ac_arg" if ac_fn_c_try_compile "$LINENO" then : ac_cv_prog_cc_c89=$ac_arg fi rm -f core conftest.err conftest.$ac_objext conftest.beam test "x$ac_cv_prog_cc_c89" != "xno" && break done rm -f conftest.$ac_ext CC=$ac_save_CC ;; esac fi if test "x$ac_cv_prog_cc_c89" = xno then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: unsupported" >&5 printf "%s\n" "unsupported" >&6; } else case e in #( e) if test "x$ac_cv_prog_cc_c89" = x then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none needed" >&5 printf "%s\n" "none needed" >&6; } else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cc_c89" >&5 printf "%s\n" "$ac_cv_prog_cc_c89" >&6; } CC="$CC $ac_cv_prog_cc_c89" ;; esac fi ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c89 ac_prog_cc_stdc=c89 ;; esac fi fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CC understands -c and -o together" >&5 printf %s "checking whether $CC understands -c and -o together... " >&6; } if test ${am_cv_prog_cc_c_o+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF # Make sure it works both with $CC and with simple cc. # Following AC_PROG_CC_C_O, we do the test twice because some # compilers refuse to overwrite an existing .o file with -o, # though they will create one. am_cv_prog_cc_c_o=yes for am_i in 1 2; do if { echo "$as_me:$LINENO: $CC -c conftest.$ac_ext -o conftest2.$ac_objext" >&5 ($CC -c conftest.$ac_ext -o conftest2.$ac_objext) >&5 2>&5 ac_status=$? echo "$as_me:$LINENO: \$? = $ac_status" >&5 (exit $ac_status); } \ && test -f conftest2.$ac_objext; then : OK else am_cv_prog_cc_c_o=no break fi done rm -f core conftest* unset am_i ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_prog_cc_c_o" >&5 printf "%s\n" "$am_cv_prog_cc_c_o" >&6; } if test "$am_cv_prog_cc_c_o" != yes; then # Losing compiler, so override with the script. # FIXME: It is wrong to rewrite CC. # But if we don't then we get into trouble of one sort or another. # A longer-term fix would be to have automake use am__CC in this case, # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" CC="$am_aux_dir/compile $CC" fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler is clang" >&5 printf %s "checking whether the compiler is clang... " >&6; } if test ${gl_cv_compiler_clang+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __clang__ barfbarf #endif int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_compiler_clang=no else case e in #( e) gl_cv_compiler_clang=yes ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_compiler_clang" >&5 printf "%s\n" "$gl_cv_compiler_clang" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for compiler option needed when checking for declarations" >&5 printf %s "checking for compiler option needed when checking for declarations... " >&6; } if test ${gl_cv_compiler_check_decl_option+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $gl_cv_compiler_clang = yes; then saved_ac_compile="$ac_compile" ac_compile="$ac_compile -Werror=implicit-function-declaration" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_compiler_check_decl_option='-Werror=implicit-function-declaration' else case e in #( e) gl_cv_compiler_check_decl_option=none ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_compile="$saved_ac_compile" else gl_cv_compiler_check_decl_option=none fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_compiler_check_decl_option" >&5 printf "%s\n" "$gl_cv_compiler_check_decl_option" >&6; } if test "x$gl_cv_compiler_check_decl_option" != xnone; then ac_compile_for_check_decl="$ac_compile $gl_cv_compiler_check_decl_option" else ac_compile_for_check_decl="$ac_compile" fi DEPDIR="${am__leading_dot}deps" ac_config_commands="$ac_config_commands depfiles" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ${MAKE-make} supports the include directive" >&5 printf %s "checking whether ${MAKE-make} supports the include directive... " >&6; } cat > confinc.mk << 'END' am__doit: @echo this is the am__doit target >confinc.out .PHONY: am__doit END am__include="#" am__quote= # BSD make does it like this. echo '.include "confinc.mk" # ignored' > confmf.BSD # Other make implementations (GNU, Solaris 10, AIX) do it like this. echo 'include confinc.mk # ignored' > confmf.GNU _am_result=no for s in GNU BSD; do { echo "$as_me:$LINENO: ${MAKE-make} -f confmf.$s && cat confinc.out" >&5 (${MAKE-make} -f confmf.$s && cat confinc.out) >&5 2>&5 ac_status=$? echo "$as_me:$LINENO: \$? = $ac_status" >&5 (exit $ac_status); } case $?:`cat confinc.out 2>/dev/null` in #( '0:this is the am__doit target') : case $s in #( BSD) : am__include='.include' am__quote='"' ;; #( *) : am__include='include' am__quote='' ;; esac ;; #( *) : ;; esac if test "$am__include" != "#"; then _am_result="yes ($s style)" break fi done rm -f confinc.* confmf.* { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: ${_am_result}" >&5 printf "%s\n" "${_am_result}" >&6; } # Check whether --enable-dependency-tracking was given. if test ${enable_dependency_tracking+y} then : enableval=$enable_dependency_tracking; fi if test "x$enable_dependency_tracking" != xno; then am_depcomp="$ac_aux_dir/depcomp" AMDEPBACKSLASH='\' am__nodep='_no' fi if test "x$enable_dependency_tracking" != xno; then AMDEP_TRUE= AMDEP_FALSE='#' else AMDEP_TRUE='#' AMDEP_FALSE= fi depcc="$CC" am_compiler_list= { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 printf %s "checking dependency style of $depcc... " >&6; } if test ${am_cv_CC_dependencies_compiler_type+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then # We make a subdir and do the tests there. Otherwise we can end up # making bogus files that we don't know about and never remove. For # instance it was reported that on HP-UX the gcc test will end up # making a dummy file named 'D' -- because '-MD' means "put the output # in D". rm -rf conftest.dir mkdir conftest.dir # Copy depcomp to subdir because otherwise we won't find it if we're # using a relative directory. cp "$am_depcomp" conftest.dir cd conftest.dir # We will build objects and dependencies in a subdirectory because # it helps to detect inapplicable dependency modes. For instance # both Tru64's cc and ICC support -MD to output dependencies as a # side effect of compilation, but ICC will put the dependencies in # the current directory while Tru64 will put them in the object # directory. mkdir sub am_cv_CC_dependencies_compiler_type=none if test "$am_compiler_list" = ""; then am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp` fi am__universal=false case " $depcc " in #( *\ -arch\ *\ -arch\ *) am__universal=true ;; esac for depmode in $am_compiler_list; do # Setup a source with many dependencies, because some compilers # like to wrap large dependency lists on column 80 (with \), and # we should not choose a depcomp mode which is confused by this. # # We need to recreate these files for each test, as the compiler may # overwrite some of them when testing with obscure command lines. # This happens at least with the AIX C compiler. : > sub/conftest.c for i in 1 2 3 4 5 6; do echo '#include "conftst'$i'.h"' >> sub/conftest.c # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with # Solaris 10 /bin/sh. echo '/* dummy */' > sub/conftst$i.h done echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf # We check with '-c' and '-o' for the sake of the "dashmstdout" # mode. It turns out that the SunPro C++ compiler does not properly # handle '-M -o', and we need to detect this. Also, some Intel # versions had trouble with output in subdirs. am__obj=sub/conftest.${OBJEXT-o} am__minus_obj="-o $am__obj" case $depmode in gcc) # This depmode causes a compiler race in universal mode. test "$am__universal" = false || continue ;; nosideeffect) # After this tag, mechanisms are not by side-effect, so they'll # only be used when explicitly requested. if test "x$enable_dependency_tracking" = xyes; then continue else break fi ;; msvc7 | msvc7msys | msvisualcpp | msvcmsys) # This compiler won't grok '-c -o', but also, the minuso test has # not run yet. These depmodes are late enough in the game, and # so weak that their functioning should not be impacted. am__obj=conftest.${OBJEXT-o} am__minus_obj= ;; none) break ;; esac if depmode=$depmode \ source=sub/conftest.c object=$am__obj \ depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ >/dev/null 2>conftest.err && grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && grep $am__obj sub/conftest.Po > /dev/null 2>&1 && ${MAKE-make} -s -f confmf > /dev/null 2>&1; then # icc doesn't choke on unknown options, it will just issue warnings # or remarks (even with -Werror). So we grep stderr for any message # that says an option was ignored or not supported. # When given -MP, icc 7.0 and 7.1 complain thus: # icc: Command line warning: ignoring option '-M'; no argument required # The diagnosis changed in icc 8.0: # icc: Command line remark: option '-MP' not supported if (grep 'ignoring option' conftest.err || grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else am_cv_CC_dependencies_compiler_type=$depmode break fi fi done cd .. rm -rf conftest.dir else am_cv_CC_dependencies_compiler_type=none fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_CC_dependencies_compiler_type" >&5 printf "%s\n" "$am_cv_CC_dependencies_compiler_type" >&6; } CCDEPMODE=depmode=$am_cv_CC_dependencies_compiler_type if test "x$enable_dependency_tracking" != xno \ && test "$am_cv_CC_dependencies_compiler_type" = gcc3; then am__fastdepCC_TRUE= am__fastdepCC_FALSE='#' else am__fastdepCC_TRUE='#' am__fastdepCC_FALSE= fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to run the C preprocessor" >&5 printf %s "checking how to run the C preprocessor... " >&6; } # On Suns, sometimes $CPP names a directory. if test -n "$CPP" && test -d "$CPP"; then CPP= fi if test -z "$CPP"; then if test ${ac_cv_prog_CPP+y} then : printf %s "(cached) " >&6 else case e in #( e) # Double quotes because $CC needs to be expanded for CPP in "$CC -E" "$CC -E -traditional-cpp" cpp /lib/cpp do ac_preproc_ok=false for ac_c_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include Syntax error _ACEOF if ac_fn_c_try_cpp "$LINENO" then : else case e in #( e) # Broken: fails on valid input. continue ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_cpp "$LINENO" then : # Broken: success on invalid input. continue else case e in #( e) # Passes both tests. ac_preproc_ok=: break ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of 'break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok then : break fi done ac_cv_prog_CPP=$CPP ;; esac fi CPP=$ac_cv_prog_CPP else ac_cv_prog_CPP=$CPP fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CPP" >&5 printf "%s\n" "$CPP" >&6; } ac_preproc_ok=false for ac_c_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include Syntax error _ACEOF if ac_fn_c_try_cpp "$LINENO" then : else case e in #( e) # Broken: fails on valid input. continue ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_cpp "$LINENO" then : # Broken: success on invalid input. continue else case e in #( e) # Passes both tests. ac_preproc_ok=: break ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of 'break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok then : else case e in #( e) { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "C preprocessor \"$CPP\" fails sanity check See 'config.log' for more details" "$LINENO" 5; } ;; esac fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for egrep -e" >&5 printf %s "checking for egrep -e... " >&6; } if test ${ac_cv_path_EGREP_TRADITIONAL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$EGREP_TRADITIONAL"; then ac_path_EGREP_TRADITIONAL_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in grep ggrep do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_EGREP_TRADITIONAL="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_EGREP_TRADITIONAL" || continue # Check for GNU ac_path_EGREP_TRADITIONAL and select it if it is found. # Check for GNU $ac_path_EGREP_TRADITIONAL case `"$ac_path_EGREP_TRADITIONAL" --version 2>&1` in #( *GNU*) ac_cv_path_EGREP_TRADITIONAL="$ac_path_EGREP_TRADITIONAL" ac_path_EGREP_TRADITIONAL_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" 'EGREP_TRADITIONAL' >> "conftest.nl" "$ac_path_EGREP_TRADITIONAL" -E 'EGR(EP|AC)_TRADITIONAL$' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_EGREP_TRADITIONAL_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_EGREP_TRADITIONAL="$ac_path_EGREP_TRADITIONAL" ac_path_EGREP_TRADITIONAL_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_EGREP_TRADITIONAL_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_EGREP_TRADITIONAL"; then : fi else ac_cv_path_EGREP_TRADITIONAL=$EGREP_TRADITIONAL fi if test "$ac_cv_path_EGREP_TRADITIONAL" then : ac_cv_path_EGREP_TRADITIONAL="$ac_cv_path_EGREP_TRADITIONAL -E" else case e in #( e) if test -z "$EGREP_TRADITIONAL"; then ac_path_EGREP_TRADITIONAL_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in egrep do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_EGREP_TRADITIONAL="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_EGREP_TRADITIONAL" || continue # Check for GNU ac_path_EGREP_TRADITIONAL and select it if it is found. # Check for GNU $ac_path_EGREP_TRADITIONAL case `"$ac_path_EGREP_TRADITIONAL" --version 2>&1` in #( *GNU*) ac_cv_path_EGREP_TRADITIONAL="$ac_path_EGREP_TRADITIONAL" ac_path_EGREP_TRADITIONAL_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" 'EGREP_TRADITIONAL' >> "conftest.nl" "$ac_path_EGREP_TRADITIONAL" 'EGR(EP|AC)_TRADITIONAL$' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_EGREP_TRADITIONAL_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_EGREP_TRADITIONAL="$ac_path_EGREP_TRADITIONAL" ac_path_EGREP_TRADITIONAL_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_EGREP_TRADITIONAL_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_EGREP_TRADITIONAL"; then as_fn_error $? "no acceptable egrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_EGREP_TRADITIONAL=$EGREP_TRADITIONAL fi ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_EGREP_TRADITIONAL" >&5 printf "%s\n" "$ac_cv_path_EGREP_TRADITIONAL" >&6; } EGREP_TRADITIONAL=$ac_cv_path_EGREP_TRADITIONAL { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether using GNU C" >&5 printf %s "checking whether using GNU C... " >&6; } if test ${cl_cv_prog_cc_gcc+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __GNUC__ yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : cl_cv_prog_cc_gcc=yes else case e in #( e) cl_cv_prog_cc_gcc=no ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $cl_cv_prog_cc_gcc" >&5 printf "%s\n" "$cl_cv_prog_cc_gcc" >&6; } if test $cl_cv_prog_cc_gcc = yes; then CC_GCC=true GCC_X_NONE='-x none' else CC_GCC=false GCC_X_NONE='' fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for grep that handles long lines and -e" >&5 printf %s "checking for grep that handles long lines and -e... " >&6; } if test ${ac_cv_path_GREP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$GREP"; then ac_path_GREP_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in grep ggrep do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_GREP="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_GREP" || continue # Check for GNU ac_path_GREP and select it if it is found. # Check for GNU $ac_path_GREP case `"$ac_path_GREP" --version 2>&1` in #( *GNU*) ac_cv_path_GREP="$ac_path_GREP" ac_path_GREP_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" 'GREP' >> "conftest.nl" "$ac_path_GREP" -e 'GREP$' -e '-(cannot match)-' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_GREP_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_GREP="$ac_path_GREP" ac_path_GREP_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_GREP_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_GREP"; then as_fn_error $? "no acceptable grep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_GREP=$GREP fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_GREP" >&5 printf "%s\n" "$ac_cv_path_GREP" >&6; } GREP="$ac_cv_path_GREP" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for egrep" >&5 printf %s "checking for egrep... " >&6; } if test ${ac_cv_path_EGREP+y} then : printf %s "(cached) " >&6 else case e in #( e) if echo a | $GREP -E '(a|b)' >/dev/null 2>&1 then ac_cv_path_EGREP="$GREP -E" else if test -z "$EGREP"; then ac_path_EGREP_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in egrep do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_EGREP="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_EGREP" || continue # Check for GNU ac_path_EGREP and select it if it is found. # Check for GNU $ac_path_EGREP case `"$ac_path_EGREP" --version 2>&1` in #( *GNU*) ac_cv_path_EGREP="$ac_path_EGREP" ac_path_EGREP_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" 'EGREP' >> "conftest.nl" "$ac_path_EGREP" 'EGREP$' < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_EGREP_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_EGREP="$ac_path_EGREP" ac_path_EGREP_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_EGREP_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_EGREP"; then as_fn_error $? "no acceptable egrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_EGREP=$EGREP fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_EGREP" >&5 printf "%s\n" "$ac_cv_path_EGREP" >&6; } EGREP="$ac_cv_path_EGREP" EGREP_TRADITIONAL=$EGREP ac_cv_path_EGREP_TRADITIONAL=$EGREP cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef _MSC_VER MicrosoftCompiler #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "MicrosoftCompiler" >/dev/null 2>&1 then : rm -f conftest* echo 'int dummy;' > conftest.c { ac_try='${CC-cc} $CFLAGS $CPPFLAGS -c conftest.c' { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5 (eval $ac_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } >/dev/null 2>&1 if test -f conftest.o; then gl_asmext='s' gl_c_asm_opt='-S' else gl_asmext='asm' gl_c_asm_opt='-c -Fa' fi rm -f conftest* else case e in #( e) gl_asmext='s' gl_c_asm_opt='-S' ;; esac fi rm -rf conftest* { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether C symbols are prefixed with underscore at the linker level" >&5 printf %s "checking whether C symbols are prefixed with underscore at the linker level... " >&6; } if test ${gl_cv_prog_as_underscore+y} then : printf %s "(cached) " >&6 else case e in #( e) cat > conftest.c <&5 (eval $ac_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } >/dev/null 2>&1 if LC_ALL=C $EGREP '(^|[^a-zA-Z0-9_])_foo([^a-zA-Z0-9_]|$)' conftest.$gl_asmext >/dev/null; then gl_cv_prog_as_underscore=yes else gl_cv_prog_as_underscore=no fi rm -f conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_as_underscore" >&5 printf "%s\n" "$gl_cv_prog_as_underscore" >&6; } if test $gl_cv_prog_as_underscore = yes; then USER_LABEL_PREFIX=_ else USER_LABEL_PREFIX= fi printf "%s\n" "#define USER_LABEL_PREFIX $USER_LABEL_PREFIX" >>confdefs.h ASM_SYMBOL_PREFIX='"'${USER_LABEL_PREFIX}'"' if test "$USER_LABEL_PREFIX" = '_'; then AS_UNDERSCORE=true else AS_UNDERSCORE=false fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether to use C++" >&5 printf %s "checking whether to use C++... " >&6; } # Check whether --enable-c++ was given. if test ${enable_c__+y} then : enableval=$enable_c__; CXX_CHOICE="$enableval" else case e in #( e) CXX_CHOICE=yes ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CXX_CHOICE" >&5 printf "%s\n" "$CXX_CHOICE" >&6; } if test "$CXX_CHOICE" = no; then CXX=no fi if test -z "$CXX"; then if test -n "$CCC"; then CXX="$CCC" else if test -n "$ac_tool_prefix"; then for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC do # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. set dummy $ac_tool_prefix$ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CXX"; then ac_cv_prog_CXX="$CXX" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CXX="$ac_tool_prefix$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CXX=$ac_cv_prog_CXX if test -n "$CXX"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5 printf "%s\n" "$CXX" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$CXX" && break done fi if test -z "$CXX"; then ac_ct_CXX=$CXX for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_CXX"; then ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CXX="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_CXX=$ac_cv_prog_ac_ct_CXX if test -n "$ac_ct_CXX"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5 printf "%s\n" "$ac_ct_CXX" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$ac_ct_CXX" && break done if test "x$ac_ct_CXX" = x; then CXX=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac CXX=$ac_ct_CXX fi fi fi fi if test "$CXX" != no; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works" >&5 printf %s "checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works... " >&6; } ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu echo 'int main () { return 0; }' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_works=yes if (./conftest; exit) 2>/dev/null; then gl_cv_prog_ansicxx_cross=no else gl_cv_prog_ansicxx_cross=yes fi else gl_cv_prog_ansicxx_works=no fi rm -fr conftest* ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_works" >&5 printf "%s\n" "$gl_cv_prog_ansicxx_works" >&6; } if test $gl_cv_prog_ansicxx_works = no; then CXX=no else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler supports namespaces" >&5 printf %s "checking whether the C++ compiler supports namespaces... " >&6; } ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu cat < conftest.$ac_ext #include namespace test { using namespace std; } std::ostream* ptr; int main () { return 0; } EOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_namespaces=yes else gl_cv_prog_ansicxx_namespaces=no fi rm -fr conftest* ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_namespaces" >&5 printf "%s\n" "$gl_cv_prog_ansicxx_namespaces" >&6; } if test $gl_cv_prog_ansicxx_namespaces = no; then CXX=no fi fi fi if test "$CXX" != no; then ANSICXX_TRUE= ANSICXX_FALSE='#' else ANSICXX_TRUE='#' ANSICXX_FALSE= fi if test "$CXX" != no; then depcc="$CXX" am_compiler_list= { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 printf %s "checking dependency style of $depcc... " >&6; } if test ${am_cv_CXX_dependencies_compiler_type+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then # We make a subdir and do the tests there. Otherwise we can end up # making bogus files that we don't know about and never remove. For # instance it was reported that on HP-UX the gcc test will end up # making a dummy file named 'D' -- because '-MD' means "put the output # in D". rm -rf conftest.dir mkdir conftest.dir # Copy depcomp to subdir because otherwise we won't find it if we're # using a relative directory. cp "$am_depcomp" conftest.dir cd conftest.dir # We will build objects and dependencies in a subdirectory because # it helps to detect inapplicable dependency modes. For instance # both Tru64's cc and ICC support -MD to output dependencies as a # side effect of compilation, but ICC will put the dependencies in # the current directory while Tru64 will put them in the object # directory. mkdir sub am_cv_CXX_dependencies_compiler_type=none if test "$am_compiler_list" = ""; then am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp` fi am__universal=false case " $depcc " in #( *\ -arch\ *\ -arch\ *) am__universal=true ;; esac for depmode in $am_compiler_list; do # Setup a source with many dependencies, because some compilers # like to wrap large dependency lists on column 80 (with \), and # we should not choose a depcomp mode which is confused by this. # # We need to recreate these files for each test, as the compiler may # overwrite some of them when testing with obscure command lines. # This happens at least with the AIX C compiler. : > sub/conftest.c for i in 1 2 3 4 5 6; do echo '#include "conftst'$i'.h"' >> sub/conftest.c # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with # Solaris 10 /bin/sh. echo '/* dummy */' > sub/conftst$i.h done echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf # We check with '-c' and '-o' for the sake of the "dashmstdout" # mode. It turns out that the SunPro C++ compiler does not properly # handle '-M -o', and we need to detect this. Also, some Intel # versions had trouble with output in subdirs. am__obj=sub/conftest.${OBJEXT-o} am__minus_obj="-o $am__obj" case $depmode in gcc) # This depmode causes a compiler race in universal mode. test "$am__universal" = false || continue ;; nosideeffect) # After this tag, mechanisms are not by side-effect, so they'll # only be used when explicitly requested. if test "x$enable_dependency_tracking" = xyes; then continue else break fi ;; msvc7 | msvc7msys | msvisualcpp | msvcmsys) # This compiler won't grok '-c -o', but also, the minuso test has # not run yet. These depmodes are late enough in the game, and # so weak that their functioning should not be impacted. am__obj=conftest.${OBJEXT-o} am__minus_obj= ;; none) break ;; esac if depmode=$depmode \ source=sub/conftest.c object=$am__obj \ depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ >/dev/null 2>conftest.err && grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && grep $am__obj sub/conftest.Po > /dev/null 2>&1 && ${MAKE-make} -s -f confmf > /dev/null 2>&1; then # icc doesn't choke on unknown options, it will just issue warnings # or remarks (even with -Werror). So we grep stderr for any message # that says an option was ignored or not supported. # When given -MP, icc 7.0 and 7.1 complain thus: # icc: Command line warning: ignoring option '-M'; no argument required # The diagnosis changed in icc 8.0: # icc: Command line remark: option '-MP' not supported if (grep 'ignoring option' conftest.err || grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else am_cv_CXX_dependencies_compiler_type=$depmode break fi fi done cd .. rm -rf conftest.dir else am_cv_CXX_dependencies_compiler_type=none fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_CXX_dependencies_compiler_type" >&5 printf "%s\n" "$am_cv_CXX_dependencies_compiler_type" >&6; } CXXDEPMODE=depmode=$am_cv_CXX_dependencies_compiler_type if test "x$enable_dependency_tracking" != xno \ && test "$am_cv_CXX_dependencies_compiler_type" = gcc3; then am__fastdepCXX_TRUE= am__fastdepCXX_FALSE='#' else am__fastdepCXX_TRUE='#' am__fastdepCXX_FALSE= fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler supports GNU C++" >&5 printf %s "checking whether the compiler supports GNU C++... " >&6; } if test ${ac_cv_cxx_compiler_gnu+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { #ifndef __GNUC__ choke me #endif ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_compiler_gnu=yes else case e in #( e) ac_compiler_gnu=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_cv_cxx_compiler_gnu=$ac_compiler_gnu ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_cxx_compiler_gnu" >&5 printf "%s\n" "$ac_cv_cxx_compiler_gnu" >&6; } ac_compiler_gnu=$ac_cv_cxx_compiler_gnu if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi ac_test_CXXFLAGS=${CXXFLAGS+y} ac_save_CXXFLAGS=$CXXFLAGS { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CXX accepts -g" >&5 printf %s "checking whether $CXX accepts -g... " >&6; } if test ${ac_cv_prog_cxx_g+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_cxx_werror_flag=$ac_cxx_werror_flag ac_cxx_werror_flag=yes ac_cv_prog_cxx_g=no CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_cv_prog_cxx_g=yes else case e in #( e) CXXFLAGS="" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : else case e in #( e) ac_cxx_werror_flag=$ac_save_cxx_werror_flag CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_cv_prog_cxx_g=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_cxx_werror_flag=$ac_save_cxx_werror_flag ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cxx_g" >&5 printf "%s\n" "$ac_cv_prog_cxx_g" >&6; } if test $ac_test_CXXFLAGS; then CXXFLAGS=$ac_save_CXXFLAGS elif test $ac_cv_prog_cxx_g = yes; then if test "$GXX" = yes; then CXXFLAGS="-g -O2" else CXXFLAGS="-g" fi else if test "$GXX" = yes; then CXXFLAGS="-O2" else CXXFLAGS= fi fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu else if false; then am__fastdepCXX_TRUE= am__fastdepCXX_FALSE='#' else am__fastdepCXX_TRUE='#' am__fastdepCXX_FALSE= fi fi if test "$CXX" != no; then IF_CXX='' else IF_CXX='# ' fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for Minix Amsterdam compiler" >&5 printf %s "checking for Minix Amsterdam compiler... " >&6; } if test ${gl_cv_c_amsterdam_compiler+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __ACK__ Amsterdam #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Amsterdam" >/dev/null 2>&1 then : gl_cv_c_amsterdam_compiler=yes else case e in #( e) gl_cv_c_amsterdam_compiler=no ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_c_amsterdam_compiler" >&5 printf "%s\n" "$gl_cv_c_amsterdam_compiler" >&6; } if test $gl_cv_c_amsterdam_compiler = yes; then if test -z "$AR"; then AR='cc -c.a' fi if test -z "$ARFLAGS"; then ARFLAGS='-o' fi else : fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}ar", so it can be a program name with args. set dummy ${ac_tool_prefix}ar; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_AR+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$AR"; then ac_cv_prog_AR="$AR" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_AR="${ac_tool_prefix}ar" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi AR=$ac_cv_prog_AR if test -n "$AR"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AR" >&5 printf "%s\n" "$AR" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_AR"; then ac_ct_AR=$AR # Extract the first word of "ar", so it can be a program name with args. set dummy ar; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_AR+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_AR"; then ac_cv_prog_ac_ct_AR="$ac_ct_AR" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_AR="ar" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_AR=$ac_cv_prog_ac_ct_AR if test -n "$ac_ct_AR"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AR" >&5 printf "%s\n" "$ac_ct_AR" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_AR" = x; then AR="ar" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac AR=$ac_ct_AR fi else AR="$ac_cv_prog_AR" fi if test -z "$ARFLAGS"; then ARFLAGS='cr' fi if test -z "$RANLIB"; then if test $gl_cv_c_amsterdam_compiler = yes; then RANLIB=':' else if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args. set dummy ${ac_tool_prefix}ranlib; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_RANLIB+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$RANLIB"; then ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi RANLIB=$ac_cv_prog_RANLIB if test -n "$RANLIB"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5 printf "%s\n" "$RANLIB" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_RANLIB"; then ac_ct_RANLIB=$RANLIB # Extract the first word of "ranlib", so it can be a program name with args. set dummy ranlib; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_RANLIB+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_RANLIB"; then ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_RANLIB="ranlib" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB if test -n "$ac_ct_RANLIB"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5 printf "%s\n" "$ac_ct_RANLIB" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_RANLIB" = x; then RANLIB=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac RANLIB=$ac_ct_RANLIB fi else RANLIB="$ac_cv_prog_RANLIB" fi fi fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef _MSC_VER MicrosoftCompiler #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "MicrosoftCompiler" >/dev/null 2>&1 then : IF_MSVC='' IFNOT_MSVC='# ' else case e in #( e) IF_MSVC='# ' IFNOT_MSVC='' ;; esac fi rm -rf conftest* { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to make hard links" >&5 printf %s "checking how to make hard links... " >&6; } if test ${cl_cv_prog_LN+y} then : printf %s "(cached) " >&6 else case e in #( e) rm -f conftestdata conftestfile echo data > conftestfile if ln conftestfile conftestdata 2>/dev/null; then cl_cv_prog_LN=ln else cl_cv_prog_LN="cp -p" fi rm -f conftestdata conftestfile ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $cl_cv_prog_LN" >&5 printf "%s\n" "$cl_cv_prog_LN" >&6; } LN="$cl_cv_prog_LN" ac_header= ac_cache= for ac_item in $ac_header_c_list do if test $ac_cache; then ac_fn_c_check_header_compile "$LINENO" $ac_header ac_cv_header_$ac_cache "$ac_includes_default" if eval test \"x\$ac_cv_header_$ac_cache\" = xyes; then printf "%s\n" "#define $ac_item 1" >> confdefs.h fi ac_header= ac_cache= elif test $ac_header; then ac_cache=$ac_item else ac_header=$ac_item fi done if test $ac_cv_header_stdlib_h = yes && test $ac_cv_header_string_h = yes then : printf "%s\n" "#define STDC_HEADERS 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether it is safe to define __EXTENSIONS__" >&5 printf %s "checking whether it is safe to define __EXTENSIONS__... " >&6; } if test ${ac_cv_safe_to_define___extensions__+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ # define __EXTENSIONS__ 1 $ac_includes_default int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_safe_to_define___extensions__=yes else case e in #( e) ac_cv_safe_to_define___extensions__=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_safe_to_define___extensions__" >&5 printf "%s\n" "$ac_cv_safe_to_define___extensions__" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether _XOPEN_SOURCE should be defined" >&5 printf %s "checking whether _XOPEN_SOURCE should be defined... " >&6; } if test ${ac_cv_should_define__xopen_source+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_should_define__xopen_source=no if test $ac_cv_header_wchar_h = yes then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include mbstate_t x; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _XOPEN_SOURCE 500 #include mbstate_t x; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_should_define__xopen_source=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_should_define__xopen_source" >&5 printf "%s\n" "$ac_cv_should_define__xopen_source" >&6; } printf "%s\n" "#define _ALL_SOURCE 1" >>confdefs.h printf "%s\n" "#define _DARWIN_C_SOURCE 1" >>confdefs.h printf "%s\n" "#define _GNU_SOURCE 1" >>confdefs.h printf "%s\n" "#define _HPUX_ALT_XOPEN_SOCKET_API 1" >>confdefs.h printf "%s\n" "#define _NETBSD_SOURCE 1" >>confdefs.h printf "%s\n" "#define _OPENBSD_SOURCE 1" >>confdefs.h printf "%s\n" "#define _POSIX_PTHREAD_SEMANTICS 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_ATTRIBS_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_BFP_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_DFP_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_FUNCS_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_IEC_60559_TYPES_EXT__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_LIB_EXT2__ 1" >>confdefs.h printf "%s\n" "#define __STDC_WANT_MATH_SPEC_FUNCS__ 1" >>confdefs.h printf "%s\n" "#define _TANDEM_SOURCE 1" >>confdefs.h if test $ac_cv_header_minix_config_h = yes then : MINIX=yes printf "%s\n" "#define _MINIX 1" >>confdefs.h printf "%s\n" "#define _POSIX_SOURCE 1" >>confdefs.h printf "%s\n" "#define _POSIX_1_SOURCE 2" >>confdefs.h else case e in #( e) MINIX= ;; esac fi if test $ac_cv_safe_to_define___extensions__ = yes then : printf "%s\n" "#define __EXTENSIONS__ 1" >>confdefs.h fi if test $ac_cv_should_define__xopen_source = yes then : printf "%s\n" "#define _XOPEN_SOURCE 500" >>confdefs.h fi # Make sure we can run config.sub. $SHELL "${ac_aux_dir}config.sub" sun4 >/dev/null 2>&1 || as_fn_error $? "cannot run $SHELL ${ac_aux_dir}config.sub" "$LINENO" 5 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking build system type" >&5 printf %s "checking build system type... " >&6; } if test ${ac_cv_build+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_build_alias=$build_alias test "x$ac_build_alias" = x && ac_build_alias=`$SHELL "${ac_aux_dir}config.guess"` test "x$ac_build_alias" = x && as_fn_error $? "cannot guess build type; you must specify one" "$LINENO" 5 ac_cv_build=`$SHELL "${ac_aux_dir}config.sub" $ac_build_alias` || as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $ac_build_alias failed" "$LINENO" 5 ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_build" >&5 printf "%s\n" "$ac_cv_build" >&6; } case $ac_cv_build in *-*-*) ;; *) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;; esac build=$ac_cv_build ac_save_IFS=$IFS; IFS='-' set x $ac_cv_build shift build_cpu=$1 build_vendor=$2 shift; shift # Remember, the first character of IFS is used to create $*, # except with old shells: build_os=$* IFS=$ac_save_IFS case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking host system type" >&5 printf %s "checking host system type... " >&6; } if test ${ac_cv_host+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "x$host_alias" = x; then ac_cv_host=$ac_cv_build else ac_cv_host=`$SHELL "${ac_aux_dir}config.sub" $host_alias` || as_fn_error $? "$SHELL ${ac_aux_dir}config.sub $host_alias failed" "$LINENO" 5 fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_host" >&5 printf "%s\n" "$ac_cv_host" >&6; } case $ac_cv_host in *-*-*) ;; *) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;; esac host=$ac_cv_host ac_save_IFS=$IFS; IFS='-' set x $ac_cv_host shift host_cpu=$1 host_vendor=$2 shift; shift # Remember, the first character of IFS is used to create $*, # except with old shells: host_os=$* IFS=$ac_save_IFS case $host_os in *\ *) host_os=`echo "$host_os" | sed 's/ /-/g'`;; esac case "$host_os" in openbsd*) printf "%s\n" "#define _ISOC11_SOURCE 1" >>confdefs.h ;; esac if test "$CXX_CHOICE" = no; then CXX=no fi if test -z "$CXX"; then if test -n "$CCC"; then CXX="$CCC" else if test -n "$ac_tool_prefix"; then for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC do # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. set dummy $ac_tool_prefix$ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$CXX"; then ac_cv_prog_CXX="$CXX" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_CXX="$ac_tool_prefix$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi CXX=$ac_cv_prog_CXX if test -n "$CXX"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CXX" >&5 printf "%s\n" "$CXX" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$CXX" && break done fi if test -z "$CXX"; then ac_ct_CXX=$CXX for ac_prog in g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_CXX"; then ac_cv_prog_ac_ct_CXX="$ac_ct_CXX" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_CXX="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_CXX=$ac_cv_prog_ac_ct_CXX if test -n "$ac_ct_CXX"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_CXX" >&5 printf "%s\n" "$ac_ct_CXX" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$ac_ct_CXX" && break done if test "x$ac_ct_CXX" = x; then CXX=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac CXX=$ac_ct_CXX fi fi fi fi if test "$CXX" != no; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works" >&5 printf %s "checking whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works... " >&6; } ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu echo 'int main () { return 0; }' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_works=yes if (./conftest; exit) 2>/dev/null; then gl_cv_prog_ansicxx_cross=no else gl_cv_prog_ansicxx_cross=yes fi else gl_cv_prog_ansicxx_works=no fi rm -fr conftest* ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_works" >&5 printf "%s\n" "$gl_cv_prog_ansicxx_works" >&6; } if test $gl_cv_prog_ansicxx_works = no; then CXX=no else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C++ compiler supports namespaces" >&5 printf %s "checking whether the C++ compiler supports namespaces... " >&6; } ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu cat < conftest.$ac_ext #include namespace test { using namespace std; } std::ostream* ptr; int main () { return 0; } EOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_namespaces=yes else gl_cv_prog_ansicxx_namespaces=no fi rm -fr conftest* ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_prog_ansicxx_namespaces" >&5 printf "%s\n" "$gl_cv_prog_ansicxx_namespaces" >&6; } if test $gl_cv_prog_ansicxx_namespaces = no; then CXX=no fi fi fi if test "$CXX" != no; then ANSICXX_TRUE= ANSICXX_FALSE='#' else ANSICXX_TRUE='#' ANSICXX_FALSE= fi if test "$CXX" != no; then depcc="$CXX" am_compiler_list= { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 printf %s "checking dependency style of $depcc... " >&6; } if test ${am_cv_CXX_dependencies_compiler_type+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then # We make a subdir and do the tests there. Otherwise we can end up # making bogus files that we don't know about and never remove. For # instance it was reported that on HP-UX the gcc test will end up # making a dummy file named 'D' -- because '-MD' means "put the output # in D". rm -rf conftest.dir mkdir conftest.dir # Copy depcomp to subdir because otherwise we won't find it if we're # using a relative directory. cp "$am_depcomp" conftest.dir cd conftest.dir # We will build objects and dependencies in a subdirectory because # it helps to detect inapplicable dependency modes. For instance # both Tru64's cc and ICC support -MD to output dependencies as a # side effect of compilation, but ICC will put the dependencies in # the current directory while Tru64 will put them in the object # directory. mkdir sub am_cv_CXX_dependencies_compiler_type=none if test "$am_compiler_list" = ""; then am_compiler_list=`sed -n 's/^#*\([a-zA-Z0-9]*\))$/\1/p' < ./depcomp` fi am__universal=false case " $depcc " in #( *\ -arch\ *\ -arch\ *) am__universal=true ;; esac for depmode in $am_compiler_list; do # Setup a source with many dependencies, because some compilers # like to wrap large dependency lists on column 80 (with \), and # we should not choose a depcomp mode which is confused by this. # # We need to recreate these files for each test, as the compiler may # overwrite some of them when testing with obscure command lines. # This happens at least with the AIX C compiler. : > sub/conftest.c for i in 1 2 3 4 5 6; do echo '#include "conftst'$i'.h"' >> sub/conftest.c # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with # Solaris 10 /bin/sh. echo '/* dummy */' > sub/conftst$i.h done echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf # We check with '-c' and '-o' for the sake of the "dashmstdout" # mode. It turns out that the SunPro C++ compiler does not properly # handle '-M -o', and we need to detect this. Also, some Intel # versions had trouble with output in subdirs. am__obj=sub/conftest.${OBJEXT-o} am__minus_obj="-o $am__obj" case $depmode in gcc) # This depmode causes a compiler race in universal mode. test "$am__universal" = false || continue ;; nosideeffect) # After this tag, mechanisms are not by side-effect, so they'll # only be used when explicitly requested. if test "x$enable_dependency_tracking" = xyes; then continue else break fi ;; msvc7 | msvc7msys | msvisualcpp | msvcmsys) # This compiler won't grok '-c -o', but also, the minuso test has # not run yet. These depmodes are late enough in the game, and # so weak that their functioning should not be impacted. am__obj=conftest.${OBJEXT-o} am__minus_obj= ;; none) break ;; esac if depmode=$depmode \ source=sub/conftest.c object=$am__obj \ depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ >/dev/null 2>conftest.err && grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && grep $am__obj sub/conftest.Po > /dev/null 2>&1 && ${MAKE-make} -s -f confmf > /dev/null 2>&1; then # icc doesn't choke on unknown options, it will just issue warnings # or remarks (even with -Werror). So we grep stderr for any message # that says an option was ignored or not supported. # When given -MP, icc 7.0 and 7.1 complain thus: # icc: Command line warning: ignoring option '-M'; no argument required # The diagnosis changed in icc 8.0: # icc: Command line remark: option '-MP' not supported if (grep 'ignoring option' conftest.err || grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else am_cv_CXX_dependencies_compiler_type=$depmode break fi fi done cd .. rm -rf conftest.dir else am_cv_CXX_dependencies_compiler_type=none fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_CXX_dependencies_compiler_type" >&5 printf "%s\n" "$am_cv_CXX_dependencies_compiler_type" >&6; } CXXDEPMODE=depmode=$am_cv_CXX_dependencies_compiler_type if test "x$enable_dependency_tracking" != xno \ && test "$am_cv_CXX_dependencies_compiler_type" = gcc3; then am__fastdepCXX_TRUE= am__fastdepCXX_FALSE='#' else am__fastdepCXX_TRUE='#' am__fastdepCXX_FALSE= fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler supports GNU C++" >&5 printf %s "checking whether the compiler supports GNU C++... " >&6; } if test ${ac_cv_cxx_compiler_gnu+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { #ifndef __GNUC__ choke me #endif ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_compiler_gnu=yes else case e in #( e) ac_compiler_gnu=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_cv_cxx_compiler_gnu=$ac_compiler_gnu ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_cxx_compiler_gnu" >&5 printf "%s\n" "$ac_cv_cxx_compiler_gnu" >&6; } ac_compiler_gnu=$ac_cv_cxx_compiler_gnu if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi ac_test_CXXFLAGS=${CXXFLAGS+y} ac_save_CXXFLAGS=$CXXFLAGS { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $CXX accepts -g" >&5 printf %s "checking whether $CXX accepts -g... " >&6; } if test ${ac_cv_prog_cxx_g+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_cxx_werror_flag=$ac_cxx_werror_flag ac_cxx_werror_flag=yes ac_cv_prog_cxx_g=no CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_cv_prog_cxx_g=yes else case e in #( e) CXXFLAGS="" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : else case e in #( e) ac_cxx_werror_flag=$ac_save_cxx_werror_flag CXXFLAGS="-g" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : ac_cv_prog_cxx_g=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ac_cxx_werror_flag=$ac_save_cxx_werror_flag ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_prog_cxx_g" >&5 printf "%s\n" "$ac_cv_prog_cxx_g" >&6; } if test $ac_test_CXXFLAGS; then CXXFLAGS=$ac_save_CXXFLAGS elif test $ac_cv_prog_cxx_g = yes; then if test "$GXX" = yes; then CXXFLAGS="-g -O2" else CXXFLAGS="-g" fi else if test "$GXX" = yes; then CXXFLAGS="-O2" else CXXFLAGS= fi fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu else if false; then am__fastdepCXX_TRUE= am__fastdepCXX_FALSE='#' else am__fastdepCXX_TRUE='#' am__fastdepCXX_FALSE= fi fi printf "%s\n" "#define _LINUX_SOURCE_COMPAT 1" >>confdefs.h # Check whether --enable-largefile was given. if test ${enable_largefile+y} then : enableval=$enable_largefile; fi if test "$enable_largefile,$enable_year2038" != no,no then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to support large files" >&5 printf %s "checking for $CC option to support large files... " >&6; } if test ${ac_cv_sys_largefile_opts+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_CPPFLAGS=$CPPFLAGS ac_opt_found=no for ac_opt in "none needed" "-D_FILE_OFFSET_BITS=64" "-D_LARGE_FILES=1"; do if test x"$ac_opt" != x"none needed" then : CPPFLAGS="$ac_save_CPPFLAGS $ac_opt" fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifndef FTYPE # define FTYPE off_t #endif /* Check that FTYPE can represent 2**63 - 1 correctly. We can't simply define LARGE_FTYPE to be 9223372036854775807, since some C++ compilers masquerading as C compilers incorrectly reject 9223372036854775807. */ #define LARGE_FTYPE (((FTYPE) 1 << 31 << 31) - 1 + ((FTYPE) 1 << 31 << 31)) int FTYPE_is_large[(LARGE_FTYPE % 2147483629 == 721 && LARGE_FTYPE % 2147483647 == 1) ? 1 : -1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : if test x"$ac_opt" = x"none needed" then : # GNU/Linux s390x and alpha need _FILE_OFFSET_BITS=64 for wide ino_t. CPPFLAGS="$CPPFLAGS -DFTYPE=ino_t" if ac_fn_c_try_compile "$LINENO" then : else case e in #( e) CPPFLAGS="$CPPFLAGS -D_FILE_OFFSET_BITS=64" if ac_fn_c_try_compile "$LINENO" then : ac_opt='-D_FILE_OFFSET_BITS=64' fi rm -f core conftest.err conftest.$ac_objext conftest.beam ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam fi ac_cv_sys_largefile_opts=$ac_opt ac_opt_found=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext test $ac_opt_found = no || break done CPPFLAGS=$ac_save_CPPFLAGS if test $ac_opt_found != yes; then case $host_os in #( mingw* | windows*) : ac_cv_sys_largefile_opts="supported through gnulib" ac_opt_found=yes ;; #( *) : ;; esac fi test $ac_opt_found = yes || ac_cv_sys_largefile_opts="support not detected" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_sys_largefile_opts" >&5 printf "%s\n" "$ac_cv_sys_largefile_opts" >&6; } ac_have_largefile=yes case $ac_cv_sys_largefile_opts in #( "none needed") : ;; #( "supported through gnulib") : ;; #( "support not detected") : ac_have_largefile=no ;; #( "-D_FILE_OFFSET_BITS=64") : printf "%s\n" "#define _FILE_OFFSET_BITS 64" >>confdefs.h ;; #( "-D_LARGE_FILES=1") : printf "%s\n" "#define _LARGE_FILES 1" >>confdefs.h ;; #( *) : as_fn_error $? "internal error: bad value for \$ac_cv_sys_largefile_opts" "$LINENO" 5 ;; esac if test "$enable_year2038" != no then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC option to support timestamps after 2038" >&5 printf %s "checking for $CC option to support timestamps after 2038... " >&6; } if test ${ac_cv_sys_year2038_opts+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_CPPFLAGS="$CPPFLAGS" ac_opt_found=no for ac_opt in "none needed" "-D_TIME_BITS=64" "-D__MINGW_USE_VC2005_COMPAT" "-U_USE_32_BIT_TIME_T -D__MINGW_USE_VC2005_COMPAT"; do if test x"$ac_opt" != x"none needed" then : CPPFLAGS="$ac_save_CPPFLAGS $ac_opt" fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include /* Check that time_t can represent 2**32 - 1 correctly. */ #define LARGE_TIME_T \\ ((time_t) (((time_t) 1 << 30) - 1 + 3 * ((time_t) 1 << 30))) int verify_time_t_range[(LARGE_TIME_T / 65537 == 65535 && LARGE_TIME_T % 65537 == 0) ? 1 : -1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_sys_year2038_opts="$ac_opt" ac_opt_found=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext test $ac_opt_found = no || break done CPPFLAGS="$ac_save_CPPFLAGS" test $ac_opt_found = yes || ac_cv_sys_year2038_opts="support not detected" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_sys_year2038_opts" >&5 printf "%s\n" "$ac_cv_sys_year2038_opts" >&6; } ac_have_year2038=yes case $ac_cv_sys_year2038_opts in #( "none needed") : ;; #( "support not detected") : ac_have_year2038=no ;; #( "-D_TIME_BITS=64") : printf "%s\n" "#define _TIME_BITS 64" >>confdefs.h ;; #( "-D__MINGW_USE_VC2005_COMPAT") : printf "%s\n" "#define __MINGW_USE_VC2005_COMPAT 1" >>confdefs.h ;; #( "-U_USE_32_BIT_TIME_T"*) : { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "the 'time_t' type is currently forced to be 32-bit. It will stop working after mid-January 2038. Remove _USE_32BIT_TIME_T from the compiler flags. See 'config.log' for more details" "$LINENO" 5; } ;; #( *) : as_fn_error $? "internal error: bad value for \$ac_cv_sys_year2038_opts" "$LINENO" 5 ;; esac fi fi # Check whether --enable-threads was given. if test ${enable_threads+y} then : enableval=$enable_threads; gl_use_threads=$enableval else case e in #( e) if test -n "$gl_use_threads_default"; then gl_use_threads="$gl_use_threads_default" else case "$host_os" in osf*) gl_use_threads=no ;; cygwin*) case `uname -r` in 1.[0-5].*) gl_use_threads=no ;; *) gl_use_threads=yes ;; esac ;; mingw* | windows*) case "$gl_use_winpthreads_default" in yes) gl_use_threads=posix ;; no) gl_use_threads=windows ;; *) gl_use_threads=yes ;; esac ;; *) gl_use_threads=yes ;; esac fi ;; esac fi if test "$gl_use_threads" = yes \ || test "$gl_use_threads" = isoc \ || test "$gl_use_threads" = posix \ || test "$gl_use_threads" = isoc+posix; then # For using or : if test -z "$gl_anythreadlib_early_done"; then case "$host_os" in osf*) # On OSF/1, the compiler needs the flag -D_REENTRANT so that it # groks . cc also understands the flag -pthread, but # we don't use it because 1. gcc-2.95 doesn't understand -pthread, # 2. putting a flag into CPPFLAGS that has an effect on the linker # causes the AC_LINK_IFELSE test below to succeed unexpectedly, # leading to wrong values of LIBTHREAD and LTLIBTHREAD. CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac # Some systems optimize for single-threaded programs by default, and # need special flags to disable these optimizations. For example, the # definition of 'errno' in . case "$host_os" in aix* | freebsd*) CPPFLAGS="$CPPFLAGS -D_THREAD_SAFE" ;; solaris*) CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac gl_anythreadlib_early_done=done fi fi # Pre-early section. # Code from module absolute-header: # Code from module alloca-opt: # Code from module ansi-c++-opt: # Code from module assert-h: # Code from module asyncsafe-spin: # Code from module attribute: # Code from module basename-lgpl: # Code from module c99: # Code from module clean-temp-simple: # Code from module cloexec: # Code from module close: # Code from module double-slash-root: # Code from module dup2: # Code from module errno: # Code from module error: # Code from module error-h: # Code from module extensions: # This is actually already done in the pre-early phase. # AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) # Code from module extensions-aix: # Code from module extern-inline: # Code from module fatal-signal: # Code from module fcntl: # Code from module fcntl-h: # Code from module fd-hook: # Code from module filename: # Code from module fstat: # Code from module gen-header: # Code from module getdtablesize: # Code from module getpagesize: # Code from module getprogname: # Code from module gettext-h: # Code from module hasmntopt: # Code from module host-cpu-c-abi: # Code from module idx: # Code from module include_next: # Code from module intprops: # Code from module largefile: # Code from module libffcall-imports: # Code from module limits-h: # Code from module linkedhash-list: # Code from module list: # Code from module lock: # Code from module malloca: # Code from module mntent: # Code from module msvc-inval: # Code from module msvc-nothrow: # Code from module multiarch: # Code from module nocrash: # Code from module once: # Code from module open: # Code from module pathmax: # Code from module pthread-h: if test -z "$gl_anythreadlib_early_done"; then case "$host_os" in osf*) # On OSF/1, the compiler needs the flag -D_REENTRANT so that it # groks . cc also understands the flag -pthread, but # we don't use it because 1. gcc-2.95 doesn't understand -pthread, # 2. putting a flag into CPPFLAGS that has an effect on the linker # causes the AC_LINK_IFELSE test below to succeed unexpectedly, # leading to wrong values of LIBTHREAD and LTLIBTHREAD. CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac # Some systems optimize for single-threaded programs by default, and # need special flags to disable these optimizations. For example, the # definition of 'errno' in . case "$host_os" in aix* | freebsd*) CPPFLAGS="$CPPFLAGS -D_THREAD_SAFE" ;; solaris*) CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac gl_anythreadlib_early_done=done fi # Code from module pthread-once: # Code from module raise: # Code from module rmdir: # Code from module sched: # Code from module sigaction: # Code from module signal-h: # Code from module sigprocmask: # Code from module size_max: # Code from module snippet/_Noreturn: # Code from module snippet/arg-nonnull: # Code from module snippet/c++defs: # Code from module snippet/warn-on-use: # Code from module sparcv8+: case "$host" in sparc*-*-solaris*) if test -n "$GCC"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether SPARC v8+ instructions are supported" >&5 printf %s "checking whether SPARC v8+ instructions are supported... " >&6; } if test ${gl_cv_sparc_v8plus+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { asm volatile ("membar 2"); ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_sparc_v8plus=yes else case e in #( e) gl_cv_sparc_v8plus=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_sparc_v8plus" >&5 printf "%s\n" "$gl_cv_sparc_v8plus" >&6; } if test $gl_cv_sparc_v8plus = no; then CC="$CC -mcpu=v9" CXX="$CXX -mcpu=v9" fi fi ;; esac # Code from module ssize_t: # Code from module stat: # Code from module stat-time: # Code from module std-gnu11: # Code from module stdbool: # Code from module stdckdint: # Code from module stddef: # Code from module stdint: # Code from module stdio: printf "%s\n" "#define __USE_MINGW_ANSI_STDIO 1" >>confdefs.h # Code from module stdlib: # Code from module stdnoreturn: # Code from module strerror: # Code from module strerror-override: # Code from module string: # Code from module sys_stat: # Code from module sys_types: # Code from module thread-optim: # Code from module threadlib: # Code from module time-h: # Code from module unistd: # Code from module vararrays: # Code from module vma-iter: # Code from module vma-prot: # Code from module windows-mutex: # Code from module windows-once: # Code from module windows-recmutex: # Code from module windows-rwlock: # Code from module windows-spin: # Code from module xalloc-oversized: # Code from module xsize: { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking host CPU and C ABI" >&5 printf %s "checking host CPU and C ABI... " >&6; } if test ${gl_cv_host_cpu_c_abi+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_cpu" in i[34567]86 ) gl_cv_host_cpu_c_abi=i386 ;; x86_64 ) # On x86_64 systems, the C compiler may be generating code in one of # these ABIs: # - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64. # - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64 # with native Windows (mingw, MSVC). # - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32. # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if (defined __x86_64__ || defined __amd64__ \ || defined _M_X64 || defined _M_AMD64) int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __ILP32__ || defined _ILP32 int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=x86_64-x32 else case e in #( e) gl_cv_host_cpu_c_abi=x86_64 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext else case e in #( e) gl_cv_host_cpu_c_abi=i386 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; alphaev[4-8] | alphaev56 | alphapca5[67] | alphaev6[78] ) gl_cv_host_cpu_c_abi=alpha ;; arm* | aarch64 ) # Assume arm with EABI. # On arm64 systems, the C compiler may be generating code in one of # these ABIs: # - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64. # - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32. # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __aarch64__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __ILP32__ || defined _ILP32 int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=arm64-ilp32 else case e in #( e) gl_cv_host_cpu_c_abi=arm64 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext else case e in #( e) # Don't distinguish little-endian and big-endian arm, since they # don't require different machine code for simple operations and # since the user can distinguish them through the preprocessor # defines __ARMEL__ vs. __ARMEB__. # But distinguish arm which passes floating-point arguments and # return values in integer registers (r0, r1, ...) - this is # gcc -mfloat-abi=soft or gcc -mfloat-abi=softfp - from arm which # passes them in float registers (s0, s1, ...) and double registers # (d0, d1, ...) - this is gcc -mfloat-abi=hard. GCC 4.6 or newer # sets the preprocessor defines __ARM_PCS (for the first case) and # __ARM_PCS_VFP (for the second case), but older GCC does not. echo 'double ddd; void func (double dd) { ddd = dd; }' > conftest.c # Look for a reference to the register d0 in the .s file. { ac_try='${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c' { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5 (eval $ac_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } >/dev/null 2>&1 if LC_ALL=C grep 'd0,' conftest.$gl_asmext >/dev/null; then gl_cv_host_cpu_c_abi=armhf else gl_cv_host_cpu_c_abi=arm fi rm -f conftest* ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; hppa1.0 | hppa1.1 | hppa2.0* | hppa64 ) # On hppa, the C compiler may be generating 32-bit code or 64-bit # code. In the latter case, it defines _LP64 and __LP64__. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __LP64__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=hppa64 else case e in #( e) gl_cv_host_cpu_c_abi=hppa ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; ia64* ) # On ia64 on HP-UX, the C compiler may be generating 64-bit code or # 32-bit code. In the latter case, it defines _ILP32. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef _ILP32 int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=ia64-ilp32 else case e in #( e) gl_cv_host_cpu_c_abi=ia64 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; mips* ) # We should also check for (_MIPS_SZPTR == 64), but gcc keeps this # at 32. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _MIPS_SZLONG && (_MIPS_SZLONG == 64) int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=mips64 else case e in #( e) # In the n32 ABI, _ABIN32 is defined, _ABIO32 is not defined (but # may later get defined by ), and _MIPS_SIM == _ABIN32. # In the 32 ABI, _ABIO32 is defined, _ABIN32 is not defined (but # may later get defined by ), and _MIPS_SIM == _ABIO32. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if (_MIPS_SIM == _ABIN32) int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=mipsn32 else case e in #( e) gl_cv_host_cpu_c_abi=mips ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; powerpc* ) # Different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD. # No need to distinguish them here; the caller may distinguish # them based on the OS. # On powerpc64 systems, the C compiler may still be generating # 32-bit code. And on powerpc-ibm-aix systems, the C compiler may # be generating 64-bit code. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __powerpc64__ || defined __LP64__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : # On powerpc64, there are two ABIs on Linux: The AIX compatible # one and the ELFv2 one. The latter defines _CALL_ELF=2. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _CALL_ELF && _CALL_ELF == 2 int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=powerpc64-elfv2 else case e in #( e) gl_cv_host_cpu_c_abi=powerpc64 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext else case e in #( e) gl_cv_host_cpu_c_abi=powerpc ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; rs6000 ) gl_cv_host_cpu_c_abi=powerpc ;; riscv32 | riscv64 ) # There are 2 architectures (with variants): rv32* and rv64*. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if __riscv_xlen == 64 int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : cpu=riscv64 else case e in #( e) cpu=riscv32 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext # There are 6 ABIs: ilp32, ilp32f, ilp32d, lp64, lp64f, lp64d. # Size of 'long' and 'void *': cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __LP64__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : main_abi=lp64 else case e in #( e) main_abi=ilp32 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext # Float ABIs: # __riscv_float_abi_double: # 'float' and 'double' are passed in floating-point registers. # __riscv_float_abi_single: # 'float' are passed in floating-point registers. # __riscv_float_abi_soft: # No values are passed in floating-point registers. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __riscv_float_abi_double int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : float_abi=d else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __riscv_float_abi_single int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : float_abi=f else case e in #( e) float_abi='' ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext gl_cv_host_cpu_c_abi="${cpu}-${main_abi}${float_abi}" ;; s390* ) # On s390x, the C compiler may be generating 64-bit (= s390x) code # or 31-bit (= s390) code. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __LP64__ || defined __s390x__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=s390x else case e in #( e) gl_cv_host_cpu_c_abi=s390 ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; sparc | sparc64 ) # UltraSPARCs running Linux have `uname -m` = "sparc64", but the # C compiler still generates 32-bit code. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __sparcv9 || defined __arch64__ int ok; #else error fail #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_host_cpu_c_abi=sparc64 else case e in #( e) gl_cv_host_cpu_c_abi=sparc ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; *) gl_cv_host_cpu_c_abi="$host_cpu" ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_host_cpu_c_abi" >&5 printf "%s\n" "$gl_cv_host_cpu_c_abi" >&6; } HOST_CPU=`echo "$gl_cv_host_cpu_c_abi" | sed -e 's/-.*//'` HOST_CPU_C_ABI="$gl_cv_host_cpu_c_abi" # This was # AC_DEFINE_UNQUOTED([__${HOST_CPU}__]) # AC_DEFINE_UNQUOTED([__${HOST_CPU_C_ABI}__]) # earlier, but KAI C++ 3.2d doesn't like this. sed -e 's/-/_/g' >> confdefs.h <&5 printf %s "checking endianness... " >&6; } if test ${ffcall_cv_endianness+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __ARMEL__ yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : ffcall_cv_endianness=little else case e in #( e) ffcall_cv_endianness=big ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5 printf "%s\n" "$ffcall_cv_endianness" >&6; } ;; mips* ) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking endianness" >&5 printf %s "checking endianness... " >&6; } if test ${ffcall_cv_endianness+y} then : printf %s "(cached) " >&6 else case e in #( e) # Compilers on IRIX define only _MIPSEB as indicator. # Compilers on Linux define _MIPSEB, __MIPSEB__, __MIPSEB or - in # the opposite case - _MIPSEL, __MIPSEL__, __MIPSEL. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _MIPSEB yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : ffcall_cv_endianness=big else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _MIPSEL yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : ffcall_cv_endianness=little else case e in #( e) ffcall_cv_endianness=unknown ;; esac fi rm -rf conftest* ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5 printf "%s\n" "$ffcall_cv_endianness" >&6; } ;; powerpc*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking endianness" >&5 printf %s "checking endianness... " >&6; } if test ${ffcall_cv_endianness+y} then : printf %s "(cached) " >&6 else case e in #( e) # Compilers on AIX and Linux define _BIG_ENDIAN, __BIG_ENDIAN__ or # - in the opposite case - _LITTLE_ENDIAN, __LITTLE_ENDIAN__. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _BIG_ENDIAN yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : ffcall_cv_endianness=big else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _LITTLE_ENDIAN yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : ffcall_cv_endianness=little else case e in #( e) ffcall_cv_endianness=unknown ;; esac fi rm -rf conftest* ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_endianness" >&5 printf "%s\n" "$ffcall_cv_endianness" >&6; } ;; *) ffcall_cv_endianness=known ;; esac case "$ffcall_cv_endianness" in big) ENDIANNESS='eb' ;; little) ENDIANNESS='el' ;; *) ENDIANNESS='' ;; esac PACKAGE=libffcall case `pwd` in *\ * | *\ *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: Libtool does not cope well with whitespace in \`pwd\`" >&5 printf "%s\n" "$as_me: WARNING: Libtool does not cope well with whitespace in \`pwd\`" >&2;} ;; esac macro_version='2.4.7' macro_revision='2.4.7' ltmain=$ac_aux_dir/ltmain.sh # Backslashify metacharacters that are still active within # double-quoted strings. sed_quote_subst='s/\(["`$\\]\)/\\\1/g' # Same as above, but do not quote variable references. double_quote_subst='s/\(["`\\]\)/\\\1/g' # Sed substitution to delay expansion of an escaped shell variable in a # double_quote_subst'ed string. delay_variable_subst='s/\\\\\\\\\\\$/\\\\\\$/g' # Sed substitution to delay expansion of an escaped single quote. delay_single_quote_subst='s/'\''/'\'\\\\\\\'\''/g' # Sed substitution to avoid accidental globbing in evaled expressions no_glob_subst='s/\*/\\\*/g' ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\' ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to print strings" >&5 printf %s "checking how to print strings... " >&6; } # Test print first, because it will be a builtin if present. if test "X`( print -r -- -n ) 2>/dev/null`" = X-n && \ test "X`print -r -- $ECHO 2>/dev/null`" = "X$ECHO"; then ECHO='print -r --' elif test "X`printf %s $ECHO 2>/dev/null`" = "X$ECHO"; then ECHO='printf %s\n' else # Use this function as a fallback that always works. func_fallback_echo () { eval 'cat <<_LTECHO_EOF $1 _LTECHO_EOF' } ECHO='func_fallback_echo' fi # func_echo_all arg... # Invoke $ECHO with all args, space-separated. func_echo_all () { $ECHO "" } case $ECHO in printf*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: printf" >&5 printf "%s\n" "printf" >&6; } ;; print*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: print -r" >&5 printf "%s\n" "print -r" >&6; } ;; *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: cat" >&5 printf "%s\n" "cat" >&6; } ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a sed that does not truncate output" >&5 printf %s "checking for a sed that does not truncate output... " >&6; } if test ${ac_cv_path_SED+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_script=s/aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa/bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb/ for ac_i in 1 2 3 4 5 6 7; do ac_script="$ac_script$as_nl$ac_script" done echo "$ac_script" 2>/dev/null | sed 99q >conftest.sed { ac_script=; unset ac_script;} if test -z "$SED"; then ac_path_SED_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in sed gsed do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_SED="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_SED" || continue # Check for GNU ac_path_SED and select it if it is found. # Check for GNU $ac_path_SED case `"$ac_path_SED" --version 2>&1` in #( *GNU*) ac_cv_path_SED="$ac_path_SED" ac_path_SED_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" '' >> "conftest.nl" "$ac_path_SED" -f conftest.sed < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_SED_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_SED="$ac_path_SED" ac_path_SED_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_SED_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_SED"; then as_fn_error $? "no acceptable sed could be found in \$PATH" "$LINENO" 5 fi else ac_cv_path_SED=$SED fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_SED" >&5 printf "%s\n" "$ac_cv_path_SED" >&6; } SED="$ac_cv_path_SED" rm -f conftest.sed test -z "$SED" && SED=sed Xsed="$SED -e 1s/^X//" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for fgrep" >&5 printf %s "checking for fgrep... " >&6; } if test ${ac_cv_path_FGREP+y} then : printf %s "(cached) " >&6 else case e in #( e) if echo 'ab*c' | $GREP -F 'ab*c' >/dev/null 2>&1 then ac_cv_path_FGREP="$GREP -F" else if test -z "$FGREP"; then ac_path_FGREP_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH$PATH_SEPARATOR/usr/xpg4/bin do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in fgrep do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_FGREP="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_FGREP" || continue # Check for GNU ac_path_FGREP and select it if it is found. # Check for GNU $ac_path_FGREP case `"$ac_path_FGREP" --version 2>&1` in #( *GNU*) ac_cv_path_FGREP="$ac_path_FGREP" ac_path_FGREP_found=:;; #( *) ac_count=0 printf %s 0123456789 >"conftest.in" while : do cat "conftest.in" "conftest.in" >"conftest.tmp" mv "conftest.tmp" "conftest.in" cp "conftest.in" "conftest.nl" printf "%s\n" 'FGREP' >> "conftest.nl" "$ac_path_FGREP" FGREP < "conftest.nl" >"conftest.out" 2>/dev/null || break diff "conftest.out" "conftest.nl" >/dev/null 2>&1 || break as_fn_arith $ac_count + 1 && ac_count=$as_val if test $ac_count -gt ${ac_path_FGREP_max-0}; then # Best one so far, save it but keep looking for a better one ac_cv_path_FGREP="$ac_path_FGREP" ac_path_FGREP_max=$ac_count fi # 10*(2^10) chars as input seems more than enough test $ac_count -gt 10 && break done rm -f conftest.in conftest.tmp conftest.nl conftest.out;; esac $ac_path_FGREP_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_FGREP"; then as_fn_error $? "no acceptable fgrep could be found in $PATH$PATH_SEPARATOR/usr/xpg4/bin" "$LINENO" 5 fi else ac_cv_path_FGREP=$FGREP fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_FGREP" >&5 printf "%s\n" "$ac_cv_path_FGREP" >&6; } FGREP="$ac_cv_path_FGREP" test -z "$GREP" && GREP=grep # Check whether --with-gnu-ld was given. if test ${with_gnu_ld+y} then : withval=$with_gnu_ld; test no = "$withval" || with_gnu_ld=yes else case e in #( e) with_gnu_ld=no ;; esac fi ac_prog=ld if test yes = "$GCC"; then # Check if gcc -print-prog-name=ld gives a path. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for ld used by $CC" >&5 printf %s "checking for ld used by $CC... " >&6; } case $host in *-*-mingw*) # gcc leaves a trailing carriage return, which upsets mingw ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;; *) ac_prog=`($CC -print-prog-name=ld) 2>&5` ;; esac case $ac_prog in # Accept absolute paths. [\\/]* | ?:[\\/]*) re_direlt='/[^/][^/]*/\.\./' # Canonicalize the pathname of ld ac_prog=`$ECHO "$ac_prog"| $SED 's%\\\\%/%g'` while $ECHO "$ac_prog" | $GREP "$re_direlt" > /dev/null 2>&1; do ac_prog=`$ECHO $ac_prog| $SED "s%$re_direlt%/%"` done test -z "$LD" && LD=$ac_prog ;; "") # If it fails, then pretend we aren't using GCC. ac_prog=ld ;; *) # If it is relative, then search for the first ld in PATH. with_gnu_ld=unknown ;; esac elif test yes = "$with_gnu_ld"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for GNU ld" >&5 printf %s "checking for GNU ld... " >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for non-GNU ld" >&5 printf %s "checking for non-GNU ld... " >&6; } fi if test ${lt_cv_path_LD+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$LD"; then lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR for ac_dir in $PATH; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then lt_cv_path_LD=$ac_dir/$ac_prog # Check to see if the program is GNU ld. I'd rather use --version, # but apparently some variants of GNU ld only accept -v. # Break only if it was the GNU/non-GNU ld that we prefer. case `"$lt_cv_path_LD" -v 2>&1 &5 printf "%s\n" "$LD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -z "$LD" && as_fn_error $? "no acceptable ld found in \$PATH" "$LINENO" 5 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if the linker ($LD) is GNU ld" >&5 printf %s "checking if the linker ($LD) is GNU ld... " >&6; } if test ${lt_cv_prog_gnu_ld+y} then : printf %s "(cached) " >&6 else case e in #( e) # I'd rather use --version here, but apparently some GNU lds only accept -v. case `$LD -v 2>&1 &5 printf "%s\n" "$lt_cv_prog_gnu_ld" >&6; } with_gnu_ld=$lt_cv_prog_gnu_ld { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for BSD- or MS-compatible name lister (nm)" >&5 printf %s "checking for BSD- or MS-compatible name lister (nm)... " >&6; } if test ${lt_cv_path_NM+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$NM"; then # Let the user override the test. lt_cv_path_NM=$NM else lt_nm_to_check=${ac_tool_prefix}nm if test -n "$ac_tool_prefix" && test "$build" = "$host"; then lt_nm_to_check="$lt_nm_to_check nm" fi for lt_tmp_nm in $lt_nm_to_check; do lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR for ac_dir in $PATH /usr/ccs/bin/elf /usr/ccs/bin /usr/ucb /bin; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. tmp_nm=$ac_dir/$lt_tmp_nm if test -f "$tmp_nm" || test -f "$tmp_nm$ac_exeext"; then # Check to see if the nm accepts a BSD-compat flag. # Adding the 'sed 1q' prevents false positives on HP-UX, which says: # nm: unknown option "B" ignored # Tru64's nm complains that /dev/null is an invalid object file # MSYS converts /dev/null to NUL, MinGW nm treats NUL as empty case $build_os in mingw*) lt_bad_file=conftest.nm/nofile ;; *) lt_bad_file=/dev/null ;; esac case `"$tmp_nm" -B $lt_bad_file 2>&1 | $SED '1q'` in *$lt_bad_file* | *'Invalid file or object type'*) lt_cv_path_NM="$tmp_nm -B" break 2 ;; *) case `"$tmp_nm" -p /dev/null 2>&1 | $SED '1q'` in */dev/null*) lt_cv_path_NM="$tmp_nm -p" break 2 ;; *) lt_cv_path_NM=${lt_cv_path_NM="$tmp_nm"} # keep the first match, but continue # so that we can try to find one that supports BSD flags ;; esac ;; esac fi done IFS=$lt_save_ifs done : ${lt_cv_path_NM=no} fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_path_NM" >&5 printf "%s\n" "$lt_cv_path_NM" >&6; } if test no != "$lt_cv_path_NM"; then NM=$lt_cv_path_NM else # Didn't find any BSD compatible name lister, look for dumpbin. if test -n "$DUMPBIN"; then : # Let the user override the test. else if test -n "$ac_tool_prefix"; then for ac_prog in dumpbin "link -dump" do # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. set dummy $ac_tool_prefix$ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_DUMPBIN+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$DUMPBIN"; then ac_cv_prog_DUMPBIN="$DUMPBIN" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_DUMPBIN="$ac_tool_prefix$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi DUMPBIN=$ac_cv_prog_DUMPBIN if test -n "$DUMPBIN"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $DUMPBIN" >&5 printf "%s\n" "$DUMPBIN" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$DUMPBIN" && break done fi if test -z "$DUMPBIN"; then ac_ct_DUMPBIN=$DUMPBIN for ac_prog in dumpbin "link -dump" do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_DUMPBIN+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_DUMPBIN"; then ac_cv_prog_ac_ct_DUMPBIN="$ac_ct_DUMPBIN" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_DUMPBIN="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_DUMPBIN=$ac_cv_prog_ac_ct_DUMPBIN if test -n "$ac_ct_DUMPBIN"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DUMPBIN" >&5 printf "%s\n" "$ac_ct_DUMPBIN" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$ac_ct_DUMPBIN" && break done if test "x$ac_ct_DUMPBIN" = x; then DUMPBIN=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac DUMPBIN=$ac_ct_DUMPBIN fi fi case `$DUMPBIN -symbols -headers /dev/null 2>&1 | $SED '1q'` in *COFF*) DUMPBIN="$DUMPBIN -symbols -headers" ;; *) DUMPBIN=: ;; esac fi if test : != "$DUMPBIN"; then NM=$DUMPBIN fi fi test -z "$NM" && NM=nm { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking the name lister ($NM) interface" >&5 printf %s "checking the name lister ($NM) interface... " >&6; } if test ${lt_cv_nm_interface+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_nm_interface="BSD nm" echo "int some_variable = 0;" > conftest.$ac_ext (eval echo "\"\$as_me:$LINENO: $ac_compile\"" >&5) (eval "$ac_compile" 2>conftest.err) cat conftest.err >&5 (eval echo "\"\$as_me:$LINENO: $NM \\\"conftest.$ac_objext\\\"\"" >&5) (eval "$NM \"conftest.$ac_objext\"" 2>conftest.err > conftest.out) cat conftest.err >&5 (eval echo "\"\$as_me:$LINENO: output\"" >&5) cat conftest.out >&5 if $GREP 'External.*some_variable' conftest.out > /dev/null; then lt_cv_nm_interface="MS dumpbin" fi rm -f conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_nm_interface" >&5 printf "%s\n" "$lt_cv_nm_interface" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ln -s works" >&5 printf %s "checking whether ln -s works... " >&6; } LN_S=$as_ln_s if test "$LN_S" = "ln -s"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no, using $LN_S" >&5 printf "%s\n" "no, using $LN_S" >&6; } fi # find the maximum length of command line arguments { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking the maximum length of command line arguments" >&5 printf %s "checking the maximum length of command line arguments... " >&6; } if test ${lt_cv_sys_max_cmd_len+y} then : printf %s "(cached) " >&6 else case e in #( e) i=0 teststring=ABCD case $build_os in msdosdjgpp*) # On DJGPP, this test can blow up pretty badly due to problems in libc # (any single argument exceeding 2000 bytes causes a buffer overrun # during glob expansion). Even if it were fixed, the result of this # check would be larger than it should be. lt_cv_sys_max_cmd_len=12288; # 12K is about right ;; gnu*) # Under GNU Hurd, this test is not required because there is # no limit to the length of command line arguments. # Libtool will interpret -1 as no limit whatsoever lt_cv_sys_max_cmd_len=-1; ;; cygwin* | mingw* | cegcc*) # On Win9x/ME, this test blows up -- it succeeds, but takes # about 5 minutes as the teststring grows exponentially. # Worse, since 9x/ME are not pre-emptively multitasking, # you end up with a "frozen" computer, even though with patience # the test eventually succeeds (with a max line length of 256k). # Instead, let's just punt: use the minimum linelength reported by # all of the supported platforms: 8192 (on NT/2K/XP). lt_cv_sys_max_cmd_len=8192; ;; mint*) # On MiNT this can take a long time and run out of memory. lt_cv_sys_max_cmd_len=8192; ;; amigaos*) # On AmigaOS with pdksh, this test takes hours, literally. # So we just punt and use a minimum line length of 8192. lt_cv_sys_max_cmd_len=8192; ;; bitrig* | darwin* | dragonfly* | freebsd* | midnightbsd* | netbsd* | openbsd*) # This has been around since 386BSD, at least. Likely further. if test -x /sbin/sysctl; then lt_cv_sys_max_cmd_len=`/sbin/sysctl -n kern.argmax` elif test -x /usr/sbin/sysctl; then lt_cv_sys_max_cmd_len=`/usr/sbin/sysctl -n kern.argmax` else lt_cv_sys_max_cmd_len=65536 # usable default for all BSDs fi # And add a safety zone lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4` lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3` ;; interix*) # We know the value 262144 and hardcode it with a safety zone (like BSD) lt_cv_sys_max_cmd_len=196608 ;; os2*) # The test takes a long time on OS/2. lt_cv_sys_max_cmd_len=8192 ;; osf*) # Dr. Hans Ekkehard Plesser reports seeing a kernel panic running configure # due to this test when exec_disable_arg_limit is 1 on Tru64. It is not # nice to cause kernel panics so lets avoid the loop below. # First set a reasonable default. lt_cv_sys_max_cmd_len=16384 # if test -x /sbin/sysconfig; then case `/sbin/sysconfig -q proc exec_disable_arg_limit` in *1*) lt_cv_sys_max_cmd_len=-1 ;; esac fi ;; sco3.2v5*) lt_cv_sys_max_cmd_len=102400 ;; sysv5* | sco5v6* | sysv4.2uw2*) kargmax=`grep ARG_MAX /etc/conf/cf.d/stune 2>/dev/null` if test -n "$kargmax"; then lt_cv_sys_max_cmd_len=`echo $kargmax | $SED 's/.*[ ]//'` else lt_cv_sys_max_cmd_len=32768 fi ;; *) lt_cv_sys_max_cmd_len=`(getconf ARG_MAX) 2> /dev/null` if test -n "$lt_cv_sys_max_cmd_len" && \ test undefined != "$lt_cv_sys_max_cmd_len"; then lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4` lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3` else # Make teststring a little bigger before we do anything with it. # a 1K string should be a reasonable start. for i in 1 2 3 4 5 6 7 8; do teststring=$teststring$teststring done SHELL=${SHELL-${CONFIG_SHELL-/bin/sh}} # If test is not a shell built-in, we'll probably end up computing a # maximum length that is only half of the actual maximum length, but # we can't tell. while { test X`env echo "$teststring$teststring" 2>/dev/null` \ = "X$teststring$teststring"; } >/dev/null 2>&1 && test 17 != "$i" # 1/2 MB should be enough do i=`expr $i + 1` teststring=$teststring$teststring done # Only check the string length outside the loop. lt_cv_sys_max_cmd_len=`expr "X$teststring" : ".*" 2>&1` teststring= # Add a significant safety factor because C++ compilers can tack on # massive amounts of additional arguments before passing them to the # linker. It appears as though 1/2 is a usable value. lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 2` fi ;; esac ;; esac fi if test -n "$lt_cv_sys_max_cmd_len"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_sys_max_cmd_len" >&5 printf "%s\n" "$lt_cv_sys_max_cmd_len" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: none" >&5 printf "%s\n" "none" >&6; } fi max_cmd_len=$lt_cv_sys_max_cmd_len : ${CP="cp -f"} : ${MV="mv -f"} : ${RM="rm -f"} if ( (MAIL=60; unset MAIL) || exit) >/dev/null 2>&1; then lt_unset=unset else lt_unset=false fi # test EBCDIC or ASCII case `echo X|tr X '\101'` in A) # ASCII based system # \n is not interpreted correctly by Solaris 8 /usr/ucb/tr lt_SP2NL='tr \040 \012' lt_NL2SP='tr \015\012 \040\040' ;; *) # EBCDIC based system lt_SP2NL='tr \100 \n' lt_NL2SP='tr \r\n \100\100' ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to convert $build file names to $host format" >&5 printf %s "checking how to convert $build file names to $host format... " >&6; } if test ${lt_cv_to_host_file_cmd+y} then : printf %s "(cached) " >&6 else case e in #( e) case $host in *-*-mingw* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_host_file_cmd=func_convert_file_msys_to_w32 ;; *-*-cygwin* ) lt_cv_to_host_file_cmd=func_convert_file_cygwin_to_w32 ;; * ) # otherwise, assume *nix lt_cv_to_host_file_cmd=func_convert_file_nix_to_w32 ;; esac ;; *-*-cygwin* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_host_file_cmd=func_convert_file_msys_to_cygwin ;; *-*-cygwin* ) lt_cv_to_host_file_cmd=func_convert_file_noop ;; * ) # otherwise, assume *nix lt_cv_to_host_file_cmd=func_convert_file_nix_to_cygwin ;; esac ;; * ) # unhandled hosts (and "normal" native builds) lt_cv_to_host_file_cmd=func_convert_file_noop ;; esac ;; esac fi to_host_file_cmd=$lt_cv_to_host_file_cmd { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_to_host_file_cmd" >&5 printf "%s\n" "$lt_cv_to_host_file_cmd" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to convert $build file names to toolchain format" >&5 printf %s "checking how to convert $build file names to toolchain format... " >&6; } if test ${lt_cv_to_tool_file_cmd+y} then : printf %s "(cached) " >&6 else case e in #( e) #assume ordinary cross tools, or native build. lt_cv_to_tool_file_cmd=func_convert_file_noop case $host in *-*-mingw* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_tool_file_cmd=func_convert_file_msys_to_w32 ;; esac ;; esac ;; esac fi to_tool_file_cmd=$lt_cv_to_tool_file_cmd { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_to_tool_file_cmd" >&5 printf "%s\n" "$lt_cv_to_tool_file_cmd" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $LD option to reload object files" >&5 printf %s "checking for $LD option to reload object files... " >&6; } if test ${lt_cv_ld_reload_flag+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_ld_reload_flag='-r' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_reload_flag" >&5 printf "%s\n" "$lt_cv_ld_reload_flag" >&6; } reload_flag=$lt_cv_ld_reload_flag case $reload_flag in "" | " "*) ;; *) reload_flag=" $reload_flag" ;; esac reload_cmds='$LD$reload_flag -o $output$reload_objs' case $host_os in cygwin* | mingw* | pw32* | cegcc*) if test yes != "$GCC"; then reload_cmds=false fi ;; darwin*) if test yes = "$GCC"; then reload_cmds='$LTCC $LTCFLAGS -nostdlib $wl-r -o $output$reload_objs' else reload_cmds='$LD$reload_flag -o $output$reload_objs' fi ;; esac if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}file", so it can be a program name with args. set dummy ${ac_tool_prefix}file; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_FILECMD+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$FILECMD"; then ac_cv_prog_FILECMD="$FILECMD" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_FILECMD="${ac_tool_prefix}file" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi FILECMD=$ac_cv_prog_FILECMD if test -n "$FILECMD"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $FILECMD" >&5 printf "%s\n" "$FILECMD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_FILECMD"; then ac_ct_FILECMD=$FILECMD # Extract the first word of "file", so it can be a program name with args. set dummy file; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_FILECMD+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_FILECMD"; then ac_cv_prog_ac_ct_FILECMD="$ac_ct_FILECMD" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_FILECMD="file" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_FILECMD=$ac_cv_prog_ac_ct_FILECMD if test -n "$ac_ct_FILECMD"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_FILECMD" >&5 printf "%s\n" "$ac_ct_FILECMD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_FILECMD" = x; then FILECMD=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac FILECMD=$ac_ct_FILECMD fi else FILECMD="$ac_cv_prog_FILECMD" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}objdump", so it can be a program name with args. set dummy ${ac_tool_prefix}objdump; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_OBJDUMP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$OBJDUMP"; then ac_cv_prog_OBJDUMP="$OBJDUMP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_OBJDUMP="${ac_tool_prefix}objdump" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi OBJDUMP=$ac_cv_prog_OBJDUMP if test -n "$OBJDUMP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $OBJDUMP" >&5 printf "%s\n" "$OBJDUMP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_OBJDUMP"; then ac_ct_OBJDUMP=$OBJDUMP # Extract the first word of "objdump", so it can be a program name with args. set dummy objdump; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_OBJDUMP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_OBJDUMP"; then ac_cv_prog_ac_ct_OBJDUMP="$ac_ct_OBJDUMP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_OBJDUMP="objdump" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_OBJDUMP=$ac_cv_prog_ac_ct_OBJDUMP if test -n "$ac_ct_OBJDUMP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OBJDUMP" >&5 printf "%s\n" "$ac_ct_OBJDUMP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_OBJDUMP" = x; then OBJDUMP="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac OBJDUMP=$ac_ct_OBJDUMP fi else OBJDUMP="$ac_cv_prog_OBJDUMP" fi test -z "$OBJDUMP" && OBJDUMP=objdump { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to recognize dependent libraries" >&5 printf %s "checking how to recognize dependent libraries... " >&6; } if test ${lt_cv_deplibs_check_method+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_file_magic_cmd='$MAGIC_CMD' lt_cv_file_magic_test_file= lt_cv_deplibs_check_method='unknown' # Need to set the preceding variable on all platforms that support # interlibrary dependencies. # 'none' -- dependencies not supported. # 'unknown' -- same as none, but documents that we really don't know. # 'pass_all' -- all dependencies passed with no checks. # 'test_compile' -- check by making test program. # 'file_magic [[regex]]' -- check by looking for files in library path # that responds to the $file_magic_cmd with a given extended regex. # If you have 'file' or equivalent on your system and you're not sure # whether 'pass_all' will *always* work, you probably want this one. case $host_os in aix[4-9]*) lt_cv_deplibs_check_method=pass_all ;; beos*) lt_cv_deplibs_check_method=pass_all ;; bsdi[45]*) lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (shared object|dynamic lib)' lt_cv_file_magic_cmd='$FILECMD -L' lt_cv_file_magic_test_file=/shlib/libc.so ;; cygwin*) # func_win32_libid is a shell function defined in ltmain.sh lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL' lt_cv_file_magic_cmd='func_win32_libid' ;; mingw* | pw32*) # Base MSYS/MinGW do not provide the 'file' command needed by # func_win32_libid shell function, so use a weaker test based on 'objdump', # unless we find 'file', for example because we are cross-compiling. if ( file / ) >/dev/null 2>&1; then lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL' lt_cv_file_magic_cmd='func_win32_libid' else # Keep this pattern in sync with the one in func_win32_libid. lt_cv_deplibs_check_method='file_magic file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' lt_cv_file_magic_cmd='$OBJDUMP -f' fi ;; cegcc*) # use the weaker test based on 'objdump'. See mingw*. lt_cv_deplibs_check_method='file_magic file format pe-arm-.*little(.*architecture: arm)?' lt_cv_file_magic_cmd='$OBJDUMP -f' ;; darwin* | rhapsody*) lt_cv_deplibs_check_method=pass_all ;; freebsd* | dragonfly* | midnightbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then case $host_cpu in i*86 ) # Not sure whether the presence of OpenBSD here was a mistake. # Let's accept both of them until this is cleared up. lt_cv_deplibs_check_method='file_magic (FreeBSD|OpenBSD|DragonFly)/i[3-9]86 (compact )?demand paged shared library' lt_cv_file_magic_cmd=$FILECMD lt_cv_file_magic_test_file=`echo /usr/lib/libc.so.*` ;; esac else lt_cv_deplibs_check_method=pass_all fi ;; haiku*) lt_cv_deplibs_check_method=pass_all ;; hpux10.20* | hpux11*) lt_cv_file_magic_cmd=$FILECMD case $host_cpu in ia64*) lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF-[0-9][0-9]) shared object file - IA64' lt_cv_file_magic_test_file=/usr/lib/hpux32/libc.so ;; hppa*64*) lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF[ -][0-9][0-9])(-bit)?( [LM]SB)? shared object( file)?[, -]* PA-RISC [0-9]\.[0-9]' lt_cv_file_magic_test_file=/usr/lib/pa20_64/libc.sl ;; *) lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|PA-RISC[0-9]\.[0-9]) shared library' lt_cv_file_magic_test_file=/usr/lib/libc.sl ;; esac ;; interix[3-9]*) # PIC code is broken on Interix 3.x, that's why |\.a not |_pic\.a here lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so|\.a)$' ;; irix5* | irix6* | nonstopux*) case $LD in *-32|*"-32 ") libmagic=32-bit;; *-n32|*"-n32 ") libmagic=N32;; *-64|*"-64 ") libmagic=64-bit;; *) libmagic=never-match;; esac lt_cv_deplibs_check_method=pass_all ;; # This must be glibc/ELF. linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) lt_cv_deplibs_check_method=pass_all ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|_pic\.a)$' else lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so|_pic\.a)$' fi ;; newos6*) lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (executable|dynamic lib)' lt_cv_file_magic_cmd=$FILECMD lt_cv_file_magic_test_file=/usr/lib/libnls.so ;; *nto* | *qnx*) lt_cv_deplibs_check_method=pass_all ;; openbsd* | bitrig*) if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|\.so|_pic\.a)$' else lt_cv_deplibs_check_method='match_pattern /lib[^/]+(\.so\.[0-9]+\.[0-9]+|_pic\.a)$' fi ;; osf3* | osf4* | osf5*) lt_cv_deplibs_check_method=pass_all ;; rdos*) lt_cv_deplibs_check_method=pass_all ;; solaris*) lt_cv_deplibs_check_method=pass_all ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*) lt_cv_deplibs_check_method=pass_all ;; sysv4 | sysv4.3*) case $host_vendor in motorola) lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [ML]SB (shared object|dynamic lib) M[0-9][0-9]* Version [0-9]' lt_cv_file_magic_test_file=`echo /usr/lib/libc.so*` ;; ncr) lt_cv_deplibs_check_method=pass_all ;; sequent) lt_cv_file_magic_cmd='/bin/file' lt_cv_deplibs_check_method='file_magic ELF [0-9][0-9]*-bit [LM]SB (shared object|dynamic lib )' ;; sni) lt_cv_file_magic_cmd='/bin/file' lt_cv_deplibs_check_method="file_magic ELF [0-9][0-9]*-bit [LM]SB dynamic lib" lt_cv_file_magic_test_file=/lib/libc.so ;; siemens) lt_cv_deplibs_check_method=pass_all ;; pc) lt_cv_deplibs_check_method=pass_all ;; esac ;; tpf*) lt_cv_deplibs_check_method=pass_all ;; os2*) lt_cv_deplibs_check_method=pass_all ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_deplibs_check_method" >&5 printf "%s\n" "$lt_cv_deplibs_check_method" >&6; } file_magic_glob= want_nocaseglob=no if test "$build" = "$host"; then case $host_os in mingw* | pw32*) if ( shopt | grep nocaseglob ) >/dev/null 2>&1; then want_nocaseglob=yes else file_magic_glob=`echo aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ | $SED -e "s/\(..\)/s\/[\1]\/[\1]\/g;/g"` fi ;; esac fi file_magic_cmd=$lt_cv_file_magic_cmd deplibs_check_method=$lt_cv_deplibs_check_method test -z "$deplibs_check_method" && deplibs_check_method=unknown if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}dlltool", so it can be a program name with args. set dummy ${ac_tool_prefix}dlltool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_DLLTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$DLLTOOL"; then ac_cv_prog_DLLTOOL="$DLLTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_DLLTOOL="${ac_tool_prefix}dlltool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi DLLTOOL=$ac_cv_prog_DLLTOOL if test -n "$DLLTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $DLLTOOL" >&5 printf "%s\n" "$DLLTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_DLLTOOL"; then ac_ct_DLLTOOL=$DLLTOOL # Extract the first word of "dlltool", so it can be a program name with args. set dummy dlltool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_DLLTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_DLLTOOL"; then ac_cv_prog_ac_ct_DLLTOOL="$ac_ct_DLLTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_DLLTOOL="dlltool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_DLLTOOL=$ac_cv_prog_ac_ct_DLLTOOL if test -n "$ac_ct_DLLTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DLLTOOL" >&5 printf "%s\n" "$ac_ct_DLLTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_DLLTOOL" = x; then DLLTOOL="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac DLLTOOL=$ac_ct_DLLTOOL fi else DLLTOOL="$ac_cv_prog_DLLTOOL" fi test -z "$DLLTOOL" && DLLTOOL=dlltool { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to associate runtime and link libraries" >&5 printf %s "checking how to associate runtime and link libraries... " >&6; } if test ${lt_cv_sharedlib_from_linklib_cmd+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_sharedlib_from_linklib_cmd='unknown' case $host_os in cygwin* | mingw* | pw32* | cegcc*) # two different shell functions defined in ltmain.sh; # decide which one to use based on capabilities of $DLLTOOL case `$DLLTOOL --help 2>&1` in *--identify-strict*) lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib ;; *) lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib_fallback ;; esac ;; *) # fallback: assume linklib IS sharedlib lt_cv_sharedlib_from_linklib_cmd=$ECHO ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_sharedlib_from_linklib_cmd" >&5 printf "%s\n" "$lt_cv_sharedlib_from_linklib_cmd" >&6; } sharedlib_from_linklib_cmd=$lt_cv_sharedlib_from_linklib_cmd test -z "$sharedlib_from_linklib_cmd" && sharedlib_from_linklib_cmd=$ECHO if test -n "$ac_tool_prefix"; then for ac_prog in ar do # Extract the first word of "$ac_tool_prefix$ac_prog", so it can be a program name with args. set dummy $ac_tool_prefix$ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_AR+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$AR"; then ac_cv_prog_AR="$AR" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_AR="$ac_tool_prefix$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi AR=$ac_cv_prog_AR if test -n "$AR"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AR" >&5 printf "%s\n" "$AR" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$AR" && break done fi if test -z "$AR"; then ac_ct_AR=$AR for ac_prog in ar do # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_AR+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_AR"; then ac_cv_prog_ac_ct_AR="$ac_ct_AR" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_AR="$ac_prog" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_AR=$ac_cv_prog_ac_ct_AR if test -n "$ac_ct_AR"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AR" >&5 printf "%s\n" "$ac_ct_AR" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -n "$ac_ct_AR" && break done if test "x$ac_ct_AR" = x; then AR="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac AR=$ac_ct_AR fi fi : ${AR=ar} # Use ARFLAGS variable as AR's operation code to sync the variable naming with # Automake. If both AR_FLAGS and ARFLAGS are specified, AR_FLAGS should have # higher priority because thats what people were doing historically (setting # ARFLAGS for automake and AR_FLAGS for libtool). FIXME: Make the AR_FLAGS # variable obsoleted/removed. test ${AR_FLAGS+y} || AR_FLAGS=${ARFLAGS-cr} lt_ar_flags=$AR_FLAGS # Make AR_FLAGS overridable by 'make ARFLAGS='. Don't try to run-time override # by AR_FLAGS because that was never working and AR_FLAGS is about to die. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for archiver @FILE support" >&5 printf %s "checking for archiver @FILE support... " >&6; } if test ${lt_cv_ar_at_file+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_ar_at_file=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : echo conftest.$ac_objext > conftest.lst lt_ar_try='$AR $AR_FLAGS libconftest.a @conftest.lst >&5' { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$lt_ar_try\""; } >&5 (eval $lt_ar_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } if test 0 -eq "$ac_status"; then # Ensure the archiver fails upon bogus file names. rm -f conftest.$ac_objext libconftest.a { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$lt_ar_try\""; } >&5 (eval $lt_ar_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } if test 0 -ne "$ac_status"; then lt_cv_ar_at_file=@ fi fi rm -f conftest.* libconftest.a fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ar_at_file" >&5 printf "%s\n" "$lt_cv_ar_at_file" >&6; } if test no = "$lt_cv_ar_at_file"; then archiver_list_spec= else archiver_list_spec=$lt_cv_ar_at_file fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}strip", so it can be a program name with args. set dummy ${ac_tool_prefix}strip; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_STRIP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$STRIP"; then ac_cv_prog_STRIP="$STRIP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_STRIP="${ac_tool_prefix}strip" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi STRIP=$ac_cv_prog_STRIP if test -n "$STRIP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $STRIP" >&5 printf "%s\n" "$STRIP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_STRIP"; then ac_ct_STRIP=$STRIP # Extract the first word of "strip", so it can be a program name with args. set dummy strip; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_STRIP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_STRIP"; then ac_cv_prog_ac_ct_STRIP="$ac_ct_STRIP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_STRIP="strip" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_STRIP=$ac_cv_prog_ac_ct_STRIP if test -n "$ac_ct_STRIP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_STRIP" >&5 printf "%s\n" "$ac_ct_STRIP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_STRIP" = x; then STRIP=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac STRIP=$ac_ct_STRIP fi else STRIP="$ac_cv_prog_STRIP" fi test -z "$STRIP" && STRIP=: if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}ranlib", so it can be a program name with args. set dummy ${ac_tool_prefix}ranlib; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_RANLIB+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$RANLIB"; then ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_RANLIB="${ac_tool_prefix}ranlib" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi RANLIB=$ac_cv_prog_RANLIB if test -n "$RANLIB"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $RANLIB" >&5 printf "%s\n" "$RANLIB" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_RANLIB"; then ac_ct_RANLIB=$RANLIB # Extract the first word of "ranlib", so it can be a program name with args. set dummy ranlib; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_RANLIB+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_RANLIB"; then ac_cv_prog_ac_ct_RANLIB="$ac_ct_RANLIB" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_RANLIB="ranlib" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_RANLIB=$ac_cv_prog_ac_ct_RANLIB if test -n "$ac_ct_RANLIB"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_RANLIB" >&5 printf "%s\n" "$ac_ct_RANLIB" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_RANLIB" = x; then RANLIB=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac RANLIB=$ac_ct_RANLIB fi else RANLIB="$ac_cv_prog_RANLIB" fi test -z "$RANLIB" && RANLIB=: # Determine commands to create old-style static archives. old_archive_cmds='$AR $AR_FLAGS $oldlib$oldobjs' old_postinstall_cmds='chmod 644 $oldlib' old_postuninstall_cmds= if test -n "$RANLIB"; then case $host_os in bitrig* | openbsd*) old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB -t \$tool_oldlib" ;; *) old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB \$tool_oldlib" ;; esac old_archive_cmds="$old_archive_cmds~\$RANLIB \$tool_oldlib" fi case $host_os in darwin*) lock_old_archive_extraction=yes ;; *) lock_old_archive_extraction=no ;; esac # If no C compiler was specified, use CC. LTCC=${LTCC-"$CC"} # If no C compiler flags were specified, use CFLAGS. LTCFLAGS=${LTCFLAGS-"$CFLAGS"} # Allow CC to be a program name with arguments. compiler=$CC # Check for command to grab the raw symbol name followed by C symbol from nm. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking command to parse $NM output from $compiler object" >&5 printf %s "checking command to parse $NM output from $compiler object... " >&6; } if test ${lt_cv_sys_global_symbol_pipe+y} then : printf %s "(cached) " >&6 else case e in #( e) # These are sane defaults that work on at least a few old systems. # [They come from Ultrix. What could be older than Ultrix?!! ;)] # Character class describing NM global symbol codes. symcode='[BCDEGRST]' # Regexp to match symbols that can be accessed directly from C. sympat='\([_A-Za-z][_A-Za-z0-9]*\)' # Define system-specific variables. case $host_os in aix*) symcode='[BCDT]' ;; cygwin* | mingw* | pw32* | cegcc*) symcode='[ABCDGISTW]' ;; hpux*) if test ia64 = "$host_cpu"; then symcode='[ABCDEGRST]' fi ;; irix* | nonstopux*) symcode='[BCDEGRST]' ;; osf*) symcode='[BCDEGQRST]' ;; solaris*) symcode='[BCDRT]' ;; sco3.2v5*) symcode='[DT]' ;; sysv4.2uw2*) symcode='[DT]' ;; sysv5* | sco5v6* | unixware* | OpenUNIX*) symcode='[ABDT]' ;; sysv4) symcode='[DFNSTU]' ;; esac # If we're using GNU nm, then use its standard symbol codes. case `$NM -V 2>&1` in *GNU* | *'with BFD'*) symcode='[ABCDGIRSTW]' ;; esac if test "$lt_cv_nm_interface" = "MS dumpbin"; then # Gets list of data symbols to import. lt_cv_sys_global_symbol_to_import="$SED -n -e 's/^I .* \(.*\)$/\1/p'" # Adjust the below global symbol transforms to fixup imported variables. lt_cdecl_hook=" -e 's/^I .* \(.*\)$/extern __declspec(dllimport) char \1;/p'" lt_c_name_hook=" -e 's/^I .* \(.*\)$/ {\"\1\", (void *) 0},/p'" lt_c_name_lib_hook="\ -e 's/^I .* \(lib.*\)$/ {\"\1\", (void *) 0},/p'\ -e 's/^I .* \(.*\)$/ {\"lib\1\", (void *) 0},/p'" else # Disable hooks by default. lt_cv_sys_global_symbol_to_import= lt_cdecl_hook= lt_c_name_hook= lt_c_name_lib_hook= fi # Transform an extracted symbol line into a proper C declaration. # Some systems (esp. on ia64) link data and code symbols differently, # so use this general approach. lt_cv_sys_global_symbol_to_cdecl="$SED -n"\ $lt_cdecl_hook\ " -e 's/^T .* \(.*\)$/extern int \1();/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/extern char \1;/p'" # Transform an extracted symbol line into symbol name and symbol address lt_cv_sys_global_symbol_to_c_name_address="$SED -n"\ $lt_c_name_hook\ " -e 's/^: \(.*\) .*$/ {\"\1\", (void *) 0},/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/ {\"\1\", (void *) \&\1},/p'" # Transform an extracted symbol line into symbol name with lib prefix and # symbol address. lt_cv_sys_global_symbol_to_c_name_address_lib_prefix="$SED -n"\ $lt_c_name_lib_hook\ " -e 's/^: \(.*\) .*$/ {\"\1\", (void *) 0},/p'"\ " -e 's/^$symcode$symcode* .* \(lib.*\)$/ {\"\1\", (void *) \&\1},/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/ {\"lib\1\", (void *) \&\1},/p'" # Handle CRLF in mingw tool chain opt_cr= case $build_os in mingw*) opt_cr=`$ECHO 'x\{0,1\}' | tr x '\015'` # option cr in regexp ;; esac # Try without a prefix underscore, then with it. for ac_symprfx in "" "_"; do # Transform symcode, sympat, and symprfx into a raw symbol and a C symbol. symxfrm="\\1 $ac_symprfx\\2 \\2" # Write the raw and C identifiers. if test "$lt_cv_nm_interface" = "MS dumpbin"; then # Fake it for dumpbin and say T for any non-static function, # D for any global variable and I for any imported variable. # Also find C++ and __fastcall symbols from MSVC++ or ICC, # which start with @ or ?. lt_cv_sys_global_symbol_pipe="$AWK '"\ " {last_section=section; section=\$ 3};"\ " /^COFF SYMBOL TABLE/{for(i in hide) delete hide[i]};"\ " /Section length .*#relocs.*(pick any)/{hide[last_section]=1};"\ " /^ *Symbol name *: /{split(\$ 0,sn,\":\"); si=substr(sn[2],2)};"\ " /^ *Type *: code/{print \"T\",si,substr(si,length(prfx))};"\ " /^ *Type *: data/{print \"I\",si,substr(si,length(prfx))};"\ " \$ 0!~/External *\|/{next};"\ " / 0+ UNDEF /{next}; / UNDEF \([^|]\)*()/{next};"\ " {if(hide[section]) next};"\ " {f=\"D\"}; \$ 0~/\(\).*\|/{f=\"T\"};"\ " {split(\$ 0,a,/\||\r/); split(a[2],s)};"\ " s[1]~/^[@?]/{print f,s[1],s[1]; next};"\ " s[1]~prfx {split(s[1],t,\"@\"); print f,t[1],substr(t[1],length(prfx))}"\ " ' prfx=^$ac_symprfx" else lt_cv_sys_global_symbol_pipe="$SED -n -e 's/^.*[ ]\($symcode$symcode*\)[ ][ ]*$ac_symprfx$sympat$opt_cr$/$symxfrm/p'" fi lt_cv_sys_global_symbol_pipe="$lt_cv_sys_global_symbol_pipe | $SED '/ __gnu_lto/d'" # Check to see that the pipe works correctly. pipe_works=no rm -f conftest* cat > conftest.$ac_ext <<_LT_EOF #ifdef __cplusplus extern "C" { #endif char nm_test_var; void nm_test_func(void); void nm_test_func(void){} #ifdef __cplusplus } #endif int main(){nm_test_var='a';nm_test_func();return(0);} _LT_EOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then # Now try to grab the symbols. nlist=conftest.nm if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist\""; } >&5 (eval $NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s "$nlist"; then # Try sorting and uniquifying the output. if sort "$nlist" | uniq > "$nlist"T; then mv -f "$nlist"T "$nlist" else rm -f "$nlist"T fi # Make sure that we snagged all the symbols we need. if $GREP ' nm_test_var$' "$nlist" >/dev/null; then if $GREP ' nm_test_func$' "$nlist" >/dev/null; then cat <<_LT_EOF > conftest.$ac_ext /* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests. */ #if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE /* DATA imports from DLLs on WIN32 can't be const, because runtime relocations are performed -- see ld's documentation on pseudo-relocs. */ # define LT_DLSYM_CONST #elif defined __osf__ /* This system does not cope well with relocations in const data. */ # define LT_DLSYM_CONST #else # define LT_DLSYM_CONST const #endif #ifdef __cplusplus extern "C" { #endif _LT_EOF # Now generate the symbol file. eval "$lt_cv_sys_global_symbol_to_cdecl"' < "$nlist" | $GREP -v main >> conftest.$ac_ext' cat <<_LT_EOF >> conftest.$ac_ext /* The mapping between symbol names and symbols. */ LT_DLSYM_CONST struct { const char *name; void *address; } lt__PROGRAM__LTX_preloaded_symbols[] = { { "@PROGRAM@", (void *) 0 }, _LT_EOF $SED "s/^$symcode$symcode* .* \(.*\)$/ {\"\1\", (void *) \&\1},/" < "$nlist" | $GREP -v main >> conftest.$ac_ext cat <<\_LT_EOF >> conftest.$ac_ext {0, (void *) 0} }; /* This works around a problem in FreeBSD linker */ #ifdef FREEBSD_WORKAROUND static const void *lt_preloaded_setup() { return lt__PROGRAM__LTX_preloaded_symbols; } #endif #ifdef __cplusplus } #endif _LT_EOF # Now try linking the two files. mv conftest.$ac_objext conftstm.$ac_objext lt_globsym_save_LIBS=$LIBS lt_globsym_save_CFLAGS=$CFLAGS LIBS=conftstm.$ac_objext CFLAGS="$CFLAGS$lt_prog_compiler_no_builtin_flag" if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then pipe_works=yes fi LIBS=$lt_globsym_save_LIBS CFLAGS=$lt_globsym_save_CFLAGS else echo "cannot find nm_test_func in $nlist" >&5 fi else echo "cannot find nm_test_var in $nlist" >&5 fi else echo "cannot run $lt_cv_sys_global_symbol_pipe" >&5 fi else echo "$progname: failed program was:" >&5 cat conftest.$ac_ext >&5 fi rm -rf conftest* conftst* # Do not use the global_symbol_pipe unless it works. if test yes = "$pipe_works"; then break else lt_cv_sys_global_symbol_pipe= fi done ;; esac fi if test -z "$lt_cv_sys_global_symbol_pipe"; then lt_cv_sys_global_symbol_to_cdecl= fi if test -z "$lt_cv_sys_global_symbol_pipe$lt_cv_sys_global_symbol_to_cdecl"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: failed" >&5 printf "%s\n" "failed" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: ok" >&5 printf "%s\n" "ok" >&6; } fi # Response file support. if test "$lt_cv_nm_interface" = "MS dumpbin"; then nm_file_list_spec='@' elif $NM --help 2>/dev/null | grep '[@]FILE' >/dev/null; then nm_file_list_spec='@' fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sysroot" >&5 printf %s "checking for sysroot... " >&6; } # Check whether --with-sysroot was given. if test ${with_sysroot+y} then : withval=$with_sysroot; else case e in #( e) with_sysroot=no ;; esac fi lt_sysroot= case $with_sysroot in #( yes) if test yes = "$GCC"; then lt_sysroot=`$CC --print-sysroot 2>/dev/null` fi ;; #( /*) lt_sysroot=`echo "$with_sysroot" | $SED -e "$sed_quote_subst"` ;; #( no|'') ;; #( *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $with_sysroot" >&5 printf "%s\n" "$with_sysroot" >&6; } as_fn_error $? "The sysroot must be an absolute path." "$LINENO" 5 ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: ${lt_sysroot:-no}" >&5 printf "%s\n" "${lt_sysroot:-no}" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for a working dd" >&5 printf %s "checking for a working dd... " >&6; } if test ${ac_cv_path_lt_DD+y} then : printf %s "(cached) " >&6 else case e in #( e) printf 0123456789abcdef0123456789abcdef >conftest.i cat conftest.i conftest.i >conftest2.i : ${lt_DD:=$DD} if test -z "$lt_DD"; then ac_path_lt_DD_found=false # Loop through the user's path and test for each of PROGNAME-LIST as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_prog in dd do for ac_exec_ext in '' $ac_executable_extensions; do ac_path_lt_DD="$as_dir$ac_prog$ac_exec_ext" as_fn_executable_p "$ac_path_lt_DD" || continue if "$ac_path_lt_DD" bs=32 count=1 conftest.out 2>/dev/null; then cmp -s conftest.i conftest.out \ && ac_cv_path_lt_DD="$ac_path_lt_DD" ac_path_lt_DD_found=: fi $ac_path_lt_DD_found && break 3 done done done IFS=$as_save_IFS if test -z "$ac_cv_path_lt_DD"; then : fi else ac_cv_path_lt_DD=$lt_DD fi rm -f conftest.i conftest2.i conftest.out ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_path_lt_DD" >&5 printf "%s\n" "$ac_cv_path_lt_DD" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to truncate binary pipes" >&5 printf %s "checking how to truncate binary pipes... " >&6; } if test ${lt_cv_truncate_bin+y} then : printf %s "(cached) " >&6 else case e in #( e) printf 0123456789abcdef0123456789abcdef >conftest.i cat conftest.i conftest.i >conftest2.i lt_cv_truncate_bin= if "$ac_cv_path_lt_DD" bs=32 count=1 conftest.out 2>/dev/null; then cmp -s conftest.i conftest.out \ && lt_cv_truncate_bin="$ac_cv_path_lt_DD bs=4096 count=1" fi rm -f conftest.i conftest2.i conftest.out test -z "$lt_cv_truncate_bin" && lt_cv_truncate_bin="$SED -e 4q" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_truncate_bin" >&5 printf "%s\n" "$lt_cv_truncate_bin" >&6; } # Calculate cc_basename. Skip known compiler wrappers and cross-prefix. func_cc_basename () { for cc_temp in $*""; do case $cc_temp in compile | *[\\/]compile | ccache | *[\\/]ccache ) ;; distcc | *[\\/]distcc | purify | *[\\/]purify ) ;; \-*) ;; *) break;; esac done func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"` } # Check whether --enable-libtool-lock was given. if test ${enable_libtool_lock+y} then : enableval=$enable_libtool_lock; fi test no = "$enable_libtool_lock" || enable_libtool_lock=yes # Some flags need to be propagated to the compiler or linker for good # libtool support. case $host in ia64-*-hpux*) # Find out what ABI is being produced by ac_compile, and set mode # options accordingly. echo 'int i;' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then case `$FILECMD conftest.$ac_objext` in *ELF-32*) HPUX_IA64_MODE=32 ;; *ELF-64*) HPUX_IA64_MODE=64 ;; esac fi rm -rf conftest* ;; *-*-irix6*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo '#line '$LINENO' "configure"' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then if test yes = "$lt_cv_prog_gnu_ld"; then case `$FILECMD conftest.$ac_objext` in *32-bit*) LD="${LD-ld} -melf32bsmip" ;; *N32*) LD="${LD-ld} -melf32bmipn32" ;; *64-bit*) LD="${LD-ld} -melf64bmip" ;; esac else case `$FILECMD conftest.$ac_objext` in *32-bit*) LD="${LD-ld} -32" ;; *N32*) LD="${LD-ld} -n32" ;; *64-bit*) LD="${LD-ld} -64" ;; esac fi fi rm -rf conftest* ;; mips64*-*linux*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo '#line '$LINENO' "configure"' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then emul=elf case `$FILECMD conftest.$ac_objext` in *32-bit*) emul="${emul}32" ;; *64-bit*) emul="${emul}64" ;; esac case `$FILECMD conftest.$ac_objext` in *MSB*) emul="${emul}btsmip" ;; *LSB*) emul="${emul}ltsmip" ;; esac case `$FILECMD conftest.$ac_objext` in *N32*) emul="${emul}n32" ;; esac LD="${LD-ld} -m $emul" fi rm -rf conftest* ;; x86_64-*kfreebsd*-gnu|x86_64-*linux*|powerpc*-*linux*| \ s390*-*linux*|s390*-*tpf*|sparc*-*linux*|x86_64-gnu*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. Note that the listed cases only cover the # situations where additional linker options are needed (such as when # doing 32-bit compilation for a host where ld defaults to 64-bit, or # vice versa); the common cases where no linker options are needed do # not appear in the list. echo 'int i;' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then case `$FILECMD conftest.o` in *32-bit*) case $host in x86_64-*kfreebsd*-gnu) LD="${LD-ld} -m elf_i386_fbsd" ;; x86_64-*linux*|x86_64-gnu*) case `$FILECMD conftest.o` in *x86-64*) LD="${LD-ld} -m elf32_x86_64" ;; *) LD="${LD-ld} -m elf_i386" ;; esac ;; powerpc64le-*linux*) LD="${LD-ld} -m elf32lppclinux" ;; powerpc64-*linux*) LD="${LD-ld} -m elf32ppclinux" ;; s390x-*linux*) LD="${LD-ld} -m elf_s390" ;; sparc64-*linux*) LD="${LD-ld} -m elf32_sparc" ;; esac ;; *64-bit*) case $host in x86_64-*kfreebsd*-gnu) LD="${LD-ld} -m elf_x86_64_fbsd" ;; x86_64-*linux*|x86_64-gnu*) LD="${LD-ld} -m elf_x86_64" ;; powerpcle-*linux*) LD="${LD-ld} -m elf64lppc" ;; powerpc-*linux*) LD="${LD-ld} -m elf64ppc" ;; s390*-*linux*|s390*-*tpf*) LD="${LD-ld} -m elf64_s390" ;; sparc*-*linux*) LD="${LD-ld} -m elf64_sparc" ;; esac ;; esac fi rm -rf conftest* ;; *-*-sco3.2v5*) # On SCO OpenServer 5, we need -belf to get full-featured binaries. SAVE_CFLAGS=$CFLAGS CFLAGS="$CFLAGS -belf" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the C compiler needs -belf" >&5 printf %s "checking whether the C compiler needs -belf... " >&6; } if test ${lt_cv_cc_needs_belf+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : lt_cv_cc_needs_belf=yes else case e in #( e) lt_cv_cc_needs_belf=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_cc_needs_belf" >&5 printf "%s\n" "$lt_cv_cc_needs_belf" >&6; } if test yes != "$lt_cv_cc_needs_belf"; then # this is probably gcc 2.8.0, egcs 1.0 or newer; no need for -belf CFLAGS=$SAVE_CFLAGS fi ;; *-*solaris*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo 'int i;' > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then case `$FILECMD conftest.o` in *64-bit*) case $lt_cv_prog_gnu_ld in yes*) case $host in i?86-*-solaris*|x86_64-*-solaris*) LD="${LD-ld} -m elf_x86_64" ;; sparc*-*-solaris*) LD="${LD-ld} -m elf64_sparc" ;; esac # GNU ld 2.21 introduced _sol2 emulations. Use them if available. if ${LD-ld} -V | grep _sol2 >/dev/null 2>&1; then LD=${LD-ld}_sol2 fi ;; *) if ${LD-ld} -64 -r -o conftest2.o conftest.o >/dev/null 2>&1; then LD="${LD-ld} -64" fi ;; esac ;; esac fi rm -rf conftest* ;; esac need_locks=$enable_libtool_lock if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}mt", so it can be a program name with args. set dummy ${ac_tool_prefix}mt; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_MANIFEST_TOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$MANIFEST_TOOL"; then ac_cv_prog_MANIFEST_TOOL="$MANIFEST_TOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_MANIFEST_TOOL="${ac_tool_prefix}mt" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi MANIFEST_TOOL=$ac_cv_prog_MANIFEST_TOOL if test -n "$MANIFEST_TOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $MANIFEST_TOOL" >&5 printf "%s\n" "$MANIFEST_TOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_MANIFEST_TOOL"; then ac_ct_MANIFEST_TOOL=$MANIFEST_TOOL # Extract the first word of "mt", so it can be a program name with args. set dummy mt; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_MANIFEST_TOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_MANIFEST_TOOL"; then ac_cv_prog_ac_ct_MANIFEST_TOOL="$ac_ct_MANIFEST_TOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_MANIFEST_TOOL="mt" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_MANIFEST_TOOL=$ac_cv_prog_ac_ct_MANIFEST_TOOL if test -n "$ac_ct_MANIFEST_TOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_MANIFEST_TOOL" >&5 printf "%s\n" "$ac_ct_MANIFEST_TOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_MANIFEST_TOOL" = x; then MANIFEST_TOOL=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac MANIFEST_TOOL=$ac_ct_MANIFEST_TOOL fi else MANIFEST_TOOL="$ac_cv_prog_MANIFEST_TOOL" fi test -z "$MANIFEST_TOOL" && MANIFEST_TOOL=mt { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $MANIFEST_TOOL is a manifest tool" >&5 printf %s "checking if $MANIFEST_TOOL is a manifest tool... " >&6; } if test ${lt_cv_path_mainfest_tool+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_path_mainfest_tool=no echo "$as_me:$LINENO: $MANIFEST_TOOL '-?'" >&5 $MANIFEST_TOOL '-?' 2>conftest.err > conftest.out cat conftest.err >&5 if $GREP 'Manifest Tool' conftest.out > /dev/null; then lt_cv_path_mainfest_tool=yes fi rm -f conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_path_mainfest_tool" >&5 printf "%s\n" "$lt_cv_path_mainfest_tool" >&6; } if test yes != "$lt_cv_path_mainfest_tool"; then MANIFEST_TOOL=: fi case $host_os in rhapsody* | darwin*) if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}dsymutil", so it can be a program name with args. set dummy ${ac_tool_prefix}dsymutil; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_DSYMUTIL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$DSYMUTIL"; then ac_cv_prog_DSYMUTIL="$DSYMUTIL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_DSYMUTIL="${ac_tool_prefix}dsymutil" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi DSYMUTIL=$ac_cv_prog_DSYMUTIL if test -n "$DSYMUTIL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $DSYMUTIL" >&5 printf "%s\n" "$DSYMUTIL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_DSYMUTIL"; then ac_ct_DSYMUTIL=$DSYMUTIL # Extract the first word of "dsymutil", so it can be a program name with args. set dummy dsymutil; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_DSYMUTIL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_DSYMUTIL"; then ac_cv_prog_ac_ct_DSYMUTIL="$ac_ct_DSYMUTIL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_DSYMUTIL="dsymutil" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_DSYMUTIL=$ac_cv_prog_ac_ct_DSYMUTIL if test -n "$ac_ct_DSYMUTIL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DSYMUTIL" >&5 printf "%s\n" "$ac_ct_DSYMUTIL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_DSYMUTIL" = x; then DSYMUTIL=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac DSYMUTIL=$ac_ct_DSYMUTIL fi else DSYMUTIL="$ac_cv_prog_DSYMUTIL" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}nmedit", so it can be a program name with args. set dummy ${ac_tool_prefix}nmedit; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_NMEDIT+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$NMEDIT"; then ac_cv_prog_NMEDIT="$NMEDIT" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_NMEDIT="${ac_tool_prefix}nmedit" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi NMEDIT=$ac_cv_prog_NMEDIT if test -n "$NMEDIT"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $NMEDIT" >&5 printf "%s\n" "$NMEDIT" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_NMEDIT"; then ac_ct_NMEDIT=$NMEDIT # Extract the first word of "nmedit", so it can be a program name with args. set dummy nmedit; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_NMEDIT+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_NMEDIT"; then ac_cv_prog_ac_ct_NMEDIT="$ac_ct_NMEDIT" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_NMEDIT="nmedit" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_NMEDIT=$ac_cv_prog_ac_ct_NMEDIT if test -n "$ac_ct_NMEDIT"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_NMEDIT" >&5 printf "%s\n" "$ac_ct_NMEDIT" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_NMEDIT" = x; then NMEDIT=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac NMEDIT=$ac_ct_NMEDIT fi else NMEDIT="$ac_cv_prog_NMEDIT" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}lipo", so it can be a program name with args. set dummy ${ac_tool_prefix}lipo; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_LIPO+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$LIPO"; then ac_cv_prog_LIPO="$LIPO" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_LIPO="${ac_tool_prefix}lipo" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi LIPO=$ac_cv_prog_LIPO if test -n "$LIPO"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $LIPO" >&5 printf "%s\n" "$LIPO" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_LIPO"; then ac_ct_LIPO=$LIPO # Extract the first word of "lipo", so it can be a program name with args. set dummy lipo; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_LIPO+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_LIPO"; then ac_cv_prog_ac_ct_LIPO="$ac_ct_LIPO" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_LIPO="lipo" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_LIPO=$ac_cv_prog_ac_ct_LIPO if test -n "$ac_ct_LIPO"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_LIPO" >&5 printf "%s\n" "$ac_ct_LIPO" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_LIPO" = x; then LIPO=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac LIPO=$ac_ct_LIPO fi else LIPO="$ac_cv_prog_LIPO" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}otool", so it can be a program name with args. set dummy ${ac_tool_prefix}otool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_OTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$OTOOL"; then ac_cv_prog_OTOOL="$OTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_OTOOL="${ac_tool_prefix}otool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi OTOOL=$ac_cv_prog_OTOOL if test -n "$OTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $OTOOL" >&5 printf "%s\n" "$OTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_OTOOL"; then ac_ct_OTOOL=$OTOOL # Extract the first word of "otool", so it can be a program name with args. set dummy otool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_OTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_OTOOL"; then ac_cv_prog_ac_ct_OTOOL="$ac_ct_OTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_OTOOL="otool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_OTOOL=$ac_cv_prog_ac_ct_OTOOL if test -n "$ac_ct_OTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OTOOL" >&5 printf "%s\n" "$ac_ct_OTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_OTOOL" = x; then OTOOL=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac OTOOL=$ac_ct_OTOOL fi else OTOOL="$ac_cv_prog_OTOOL" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}otool64", so it can be a program name with args. set dummy ${ac_tool_prefix}otool64; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_OTOOL64+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$OTOOL64"; then ac_cv_prog_OTOOL64="$OTOOL64" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_OTOOL64="${ac_tool_prefix}otool64" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi OTOOL64=$ac_cv_prog_OTOOL64 if test -n "$OTOOL64"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $OTOOL64" >&5 printf "%s\n" "$OTOOL64" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_OTOOL64"; then ac_ct_OTOOL64=$OTOOL64 # Extract the first word of "otool64", so it can be a program name with args. set dummy otool64; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_OTOOL64+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_OTOOL64"; then ac_cv_prog_ac_ct_OTOOL64="$ac_ct_OTOOL64" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_OTOOL64="otool64" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_OTOOL64=$ac_cv_prog_ac_ct_OTOOL64 if test -n "$ac_ct_OTOOL64"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OTOOL64" >&5 printf "%s\n" "$ac_ct_OTOOL64" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_OTOOL64" = x; then OTOOL64=":" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac OTOOL64=$ac_ct_OTOOL64 fi else OTOOL64="$ac_cv_prog_OTOOL64" fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for -single_module linker flag" >&5 printf %s "checking for -single_module linker flag... " >&6; } if test ${lt_cv_apple_cc_single_mod+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_apple_cc_single_mod=no if test -z "$LT_MULTI_MODULE"; then # By default we will add the -single_module flag. You can override # by either setting the environment variable LT_MULTI_MODULE # non-empty at configure time, or by adding -multi_module to the # link flags. rm -rf libconftest.dylib* echo "int foo(void){return 1;}" > conftest.c echo "$LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \ -dynamiclib -Wl,-single_module conftest.c" >&5 $LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \ -dynamiclib -Wl,-single_module conftest.c 2>conftest.err _lt_result=$? # If there is a non-empty error log, and "single_module" # appears in it, assume the flag caused a linker warning if test -s conftest.err && $GREP single_module conftest.err; then cat conftest.err >&5 # Otherwise, if the output was created with a 0 exit code from # the compiler, it worked. elif test -f libconftest.dylib && test 0 = "$_lt_result"; then lt_cv_apple_cc_single_mod=yes else cat conftest.err >&5 fi rm -rf libconftest.dylib* rm -f conftest.* fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_apple_cc_single_mod" >&5 printf "%s\n" "$lt_cv_apple_cc_single_mod" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for -exported_symbols_list linker flag" >&5 printf %s "checking for -exported_symbols_list linker flag... " >&6; } if test ${lt_cv_ld_exported_symbols_list+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_ld_exported_symbols_list=no save_LDFLAGS=$LDFLAGS echo "_main" > conftest.sym LDFLAGS="$LDFLAGS -Wl,-exported_symbols_list,conftest.sym" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : lt_cv_ld_exported_symbols_list=yes else case e in #( e) lt_cv_ld_exported_symbols_list=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LDFLAGS=$save_LDFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_exported_symbols_list" >&5 printf "%s\n" "$lt_cv_ld_exported_symbols_list" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for -force_load linker flag" >&5 printf %s "checking for -force_load linker flag... " >&6; } if test ${lt_cv_ld_force_load+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_ld_force_load=no cat > conftest.c << _LT_EOF int forced_loaded() { return 2;} _LT_EOF echo "$LTCC $LTCFLAGS -c -o conftest.o conftest.c" >&5 $LTCC $LTCFLAGS -c -o conftest.o conftest.c 2>&5 echo "$AR $AR_FLAGS libconftest.a conftest.o" >&5 $AR $AR_FLAGS libconftest.a conftest.o 2>&5 echo "$RANLIB libconftest.a" >&5 $RANLIB libconftest.a 2>&5 cat > conftest.c << _LT_EOF int main() { return 0;} _LT_EOF echo "$LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a" >&5 $LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a 2>conftest.err _lt_result=$? if test -s conftest.err && $GREP force_load conftest.err; then cat conftest.err >&5 elif test -f conftest && test 0 = "$_lt_result" && $GREP forced_load conftest >/dev/null 2>&1; then lt_cv_ld_force_load=yes else cat conftest.err >&5 fi rm -f conftest.err libconftest.a conftest conftest.c rm -rf conftest.dSYM ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_ld_force_load" >&5 printf "%s\n" "$lt_cv_ld_force_load" >&6; } case $host_os in rhapsody* | darwin1.[012]) _lt_dar_allow_undefined='$wl-undefined ${wl}suppress' ;; darwin1.*) _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;; darwin*) case $MACOSX_DEPLOYMENT_TARGET,$host in 10.[012],*|,*powerpc*-darwin[5-8]*) _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;; *) _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;; esac ;; esac if test yes = "$lt_cv_apple_cc_single_mod"; then _lt_dar_single_mod='$single_module' fi if test yes = "$lt_cv_ld_exported_symbols_list"; then _lt_dar_export_syms=' $wl-exported_symbols_list,$output_objdir/$libname-symbols.expsym' else _lt_dar_export_syms='~$NMEDIT -s $output_objdir/$libname-symbols.expsym $lib' fi if test : != "$DSYMUTIL" && test no = "$lt_cv_ld_force_load"; then _lt_dsymutil='~$DSYMUTIL $lib || :' else _lt_dsymutil= fi ;; esac # func_munge_path_list VARIABLE PATH # ----------------------------------- # VARIABLE is name of variable containing _space_ separated list of # directories to be munged by the contents of PATH, which is string # having a format: # "DIR[:DIR]:" # string "DIR[ DIR]" will be prepended to VARIABLE # ":DIR[:DIR]" # string "DIR[ DIR]" will be appended to VARIABLE # "DIRP[:DIRP]::[DIRA:]DIRA" # string "DIRP[ DIRP]" will be prepended to VARIABLE and string # "DIRA[ DIRA]" will be appended to VARIABLE # "DIR[:DIR]" # VARIABLE will be replaced by "DIR[ DIR]" func_munge_path_list () { case x$2 in x) ;; *:) eval $1=\"`$ECHO $2 | $SED 's/:/ /g'` \$$1\" ;; x:*) eval $1=\"\$$1 `$ECHO $2 | $SED 's/:/ /g'`\" ;; *::*) eval $1=\"\$$1\ `$ECHO $2 | $SED -e 's/.*:://' -e 's/:/ /g'`\" eval $1=\"`$ECHO $2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \$$1\" ;; *) eval $1=\"`$ECHO $2 | $SED 's/:/ /g'`\" ;; esac } ac_fn_c_check_header_compile "$LINENO" "dlfcn.h" "ac_cv_header_dlfcn_h" "$ac_includes_default " if test "x$ac_cv_header_dlfcn_h" = xyes then : printf "%s\n" "#define HAVE_DLFCN_H 1" >>confdefs.h fi func_stripname_cnf () { case $2 in .*) func_stripname_result=`$ECHO "$3" | $SED "s%^$1%%; s%\\\\$2\$%%"`;; *) func_stripname_result=`$ECHO "$3" | $SED "s%^$1%%; s%$2\$%%"`;; esac } # func_stripname_cnf # Set options enable_win32_dll=yes case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-cegcc*) if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}as", so it can be a program name with args. set dummy ${ac_tool_prefix}as; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_AS+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$AS"; then ac_cv_prog_AS="$AS" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_AS="${ac_tool_prefix}as" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi AS=$ac_cv_prog_AS if test -n "$AS"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $AS" >&5 printf "%s\n" "$AS" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_AS"; then ac_ct_AS=$AS # Extract the first word of "as", so it can be a program name with args. set dummy as; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_AS+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_AS"; then ac_cv_prog_ac_ct_AS="$ac_ct_AS" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_AS="as" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_AS=$ac_cv_prog_ac_ct_AS if test -n "$ac_ct_AS"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_AS" >&5 printf "%s\n" "$ac_ct_AS" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_AS" = x; then AS="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac AS=$ac_ct_AS fi else AS="$ac_cv_prog_AS" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}dlltool", so it can be a program name with args. set dummy ${ac_tool_prefix}dlltool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_DLLTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$DLLTOOL"; then ac_cv_prog_DLLTOOL="$DLLTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_DLLTOOL="${ac_tool_prefix}dlltool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi DLLTOOL=$ac_cv_prog_DLLTOOL if test -n "$DLLTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $DLLTOOL" >&5 printf "%s\n" "$DLLTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_DLLTOOL"; then ac_ct_DLLTOOL=$DLLTOOL # Extract the first word of "dlltool", so it can be a program name with args. set dummy dlltool; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_DLLTOOL+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_DLLTOOL"; then ac_cv_prog_ac_ct_DLLTOOL="$ac_ct_DLLTOOL" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_DLLTOOL="dlltool" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_DLLTOOL=$ac_cv_prog_ac_ct_DLLTOOL if test -n "$ac_ct_DLLTOOL"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_DLLTOOL" >&5 printf "%s\n" "$ac_ct_DLLTOOL" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_DLLTOOL" = x; then DLLTOOL="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac DLLTOOL=$ac_ct_DLLTOOL fi else DLLTOOL="$ac_cv_prog_DLLTOOL" fi if test -n "$ac_tool_prefix"; then # Extract the first word of "${ac_tool_prefix}objdump", so it can be a program name with args. set dummy ${ac_tool_prefix}objdump; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_OBJDUMP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$OBJDUMP"; then ac_cv_prog_OBJDUMP="$OBJDUMP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_OBJDUMP="${ac_tool_prefix}objdump" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi OBJDUMP=$ac_cv_prog_OBJDUMP if test -n "$OBJDUMP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $OBJDUMP" >&5 printf "%s\n" "$OBJDUMP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi fi if test -z "$ac_cv_prog_OBJDUMP"; then ac_ct_OBJDUMP=$OBJDUMP # Extract the first word of "objdump", so it can be a program name with args. set dummy objdump; ac_word=$2 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 printf %s "checking for $ac_word... " >&6; } if test ${ac_cv_prog_ac_ct_OBJDUMP+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -n "$ac_ct_OBJDUMP"; then ac_cv_prog_ac_ct_OBJDUMP="$ac_ct_OBJDUMP" # Let the user override the test. else as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac for ac_exec_ext in '' $ac_executable_extensions; do if as_fn_executable_p "$as_dir$ac_word$ac_exec_ext"; then ac_cv_prog_ac_ct_OBJDUMP="objdump" printf "%s\n" "$as_me:${as_lineno-$LINENO}: found $as_dir$ac_word$ac_exec_ext" >&5 break 2 fi done done IFS=$as_save_IFS fi ;; esac fi ac_ct_OBJDUMP=$ac_cv_prog_ac_ct_OBJDUMP if test -n "$ac_ct_OBJDUMP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_ct_OBJDUMP" >&5 printf "%s\n" "$ac_ct_OBJDUMP" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test "x$ac_ct_OBJDUMP" = x; then OBJDUMP="false" else case $cross_compiling:$ac_tool_warned in yes:) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: using cross tools not prefixed with host triplet" >&5 printf "%s\n" "$as_me: WARNING: using cross tools not prefixed with host triplet" >&2;} ac_tool_warned=yes ;; esac OBJDUMP=$ac_ct_OBJDUMP fi else OBJDUMP="$ac_cv_prog_OBJDUMP" fi ;; esac test -z "$AS" && AS=as test -z "$DLLTOOL" && DLLTOOL=dlltool test -z "$OBJDUMP" && OBJDUMP=objdump enable_dlopen=no # Check whether --enable-shared was given. if test ${enable_shared+y} then : enableval=$enable_shared; p=${PACKAGE-default} case $enableval in yes) enable_shared=yes ;; no) enable_shared=no ;; *) enable_shared=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_shared=yes fi done IFS=$lt_save_ifs ;; esac else case e in #( e) enable_shared=yes ;; esac fi # Check whether --enable-static was given. if test ${enable_static+y} then : enableval=$enable_static; p=${PACKAGE-default} case $enableval in yes) enable_static=yes ;; no) enable_static=no ;; *) enable_static=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_static=yes fi done IFS=$lt_save_ifs ;; esac else case e in #( e) enable_static=yes ;; esac fi # Check whether --with-pic was given. if test ${with_pic+y} then : withval=$with_pic; lt_p=${PACKAGE-default} case $withval in yes|no) pic_mode=$withval ;; *) pic_mode=default # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for lt_pkg in $withval; do IFS=$lt_save_ifs if test "X$lt_pkg" = "X$lt_p"; then pic_mode=yes fi done IFS=$lt_save_ifs ;; esac else case e in #( e) pic_mode=default ;; esac fi # Check whether --enable-fast-install was given. if test ${enable_fast_install+y} then : enableval=$enable_fast_install; p=${PACKAGE-default} case $enableval in yes) enable_fast_install=yes ;; no) enable_fast_install=no ;; *) enable_fast_install=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_fast_install=yes fi done IFS=$lt_save_ifs ;; esac else case e in #( e) enable_fast_install=yes ;; esac fi shared_archive_member_spec= case $host,$enable_shared in power*-*-aix[5-9]*,yes) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking which variant of shared library versioning to provide" >&5 printf %s "checking which variant of shared library versioning to provide... " >&6; } # Check whether --with-aix-soname was given. if test ${with_aix_soname+y} then : withval=$with_aix_soname; case $withval in aix|svr4|both) ;; *) as_fn_error $? "Unknown argument to --with-aix-soname" "$LINENO" 5 ;; esac lt_cv_with_aix_soname=$with_aix_soname else case e in #( e) if test ${lt_cv_with_aix_soname+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_with_aix_soname=aix ;; esac fi with_aix_soname=$lt_cv_with_aix_soname ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $with_aix_soname" >&5 printf "%s\n" "$with_aix_soname" >&6; } if test aix != "$with_aix_soname"; then # For the AIX way of multilib, we name the shared archive member # based on the bitwidth used, traditionally 'shr.o' or 'shr_64.o', # and 'shr.imp' or 'shr_64.imp', respectively, for the Import File. # Even when GNU compilers ignore OBJECT_MODE but need '-maix64' flag, # the AIX toolchain works better with OBJECT_MODE set (default 32). if test 64 = "${OBJECT_MODE-32}"; then shared_archive_member_spec=shr_64 else shared_archive_member_spec=shr fi fi ;; *) with_aix_soname=aix ;; esac # This can be used to rebuild libtool when needed LIBTOOL_DEPS=$ltmain # Always use our own libtool. LIBTOOL='$(SHELL) $(top_builddir)/libtool' test -z "$LN_S" && LN_S="ln -s" if test -n "${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for objdir" >&5 printf %s "checking for objdir... " >&6; } if test ${lt_cv_objdir+y} then : printf %s "(cached) " >&6 else case e in #( e) rm -f .libs 2>/dev/null mkdir .libs 2>/dev/null if test -d .libs; then lt_cv_objdir=.libs else # MS-DOS does not allow filenames that begin with a dot. lt_cv_objdir=_libs fi rmdir .libs 2>/dev/null ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_objdir" >&5 printf "%s\n" "$lt_cv_objdir" >&6; } objdir=$lt_cv_objdir printf "%s\n" "#define LT_OBJDIR \"$lt_cv_objdir/\"" >>confdefs.h case $host_os in aix3*) # AIX sometimes has problems with the GCC collect2 program. For some # reason, if we set the COLLECT_NAMES environment variable, the problems # vanish in a puff of smoke. if test set != "${COLLECT_NAMES+set}"; then COLLECT_NAMES= export COLLECT_NAMES fi ;; esac # Global variables: ofile=libtool can_build_shared=yes # All known linkers require a '.a' archive for static linking (except MSVC and # ICC, which need '.lib'). libext=a with_gnu_ld=$lt_cv_prog_gnu_ld old_CC=$CC old_CFLAGS=$CFLAGS # Set sane defaults for various variables test -z "$CC" && CC=cc test -z "$LTCC" && LTCC=$CC test -z "$LTCFLAGS" && LTCFLAGS=$CFLAGS test -z "$LD" && LD=ld test -z "$ac_objext" && ac_objext=o func_cc_basename $compiler cc_basename=$func_cc_basename_result # Only perform the check for file, if the check method requires it test -z "$MAGIC_CMD" && MAGIC_CMD=file case $deplibs_check_method in file_magic*) if test "$file_magic_cmd" = '$MAGIC_CMD'; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for ${ac_tool_prefix}file" >&5 printf %s "checking for ${ac_tool_prefix}file... " >&6; } if test ${lt_cv_path_MAGIC_CMD+y} then : printf %s "(cached) " >&6 else case e in #( e) case $MAGIC_CMD in [\\/*] | ?:[\\/]*) lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path. ;; *) lt_save_MAGIC_CMD=$MAGIC_CMD lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR ac_dummy="/usr/bin$PATH_SEPARATOR$PATH" for ac_dir in $ac_dummy; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/${ac_tool_prefix}file"; then lt_cv_path_MAGIC_CMD=$ac_dir/"${ac_tool_prefix}file" if test -n "$file_magic_test_file"; then case $deplibs_check_method in "file_magic "*) file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"` MAGIC_CMD=$lt_cv_path_MAGIC_CMD if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null | $EGREP "$file_magic_regex" > /dev/null; then : else cat <<_LT_EOF 1>&2 *** Warning: the command libtool uses to detect shared libraries, *** $file_magic_cmd, produces output that libtool cannot recognize. *** The result is that libtool may fail to recognize shared libraries *** as such. This will affect the creation of libtool libraries that *** depend on shared libraries, but programs linked with such libtool *** libraries will work regardless of this problem. Nevertheless, you *** may want to report the problem to your system manager and/or to *** bug-libtool@gnu.org _LT_EOF fi ;; esac fi break fi done IFS=$lt_save_ifs MAGIC_CMD=$lt_save_MAGIC_CMD ;; esac ;; esac fi MAGIC_CMD=$lt_cv_path_MAGIC_CMD if test -n "$MAGIC_CMD"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $MAGIC_CMD" >&5 printf "%s\n" "$MAGIC_CMD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi if test -z "$lt_cv_path_MAGIC_CMD"; then if test -n "$ac_tool_prefix"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for file" >&5 printf %s "checking for file... " >&6; } if test ${lt_cv_path_MAGIC_CMD+y} then : printf %s "(cached) " >&6 else case e in #( e) case $MAGIC_CMD in [\\/*] | ?:[\\/]*) lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path. ;; *) lt_save_MAGIC_CMD=$MAGIC_CMD lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR ac_dummy="/usr/bin$PATH_SEPARATOR$PATH" for ac_dir in $ac_dummy; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/file"; then lt_cv_path_MAGIC_CMD=$ac_dir/"file" if test -n "$file_magic_test_file"; then case $deplibs_check_method in "file_magic "*) file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"` MAGIC_CMD=$lt_cv_path_MAGIC_CMD if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null | $EGREP "$file_magic_regex" > /dev/null; then : else cat <<_LT_EOF 1>&2 *** Warning: the command libtool uses to detect shared libraries, *** $file_magic_cmd, produces output that libtool cannot recognize. *** The result is that libtool may fail to recognize shared libraries *** as such. This will affect the creation of libtool libraries that *** depend on shared libraries, but programs linked with such libtool *** libraries will work regardless of this problem. Nevertheless, you *** may want to report the problem to your system manager and/or to *** bug-libtool@gnu.org _LT_EOF fi ;; esac fi break fi done IFS=$lt_save_ifs MAGIC_CMD=$lt_save_MAGIC_CMD ;; esac ;; esac fi MAGIC_CMD=$lt_cv_path_MAGIC_CMD if test -n "$MAGIC_CMD"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $MAGIC_CMD" >&5 printf "%s\n" "$MAGIC_CMD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi else MAGIC_CMD=: fi fi fi ;; esac # Use C for the default configuration in the libtool script lt_save_CC=$CC ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu # Source file extension for C test sources. ac_ext=c # Object file extension for compiled C test sources. objext=o objext=$objext # Code to be used in simple compile tests lt_simple_compile_test_code="int some_variable = 0;" # Code to be used in simple link tests lt_simple_link_test_code='int main(){return(0);}' # If no C compiler was specified, use CC. LTCC=${LTCC-"$CC"} # If no C compiler flags were specified, use CFLAGS. LTCFLAGS=${LTCFLAGS-"$CFLAGS"} # Allow CC to be a program name with arguments. compiler=$CC # Save the default compiler, since it gets overwritten when the other # tags are being tested, and _LT_TAGVAR(compiler, []) is a NOP. compiler_DEFAULT=$CC # save warnings/boilerplate of simple test code ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" >conftest.$ac_ext eval "$ac_compile" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_compiler_boilerplate=`cat conftest.err` $RM conftest* ac_outfile=conftest.$ac_objext echo "$lt_simple_link_test_code" >conftest.$ac_ext eval "$ac_link" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_linker_boilerplate=`cat conftest.err` $RM -r conftest* ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... if test -n "$compiler"; then lt_prog_compiler_no_builtin_flag= if test yes = "$GCC"; then case $cc_basename in nvcc*) lt_prog_compiler_no_builtin_flag=' -Xcompiler -fno-builtin' ;; *) lt_prog_compiler_no_builtin_flag=' -fno-builtin' ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -fno-rtti -fno-exceptions" >&5 printf %s "checking if $compiler supports -fno-rtti -fno-exceptions... " >&6; } if test ${lt_cv_prog_compiler_rtti_exceptions+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_rtti_exceptions=no ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-fno-rtti -fno-exceptions" ## exclude from sc_useless_quotes_in_assignment # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. # The option is referenced via a variable to avoid confusing sed. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings other than the usual output. $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler_rtti_exceptions=yes fi fi $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_rtti_exceptions" >&5 printf "%s\n" "$lt_cv_prog_compiler_rtti_exceptions" >&6; } if test yes = "$lt_cv_prog_compiler_rtti_exceptions"; then lt_prog_compiler_no_builtin_flag="$lt_prog_compiler_no_builtin_flag -fno-rtti -fno-exceptions" else : fi fi lt_prog_compiler_wl= lt_prog_compiler_pic= lt_prog_compiler_static= if test yes = "$GCC"; then lt_prog_compiler_wl='-Wl,' lt_prog_compiler_static='-static' case $host_os in aix*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor lt_prog_compiler_static='-Bstatic' fi lt_prog_compiler_pic='-fPIC' ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support lt_prog_compiler_pic='-fPIC' ;; m68k) # FIXME: we need at least 68020 code to build shared libraries, but # adding the '-m68020' flag to GCC prevents building anything better, # like '-m68040'. lt_prog_compiler_pic='-m68020 -resident32 -malways-restore-a4' ;; esac ;; beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*) # PIC is the default for these OSes. ;; mingw* | cygwin* | pw32* | os2* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). # Although the cygwin gcc ignores -fPIC, still need this for old-style # (--disable-auto-import) libraries lt_prog_compiler_pic='-DDLL_EXPORT' case $host_os in os2*) lt_prog_compiler_static='$wl-static' ;; esac ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files lt_prog_compiler_pic='-fno-common' ;; haiku*) # PIC is the default for Haiku. # The "-static" flag exists, but is broken. lt_prog_compiler_static= ;; hpux*) # PIC is the default for 64-bit PA HP-UX, but not for 32-bit # PA HP-UX. On IA64 HP-UX, PIC is the default but the pic flag # sets the default TLS model and affects inlining. case $host_cpu in hppa*64*) # +Z the default ;; *) lt_prog_compiler_pic='-fPIC' ;; esac ;; interix[3-9]*) # Interix 3.x gcc -fpic/-fPIC options generate broken code. # Instead, we relocate shared libraries at runtime. ;; msdosdjgpp*) # Just because we use GCC doesn't mean we suddenly get shared libraries # on systems that don't support them. lt_prog_compiler_can_build_shared=no enable_shared=no ;; *nto* | *qnx*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. lt_prog_compiler_pic='-fPIC -shared' ;; sysv4*MP*) if test -d /usr/nec; then lt_prog_compiler_pic=-Kconform_pic fi ;; *) lt_prog_compiler_pic='-fPIC' ;; esac case $cc_basename in nvcc*) # Cuda Compiler Driver 2.2 lt_prog_compiler_wl='-Xlinker ' if test -n "$lt_prog_compiler_pic"; then lt_prog_compiler_pic="-Xcompiler $lt_prog_compiler_pic" fi ;; esac else # PORTME Check for flag to pass linker flags through the system compiler. case $host_os in aix*) lt_prog_compiler_wl='-Wl,' if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor lt_prog_compiler_static='-Bstatic' else lt_prog_compiler_static='-bnso -bI:/lib/syscalls.exp' fi ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files lt_prog_compiler_pic='-fno-common' case $cc_basename in nagfor*) # NAG Fortran compiler lt_prog_compiler_wl='-Wl,-Wl,,' lt_prog_compiler_pic='-PIC' lt_prog_compiler_static='-Bstatic' ;; esac ;; mingw* | cygwin* | pw32* | os2* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). lt_prog_compiler_pic='-DDLL_EXPORT' case $host_os in os2*) lt_prog_compiler_static='$wl-static' ;; esac ;; hpux9* | hpux10* | hpux11*) lt_prog_compiler_wl='-Wl,' # PIC is the default for IA64 HP-UX and 64-bit HP-UX, but # not for PA HP-UX. case $host_cpu in hppa*64*|ia64*) # +Z the default ;; *) lt_prog_compiler_pic='+Z' ;; esac # Is there a better lt_prog_compiler_static that works with the bundled CC? lt_prog_compiler_static='$wl-a ${wl}archive' ;; irix5* | irix6* | nonstopux*) lt_prog_compiler_wl='-Wl,' # PIC (with -KPIC) is the default. lt_prog_compiler_static='-non_shared' ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in # old Intel for x86_64, which still supported -KPIC. ecc*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-static' ;; # icc used to be incompatible with GCC. # ICC 10 doesn't accept -KPIC any more. icc* | ifort*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-fPIC' lt_prog_compiler_static='-static' ;; # Lahey Fortran 8.1. lf95*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='--shared' lt_prog_compiler_static='--static' ;; nagfor*) # NAG Fortran compiler lt_prog_compiler_wl='-Wl,-Wl,,' lt_prog_compiler_pic='-PIC' lt_prog_compiler_static='-Bstatic' ;; tcc*) # Fabrice Bellard et al's Tiny C Compiler lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-fPIC' lt_prog_compiler_static='-static' ;; pgcc* | pgf77* | pgf90* | pgf95* | pgfortran*) # Portland Group compilers (*not* the Pentium gcc compiler, # which looks to be a dead project) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-fpic' lt_prog_compiler_static='-Bstatic' ;; ccc*) lt_prog_compiler_wl='-Wl,' # All Alpha code is PIC. lt_prog_compiler_static='-non_shared' ;; xl* | bgxl* | bgf* | mpixl*) # IBM XL C 8.0/Fortran 10.1, 11.1 on PPC and BlueGene lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-qpic' lt_prog_compiler_static='-qstaticlink' ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ Ceres\ Fortran* | *Sun*Fortran*\ [1-7].* | *Sun*Fortran*\ 8.[0-3]*) # Sun Fortran 8.3 passes all unrecognized flags to the linker lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' lt_prog_compiler_wl='' ;; *Sun\ F* | *Sun*Fortran*) lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' lt_prog_compiler_wl='-Qoption ld ' ;; *Sun\ C*) # Sun C 5.9 lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' lt_prog_compiler_wl='-Wl,' ;; *Intel*\ [CF]*Compiler*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-fPIC' lt_prog_compiler_static='-static' ;; *Portland\ Group*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-fpic' lt_prog_compiler_static='-Bstatic' ;; esac ;; esac ;; newsos6) lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' ;; *nto* | *qnx*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. lt_prog_compiler_pic='-fPIC -shared' ;; osf3* | osf4* | osf5*) lt_prog_compiler_wl='-Wl,' # All OSF/1 code is PIC. lt_prog_compiler_static='-non_shared' ;; rdos*) lt_prog_compiler_static='-non_shared' ;; solaris*) lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' case $cc_basename in f77* | f90* | f95* | sunf77* | sunf90* | sunf95*) lt_prog_compiler_wl='-Qoption ld ';; *) lt_prog_compiler_wl='-Wl,';; esac ;; sunos4*) lt_prog_compiler_wl='-Qoption ld ' lt_prog_compiler_pic='-PIC' lt_prog_compiler_static='-Bstatic' ;; sysv4 | sysv4.2uw2* | sysv4.3*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' ;; sysv4*MP*) if test -d /usr/nec; then lt_prog_compiler_pic='-Kconform_pic' lt_prog_compiler_static='-Bstatic' fi ;; sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_pic='-KPIC' lt_prog_compiler_static='-Bstatic' ;; unicos*) lt_prog_compiler_wl='-Wl,' lt_prog_compiler_can_build_shared=no ;; uts4*) lt_prog_compiler_pic='-pic' lt_prog_compiler_static='-Bstatic' ;; *) lt_prog_compiler_can_build_shared=no ;; esac fi case $host_os in # For platforms that do not support PIC, -DPIC is meaningless: *djgpp*) lt_prog_compiler_pic= ;; *) lt_prog_compiler_pic="$lt_prog_compiler_pic -DPIC" ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $compiler option to produce PIC" >&5 printf %s "checking for $compiler option to produce PIC... " >&6; } if test ${lt_cv_prog_compiler_pic+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_pic=$lt_prog_compiler_pic ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic" >&5 printf "%s\n" "$lt_cv_prog_compiler_pic" >&6; } lt_prog_compiler_pic=$lt_cv_prog_compiler_pic # # Check to make sure the PIC flag actually works. # if test -n "$lt_prog_compiler_pic"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler PIC flag $lt_prog_compiler_pic works" >&5 printf %s "checking if $compiler PIC flag $lt_prog_compiler_pic works... " >&6; } if test ${lt_cv_prog_compiler_pic_works+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_pic_works=no ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="$lt_prog_compiler_pic -DPIC" ## exclude from sc_useless_quotes_in_assignment # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. # The option is referenced via a variable to avoid confusing sed. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings other than the usual output. $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler_pic_works=yes fi fi $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic_works" >&5 printf "%s\n" "$lt_cv_prog_compiler_pic_works" >&6; } if test yes = "$lt_cv_prog_compiler_pic_works"; then case $lt_prog_compiler_pic in "" | " "*) ;; *) lt_prog_compiler_pic=" $lt_prog_compiler_pic" ;; esac else lt_prog_compiler_pic= lt_prog_compiler_can_build_shared=no fi fi # # Check to make sure the static flag actually works. # wl=$lt_prog_compiler_wl eval lt_tmp_static_flag=\"$lt_prog_compiler_static\" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler static flag $lt_tmp_static_flag works" >&5 printf %s "checking if $compiler static flag $lt_tmp_static_flag works... " >&6; } if test ${lt_cv_prog_compiler_static_works+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_static_works=no save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS $lt_tmp_static_flag" echo "$lt_simple_link_test_code" > conftest.$ac_ext if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then # The linker can only warn and ignore the option if not recognized # So say no if there are warnings if test -s conftest.err; then # Append any errors to the config.log. cat conftest.err 1>&5 $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler_static_works=yes fi else lt_cv_prog_compiler_static_works=yes fi fi $RM -r conftest* LDFLAGS=$save_LDFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_static_works" >&5 printf "%s\n" "$lt_cv_prog_compiler_static_works" >&6; } if test yes = "$lt_cv_prog_compiler_static_works"; then : else lt_prog_compiler_static= fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5 printf %s "checking if $compiler supports -c -o file.$ac_objext... " >&6; } if test ${lt_cv_prog_compiler_c_o+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_c_o=no $RM -r conftest 2>/dev/null mkdir conftest cd conftest mkdir out echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-o out/conftest2.$ac_objext" # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2 if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then lt_cv_prog_compiler_c_o=yes fi fi chmod u+w . 2>&5 $RM conftest* # SGI C++ compiler will create directory out/ii_files/ for # template instantiation test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files $RM out/* && rmdir out cd .. $RM -r conftest $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o" >&5 printf "%s\n" "$lt_cv_prog_compiler_c_o" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5 printf %s "checking if $compiler supports -c -o file.$ac_objext... " >&6; } if test ${lt_cv_prog_compiler_c_o+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_c_o=no $RM -r conftest 2>/dev/null mkdir conftest cd conftest mkdir out echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-o out/conftest2.$ac_objext" # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2 if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then lt_cv_prog_compiler_c_o=yes fi fi chmod u+w . 2>&5 $RM conftest* # SGI C++ compiler will create directory out/ii_files/ for # template instantiation test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files $RM out/* && rmdir out cd .. $RM -r conftest $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o" >&5 printf "%s\n" "$lt_cv_prog_compiler_c_o" >&6; } hard_links=nottested if test no = "$lt_cv_prog_compiler_c_o" && test no != "$need_locks"; then # do not overwrite the value of need_locks provided by the user { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if we can lock with hard links" >&5 printf %s "checking if we can lock with hard links... " >&6; } hard_links=yes $RM conftest* ln conftest.a conftest.b 2>/dev/null && hard_links=no touch conftest.a ln conftest.a conftest.b 2>&5 || hard_links=no ln conftest.a conftest.b 2>/dev/null && hard_links=no { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $hard_links" >&5 printf "%s\n" "$hard_links" >&6; } if test no = "$hard_links"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&5 printf "%s\n" "$as_me: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&2;} need_locks=warn fi else need_locks=no fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the $compiler linker ($LD) supports shared libraries" >&5 printf %s "checking whether the $compiler linker ($LD) supports shared libraries... " >&6; } runpath_var= allow_undefined_flag= always_export_symbols=no archive_cmds= archive_expsym_cmds= compiler_needs_object=no enable_shared_with_static_runtimes=no export_dynamic_flag_spec= export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' hardcode_automatic=no hardcode_direct=no hardcode_direct_absolute=no hardcode_libdir_flag_spec= hardcode_libdir_separator= hardcode_minus_L=no hardcode_shlibpath_var=unsupported inherit_rpath=no link_all_deplibs=unknown module_cmds= module_expsym_cmds= old_archive_from_new_cmds= old_archive_from_expsyms_cmds= thread_safe_flag_spec= whole_archive_flag_spec= # include_expsyms should be a list of space-separated symbols to be *always* # included in the symbol list include_expsyms= # exclude_expsyms can be an extended regexp of symbols to exclude # it will be wrapped by ' (' and ')$', so one must not match beginning or # end of line. Example: 'a|bc|.*d.*' will exclude the symbols 'a' and 'bc', # as well as any symbol that contains 'd'. exclude_expsyms='_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*' # Although _GLOBAL_OFFSET_TABLE_ is a valid symbol C name, most a.out # platforms (ab)use it in PIC code, but their linkers get confused if # the symbol is explicitly referenced. Since portable code cannot # rely on this symbol name, it's probably fine to never include it in # preloaded symbol tables. # Exclude shared library initialization/finalization symbols. extract_expsyms_cmds= case $host_os in cygwin* | mingw* | pw32* | cegcc*) # FIXME: the MSVC++ and ICC port hasn't been tested in a loooong time # When not using gcc, we currently assume that we are using # Microsoft Visual C++ or Intel C++ Compiler. if test yes != "$GCC"; then with_gnu_ld=no fi ;; interix*) # we just hope/assume this is gcc and not c89 (= MSVC++ or ICC) with_gnu_ld=yes ;; openbsd* | bitrig*) with_gnu_ld=no ;; esac ld_shlibs=yes # On some targets, GNU ld is compatible enough with the native linker # that we're better off using the native interface for both. lt_use_gnu_ld_interface=no if test yes = "$with_gnu_ld"; then case $host_os in aix*) # The AIX port of GNU ld has always aspired to compatibility # with the native linker. However, as the warning in the GNU ld # block says, versions before 2.19.5* couldn't really create working # shared libraries, regardless of the interface used. case `$LD -v 2>&1` in *\ \(GNU\ Binutils\)\ 2.19.5*) ;; *\ \(GNU\ Binutils\)\ 2.[2-9]*) ;; *\ \(GNU\ Binutils\)\ [3-9]*) ;; *) lt_use_gnu_ld_interface=yes ;; esac ;; *) lt_use_gnu_ld_interface=yes ;; esac fi if test yes = "$lt_use_gnu_ld_interface"; then # If archive_cmds runs LD, not CC, wlarc should be empty wlarc='$wl' # Set some defaults for GNU ld with shared library support. These # are reset later if shared libraries are not supported. Putting them # here allows them to be overridden if necessary. runpath_var=LD_RUN_PATH hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' export_dynamic_flag_spec='$wl--export-dynamic' # ancient GNU ld didn't support --whole-archive et. al. if $LD --help 2>&1 | $GREP 'no-whole-archive' > /dev/null; then whole_archive_flag_spec=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' else whole_archive_flag_spec= fi supports_anon_versioning=no case `$LD -v | $SED -e 's/([^)]\+)\s\+//' 2>&1` in *GNU\ gold*) supports_anon_versioning=yes ;; *\ [01].* | *\ 2.[0-9].* | *\ 2.10.*) ;; # catch versions < 2.11 *\ 2.11.93.0.2\ *) supports_anon_versioning=yes ;; # RH7.3 ... *\ 2.11.92.0.12\ *) supports_anon_versioning=yes ;; # Mandrake 8.2 ... *\ 2.11.*) ;; # other 2.11 versions *) supports_anon_versioning=yes ;; esac # See if GNU ld supports shared libraries. case $host_os in aix[3-9]*) # On AIX/PPC, the GNU linker is very broken if test ia64 != "$host_cpu"; then ld_shlibs=no cat <<_LT_EOF 1>&2 *** Warning: the GNU linker, at least up to release 2.19, is reported *** to be unable to reliably create shared libraries on AIX. *** Therefore, libtool is disabling shared libraries support. If you *** really care for shared libraries, you may want to install binutils *** 2.20 or above, or modify your PATH so that a non-GNU linker is found. *** You will then need to restart the configuration process. _LT_EOF fi ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='' ;; m68k) archive_cmds='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)' hardcode_libdir_flag_spec='-L$libdir' hardcode_minus_L=yes ;; esac ;; beos*) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then allow_undefined_flag=unsupported # Joseph Beckenbach says some releases of gcc # support --undefined. This deserves some investigation. FIXME archive_cmds='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' else ld_shlibs=no fi ;; cygwin* | mingw* | pw32* | cegcc*) # _LT_TAGVAR(hardcode_libdir_flag_spec, ) is actually meaningless, # as there is no search path for DLLs. hardcode_libdir_flag_spec='-L$libdir' export_dynamic_flag_spec='$wl--export-all-symbols' allow_undefined_flag=unsupported always_export_symbols=no enable_shared_with_static_runtimes=yes export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[BCDGRS][ ]/s/.*[ ]\([^ ]*\)/\1 DATA/;s/^.*[ ]__nm__\([^ ]*\)[ ][^ ]*/\1 DATA/;/^I[ ]/d;/^[AITW][ ]/s/.* //'\'' | sort | uniq > $export_symbols' exclude_expsyms='[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname' if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' # If the export-symbols file already is a .def file, use it as # is; otherwise, prepend EXPORTS... archive_expsym_cmds='if test DEF = "`$SED -n -e '\''s/^[ ]*//'\'' -e '\''/^\(;.*\)*$/d'\'' -e '\''s/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p'\'' -e q $export_symbols`" ; then cp $export_symbols $output_objdir/$soname.def; else echo EXPORTS > $output_objdir/$soname.def; cat $export_symbols >> $output_objdir/$soname.def; fi~ $CC -shared $output_objdir/$soname.def $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' else ld_shlibs=no fi ;; haiku*) archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' link_all_deplibs=yes ;; os2*) hardcode_libdir_flag_spec='-L$libdir' hardcode_minus_L=yes allow_undefined_flag=unsupported shrext_cmds=.dll archive_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' archive_expsym_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' old_archive_From_new_cmds='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' enable_shared_with_static_runtimes=yes file_list_spec='@' ;; interix[3-9]*) hardcode_direct=no hardcode_shlibpath_var=no hardcode_libdir_flag_spec='$wl-rpath,$libdir' export_dynamic_flag_spec='$wl-E' # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc. # Instead, shared libraries are loaded at an image base (0x10000000 by # default) and relocated if they conflict, which is a slow very memory # consuming and fragmenting process. To avoid this, we pick a random, # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link # time. Moving up from 0x10000000 also allows more sbrk(2) space. archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' archive_expsym_cmds='$SED "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' ;; gnu* | linux* | tpf* | k*bsd*-gnu | kopensolaris*-gnu) tmp_diet=no if test linux-dietlibc = "$host_os"; then case $cc_basename in diet\ *) tmp_diet=yes;; # linux-dietlibc with static linking (!diet-dyn) esac fi if $LD --help 2>&1 | $EGREP ': supported targets:.* elf' > /dev/null \ && test no = "$tmp_diet" then tmp_addflag=' $pic_flag' tmp_sharedflag='-shared' case $cc_basename,$host_cpu in pgcc*) # Portland Group C compiler whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' tmp_addflag=' $pic_flag' ;; pgf77* | pgf90* | pgf95* | pgfortran*) # Portland Group f77 and f90 compilers whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' tmp_addflag=' $pic_flag -Mnomain' ;; ecc*,ia64* | icc*,ia64*) # Intel C compiler on ia64 tmp_addflag=' -i_dynamic' ;; efc*,ia64* | ifort*,ia64*) # Intel Fortran compiler on ia64 tmp_addflag=' -i_dynamic -nofor_main' ;; ifc* | ifort*) # Intel Fortran compiler tmp_addflag=' -nofor_main' ;; lf95*) # Lahey Fortran 8.1 whole_archive_flag_spec= tmp_sharedflag='--shared' ;; nagfor*) # NAGFOR 5.3 tmp_sharedflag='-Wl,-shared' ;; xl[cC]* | bgxl[cC]* | mpixl[cC]*) # IBM XL C 8.0 on PPC (deal with xlf below) tmp_sharedflag='-qmkshrobj' tmp_addflag= ;; nvcc*) # Cuda Compiler Driver 2.2 whole_archive_flag_spec='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' compiler_needs_object=yes ;; esac case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C 5.9 whole_archive_flag_spec='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' compiler_needs_object=yes tmp_sharedflag='-G' ;; *Sun\ F*) # Sun Fortran 8.3 tmp_sharedflag='-G' ;; esac archive_cmds='$CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' if test yes = "$supports_anon_versioning"; then archive_expsym_cmds='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib' fi case $cc_basename in tcc*) export_dynamic_flag_spec='-rdynamic' ;; xlf* | bgf* | bgxlf* | mpixlf*) # IBM XL Fortran 10.1 on PPC cannot create shared libs itself whole_archive_flag_spec='--whole-archive$convenience --no-whole-archive' hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' archive_cmds='$LD -shared $libobjs $deplibs $linker_flags -soname $soname -o $lib' if test yes = "$supports_anon_versioning"; then archive_expsym_cmds='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $LD -shared $libobjs $deplibs $linker_flags -soname $soname -version-script $output_objdir/$libname.ver -o $lib' fi ;; esac else ld_shlibs=no fi ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then archive_cmds='$LD -Bshareable $libobjs $deplibs $linker_flags -o $lib' wlarc= else archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' fi ;; solaris*) if $LD -v 2>&1 | $GREP 'BFD 2\.8' > /dev/null; then ld_shlibs=no cat <<_LT_EOF 1>&2 *** Warning: The releases 2.8.* of the GNU linker cannot reliably *** create shared libraries on Solaris systems. Therefore, libtool *** is disabling shared libraries support. We urge you to upgrade GNU *** binutils to release 2.9.1 or newer. Another option is to modify *** your PATH or compiler configuration so that the native linker is *** used, and then restart. _LT_EOF elif $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else ld_shlibs=no fi ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX*) case `$LD -v 2>&1` in *\ [01].* | *\ 2.[0-9].* | *\ 2.1[0-5].*) ld_shlibs=no cat <<_LT_EOF 1>&2 *** Warning: Releases of the GNU linker prior to 2.16.91.0.3 cannot *** reliably create shared libraries on SCO systems. Therefore, libtool *** is disabling shared libraries support. We urge you to upgrade GNU *** binutils to release 2.16.91.0.3 or newer. Another option is to modify *** your PATH or compiler configuration so that the native linker is *** used, and then restart. _LT_EOF ;; *) # For security reasons, it is highly recommended that you always # use absolute paths for naming shared libraries, and exclude the # DT_RUNPATH tag from executables and libraries. But doing so # requires that you compile everything twice, which is a pain. if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else ld_shlibs=no fi ;; esac ;; sunos4*) archive_cmds='$LD -assert pure-text -Bshareable -o $lib $libobjs $deplibs $linker_flags' wlarc= hardcode_direct=yes hardcode_shlibpath_var=no ;; *) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else ld_shlibs=no fi ;; esac if test no = "$ld_shlibs"; then runpath_var= hardcode_libdir_flag_spec= export_dynamic_flag_spec= whole_archive_flag_spec= fi else # PORTME fill in a description of your system's linker (not GNU ld) case $host_os in aix3*) allow_undefined_flag=unsupported always_export_symbols=yes archive_expsym_cmds='$LD -o $output_objdir/$soname $libobjs $deplibs $linker_flags -bE:$export_symbols -T512 -H512 -bM:SRE~$AR $AR_FLAGS $lib $output_objdir/$soname' # Note: this linker hardcodes the directories in LIBPATH if there # are no directories specified by -L. hardcode_minus_L=yes if test yes = "$GCC" && test -z "$lt_prog_compiler_static"; then # Neither direct hardcoding nor static linking is supported with a # broken collect2. hardcode_direct=unsupported fi ;; aix[4-9]*) if test ia64 = "$host_cpu"; then # On IA64, the linker does run time linking by default, so we don't # have to do anything special. aix_use_runtimelinking=no exp_sym_flag='-Bexport' no_entry_flag= else # If we're using GNU nm, then we don't want the "-C" option. # -C means demangle to GNU nm, but means don't demangle to AIX nm. # Without the "-l" option, or with the "-B" option, AIX nm treats # weak defined symbols like other global defined symbols, whereas # GNU nm marks them as "W". # While the 'weak' keyword is ignored in the Export File, we need # it in the Import File for the 'aix-soname' feature, so we have # to replace the "-B" option with "-P" for AIX nm. if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then export_symbols_cmds='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && (substr(\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols' else export_symbols_cmds='`func_echo_all $NM | $SED -e '\''s/B\([^B]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "L") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && (substr(\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols' fi aix_use_runtimelinking=no # Test if we are trying to use run time linking or normal # AIX style linking. If -brtl is somewhere in LDFLAGS, we # have runtime linking enabled, and use it for executables. # For shared libraries, we enable/disable runtime linking # depending on the kind of the shared library created - # when "with_aix_soname,aix_use_runtimelinking" is: # "aix,no" lib.a(lib.so.V) shared, rtl:no, for executables # "aix,yes" lib.so shared, rtl:yes, for executables # lib.a static archive # "both,no" lib.so.V(shr.o) shared, rtl:yes # lib.a(lib.so.V) shared, rtl:no, for executables # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a(lib.so.V) shared, rtl:no # "svr4,*" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a static archive case $host_os in aix4.[23]|aix4.[23].*|aix[5-9]*) for ld_flag in $LDFLAGS; do if (test x-brtl = "x$ld_flag" || test x-Wl,-brtl = "x$ld_flag"); then aix_use_runtimelinking=yes break fi done if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then # With aix-soname=svr4, we create the lib.so.V shared archives only, # so we don't have lib.a shared libs to link our executables. # We have to force runtime linking in this case. aix_use_runtimelinking=yes LDFLAGS="$LDFLAGS -Wl,-brtl" fi ;; esac exp_sym_flag='-bexport' no_entry_flag='-bnoentry' fi # When large executables or shared objects are built, AIX ld can # have problems creating the table of contents. If linking a library # or program results in "error TOC overflow" add -mminimal-toc to # CXXFLAGS/CFLAGS for g++/gcc. In the cases where that is not # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS. archive_cmds='' hardcode_direct=yes hardcode_direct_absolute=yes hardcode_libdir_separator=':' link_all_deplibs=yes file_list_spec='$wl-f,' case $with_aix_soname,$aix_use_runtimelinking in aix,*) ;; # traditional, no import file svr4,* | *,yes) # use import file # The Import File defines what to hardcode. hardcode_direct=no hardcode_direct_absolute=no ;; esac if test yes = "$GCC"; then case $host_os in aix4.[012]|aix4.[012].*) # We only want to do this on AIX 4.2 and lower, the check # below for broken collect2 doesn't work under 4.3+ collect2name=`$CC -print-prog-name=collect2` if test -f "$collect2name" && strings "$collect2name" | $GREP resolve_lib_name >/dev/null then # We have reworked collect2 : else # We have old collect2 hardcode_direct=unsupported # It fails to find uninstalled libraries when the uninstalled # path is not listed in the libpath. Setting hardcode_minus_L # to unsupported forces relinking hardcode_minus_L=yes hardcode_libdir_flag_spec='-L$libdir' hardcode_libdir_separator= fi ;; esac shared_flag='-shared' if test yes = "$aix_use_runtimelinking"; then shared_flag="$shared_flag "'$wl-G' fi # Need to ensure runtime linking is disabled for the traditional # shared library, or the linker may eventually find shared libraries # /with/ Import File - we do not want to mix them. shared_flag_aix='-shared' shared_flag_svr4='-shared $wl-G' else # not using gcc if test ia64 = "$host_cpu"; then # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release # chokes on -Wl,-G. The following line is correct: shared_flag='-G' else if test yes = "$aix_use_runtimelinking"; then shared_flag='$wl-G' else shared_flag='$wl-bM:SRE' fi shared_flag_aix='$wl-bM:SRE' shared_flag_svr4='$wl-G' fi fi export_dynamic_flag_spec='$wl-bexpall' # It seems that -bexpall does not export symbols beginning with # underscore (_), so it is better to generate a list of symbols to export. always_export_symbols=yes if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then # Warning - without using the other runtime loading flags (-brtl), # -berok will link without error, but may produce a broken library. allow_undefined_flag='-berok' # Determine the default libpath from the value encoded in an # empty executable. if test set = "${lt_cv_aix_libpath+set}"; then aix_libpath=$lt_cv_aix_libpath else if test ${lt_cv_aix_libpath_+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : lt_aix_libpath_sed=' /Import File Strings/,/^$/ { /^0/ { s/^0 *\([^ ]*\) *$/\1/ p } }' lt_cv_aix_libpath_=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` # Check for a 64-bit object if we didn't find anything. if test -z "$lt_cv_aix_libpath_"; then lt_cv_aix_libpath_=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext if test -z "$lt_cv_aix_libpath_"; then lt_cv_aix_libpath_=/usr/lib:/lib fi ;; esac fi aix_libpath=$lt_cv_aix_libpath_ fi hardcode_libdir_flag_spec='$wl-blibpath:$libdir:'"$aix_libpath" archive_expsym_cmds='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag else if test ia64 = "$host_cpu"; then hardcode_libdir_flag_spec='$wl-R $libdir:/usr/lib:/lib' allow_undefined_flag="-z nodefs" archive_expsym_cmds="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols" else # Determine the default libpath from the value encoded in an # empty executable. if test set = "${lt_cv_aix_libpath+set}"; then aix_libpath=$lt_cv_aix_libpath else if test ${lt_cv_aix_libpath_+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : lt_aix_libpath_sed=' /Import File Strings/,/^$/ { /^0/ { s/^0 *\([^ ]*\) *$/\1/ p } }' lt_cv_aix_libpath_=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` # Check for a 64-bit object if we didn't find anything. if test -z "$lt_cv_aix_libpath_"; then lt_cv_aix_libpath_=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext if test -z "$lt_cv_aix_libpath_"; then lt_cv_aix_libpath_=/usr/lib:/lib fi ;; esac fi aix_libpath=$lt_cv_aix_libpath_ fi hardcode_libdir_flag_spec='$wl-blibpath:$libdir:'"$aix_libpath" # Warning - without using the other run time loading flags, # -berok will link without error, but may produce a broken library. no_undefined_flag=' $wl-bernotok' allow_undefined_flag=' $wl-berok' if test yes = "$with_gnu_ld"; then # We only use this code for GNU lds that support --whole-archive. whole_archive_flag_spec='$wl--whole-archive$convenience $wl--no-whole-archive' else # Exported symbols can be pulled into shared objects from archives whole_archive_flag_spec='$convenience' fi archive_cmds_need_lc=yes archive_expsym_cmds='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d' # -brtl affects multiple linker settings, -berok does not and is overridden later compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([, ]\\)%-berok\\1%g"`' if test svr4 != "$with_aix_soname"; then # This is similar to how AIX traditionally builds its shared libraries. archive_expsym_cmds="$archive_expsym_cmds"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname' fi if test aix != "$with_aix_soname"; then archive_expsym_cmds="$archive_expsym_cmds"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp' else # used by -dlpreopen to get the symbols archive_expsym_cmds="$archive_expsym_cmds"'~$MV $output_objdir/$realname.d/$soname $output_objdir' fi archive_expsym_cmds="$archive_expsym_cmds"'~$RM -r $output_objdir/$realname.d' fi fi ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds='' ;; m68k) archive_cmds='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)' hardcode_libdir_flag_spec='-L$libdir' hardcode_minus_L=yes ;; esac ;; bsdi[45]*) export_dynamic_flag_spec=-rdynamic ;; cygwin* | mingw* | pw32* | cegcc*) # When not using gcc, we currently assume that we are using # Microsoft Visual C++ or Intel C++ Compiler. # hardcode_libdir_flag_spec is actually meaningless, as there is # no search path for DLLs. case $cc_basename in cl* | icl*) # Native MSVC or ICC hardcode_libdir_flag_spec=' ' allow_undefined_flag=unsupported always_export_symbols=yes file_list_spec='@' # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. archive_cmds='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames=' archive_expsym_cmds='if test DEF = "`$SED -n -e '\''s/^[ ]*//'\'' -e '\''/^\(;.*\)*$/d'\'' -e '\''s/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p'\'' -e q $export_symbols`" ; then cp "$export_symbols" "$output_objdir/$soname.def"; echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp"; else $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp; fi~ $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~ linknames=' # The linker will not automatically build a static lib if we build a DLL. # _LT_TAGVAR(old_archive_from_new_cmds, )='true' enable_shared_with_static_runtimes=yes exclude_expsyms='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*' export_symbols_cmds='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[BCDGRS][ ]/s/.*[ ]\([^ ]*\)/\1,DATA/'\'' | $SED -e '\''/^[AITW][ ]/s/.*[ ]//'\'' | sort | uniq > $export_symbols' # Don't use ranlib old_postinstall_cmds='chmod 644 $oldlib' postlink_cmds='lt_outputfile="@OUTPUT@"~ lt_tool_outputfile="@TOOL_OUTPUT@"~ case $lt_outputfile in *.exe|*.EXE) ;; *) lt_outputfile=$lt_outputfile.exe lt_tool_outputfile=$lt_tool_outputfile.exe ;; esac~ if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1; $RM "$lt_outputfile.manifest"; fi' ;; *) # Assume MSVC and ICC wrapper hardcode_libdir_flag_spec=' ' allow_undefined_flag=unsupported # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. archive_cmds='$CC -o $lib $libobjs $compiler_flags `func_echo_all "$deplibs" | $SED '\''s/ -lc$//'\''` -link -dll~linknames=' # The linker will automatically build a .lib file if we build a DLL. old_archive_from_new_cmds='true' # FIXME: Should let the user specify the lib program. old_archive_cmds='lib -OUT:$oldlib$oldobjs$old_deplibs' enable_shared_with_static_runtimes=yes ;; esac ;; darwin* | rhapsody*) archive_cmds_need_lc=no hardcode_direct=no hardcode_automatic=yes hardcode_shlibpath_var=unsupported if test yes = "$lt_cv_ld_force_load"; then whole_archive_flag_spec='`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience $wl-force_load,$conv\"; done; func_echo_all \"$new_convenience\"`' else whole_archive_flag_spec='' fi link_all_deplibs=yes allow_undefined_flag=$_lt_dar_allow_undefined case $cc_basename in ifort*|nagfor*) _lt_dar_can_shared=yes ;; *) _lt_dar_can_shared=$GCC ;; esac if test yes = "$_lt_dar_can_shared"; then output_verbose_link_cmd=func_echo_all archive_cmds="\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dsymutil" module_cmds="\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dsymutil" archive_expsym_cmds="$SED 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dar_export_syms$_lt_dsymutil" module_expsym_cmds="$SED -e 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dar_export_syms$_lt_dsymutil" else ld_shlibs=no fi ;; dgux*) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_libdir_flag_spec='-L$libdir' hardcode_shlibpath_var=no ;; # FreeBSD 2.2.[012] allows us to include c++rt0.o to get C++ constructor # support. Future versions do this automatically, but an explicit c++rt0.o # does not break anything, and helps significantly (at the cost of a little # extra space). freebsd2.2*) archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags /usr/lib/c++rt0.o' hardcode_libdir_flag_spec='-R$libdir' hardcode_direct=yes hardcode_shlibpath_var=no ;; # Unfortunately, older versions of FreeBSD 2 do not have this feature. freebsd2.*) archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags' hardcode_direct=yes hardcode_minus_L=yes hardcode_shlibpath_var=no ;; # FreeBSD 3 and greater uses gcc -shared to do shared libraries. freebsd* | dragonfly* | midnightbsd*) archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' hardcode_libdir_flag_spec='-R$libdir' hardcode_direct=yes hardcode_shlibpath_var=no ;; hpux9*) if test yes = "$GCC"; then archive_cmds='$RM $output_objdir/$soname~$CC -shared $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $libobjs $deplibs $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' else archive_cmds='$RM $output_objdir/$soname~$LD -b +b $install_libdir -o $output_objdir/$soname $libobjs $deplibs $linker_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' fi hardcode_libdir_flag_spec='$wl+b $wl$libdir' hardcode_libdir_separator=: hardcode_direct=yes # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. hardcode_minus_L=yes export_dynamic_flag_spec='$wl-E' ;; hpux10*) if test yes,no = "$GCC,$with_gnu_ld"; then archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags' else archive_cmds='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags' fi if test no = "$with_gnu_ld"; then hardcode_libdir_flag_spec='$wl+b $wl$libdir' hardcode_libdir_separator=: hardcode_direct=yes hardcode_direct_absolute=yes export_dynamic_flag_spec='$wl-E' # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. hardcode_minus_L=yes fi ;; hpux11*) if test yes,no = "$GCC,$with_gnu_ld"; then case $host_cpu in hppa*64*) archive_cmds='$CC -shared $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' ;; ia64*) archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags' ;; *) archive_cmds='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags' ;; esac else case $host_cpu in hppa*64*) archive_cmds='$CC -b $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' ;; ia64*) archive_cmds='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags' ;; *) # Older versions of the 11.00 compiler do not understand -b yet # (HP92453-01 A.11.01.20 doesn't, HP92453-01 B.11.X.35175-35176.GP does) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $CC understands -b" >&5 printf %s "checking if $CC understands -b... " >&6; } if test ${lt_cv_prog_compiler__b+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler__b=no save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS -b" echo "$lt_simple_link_test_code" > conftest.$ac_ext if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then # The linker can only warn and ignore the option if not recognized # So say no if there are warnings if test -s conftest.err; then # Append any errors to the config.log. cat conftest.err 1>&5 $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler__b=yes fi else lt_cv_prog_compiler__b=yes fi fi $RM -r conftest* LDFLAGS=$save_LDFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler__b" >&5 printf "%s\n" "$lt_cv_prog_compiler__b" >&6; } if test yes = "$lt_cv_prog_compiler__b"; then archive_cmds='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags' else archive_cmds='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags' fi ;; esac fi if test no = "$with_gnu_ld"; then hardcode_libdir_flag_spec='$wl+b $wl$libdir' hardcode_libdir_separator=: case $host_cpu in hppa*64*|ia64*) hardcode_direct=no hardcode_shlibpath_var=no ;; *) hardcode_direct=yes hardcode_direct_absolute=yes export_dynamic_flag_spec='$wl-E' # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. hardcode_minus_L=yes ;; esac fi ;; irix5* | irix6* | nonstopux*) if test yes = "$GCC"; then archive_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' # Try to use the -exported_symbol ld option, if it does not # work, assume that -exports_file does not work either and # implicitly export all symbols. # This should be the same for all languages, so no per-tag cache variable. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the $host_os linker accepts -exported_symbol" >&5 printf %s "checking whether the $host_os linker accepts -exported_symbol... " >&6; } if test ${lt_cv_irix_exported_symbol+y} then : printf %s "(cached) " >&6 else case e in #( e) save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS -shared $wl-exported_symbol ${wl}foo $wl-update_registry $wl/dev/null" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int foo (void) { return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : lt_cv_irix_exported_symbol=yes else case e in #( e) lt_cv_irix_exported_symbol=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LDFLAGS=$save_LDFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_irix_exported_symbol" >&5 printf "%s\n" "$lt_cv_irix_exported_symbol" >&6; } if test yes = "$lt_cv_irix_exported_symbol"; then archive_expsym_cmds='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations $wl-exports_file $wl$export_symbols -o $lib' fi else archive_cmds='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' archive_expsym_cmds='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -exports_file $export_symbols -o $lib' fi archive_cmds_need_lc='no' hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' hardcode_libdir_separator=: inherit_rpath=yes link_all_deplibs=yes ;; linux*) case $cc_basename in tcc*) # Fabrice Bellard et al's Tiny C Compiler ld_shlibs=yes archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then archive_cmds='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags' # a.out else archive_cmds='$LD -shared -o $lib $libobjs $deplibs $linker_flags' # ELF fi hardcode_libdir_flag_spec='-R$libdir' hardcode_direct=yes hardcode_shlibpath_var=no ;; newsos6) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_direct=yes hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' hardcode_libdir_separator=: hardcode_shlibpath_var=no ;; *nto* | *qnx*) ;; openbsd* | bitrig*) if test -f /usr/libexec/ld.so; then hardcode_direct=yes hardcode_shlibpath_var=no hardcode_direct_absolute=yes if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags $wl-retain-symbols-file,$export_symbols' hardcode_libdir_flag_spec='$wl-rpath,$libdir' export_dynamic_flag_spec='$wl-E' else archive_cmds='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' hardcode_libdir_flag_spec='$wl-rpath,$libdir' fi else ld_shlibs=no fi ;; os2*) hardcode_libdir_flag_spec='-L$libdir' hardcode_minus_L=yes allow_undefined_flag=unsupported shrext_cmds=.dll archive_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' archive_expsym_cmds='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' old_archive_From_new_cmds='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' enable_shared_with_static_runtimes=yes file_list_spec='@' ;; osf3*) if test yes = "$GCC"; then allow_undefined_flag=' $wl-expect_unresolved $wl\*' archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' else allow_undefined_flag=' -expect_unresolved \*' archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' fi archive_cmds_need_lc='no' hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' hardcode_libdir_separator=: ;; osf4* | osf5*) # as osf3* with the addition of -msym flag if test yes = "$GCC"; then allow_undefined_flag=' $wl-expect_unresolved $wl\*' archive_cmds='$CC -shared$allow_undefined_flag $pic_flag $libobjs $deplibs $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' else allow_undefined_flag=' -expect_unresolved \*' archive_cmds='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' archive_expsym_cmds='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done; printf "%s\\n" "-hidden">> $lib.exp~ $CC -shared$allow_undefined_flag $wl-input $wl$lib.exp $compiler_flags $libobjs $deplibs -soname $soname `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~$RM $lib.exp' # Both c and cxx compiler support -rpath directly hardcode_libdir_flag_spec='-rpath $libdir' fi archive_cmds_need_lc='no' hardcode_libdir_separator=: ;; solaris*) no_undefined_flag=' -z defs' if test yes = "$GCC"; then wlarc='$wl' archive_cmds='$CC -shared $pic_flag $wl-z ${wl}text $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -shared $pic_flag $wl-z ${wl}text $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp' else case `$CC -V 2>&1` in *"Compilers 5.0"*) wlarc='' archive_cmds='$LD -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $linker_flags' archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $LD -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $linker_flags~$RM $lib.exp' ;; *) wlarc='$wl' archive_cmds='$CC -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp' ;; esac fi hardcode_libdir_flag_spec='-R$libdir' hardcode_shlibpath_var=no case $host_os in solaris2.[0-5] | solaris2.[0-5].*) ;; *) # The compiler driver will combine and reorder linker options, # but understands '-z linker_flag'. GCC discards it without '$wl', # but is careful enough not to reorder. # Supported since Solaris 2.6 (maybe 2.5.1?) if test yes = "$GCC"; then whole_archive_flag_spec='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract' else whole_archive_flag_spec='-z allextract$convenience -z defaultextract' fi ;; esac link_all_deplibs=yes ;; sunos4*) if test sequent = "$host_vendor"; then # Use $CC to link under sequent, because it throws in some extra .o # files that make .init and .fini sections work. archive_cmds='$CC -G $wl-h $soname -o $lib $libobjs $deplibs $compiler_flags' else archive_cmds='$LD -assert pure-text -Bstatic -o $lib $libobjs $deplibs $linker_flags' fi hardcode_libdir_flag_spec='-L$libdir' hardcode_direct=yes hardcode_minus_L=yes hardcode_shlibpath_var=no ;; sysv4) case $host_vendor in sni) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_direct=yes # is this really true??? ;; siemens) ## LD is ld it makes a PLAMLIB ## CC just makes a GrossModule. archive_cmds='$LD -G -o $lib $libobjs $deplibs $linker_flags' reload_cmds='$CC -r -o $output$reload_objs' hardcode_direct=no ;; motorola) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_direct=no #Motorola manual says yes, but my tests say they lie ;; esac runpath_var='LD_RUN_PATH' hardcode_shlibpath_var=no ;; sysv4.3*) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_shlibpath_var=no export_dynamic_flag_spec='-Bexport' ;; sysv4*MP*) if test -d /usr/nec; then archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_shlibpath_var=no runpath_var=LD_RUN_PATH hardcode_runpath_var=yes ld_shlibs=yes fi ;; sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[01].[10]* | unixware7* | sco3.2v5.0.[024]*) no_undefined_flag='$wl-z,text' archive_cmds_need_lc=no hardcode_shlibpath_var=no runpath_var='LD_RUN_PATH' if test yes = "$GCC"; then archive_cmds='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' else archive_cmds='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' fi ;; sysv5* | sco3.2v5* | sco5v6*) # Note: We CANNOT use -z defs as we might desire, because we do not # link with -lc, and that would cause any symbols used from libc to # always be unresolved, which means just about no library would # ever link correctly. If we're not using GNU ld we use -z text # though, which does catch some bad symbols but isn't as heavy-handed # as -z defs. no_undefined_flag='$wl-z,text' allow_undefined_flag='$wl-z,nodefs' archive_cmds_need_lc=no hardcode_shlibpath_var=no hardcode_libdir_flag_spec='$wl-R,$libdir' hardcode_libdir_separator=':' link_all_deplibs=yes export_dynamic_flag_spec='$wl-Bexport' runpath_var='LD_RUN_PATH' if test yes = "$GCC"; then archive_cmds='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' else archive_cmds='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' fi ;; uts4*) archive_cmds='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' hardcode_libdir_flag_spec='-L$libdir' hardcode_shlibpath_var=no ;; *) ld_shlibs=no ;; esac if test sni = "$host_vendor"; then case $host in sysv4 | sysv4.2uw2* | sysv4.3* | sysv5*) export_dynamic_flag_spec='$wl-Blargedynsym' ;; esac fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ld_shlibs" >&5 printf "%s\n" "$ld_shlibs" >&6; } test no = "$ld_shlibs" && can_build_shared=no with_gnu_ld=$with_gnu_ld # # Do we need to explicitly link libc? # case "x$archive_cmds_need_lc" in x|xyes) # Assume -lc should be added archive_cmds_need_lc=yes if test yes,yes = "$GCC,$enable_shared"; then case $archive_cmds in *'~'*) # FIXME: we may have to deal with multi-command sequences. ;; '$CC '*) # Test whether the compiler implicitly links with -lc since on some # systems, -lgcc has to come before -lc. If gcc already passes -lc # to ld, don't add -lc before -lgcc. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether -lc should be explicitly linked in" >&5 printf %s "checking whether -lc should be explicitly linked in... " >&6; } if test ${lt_cv_archive_cmds_need_lc+y} then : printf %s "(cached) " >&6 else case e in #( e) $RM conftest* echo "$lt_simple_compile_test_code" > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } 2>conftest.err; then soname=conftest lib=conftest libobjs=conftest.$ac_objext deplibs= wl=$lt_prog_compiler_wl pic_flag=$lt_prog_compiler_pic compiler_flags=-v linker_flags=-v verstring= output_objdir=. libname=conftest lt_save_allow_undefined_flag=$allow_undefined_flag allow_undefined_flag= if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$archive_cmds 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1\""; } >&5 (eval $archive_cmds 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } then lt_cv_archive_cmds_need_lc=no else lt_cv_archive_cmds_need_lc=yes fi allow_undefined_flag=$lt_save_allow_undefined_flag else cat conftest.err 1>&5 fi $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_archive_cmds_need_lc" >&5 printf "%s\n" "$lt_cv_archive_cmds_need_lc" >&6; } archive_cmds_need_lc=$lt_cv_archive_cmds_need_lc ;; esac fi ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dynamic linker characteristics" >&5 printf %s "checking dynamic linker characteristics... " >&6; } if test yes = "$GCC"; then case $host_os in darwin*) lt_awk_arg='/^libraries:/,/LR/' ;; *) lt_awk_arg='/^libraries:/' ;; esac case $host_os in mingw* | cegcc*) lt_sed_strip_eq='s|=\([A-Za-z]:\)|\1|g' ;; *) lt_sed_strip_eq='s|=/|/|g' ;; esac lt_search_path_spec=`$CC -print-search-dirs | awk $lt_awk_arg | $SED -e "s/^libraries://" -e $lt_sed_strip_eq` case $lt_search_path_spec in *\;*) # if the path contains ";" then we assume it to be the separator # otherwise default to the standard path separator (i.e. ":") - it is # assumed that no part of a normal pathname contains ";" but that should # okay in the real world where ";" in dirpaths is itself problematic. lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED 's/;/ /g'` ;; *) lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED "s/$PATH_SEPARATOR/ /g"` ;; esac # Ok, now we have the path, separated by spaces, we can step through it # and add multilib dir if necessary... lt_tmp_lt_search_path_spec= lt_multi_os_dir=/`$CC $CPPFLAGS $CFLAGS $LDFLAGS -print-multi-os-directory 2>/dev/null` # ...but if some path component already ends with the multilib dir we assume # that all is fine and trust -print-search-dirs as is (GCC 4.2? or newer). case "$lt_multi_os_dir; $lt_search_path_spec " in "/; "* | "/.; "* | "/./; "* | *"$lt_multi_os_dir "* | *"$lt_multi_os_dir/ "*) lt_multi_os_dir= ;; esac for lt_sys_path in $lt_search_path_spec; do if test -d "$lt_sys_path$lt_multi_os_dir"; then lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path$lt_multi_os_dir" elif test -n "$lt_multi_os_dir"; then test -d "$lt_sys_path" && \ lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path" fi done lt_search_path_spec=`$ECHO "$lt_tmp_lt_search_path_spec" | awk ' BEGIN {RS = " "; FS = "/|\n";} { lt_foo = ""; lt_count = 0; for (lt_i = NF; lt_i > 0; lt_i--) { if ($lt_i != "" && $lt_i != ".") { if ($lt_i == "..") { lt_count++; } else { if (lt_count == 0) { lt_foo = "/" $lt_i lt_foo; } else { lt_count--; } } } } if (lt_foo != "") { lt_freq[lt_foo]++; } if (lt_freq[lt_foo] == 1) { print lt_foo; } }'` # AWK program above erroneously prepends '/' to C:/dos/paths # for these hosts. case $host_os in mingw* | cegcc*) lt_search_path_spec=`$ECHO "$lt_search_path_spec" |\ $SED 's|/\([A-Za-z]:\)|\1|g'` ;; esac sys_lib_search_path_spec=`$ECHO "$lt_search_path_spec" | $lt_NL2SP` else sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib" fi library_names_spec= libname_spec='lib$name' soname_spec= shrext_cmds=.so postinstall_cmds= postuninstall_cmds= finish_cmds= finish_eval= shlibpath_var= shlibpath_overrides_runpath=unknown version_type=none dynamic_linker="$host_os ld.so" sys_lib_dlsearch_path_spec="/lib /usr/lib" need_lib_prefix=unknown hardcode_into_libs=no # when you set need_version to no, make sure it does not cause -set_version # flags to be left without arguments need_version=unknown case $host_os in aix3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname.a' shlibpath_var=LIBPATH # AIX 3 has no versioning support, so we append a major version to the name. soname_spec='$libname$release$shared_ext$major' ;; aix[4-9]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no hardcode_into_libs=yes if test ia64 = "$host_cpu"; then # AIX 5 supports IA64 library_names_spec='$libname$release$shared_ext$major $libname$release$shared_ext$versuffix $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH else # With GCC up to 2.95.x, collect2 would create an import file # for dependence libraries. The import file would start with # the line '#! .'. This would cause the generated library to # depend on '.', always an invalid library. This was fixed in # development snapshots of GCC prior to 3.0. case $host_os in aix4 | aix4.[01] | aix4.[01].*) if { echo '#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 97)' echo ' yes ' echo '#endif'; } | $CC -E - | $GREP yes > /dev/null; then : else can_build_shared=no fi ;; esac # Using Import Files as archive members, it is possible to support # filename-based versioning of shared library archives on AIX. While # this would work for both with and without runtime linking, it will # prevent static linking of such archives. So we do filename-based # shared library versioning with .so extension only, which is used # when both runtime linking and shared linking is enabled. # Unfortunately, runtime linking may impact performance, so we do # not want this to be the default eventually. Also, we use the # versioned .so libs for executables only if there is the -brtl # linker flag in LDFLAGS as well, or --with-aix-soname=svr4 only. # To allow for filename-based versioning support, we need to create # libNAME.so.V as an archive file, containing: # *) an Import File, referring to the versioned filename of the # archive as well as the shared archive member, telling the # bitwidth (32 or 64) of that shared object, and providing the # list of exported symbols of that shared object, eventually # decorated with the 'weak' keyword # *) the shared object with the F_LOADONLY flag set, to really avoid # it being seen by the linker. # At run time we better use the real file rather than another symlink, # but for link time we create the symlink libNAME.so -> libNAME.so.V case $with_aix_soname,$aix_use_runtimelinking in # AIX (on Power*) has no versioning support, so currently we cannot hardcode correct # soname into executable. Probably we can add versioning support to # collect2, so additional links can be useful in future. aix,yes) # traditional libtool dynamic_linker='AIX unversionable lib.so' # If using run time linking (on AIX 4.2 or later) use lib.so # instead of lib.a to let people know that these are not # typical AIX shared libraries. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; aix,no) # traditional AIX only dynamic_linker='AIX lib.a(lib.so.V)' # We preserve .a as extension for shared libraries through AIX4.2 # and later when we are not doing run time linking. library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' ;; svr4,*) # full svr4 only dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o)" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,yes) # both, prefer svr4 dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o), lib.a(lib.so.V)" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # unpreferred sharedlib libNAME.a needs extra handling postinstall_cmds='test -n "$linkname" || linkname="$realname"~func_stripname "" ".so" "$linkname"~$install_shared_prog "$dir/$func_stripname_result.$libext" "$destdir/$func_stripname_result.$libext"~test -z "$tstripme" || test -z "$striplib" || $striplib "$destdir/$func_stripname_result.$libext"' postuninstall_cmds='for n in $library_names $old_library; do :; done~func_stripname "" ".so" "$n"~test "$func_stripname_result" = "$n" || func_append rmfiles " $odir/$func_stripname_result.$libext"' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,no) # both, prefer aix dynamic_linker="AIX lib.a(lib.so.V), lib.so.V($shared_archive_member_spec.o)" library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' # unpreferred sharedlib libNAME.so.V and symlink libNAME.so need extra handling postinstall_cmds='test -z "$dlname" || $install_shared_prog $dir/$dlname $destdir/$dlname~test -z "$tstripme" || test -z "$striplib" || $striplib $destdir/$dlname~test -n "$linkname" || linkname=$realname~func_stripname "" ".a" "$linkname"~(cd "$destdir" && $LN_S -f $dlname $func_stripname_result.so)' postuninstall_cmds='test -z "$dlname" || func_append rmfiles " $odir/$dlname"~for n in $old_library $library_names; do :; done~func_stripname "" ".a" "$n"~func_append rmfiles " $odir/$func_stripname_result.so"' ;; esac shlibpath_var=LIBPATH fi ;; amigaos*) case $host_cpu in powerpc) # Since July 2007 AmigaOS4 officially supports .so libraries. # When compiling the executable, add -use-dynld -Lsobjs: to the compileline. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; m68k) library_names_spec='$libname.ixlibrary $libname.a' # Create ${libname}_ixlibrary.a entries in /sys/libs. finish_eval='for lib in `ls $libdir/*.ixlibrary 2>/dev/null`; do libname=`func_echo_all "$lib" | $SED '\''s%^.*/\([^/]*\)\.ixlibrary$%\1%'\''`; $RM /sys/libs/${libname}_ixlibrary.a; $show "cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a"; cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a || exit 1; done' ;; esac ;; beos*) library_names_spec='$libname$shared_ext' dynamic_linker="$host_os ld.so" shlibpath_var=LIBRARY_PATH ;; bsdi[45]*) version_type=linux # correct to gnu/linux during the next big refactor need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/shlib /usr/lib /usr/X11/lib /usr/contrib/lib /lib /usr/local/lib" sys_lib_dlsearch_path_spec="/shlib /usr/lib /usr/local/lib" # the default ld.so.conf also contains /usr/contrib/lib and # /usr/X11R6/lib (/usr/X11 is a link to /usr/X11R6), but let us allow # libtool to hard-code these into programs ;; cygwin* | mingw* | pw32* | cegcc*) version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no case $GCC,$cc_basename in yes,*) # gcc library_names_spec='$libname.dll.a' # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes case $host_os in cygwin*) # Cygwin DLLs use 'cyg' prefix rather than 'lib' soname_spec='`echo $libname | $SED -e 's/^lib/cyg/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/lib/w32api" ;; mingw* | cegcc*) # MinGW DLLs use traditional 'lib' prefix soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' ;; pw32*) # pw32 DLLs use 'pw' prefix rather than 'lib' library_names_spec='`echo $libname | $SED -e 's/^lib/pw/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' ;; esac dynamic_linker='Win32 ld.exe' ;; *,cl* | *,icl*) # Native MSVC or ICC libname_spec='$name' soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' library_names_spec='$libname.dll.lib' case $build_os in mingw*) sys_lib_search_path_spec= lt_save_ifs=$IFS IFS=';' for lt_path in $LIB do IFS=$lt_save_ifs # Let DOS variable expansion print the short 8.3 style file name. lt_path=`cd "$lt_path" 2>/dev/null && cmd //C "for %i in (".") do @echo %~si"` sys_lib_search_path_spec="$sys_lib_search_path_spec $lt_path" done IFS=$lt_save_ifs # Convert to MSYS style. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's|\\\\|/|g' -e 's| \\([a-zA-Z]\\):| /\\1|g' -e 's|^ ||'` ;; cygwin*) # Convert to unix form, then to dos form, then back to unix form # but this time dos style (no spaces!) so that the unix form looks # like /cygdrive/c/PROGRA~1:/cygdr... sys_lib_search_path_spec=`cygpath --path --unix "$LIB"` sys_lib_search_path_spec=`cygpath --path --dos "$sys_lib_search_path_spec" 2>/dev/null` sys_lib_search_path_spec=`cygpath --path --unix "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` ;; *) sys_lib_search_path_spec=$LIB if $ECHO "$sys_lib_search_path_spec" | $GREP ';[c-zC-Z]:/' >/dev/null; then # It is most probably a Windows format PATH. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's/;/ /g'` else sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` fi # FIXME: find the short name or the path components, as spaces are # common. (e.g. "Program Files" -> "PROGRA~1") ;; esac # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes dynamic_linker='Win32 link.exe' ;; *) # Assume MSVC and ICC wrapper library_names_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext $libname.lib' dynamic_linker='Win32 ld.exe' ;; esac # FIXME: first we should search . and the directory the executable is in shlibpath_var=PATH ;; darwin* | rhapsody*) dynamic_linker="$host_os dyld" version_type=darwin need_lib_prefix=no need_version=no library_names_spec='$libname$release$major$shared_ext $libname$shared_ext' soname_spec='$libname$release$major$shared_ext' shlibpath_overrides_runpath=yes shlibpath_var=DYLD_LIBRARY_PATH shrext_cmds='`test .$module = .yes && echo .so || echo .dylib`' sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/local/lib" sys_lib_dlsearch_path_spec='/usr/local/lib /lib /usr/lib' ;; dgux*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; freebsd* | dragonfly* | midnightbsd*) # DragonFly does not have aout. When/if they implement a new # versioning mechanism, adjust this. if test -x /usr/bin/objformat; then objformat=`/usr/bin/objformat` else case $host_os in freebsd[23].*) objformat=aout ;; *) objformat=elf ;; esac fi version_type=freebsd-$objformat case $version_type in freebsd-elf*) library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' need_version=no need_lib_prefix=no ;; freebsd-*) library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' need_version=yes ;; esac case $host_cpu in powerpc64) # On FreeBSD bi-arch platforms, a different variable is used for 32-bit # binaries. See . cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int test_pointer_size[sizeof (void *) - 5]; _ACEOF if ac_fn_c_try_compile "$LINENO" then : shlibpath_var=LD_LIBRARY_PATH else case e in #( e) shlibpath_var=LD_32_LIBRARY_PATH ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; *) shlibpath_var=LD_LIBRARY_PATH ;; esac case $host_os in freebsd2.*) shlibpath_overrides_runpath=yes ;; freebsd3.[01]* | freebsdelf3.[01]*) shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; freebsd3.[2-9]* | freebsdelf3.[2-9]* | \ freebsd4.[0-5] | freebsdelf4.[0-5] | freebsd4.1.1 | freebsdelf4.1.1) shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; *) # from 4.6 on, and DragonFly shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; esac ;; haiku*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no dynamic_linker="$host_os runtime_loader" library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LIBRARY_PATH shlibpath_overrides_runpath=no sys_lib_dlsearch_path_spec='/boot/home/config/lib /boot/common/lib /boot/system/lib' hardcode_into_libs=yes ;; hpux9* | hpux10* | hpux11*) # Give a soname corresponding to the major version so that dld.sl refuses to # link against other versions. version_type=sunos need_lib_prefix=no need_version=no case $host_cpu in ia64*) shrext_cmds='.so' hardcode_into_libs=yes dynamic_linker="$host_os dld.so" shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' if test 32 = "$HPUX_IA64_MODE"; then sys_lib_search_path_spec="/usr/lib/hpux32 /usr/local/lib/hpux32 /usr/local/lib" sys_lib_dlsearch_path_spec=/usr/lib/hpux32 else sys_lib_search_path_spec="/usr/lib/hpux64 /usr/local/lib/hpux64" sys_lib_dlsearch_path_spec=/usr/lib/hpux64 fi ;; hppa*64*) shrext_cmds='.sl' hardcode_into_libs=yes dynamic_linker="$host_os dld.sl" shlibpath_var=LD_LIBRARY_PATH # How should we handle SHLIB_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' sys_lib_search_path_spec="/usr/lib/pa20_64 /usr/ccs/lib/pa20_64" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; *) shrext_cmds='.sl' dynamic_linker="$host_os dld.sl" shlibpath_var=SHLIB_PATH shlibpath_overrides_runpath=no # +s is required to enable SHLIB_PATH library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' ;; esac # HP-UX runs *really* slowly unless shared libraries are mode 555, ... postinstall_cmds='chmod 555 $lib' # or fails outright, so override atomically: install_override_mode=555 ;; interix[3-9]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='Interix 3.x ld.so.1 (PE, like ELF)' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; irix5* | irix6* | nonstopux*) case $host_os in nonstopux*) version_type=nonstopux ;; *) if test yes = "$lt_cv_prog_gnu_ld"; then version_type=linux # correct to gnu/linux during the next big refactor else version_type=irix fi ;; esac need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$release$shared_ext $libname$shared_ext' case $host_os in irix5* | nonstopux*) libsuff= shlibsuff= ;; *) case $LD in # libtool.m4 will add one of these switches to LD *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ") libsuff= shlibsuff= libmagic=32-bit;; *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ") libsuff=32 shlibsuff=N32 libmagic=N32;; *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ") libsuff=64 shlibsuff=64 libmagic=64-bit;; *) libsuff= shlibsuff= libmagic=never-match;; esac ;; esac shlibpath_var=LD_LIBRARY${shlibsuff}_PATH shlibpath_overrides_runpath=no sys_lib_search_path_spec="/usr/lib$libsuff /lib$libsuff /usr/local/lib$libsuff" sys_lib_dlsearch_path_spec="/usr/lib$libsuff /lib$libsuff" hardcode_into_libs=yes ;; # No shared lib support for Linux oldld, aout, or coff. linux*oldld* | linux*aout* | linux*coff*) dynamic_linker=no ;; linux*android*) version_type=none # Android doesn't support versioned libraries. need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext' finish_cmds= shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes dynamic_linker='Android linker' # -rpath works at least for libraries that are not overridden by # libraries installed in system locations. hardcode_libdir_flag_spec='$wl-rpath $wl$libdir' ;; # This must be glibc/ELF. linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig -n $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no # Some binutils ld are patched to set DT_RUNPATH if test ${lt_cv_shlibpath_overrides_runpath+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_shlibpath_overrides_runpath=no save_LDFLAGS=$LDFLAGS save_libdir=$libdir eval "libdir=/foo; wl=\"$lt_prog_compiler_wl\"; \ LDFLAGS=\"\$LDFLAGS $hardcode_libdir_flag_spec\"" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : if ($OBJDUMP -p conftest$ac_exeext) 2>/dev/null | grep "RUNPATH.*$libdir" >/dev/null then : lt_cv_shlibpath_overrides_runpath=yes fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LDFLAGS=$save_LDFLAGS libdir=$save_libdir ;; esac fi shlibpath_overrides_runpath=$lt_cv_shlibpath_overrides_runpath # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes # Ideally, we could use ldconfig to report *all* directores which are # searched for libraries, however this is still not possible. Aside from not # being certain /sbin/ldconfig is available, command # 'ldconfig -N -X -v | grep ^/' on 64bit Fedora does not report /usr/lib64, # even though it is searched at run-time. Try to do the best guess by # appending ld.so.conf contents (and includes) to the search path. if test -f /etc/ld.so.conf; then lt_ld_extra=`awk '/^include / { system(sprintf("cd /etc; cat %s 2>/dev/null", \$2)); skip = 1; } { if (!skip) print \$0; skip = 0; }' < /etc/ld.so.conf | $SED -e 's/#.*//;/^[ ]*hwcap[ ]/d;s/[:, ]/ /g;s/=[^=]*$//;s/=[^= ]* / /g;s/"//g;/^$/d' | tr '\n' ' '` sys_lib_dlsearch_path_spec="/lib /usr/lib $lt_ld_extra" fi # We used to test for /lib/ld.so.1 and disable shared libraries on # powerpc, because MkLinux only supported shared libraries with the # GNU dynamic linker. Since this was broken with cross compilers, # most powerpc-linux boxes support dynamic linking these days and # people can always --disable-shared, the test was removed, and we # assume the GNU/Linux dynamic linker is in use. dynamic_linker='GNU/Linux ld.so' ;; netbsd*) version_type=sunos need_lib_prefix=no need_version=no if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' dynamic_linker='NetBSD (a.out) ld.so' else library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='NetBSD ld.elf_so' fi shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; newsos6) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; *nto* | *qnx*) version_type=qnx need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes dynamic_linker='ldqnx.so' ;; openbsd* | bitrig*) version_type=sunos sys_lib_dlsearch_path_spec=/usr/lib need_lib_prefix=no if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then need_version=no else need_version=yes fi library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; os2*) libname_spec='$name' version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no # OS/2 can only load a DLL with a base name of 8 characters or less. soname_spec='`test -n "$os2dllname" && libname="$os2dllname"; v=$($ECHO $release$versuffix | tr -d .-); n=$($ECHO $libname | cut -b -$((8 - ${#v})) | tr . _); $ECHO $n$v`$shared_ext' library_names_spec='${libname}_dll.$libext' dynamic_linker='OS/2 ld.exe' shlibpath_var=BEGINLIBPATH sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; $ECHO \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; $ECHO \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' ;; osf3* | osf4* | osf5*) version_type=osf need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc /usr/lib /usr/local/lib /var/shlib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; rdos*) dynamic_linker=no ;; solaris*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes # ldd complains unless libraries are executable postinstall_cmds='chmod +x $lib' ;; sunos4*) version_type=sunos library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/usr/etc" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes if test yes = "$with_gnu_ld"; then need_lib_prefix=no fi need_version=yes ;; sysv4 | sysv4.3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH case $host_vendor in sni) shlibpath_overrides_runpath=no need_lib_prefix=no runpath_var=LD_RUN_PATH ;; siemens) need_lib_prefix=no ;; motorola) need_lib_prefix=no need_version=no shlibpath_overrides_runpath=no sys_lib_search_path_spec='/lib /usr/lib /usr/ccs/lib' ;; esac ;; sysv4*MP*) if test -d /usr/nec; then version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$shared_ext.$versuffix $libname$shared_ext.$major $libname$shared_ext' soname_spec='$libname$shared_ext.$major' shlibpath_var=LD_LIBRARY_PATH fi ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*) version_type=sco need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes if test yes = "$with_gnu_ld"; then sys_lib_search_path_spec='/usr/local/lib /usr/gnu/lib /usr/ccs/lib /usr/lib /lib' else sys_lib_search_path_spec='/usr/ccs/lib /usr/lib' case $host_os in sco3.2v5*) sys_lib_search_path_spec="$sys_lib_search_path_spec /lib" ;; esac fi sys_lib_dlsearch_path_spec='/usr/lib' ;; tpf*) # TPF is a cross-target only. Preferred cross-host = GNU/Linux. version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; uts4*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; *) dynamic_linker=no ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $dynamic_linker" >&5 printf "%s\n" "$dynamic_linker" >&6; } test no = "$dynamic_linker" && can_build_shared=no variables_saved_for_relink="PATH $shlibpath_var $runpath_var" if test yes = "$GCC"; then variables_saved_for_relink="$variables_saved_for_relink GCC_EXEC_PREFIX COMPILER_PATH LIBRARY_PATH" fi if test set = "${lt_cv_sys_lib_search_path_spec+set}"; then sys_lib_search_path_spec=$lt_cv_sys_lib_search_path_spec fi if test set = "${lt_cv_sys_lib_dlsearch_path_spec+set}"; then sys_lib_dlsearch_path_spec=$lt_cv_sys_lib_dlsearch_path_spec fi # remember unaugmented sys_lib_dlsearch_path content for libtool script decls... configure_time_dlsearch_path=$sys_lib_dlsearch_path_spec # ... but it needs LT_SYS_LIBRARY_PATH munging for other configure-time code func_munge_path_list sys_lib_dlsearch_path_spec "$LT_SYS_LIBRARY_PATH" # to be used as default LT_SYS_LIBRARY_PATH value in generated libtool configure_time_lt_sys_library_path=$LT_SYS_LIBRARY_PATH { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to hardcode library paths into programs" >&5 printf %s "checking how to hardcode library paths into programs... " >&6; } hardcode_action= if test -n "$hardcode_libdir_flag_spec" || test -n "$runpath_var" || test yes = "$hardcode_automatic"; then # We can hardcode non-existent directories. if test no != "$hardcode_direct" && # If the only mechanism to avoid hardcoding is shlibpath_var, we # have to relink, otherwise we might link with an installed library # when we should be linking with a yet-to-be-installed one ## test no != "$_LT_TAGVAR(hardcode_shlibpath_var, )" && test no != "$hardcode_minus_L"; then # Linking always hardcodes the temporary library directory. hardcode_action=relink else # We can link without hardcoding, and we can hardcode nonexisting dirs. hardcode_action=immediate fi else # We cannot hardcode anything, or else we can only hardcode existing # directories. hardcode_action=unsupported fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $hardcode_action" >&5 printf "%s\n" "$hardcode_action" >&6; } if test relink = "$hardcode_action" || test yes = "$inherit_rpath"; then # Fast installation is not supported enable_fast_install=no elif test yes = "$shlibpath_overrides_runpath" || test no = "$enable_shared"; then # Fast installation is not necessary enable_fast_install=needless fi if test yes != "$enable_dlopen"; then enable_dlopen=unknown enable_dlopen_self=unknown enable_dlopen_self_static=unknown else lt_cv_dlopen=no lt_cv_dlopen_libs= case $host_os in beos*) lt_cv_dlopen=load_add_on lt_cv_dlopen_libs= lt_cv_dlopen_self=yes ;; mingw* | pw32* | cegcc*) lt_cv_dlopen=LoadLibrary lt_cv_dlopen_libs= ;; cygwin*) lt_cv_dlopen=dlopen lt_cv_dlopen_libs= ;; darwin*) # if libdl is installed we need to link against it { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for dlopen in -ldl" >&5 printf %s "checking for dlopen in -ldl... " >&6; } if test ${ac_cv_lib_dl_dlopen+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-ldl $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char dlopen (void); int main (void) { return dlopen (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_dl_dlopen=yes else case e in #( e) ac_cv_lib_dl_dlopen=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dl_dlopen" >&5 printf "%s\n" "$ac_cv_lib_dl_dlopen" >&6; } if test "x$ac_cv_lib_dl_dlopen" = xyes then : lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl else case e in #( e) lt_cv_dlopen=dyld lt_cv_dlopen_libs= lt_cv_dlopen_self=yes ;; esac fi ;; tpf*) # Don't try to run any link tests for TPF. We know it's impossible # because TPF is a cross-compiler, and we know how we open DSOs. lt_cv_dlopen=dlopen lt_cv_dlopen_libs= lt_cv_dlopen_self=no ;; *) ac_fn_c_check_func "$LINENO" "shl_load" "ac_cv_func_shl_load" if test "x$ac_cv_func_shl_load" = xyes then : lt_cv_dlopen=shl_load else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for shl_load in -ldld" >&5 printf %s "checking for shl_load in -ldld... " >&6; } if test ${ac_cv_lib_dld_shl_load+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-ldld $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char shl_load (void); int main (void) { return shl_load (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_dld_shl_load=yes else case e in #( e) ac_cv_lib_dld_shl_load=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dld_shl_load" >&5 printf "%s\n" "$ac_cv_lib_dld_shl_load" >&6; } if test "x$ac_cv_lib_dld_shl_load" = xyes then : lt_cv_dlopen=shl_load lt_cv_dlopen_libs=-ldld else case e in #( e) ac_fn_c_check_func "$LINENO" "dlopen" "ac_cv_func_dlopen" if test "x$ac_cv_func_dlopen" = xyes then : lt_cv_dlopen=dlopen else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for dlopen in -ldl" >&5 printf %s "checking for dlopen in -ldl... " >&6; } if test ${ac_cv_lib_dl_dlopen+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-ldl $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char dlopen (void); int main (void) { return dlopen (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_dl_dlopen=yes else case e in #( e) ac_cv_lib_dl_dlopen=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dl_dlopen" >&5 printf "%s\n" "$ac_cv_lib_dl_dlopen" >&6; } if test "x$ac_cv_lib_dl_dlopen" = xyes then : lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for dlopen in -lsvld" >&5 printf %s "checking for dlopen in -lsvld... " >&6; } if test ${ac_cv_lib_svld_dlopen+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lsvld $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char dlopen (void); int main (void) { return dlopen (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_svld_dlopen=yes else case e in #( e) ac_cv_lib_svld_dlopen=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_svld_dlopen" >&5 printf "%s\n" "$ac_cv_lib_svld_dlopen" >&6; } if test "x$ac_cv_lib_svld_dlopen" = xyes then : lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-lsvld else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for dld_link in -ldld" >&5 printf %s "checking for dld_link in -ldld... " >&6; } if test ${ac_cv_lib_dld_dld_link+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-ldld $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char dld_link (void); int main (void) { return dld_link (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_dld_dld_link=yes else case e in #( e) ac_cv_lib_dld_dld_link=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dld_dld_link" >&5 printf "%s\n" "$ac_cv_lib_dld_dld_link" >&6; } if test "x$ac_cv_lib_dld_dld_link" = xyes then : lt_cv_dlopen=dld_link lt_cv_dlopen_libs=-ldld fi ;; esac fi ;; esac fi ;; esac fi ;; esac fi ;; esac fi ;; esac if test no = "$lt_cv_dlopen"; then enable_dlopen=no else enable_dlopen=yes fi case $lt_cv_dlopen in dlopen) save_CPPFLAGS=$CPPFLAGS test yes = "$ac_cv_header_dlfcn_h" && CPPFLAGS="$CPPFLAGS -DHAVE_DLFCN_H" save_LDFLAGS=$LDFLAGS wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $export_dynamic_flag_spec\" save_LIBS=$LIBS LIBS="$lt_cv_dlopen_libs $LIBS" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a program can dlopen itself" >&5 printf %s "checking whether a program can dlopen itself... " >&6; } if test ${lt_cv_dlopen_self+y} then : printf %s "(cached) " >&6 else case e in #( e) if test yes = "$cross_compiling"; then : lt_cv_dlopen_self=cross else lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<_LT_EOF #line $LINENO "configure" #include "confdefs.h" #if HAVE_DLFCN_H #include #endif #include #ifdef RTLD_GLOBAL # define LT_DLGLOBAL RTLD_GLOBAL #else # ifdef DL_GLOBAL # define LT_DLGLOBAL DL_GLOBAL # else # define LT_DLGLOBAL 0 # endif #endif /* We may have to define LT_DLLAZY_OR_NOW in the command line if we find out it does not work in some platform. */ #ifndef LT_DLLAZY_OR_NOW # ifdef RTLD_LAZY # define LT_DLLAZY_OR_NOW RTLD_LAZY # else # ifdef DL_LAZY # define LT_DLLAZY_OR_NOW DL_LAZY # else # ifdef RTLD_NOW # define LT_DLLAZY_OR_NOW RTLD_NOW # else # ifdef DL_NOW # define LT_DLLAZY_OR_NOW DL_NOW # else # define LT_DLLAZY_OR_NOW 0 # endif # endif # endif # endif #endif /* When -fvisibility=hidden is used, assume the code has been annotated correspondingly for the symbols needed. */ #if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3)) int fnord () __attribute__((visibility("default"))); #endif int fnord () { return 42; } int main () { void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW); int status = $lt_dlunknown; if (self) { if (dlsym (self,"fnord")) status = $lt_dlno_uscore; else { if (dlsym( self,"_fnord")) status = $lt_dlneed_uscore; else puts (dlerror ()); } /* dlclose (self); */ } else puts (dlerror ()); return status; } _LT_EOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s "conftest$ac_exeext" 2>/dev/null; then (./conftest; exit; ) >&5 2>/dev/null lt_status=$? case x$lt_status in x$lt_dlno_uscore) lt_cv_dlopen_self=yes ;; x$lt_dlneed_uscore) lt_cv_dlopen_self=yes ;; x$lt_dlunknown|x*) lt_cv_dlopen_self=no ;; esac else : # compilation failed lt_cv_dlopen_self=no fi fi rm -fr conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_dlopen_self" >&5 printf "%s\n" "$lt_cv_dlopen_self" >&6; } if test yes = "$lt_cv_dlopen_self"; then wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $lt_prog_compiler_static\" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a statically linked program can dlopen itself" >&5 printf %s "checking whether a statically linked program can dlopen itself... " >&6; } if test ${lt_cv_dlopen_self_static+y} then : printf %s "(cached) " >&6 else case e in #( e) if test yes = "$cross_compiling"; then : lt_cv_dlopen_self_static=cross else lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<_LT_EOF #line $LINENO "configure" #include "confdefs.h" #if HAVE_DLFCN_H #include #endif #include #ifdef RTLD_GLOBAL # define LT_DLGLOBAL RTLD_GLOBAL #else # ifdef DL_GLOBAL # define LT_DLGLOBAL DL_GLOBAL # else # define LT_DLGLOBAL 0 # endif #endif /* We may have to define LT_DLLAZY_OR_NOW in the command line if we find out it does not work in some platform. */ #ifndef LT_DLLAZY_OR_NOW # ifdef RTLD_LAZY # define LT_DLLAZY_OR_NOW RTLD_LAZY # else # ifdef DL_LAZY # define LT_DLLAZY_OR_NOW DL_LAZY # else # ifdef RTLD_NOW # define LT_DLLAZY_OR_NOW RTLD_NOW # else # ifdef DL_NOW # define LT_DLLAZY_OR_NOW DL_NOW # else # define LT_DLLAZY_OR_NOW 0 # endif # endif # endif # endif #endif /* When -fvisibility=hidden is used, assume the code has been annotated correspondingly for the symbols needed. */ #if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3)) int fnord () __attribute__((visibility("default"))); #endif int fnord () { return 42; } int main () { void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW); int status = $lt_dlunknown; if (self) { if (dlsym (self,"fnord")) status = $lt_dlno_uscore; else { if (dlsym( self,"_fnord")) status = $lt_dlneed_uscore; else puts (dlerror ()); } /* dlclose (self); */ } else puts (dlerror ()); return status; } _LT_EOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s "conftest$ac_exeext" 2>/dev/null; then (./conftest; exit; ) >&5 2>/dev/null lt_status=$? case x$lt_status in x$lt_dlno_uscore) lt_cv_dlopen_self_static=yes ;; x$lt_dlneed_uscore) lt_cv_dlopen_self_static=yes ;; x$lt_dlunknown|x*) lt_cv_dlopen_self_static=no ;; esac else : # compilation failed lt_cv_dlopen_self_static=no fi fi rm -fr conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_dlopen_self_static" >&5 printf "%s\n" "$lt_cv_dlopen_self_static" >&6; } fi CPPFLAGS=$save_CPPFLAGS LDFLAGS=$save_LDFLAGS LIBS=$save_LIBS ;; esac case $lt_cv_dlopen_self in yes|no) enable_dlopen_self=$lt_cv_dlopen_self ;; *) enable_dlopen_self=unknown ;; esac case $lt_cv_dlopen_self_static in yes|no) enable_dlopen_self_static=$lt_cv_dlopen_self_static ;; *) enable_dlopen_self_static=unknown ;; esac fi striplib= old_striplib= { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stripping libraries is possible" >&5 printf %s "checking whether stripping libraries is possible... " >&6; } if test -z "$STRIP"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } else if $STRIP -V 2>&1 | $GREP "GNU strip" >/dev/null; then old_striplib="$STRIP --strip-debug" striplib="$STRIP --strip-unneeded" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } else case $host_os in darwin*) # FIXME - insert some real tests, host_os isn't really good enough striplib="$STRIP -x" old_striplib="$STRIP -S" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } ;; freebsd*) if $STRIP -V 2>&1 | $GREP "elftoolchain" >/dev/null; then old_striplib="$STRIP --strip-debug" striplib="$STRIP --strip-unneeded" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: yes" >&5 printf "%s\n" "yes" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi ;; *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } ;; esac fi fi # Report what library types will actually be built { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if libtool supports shared libraries" >&5 printf %s "checking if libtool supports shared libraries... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $can_build_shared" >&5 printf "%s\n" "$can_build_shared" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether to build shared libraries" >&5 printf %s "checking whether to build shared libraries... " >&6; } test no = "$can_build_shared" && enable_shared=no # On AIX, shared libraries and static libraries use the same namespace, and # are all built from PIC. case $host_os in aix3*) test yes = "$enable_shared" && enable_static=no if test -n "$RANLIB"; then archive_cmds="$archive_cmds~\$RANLIB \$lib" postinstall_cmds='$RANLIB $lib' fi ;; aix[4-9]*) if test ia64 != "$host_cpu"; then case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in yes,aix,yes) ;; # shared object as lib.so file only yes,svr4,*) ;; # shared object as lib.so archive member only yes,*) enable_static=no ;; # shared object in lib.a archive as well esac fi ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $enable_shared" >&5 printf "%s\n" "$enable_shared" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether to build static libraries" >&5 printf %s "checking whether to build static libraries... " >&6; } # Make sure either enable_shared or enable_static is yes. test yes = "$enable_shared" || enable_static=yes { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $enable_static" >&5 printf "%s\n" "$enable_static" >&6; } fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu CC=$lt_save_CC if test -n "$CXX" && ( test no != "$CXX" && ( (test g++ = "$CXX" && `g++ -v >/dev/null 2>&1` ) || (test g++ != "$CXX"))); then ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to run the C++ preprocessor" >&5 printf %s "checking how to run the C++ preprocessor... " >&6; } if test -z "$CXXCPP"; then if test ${ac_cv_prog_CXXCPP+y} then : printf %s "(cached) " >&6 else case e in #( e) # Double quotes because $CXX needs to be expanded for CXXCPP in "$CXX -E" cpp /lib/cpp do ac_preproc_ok=false for ac_cxx_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include Syntax error _ACEOF if ac_fn_cxx_try_cpp "$LINENO" then : else case e in #( e) # Broken: fails on valid input. continue ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_cxx_try_cpp "$LINENO" then : # Broken: success on invalid input. continue else case e in #( e) # Passes both tests. ac_preproc_ok=: break ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of 'break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok then : break fi done ac_cv_prog_CXXCPP=$CXXCPP ;; esac fi CXXCPP=$ac_cv_prog_CXXCPP else ac_cv_prog_CXXCPP=$CXXCPP fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $CXXCPP" >&5 printf "%s\n" "$CXXCPP" >&6; } ac_preproc_ok=false for ac_cxx_preproc_warn_flag in '' yes do # Use a header file that comes with gcc, so configuring glibc # with a fresh cross-compiler works. # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. "Syntax error" is here to catch this case. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include Syntax error _ACEOF if ac_fn_cxx_try_cpp "$LINENO" then : else case e in #( e) # Broken: fails on valid input. continue ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext # OK, works on sane cases. Now check whether nonexistent headers # can be detected and how. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_cxx_try_cpp "$LINENO" then : # Broken: success on invalid input. continue else case e in #( e) # Passes both tests. ac_preproc_ok=: break ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext done # Because of 'break', _AC_PREPROC_IFELSE's cleaning code was skipped. rm -f conftest.i conftest.err conftest.$ac_ext if $ac_preproc_ok then : else case e in #( e) { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "C++ preprocessor \"$CXXCPP\" fails sanity check See 'config.log' for more details" "$LINENO" 5; } ;; esac fi ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu else _lt_caught_CXX_error=yes fi ac_ext=cpp ac_cpp='$CXXCPP $CPPFLAGS' ac_compile='$CXX -c $CXXFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CXX -o conftest$ac_exeext $CXXFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_cxx_compiler_gnu archive_cmds_need_lc_CXX=no allow_undefined_flag_CXX= always_export_symbols_CXX=no archive_expsym_cmds_CXX= compiler_needs_object_CXX=no export_dynamic_flag_spec_CXX= hardcode_direct_CXX=no hardcode_direct_absolute_CXX=no hardcode_libdir_flag_spec_CXX= hardcode_libdir_separator_CXX= hardcode_minus_L_CXX=no hardcode_shlibpath_var_CXX=unsupported hardcode_automatic_CXX=no inherit_rpath_CXX=no module_cmds_CXX= module_expsym_cmds_CXX= link_all_deplibs_CXX=unknown old_archive_cmds_CXX=$old_archive_cmds reload_flag_CXX=$reload_flag reload_cmds_CXX=$reload_cmds no_undefined_flag_CXX= whole_archive_flag_spec_CXX= enable_shared_with_static_runtimes_CXX=no # Source file extension for C++ test sources. ac_ext=cpp # Object file extension for compiled C++ test sources. objext=o objext_CXX=$objext # No sense in running all these tests if we already determined that # the CXX compiler isn't working. Some variables (like enable_shared) # are currently assumed to apply to all compilers on this platform, # and will be corrupted by setting them based on a non-working compiler. if test yes != "$_lt_caught_CXX_error"; then # Code to be used in simple compile tests lt_simple_compile_test_code="int some_variable = 0;" # Code to be used in simple link tests lt_simple_link_test_code='int main(int, char *[]) { return(0); }' # ltmain only uses $CC for tagged configurations so make sure $CC is set. # If no C compiler was specified, use CC. LTCC=${LTCC-"$CC"} # If no C compiler flags were specified, use CFLAGS. LTCFLAGS=${LTCFLAGS-"$CFLAGS"} # Allow CC to be a program name with arguments. compiler=$CC # save warnings/boilerplate of simple test code ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" >conftest.$ac_ext eval "$ac_compile" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_compiler_boilerplate=`cat conftest.err` $RM conftest* ac_outfile=conftest.$ac_objext echo "$lt_simple_link_test_code" >conftest.$ac_ext eval "$ac_link" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_linker_boilerplate=`cat conftest.err` $RM -r conftest* # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_CFLAGS=$CFLAGS lt_save_LD=$LD lt_save_GCC=$GCC GCC=$GXX lt_save_with_gnu_ld=$with_gnu_ld lt_save_path_LD=$lt_cv_path_LD if test -n "${lt_cv_prog_gnu_ldcxx+set}"; then lt_cv_prog_gnu_ld=$lt_cv_prog_gnu_ldcxx else $as_unset lt_cv_prog_gnu_ld fi if test -n "${lt_cv_path_LDCXX+set}"; then lt_cv_path_LD=$lt_cv_path_LDCXX else $as_unset lt_cv_path_LD fi test -z "${LDCXX+set}" || LD=$LDCXX CC=${CXX-"c++"} CFLAGS=$CXXFLAGS compiler=$CC compiler_CXX=$CC func_cc_basename $compiler cc_basename=$func_cc_basename_result if test -n "$compiler"; then # We don't want -fno-exception when compiling C++ code, so set the # no_builtin_flag separately if test yes = "$GXX"; then lt_prog_compiler_no_builtin_flag_CXX=' -fno-builtin' else lt_prog_compiler_no_builtin_flag_CXX= fi if test yes = "$GXX"; then # Set up default GNU C++ configuration # Check whether --with-gnu-ld was given. if test ${with_gnu_ld+y} then : withval=$with_gnu_ld; test no = "$withval" || with_gnu_ld=yes else case e in #( e) with_gnu_ld=no ;; esac fi ac_prog=ld if test yes = "$GCC"; then # Check if gcc -print-prog-name=ld gives a path. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for ld used by $CC" >&5 printf %s "checking for ld used by $CC... " >&6; } case $host in *-*-mingw*) # gcc leaves a trailing carriage return, which upsets mingw ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;; *) ac_prog=`($CC -print-prog-name=ld) 2>&5` ;; esac case $ac_prog in # Accept absolute paths. [\\/]* | ?:[\\/]*) re_direlt='/[^/][^/]*/\.\./' # Canonicalize the pathname of ld ac_prog=`$ECHO "$ac_prog"| $SED 's%\\\\%/%g'` while $ECHO "$ac_prog" | $GREP "$re_direlt" > /dev/null 2>&1; do ac_prog=`$ECHO $ac_prog| $SED "s%$re_direlt%/%"` done test -z "$LD" && LD=$ac_prog ;; "") # If it fails, then pretend we aren't using GCC. ac_prog=ld ;; *) # If it is relative, then search for the first ld in PATH. with_gnu_ld=unknown ;; esac elif test yes = "$with_gnu_ld"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for GNU ld" >&5 printf %s "checking for GNU ld... " >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for non-GNU ld" >&5 printf %s "checking for non-GNU ld... " >&6; } fi if test ${lt_cv_path_LD+y} then : printf %s "(cached) " >&6 else case e in #( e) if test -z "$LD"; then lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR for ac_dir in $PATH; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then lt_cv_path_LD=$ac_dir/$ac_prog # Check to see if the program is GNU ld. I'd rather use --version, # but apparently some variants of GNU ld only accept -v. # Break only if it was the GNU/non-GNU ld that we prefer. case `"$lt_cv_path_LD" -v 2>&1 &5 printf "%s\n" "$LD" >&6; } else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: no" >&5 printf "%s\n" "no" >&6; } fi test -z "$LD" && as_fn_error $? "no acceptable ld found in \$PATH" "$LINENO" 5 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if the linker ($LD) is GNU ld" >&5 printf %s "checking if the linker ($LD) is GNU ld... " >&6; } if test ${lt_cv_prog_gnu_ld+y} then : printf %s "(cached) " >&6 else case e in #( e) # I'd rather use --version here, but apparently some GNU lds only accept -v. case `$LD -v 2>&1 &5 printf "%s\n" "$lt_cv_prog_gnu_ld" >&6; } with_gnu_ld=$lt_cv_prog_gnu_ld # Check if GNU C++ uses GNU ld as the underlying linker, since the # archiving commands below assume that GNU ld is being used. if test yes = "$with_gnu_ld"; then archive_cmds_CXX='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' export_dynamic_flag_spec_CXX='$wl--export-dynamic' # If archive_cmds runs LD, not CC, wlarc should be empty # XXX I think wlarc can be eliminated in ltcf-cxx, but I need to # investigate it a little bit more. (MM) wlarc='$wl' # ancient GNU ld didn't support --whole-archive et. al. if eval "`$CC -print-prog-name=ld` --help 2>&1" | $GREP 'no-whole-archive' > /dev/null; then whole_archive_flag_spec_CXX=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' else whole_archive_flag_spec_CXX= fi else with_gnu_ld=no wlarc= # A generic and very simple default shared library creation # command for GNU C++ for the case where it uses the native # linker, instead of GNU ld. If possible, this setting should # overridden to take advantage of the native linker features on # the platform it is being used on. archive_cmds_CXX='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib' fi # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else GXX=no with_gnu_ld=no wlarc= fi # PORTME: fill in a description of your system's C++ link characteristics { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the $compiler linker ($LD) supports shared libraries" >&5 printf %s "checking whether the $compiler linker ($LD) supports shared libraries... " >&6; } ld_shlibs_CXX=yes case $host_os in aix3*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; aix[4-9]*) if test ia64 = "$host_cpu"; then # On IA64, the linker does run time linking by default, so we don't # have to do anything special. aix_use_runtimelinking=no exp_sym_flag='-Bexport' no_entry_flag= else aix_use_runtimelinking=no # Test if we are trying to use run time linking or normal # AIX style linking. If -brtl is somewhere in LDFLAGS, we # have runtime linking enabled, and use it for executables. # For shared libraries, we enable/disable runtime linking # depending on the kind of the shared library created - # when "with_aix_soname,aix_use_runtimelinking" is: # "aix,no" lib.a(lib.so.V) shared, rtl:no, for executables # "aix,yes" lib.so shared, rtl:yes, for executables # lib.a static archive # "both,no" lib.so.V(shr.o) shared, rtl:yes # lib.a(lib.so.V) shared, rtl:no, for executables # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a(lib.so.V) shared, rtl:no # "svr4,*" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a static archive case $host_os in aix4.[23]|aix4.[23].*|aix[5-9]*) for ld_flag in $LDFLAGS; do case $ld_flag in *-brtl*) aix_use_runtimelinking=yes break ;; esac done if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then # With aix-soname=svr4, we create the lib.so.V shared archives only, # so we don't have lib.a shared libs to link our executables. # We have to force runtime linking in this case. aix_use_runtimelinking=yes LDFLAGS="$LDFLAGS -Wl,-brtl" fi ;; esac exp_sym_flag='-bexport' no_entry_flag='-bnoentry' fi # When large executables or shared objects are built, AIX ld can # have problems creating the table of contents. If linking a library # or program results in "error TOC overflow" add -mminimal-toc to # CXXFLAGS/CFLAGS for g++/gcc. In the cases where that is not # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS. archive_cmds_CXX='' hardcode_direct_CXX=yes hardcode_direct_absolute_CXX=yes hardcode_libdir_separator_CXX=':' link_all_deplibs_CXX=yes file_list_spec_CXX='$wl-f,' case $with_aix_soname,$aix_use_runtimelinking in aix,*) ;; # no import file svr4,* | *,yes) # use import file # The Import File defines what to hardcode. hardcode_direct_CXX=no hardcode_direct_absolute_CXX=no ;; esac if test yes = "$GXX"; then case $host_os in aix4.[012]|aix4.[012].*) # We only want to do this on AIX 4.2 and lower, the check # below for broken collect2 doesn't work under 4.3+ collect2name=`$CC -print-prog-name=collect2` if test -f "$collect2name" && strings "$collect2name" | $GREP resolve_lib_name >/dev/null then # We have reworked collect2 : else # We have old collect2 hardcode_direct_CXX=unsupported # It fails to find uninstalled libraries when the uninstalled # path is not listed in the libpath. Setting hardcode_minus_L # to unsupported forces relinking hardcode_minus_L_CXX=yes hardcode_libdir_flag_spec_CXX='-L$libdir' hardcode_libdir_separator_CXX= fi esac shared_flag='-shared' if test yes = "$aix_use_runtimelinking"; then shared_flag=$shared_flag' $wl-G' fi # Need to ensure runtime linking is disabled for the traditional # shared library, or the linker may eventually find shared libraries # /with/ Import File - we do not want to mix them. shared_flag_aix='-shared' shared_flag_svr4='-shared $wl-G' else # not using gcc if test ia64 = "$host_cpu"; then # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release # chokes on -Wl,-G. The following line is correct: shared_flag='-G' else if test yes = "$aix_use_runtimelinking"; then shared_flag='$wl-G' else shared_flag='$wl-bM:SRE' fi shared_flag_aix='$wl-bM:SRE' shared_flag_svr4='$wl-G' fi fi export_dynamic_flag_spec_CXX='$wl-bexpall' # It seems that -bexpall does not export symbols beginning with # underscore (_), so it is better to generate a list of symbols to # export. always_export_symbols_CXX=yes if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then # Warning - without using the other runtime loading flags (-brtl), # -berok will link without error, but may produce a broken library. # The "-G" linker flag allows undefined symbols. no_undefined_flag_CXX='-bernotok' # Determine the default libpath from the value encoded in an empty # executable. if test set = "${lt_cv_aix_libpath+set}"; then aix_libpath=$lt_cv_aix_libpath else if test ${lt_cv_aix_libpath__CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO" then : lt_aix_libpath_sed=' /Import File Strings/,/^$/ { /^0/ { s/^0 *\([^ ]*\) *$/\1/ p } }' lt_cv_aix_libpath__CXX=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` # Check for a 64-bit object if we didn't find anything. if test -z "$lt_cv_aix_libpath__CXX"; then lt_cv_aix_libpath__CXX=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext if test -z "$lt_cv_aix_libpath__CXX"; then lt_cv_aix_libpath__CXX=/usr/lib:/lib fi ;; esac fi aix_libpath=$lt_cv_aix_libpath__CXX fi hardcode_libdir_flag_spec_CXX='$wl-blibpath:$libdir:'"$aix_libpath" archive_expsym_cmds_CXX='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag else if test ia64 = "$host_cpu"; then hardcode_libdir_flag_spec_CXX='$wl-R $libdir:/usr/lib:/lib' allow_undefined_flag_CXX="-z nodefs" archive_expsym_cmds_CXX="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols" else # Determine the default libpath from the value encoded in an # empty executable. if test set = "${lt_cv_aix_libpath+set}"; then aix_libpath=$lt_cv_aix_libpath else if test ${lt_cv_aix_libpath__CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO" then : lt_aix_libpath_sed=' /Import File Strings/,/^$/ { /^0/ { s/^0 *\([^ ]*\) *$/\1/ p } }' lt_cv_aix_libpath__CXX=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` # Check for a 64-bit object if we didn't find anything. if test -z "$lt_cv_aix_libpath__CXX"; then lt_cv_aix_libpath__CXX=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext if test -z "$lt_cv_aix_libpath__CXX"; then lt_cv_aix_libpath__CXX=/usr/lib:/lib fi ;; esac fi aix_libpath=$lt_cv_aix_libpath__CXX fi hardcode_libdir_flag_spec_CXX='$wl-blibpath:$libdir:'"$aix_libpath" # Warning - without using the other run time loading flags, # -berok will link without error, but may produce a broken library. no_undefined_flag_CXX=' $wl-bernotok' allow_undefined_flag_CXX=' $wl-berok' if test yes = "$with_gnu_ld"; then # We only use this code for GNU lds that support --whole-archive. whole_archive_flag_spec_CXX='$wl--whole-archive$convenience $wl--no-whole-archive' else # Exported symbols can be pulled into shared objects from archives whole_archive_flag_spec_CXX='$convenience' fi archive_cmds_need_lc_CXX=yes archive_expsym_cmds_CXX='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d' # -brtl affects multiple linker settings, -berok does not and is overridden later compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([, ]\\)%-berok\\1%g"`' if test svr4 != "$with_aix_soname"; then # This is similar to how AIX traditionally builds its shared # libraries. Need -bnortl late, we may have -brtl in LDFLAGS. archive_expsym_cmds_CXX="$archive_expsym_cmds_CXX"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname' fi if test aix != "$with_aix_soname"; then archive_expsym_cmds_CXX="$archive_expsym_cmds_CXX"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp' else # used by -dlpreopen to get the symbols archive_expsym_cmds_CXX="$archive_expsym_cmds_CXX"'~$MV $output_objdir/$realname.d/$soname $output_objdir' fi archive_expsym_cmds_CXX="$archive_expsym_cmds_CXX"'~$RM -r $output_objdir/$realname.d' fi fi ;; beos*) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then allow_undefined_flag_CXX=unsupported # Joseph Beckenbach says some releases of gcc # support --undefined. This deserves some investigation. FIXME archive_cmds_CXX='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' else ld_shlibs_CXX=no fi ;; chorus*) case $cc_basename in *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac ;; cygwin* | mingw* | pw32* | cegcc*) case $GXX,$cc_basename in ,cl* | no,cl* | ,icl* | no,icl*) # Native MSVC or ICC # hardcode_libdir_flag_spec is actually meaningless, as there is # no search path for DLLs. hardcode_libdir_flag_spec_CXX=' ' allow_undefined_flag_CXX=unsupported always_export_symbols_CXX=yes file_list_spec_CXX='@' # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. archive_cmds_CXX='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames=' archive_expsym_cmds_CXX='if test DEF = "`$SED -n -e '\''s/^[ ]*//'\'' -e '\''/^\(;.*\)*$/d'\'' -e '\''s/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p'\'' -e q $export_symbols`" ; then cp "$export_symbols" "$output_objdir/$soname.def"; echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp"; else $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp; fi~ $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~ linknames=' # The linker will not automatically build a static lib if we build a DLL. # _LT_TAGVAR(old_archive_from_new_cmds, CXX)='true' enable_shared_with_static_runtimes_CXX=yes # Don't use ranlib old_postinstall_cmds_CXX='chmod 644 $oldlib' postlink_cmds_CXX='lt_outputfile="@OUTPUT@"~ lt_tool_outputfile="@TOOL_OUTPUT@"~ case $lt_outputfile in *.exe|*.EXE) ;; *) lt_outputfile=$lt_outputfile.exe lt_tool_outputfile=$lt_tool_outputfile.exe ;; esac~ func_to_tool_file "$lt_outputfile"~ if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1; $RM "$lt_outputfile.manifest"; fi' ;; *) # g++ # _LT_TAGVAR(hardcode_libdir_flag_spec, CXX) is actually meaningless, # as there is no search path for DLLs. hardcode_libdir_flag_spec_CXX='-L$libdir' export_dynamic_flag_spec_CXX='$wl--export-all-symbols' allow_undefined_flag_CXX=unsupported always_export_symbols_CXX=no enable_shared_with_static_runtimes_CXX=yes if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then archive_cmds_CXX='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' # If the export-symbols file already is a .def file, use it as # is; otherwise, prepend EXPORTS... archive_expsym_cmds_CXX='if test DEF = "`$SED -n -e '\''s/^[ ]*//'\'' -e '\''/^\(;.*\)*$/d'\'' -e '\''s/^\(EXPORTS\|LIBRARY\)\([ ].*\)*$/DEF/p'\'' -e q $export_symbols`" ; then cp $export_symbols $output_objdir/$soname.def; else echo EXPORTS > $output_objdir/$soname.def; cat $export_symbols >> $output_objdir/$soname.def; fi~ $CC -shared -nostdlib $output_objdir/$soname.def $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' else ld_shlibs_CXX=no fi ;; esac ;; darwin* | rhapsody*) archive_cmds_need_lc_CXX=no hardcode_direct_CXX=no hardcode_automatic_CXX=yes hardcode_shlibpath_var_CXX=unsupported if test yes = "$lt_cv_ld_force_load"; then whole_archive_flag_spec_CXX='`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience $wl-force_load,$conv\"; done; func_echo_all \"$new_convenience\"`' else whole_archive_flag_spec_CXX='' fi link_all_deplibs_CXX=yes allow_undefined_flag_CXX=$_lt_dar_allow_undefined case $cc_basename in ifort*|nagfor*) _lt_dar_can_shared=yes ;; *) _lt_dar_can_shared=$GCC ;; esac if test yes = "$_lt_dar_can_shared"; then output_verbose_link_cmd=func_echo_all archive_cmds_CXX="\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dsymutil" module_cmds_CXX="\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dsymutil" archive_expsym_cmds_CXX="$SED 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dar_export_syms$_lt_dsymutil" module_expsym_cmds_CXX="$SED -e 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dar_export_syms$_lt_dsymutil" if test yes != "$lt_cv_apple_cc_single_mod"; then archive_cmds_CXX="\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dsymutil" archive_expsym_cmds_CXX="$SED 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dar_export_syms$_lt_dsymutil" fi else ld_shlibs_CXX=no fi ;; os2*) hardcode_libdir_flag_spec_CXX='-L$libdir' hardcode_minus_L_CXX=yes allow_undefined_flag_CXX=unsupported shrext_cmds=.dll archive_cmds_CXX='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' archive_expsym_cmds_CXX='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' old_archive_From_new_cmds_CXX='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' enable_shared_with_static_runtimes_CXX=yes file_list_spec_CXX='@' ;; dgux*) case $cc_basename in ec++*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; ghcx*) # Green Hills C++ Compiler # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac ;; freebsd2.*) # C++ shared libraries reported to be fairly broken before # switch to ELF ld_shlibs_CXX=no ;; freebsd-elf*) archive_cmds_need_lc_CXX=no ;; freebsd* | dragonfly* | midnightbsd*) # FreeBSD 3 and later use GNU C++ and GNU ld with standard ELF # conventions ld_shlibs_CXX=yes ;; haiku*) archive_cmds_CXX='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' link_all_deplibs_CXX=yes ;; hpux9*) hardcode_libdir_flag_spec_CXX='$wl+b $wl$libdir' hardcode_libdir_separator_CXX=: export_dynamic_flag_spec_CXX='$wl-E' hardcode_direct_CXX=yes hardcode_minus_L_CXX=yes # Not in the search PATH, # but as the default # location of the library. case $cc_basename in CC*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; aCC*) archive_cmds_CXX='$RM $output_objdir/$soname~$CC -b $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $EGREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes = "$GXX"; then archive_cmds_CXX='$RM $output_objdir/$soname~$CC -shared -nostdlib $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' else # FIXME: insert proper C++ library support ld_shlibs_CXX=no fi ;; esac ;; hpux10*|hpux11*) if test no = "$with_gnu_ld"; then hardcode_libdir_flag_spec_CXX='$wl+b $wl$libdir' hardcode_libdir_separator_CXX=: case $host_cpu in hppa*64*|ia64*) ;; *) export_dynamic_flag_spec_CXX='$wl-E' ;; esac fi case $host_cpu in hppa*64*|ia64*) hardcode_direct_CXX=no hardcode_shlibpath_var_CXX=no ;; *) hardcode_direct_CXX=yes hardcode_direct_absolute_CXX=yes hardcode_minus_L_CXX=yes # Not in the search PATH, # but as the default # location of the library. ;; esac case $cc_basename in CC*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; aCC*) case $host_cpu in hppa*64*) archive_cmds_CXX='$CC -b $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; ia64*) archive_cmds_CXX='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; *) archive_cmds_CXX='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; esac # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $GREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes = "$GXX"; then if test no = "$with_gnu_ld"; then case $host_cpu in hppa*64*) archive_cmds_CXX='$CC -shared -nostdlib -fPIC $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; ia64*) archive_cmds_CXX='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; *) archive_cmds_CXX='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; esac fi else # FIXME: insert proper C++ library support ld_shlibs_CXX=no fi ;; esac ;; interix[3-9]*) hardcode_direct_CXX=no hardcode_shlibpath_var_CXX=no hardcode_libdir_flag_spec_CXX='$wl-rpath,$libdir' export_dynamic_flag_spec_CXX='$wl-E' # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc. # Instead, shared libraries are loaded at an image base (0x10000000 by # default) and relocated if they conflict, which is a slow very memory # consuming and fragmenting process. To avoid this, we pick a random, # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link # time. Moving up from 0x10000000 also allows more sbrk(2) space. archive_cmds_CXX='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' archive_expsym_cmds_CXX='$SED "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' ;; irix5* | irix6*) case $cc_basename in CC*) # SGI C++ archive_cmds_CXX='$CC -shared -all -multigot $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' # Archives containing C++ object files must be created using # "CC -ar", where "CC" is the IRIX C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. old_archive_cmds_CXX='$CC -ar -WR,-u -o $oldlib $oldobjs' ;; *) if test yes = "$GXX"; then if test no = "$with_gnu_ld"; then archive_cmds_CXX='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' else archive_cmds_CXX='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` -o $lib' fi fi link_all_deplibs_CXX=yes ;; esac hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' hardcode_libdir_separator_CXX=: inherit_rpath_CXX=yes ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in KCC*) # Kuck and Associates, Inc. (KAI) C++ Compiler # KCC will only create a shared library if the output file # ends with ".so" (or ".sl" for HP-UX), so rename the library # to its proper name (with version) after linking. archive_cmds_CXX='tempext=`echo $shared_ext | $SED -e '\''s/\([^()0-9A-Za-z{}]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib' archive_expsym_cmds_CXX='tempext=`echo $shared_ext | $SED -e '\''s/\([^()0-9A-Za-z{}]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib $wl-retain-symbols-file,$export_symbols; mv \$templib $lib' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1 | $GREP "ld"`; rm -f libconftest$shared_ext; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' hardcode_libdir_flag_spec_CXX='$wl-rpath,$libdir' export_dynamic_flag_spec_CXX='$wl--export-dynamic' # Archives containing C++ object files must be created using # "CC -Bstatic", where "CC" is the KAI C++ compiler. old_archive_cmds_CXX='$CC -Bstatic -o $oldlib $oldobjs' ;; icpc* | ecpc* ) # Intel C++ with_gnu_ld=yes # version 8.0 and above of icpc choke on multiply defined symbols # if we add $predep_objects and $postdep_objects, however 7.1 and # earlier do not add the objects themselves. case `$CC -V 2>&1` in *"Version 7."*) archive_cmds_CXX='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; *) # Version 8.0 or newer tmp_idyn= case $host_cpu in ia64*) tmp_idyn=' -i_dynamic';; esac archive_cmds_CXX='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; esac archive_cmds_need_lc_CXX=no hardcode_libdir_flag_spec_CXX='$wl-rpath,$libdir' export_dynamic_flag_spec_CXX='$wl--export-dynamic' whole_archive_flag_spec_CXX='$wl--whole-archive$convenience $wl--no-whole-archive' ;; pgCC* | pgcpp*) # Portland Group C++ compiler case `$CC -V` in *pgCC\ [1-5].* | *pgcpp\ [1-5].*) prelink_cmds_CXX='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $objs $libobjs $compile_deplibs~ compile_command="$compile_command `find $tpldir -name \*.o | sort | $NL2SP`"' old_archive_cmds_CXX='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $oldobjs$old_deplibs~ $AR $AR_FLAGS $oldlib$oldobjs$old_deplibs `find $tpldir -name \*.o | sort | $NL2SP`~ $RANLIB $oldlib' archive_cmds_CXX='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~ $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~ $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; *) # Version 6 and above use weak symbols archive_cmds_CXX='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; esac hardcode_libdir_flag_spec_CXX='$wl--rpath $wl$libdir' export_dynamic_flag_spec_CXX='$wl--export-dynamic' whole_archive_flag_spec_CXX='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' ;; cxx*) # Compaq C++ archive_cmds_CXX='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' archive_expsym_cmds_CXX='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib $wl-retain-symbols-file $wl$export_symbols' runpath_var=LD_RUN_PATH hardcode_libdir_flag_spec_CXX='-rpath $libdir' hardcode_libdir_separator_CXX=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld .*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "X$list" | $Xsed' ;; xl* | mpixl* | bgxl*) # IBM XL 8.0 on PPC, with GNU ld hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' export_dynamic_flag_spec_CXX='$wl--export-dynamic' archive_cmds_CXX='$CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' if test yes = "$supports_anon_versioning"; then archive_expsym_cmds_CXX='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib' fi ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C++ 5.9 no_undefined_flag_CXX=' -zdefs' archive_cmds_CXX='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' archive_expsym_cmds_CXX='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file $wl$export_symbols' hardcode_libdir_flag_spec_CXX='-R$libdir' whole_archive_flag_spec_CXX='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' compiler_needs_object_CXX=yes # Not sure whether something based on # $CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1 # would be better. output_verbose_link_cmd='func_echo_all' # Archives containing C++ object files must be created using # "CC -xar", where "CC" is the Sun C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. old_archive_cmds_CXX='$CC -xar -o $oldlib $oldobjs' ;; esac ;; esac ;; lynxos*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; m88k*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; mvs*) case $cc_basename in cxx*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then archive_cmds_CXX='$LD -Bshareable -o $lib $predep_objects $libobjs $deplibs $postdep_objects $linker_flags' wlarc= hardcode_libdir_flag_spec_CXX='-R$libdir' hardcode_direct_CXX=yes hardcode_shlibpath_var_CXX=no fi # Workaround some broken pre-1.5 toolchains output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP conftest.$objext | $SED -e "s:-lgcc -lc -lgcc::"' ;; *nto* | *qnx*) ld_shlibs_CXX=yes ;; openbsd* | bitrig*) if test -f /usr/libexec/ld.so; then hardcode_direct_CXX=yes hardcode_shlibpath_var_CXX=no hardcode_direct_absolute_CXX=yes archive_cmds_CXX='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib' hardcode_libdir_flag_spec_CXX='$wl-rpath,$libdir' if test -z "`echo __ELF__ | $CC -E - | grep __ELF__`"; then archive_expsym_cmds_CXX='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file,$export_symbols -o $lib' export_dynamic_flag_spec_CXX='$wl-E' whole_archive_flag_spec_CXX=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' fi output_verbose_link_cmd=func_echo_all else ld_shlibs_CXX=no fi ;; osf3* | osf4* | osf5*) case $cc_basename in KCC*) # Kuck and Associates, Inc. (KAI) C++ Compiler # KCC will only create a shared library if the output file # ends with ".so" (or ".sl" for HP-UX), so rename the library # to its proper name (with version) after linking. archive_cmds_CXX='tempext=`echo $shared_ext | $SED -e '\''s/\([^()0-9A-Za-z{}]\)/\\\\\1/g'\''`; templib=`echo "$lib" | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib' hardcode_libdir_flag_spec_CXX='$wl-rpath,$libdir' hardcode_libdir_separator_CXX=: # Archives containing C++ object files must be created using # the KAI C++ compiler. case $host in osf3*) old_archive_cmds_CXX='$CC -Bstatic -o $oldlib $oldobjs' ;; *) old_archive_cmds_CXX='$CC -o $oldlib $oldobjs' ;; esac ;; RCC*) # Rational C++ 2.4.1 # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; cxx*) case $host in osf3*) allow_undefined_flag_CXX=' $wl-expect_unresolved $wl\*' archive_cmds_CXX='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $soname `test -n "$verstring" && func_echo_all "$wl-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' ;; *) allow_undefined_flag_CXX=' -expect_unresolved \*' archive_cmds_CXX='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' archive_expsym_cmds_CXX='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done~ echo "-hidden">> $lib.exp~ $CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname $wl-input $wl$lib.exp `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~ $RM $lib.exp' hardcode_libdir_flag_spec_CXX='-rpath $libdir' ;; esac hardcode_libdir_separator_CXX=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld" | $GREP -v "ld:"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld.*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes,no = "$GXX,$with_gnu_ld"; then allow_undefined_flag_CXX=' $wl-expect_unresolved $wl\*' case $host in osf3*) archive_cmds_CXX='$CC -shared -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' ;; *) archive_cmds_CXX='$CC -shared $pic_flag -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' ;; esac hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' hardcode_libdir_separator_CXX=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else # FIXME: insert proper C++ library support ld_shlibs_CXX=no fi ;; esac ;; psos*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; sunos4*) case $cc_basename in CC*) # Sun C++ 4.x # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; lcc*) # Lucid # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac ;; solaris*) case $cc_basename in CC* | sunCC*) # Sun C++ 4.2, 5.x and Centerline C++ archive_cmds_need_lc_CXX=yes no_undefined_flag_CXX=' -zdefs' archive_cmds_CXX='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' archive_expsym_cmds_CXX='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G$allow_undefined_flag $wl-M $wl$lib.exp -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' hardcode_libdir_flag_spec_CXX='-R$libdir' hardcode_shlibpath_var_CXX=no case $host_os in solaris2.[0-5] | solaris2.[0-5].*) ;; *) # The compiler driver will combine and reorder linker options, # but understands '-z linker_flag'. # Supported since Solaris 2.6 (maybe 2.5.1?) whole_archive_flag_spec_CXX='-z allextract$convenience -z defaultextract' ;; esac link_all_deplibs_CXX=yes output_verbose_link_cmd='func_echo_all' # Archives containing C++ object files must be created using # "CC -xar", where "CC" is the Sun C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. old_archive_cmds_CXX='$CC -xar -o $oldlib $oldobjs' ;; gcx*) # Green Hills C++ Compiler archive_cmds_CXX='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' # The C++ compiler must be used to create the archive. old_archive_cmds_CXX='$CC $LDFLAGS -archive -o $oldlib $oldobjs' ;; *) # GNU C++ compiler with Solaris linker if test yes,no = "$GXX,$with_gnu_ld"; then no_undefined_flag_CXX=' $wl-z ${wl}defs' if $CC --version | $GREP -v '^2\.7' > /dev/null; then archive_cmds_CXX='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' archive_expsym_cmds_CXX='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -shared $pic_flag -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else # g++ 2.7 appears to require '-G' NOT '-shared' on this # platform. archive_cmds_CXX='$CC -G -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' archive_expsym_cmds_CXX='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -G $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' fi hardcode_libdir_flag_spec_CXX='$wl-R $wl$libdir' case $host_os in solaris2.[0-5] | solaris2.[0-5].*) ;; *) whole_archive_flag_spec_CXX='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract' ;; esac fi ;; esac ;; sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[01].[10]* | unixware7* | sco3.2v5.0.[024]*) no_undefined_flag_CXX='$wl-z,text' archive_cmds_need_lc_CXX=no hardcode_shlibpath_var_CXX=no runpath_var='LD_RUN_PATH' case $cc_basename in CC*) archive_cmds_CXX='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds_CXX='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; *) archive_cmds_CXX='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds_CXX='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; sysv5* | sco3.2v5* | sco5v6*) # Note: We CANNOT use -z defs as we might desire, because we do not # link with -lc, and that would cause any symbols used from libc to # always be unresolved, which means just about no library would # ever link correctly. If we're not using GNU ld we use -z text # though, which does catch some bad symbols but isn't as heavy-handed # as -z defs. no_undefined_flag_CXX='$wl-z,text' allow_undefined_flag_CXX='$wl-z,nodefs' archive_cmds_need_lc_CXX=no hardcode_shlibpath_var_CXX=no hardcode_libdir_flag_spec_CXX='$wl-R,$libdir' hardcode_libdir_separator_CXX=':' link_all_deplibs_CXX=yes export_dynamic_flag_spec_CXX='$wl-Bexport' runpath_var='LD_RUN_PATH' case $cc_basename in CC*) archive_cmds_CXX='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds_CXX='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' old_archive_cmds_CXX='$CC -Tprelink_objects $oldobjs~ '"$old_archive_cmds_CXX" reload_cmds_CXX='$CC -Tprelink_objects $reload_objs~ '"$reload_cmds_CXX" ;; *) archive_cmds_CXX='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' archive_expsym_cmds_CXX='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; tandem*) case $cc_basename in NCC*) # NonStop-UX NCC 3.20 # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac ;; vxworks*) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; *) # FIXME: insert proper C++ library support ld_shlibs_CXX=no ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ld_shlibs_CXX" >&5 printf "%s\n" "$ld_shlibs_CXX" >&6; } test no = "$ld_shlibs_CXX" && can_build_shared=no GCC_CXX=$GXX LD_CXX=$LD ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... # Dependencies to place before and after the object being linked: predep_objects_CXX= postdep_objects_CXX= predeps_CXX= postdeps_CXX= compiler_lib_search_path_CXX= cat > conftest.$ac_ext <<_LT_EOF class Foo { public: Foo (void) { a = 0; } private: int a; }; _LT_EOF _lt_libdeps_save_CFLAGS=$CFLAGS case "$CC $CFLAGS " in #( *\ -flto*\ *) CFLAGS="$CFLAGS -fno-lto" ;; *\ -fwhopr*\ *) CFLAGS="$CFLAGS -fno-whopr" ;; *\ -fuse-linker-plugin*\ *) CFLAGS="$CFLAGS -fno-use-linker-plugin" ;; esac if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then # Parse the compiler output and extract the necessary # objects, libraries and library flags. # Sentinel used to keep track of whether or not we are before # the conftest object file. pre_test_object_deps_done=no for p in `eval "$output_verbose_link_cmd"`; do case $prev$p in -L* | -R* | -l*) # Some compilers place space between "-{L,R}" and the path. # Remove the space. if test x-L = "$p" || test x-R = "$p"; then prev=$p continue fi # Expand the sysroot to ease extracting the directories later. if test -z "$prev"; then case $p in -L*) func_stripname_cnf '-L' '' "$p"; prev=-L; p=$func_stripname_result ;; -R*) func_stripname_cnf '-R' '' "$p"; prev=-R; p=$func_stripname_result ;; -l*) func_stripname_cnf '-l' '' "$p"; prev=-l; p=$func_stripname_result ;; esac fi case $p in =*) func_stripname_cnf '=' '' "$p"; p=$lt_sysroot$func_stripname_result ;; esac if test no = "$pre_test_object_deps_done"; then case $prev in -L | -R) # Internal compiler library paths should come after those # provided the user. The postdeps already come after the # user supplied libs so there is no need to process them. if test -z "$compiler_lib_search_path_CXX"; then compiler_lib_search_path_CXX=$prev$p else compiler_lib_search_path_CXX="${compiler_lib_search_path_CXX} $prev$p" fi ;; # The "-l" case would never come before the object being # linked, so don't bother handling this case. esac else if test -z "$postdeps_CXX"; then postdeps_CXX=$prev$p else postdeps_CXX="${postdeps_CXX} $prev$p" fi fi prev= ;; *.lto.$objext) ;; # Ignore GCC LTO objects *.$objext) # This assumes that the test object file only shows up # once in the compiler output. if test "$p" = "conftest.$objext"; then pre_test_object_deps_done=yes continue fi if test no = "$pre_test_object_deps_done"; then if test -z "$predep_objects_CXX"; then predep_objects_CXX=$p else predep_objects_CXX="$predep_objects_CXX $p" fi else if test -z "$postdep_objects_CXX"; then postdep_objects_CXX=$p else postdep_objects_CXX="$postdep_objects_CXX $p" fi fi ;; *) ;; # Ignore the rest. esac done # Clean up. rm -f a.out a.exe else echo "libtool.m4: error: problem compiling CXX test program" fi $RM -f confest.$objext CFLAGS=$_lt_libdeps_save_CFLAGS # PORTME: override above test on systems where it is broken case $host_os in interix[3-9]*) # Interix 3.5 installs completely hosed .la files for C++, so rather than # hack all around it, let's just trust "g++" to DTRT. predep_objects_CXX= postdep_objects_CXX= postdeps_CXX= ;; esac case " $postdeps_CXX " in *" -lc "*) archive_cmds_need_lc_CXX=no ;; esac compiler_lib_search_dirs_CXX= if test -n "${compiler_lib_search_path_CXX}"; then compiler_lib_search_dirs_CXX=`echo " ${compiler_lib_search_path_CXX}" | $SED -e 's! -L! !g' -e 's!^ !!'` fi lt_prog_compiler_wl_CXX= lt_prog_compiler_pic_CXX= lt_prog_compiler_static_CXX= # C++ specific cases for pic, static, wl, etc. if test yes = "$GXX"; then lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_static_CXX='-static' case $host_os in aix*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor lt_prog_compiler_static_CXX='-Bstatic' fi lt_prog_compiler_pic_CXX='-fPIC' ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support lt_prog_compiler_pic_CXX='-fPIC' ;; m68k) # FIXME: we need at least 68020 code to build shared libraries, but # adding the '-m68020' flag to GCC prevents building anything better, # like '-m68040'. lt_prog_compiler_pic_CXX='-m68020 -resident32 -malways-restore-a4' ;; esac ;; beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*) # PIC is the default for these OSes. ;; mingw* | cygwin* | os2* | pw32* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). # Although the cygwin gcc ignores -fPIC, still need this for old-style # (--disable-auto-import) libraries lt_prog_compiler_pic_CXX='-DDLL_EXPORT' case $host_os in os2*) lt_prog_compiler_static_CXX='$wl-static' ;; esac ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files lt_prog_compiler_pic_CXX='-fno-common' ;; *djgpp*) # DJGPP does not support shared libraries at all lt_prog_compiler_pic_CXX= ;; haiku*) # PIC is the default for Haiku. # The "-static" flag exists, but is broken. lt_prog_compiler_static_CXX= ;; interix[3-9]*) # Interix 3.x gcc -fpic/-fPIC options generate broken code. # Instead, we relocate shared libraries at runtime. ;; sysv4*MP*) if test -d /usr/nec; then lt_prog_compiler_pic_CXX=-Kconform_pic fi ;; hpux*) # PIC is the default for 64-bit PA HP-UX, but not for 32-bit # PA HP-UX. On IA64 HP-UX, PIC is the default but the pic flag # sets the default TLS model and affects inlining. case $host_cpu in hppa*64*) ;; *) lt_prog_compiler_pic_CXX='-fPIC' ;; esac ;; *qnx* | *nto*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. lt_prog_compiler_pic_CXX='-fPIC -shared' ;; *) lt_prog_compiler_pic_CXX='-fPIC' ;; esac else case $host_os in aix[4-9]*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor lt_prog_compiler_static_CXX='-Bstatic' else lt_prog_compiler_static_CXX='-bnso -bI:/lib/syscalls.exp' fi ;; chorus*) case $cc_basename in cxch68*) # Green Hills C++ Compiler # _LT_TAGVAR(lt_prog_compiler_static, CXX)="--no_auto_instantiation -u __main -u __premain -u _abort -r $COOL_DIR/lib/libOrb.a $MVME_DIR/lib/CC/libC.a $MVME_DIR/lib/classix/libcx.s.a" ;; esac ;; mingw* | cygwin* | os2* | pw32* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). lt_prog_compiler_pic_CXX='-DDLL_EXPORT' ;; dgux*) case $cc_basename in ec++*) lt_prog_compiler_pic_CXX='-KPIC' ;; ghcx*) # Green Hills C++ Compiler lt_prog_compiler_pic_CXX='-pic' ;; *) ;; esac ;; freebsd* | dragonfly* | midnightbsd*) # FreeBSD uses GNU C++ ;; hpux9* | hpux10* | hpux11*) case $cc_basename in CC*) lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_static_CXX='$wl-a ${wl}archive' if test ia64 != "$host_cpu"; then lt_prog_compiler_pic_CXX='+Z' fi ;; aCC*) lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_static_CXX='$wl-a ${wl}archive' case $host_cpu in hppa*64*|ia64*) # +Z the default ;; *) lt_prog_compiler_pic_CXX='+Z' ;; esac ;; *) ;; esac ;; interix*) # This is c89, which is MS Visual C++ (no shared libs) # Anyone wants to do a port? ;; irix5* | irix6* | nonstopux*) case $cc_basename in CC*) lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_static_CXX='-non_shared' # CC pic flag -KPIC is the default. ;; *) ;; esac ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in KCC*) # KAI C++ Compiler lt_prog_compiler_wl_CXX='--backend -Wl,' lt_prog_compiler_pic_CXX='-fPIC' ;; ecpc* ) # old Intel C++ for x86_64, which still supported -KPIC. lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_pic_CXX='-KPIC' lt_prog_compiler_static_CXX='-static' ;; icpc* ) # Intel C++, used to be incompatible with GCC. # ICC 10 doesn't accept -KPIC any more. lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_pic_CXX='-fPIC' lt_prog_compiler_static_CXX='-static' ;; pgCC* | pgcpp*) # Portland Group C++ compiler lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_pic_CXX='-fpic' lt_prog_compiler_static_CXX='-Bstatic' ;; cxx*) # Compaq C++ # Make sure the PIC flag is empty. It appears that all Alpha # Linux and Compaq Tru64 Unix objects are PIC. lt_prog_compiler_pic_CXX= lt_prog_compiler_static_CXX='-non_shared' ;; xlc* | xlC* | bgxl[cC]* | mpixl[cC]*) # IBM XL 8.0, 9.0 on PPC and BlueGene lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_pic_CXX='-qpic' lt_prog_compiler_static_CXX='-qstaticlink' ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C++ 5.9 lt_prog_compiler_pic_CXX='-KPIC' lt_prog_compiler_static_CXX='-Bstatic' lt_prog_compiler_wl_CXX='-Qoption ld ' ;; esac ;; esac ;; lynxos*) ;; m88k*) ;; mvs*) case $cc_basename in cxx*) lt_prog_compiler_pic_CXX='-W c,exportall' ;; *) ;; esac ;; netbsd*) ;; *qnx* | *nto*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. lt_prog_compiler_pic_CXX='-fPIC -shared' ;; osf3* | osf4* | osf5*) case $cc_basename in KCC*) lt_prog_compiler_wl_CXX='--backend -Wl,' ;; RCC*) # Rational C++ 2.4.1 lt_prog_compiler_pic_CXX='-pic' ;; cxx*) # Digital/Compaq C++ lt_prog_compiler_wl_CXX='-Wl,' # Make sure the PIC flag is empty. It appears that all Alpha # Linux and Compaq Tru64 Unix objects are PIC. lt_prog_compiler_pic_CXX= lt_prog_compiler_static_CXX='-non_shared' ;; *) ;; esac ;; psos*) ;; solaris*) case $cc_basename in CC* | sunCC*) # Sun C++ 4.2, 5.x and Centerline C++ lt_prog_compiler_pic_CXX='-KPIC' lt_prog_compiler_static_CXX='-Bstatic' lt_prog_compiler_wl_CXX='-Qoption ld ' ;; gcx*) # Green Hills C++ Compiler lt_prog_compiler_pic_CXX='-PIC' ;; *) ;; esac ;; sunos4*) case $cc_basename in CC*) # Sun C++ 4.x lt_prog_compiler_pic_CXX='-pic' lt_prog_compiler_static_CXX='-Bstatic' ;; lcc*) # Lucid lt_prog_compiler_pic_CXX='-pic' ;; *) ;; esac ;; sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*) case $cc_basename in CC*) lt_prog_compiler_wl_CXX='-Wl,' lt_prog_compiler_pic_CXX='-KPIC' lt_prog_compiler_static_CXX='-Bstatic' ;; esac ;; tandem*) case $cc_basename in NCC*) # NonStop-UX NCC 3.20 lt_prog_compiler_pic_CXX='-KPIC' ;; *) ;; esac ;; vxworks*) ;; *) lt_prog_compiler_can_build_shared_CXX=no ;; esac fi case $host_os in # For platforms that do not support PIC, -DPIC is meaningless: *djgpp*) lt_prog_compiler_pic_CXX= ;; *) lt_prog_compiler_pic_CXX="$lt_prog_compiler_pic_CXX -DPIC" ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $compiler option to produce PIC" >&5 printf %s "checking for $compiler option to produce PIC... " >&6; } if test ${lt_cv_prog_compiler_pic_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_pic_CXX=$lt_prog_compiler_pic_CXX ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic_CXX" >&5 printf "%s\n" "$lt_cv_prog_compiler_pic_CXX" >&6; } lt_prog_compiler_pic_CXX=$lt_cv_prog_compiler_pic_CXX # # Check to make sure the PIC flag actually works. # if test -n "$lt_prog_compiler_pic_CXX"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler PIC flag $lt_prog_compiler_pic_CXX works" >&5 printf %s "checking if $compiler PIC flag $lt_prog_compiler_pic_CXX works... " >&6; } if test ${lt_cv_prog_compiler_pic_works_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_pic_works_CXX=no ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="$lt_prog_compiler_pic_CXX -DPIC" ## exclude from sc_useless_quotes_in_assignment # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. # The option is referenced via a variable to avoid confusing sed. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings other than the usual output. $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler_pic_works_CXX=yes fi fi $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_pic_works_CXX" >&5 printf "%s\n" "$lt_cv_prog_compiler_pic_works_CXX" >&6; } if test yes = "$lt_cv_prog_compiler_pic_works_CXX"; then case $lt_prog_compiler_pic_CXX in "" | " "*) ;; *) lt_prog_compiler_pic_CXX=" $lt_prog_compiler_pic_CXX" ;; esac else lt_prog_compiler_pic_CXX= lt_prog_compiler_can_build_shared_CXX=no fi fi # # Check to make sure the static flag actually works. # wl=$lt_prog_compiler_wl_CXX eval lt_tmp_static_flag=\"$lt_prog_compiler_static_CXX\" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler static flag $lt_tmp_static_flag works" >&5 printf %s "checking if $compiler static flag $lt_tmp_static_flag works... " >&6; } if test ${lt_cv_prog_compiler_static_works_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_static_works_CXX=no save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS $lt_tmp_static_flag" echo "$lt_simple_link_test_code" > conftest.$ac_ext if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then # The linker can only warn and ignore the option if not recognized # So say no if there are warnings if test -s conftest.err; then # Append any errors to the config.log. cat conftest.err 1>&5 $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if diff conftest.exp conftest.er2 >/dev/null; then lt_cv_prog_compiler_static_works_CXX=yes fi else lt_cv_prog_compiler_static_works_CXX=yes fi fi $RM -r conftest* LDFLAGS=$save_LDFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_static_works_CXX" >&5 printf "%s\n" "$lt_cv_prog_compiler_static_works_CXX" >&6; } if test yes = "$lt_cv_prog_compiler_static_works_CXX"; then : else lt_prog_compiler_static_CXX= fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5 printf %s "checking if $compiler supports -c -o file.$ac_objext... " >&6; } if test ${lt_cv_prog_compiler_c_o_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_c_o_CXX=no $RM -r conftest 2>/dev/null mkdir conftest cd conftest mkdir out echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-o out/conftest2.$ac_objext" # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2 if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then lt_cv_prog_compiler_c_o_CXX=yes fi fi chmod u+w . 2>&5 $RM conftest* # SGI C++ compiler will create directory out/ii_files/ for # template instantiation test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files $RM out/* && rmdir out cd .. $RM -r conftest $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o_CXX" >&5 printf "%s\n" "$lt_cv_prog_compiler_c_o_CXX" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if $compiler supports -c -o file.$ac_objext" >&5 printf %s "checking if $compiler supports -c -o file.$ac_objext... " >&6; } if test ${lt_cv_prog_compiler_c_o_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_prog_compiler_c_o_CXX=no $RM -r conftest 2>/dev/null mkdir conftest cd conftest mkdir out echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-o out/conftest2.$ac_objext" # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [^ ]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&5) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&5 echo "$as_me:$LINENO: \$? = $ac_status" >&5 if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2 if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then lt_cv_prog_compiler_c_o_CXX=yes fi fi chmod u+w . 2>&5 $RM conftest* # SGI C++ compiler will create directory out/ii_files/ for # template instantiation test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files $RM out/* && rmdir out cd .. $RM -r conftest $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_prog_compiler_c_o_CXX" >&5 printf "%s\n" "$lt_cv_prog_compiler_c_o_CXX" >&6; } hard_links=nottested if test no = "$lt_cv_prog_compiler_c_o_CXX" && test no != "$need_locks"; then # do not overwrite the value of need_locks provided by the user { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking if we can lock with hard links" >&5 printf %s "checking if we can lock with hard links... " >&6; } hard_links=yes $RM conftest* ln conftest.a conftest.b 2>/dev/null && hard_links=no touch conftest.a ln conftest.a conftest.b 2>&5 || hard_links=no ln conftest.a conftest.b 2>/dev/null && hard_links=no { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $hard_links" >&5 printf "%s\n" "$hard_links" >&6; } if test no = "$hard_links"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&5 printf "%s\n" "$as_me: WARNING: '$CC' does not support '-c -o', so 'make -j' may be unsafe" >&2;} need_locks=warn fi else need_locks=no fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the $compiler linker ($LD) supports shared libraries" >&5 printf %s "checking whether the $compiler linker ($LD) supports shared libraries... " >&6; } export_symbols_cmds_CXX='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' exclude_expsyms_CXX='_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*' case $host_os in aix[4-9]*) # If we're using GNU nm, then we don't want the "-C" option. # -C means demangle to GNU nm, but means don't demangle to AIX nm. # Without the "-l" option, or with the "-B" option, AIX nm treats # weak defined symbols like other global defined symbols, whereas # GNU nm marks them as "W". # While the 'weak' keyword is ignored in the Export File, we need # it in the Import File for the 'aix-soname' feature, so we have # to replace the "-B" option with "-P" for AIX nm. if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then export_symbols_cmds_CXX='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && (substr(\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols' else export_symbols_cmds_CXX='`func_echo_all $NM | $SED -e '\''s/B\([^B]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "L") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && (substr(\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols' fi ;; pw32*) export_symbols_cmds_CXX=$ltdll_cmds ;; cygwin* | mingw* | cegcc*) case $cc_basename in cl* | icl*) exclude_expsyms_CXX='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*' ;; *) export_symbols_cmds_CXX='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[BCDGRS][ ]/s/.*[ ]\([^ ]*\)/\1 DATA/;s/^.*[ ]__nm__\([^ ]*\)[ ][^ ]*/\1 DATA/;/^I[ ]/d;/^[AITW][ ]/s/.* //'\'' | sort | uniq > $export_symbols' exclude_expsyms_CXX='[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname' ;; esac ;; *) export_symbols_cmds_CXX='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ld_shlibs_CXX" >&5 printf "%s\n" "$ld_shlibs_CXX" >&6; } test no = "$ld_shlibs_CXX" && can_build_shared=no with_gnu_ld_CXX=$with_gnu_ld # # Do we need to explicitly link libc? # case "x$archive_cmds_need_lc_CXX" in x|xyes) # Assume -lc should be added archive_cmds_need_lc_CXX=yes if test yes,yes = "$GCC,$enable_shared"; then case $archive_cmds_CXX in *'~'*) # FIXME: we may have to deal with multi-command sequences. ;; '$CC '*) # Test whether the compiler implicitly links with -lc since on some # systems, -lgcc has to come before -lc. If gcc already passes -lc # to ld, don't add -lc before -lgcc. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether -lc should be explicitly linked in" >&5 printf %s "checking whether -lc should be explicitly linked in... " >&6; } if test ${lt_cv_archive_cmds_need_lc_CXX+y} then : printf %s "(cached) " >&6 else case e in #( e) $RM conftest* echo "$lt_simple_compile_test_code" > conftest.$ac_ext if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_compile\""; } >&5 (eval $ac_compile) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } 2>conftest.err; then soname=conftest lib=conftest libobjs=conftest.$ac_objext deplibs= wl=$lt_prog_compiler_wl_CXX pic_flag=$lt_prog_compiler_pic_CXX compiler_flags=-v linker_flags=-v verstring= output_objdir=. libname=conftest lt_save_allow_undefined_flag=$allow_undefined_flag_CXX allow_undefined_flag_CXX= if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$archive_cmds_CXX 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1\""; } >&5 (eval $archive_cmds_CXX 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } then lt_cv_archive_cmds_need_lc_CXX=no else lt_cv_archive_cmds_need_lc_CXX=yes fi allow_undefined_flag_CXX=$lt_save_allow_undefined_flag else cat conftest.err 1>&5 fi $RM conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $lt_cv_archive_cmds_need_lc_CXX" >&5 printf "%s\n" "$lt_cv_archive_cmds_need_lc_CXX" >&6; } archive_cmds_need_lc_CXX=$lt_cv_archive_cmds_need_lc_CXX ;; esac fi ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking dynamic linker characteristics" >&5 printf %s "checking dynamic linker characteristics... " >&6; } library_names_spec= libname_spec='lib$name' soname_spec= shrext_cmds=.so postinstall_cmds= postuninstall_cmds= finish_cmds= finish_eval= shlibpath_var= shlibpath_overrides_runpath=unknown version_type=none dynamic_linker="$host_os ld.so" sys_lib_dlsearch_path_spec="/lib /usr/lib" need_lib_prefix=unknown hardcode_into_libs=no # when you set need_version to no, make sure it does not cause -set_version # flags to be left without arguments need_version=unknown case $host_os in aix3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname.a' shlibpath_var=LIBPATH # AIX 3 has no versioning support, so we append a major version to the name. soname_spec='$libname$release$shared_ext$major' ;; aix[4-9]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no hardcode_into_libs=yes if test ia64 = "$host_cpu"; then # AIX 5 supports IA64 library_names_spec='$libname$release$shared_ext$major $libname$release$shared_ext$versuffix $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH else # With GCC up to 2.95.x, collect2 would create an import file # for dependence libraries. The import file would start with # the line '#! .'. This would cause the generated library to # depend on '.', always an invalid library. This was fixed in # development snapshots of GCC prior to 3.0. case $host_os in aix4 | aix4.[01] | aix4.[01].*) if { echo '#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 97)' echo ' yes ' echo '#endif'; } | $CC -E - | $GREP yes > /dev/null; then : else can_build_shared=no fi ;; esac # Using Import Files as archive members, it is possible to support # filename-based versioning of shared library archives on AIX. While # this would work for both with and without runtime linking, it will # prevent static linking of such archives. So we do filename-based # shared library versioning with .so extension only, which is used # when both runtime linking and shared linking is enabled. # Unfortunately, runtime linking may impact performance, so we do # not want this to be the default eventually. Also, we use the # versioned .so libs for executables only if there is the -brtl # linker flag in LDFLAGS as well, or --with-aix-soname=svr4 only. # To allow for filename-based versioning support, we need to create # libNAME.so.V as an archive file, containing: # *) an Import File, referring to the versioned filename of the # archive as well as the shared archive member, telling the # bitwidth (32 or 64) of that shared object, and providing the # list of exported symbols of that shared object, eventually # decorated with the 'weak' keyword # *) the shared object with the F_LOADONLY flag set, to really avoid # it being seen by the linker. # At run time we better use the real file rather than another symlink, # but for link time we create the symlink libNAME.so -> libNAME.so.V case $with_aix_soname,$aix_use_runtimelinking in # AIX (on Power*) has no versioning support, so currently we cannot hardcode correct # soname into executable. Probably we can add versioning support to # collect2, so additional links can be useful in future. aix,yes) # traditional libtool dynamic_linker='AIX unversionable lib.so' # If using run time linking (on AIX 4.2 or later) use lib.so # instead of lib.a to let people know that these are not # typical AIX shared libraries. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; aix,no) # traditional AIX only dynamic_linker='AIX lib.a(lib.so.V)' # We preserve .a as extension for shared libraries through AIX4.2 # and later when we are not doing run time linking. library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' ;; svr4,*) # full svr4 only dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o)" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,yes) # both, prefer svr4 dynamic_linker="AIX lib.so.V($shared_archive_member_spec.o), lib.a(lib.so.V)" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # unpreferred sharedlib libNAME.a needs extra handling postinstall_cmds='test -n "$linkname" || linkname="$realname"~func_stripname "" ".so" "$linkname"~$install_shared_prog "$dir/$func_stripname_result.$libext" "$destdir/$func_stripname_result.$libext"~test -z "$tstripme" || test -z "$striplib" || $striplib "$destdir/$func_stripname_result.$libext"' postuninstall_cmds='for n in $library_names $old_library; do :; done~func_stripname "" ".so" "$n"~test "$func_stripname_result" = "$n" || func_append rmfiles " $odir/$func_stripname_result.$libext"' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,no) # both, prefer aix dynamic_linker="AIX lib.a(lib.so.V), lib.so.V($shared_archive_member_spec.o)" library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' # unpreferred sharedlib libNAME.so.V and symlink libNAME.so need extra handling postinstall_cmds='test -z "$dlname" || $install_shared_prog $dir/$dlname $destdir/$dlname~test -z "$tstripme" || test -z "$striplib" || $striplib $destdir/$dlname~test -n "$linkname" || linkname=$realname~func_stripname "" ".a" "$linkname"~(cd "$destdir" && $LN_S -f $dlname $func_stripname_result.so)' postuninstall_cmds='test -z "$dlname" || func_append rmfiles " $odir/$dlname"~for n in $old_library $library_names; do :; done~func_stripname "" ".a" "$n"~func_append rmfiles " $odir/$func_stripname_result.so"' ;; esac shlibpath_var=LIBPATH fi ;; amigaos*) case $host_cpu in powerpc) # Since July 2007 AmigaOS4 officially supports .so libraries. # When compiling the executable, add -use-dynld -Lsobjs: to the compileline. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; m68k) library_names_spec='$libname.ixlibrary $libname.a' # Create ${libname}_ixlibrary.a entries in /sys/libs. finish_eval='for lib in `ls $libdir/*.ixlibrary 2>/dev/null`; do libname=`func_echo_all "$lib" | $SED '\''s%^.*/\([^/]*\)\.ixlibrary$%\1%'\''`; $RM /sys/libs/${libname}_ixlibrary.a; $show "cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a"; cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a || exit 1; done' ;; esac ;; beos*) library_names_spec='$libname$shared_ext' dynamic_linker="$host_os ld.so" shlibpath_var=LIBRARY_PATH ;; bsdi[45]*) version_type=linux # correct to gnu/linux during the next big refactor need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/shlib /usr/lib /usr/X11/lib /usr/contrib/lib /lib /usr/local/lib" sys_lib_dlsearch_path_spec="/shlib /usr/lib /usr/local/lib" # the default ld.so.conf also contains /usr/contrib/lib and # /usr/X11R6/lib (/usr/X11 is a link to /usr/X11R6), but let us allow # libtool to hard-code these into programs ;; cygwin* | mingw* | pw32* | cegcc*) version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no case $GCC,$cc_basename in yes,*) # gcc library_names_spec='$libname.dll.a' # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes case $host_os in cygwin*) # Cygwin DLLs use 'cyg' prefix rather than 'lib' soname_spec='`echo $libname | $SED -e 's/^lib/cyg/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' ;; mingw* | cegcc*) # MinGW DLLs use traditional 'lib' prefix soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' ;; pw32*) # pw32 DLLs use 'pw' prefix rather than 'lib' library_names_spec='`echo $libname | $SED -e 's/^lib/pw/'``echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' ;; esac dynamic_linker='Win32 ld.exe' ;; *,cl* | *,icl*) # Native MSVC or ICC libname_spec='$name' soname_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext' library_names_spec='$libname.dll.lib' case $build_os in mingw*) sys_lib_search_path_spec= lt_save_ifs=$IFS IFS=';' for lt_path in $LIB do IFS=$lt_save_ifs # Let DOS variable expansion print the short 8.3 style file name. lt_path=`cd "$lt_path" 2>/dev/null && cmd //C "for %i in (".") do @echo %~si"` sys_lib_search_path_spec="$sys_lib_search_path_spec $lt_path" done IFS=$lt_save_ifs # Convert to MSYS style. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's|\\\\|/|g' -e 's| \\([a-zA-Z]\\):| /\\1|g' -e 's|^ ||'` ;; cygwin*) # Convert to unix form, then to dos form, then back to unix form # but this time dos style (no spaces!) so that the unix form looks # like /cygdrive/c/PROGRA~1:/cygdr... sys_lib_search_path_spec=`cygpath --path --unix "$LIB"` sys_lib_search_path_spec=`cygpath --path --dos "$sys_lib_search_path_spec" 2>/dev/null` sys_lib_search_path_spec=`cygpath --path --unix "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` ;; *) sys_lib_search_path_spec=$LIB if $ECHO "$sys_lib_search_path_spec" | $GREP ';[c-zC-Z]:/' >/dev/null; then # It is most probably a Windows format PATH. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's/;/ /g'` else sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` fi # FIXME: find the short name or the path components, as spaces are # common. (e.g. "Program Files" -> "PROGRA~1") ;; esac # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes dynamic_linker='Win32 link.exe' ;; *) # Assume MSVC and ICC wrapper library_names_spec='$libname`echo $release | $SED -e 's/[.]/-/g'`$versuffix$shared_ext $libname.lib' dynamic_linker='Win32 ld.exe' ;; esac # FIXME: first we should search . and the directory the executable is in shlibpath_var=PATH ;; darwin* | rhapsody*) dynamic_linker="$host_os dyld" version_type=darwin need_lib_prefix=no need_version=no library_names_spec='$libname$release$major$shared_ext $libname$shared_ext' soname_spec='$libname$release$major$shared_ext' shlibpath_overrides_runpath=yes shlibpath_var=DYLD_LIBRARY_PATH shrext_cmds='`test .$module = .yes && echo .so || echo .dylib`' sys_lib_dlsearch_path_spec='/usr/local/lib /lib /usr/lib' ;; dgux*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; freebsd* | dragonfly* | midnightbsd*) # DragonFly does not have aout. When/if they implement a new # versioning mechanism, adjust this. if test -x /usr/bin/objformat; then objformat=`/usr/bin/objformat` else case $host_os in freebsd[23].*) objformat=aout ;; *) objformat=elf ;; esac fi version_type=freebsd-$objformat case $version_type in freebsd-elf*) library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' need_version=no need_lib_prefix=no ;; freebsd-*) library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' need_version=yes ;; esac case $host_cpu in powerpc64) # On FreeBSD bi-arch platforms, a different variable is used for 32-bit # binaries. See . cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int test_pointer_size[sizeof (void *) - 5]; _ACEOF if ac_fn_cxx_try_compile "$LINENO" then : shlibpath_var=LD_LIBRARY_PATH else case e in #( e) shlibpath_var=LD_32_LIBRARY_PATH ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; *) shlibpath_var=LD_LIBRARY_PATH ;; esac case $host_os in freebsd2.*) shlibpath_overrides_runpath=yes ;; freebsd3.[01]* | freebsdelf3.[01]*) shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; freebsd3.[2-9]* | freebsdelf3.[2-9]* | \ freebsd4.[0-5] | freebsdelf4.[0-5] | freebsd4.1.1 | freebsdelf4.1.1) shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; *) # from 4.6 on, and DragonFly shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; esac ;; haiku*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no dynamic_linker="$host_os runtime_loader" library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LIBRARY_PATH shlibpath_overrides_runpath=no sys_lib_dlsearch_path_spec='/boot/home/config/lib /boot/common/lib /boot/system/lib' hardcode_into_libs=yes ;; hpux9* | hpux10* | hpux11*) # Give a soname corresponding to the major version so that dld.sl refuses to # link against other versions. version_type=sunos need_lib_prefix=no need_version=no case $host_cpu in ia64*) shrext_cmds='.so' hardcode_into_libs=yes dynamic_linker="$host_os dld.so" shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' if test 32 = "$HPUX_IA64_MODE"; then sys_lib_search_path_spec="/usr/lib/hpux32 /usr/local/lib/hpux32 /usr/local/lib" sys_lib_dlsearch_path_spec=/usr/lib/hpux32 else sys_lib_search_path_spec="/usr/lib/hpux64 /usr/local/lib/hpux64" sys_lib_dlsearch_path_spec=/usr/lib/hpux64 fi ;; hppa*64*) shrext_cmds='.sl' hardcode_into_libs=yes dynamic_linker="$host_os dld.sl" shlibpath_var=LD_LIBRARY_PATH # How should we handle SHLIB_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' sys_lib_search_path_spec="/usr/lib/pa20_64 /usr/ccs/lib/pa20_64" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; *) shrext_cmds='.sl' dynamic_linker="$host_os dld.sl" shlibpath_var=SHLIB_PATH shlibpath_overrides_runpath=no # +s is required to enable SHLIB_PATH library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' ;; esac # HP-UX runs *really* slowly unless shared libraries are mode 555, ... postinstall_cmds='chmod 555 $lib' # or fails outright, so override atomically: install_override_mode=555 ;; interix[3-9]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='Interix 3.x ld.so.1 (PE, like ELF)' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; irix5* | irix6* | nonstopux*) case $host_os in nonstopux*) version_type=nonstopux ;; *) if test yes = "$lt_cv_prog_gnu_ld"; then version_type=linux # correct to gnu/linux during the next big refactor else version_type=irix fi ;; esac need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$release$shared_ext $libname$shared_ext' case $host_os in irix5* | nonstopux*) libsuff= shlibsuff= ;; *) case $LD in # libtool.m4 will add one of these switches to LD *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ") libsuff= shlibsuff= libmagic=32-bit;; *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ") libsuff=32 shlibsuff=N32 libmagic=N32;; *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ") libsuff=64 shlibsuff=64 libmagic=64-bit;; *) libsuff= shlibsuff= libmagic=never-match;; esac ;; esac shlibpath_var=LD_LIBRARY${shlibsuff}_PATH shlibpath_overrides_runpath=no sys_lib_search_path_spec="/usr/lib$libsuff /lib$libsuff /usr/local/lib$libsuff" sys_lib_dlsearch_path_spec="/usr/lib$libsuff /lib$libsuff" hardcode_into_libs=yes ;; # No shared lib support for Linux oldld, aout, or coff. linux*oldld* | linux*aout* | linux*coff*) dynamic_linker=no ;; linux*android*) version_type=none # Android doesn't support versioned libraries. need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext' finish_cmds= shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes dynamic_linker='Android linker' # -rpath works at least for libraries that are not overridden by # libraries installed in system locations. hardcode_libdir_flag_spec_CXX='$wl-rpath $wl$libdir' ;; # This must be glibc/ELF. linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig -n $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no # Some binutils ld are patched to set DT_RUNPATH if test ${lt_cv_shlibpath_overrides_runpath+y} then : printf %s "(cached) " >&6 else case e in #( e) lt_cv_shlibpath_overrides_runpath=no save_LDFLAGS=$LDFLAGS save_libdir=$libdir eval "libdir=/foo; wl=\"$lt_prog_compiler_wl_CXX\"; \ LDFLAGS=\"\$LDFLAGS $hardcode_libdir_flag_spec_CXX\"" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { ; return 0; } _ACEOF if ac_fn_cxx_try_link "$LINENO" then : if ($OBJDUMP -p conftest$ac_exeext) 2>/dev/null | grep "RUNPATH.*$libdir" >/dev/null then : lt_cv_shlibpath_overrides_runpath=yes fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LDFLAGS=$save_LDFLAGS libdir=$save_libdir ;; esac fi shlibpath_overrides_runpath=$lt_cv_shlibpath_overrides_runpath # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes # Ideally, we could use ldconfig to report *all* directores which are # searched for libraries, however this is still not possible. Aside from not # being certain /sbin/ldconfig is available, command # 'ldconfig -N -X -v | grep ^/' on 64bit Fedora does not report /usr/lib64, # even though it is searched at run-time. Try to do the best guess by # appending ld.so.conf contents (and includes) to the search path. if test -f /etc/ld.so.conf; then lt_ld_extra=`awk '/^include / { system(sprintf("cd /etc; cat %s 2>/dev/null", \$2)); skip = 1; } { if (!skip) print \$0; skip = 0; }' < /etc/ld.so.conf | $SED -e 's/#.*//;/^[ ]*hwcap[ ]/d;s/[:, ]/ /g;s/=[^=]*$//;s/=[^= ]* / /g;s/"//g;/^$/d' | tr '\n' ' '` sys_lib_dlsearch_path_spec="/lib /usr/lib $lt_ld_extra" fi # We used to test for /lib/ld.so.1 and disable shared libraries on # powerpc, because MkLinux only supported shared libraries with the # GNU dynamic linker. Since this was broken with cross compilers, # most powerpc-linux boxes support dynamic linking these days and # people can always --disable-shared, the test was removed, and we # assume the GNU/Linux dynamic linker is in use. dynamic_linker='GNU/Linux ld.so' ;; netbsd*) version_type=sunos need_lib_prefix=no need_version=no if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' dynamic_linker='NetBSD (a.out) ld.so' else library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='NetBSD ld.elf_so' fi shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; newsos6) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; *nto* | *qnx*) version_type=qnx need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes dynamic_linker='ldqnx.so' ;; openbsd* | bitrig*) version_type=sunos sys_lib_dlsearch_path_spec=/usr/lib need_lib_prefix=no if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then need_version=no else need_version=yes fi library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; os2*) libname_spec='$name' version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no # OS/2 can only load a DLL with a base name of 8 characters or less. soname_spec='`test -n "$os2dllname" && libname="$os2dllname"; v=$($ECHO $release$versuffix | tr -d .-); n=$($ECHO $libname | cut -b -$((8 - ${#v})) | tr . _); $ECHO $n$v`$shared_ext' library_names_spec='${libname}_dll.$libext' dynamic_linker='OS/2 ld.exe' shlibpath_var=BEGINLIBPATH sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; $ECHO \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; $ECHO \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' ;; osf3* | osf4* | osf5*) version_type=osf need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc /usr/lib /usr/local/lib /var/shlib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; rdos*) dynamic_linker=no ;; solaris*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes # ldd complains unless libraries are executable postinstall_cmds='chmod +x $lib' ;; sunos4*) version_type=sunos library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/usr/etc" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes if test yes = "$with_gnu_ld"; then need_lib_prefix=no fi need_version=yes ;; sysv4 | sysv4.3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH case $host_vendor in sni) shlibpath_overrides_runpath=no need_lib_prefix=no runpath_var=LD_RUN_PATH ;; siemens) need_lib_prefix=no ;; motorola) need_lib_prefix=no need_version=no shlibpath_overrides_runpath=no sys_lib_search_path_spec='/lib /usr/lib /usr/ccs/lib' ;; esac ;; sysv4*MP*) if test -d /usr/nec; then version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$shared_ext.$versuffix $libname$shared_ext.$major $libname$shared_ext' soname_spec='$libname$shared_ext.$major' shlibpath_var=LD_LIBRARY_PATH fi ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*) version_type=sco need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes if test yes = "$with_gnu_ld"; then sys_lib_search_path_spec='/usr/local/lib /usr/gnu/lib /usr/ccs/lib /usr/lib /lib' else sys_lib_search_path_spec='/usr/ccs/lib /usr/lib' case $host_os in sco3.2v5*) sys_lib_search_path_spec="$sys_lib_search_path_spec /lib" ;; esac fi sys_lib_dlsearch_path_spec='/usr/lib' ;; tpf*) # TPF is a cross-target only. Preferred cross-host = GNU/Linux. version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; uts4*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; *) dynamic_linker=no ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $dynamic_linker" >&5 printf "%s\n" "$dynamic_linker" >&6; } test no = "$dynamic_linker" && can_build_shared=no variables_saved_for_relink="PATH $shlibpath_var $runpath_var" if test yes = "$GCC"; then variables_saved_for_relink="$variables_saved_for_relink GCC_EXEC_PREFIX COMPILER_PATH LIBRARY_PATH" fi if test set = "${lt_cv_sys_lib_search_path_spec+set}"; then sys_lib_search_path_spec=$lt_cv_sys_lib_search_path_spec fi if test set = "${lt_cv_sys_lib_dlsearch_path_spec+set}"; then sys_lib_dlsearch_path_spec=$lt_cv_sys_lib_dlsearch_path_spec fi # remember unaugmented sys_lib_dlsearch_path content for libtool script decls... configure_time_dlsearch_path=$sys_lib_dlsearch_path_spec # ... but it needs LT_SYS_LIBRARY_PATH munging for other configure-time code func_munge_path_list sys_lib_dlsearch_path_spec "$LT_SYS_LIBRARY_PATH" # to be used as default LT_SYS_LIBRARY_PATH value in generated libtool configure_time_lt_sys_library_path=$LT_SYS_LIBRARY_PATH { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking how to hardcode library paths into programs" >&5 printf %s "checking how to hardcode library paths into programs... " >&6; } hardcode_action_CXX= if test -n "$hardcode_libdir_flag_spec_CXX" || test -n "$runpath_var_CXX" || test yes = "$hardcode_automatic_CXX"; then # We can hardcode non-existent directories. if test no != "$hardcode_direct_CXX" && # If the only mechanism to avoid hardcoding is shlibpath_var, we # have to relink, otherwise we might link with an installed library # when we should be linking with a yet-to-be-installed one ## test no != "$_LT_TAGVAR(hardcode_shlibpath_var, CXX)" && test no != "$hardcode_minus_L_CXX"; then # Linking always hardcodes the temporary library directory. hardcode_action_CXX=relink else # We can link without hardcoding, and we can hardcode nonexisting dirs. hardcode_action_CXX=immediate fi else # We cannot hardcode anything, or else we can only hardcode existing # directories. hardcode_action_CXX=unsupported fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $hardcode_action_CXX" >&5 printf "%s\n" "$hardcode_action_CXX" >&6; } if test relink = "$hardcode_action_CXX" || test yes = "$inherit_rpath_CXX"; then # Fast installation is not supported enable_fast_install=no elif test yes = "$shlibpath_overrides_runpath" || test no = "$enable_shared"; then # Fast installation is not necessary enable_fast_install=needless fi fi # test -n "$compiler" CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS LDCXX=$LD LD=$lt_save_LD GCC=$lt_save_GCC with_gnu_ld=$lt_save_with_gnu_ld lt_cv_path_LDCXX=$lt_cv_path_LD lt_cv_path_LD=$lt_save_path_LD lt_cv_prog_gnu_ldcxx=$lt_cv_prog_gnu_ld lt_cv_prog_gnu_ld=$lt_save_with_gnu_ld fi # test yes != "$_lt_caught_CXX_error" ac_ext=c ac_cpp='$CPP $CPPFLAGS' ac_compile='$CC -c $CFLAGS $CPPFLAGS conftest.$ac_ext >&5' ac_link='$CC -o conftest$ac_exeext $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS >&5' ac_compiler_gnu=$ac_cv_c_compiler_gnu ac_config_commands="$ac_config_commands libtool" # Only expand once: ac_fn_c_check_header_compile "$LINENO" "unistd.h" "ac_cv_header_unistd_h" "$ac_includes_default" if test "x$ac_cv_header_unistd_h" = xyes then : printf "%s\n" "#define HAVE_UNISTD_H 1" >>confdefs.h fi # Check for mmap(). Don't use AC_FUNC_MMAP, because it checks too much: it # fails on HP-UX 11, because MAP_FIXED mappings do not work. But this is # irrelevant for anonymous mappings. ac_fn_c_check_func "$LINENO" "mmap" "ac_cv_func_mmap" if test "x$ac_cv_func_mmap" = xyes then : gl_have_mmap=yes else case e in #( e) gl_have_mmap=no ;; esac fi # Try to allow MAP_ANONYMOUS. gl_have_mmap_anonymous=no if test $gl_have_mmap = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for MAP_ANONYMOUS" >&5 printf %s "checking for MAP_ANONYMOUS... " >&6; } cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef MAP_ANONYMOUS I cannot identify this map #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "I cannot identify this map" >/dev/null 2>&1 then : gl_have_mmap_anonymous=yes fi rm -rf conftest* if test $gl_have_mmap_anonymous != yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef MAP_ANON I cannot identify this map #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "I cannot identify this map" >/dev/null 2>&1 then : printf "%s\n" "#define MAP_ANONYMOUS MAP_ANON" >>confdefs.h gl_have_mmap_anonymous=yes fi rm -rf conftest* fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_have_mmap_anonymous" >&5 printf "%s\n" "$gl_have_mmap_anonymous" >&6; } if test $gl_have_mmap_anonymous = yes; then printf "%s\n" "#define HAVE_MAP_ANONYMOUS 1" >>confdefs.h fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $CC options needed to detect all undeclared functions" >&5 printf %s "checking for $CC options needed to detect all undeclared functions... " >&6; } if test ${ac_cv_c_undeclared_builtin_options+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_save_CFLAGS=$CFLAGS ac_cv_c_undeclared_builtin_options='cannot detect' for ac_arg in '' -fno-builtin; do CFLAGS="$ac_save_CFLAGS $ac_arg" # This test program should *not* compile successfully. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int main (void) { (void) strchr; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : else case e in #( e) # This test program should compile successfully. # No library function is consistently available on # freestanding implementations, so test against a dummy # declaration. Include always-available headers on the # off chance that they somehow elicit warnings. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include #include extern void ac_decl (int, char *); int main (void) { (void) ac_decl (0, (char *) 0); (void) ac_decl; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : if test x"$ac_arg" = x then : ac_cv_c_undeclared_builtin_options='none needed' else case e in #( e) ac_cv_c_undeclared_builtin_options=$ac_arg ;; esac fi break fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext done CFLAGS=$ac_save_CFLAGS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_undeclared_builtin_options" >&5 printf "%s\n" "$ac_cv_c_undeclared_builtin_options" >&6; } case $ac_cv_c_undeclared_builtin_options in #( 'cannot detect') : { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "cannot make $CC report undeclared builtins See 'config.log' for more details" "$LINENO" 5; } ;; #( 'none needed') : ac_c_undeclared_builtin_options='' ;; #( *) : ac_c_undeclared_builtin_options=$ac_cv_c_undeclared_builtin_options ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether code in malloc()ed memory is executable" >&5 printf %s "checking whether code in malloc()ed memory is executable... " >&6; } if test ${ffcall_cv_codeexec+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$HOST_CPU_C_ABI--$host_os" in hppa--* | hppa64--* | powerpc--aix* | powerpc64--* | ia64--*) ffcall_cv_codeexec="irrelevant" ;; arm64--freebsd*) ffcall_cv_codeexec=no ;; *) if test "$cross_compiling" = yes then : case "$host_os" in cygwin*) case "$HOST_CPU_C_ABI" in i386) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; darwin*) case "$HOST_CPU_C_ABI" in i386 | powerpc) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; irix*) ffcall_cv_codeexec="guessing no" ;; linux*) case "$HOST_CPU_C_ABI" in alpha | ia64) ffcall_cv_codeexec="guessing yes" ;; arm | armhf | arm64 | i386 | mips* | s390 | s390x | sparc | sparc64 | x86_64*) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; solaris*) case "$HOST_CPU_C_ABI" in i386 | sparc | sparc64) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; *) ffcall_cv_codeexec="guessing no" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif #include /* declare malloc() */ #include int fun () { return 31415926; } int main () { nocrash_init(); {long size = (char*)&main - (char*)&fun; char* funcopy = (char*) malloc(size); int i; for (i = 0; i < size; i++) { funcopy[i] = ((char*)&fun)[i]; } return !((*(int(*)())funcopy)() == 31415926); }} _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_codeexec=yes else case e in #( e) ffcall_cv_codeexec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_codeexec" >&5 printf "%s\n" "$ffcall_cv_codeexec" >&6; } case "$ffcall_cv_codeexec" in *yes | irrelevant) printf "%s\n" "#define CODE_EXECUTABLE /**/" >>confdefs.h ;; *no) ;; esac ac_fn_c_check_header_compile "$LINENO" "sys/mman.h" "ac_cv_header_sys_mman_h" "$ac_includes_default" if test "x$ac_cv_header_sys_mman_h" = xyes then : else case e in #( e) no_mmap=1 ;; esac fi if test -z "$no_mmap"; then ac_fn_c_check_func "$LINENO" "mmap" "ac_cv_func_mmap" if test "x$ac_cv_func_mmap" = xyes then : else case e in #( e) no_mmap=1 ;; esac fi if test -z "$no_mmap"; then mmap_prog_1=' #include #ifdef HAVE_UNISTD_H #include #endif #include #include #include int main () { ' mmap_prog_2=' if (mmap(NULL,0x100000,PROT_READ|PROT_WRITE,flags,fd,0) == (void*)-1) exit(1); exit(0); } ' { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working mmap with MAP_ANONYMOUS" >&5 printf %s "checking for working mmap with MAP_ANONYMOUS... " >&6; } if test ${ffcall_cv_func_mmap_anonymous+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in aix* | cygwin* | darwin* | hpux* | linux* | solaris*) ffcall_cv_func_mmap_anonymous="guessing yes" ;; *) ffcall_cv_func_mmap_anonymous="guessing no" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mmap_prog_1 int flags = MAP_ANONYMOUS | MAP_PRIVATE; int fd = -1; nocrash_init(); $mmap_prog_2 _ACEOF if ac_fn_c_try_run "$LINENO" then : have_mmap_anon=1 ffcall_cv_func_mmap_anonymous=yes else case e in #( e) ffcall_cv_func_mmap_anonymous=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_func_mmap_anonymous" >&5 printf "%s\n" "$ffcall_cv_func_mmap_anonymous" >&6; } case "$ffcall_cv_func_mmap_anonymous" in *yes) printf "%s\n" "#define HAVE_MMAP_ANONYMOUS 1" >>confdefs.h ;; *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working mmap of /dev/zero" >&5 printf %s "checking for working mmap of /dev/zero... " >&6; } if test ${ffcall_cv_func_mmap_devzero+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in aix* | cygwin* | hpux* | irix* | linux* | solaris*) ffcall_cv_func_mmap_devzero="guessing yes" ;; *) ffcall_cv_func_mmap_devzero="guessing no" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mmap_prog_1 #ifndef MAP_FILE #define MAP_FILE 0 #endif int flags = MAP_FILE | MAP_PRIVATE; int fd = open("/dev/zero",O_RDONLY,0666); if (fd<0) exit(1); nocrash_init(); $mmap_prog_2 _ACEOF if ac_fn_c_try_run "$LINENO" then : have_mmap_devzero=1 ffcall_cv_func_mmap_devzero=yes else case e in #( e) ffcall_cv_func_mmap_devzero=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_func_mmap_devzero" >&5 printf "%s\n" "$ffcall_cv_func_mmap_devzero" >&6; } case "$ffcall_cv_func_mmap_devzero" in *yes) printf "%s\n" "#define HAVE_MMAP_DEVZERO 1" >>confdefs.h ;; esac ;; esac fi fi ac_fn_c_check_func "$LINENO" "mprotect" "ac_cv_func_mprotect" if test "x$ac_cv_func_mprotect" = xyes then : printf "%s\n" "#define HAVE_MPROTECT 1" >>confdefs.h fi if test $ac_cv_func_mprotect = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working mprotect" >&5 printf %s "checking for working mprotect... " >&6; } if test ${cl_cv_func_mprotect_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $cross_compiling = no; then mprotect_prog=' #include /* Declare malloc(). */ #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mprotect(). */ #include char foo; int main () { unsigned long pagesize = getpagesize(); #define page_align(address) (char*)((unsigned long)(address) & -pagesize) ' if test "$cross_compiling" = yes then : no_mprotect=1 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $mprotect_prog if ((pagesize-1) & pagesize) exit(1); exit(0); } _ACEOF if ac_fn_c_try_run "$LINENO" then : else case e in #( e) no_mprotect=1 ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi mprotect_prog="$mprotect_prog"' char* area = (char*) malloc(6*pagesize); char* fault_address = area + pagesize*7/2; ' if test -z "$no_mprotect"; then if test "$cross_compiling" = yes then : : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0) exit(0); foo = *fault_address; /* this should cause an exception or signal */ exit(0); } _ACEOF if ac_fn_c_try_run "$LINENO" then : no_mprotect=1 fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi if test -z "$no_mprotect"; then if test "$cross_compiling" = yes then : : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0) exit(0); *fault_address = 'z'; /* this should cause an exception or signal */ exit(0); } _ACEOF if ac_fn_c_try_run "$LINENO" then : no_mprotect=1 fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi if test -z "$no_mprotect"; then if test "$cross_compiling" = yes then : : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0) exit(0); *fault_address = 'z'; /* this should cause an exception or signal */ exit(0); } _ACEOF if ac_fn_c_try_run "$LINENO" then : no_mprotect=1 fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi if test -z "$no_mprotect"; then if test "$cross_compiling" = yes then : : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif $mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0) exit(1); if (mprotect(page_align(fault_address),pagesize,PROT_READ|PROT_WRITE) < 0) exit(1); *fault_address = 'z'; /* this should not cause an exception or signal */ exit(0); } _ACEOF if ac_fn_c_try_run "$LINENO" then : else case e in #( e) no_mprotect=1 ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi if test -z "$no_mprotect"; then cl_cv_func_mprotect_works=yes else cl_cv_func_mprotect_works=no fi else case "$host_os" in aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*) cl_cv_func_mprotect_works="guessing yes" ;; mingw* | windows*) cl_cv_func_mprotect_works="guessing no" ;; *) cl_cv_func_mprotect_works="guessing no" ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $cl_cv_func_mprotect_works" >&5 printf "%s\n" "$cl_cv_func_mprotect_works" >&6; } case "$cl_cv_func_mprotect_works" in *yes) printf "%s\n" "#define HAVE_WORKING_MPROTECT 1" >>confdefs.h ;; esac fi case "$ffcall_cv_codeexec" in *yes | irrelevant) ;; *) case "$ac_cv_func_mprotect--$cl_cv_func_mprotect_works" in yes--*yes) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether mprotect can make malloc()ed memory executable" >&5 printf %s "checking whether mprotect can make malloc()ed memory executable... " >&6; } if test ${ffcall_cv_malloc_mprotect_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in linux*) ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime' ;; freebsd* | dragonfly*) ffcall_cv_malloc_mprotect_can_exec='determined by sysctl at runtime' ;; netbsd*) ffcall_cv_malloc_mprotect_can_exec='determined by sysctl at runtime' ;; *) if test "$cross_compiling" = yes then : case "$host_os" in aix* | cygwin* | darwin* | irix* | solaris*) ffcall_cv_malloc_mprotect_can_exec="guessing yes" ;; *) ffcall_cv_malloc_mprotect_can_exec="guessing no" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif #include /* Declare mprotect(). */ #include int main () { unsigned int pagesize = getpagesize (); char *p = (char *) malloc (50); int ret; if (p == (char*) -1) /* malloc is not working as expected. */ return 1; p[5] = 0x77; ret = mprotect (p - ((unsigned int) p & (pagesize - 1)), pagesize, PROT_READ | PROT_WRITE | PROT_EXEC); if (ret < 0 && (errno == EACCES || errno == ENOMEM || errno == ENOTSUP)) /* mprotect is forbidden to make malloc()ed pages executable that were writable earlier. */ return 2; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_malloc_mprotect_can_exec=yes else case e in #( e) ffcall_cv_malloc_mprotect_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_malloc_mprotect_can_exec" >&5 printf "%s\n" "$ffcall_cv_malloc_mprotect_can_exec" >&6; } case "$ffcall_cv_malloc_mprotect_can_exec" in *yes) MPROTECT_AFTER_MALLOC_CAN_EXEC=1 ;; *no) MPROTECT_AFTER_MALLOC_CAN_EXEC=0 ;; *runtime*) MPROTECT_AFTER_MALLOC_CAN_EXEC='-1' ;; esac printf "%s\n" "#define HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC $MPROTECT_AFTER_MALLOC_CAN_EXEC" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether mprotect can make mmap()ed memory executable" >&5 printf %s "checking whether mprotect can make mmap()ed memory executable... " >&6; } if test ${ffcall_cv_mmap_mprotect_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in linux*) ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime' ;; freebsd* | dragonfly*) ffcall_cv_mmap_mprotect_can_exec='determined by sysctl at runtime' ;; netbsd*) ffcall_cv_mmap_mprotect_can_exec='determined by sysctl at runtime' ;; *) if test "$cross_compiling" = yes then : case "$host_os" in *) ffcall_cv_mmap_mprotect_can_exec="guessing no" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif #include /* Declare mmap(), mprotect(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); char *p; int ret; #if HAVE_MMAP_ANONYMOUS p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #elif HAVE_MMAP_DEVZERO int zero_fd = open("/dev/zero", O_RDONLY, 0666); if (zero_fd < 0) return 1; p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0); #else ?? #endif if (p == (char*) -1) /* mmap is not working as expected. */ return 1; p[5] = 0x77; ret = mprotect (p, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC); if (ret < 0 && (errno == EACCES || errno == ENOMEM || errno == ENOTSUP)) /* mprotect is forbidden to make mmap()ed pages executable that were writable earlier. */ return 2; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_mmap_mprotect_can_exec=yes else case e in #( e) ffcall_cv_mmap_mprotect_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_mprotect_can_exec" >&5 printf "%s\n" "$ffcall_cv_mmap_mprotect_can_exec" >&6; } case "$ffcall_cv_mmap_mprotect_can_exec" in *yes) MPROTECT_AFTER_MMAP_CAN_EXEC=1 ;; *no) MPROTECT_AFTER_MMAP_CAN_EXEC=0 ;; *runtime*) MPROTECT_AFTER_MMAP_CAN_EXEC='-1' ;; esac printf "%s\n" "#define HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC $MPROTECT_AFTER_MMAP_CAN_EXEC" >>confdefs.h case "$ffcall_cv_malloc_mprotect_can_exec" in *yes) ;; *) case "$ffcall_cv_mmap_mprotect_can_exec" in *yes) ;; *) case "$host_os" in darwin*) # This is expected to work on macOS only. # Here we use the approach with Mach primitives that exist # since macOS 10.4. It was invented by Joelle van Dyne for QEMU. # It is a lot simpler than the MAP_JIT approach that is # propagated by Apple but incompletely documented and # changes behaviour whenever Apple wants to improve "security". { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a shared mmap with macOS primitives can make memory pages executable" >&5 printf %s "checking whether a shared mmap with macOS primitives can make memory pages executable... " >&6; } if test ${ffcall_cv_mmap_shared_macos_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : ffcall_cv_mmap_shared_macos_can_exec="guessing yes" else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include /* Declare getpagesize(). */ #include /* Declare mmap(). */ #include /* Declare mach_vm_remap. */ #include /* Declaring it ourselves is easier than including . */ extern #ifdef __cplusplus "C" #endif kern_return_t mach_vm_remap (vm_map_t target_task, mach_vm_address_t *target_address, /* in/out */ mach_vm_size_t size, mach_vm_offset_t mask, int flags, vm_map_t src_task, mach_vm_address_t src_address, boolean_t copy, vm_prot_t *cur_protection, /* out */ vm_prot_t *max_protection, /* out */ vm_inherit_t inheritance); int main () { unsigned int pagesize = getpagesize (); char *pw; char *px; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON, -1, 0); if (pw == (char*) -1) return 2; pw[5] = 0xc3; { vm_map_t self = mach_task_self (); mach_vm_address_t target_address = 0; vm_prot_t cur_prot; vm_prot_t max_prot; kern_return_t ret = mach_vm_remap (self, &target_address, pagesize, 0, VM_FLAGS_ANYWHERE, self, (mach_vm_address_t) (unsigned long) pw, FALSE, &cur_prot, &max_prot, VM_INHERIT_NONE); if (ret != KERN_SUCCESS) return 3; px = (char *) (unsigned long) target_address; } if (mprotect (px, pagesize, PROT_READ | PROT_EXEC) < 0) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_mmap_shared_macos_can_exec=yes else case e in #( e) ffcall_cv_mmap_shared_macos_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_shared_macos_can_exec" >&5 printf "%s\n" "$ffcall_cv_mmap_shared_macos_can_exec" >&6; } case "$ffcall_cv_mmap_shared_macos_can_exec" in *yes) printf "%s\n" "#define HAVE_MMAP_SHARED_MACOS_CAN_EXEC 1" >>confdefs.h ;; esac ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a shared mmap with NetBSD primitives can make memory pages executable" >&5 printf %s "checking whether a shared mmap with NetBSD primitives can make memory pages executable... " >&6; } if test ${ffcall_cv_mmap_shared_netbsd_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : ffcall_cv_mmap_shared_netbsd_can_exec="guessing yes" else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Enable the PROT_MPROTECT declaration on NetBSD. */ #ifndef _NETBSD_SOURCE #define _NETBSD_SOURCE 1 #endif #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif /* Declare mmap() and mremap(). */ #include int main () { unsigned int pagesize = getpagesize (); char *pw; char *px; pw = (char *) mmap (NULL, pagesize, (PROT_READ | PROT_WRITE) | PROT_MPROTECT (PROT_READ | PROT_WRITE | PROT_EXEC), MAP_PRIVATE | MAP_ANON, -1, 0); if (pw == (char*) -1) return 2; pw[5] = 0xc3; px = (char *) mremap (pw, pagesize, NULL, pagesize, MAP_REMAPDUP); if (px == (char*) -1) return 3; if (mprotect (px, pagesize, PROT_READ | PROT_EXEC) < 0) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_mmap_shared_netbsd_can_exec=yes else case e in #( e) ffcall_cv_mmap_shared_netbsd_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_shared_netbsd_can_exec" >&5 printf "%s\n" "$ffcall_cv_mmap_shared_netbsd_can_exec" >&6; } case "$ffcall_cv_mmap_shared_netbsd_can_exec" in *yes) printf "%s\n" "#define HAVE_MMAP_SHARED_NETBSD_CAN_EXEC 1" >>confdefs.h ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for memfd_create" >&5 printf %s "checking for memfd_create... " >&6; } if test ${gl_cv_onwards_func_memfd_create+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "memfd_create" "ac_cv_have_decl_memfd_create" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_memfd_create" = xyes then : fi if test $ac_cv_have_decl_memfd_create = yes; then ac_fn_c_check_func "$LINENO" "memfd_create" "ac_cv_func_memfd_create" if test "x$ac_cv_func_memfd_create" = xyes then : fi if test $ac_cv_func_memfd_create = yes; then gl_cv_onwards_func_memfd_create=yes else gl_cv_onwards_func_memfd_create='future OS version' fi else gl_cv_onwards_func_memfd_create='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "memfd_create" "ac_cv_func_memfd_create" if test "x$ac_cv_func_memfd_create" = xyes then : fi gl_cv_onwards_func_memfd_create=$ac_cv_func_memfd_create ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_memfd_create" >&5 printf "%s\n" "$gl_cv_onwards_func_memfd_create" >&6; } case "$gl_cv_onwards_func_memfd_create" in future*) ac_cv_func_memfd_create=no ;; *) ac_cv_func_memfd_create=$gl_cv_onwards_func_memfd_create ;; esac if test $ac_cv_func_memfd_create = yes; then printf "%s\n" "#define HAVE_MEMFD_CREATE 1" >>confdefs.h fi if test $ac_cv_func_memfd_create = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a shared mmap of a RAM-only region can make memory pages executable" >&5 printf %s "checking whether a shared mmap of a RAM-only region can make memory pages executable... " >&6; } if test ${ffcall_cv_mmap_shared_memfd_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) filename="trampdata$$" if test "$cross_compiling" = yes then : ffcall_cv_mmap_shared_memfd_can_exec="guessing yes" else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Enable the memfd_create declaration on Linux. */ #ifndef _GNU_SOURCE #define _GNU_SOURCE 1 #endif #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif /* Declare mmap() and memfd_create(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); int fd; char *pw; char *px; fd = memfd_create ("$filename", 0); if (fd < 0) return 1; if (ftruncate (fd, pagesize) < 0) return 2; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0); if (pw == (char*) -1) return 3; pw[5] = 0xc3; px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED, fd, 0); if (px == (char*) -1) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_mmap_shared_memfd_can_exec=yes else case e in #( e) ffcall_cv_mmap_shared_memfd_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_shared_memfd_can_exec" >&5 printf "%s\n" "$ffcall_cv_mmap_shared_memfd_can_exec" >&6; } case "$ffcall_cv_mmap_shared_memfd_can_exec" in *yes) printf "%s\n" "#define HAVE_MMAP_SHARED_MEMFD_CAN_EXEC 1" >>confdefs.h ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether a shared mmap of a file can make memory pages executable" >&5 printf %s "checking whether a shared mmap of a file can make memory pages executable... " >&6; } if test ${ffcall_cv_mmap_shared_posix_can_exec+y} then : printf %s "(cached) " >&6 else case e in #( e) filename="/tmp/trampdata$$.data" if test "$cross_compiling" = yes then : ffcall_cv_mmap_shared_posix_can_exec="guessing yes" else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mmap(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); int fd; char *pw; char *px; fd = open ("$filename", O_CREAT | O_RDWR | O_TRUNC, 0700); if (fd < 0) return 1; if (ftruncate (fd, pagesize) < 0) return 2; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0); if (pw == (char*) -1) return 3; pw[5] = 0xc3; px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0); if (px == (char*) -1) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ffcall_cv_mmap_shared_posix_can_exec=yes else case e in #( e) ffcall_cv_mmap_shared_posix_can_exec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f "$filename" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ffcall_cv_mmap_shared_posix_can_exec" >&5 printf "%s\n" "$ffcall_cv_mmap_shared_posix_can_exec" >&6; } case "$ffcall_cv_mmap_shared_posix_can_exec" in *yes) printf "%s\n" "#define HAVE_MMAP_SHARED_POSIX_CAN_EXEC 1" >>confdefs.h ;; esac ;; esac ;; esac ;; esac ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for setmntent" >&5 printf %s "checking for setmntent... " >&6; } if test ${gl_cv_onwards_func_setmntent+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "setmntent" "ac_cv_have_decl_setmntent" "#include #include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_setmntent" = xyes then : fi if test $ac_cv_have_decl_setmntent = yes; then ac_fn_c_check_func "$LINENO" "setmntent" "ac_cv_func_setmntent" if test "x$ac_cv_func_setmntent" = xyes then : fi if test $ac_cv_func_setmntent = yes; then gl_cv_onwards_func_setmntent=yes else gl_cv_onwards_func_setmntent='future OS version' fi else gl_cv_onwards_func_setmntent='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "setmntent" "ac_cv_func_setmntent" if test "x$ac_cv_func_setmntent" = xyes then : fi gl_cv_onwards_func_setmntent=$ac_cv_func_setmntent ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_setmntent" >&5 printf "%s\n" "$gl_cv_onwards_func_setmntent" >&6; } case "$gl_cv_onwards_func_setmntent" in future*) ac_cv_func_setmntent=no ;; *) ac_cv_func_setmntent=$gl_cv_onwards_func_setmntent ;; esac if test $ac_cv_func_setmntent = yes; then printf "%s\n" "#define HAVE_SETMNTENT 1" >>confdefs.h fi CPU_OBJECTS='' if test ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64 -o ${HOST_CPU_C_ABI} = ia64; then CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' fi if test ${HOST_CPU_C_ABI} = powerpc; then case "${host_os}" in aix*) CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' ;; *) ;; esac fi if test ${HOST_CPU_C_ABI} = alpha -o ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64-elfv2; then CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' fi if test ${HOST_CPU_C_ABI} = sparc -o ${HOST_CPU_C_ABI} = sparc64; then case "${host_os}" in solaris*) ;; *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;; esac fi if test ${HOST_CPU_C_ABI} = powerpc; then case "${host_os}" in aix*) ;; *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;; esac fi case "${HOST_CPU_C_ABI}" in mips* | riscv*) ac_fn_c_check_header_compile "$LINENO" "sys/cachectl.h" "ac_cv_header_sys_cachectl_h" "$ac_includes_default" if test "x$ac_cv_header_sys_cachectl_h" = xyes then : printf "%s\n" "#define HAVE_SYS_CACHECTL_H 1" >>confdefs.h fi ;; esac WORKAROUND_BUG_81653='' if test ${HOST_CPU_C_ABI} = sparc && test -n "$GCC"; then gcc_version=`LC_ALL=C ${CC} -v 2>&1 | grep version | sed -n -e '$p' | sed -e 's/.*version //g' -e 's/gcc //'` case "$gcc_version" in 2.* | 3.0-3*) ;; *) WORKAROUND_BUG_81653='-fno-pie' ;; esac fi if test -n "$GCC"; then DISABLE_TYPE_BASED_ALIASING='-fno-strict-aliasing' else case "$host_os" in aix*) DISABLE_TYPE_BASED_ALIASING='-qalias=noansi' ;; *) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __SUNPRO_C yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : DISABLE_TYPE_BASED_ALIASING='-xalias_level=weak' else case e in #( e) DISABLE_TYPE_BASED_ALIASING='' ;; esac fi rm -rf conftest* ;; esac fi # Check whether --enable-cross-guesses was given. if test ${enable_cross_guesses+y} then : enableval=$enable_cross_guesses; if test "x$enableval" != xconservative && test "x$enableval" != xrisky; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: invalid argument supplied to --enable-cross-guesses" >&5 printf "%s\n" "$as_me: WARNING: invalid argument supplied to --enable-cross-guesses" >&2;} enableval=conservative fi gl_cross_guesses="$enableval" else case e in #( e) gl_cross_guesses=conservative ;; esac fi if test $gl_cross_guesses = risky; then gl_cross_guess_normal="guessing yes" gl_cross_guess_inverted="guessing no" else gl_cross_guess_normal="guessing no" gl_cross_guess_inverted="guessing yes" fi LIBC_FATAL_STDERR_=1 export LIBC_FATAL_STDERR_ { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the preprocessor supports include_next" >&5 printf %s "checking whether the preprocessor supports include_next... " >&6; } if test ${gl_cv_have_include_next+y} then : printf %s "(cached) " >&6 else case e in #( e) rm -rf conftestd1a conftestd1b conftestd2 mkdir conftestd1a conftestd1b conftestd2 cat < conftestd1a/conftest.h #define DEFINED_IN_CONFTESTD1 #include_next #ifdef DEFINED_IN_CONFTESTD2 int foo; #else #error "include_next doesn't work" #endif EOF cat < conftestd1b/conftest.h #define DEFINED_IN_CONFTESTD1 #include #include_next #ifdef DEFINED_IN_CONFTESTD2 int foo; #else #error "include_next doesn't work" #endif EOF cat < conftestd2/conftest.h #ifndef DEFINED_IN_CONFTESTD1 #error "include_next test doesn't work" #endif #define DEFINED_IN_CONFTESTD2 EOF gl_saved_CPPFLAGS="$CPPFLAGS" CPPFLAGS="$gl_saved_CPPFLAGS -Iconftestd1b -Iconftestd2" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_have_include_next=yes else case e in #( e) CPPFLAGS="$gl_saved_CPPFLAGS -Iconftestd1a -Iconftestd2" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_have_include_next=buggy else case e in #( e) gl_cv_have_include_next=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext CPPFLAGS="$gl_saved_CPPFLAGS" rm -rf conftestd1a conftestd1b conftestd2 ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_have_include_next" >&5 printf "%s\n" "$gl_cv_have_include_next" >&6; } PRAGMA_SYSTEM_HEADER= if test $gl_cv_have_include_next = yes; then INCLUDE_NEXT=include_next INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next if test -n "$GCC"; then PRAGMA_SYSTEM_HEADER='#pragma GCC system_header' fi else if test $gl_cv_have_include_next = buggy; then INCLUDE_NEXT=include INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next else INCLUDE_NEXT=include INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include fi fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether source code line length is unlimited" >&5 printf %s "checking whether source code line length is unlimited... " >&6; } if test ${gl_cv_source_line_length_unlimited+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __TANDEM choke me #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "choke me" >/dev/null 2>&1 then : gl_cv_source_line_length_unlimited=no else case e in #( e) gl_cv_source_line_length_unlimited=yes ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_source_line_length_unlimited" >&5 printf "%s\n" "$gl_cv_source_line_length_unlimited" >&6; } if test $gl_cv_source_line_length_unlimited = no; then PRAGMA_COLUMNS="#pragma COLUMNS 10000" else PRAGMA_COLUMNS= fi if test $gl_cv_have_include_next = yes; then gl_cv_next_limits_h='<'limits.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_limits_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_limits_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'limits.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_limits_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_limits_h gl_cv_next_limits_h='"'$gl_header'"' else gl_cv_next_limits_h='<'limits.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_limits_h" >&5 printf "%s\n" "$gl_cv_next_limits_h" >&6; } fi NEXT_LIMITS_H=$gl_cv_next_limits_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'limits.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_limits_h fi NEXT_AS_FIRST_DIRECTIVE_LIMITS_H=$gl_next_as_first_directive { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether limits.h has WORD_BIT, BOOL_WIDTH etc." >&5 printf %s "checking whether limits.h has WORD_BIT, BOOL_WIDTH etc.... " >&6; } if test ${gl_cv_header_limits_width+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifndef __STDC_WANT_IEC_60559_BFP_EXT__ #define __STDC_WANT_IEC_60559_BFP_EXT__ 1 #endif #include long long llm = LLONG_MAX; int wb = WORD_BIT; int ullw = ULLONG_WIDTH; int bw = BOOL_WIDTH; int bm = BOOL_MAX; int mblm = MB_LEN_MAX; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_limits_width=yes else case e in #( e) gl_cv_header_limits_width=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_limits_width" >&5 printf "%s\n" "$gl_cv_header_limits_width" >&6; } GL_GENERATE_LIMITS_H=true if test "$gl_cv_header_limits_width" = yes then : { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether limits.h has SSIZE_MAX" >&5 printf %s "checking whether limits.h has SSIZE_MAX... " >&6; } if test ${gl_cv_header_limits_ssize_max+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifndef SSIZE_MAX #error "SSIZE_MAX is not defined" #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_limits_ssize_max=yes else case e in #( e) gl_cv_header_limits_ssize_max=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_limits_ssize_max" >&5 printf "%s\n" "$gl_cv_header_limits_ssize_max" >&6; } if test "$gl_cv_header_limits_ssize_max" = yes; then GL_GENERATE_LIMITS_H=false fi fi gl_threads_api=none LIBTHREAD= LTLIBTHREAD= LIBMULTITHREAD= LTLIBMULTITHREAD= if test "$gl_use_threads" != no; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether imported symbols can be declared weak" >&5 printf %s "checking whether imported symbols can be declared weak... " >&6; } if test ${gl_cv_have_weak+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in cygwin* | mingw* | windows*) gl_cv_have_weak="guessing no" ;; *) gl_cv_have_weak=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ extern void xyzzy (); #pragma weak xyzzy int main (void) { xyzzy(); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_have_weak=maybe fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext if test $gl_cv_have_weak = maybe; then if test "$cross_compiling" = yes then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __ELF__ Extensible Linking Format #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Extensible Linking Format" >/dev/null 2>&1 then : gl_cv_have_weak="guessing yes" else case e in #( e) gl_cv_have_weak="guessing no" ;; esac fi rm -rf conftest* else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #pragma weak fputs int main () { return (fputs == NULL); } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_have_weak=yes else case e in #( e) gl_cv_have_weak=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi ;; esac case " $LDFLAGS " in *" -static "*) gl_cv_have_weak=no ;; esac case "$gl_cv_have_weak" in *yes) case "$host_os" in freebsd* | dragonfly* | midnightbsd*) : > conftest1.c $CC $CPPFLAGS $CFLAGS $LDFLAGS -fPIC -shared -o libempty.so conftest1.c -lpthread >&5 2>&1 cat < conftest2.c #include #pragma weak pthread_mutexattr_gettype int main () { return (pthread_mutexattr_gettype != NULL); } EOF $CC $CPPFLAGS $CFLAGS $LDFLAGS -o conftest conftest2.c libempty.so >&5 2>&1 \ || gl_cv_have_weak=no rm -f conftest1.c libempty.so conftest2.c conftest ;; esac ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_have_weak" >&5 printf "%s\n" "$gl_cv_have_weak" >&6; } case "$gl_cv_have_weak" in *yes) printf "%s\n" "#define HAVE_WEAK_SYMBOLS 1" >>confdefs.h ;; esac if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then : fi if test "$gl_use_threads" = isoc || test "$gl_use_threads" = isoc+posix; then gl_have_isoc_threads="$ac_cv_header_threads_h" fi if test "$gl_use_threads" = yes \ || test "$gl_use_threads" = posix \ || test "$gl_use_threads" = isoc+posix; then if test -z "$gl_pthreadlib_body_done"; then gl_pthread_api=no LIBPTHREAD= LIBPMULTITHREAD= # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that # it groks . It's added above, in gl_ANYTHREADLIB_EARLY. ac_fn_c_check_header_compile "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default" if test "x$ac_cv_header_pthread_h" = xyes then : gl_have_pthread_h=yes else case e in #( e) gl_have_pthread_h=no ;; esac fi if test "$gl_have_pthread_h" = yes; then # Other possible tests: # -lpthreads (FSU threads, PCthreads) # -lgthreads # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist # in libc. IRIX 6.5 has the first one in both libc and libpthread, but # the second one only in libpthread, and lock.c needs it. # # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04 # needs -pthread for some reason. See: # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html saved_LIBS="$LIBS" for gl_pthread in '' '-pthread'; do LIBS="$LIBS $gl_pthread" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include pthread_mutex_t m; pthread_mutexattr_t ma; int main (void) { pthread_mutex_lock (&m); pthread_mutexattr_init (&ma); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_pthread_api=yes LIBPTHREAD=$gl_pthread LIBPMULTITHREAD=$gl_pthread fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS="$saved_LIBS" test $gl_pthread_api = yes && break done echo "$as_me:24193: gl_pthread_api=$gl_pthread_api" >&5 echo "$as_me:24194: LIBPTHREAD=$LIBPTHREAD" >&5 gl_pthread_in_glibc=no # On Linux with glibc >= 2.34, libc contains the fully functional # pthread functions. case "$host_os" in linux*) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef __GNU_LIBRARY__ #if (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 34) || (__GLIBC__ > 2) Lucky user #endif #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Lucky user" >/dev/null 2>&1 then : gl_pthread_in_glibc=yes fi rm -rf conftest* ;; esac echo "$as_me:24220: gl_pthread_in_glibc=$gl_pthread_in_glibc" >&5 # Test for libpthread by looking for pthread_kill. (Not pthread_self, # since it is defined as a macro on OSF/1.) if test $gl_pthread_api = yes && test -z "$LIBPTHREAD"; then # The program links fine without libpthread. But it may actually # need to link with libpthread in order to create multiple threads. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lpthread # On Solaris and HP-UX, most pthread functions exist also in libc. # Therefore pthread_in_use() needs to actually try to create a # thread: pthread_create from libc will fail, whereas # pthread_create will actually create a thread. # On Solaris 10 or newer, this test is no longer needed, because # libc contains the fully functional pthread functions. case "$host_os" in solaris | solaris2.[1-9] | solaris2.[1-9].* | hpux*) printf "%s\n" "#define PTHREAD_IN_USE_DETECTION_HARD 1" >>confdefs.h esac fi else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lthr" >&5 printf %s "checking for pthread_kill in -lthr... " >&6; } if test ${ac_cv_lib_thr_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lthr $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_thr_pthread_kill=yes else case e in #( e) ac_cv_lib_thr_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_thr_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_thr_pthread_kill" >&6; } if test "x$ac_cv_lib_thr_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lthr fi fi ;; esac fi elif test $gl_pthread_api != yes; then # Some library is needed. Try libpthread and libc_r. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lpthread LIBPMULTITHREAD=-lpthread fi if test $gl_pthread_api != yes; then # For FreeBSD 4. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lc_r" >&5 printf %s "checking for pthread_kill in -lc_r... " >&6; } if test ${ac_cv_lib_c_r_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lc_r $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_c_r_pthread_kill=yes else case e in #( e) ac_cv_lib_c_r_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_c_r_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_c_r_pthread_kill" >&6; } if test "x$ac_cv_lib_c_r_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lc_r LIBPMULTITHREAD=-lc_r fi fi fi echo "$as_me:24454: LIBPMULTITHREAD=$LIBPMULTITHREAD" >&5 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether POSIX threads API is available" >&5 printf %s "checking whether POSIX threads API is available... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_pthread_api" >&5 printf "%s\n" "$gl_pthread_api" >&6; } if test $gl_pthread_api = yes; then printf "%s\n" "#define HAVE_PTHREAD_API 1" >>confdefs.h fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : SCHED_YIELD_LIB= else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lrt" >&5 printf %s "checking for sched_yield in -lrt... " >&6; } if test ${ac_cv_lib_rt_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lrt $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_rt_sched_yield=yes else case e in #( e) ac_cv_lib_rt_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_rt_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_rt_sched_yield" >&6; } if test "x$ac_cv_lib_rt_sched_yield" = xyes then : SCHED_YIELD_LIB=-lrt else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lposix4" >&5 printf %s "checking for sched_yield in -lposix4... " >&6; } if test ${ac_cv_lib_posix4_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lposix4 $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_posix4_sched_yield=yes else case e in #( e) ac_cv_lib_posix4_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_posix4_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_posix4_sched_yield" >&6; } if test "x$ac_cv_lib_posix4_sched_yield" = xyes then : SCHED_YIELD_LIB=-lposix4 fi ;; esac fi ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIB_SCHED_YIELD="$SCHED_YIELD_LIB" gl_pthreadlib_body_done=done fi LIBTHREAD=$LIBPTHREAD LTLIBTHREAD=$LIBPTHREAD LIBMULTITHREAD=$LIBPMULTITHREAD LTLIBMULTITHREAD=$LIBPMULTITHREAD if test $gl_pthread_api = yes; then if test "$gl_use_threads" = isoc+posix && test "$gl_have_isoc_threads" = yes; then gl_threads_api='isoc+posix' printf "%s\n" "#define USE_ISOC_AND_POSIX_THREADS 1" >>confdefs.h LIBTHREAD= LTLIBTHREAD= else gl_threads_api=posix printf "%s\n" "#define USE_POSIX_THREADS 1" >>confdefs.h if test -z "$LIBMULTITHREAD" && test -z "$LTLIBMULTITHREAD"; then printf "%s\n" "#define USE_POSIX_THREADS_FROM_LIBC 1" >>confdefs.h else if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then printf "%s\n" "#define USE_POSIX_THREADS_WEAK 1" >>confdefs.h LIBTHREAD= LTLIBTHREAD= else case "$host_os" in freebsd* | dragonfly* | midnightbsd*) if test "x$LIBTHREAD" != "x$LIBMULTITHREAD"; then printf "%s\n" "#define PTHREAD_IN_USE_DETECTION_HARD 1" >>confdefs.h fi ;; esac fi fi fi fi fi if test $gl_threads_api = none; then if test "$gl_use_threads" = isoc && test "$gl_have_isoc_threads" = yes; then if test -z "$gl_stdthreadlib_body_done"; then case "$host_os" in mingw* | windows*) LIBSTDTHREAD= ;; *) if test -z "$gl_pthreadlib_body_done"; then gl_pthread_api=no LIBPTHREAD= LIBPMULTITHREAD= # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that # it groks . It's added above, in gl_ANYTHREADLIB_EARLY. ac_fn_c_check_header_compile "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default" if test "x$ac_cv_header_pthread_h" = xyes then : gl_have_pthread_h=yes else case e in #( e) gl_have_pthread_h=no ;; esac fi if test "$gl_have_pthread_h" = yes; then # Other possible tests: # -lpthreads (FSU threads, PCthreads) # -lgthreads # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist # in libc. IRIX 6.5 has the first one in both libc and libpthread, but # the second one only in libpthread, and lock.c needs it. # # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04 # needs -pthread for some reason. See: # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html saved_LIBS="$LIBS" for gl_pthread in '' '-pthread'; do LIBS="$LIBS $gl_pthread" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include pthread_mutex_t m; pthread_mutexattr_t ma; int main (void) { pthread_mutex_lock (&m); pthread_mutexattr_init (&ma); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_pthread_api=yes LIBPTHREAD=$gl_pthread LIBPMULTITHREAD=$gl_pthread fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS="$saved_LIBS" test $gl_pthread_api = yes && break done echo "$as_me:24703: gl_pthread_api=$gl_pthread_api" >&5 echo "$as_me:24704: LIBPTHREAD=$LIBPTHREAD" >&5 gl_pthread_in_glibc=no # On Linux with glibc >= 2.34, libc contains the fully functional # pthread functions. case "$host_os" in linux*) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef __GNU_LIBRARY__ #if (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 34) || (__GLIBC__ > 2) Lucky user #endif #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Lucky user" >/dev/null 2>&1 then : gl_pthread_in_glibc=yes fi rm -rf conftest* ;; esac echo "$as_me:24730: gl_pthread_in_glibc=$gl_pthread_in_glibc" >&5 # Test for libpthread by looking for pthread_kill. (Not pthread_self, # since it is defined as a macro on OSF/1.) if test $gl_pthread_api = yes && test -z "$LIBPTHREAD"; then # The program links fine without libpthread. But it may actually # need to link with libpthread in order to create multiple threads. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lpthread # On Solaris and HP-UX, most pthread functions exist also in libc. # Therefore pthread_in_use() needs to actually try to create a # thread: pthread_create from libc will fail, whereas # pthread_create will actually create a thread. # On Solaris 10 or newer, this test is no longer needed, because # libc contains the fully functional pthread functions. case "$host_os" in solaris | solaris2.[1-9] | solaris2.[1-9].* | hpux*) printf "%s\n" "#define PTHREAD_IN_USE_DETECTION_HARD 1" >>confdefs.h esac fi else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lthr" >&5 printf %s "checking for pthread_kill in -lthr... " >&6; } if test ${ac_cv_lib_thr_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lthr $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_thr_pthread_kill=yes else case e in #( e) ac_cv_lib_thr_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_thr_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_thr_pthread_kill" >&6; } if test "x$ac_cv_lib_thr_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lthr fi fi ;; esac fi elif test $gl_pthread_api != yes; then # Some library is needed. Try libpthread and libc_r. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lpthread LIBPMULTITHREAD=-lpthread fi if test $gl_pthread_api != yes; then # For FreeBSD 4. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lc_r" >&5 printf %s "checking for pthread_kill in -lc_r... " >&6; } if test ${ac_cv_lib_c_r_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lc_r $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_c_r_pthread_kill=yes else case e in #( e) ac_cv_lib_c_r_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_c_r_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_c_r_pthread_kill" >&6; } if test "x$ac_cv_lib_c_r_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lc_r LIBPMULTITHREAD=-lc_r fi fi fi echo "$as_me:24964: LIBPMULTITHREAD=$LIBPMULTITHREAD" >&5 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether POSIX threads API is available" >&5 printf %s "checking whether POSIX threads API is available... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_pthread_api" >&5 printf "%s\n" "$gl_pthread_api" >&6; } if test $gl_pthread_api = yes; then printf "%s\n" "#define HAVE_PTHREAD_API 1" >>confdefs.h fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : SCHED_YIELD_LIB= else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lrt" >&5 printf %s "checking for sched_yield in -lrt... " >&6; } if test ${ac_cv_lib_rt_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lrt $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_rt_sched_yield=yes else case e in #( e) ac_cv_lib_rt_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_rt_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_rt_sched_yield" >&6; } if test "x$ac_cv_lib_rt_sched_yield" = xyes then : SCHED_YIELD_LIB=-lrt else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lposix4" >&5 printf %s "checking for sched_yield in -lposix4... " >&6; } if test ${ac_cv_lib_posix4_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lposix4 $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_posix4_sched_yield=yes else case e in #( e) ac_cv_lib_posix4_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_posix4_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_posix4_sched_yield" >&6; } if test "x$ac_cv_lib_posix4_sched_yield" = xyes then : SCHED_YIELD_LIB=-lposix4 fi ;; esac fi ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIB_SCHED_YIELD="$SCHED_YIELD_LIB" gl_pthreadlib_body_done=done fi if test $ac_cv_header_threads_h = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for thrd_create" >&5 printf %s "checking for thrd_create... " >&6; } if test ${gl_cv_onwards_func_thrd_create+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "thrd_create" "ac_cv_have_decl_thrd_create" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_thrd_create" = xyes then : fi if test $ac_cv_have_decl_thrd_create = yes; then ac_fn_c_check_func "$LINENO" "thrd_create" "ac_cv_func_thrd_create" if test "x$ac_cv_func_thrd_create" = xyes then : fi if test $ac_cv_func_thrd_create = yes; then gl_cv_onwards_func_thrd_create=yes else gl_cv_onwards_func_thrd_create='future OS version' fi else gl_cv_onwards_func_thrd_create='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "thrd_create" "ac_cv_func_thrd_create" if test "x$ac_cv_func_thrd_create" = xyes then : fi gl_cv_onwards_func_thrd_create=$ac_cv_func_thrd_create ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_thrd_create" >&5 printf "%s\n" "$gl_cv_onwards_func_thrd_create" >&6; } case "$gl_cv_onwards_func_thrd_create" in future*) ac_cv_func_thrd_create=no ;; *) ac_cv_func_thrd_create=$gl_cv_onwards_func_thrd_create ;; esac if test $ac_cv_func_thrd_create = yes; then printf "%s\n" "#define HAVE_THRD_CREATE 1" >>confdefs.h fi if test $ac_cv_func_thrd_create = yes; then LIBSTDTHREAD= else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for thrd_create in -lstdthreads" >&5 printf %s "checking for thrd_create in -lstdthreads... " >&6; } if test ${ac_cv_lib_stdthreads_thrd_create+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lstdthreads $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char thrd_create (void); int main (void) { return thrd_create (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_stdthreads_thrd_create=yes else case e in #( e) ac_cv_lib_stdthreads_thrd_create=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_stdthreads_thrd_create" >&5 printf "%s\n" "$ac_cv_lib_stdthreads_thrd_create" >&6; } if test "x$ac_cv_lib_stdthreads_thrd_create" = xyes then : LIBSTDTHREAD='-lstdthreads -lpthread' else case e in #( e) LIBSTDTHREAD="$LIBPMULTITHREAD" ;; esac fi fi else LIBSTDTHREAD="$LIBPMULTITHREAD $SCHED_YIELD_LIB" fi ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ISO C threads API is available" >&5 printf %s "checking whether ISO C threads API is available... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_threads_h" >&5 printf "%s\n" "$ac_cv_header_threads_h" >&6; } gl_stdthreadlib_body_done=done fi LIBTHREAD=$LIBSTDTHREAD LTLIBTHREAD=$LIBSTDTHREAD LIBMULTITHREAD=$LIBSTDTHREAD LTLIBMULTITHREAD=$LIBSTDTHREAD gl_threads_api=isoc printf "%s\n" "#define USE_ISOC_THREADS 1" >>confdefs.h fi fi if test $gl_threads_api = none; then case "$gl_use_threads" in yes | windows | win32) # The 'win32' is for backward compatibility. if { case "$host_os" in mingw* | windows*) true;; *) false;; esac }; then gl_threads_api=windows printf "%s\n" "#define USE_WINDOWS_THREADS 1" >>confdefs.h fi ;; esac fi else printf "%s\n" "#define AVOID_ANY_THREADS 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for multithread API to use" >&5 printf %s "checking for multithread API to use... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_threads_api" >&5 printf "%s\n" "$gl_threads_api" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether the compiler produces multi-arch binaries" >&5 printf %s "checking whether the compiler produces multi-arch binaries... " >&6; } if test ${gl_cv_c_multiarch+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_c_multiarch=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifndef __APPLE_CC__ not a universal capable compiler #endif typedef int dummy; _ACEOF if ac_fn_c_try_compile "$LINENO" then : arch= prev= for word in ${CC} ${CFLAGS} ${CPPFLAGS} ${LDFLAGS}; do if test -n "$prev"; then case $word in i?86 | x86_64 | ppc | ppc64 | arm | arm64) if test -z "$arch" || test "$arch" = "$word"; then arch="$word" else gl_cv_c_multiarch=yes fi ;; esac prev= else if test "x$word" = "x-arch"; then prev=arch fi fi done fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_c_multiarch" >&5 printf "%s\n" "$gl_cv_c_multiarch" >&6; } if test $gl_cv_c_multiarch = yes; then APPLE_UNIVERSAL_BUILD=1 else APPLE_UNIVERSAL_BUILD=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for wint_t" >&5 printf %s "checking for wint_t... " >&6; } if test ${gt_cv_c_wint_t+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include wint_t foo = (wchar_t)'\0'; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gt_cv_c_wint_t=yes else case e in #( e) gt_cv_c_wint_t=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gt_cv_c_wint_t" >&5 printf "%s\n" "$gt_cv_c_wint_t" >&6; } if test $gt_cv_c_wint_t = yes; then printf "%s\n" "#define HAVE_WINT_T 1" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether wint_t is large enough" >&5 printf %s "checking whether wint_t is large enough... " >&6; } if test ${gl_cv_type_wint_t_large_enough+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int verify[sizeof (wint_t) < sizeof (int) ? -1 : 1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_type_wint_t_large_enough=yes else case e in #( e) gl_cv_type_wint_t_large_enough=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_type_wint_t_large_enough" >&5 printf "%s\n" "$gl_cv_type_wint_t_large_enough" >&6; } if test $gl_cv_type_wint_t_large_enough = no; then GNULIBHEADERS_OVERRIDE_WINT_T=1 else GNULIBHEADERS_OVERRIDE_WINT_T=0 fi else GNULIBHEADERS_OVERRIDE_WINT_T=0 fi printf "%s\n" "#define HAVE_LONG_LONG_INT 1" >>confdefs.h printf "%s\n" "#define HAVE_UNSIGNED_LONG_LONG_INT 1" >>confdefs.h if test $ac_cv_header_wchar_h = yes; then HAVE_WCHAR_H=1 else HAVE_WCHAR_H=0 fi if test $ac_cv_header_inttypes_h = yes; then HAVE_INTTYPES_H=1 else HAVE_INTTYPES_H=0 fi if test $ac_cv_header_sys_types_h = yes; then HAVE_SYS_TYPES_H=1 else HAVE_SYS_TYPES_H=0 fi if test $gl_cv_have_include_next = yes; then gl_cv_next_stdint_h='<'stdint.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_stdint_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_stdint_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'stdint.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_stdint_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_stdint_h gl_cv_next_stdint_h='"'$gl_header'"' else gl_cv_next_stdint_h='<'stdint.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_stdint_h" >&5 printf "%s\n" "$gl_cv_next_stdint_h" >&6; } fi NEXT_STDINT_H=$gl_cv_next_stdint_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'stdint.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_stdint_h fi NEXT_AS_FIRST_DIRECTIVE_STDINT_H=$gl_next_as_first_directive if test $ac_cv_header_stdint_h = yes; then HAVE_STDINT_H=1 else HAVE_STDINT_H=0 fi if test $ac_cv_header_stdint_h = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stdint.h conforms to C99" >&5 printf %s "checking whether stdint.h conforms to C99... " >&6; } if test ${gl_cv_header_working_stdint_h+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_header_working_stdint_h=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #define __STDC_CONSTANT_MACROS 1 #define __STDC_LIMIT_MACROS 1 #include /* Dragonfly defines WCHAR_MIN, WCHAR_MAX only in . */ #if !(defined WCHAR_MIN && defined WCHAR_MAX) #error "WCHAR_MIN, WCHAR_MAX not defined in " #endif #include #include #if HAVE_WCHAR_H # include #endif #ifdef INT8_MAX int8_t a1 = INT8_MAX; int8_t a1min = INT8_MIN; #endif #ifdef INT16_MAX int16_t a2 = INT16_MAX; int16_t a2min = INT16_MIN; #endif #ifdef INT32_MAX int32_t a3 = INT32_MAX; int32_t a3min = INT32_MIN; #endif #ifdef INT64_MAX int64_t a4 = INT64_MAX; int64_t a4min = INT64_MIN; #endif #ifdef UINT8_MAX uint8_t b1 = UINT8_MAX; #else typedef int b1[(unsigned char) -1 != 255 ? 1 : -1]; #endif #ifdef UINT16_MAX uint16_t b2 = UINT16_MAX; #endif #ifdef UINT32_MAX uint32_t b3 = UINT32_MAX; #endif #ifdef UINT64_MAX uint64_t b4 = UINT64_MAX; #endif int_least8_t c1 = INT8_C (0x7f); int_least8_t c1max = INT_LEAST8_MAX; int_least8_t c1min = INT_LEAST8_MIN; int_least16_t c2 = INT16_C (0x7fff); int_least16_t c2max = INT_LEAST16_MAX; int_least16_t c2min = INT_LEAST16_MIN; int_least32_t c3 = INT32_C (0x7fffffff); int_least32_t c3max = INT_LEAST32_MAX; int_least32_t c3min = INT_LEAST32_MIN; int_least64_t c4 = INT64_C (0x7fffffffffffffff); int_least64_t c4max = INT_LEAST64_MAX; int_least64_t c4min = INT_LEAST64_MIN; uint_least8_t d1 = UINT8_C (0xff); uint_least8_t d1max = UINT_LEAST8_MAX; uint_least16_t d2 = UINT16_C (0xffff); uint_least16_t d2max = UINT_LEAST16_MAX; uint_least32_t d3 = UINT32_C (0xffffffff); uint_least32_t d3max = UINT_LEAST32_MAX; uint_least64_t d4 = UINT64_C (0xffffffffffffffff); uint_least64_t d4max = UINT_LEAST64_MAX; int_fast8_t e1 = INT_FAST8_MAX; int_fast8_t e1min = INT_FAST8_MIN; int_fast16_t e2 = INT_FAST16_MAX; int_fast16_t e2min = INT_FAST16_MIN; int_fast32_t e3 = INT_FAST32_MAX; int_fast32_t e3min = INT_FAST32_MIN; int_fast64_t e4 = INT_FAST64_MAX; int_fast64_t e4min = INT_FAST64_MIN; uint_fast8_t f1 = UINT_FAST8_MAX; uint_fast16_t f2 = UINT_FAST16_MAX; uint_fast32_t f3 = UINT_FAST32_MAX; uint_fast64_t f4 = UINT_FAST64_MAX; #ifdef INTPTR_MAX intptr_t g = INTPTR_MAX; intptr_t gmin = INTPTR_MIN; #endif #ifdef UINTPTR_MAX uintptr_t h = UINTPTR_MAX; #endif intmax_t i = INTMAX_MAX; uintmax_t j = UINTMAX_MAX; /* Check that SIZE_MAX has the correct type, if possible. */ /* ISO C 11 mandates _Generic, but GCC versions < 4.9 lack it. */ #if 201112 <= __STDC_VERSION__ \ && (!defined __GNUC__ || 4 < __GNUC__ + (9 <= __GNUC_MINOR__) \ || defined __clang__) int k = _Generic (SIZE_MAX, size_t: 0); #elif (2 <= __GNUC__ || 4 <= __clang_major__ || defined __IBM__TYPEOF__ \ || (0x5110 <= __SUNPRO_C && !__STDC__)) extern size_t k; extern __typeof__ (SIZE_MAX) k; #endif #include /* for CHAR_BIT */ #define TYPE_MINIMUM(t) \ ((t) ((t) 0 < (t) -1 ? (t) 0 : ~ TYPE_MAXIMUM (t))) #define TYPE_MAXIMUM(t) \ ((t) ((t) 0 < (t) -1 \ ? (t) -1 \ : ((((t) 1 << (sizeof (t) * CHAR_BIT - 2)) - 1) * 2 + 1))) struct s { int check_PTRDIFF: PTRDIFF_MIN == TYPE_MINIMUM (ptrdiff_t) && PTRDIFF_MAX == TYPE_MAXIMUM (ptrdiff_t) ? 1 : -1; /* Detect bug in FreeBSD 6.0/ia64 and FreeBSD 13.0/arm64. */ int check_SIG_ATOMIC: SIG_ATOMIC_MIN == TYPE_MINIMUM (sig_atomic_t) && SIG_ATOMIC_MAX == TYPE_MAXIMUM (sig_atomic_t) ? 1 : -1; int check_SIZE: SIZE_MAX == TYPE_MAXIMUM (size_t) ? 1 : -1; int check_WCHAR: WCHAR_MIN == TYPE_MINIMUM (wchar_t) && WCHAR_MAX == TYPE_MAXIMUM (wchar_t) ? 1 : -1; /* Detect bug in mingw. */ int check_WINT: WINT_MIN == TYPE_MINIMUM (wint_t) && WINT_MAX == TYPE_MAXIMUM (wint_t) ? 1 : -1; /* Detect bugs in glibc 2.4 and Solaris 10 stdint.h, among others. */ int check_UINT8_C: (-1 < UINT8_C (0)) == (-1 < (uint_least8_t) 0) ? 1 : -1; int check_UINT16_C: (-1 < UINT16_C (0)) == (-1 < (uint_least16_t) 0) ? 1 : -1; /* Detect bugs in OpenBSD 3.9 stdint.h. */ #ifdef UINT8_MAX int check_uint8: (uint8_t) -1 == UINT8_MAX ? 1 : -1; #endif #ifdef UINT16_MAX int check_uint16: (uint16_t) -1 == UINT16_MAX ? 1 : -1; #endif #ifdef UINT32_MAX int check_uint32: (uint32_t) -1 == UINT32_MAX ? 1 : -1; #endif #ifdef UINT64_MAX int check_uint64: (uint64_t) -1 == UINT64_MAX ? 1 : -1; #endif int check_uint_least8: (uint_least8_t) -1 == UINT_LEAST8_MAX ? 1 : -1; int check_uint_least16: (uint_least16_t) -1 == UINT_LEAST16_MAX ? 1 : -1; int check_uint_least32: (uint_least32_t) -1 == UINT_LEAST32_MAX ? 1 : -1; int check_uint_least64: (uint_least64_t) -1 == UINT_LEAST64_MAX ? 1 : -1; int check_uint_fast8: (uint_fast8_t) -1 == UINT_FAST8_MAX ? 1 : -1; int check_uint_fast16: (uint_fast16_t) -1 == UINT_FAST16_MAX ? 1 : -1; int check_uint_fast32: (uint_fast32_t) -1 == UINT_FAST32_MAX ? 1 : -1; int check_uint_fast64: (uint_fast64_t) -1 == UINT_FAST64_MAX ? 1 : -1; int check_uintptr: (uintptr_t) -1 == UINTPTR_MAX ? 1 : -1; int check_uintmax: (uintmax_t) -1 == UINTMAX_MAX ? 1 : -1; int check_size: (size_t) -1 == SIZE_MAX ? 1 : -1; }; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on native Windows. mingw* | windows*) gl_cv_header_working_stdint_h="guessing yes" ;; # In general, assume it works. *) gl_cv_header_working_stdint_h="guessing yes" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #define __STDC_CONSTANT_MACROS 1 #define __STDC_LIMIT_MACROS 1 #include #include #include #if HAVE_WCHAR_H # include #endif #include #include #define MVAL(macro) MVAL1(macro) #define MVAL1(expression) #expression static const char *macro_values[] = { #ifdef INT8_MAX MVAL (INT8_MAX), #endif #ifdef INT16_MAX MVAL (INT16_MAX), #endif #ifdef INT32_MAX MVAL (INT32_MAX), #endif #ifdef INT64_MAX MVAL (INT64_MAX), #endif #ifdef UINT8_MAX MVAL (UINT8_MAX), #endif #ifdef UINT16_MAX MVAL (UINT16_MAX), #endif #ifdef UINT32_MAX MVAL (UINT32_MAX), #endif #ifdef UINT64_MAX MVAL (UINT64_MAX), #endif NULL }; int main (void) { const char **mv; for (mv = macro_values; *mv != NULL; mv++) { const char *value = *mv; /* Test whether it looks like a cast expression. */ if (strncmp (value, "((unsigned int)"/*)*/, 15) == 0 || strncmp (value, "((unsigned short)"/*)*/, 17) == 0 || strncmp (value, "((unsigned char)"/*)*/, 16) == 0 || strncmp (value, "((int)"/*)*/, 6) == 0 || strncmp (value, "((signed short)"/*)*/, 15) == 0 || strncmp (value, "((signed char)"/*)*/, 14) == 0) return mv - macro_values + 1; } return 0; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_header_working_stdint_h=yes fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_working_stdint_h" >&5 printf "%s\n" "$gl_cv_header_working_stdint_h" >&6; } fi HAVE_C99_STDINT_H=0 HAVE_SYS_BITYPES_H=0 HAVE_SYS_INTTYPES_H=0 GL_GENERATE_STDINT_H=true case "$gl_cv_header_working_stdint_h" in *yes) HAVE_C99_STDINT_H=1 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stdint.h works without ISO C predefines" >&5 printf %s "checking whether stdint.h works without ISO C predefines... " >&6; } if test ${gl_cv_header_stdint_without_STDC_macros+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_header_stdint_without_STDC_macros=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #include #include #include #if HAVE_WCHAR_H # include #endif intmax_t im = INTMAX_MAX; int32_t i32 = INT32_C (0x7fffffff); int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_stdint_without_STDC_macros=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_stdint_without_STDC_macros" >&5 printf "%s\n" "$gl_cv_header_stdint_without_STDC_macros" >&6; } if test $gl_cv_header_stdint_without_STDC_macros = no; then printf "%s\n" "#define __STDC_CONSTANT_MACROS 1" >>confdefs.h printf "%s\n" "#define __STDC_LIMIT_MACROS 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stdint.h has UINTMAX_WIDTH etc." >&5 printf %s "checking whether stdint.h has UINTMAX_WIDTH etc.... " >&6; } if test ${gl_cv_header_stdint_width+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_header_stdint_width=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Work if build is not clean. */ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 #ifndef __STDC_WANT_IEC_60559_BFP_EXT__ #define __STDC_WANT_IEC_60559_BFP_EXT__ 1 #endif #include #include #include #if HAVE_WCHAR_H # include #endif int iw = UINTMAX_WIDTH; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_stdint_width=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_stdint_width" >&5 printf "%s\n" "$gl_cv_header_stdint_width" >&6; } if test "$gl_cv_header_stdint_width" = yes; then GL_GENERATE_STDINT_H=false fi ;; *) ac_fn_c_check_header_compile "$LINENO" "sys/inttypes.h" "ac_cv_header_sys_inttypes_h" "$ac_includes_default" if test "x$ac_cv_header_sys_inttypes_h" = xyes then : printf "%s\n" "#define HAVE_SYS_INTTYPES_H 1" >>confdefs.h fi ac_fn_c_check_header_compile "$LINENO" "sys/bitypes.h" "ac_cv_header_sys_bitypes_h" "$ac_includes_default" if test "x$ac_cv_header_sys_bitypes_h" = xyes then : printf "%s\n" "#define HAVE_SYS_BITYPES_H 1" >>confdefs.h fi if test $ac_cv_header_sys_inttypes_h = yes; then HAVE_SYS_INTTYPES_H=1 fi if test $ac_cv_header_sys_bitypes_h = yes; then HAVE_SYS_BITYPES_H=1 fi if test $APPLE_UNIVERSAL_BUILD = 0; then for gltype in ptrdiff_t size_t ; do { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 printf %s "checking for bit size of $gltype... " >&6; } if eval test \${gl_cv_bitsizeof_${gltype}+y} then : printf %s "(cached) " >&6 else case e in #( e) if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " #include #include #if HAVE_WCHAR_H # include #endif #include " then : else case e in #( e) result=unknown ;; esac fi eval gl_cv_bitsizeof_${gltype}=\$result ;; esac fi eval ac_res=\$gl_cv_bitsizeof_${gltype} { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval result=\$gl_cv_bitsizeof_${gltype} if test $result = unknown; then result=0 fi GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` printf "%s\n" "#define BITSIZEOF_${GLTYPE} $result" >>confdefs.h eval BITSIZEOF_${GLTYPE}=\$result done fi for gltype in sig_atomic_t wchar_t wint_t ; do { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 printf %s "checking for bit size of $gltype... " >&6; } if eval test \${gl_cv_bitsizeof_${gltype}+y} then : printf %s "(cached) " >&6 else case e in #( e) if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " #include #include #if HAVE_WCHAR_H # include #endif #include " then : else case e in #( e) result=unknown ;; esac fi eval gl_cv_bitsizeof_${gltype}=\$result ;; esac fi eval ac_res=\$gl_cv_bitsizeof_${gltype} { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval result=\$gl_cv_bitsizeof_${gltype} if test $result = unknown; then result=0 fi GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` printf "%s\n" "#define BITSIZEOF_${GLTYPE} $result" >>confdefs.h eval BITSIZEOF_${GLTYPE}=\$result done for gltype in sig_atomic_t wchar_t wint_t ; do { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether $gltype is signed" >&5 printf %s "checking whether $gltype is signed... " >&6; } if eval test \${gl_cv_type_${gltype}_signed+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_WCHAR_H # include #endif int verify[2 * (($gltype) -1 < ($gltype) 0) - 1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : result=yes else case e in #( e) result=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext eval gl_cv_type_${gltype}_signed=\$result ;; esac fi eval ac_res=\$gl_cv_type_${gltype}_signed { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } eval result=\$gl_cv_type_${gltype}_signed GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` if test "$result" = yes; then printf "%s\n" "#define HAVE_SIGNED_${GLTYPE} 1" >>confdefs.h eval HAVE_SIGNED_${GLTYPE}=1 else eval HAVE_SIGNED_${GLTYPE}=0 fi done gl_cv_type_ptrdiff_t_signed=yes gl_cv_type_size_t_signed=no if test $APPLE_UNIVERSAL_BUILD = 0; then for gltype in ptrdiff_t size_t ; do { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 printf %s "checking for $gltype integer literal suffix... " >&6; } if eval test \${gl_cv_type_${gltype}_suffix+y} then : printf %s "(cached) " >&6 else case e in #( e) eval gl_cv_type_${gltype}_suffix=no eval result=\$gl_cv_type_${gltype}_signed if test "$result" = yes; then glsufu= else glsufu=u fi for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do case $glsuf in '') gltype1='int';; l) gltype1='long int';; ll) gltype1='long long int';; i64) gltype1='__int64';; u) gltype1='unsigned int';; ul) gltype1='unsigned long int';; ull) gltype1='unsigned long long int';; ui64)gltype1='unsigned __int64';; esac cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_WCHAR_H # include #endif extern $gltype foo; extern $gltype1 foo; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval gl_cv_type_${gltype}_suffix=\$glsuf fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext eval result=\$gl_cv_type_${gltype}_suffix test "$result" != no && break done ;; esac fi eval ac_res=\$gl_cv_type_${gltype}_suffix { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` eval result=\$gl_cv_type_${gltype}_suffix test "$result" = no && result= eval ${GLTYPE}_SUFFIX=\$result printf "%s\n" "#define ${GLTYPE}_SUFFIX $result" >>confdefs.h done fi for gltype in sig_atomic_t wchar_t wint_t ; do { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 printf %s "checking for $gltype integer literal suffix... " >&6; } if eval test \${gl_cv_type_${gltype}_suffix+y} then : printf %s "(cached) " >&6 else case e in #( e) eval gl_cv_type_${gltype}_suffix=no eval result=\$gl_cv_type_${gltype}_signed if test "$result" = yes; then glsufu= else glsufu=u fi for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do case $glsuf in '') gltype1='int';; l) gltype1='long int';; ll) gltype1='long long int';; i64) gltype1='__int64';; u) gltype1='unsigned int';; ul) gltype1='unsigned long int';; ull) gltype1='unsigned long long int';; ui64)gltype1='unsigned __int64';; esac cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_WCHAR_H # include #endif extern $gltype foo; extern $gltype1 foo; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : eval gl_cv_type_${gltype}_suffix=\$glsuf fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext eval result=\$gl_cv_type_${gltype}_suffix test "$result" != no && break done ;; esac fi eval ac_res=\$gl_cv_type_${gltype}_suffix { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 printf "%s\n" "$ac_res" >&6; } GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` eval result=\$gl_cv_type_${gltype}_suffix test "$result" = no && result= eval ${GLTYPE}_SUFFIX=\$result printf "%s\n" "#define ${GLTYPE}_SUFFIX $result" >>confdefs.h done if test $GNULIBHEADERS_OVERRIDE_WINT_T = 1; then BITSIZEOF_WINT_T=32 fi ;; esac GL_GENERATE_LIMITS_H=true ac_fn_c_check_type "$LINENO" "pid_t" "ac_cv_type_pid_t" "$ac_includes_default " if test "x$ac_cv_type_pid_t" = xyes then : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined _WIN64 && !defined __CYGWIN__ LLP64 #endif int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_pid_type='int' else case e in #( e) ac_pid_type='__int64' ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext printf "%s\n" "#define pid_t $ac_pid_type" >>confdefs.h ;; esac fi ac_fn_c_check_type "$LINENO" "mode_t" "ac_cv_type_mode_t" "$ac_includes_default" if test "x$ac_cv_type_mode_t" = xyes then : else case e in #( e) printf "%s\n" "#define mode_t int" >>confdefs.h ;; esac fi case "$host_os" in mingw* | windows*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for 64-bit off_t" >&5 printf %s "checking for 64-bit off_t... " >&6; } if test ${gl_cv_type_off_t_64+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int verify_off_t_size[sizeof (off_t) >= 8 ? 1 : -1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_type_off_t_64=yes else case e in #( e) gl_cv_type_off_t_64=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_type_off_t_64" >&5 printf "%s\n" "$gl_cv_type_off_t_64" >&6; } if test $gl_cv_type_off_t_64 = no; then WINDOWS_64_BIT_OFF_T=1 else WINDOWS_64_BIT_OFF_T=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for 64-bit st_size" >&5 printf %s "checking for 64-bit st_size... " >&6; } if test ${gl_cv_member_st_size_64+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include struct stat buf; int verify_st_size_size[sizeof (buf.st_size) >= 8 ? 1 : -1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_member_st_size_64=yes else case e in #( e) gl_cv_member_st_size_64=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_member_st_size_64" >&5 printf "%s\n" "$gl_cv_member_st_size_64" >&6; } if test $gl_cv_member_st_size_64 = no; then WINDOWS_64_BIT_ST_SIZE=1 else WINDOWS_64_BIT_ST_SIZE=0 fi ;; *) WINDOWS_64_BIT_OFF_T=0 WINDOWS_64_BIT_ST_SIZE=0 ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for off64_t" >&5 printf %s "checking for off64_t... " >&6; } if test ${gl_cv_off64_t+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { int x = sizeof (off64_t *) + sizeof (off64_t); return !x; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_off64_t=yes else case e in #( e) gl_cv_off64_t=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_off64_t" >&5 printf "%s\n" "$gl_cv_off64_t" >&6; } if test $gl_cv_off64_t != no; then HAVE_OFF64_T=1 else HAVE_OFF64_T=0 fi printf "%s\n" "#define _USE_STD_STAT 1" >>confdefs.h if test $gl_cv_have_include_next = yes; then gl_cv_next_sys_types_h='<'sys/types.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_sys_types_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'sys/types.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_sys_types_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_sys_types_h gl_cv_next_sys_types_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_sys_types_h" >&5 printf "%s\n" "$gl_cv_next_sys_types_h" >&6; } fi NEXT_SYS_TYPES_H=$gl_cv_next_sys_types_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'sys/types.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_sys_types_h fi NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H=$gl_next_as_first_directive WINDOWS_STAT_INODES=0 ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" if test "x$ac_cv_type_size_t" = xyes then : else case e in #( e) printf "%s\n" "#define size_t unsigned int" >>confdefs.h ;; esac fi # The Ultrix 4.2 mips builtin alloca declared by alloca.h only works # for constant arguments. Useless! { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working alloca.h" >&5 printf %s "checking for working alloca.h... " >&6; } if test ${ac_cv_working_alloca_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { char *p = (char *) alloca (2 * sizeof (int)); if (p) return 0; ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_working_alloca_h=yes else case e in #( e) ac_cv_working_alloca_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_working_alloca_h" >&5 printf "%s\n" "$ac_cv_working_alloca_h" >&6; } if test $ac_cv_working_alloca_h = yes; then printf "%s\n" "#define HAVE_ALLOCA_H 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for alloca" >&5 printf %s "checking for alloca... " >&6; } if test ${ac_cv_func_alloca_works+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_func_alloca_works=$ac_cv_working_alloca_h if test "$ac_cv_func_alloca_works" != yes then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #ifndef alloca # ifdef __GNUC__ # define alloca __builtin_alloca # elif defined _MSC_VER # include # define alloca _alloca # else # ifdef __cplusplus extern "C" # endif void *alloca (size_t); # endif #endif int main (void) { char *p = (char *) alloca (1); if (p) return 0; ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_func_alloca_works=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_alloca_works" >&5 printf "%s\n" "$ac_cv_func_alloca_works" >&6; } if test $ac_cv_func_alloca_works = yes; then printf "%s\n" "#define HAVE_ALLOCA 1" >>confdefs.h else # The SVR3 libPW and SVR4 libucb both contain incompatible functions # that cause trouble. Some versions do not even contain alloca or # contain a buggy version. If you still want to use their alloca, # use ar to extract alloca.o from them instead of compiling alloca.c. ALLOCA=\${LIBOBJDIR}alloca.$ac_objext printf "%s\n" "#define C_ALLOCA 1" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking stack direction for C alloca" >&5 printf %s "checking stack direction for C alloca... " >&6; } if test ${ac_cv_c_stack_direction+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : ac_cv_c_stack_direction=0 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ $ac_includes_default int find_stack_direction (int *addr, int depth) { int dir, dummy = 0; if (! addr) addr = &dummy; *addr = addr < &dummy ? 1 : addr == &dummy ? 0 : -1; dir = depth ? find_stack_direction (addr, depth - 1) : 0; return dir + dummy; } int main (int argc, char **argv) { return find_stack_direction (0, argc + !argv + 20) < 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ac_cv_c_stack_direction=1 else case e in #( e) ac_cv_c_stack_direction=-1 ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_stack_direction" >&5 printf "%s\n" "$ac_cv_c_stack_direction" >&6; } printf "%s\n" "#define STACK_DIRECTION $ac_cv_c_stack_direction" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for inline" >&5 printf %s "checking for inline... " >&6; } if test ${ac_cv_c_inline+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_c_inline=no for ac_kw in inline __inline__ __inline; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifndef __cplusplus typedef int foo_t; static $ac_kw foo_t static_foo (void) {return 0; } $ac_kw foo_t foo (void) {return 0; } #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_c_inline=$ac_kw fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext test "$ac_cv_c_inline" != no && break done ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_inline" >&5 printf "%s\n" "$ac_cv_c_inline" >&6; } case $ac_cv_c_inline in inline | yes) ;; *) case $ac_cv_c_inline in no) ac_val=;; *) ac_val=$ac_cv_c_inline;; esac cat >>confdefs.h <<_ACEOF #ifndef __cplusplus #define inline $ac_val #endif _ACEOF ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for __sync_bool_compare_and_swap" >&5 printf %s "checking for __sync_bool_compare_and_swap... " >&6; } if test ${gl_cv_builtin_sync_bool_compare_and_swap+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ int cmpxchg (int* value, int comp_val, int new_val) { return __sync_val_compare_and_swap (value, comp_val, new_val); } int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_builtin_sync_bool_compare_and_swap=yes else case e in #( e) gl_cv_builtin_sync_bool_compare_and_swap=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_builtin_sync_bool_compare_and_swap" >&5 printf "%s\n" "$gl_cv_builtin_sync_bool_compare_and_swap" >&6; } if test $gl_cv_builtin_sync_bool_compare_and_swap = yes; then printf "%s\n" "#define HAVE_ATOMIC_COMPARE_AND_SWAP_GCC41 1" >>confdefs.h fi HAVE_CHOWN=1; HAVE_COPY_FILE_RANGE=1; HAVE_DUP3=1; HAVE_EUIDACCESS=1; HAVE_EXECVPE=1; HAVE_FACCESSAT=1; HAVE_FCHDIR=1; HAVE_FCHOWNAT=1; HAVE_FDATASYNC=1; HAVE_FSYNC=1; HAVE_FTRUNCATE=1; HAVE_GETDTABLESIZE=1; HAVE_GETENTROPY=1; HAVE_GETGROUPS=1; HAVE_GETHOSTNAME=1; HAVE_GETLOGIN=1; HAVE_GETPAGESIZE=1; HAVE_GETPASS=1; HAVE_GROUP_MEMBER=1; HAVE_LCHOWN=1; HAVE_LINK=1; HAVE_LINKAT=1; HAVE_PIPE=1; HAVE_PIPE2=1; HAVE_PREAD=1; HAVE_PWRITE=1; HAVE_READLINK=1; HAVE_READLINKAT=1; HAVE_SETHOSTNAME=1; HAVE_SLEEP=1; HAVE_SYMLINK=1; HAVE_SYMLINKAT=1; HAVE_UNLINKAT=1; HAVE_USLEEP=1; HAVE_DECL_ENVIRON=1; HAVE_DECL_EXECVPE=1; HAVE_DECL_FCHDIR=1; HAVE_DECL_FDATASYNC=1; HAVE_DECL_GETDOMAINNAME=1; HAVE_DECL_GETLOGIN=1; HAVE_DECL_GETLOGIN_R=1; HAVE_DECL_GETPAGESIZE=1; HAVE_DECL_GETUSERSHELL=1; HAVE_DECL_SETHOSTNAME=1; HAVE_DECL_TRUNCATE=1; HAVE_DECL_TTYNAME_R=1; HAVE_OS_H=0; HAVE_SYS_PARAM_H=0; REPLACE_ACCESS=0; REPLACE_CHOWN=0; REPLACE_CLOSE=0; REPLACE_COPY_FILE_RANGE=0; REPLACE_DUP=0; REPLACE_DUP2=0; REPLACE_DUP3=0; REPLACE_EXECL=0; REPLACE_EXECLE=0; REPLACE_EXECLP=0; REPLACE_EXECV=0; REPLACE_EXECVE=0; REPLACE_EXECVP=0; REPLACE_EXECVPE=0; REPLACE_FACCESSAT=0; REPLACE_FCHDIR=0; REPLACE_FCHOWNAT=0; REPLACE_FDATASYNC=0; REPLACE_FTRUNCATE=0; REPLACE_GETCWD=0; REPLACE_GETDOMAINNAME=0; REPLACE_GETDTABLESIZE=0; REPLACE_GETENTROPY=0; REPLACE_GETLOGIN_R=0; REPLACE_GETGROUPS=0; REPLACE_GETPAGESIZE=0; REPLACE_GETPASS=0; REPLACE_GETPASS_FOR_GETPASS_GNU=0; REPLACE_GETUSERSHELL=0; REPLACE_ISATTY=0; REPLACE_LCHOWN=0; REPLACE_LINK=0; REPLACE_LINKAT=0; REPLACE_LSEEK=0; REPLACE_PIPE2=0; REPLACE_PREAD=0; REPLACE_PWRITE=0; REPLACE_READ=0; REPLACE_READLINK=0; REPLACE_READLINKAT=0; REPLACE_RMDIR=0; REPLACE_SETHOSTNAME=0; REPLACE_SLEEP=0; REPLACE_SYMLINK=0; REPLACE_SYMLINKAT=0; REPLACE_TRUNCATE=0; REPLACE_TTYNAME_R=0; REPLACE_UNLINK=0; REPLACE_UNLINKAT=0; REPLACE_USLEEP=0; REPLACE_WRITE=0; UNISTD_H_HAVE_SYS_RANDOM_H=0; UNISTD_H_HAVE_WINSOCK2_H=0; UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS=0; ac_func= for ac_item in $ac_func_c_list do if test $ac_func; then ac_fn_c_check_func "$LINENO" $ac_func ac_cv_func_$ac_func if eval test \"x\$ac_cv_func_$ac_func\" = xyes; then echo "#define $ac_item 1" >> confdefs.h fi ac_func= else ac_func=$ac_item fi done if test $ac_cv_func__set_invalid_parameter_handler = yes; then HAVE_MSVC_INVALID_PARAMETER_HANDLER=1 printf "%s\n" "#define HAVE_MSVC_INVALID_PARAMETER_HANDLER 1" >>confdefs.h else HAVE_MSVC_INVALID_PARAMETER_HANDLER=0 fi if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then REPLACE_CLOSE=1 fi if test $ac_cv_header_sys_socket_h != yes; then ac_fn_c_check_header_compile "$LINENO" "winsock2.h" "ac_cv_header_winsock2_h" "$ac_includes_default" if test "x$ac_cv_header_winsock2_h" = xyes then : printf "%s\n" "#define HAVE_WINSOCK2_H 1" >>confdefs.h fi fi if test "$ac_cv_header_winsock2_h" = yes; then HAVE_WINSOCK2_H=1 UNISTD_H_HAVE_WINSOCK2_H=1 SYS_IOCTL_H_HAVE_WINSOCK2_H=1 else HAVE_WINSOCK2_H=0 fi if test $UNISTD_H_HAVE_WINSOCK2_H = 1; then REPLACE_CLOSE=1 fi GL_GNULIB_ACCESS=0 GL_GNULIB_CHDIR=0 GL_GNULIB_CHOWN=0 GL_GNULIB_CLOSE=0 GL_GNULIB_COPY_FILE_RANGE=0 GL_GNULIB_DUP=0 GL_GNULIB_DUP2=0 GL_GNULIB_DUP3=0 GL_GNULIB_ENVIRON=0 GL_GNULIB_EUIDACCESS=0 GL_GNULIB_EXECL=0 GL_GNULIB_EXECLE=0 GL_GNULIB_EXECLP=0 GL_GNULIB_EXECV=0 GL_GNULIB_EXECVE=0 GL_GNULIB_EXECVP=0 GL_GNULIB_EXECVPE=0 GL_GNULIB_FACCESSAT=0 GL_GNULIB_FCHDIR=0 GL_GNULIB_FCHOWNAT=0 GL_GNULIB_FDATASYNC=0 GL_GNULIB_FSYNC=0 GL_GNULIB_FTRUNCATE=0 GL_GNULIB_GETCWD=0 GL_GNULIB_GETDOMAINNAME=0 GL_GNULIB_GETDTABLESIZE=0 GL_GNULIB_GETENTROPY=0 GL_GNULIB_GETGROUPS=0 GL_GNULIB_GETHOSTNAME=0 GL_GNULIB_GETLOGIN=0 GL_GNULIB_GETLOGIN_R=0 GL_GNULIB_GETOPT_POSIX=0 GL_GNULIB_GETPAGESIZE=0 GL_GNULIB_GETPASS=0 GL_GNULIB_GETPASS_GNU=0 GL_GNULIB_GETUSERSHELL=0 GL_GNULIB_GROUP_MEMBER=0 GL_GNULIB_ISATTY=0 GL_GNULIB_LCHOWN=0 GL_GNULIB_LINK=0 GL_GNULIB_LINKAT=0 GL_GNULIB_LSEEK=0 GL_GNULIB_PIPE=0 GL_GNULIB_PIPE2=0 GL_GNULIB_PREAD=0 GL_GNULIB_PWRITE=0 GL_GNULIB_READ=0 GL_GNULIB_READLINK=0 GL_GNULIB_READLINKAT=0 GL_GNULIB_RMDIR=0 GL_GNULIB_SETHOSTNAME=0 GL_GNULIB_SLEEP=0 GL_GNULIB_SYMLINK=0 GL_GNULIB_SYMLINKAT=0 GL_GNULIB_TRUNCATE=0 GL_GNULIB_TTYNAME_R=0 GL_GNULIB_UNISTD_H_GETOPT=0 GL_GNULIB_UNISTD_H_NONBLOCKING=0 GL_GNULIB_UNISTD_H_SIGPIPE=0 GL_GNULIB_UNLINK=0 GL_GNULIB_UNLINKAT=0 GL_GNULIB_USLEEP=0 GL_GNULIB_WRITE=0 GL_GNULIB_MDA_ACCESS=1 GL_GNULIB_MDA_CHDIR=1 GL_GNULIB_MDA_CLOSE=1 GL_GNULIB_MDA_DUP=1 GL_GNULIB_MDA_DUP2=1 GL_GNULIB_MDA_EXECL=1 GL_GNULIB_MDA_EXECLE=1 GL_GNULIB_MDA_EXECLP=1 GL_GNULIB_MDA_EXECV=1 GL_GNULIB_MDA_EXECVE=1 GL_GNULIB_MDA_EXECVP=1 GL_GNULIB_MDA_EXECVPE=1 GL_GNULIB_MDA_GETCWD=1 GL_GNULIB_MDA_GETPID=1 GL_GNULIB_MDA_ISATTY=1 GL_GNULIB_MDA_LSEEK=1 GL_GNULIB_MDA_READ=1 GL_GNULIB_MDA_RMDIR=1 GL_GNULIB_MDA_SWAB=1 GL_GNULIB_MDA_UNLINK=1 GL_GNULIB_MDA_WRITE=1 gl_mda_defines=' #if defined _WIN32 && !defined __CYGWIN__ #define access _access #define chdir _chdir #define chmod _chmod #define close _close #define creat _creat #define dup _dup #define dup2 _dup2 #define ecvt _ecvt #define execl _execl #define execle _execle #define execlp _execlp #define execv _execv #define execve _execve #define execvp _execvp #define execvpe _execvpe #define fcloseall _fcloseall #define fcvt _fcvt #define fdopen _fdopen #define fileno _fileno #define gcvt _gcvt #define getcwd _getcwd #define getpid _getpid #define getw _getw #define isatty _isatty #define j0 _j0 #define j1 _j1 #define jn _jn #define lfind _lfind #define lsearch _lsearch #define lseek _lseek #define memccpy _memccpy #define mkdir _mkdir #define mktemp _mktemp #define open _open #define putenv _putenv #define putw _putw #define read _read #define rmdir _rmdir #define strdup _strdup #define swab _swab #define tempnam _tempnam #define tzset _tzset #define umask _umask #define unlink _unlink #define utime _utime #define wcsdup _wcsdup #define write _write #define y0 _y0 #define y1 _y1 #define yn _yn #endif ' { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for complete errno.h" >&5 printf %s "checking for complete errno.h... " >&6; } if test ${gl_cv_header_errno_h_complete+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if !defined ETXTBSY booboo #endif #if !defined ENOMSG booboo #endif #if !defined EIDRM booboo #endif #if !defined ENOLINK booboo #endif #if !defined EPROTO booboo #endif #if !defined EMULTIHOP booboo #endif #if !defined EBADMSG booboo #endif #if !defined EOVERFLOW booboo #endif #if !defined ENOTSUP booboo #endif #if !defined ENETRESET booboo #endif #if !defined ECONNABORTED booboo #endif #if !defined ESTALE booboo #endif #if !defined EDQUOT booboo #endif #if !defined ECANCELED booboo #endif #if !defined EOWNERDEAD booboo #endif #if !defined ENOTRECOVERABLE booboo #endif #if !defined EILSEQ booboo #endif #if !defined ESOCKTNOSUPPORT booboo #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "booboo" >/dev/null 2>&1 then : gl_cv_header_errno_h_complete=no else case e in #( e) gl_cv_header_errno_h_complete=yes ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_errno_h_complete" >&5 printf "%s\n" "$gl_cv_header_errno_h_complete" >&6; } if test $gl_cv_header_errno_h_complete = yes; then GL_GENERATE_ERRNO_H=false else if test $gl_cv_have_include_next = yes; then gl_cv_next_errno_h='<'errno.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_errno_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'errno.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_errno_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_errno_h gl_cv_next_errno_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_errno_h" >&5 printf "%s\n" "$gl_cv_next_errno_h" >&6; } fi NEXT_ERRNO_H=$gl_cv_next_errno_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'errno.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_errno_h fi NEXT_AS_FIRST_DIRECTIVE_ERRNO_H=$gl_next_as_first_directive GL_GENERATE_ERRNO_H=true fi if $GL_GENERATE_ERRNO_H; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for EMULTIHOP value" >&5 printf %s "checking for EMULTIHOP value... " >&6; } if test ${gl_cv_header_errno_h_EMULTIHOP+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef EMULTIHOP yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_EMULTIHOP=yes else case e in #( e) gl_cv_header_errno_h_EMULTIHOP=no ;; esac fi rm -rf conftest* if test $gl_cv_header_errno_h_EMULTIHOP = no; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _XOPEN_SOURCE_EXTENDED 1 #include #ifdef EMULTIHOP yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_EMULTIHOP=hidden fi rm -rf conftest* if test $gl_cv_header_errno_h_EMULTIHOP = hidden; then if ac_fn_c_compute_int "$LINENO" "EMULTIHOP" "gl_cv_header_errno_h_EMULTIHOP" " #define _XOPEN_SOURCE_EXTENDED 1 #include /* The following two lines are a workaround against an autoconf-2.52 bug. */ #include #include " then : fi fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_errno_h_EMULTIHOP" >&5 printf "%s\n" "$gl_cv_header_errno_h_EMULTIHOP" >&6; } case $gl_cv_header_errno_h_EMULTIHOP in yes | no) EMULTIHOP_HIDDEN=0; EMULTIHOP_VALUE= ;; *) EMULTIHOP_HIDDEN=1; EMULTIHOP_VALUE="$gl_cv_header_errno_h_EMULTIHOP" ;; esac fi if $GL_GENERATE_ERRNO_H; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for ENOLINK value" >&5 printf %s "checking for ENOLINK value... " >&6; } if test ${gl_cv_header_errno_h_ENOLINK+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef ENOLINK yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_ENOLINK=yes else case e in #( e) gl_cv_header_errno_h_ENOLINK=no ;; esac fi rm -rf conftest* if test $gl_cv_header_errno_h_ENOLINK = no; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _XOPEN_SOURCE_EXTENDED 1 #include #ifdef ENOLINK yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_ENOLINK=hidden fi rm -rf conftest* if test $gl_cv_header_errno_h_ENOLINK = hidden; then if ac_fn_c_compute_int "$LINENO" "ENOLINK" "gl_cv_header_errno_h_ENOLINK" " #define _XOPEN_SOURCE_EXTENDED 1 #include /* The following two lines are a workaround against an autoconf-2.52 bug. */ #include #include " then : fi fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_errno_h_ENOLINK" >&5 printf "%s\n" "$gl_cv_header_errno_h_ENOLINK" >&6; } case $gl_cv_header_errno_h_ENOLINK in yes | no) ENOLINK_HIDDEN=0; ENOLINK_VALUE= ;; *) ENOLINK_HIDDEN=1; ENOLINK_VALUE="$gl_cv_header_errno_h_ENOLINK" ;; esac fi if $GL_GENERATE_ERRNO_H; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for EOVERFLOW value" >&5 printf %s "checking for EOVERFLOW value... " >&6; } if test ${gl_cv_header_errno_h_EOVERFLOW+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef EOVERFLOW yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_EOVERFLOW=yes else case e in #( e) gl_cv_header_errno_h_EOVERFLOW=no ;; esac fi rm -rf conftest* if test $gl_cv_header_errno_h_EOVERFLOW = no; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define _XOPEN_SOURCE_EXTENDED 1 #include #ifdef EOVERFLOW yes #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "yes" >/dev/null 2>&1 then : gl_cv_header_errno_h_EOVERFLOW=hidden fi rm -rf conftest* if test $gl_cv_header_errno_h_EOVERFLOW = hidden; then if ac_fn_c_compute_int "$LINENO" "EOVERFLOW" "gl_cv_header_errno_h_EOVERFLOW" " #define _XOPEN_SOURCE_EXTENDED 1 #include /* The following two lines are a workaround against an autoconf-2.52 bug. */ #include #include " then : fi fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_errno_h_EOVERFLOW" >&5 printf "%s\n" "$gl_cv_header_errno_h_EOVERFLOW" >&6; } case $gl_cv_header_errno_h_EOVERFLOW in yes | no) EOVERFLOW_HIDDEN=0; EOVERFLOW_VALUE= ;; *) EOVERFLOW_HIDDEN=1; EOVERFLOW_VALUE="$gl_cv_header_errno_h_EOVERFLOW" ;; esac fi if test $gl_cv_have_include_next = yes; then gl_cv_next_error_h='<'error.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_error_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_error_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'error.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_error_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_error_h gl_cv_next_error_h='"'$gl_header'"' else gl_cv_next_error_h='<'error.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_error_h" >&5 printf "%s\n" "$gl_cv_next_error_h" >&6; } fi NEXT_ERROR_H=$gl_cv_next_error_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'error.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_error_h fi NEXT_AS_FIRST_DIRECTIVE_ERROR_H=$gl_next_as_first_directive if test $ac_cv_header_error_h = yes; then HAVE_ERROR_H=1 else HAVE_ERROR_H=0 fi REPLACE_ERROR=0 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for error" >&5 printf %s "checking for error... " >&6; } if test ${gl_cv_onwards_func_error+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "error" "ac_cv_have_decl_error" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_error" = xyes then : fi if test $ac_cv_have_decl_error = yes; then ac_fn_c_check_func "$LINENO" "error" "ac_cv_func_error" if test "x$ac_cv_func_error" = xyes then : fi if test $ac_cv_func_error = yes; then gl_cv_onwards_func_error=yes else gl_cv_onwards_func_error='future OS version' fi else gl_cv_onwards_func_error='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "error" "ac_cv_func_error" if test "x$ac_cv_func_error" = xyes then : fi gl_cv_onwards_func_error=$ac_cv_func_error ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_error" >&5 printf "%s\n" "$gl_cv_onwards_func_error" >&6; } case "$gl_cv_onwards_func_error" in future*) ac_cv_func_error=no ;; *) ac_cv_func_error=$gl_cv_onwards_func_error ;; esac if test $ac_cv_func_error = yes; then printf "%s\n" "#define HAVE_ERROR 1" >>confdefs.h fi if test $ac_cv_func_error = yes; then HAVE_ERROR=1 else HAVE_ERROR=0 case "$gl_cv_onwards_func_error" in future*) REPLACE_ERROR=1 ;; esac fi ac_fn_check_decl "$LINENO" "error_at_line" "ac_cv_have_decl_error_at_line" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_error_at_line" = xyes then : fi if test $ac_cv_have_decl_error_at_line = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for error_at_line" >&5 printf %s "checking for error_at_line... " >&6; } if test ${ac_cv_lib_error_at_line+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { error_at_line (0, 0, "", 0, "an error occurred"); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_error_at_line=yes else case e in #( e) ac_cv_lib_error_at_line=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_error_at_line" >&5 printf "%s\n" "$ac_cv_lib_error_at_line" >&6; } else ac_cv_lib_error_at_line=no fi if test $ac_cv_lib_error_at_line = yes; then HAVE_ERROR_AT_LINE=1 else HAVE_ERROR_AT_LINE=0 fi REPLACE_ERROR_AT_LINE=0 if test $ac_cv_func_error = yes && test $ac_cv_lib_error_at_line = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working error function" >&5 printf %s "checking for working error function... " >&6; } if test ${gl_cv_func_working_error+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $cross_compiling != yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include static void print_no_progname (void) {} int main (void) { error_print_progname = print_no_progname; error (0, 0, "foo"); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : rm -f conftest.out if test -s conftest$ac_exeext \ && ./conftest$ac_exeext 2> conftest.out; then if grep ' ' conftest.out >/dev/null; then gl_cv_func_working_error=no else gl_cv_func_working_error=yes fi else gl_cv_func_working_error=no fi rm -f conftest.out else case e in #( e) gl_cv_func_working_error=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext else cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { error (0, 0, "foo"); ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_working_error="guessing yes" ;; # Guess no on Android. linux*-android*) gl_cv_func_working_error="guessing no" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_working_error="$gl_cross_guess_normal" ;; esac else case e in #( e) gl_cv_func_working_error=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_working_error" >&5 printf "%s\n" "$gl_cv_func_working_error" >&6; } case "$gl_cv_func_working_error" in *no) REPLACE_ERROR=1 REPLACE_ERROR_AT_LINE=1 ;; esac fi if test $HAVE_ERROR = 0 || test $REPLACE_ERROR = 1 \ || test $HAVE_ERROR_AT_LINE = 0 \ || test $REPLACE_ERROR_AT_LINE = 1; then COMPILE_ERROR_C=1 else COMPILE_ERROR_C=0 fi ac_fn_check_decl "$LINENO" "strerror_r" "ac_cv_have_decl_strerror_r" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_strerror_r" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_STRERROR_R $ac_have_decl" >>confdefs.h if test $ac_cv_have_decl_strerror_r = yes; then # For backward compatibility's sake, define HAVE_STRERROR_R. # (We used to run AC_CHECK_FUNCS_ONCE for strerror_r, as well # as AC_CHECK_DECLS_ONCE.) printf "%s\n" "#define HAVE_STRERROR_R 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether strerror_r returns char *" >&5 printf %s "checking whether strerror_r returns char *... " >&6; } if test ${ac_cv_func_strerror_r_char_p+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_func_strerror_r_char_p=no if test $ac_cv_have_decl_strerror_r = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { char buf[100]; char x = *strerror_r (0, buf, sizeof buf); char *p = strerror_r (0, buf, sizeof buf); return !p || x; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_func_strerror_r_char_p=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_strerror_r_char_p" >&5 printf "%s\n" "$ac_cv_func_strerror_r_char_p" >&6; } if test $ac_cv_func_strerror_r_char_p = yes; then printf "%s\n" "#define STRERROR_R_CHAR_P 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether ctype.h defines __header_inline" >&5 printf %s "checking whether ctype.h defines __header_inline... " >&6; } if test ${gl_cv_have___header_inline+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifndef __header_inline #error " does not define __header_inline" #endif _ACEOF if ac_fn_c_try_cpp "$LINENO" then : gl_cv_have___header_inline=yes else case e in #( e) gl_cv_have___header_inline=no ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_have___header_inline" >&5 printf "%s\n" "$gl_cv_have___header_inline" >&6; } if test "$gl_cv_have___header_inline" = yes; then printf "%s\n" "#define HAVE___HEADER_INLINE 1" >>confdefs.h fi ac_fn_c_check_type "$LINENO" "sig_atomic_t" "ac_cv_type_sig_atomic_t" "#include " if test "x$ac_cv_type_sig_atomic_t" = xyes then : printf "%s\n" "#define HAVE_SIG_ATOMIC_T 1" >>confdefs.h else case e in #( e) printf "%s\n" "#define sig_atomic_t int" >>confdefs.h ;; esac fi HAVE_FCNTL=1; HAVE_OPENAT=1; REPLACE_CREAT=0; REPLACE_FCNTL=0; REPLACE_OPEN=0; REPLACE_OPENAT=0; GL_GNULIB_CREAT=0 GL_GNULIB_FCNTL=0 GL_GNULIB_NONBLOCKING=0 GL_GNULIB_OPEN=0 GL_GNULIB_OPENAT=0 GL_GNULIB_MDA_CREAT=1 GL_GNULIB_MDA_OPEN=1 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working fcntl.h" >&5 printf %s "checking for working fcntl.h... " >&6; } if test ${gl_cv_header_working_fcntl_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # Guess 'no' on native Windows. mingw* | windows*) gl_cv_header_working_fcntl_h='no' ;; *) gl_cv_header_working_fcntl_h=cross-compiling ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_UNISTD_H # include #else /* on Windows with MSVC */ # include # include # defined sleep(n) _sleep ((n) * 1000) #endif #include $gl_mda_defines #ifndef O_NOATIME #define O_NOATIME 0 #endif #ifndef O_NOFOLLOW #define O_NOFOLLOW 0 #endif static int const constants[] = { O_CREAT, O_EXCL, O_NOCTTY, O_TRUNC, O_APPEND, O_NONBLOCK, O_SYNC, O_ACCMODE, O_RDONLY, O_RDWR, O_WRONLY }; int main (void) { int result = !constants; #if HAVE_SYMLINK { static char const sym[] = "conftest.sym"; if (symlink ("/dev/null", sym) != 0) result |= 2; else { int fd = open (sym, O_WRONLY | O_NOFOLLOW | O_CREAT, 0); if (fd >= 0) { close (fd); result |= 4; } } if (unlink (sym) != 0 || symlink (".", sym) != 0) result |= 2; else { int fd = open (sym, O_RDONLY | O_NOFOLLOW); if (fd >= 0) { close (fd); result |= 4; } } unlink (sym); } #endif { static char const file[] = "confdefs.h"; int fd = open (file, O_RDONLY | O_NOATIME); if (fd < 0) result |= 8; else { struct stat st0; if (fstat (fd, &st0) != 0) result |= 16; else { char c; sleep (1); if (read (fd, &c, 1) != 1) result |= 24; else { if (close (fd) != 0) result |= 32; else { struct stat st1; if (stat (file, &st1) != 0) result |= 40; else if (st0.st_atime != st1.st_atime) result |= 64; } } } } } return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_header_working_fcntl_h=yes else case e in #( e) case $? in #( 4) gl_cv_header_working_fcntl_h='no (bad O_NOFOLLOW)';; #( 64) gl_cv_header_working_fcntl_h='no (bad O_NOATIME)';; #( 68) gl_cv_header_working_fcntl_h='no (bad O_NOATIME, O_NOFOLLOW)';; #( *) gl_cv_header_working_fcntl_h='no';; esac ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_working_fcntl_h" >&5 printf "%s\n" "$gl_cv_header_working_fcntl_h" >&6; } case $gl_cv_header_working_fcntl_h in #( *O_NOATIME* | no | cross-compiling) ac_val=0;; #( *) ac_val=1;; esac printf "%s\n" "#define HAVE_WORKING_O_NOATIME $ac_val" >>confdefs.h case $gl_cv_header_working_fcntl_h in #( *O_NOFOLLOW* | no | cross-compiling) ac_val=0;; #( *) ac_val=1;; esac printf "%s\n" "#define HAVE_WORKING_O_NOFOLLOW $ac_val" >>confdefs.h if test $gl_cv_have_include_next = yes; then gl_cv_next_fcntl_h='<'fcntl.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_fcntl_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'fcntl.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_fcntl_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_fcntl_h gl_cv_next_fcntl_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_fcntl_h" >&5 printf "%s\n" "$gl_cv_next_fcntl_h" >&6; } fi NEXT_FCNTL_H=$gl_cv_next_fcntl_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'fcntl.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_fcntl_h fi NEXT_AS_FIRST_DIRECTIVE_FCNTL_H=$gl_next_as_first_directive HAVE_FCHMODAT=1; HAVE_FSTATAT=1; HAVE_FUTIMENS=1; HAVE_GETUMASK=1; HAVE_LCHMOD=1; HAVE_LSTAT=1; HAVE_MKDIRAT=1; HAVE_MKFIFO=1; HAVE_MKFIFOAT=1; HAVE_MKNOD=1; HAVE_MKNODAT=1; HAVE_UTIMENSAT=1; REPLACE_CHMOD=0; REPLACE_FCHMODAT=0; REPLACE_FSTAT=0; REPLACE_FSTATAT=0; REPLACE_FUTIMENS=0; REPLACE_LSTAT=0; REPLACE_MKDIR=0; REPLACE_MKFIFO=0; REPLACE_MKFIFOAT=0; REPLACE_MKNOD=0; REPLACE_MKNODAT=0; REPLACE_STAT=0; REPLACE_UTIMENSAT=0; { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stat file-mode macros are broken" >&5 printf %s "checking whether stat file-mode macros are broken... " >&6; } if test ${ac_cv_header_stat_broken+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if defined S_ISBLK && defined S_IFDIR extern char c1[S_ISBLK (S_IFDIR) ? -1 : 1]; #endif #if defined S_ISBLK && defined S_IFCHR extern char c2[S_ISBLK (S_IFCHR) ? -1 : 1]; #endif #if defined S_ISLNK && defined S_IFREG extern char c3[S_ISLNK (S_IFREG) ? -1 : 1]; #endif #if defined S_ISSOCK && defined S_IFREG extern char c4[S_ISSOCK (S_IFREG) ? -1 : 1]; #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_header_stat_broken=no else case e in #( e) ac_cv_header_stat_broken=yes ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stat_broken" >&5 printf "%s\n" "$ac_cv_header_stat_broken" >&6; } if test $ac_cv_header_stat_broken = yes; then printf "%s\n" "#define STAT_MACROS_BROKEN 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C/C++ restrict keyword" >&5 printf %s "checking for C/C++ restrict keyword... " >&6; } if test ${ac_cv_c_restrict+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_cv_c_restrict=no # Put '__restrict__' first, to avoid problems with glibc and non-GCC; see: # https://lists.gnu.org/archive/html/bug-autoconf/2016-02/msg00006.html # Put 'restrict' last, because C++ lacks it. for ac_kw in __restrict__ __restrict _Restrict restrict; do cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ typedef int *int_ptr; int foo (int_ptr $ac_kw ip) { return ip[0]; } int bar (int [$ac_kw]); /* Catch GCC bug 14050. */ int bar (int ip[$ac_kw]) { return ip[0]; } int main (void) { int s[1]; int *$ac_kw t = s; t[0] = 0; return foo (t) + bar (t); ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_c_restrict=$ac_kw fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext test "$ac_cv_c_restrict" != no && break done ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_restrict" >&5 printf "%s\n" "$ac_cv_c_restrict" >&6; } case $ac_cv_c_restrict in restrict) ;; no) printf "%s\n" "#define restrict /**/" >>confdefs.h ;; *) printf "%s\n" "#define restrict $ac_cv_c_restrict" >>confdefs.h ;; esac if test $gl_cv_have_include_next = yes; then gl_cv_next_sys_stat_h='<'sys/stat.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_sys_stat_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_sys_stat_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'sys/stat.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_sys_stat_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_sys_stat_h gl_cv_next_sys_stat_h='"'$gl_header'"' else gl_cv_next_sys_stat_h='<'sys/stat.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_sys_stat_h" >&5 printf "%s\n" "$gl_cv_next_sys_stat_h" >&6; } fi NEXT_SYS_STAT_H=$gl_cv_next_sys_stat_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'sys/stat.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_sys_stat_h fi NEXT_AS_FIRST_DIRECTIVE_SYS_STAT_H=$gl_next_as_first_directive WINDOWS_STAT_TIMESPEC=0 ac_fn_c_check_type "$LINENO" "nlink_t" "ac_cv_type_nlink_t" "#include #include " if test "x$ac_cv_type_nlink_t" = xyes then : else case e in #( e) printf "%s\n" "#define nlink_t int" >>confdefs.h ;; esac fi case "$host_os" in mingw* | windows*) ac_fn_c_check_header_compile "$LINENO" "sdkddkver.h" "ac_cv_header_sdkddkver_h" "$ac_includes_default" if test "x$ac_cv_header_sdkddkver_h" = xyes then : printf "%s\n" "#define HAVE_SDKDDKVER_H 1" >>confdefs.h fi ;; esac GL_GNULIB_CHMOD=0 GL_GNULIB_FCHMODAT=0 GL_GNULIB_FSTAT=0 GL_GNULIB_FSTATAT=0 GL_GNULIB_FUTIMENS=0 GL_GNULIB_GETUMASK=0 GL_GNULIB_LCHMOD=0 GL_GNULIB_LSTAT=0 GL_GNULIB_MKDIR=0 GL_GNULIB_MKDIRAT=0 GL_GNULIB_MKFIFO=0 GL_GNULIB_MKFIFOAT=0 GL_GNULIB_MKNOD=0 GL_GNULIB_MKNODAT=0 GL_GNULIB_STAT=0 GL_GNULIB_UTIMENSAT=0 GL_GNULIB_OVERRIDES_STRUCT_STAT=0 GL_GNULIB_MDA_CHMOD=1 GL_GNULIB_MDA_MKDIR=1 GL_GNULIB_MDA_UMASK=1 ac_fn_check_decl "$LINENO" "getdtablesize" "ac_cv_have_decl_getdtablesize" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_getdtablesize" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_GETDTABLESIZE $ac_have_decl" >>confdefs.h HAVE__EXIT=1; HAVE_ALIGNED_ALLOC=1; HAVE_ATOLL=1; HAVE_CANONICALIZE_FILE_NAME=1; HAVE_DECL_ECVT=1; HAVE_DECL_FCVT=1; HAVE_DECL_GCVT=1; HAVE_DECL_GETLOADAVG=1; HAVE_DECL_PROGRAM_INVOCATION_NAME=1; HAVE_GETPROGNAME=1; HAVE_GETSUBOPT=1; HAVE_GRANTPT=1; HAVE_INITSTATE=1; HAVE_DECL_INITSTATE=1; HAVE_MBTOWC=1; HAVE_MKDTEMP=1; HAVE_MKOSTEMP=1; HAVE_MKOSTEMPS=1; HAVE_MKSTEMP=1; HAVE_MKSTEMPS=1; HAVE_POSIX_MEMALIGN=1; HAVE_POSIX_OPENPT=1; HAVE_PTSNAME=1; HAVE_PTSNAME_R=1; HAVE_QSORT_R=1; HAVE_RANDOM=1; HAVE_RANDOM_H=1; HAVE_RANDOM_R=1; HAVE_REALLOCARRAY=1; HAVE_REALPATH=1; HAVE_RPMATCH=1; HAVE_SECURE_GETENV=1; HAVE_SETENV=1; HAVE_DECL_SETENV=1; HAVE_SETSTATE=1; HAVE_DECL_SETSTATE=1; HAVE_STRTOD=1; HAVE_STRTOF=1; HAVE_STRTOL=1; HAVE_STRTOLD=1; HAVE_STRTOLL=1; HAVE_STRTOUL=1; HAVE_STRTOULL=1; HAVE_STRUCT_RANDOM_DATA=1; HAVE_SYS_LOADAVG_H=0; HAVE_UNLOCKPT=1; HAVE_DECL_UNSETENV=1; REPLACE__EXIT=0; REPLACE_ABORT=0; REPLACE_ALIGNED_ALLOC=0; REPLACE_CALLOC_FOR_CALLOC_GNU=0; REPLACE_CALLOC_FOR_CALLOC_POSIX=0; REPLACE_CANONICALIZE_FILE_NAME=0; REPLACE_FREE=0; REPLACE_GETLOADAVG=0; REPLACE_GETPROGNAME=0; REPLACE_GETSUBOPT=0; REPLACE_INITSTATE=0; REPLACE_MALLOC_FOR_MALLOC_GNU=0; REPLACE_MALLOC_FOR_MALLOC_POSIX=0; REPLACE_MB_CUR_MAX=0; REPLACE_MBSTOWCS=0; REPLACE_MBTOWC=0; REPLACE_MKOSTEMP=0; REPLACE_MKOSTEMPS=0; REPLACE_MKSTEMP=0; REPLACE_POSIX_MEMALIGN=0; REPLACE_POSIX_OPENPT=0; REPLACE_PTSNAME=0; REPLACE_PTSNAME_R=0; REPLACE_PUTENV=0; REPLACE_QSORT_R=0; REPLACE_RAND=0; REPLACE_RANDOM=0; REPLACE_RANDOM_R=0; REPLACE_REALLOC_FOR_REALLOC_GNU=0; REPLACE_REALLOC_FOR_REALLOC_POSIX=0; REPLACE_REALLOCARRAY=0; REPLACE_REALPATH=0; REPLACE_SETENV=0; REPLACE_SETSTATE=0; REPLACE_STRTOD=0; REPLACE_STRTOF=0; REPLACE_STRTOL=0; REPLACE_STRTOLD=0; REPLACE_STRTOLL=0; REPLACE_STRTOUL=0; REPLACE_STRTOULL=0; REPLACE_UNSETENV=0; REPLACE_WCTOMB=0; CAN_PRINT_STACK_TRACE=0; GL_GNULIB__EXIT=0 GL_GNULIB_ABORT_DEBUG=0 GL_GNULIB_ALIGNED_ALLOC=0 GL_GNULIB_ATOLL=0 GL_GNULIB_CALLOC_GNU=0 GL_GNULIB_CALLOC_POSIX=0 GL_GNULIB_CANONICALIZE_FILE_NAME=0 GL_GNULIB_FREE_POSIX=0 GL_GNULIB_GETLOADAVG=0 GL_GNULIB_GETPROGNAME=0 GL_GNULIB_GETSUBOPT=0 GL_GNULIB_GRANTPT=0 GL_GNULIB_MALLOC_GNU=0 GL_GNULIB_MALLOC_POSIX=0 GL_GNULIB_MBSTOWCS=0 GL_GNULIB_MBTOWC=0 GL_GNULIB_MKDTEMP=0 GL_GNULIB_MKOSTEMP=0 GL_GNULIB_MKOSTEMPS=0 GL_GNULIB_MKSTEMP=0 GL_GNULIB_MKSTEMPS=0 GL_GNULIB_POSIX_MEMALIGN=0 GL_GNULIB_POSIX_OPENPT=0 GL_GNULIB_PTSNAME=0 GL_GNULIB_PTSNAME_R=0 GL_GNULIB_PUTENV=0 GL_GNULIB_QSORT_R=0 GL_GNULIB_RAND=0 GL_GNULIB_RANDOM=0 GL_GNULIB_RANDOM_R=0 GL_GNULIB_REALLOCARRAY=0 GL_GNULIB_REALLOC_GNU=0 GL_GNULIB_REALLOC_POSIX=0 GL_GNULIB_REALPATH=0 GL_GNULIB_RPMATCH=0 GL_GNULIB_SECURE_GETENV=0 GL_GNULIB_SETENV=0 GL_GNULIB_STACK_TRACE=0 GL_GNULIB_STRTOD=0 GL_GNULIB_STRTOF=0 GL_GNULIB_STRTOL=0 GL_GNULIB_STRTOLD=0 GL_GNULIB_STRTOLL=0 GL_GNULIB_STRTOUL=0 GL_GNULIB_STRTOULL=0 GL_GNULIB_SYSTEM_POSIX=0 GL_GNULIB_UNLOCKPT=0 GL_GNULIB_UNSETENV=0 GL_GNULIB_WCTOMB=0 GL_GNULIB_MDA_ECVT=1 GL_GNULIB_MDA_FCVT=1 GL_GNULIB_MDA_GCVT=1 GL_GNULIB_MDA_MKTEMP=1 GL_GNULIB_MDA_PUTENV=1 HAVE_HASMNTOPT=1; HAVE_SETMNTENT=1; REPLACE_HASMNTOPT=0; GL_GNULIB_HASMNTOPT=0 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for GNU libc compatible malloc" >&5 printf %s "checking for GNU libc compatible malloc... " >&6; } if test ${ac_cv_func_malloc_0_nonnull+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # (( # Guess yes on platforms where we know the result. *-gnu* | freebsd* | netbsd* | openbsd* | bitrig* \ | hpux* | solaris* | cygwin* | mingw* | windows* | msys* ) ac_cv_func_malloc_0_nonnull=yes ;; # If we don't know, assume the worst. *) ac_cv_func_malloc_0_nonnull=no ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { void *p = malloc (0); int result = !p; free (p); return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : ac_cv_func_malloc_0_nonnull=yes else case e in #( e) ac_cv_func_malloc_0_nonnull=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_func_malloc_0_nonnull" >&5 printf "%s\n" "$ac_cv_func_malloc_0_nonnull" >&6; } if test $ac_cv_func_malloc_0_nonnull = yes then : gl_cv_func_malloc_0_nonnull=1 else case e in #( e) gl_cv_func_malloc_0_nonnull=0 ;; esac fi printf "%s\n" "#define MALLOC_0_IS_NONNULL $gl_cv_func_malloc_0_nonnull" >>confdefs.h if test $ac_cv_header_mntent_h = yes; then GL_GENERATE_MNTENT_H=true if test $gl_cv_have_include_next = yes; then gl_cv_next_mntent_h='<'mntent.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_mntent_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_mntent_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'mntent.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_mntent_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_mntent_h gl_cv_next_mntent_h='"'$gl_header'"' else gl_cv_next_mntent_h='<'mntent.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_mntent_h" >&5 printf "%s\n" "$gl_cv_next_mntent_h" >&6; } fi NEXT_MNTENT_H=$gl_cv_next_mntent_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'mntent.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_mntent_h fi NEXT_AS_FIRST_DIRECTIVE_MNTENT_H=$gl_next_as_first_directive else GL_GENERATE_MNTENT_H=false fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for O_CLOEXEC" >&5 printf %s "checking for O_CLOEXEC... " >&6; } if test ${gl_cv_macro_O_CLOEXEC+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifndef O_CLOEXEC choke me; #endif int main (void) { return O_CLOEXEC; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_macro_O_CLOEXEC=yes else case e in #( e) gl_cv_macro_O_CLOEXEC=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_macro_O_CLOEXEC" >&5 printf "%s\n" "$gl_cv_macro_O_CLOEXEC" >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for promoted mode_t type" >&5 printf %s "checking for promoted mode_t type... " >&6; } if test ${gl_cv_promoted_mode_t+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { typedef int array[2 * (sizeof (mode_t) < sizeof (int)) - 1]; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_promoted_mode_t='int' else case e in #( e) gl_cv_promoted_mode_t='mode_t' ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_promoted_mode_t" >&5 printf "%s\n" "$gl_cv_promoted_mode_t" >&6; } printf "%s\n" "#define PROMOTED_MODE_T $gl_cv_promoted_mode_t" >>confdefs.h HAVE_PTHREAD_T=1; HAVE_PTHREAD_SPINLOCK_T=1; HAVE_PTHREAD_CREATE_DETACHED=1; HAVE_PTHREAD_MUTEX_RECURSIVE=1; HAVE_PTHREAD_MUTEX_ROBUST=1; HAVE_PTHREAD_PROCESS_SHARED=1; HAVE_PTHREAD_CREATE=1; HAVE_PTHREAD_ATTR_INIT=1; HAVE_PTHREAD_ATTR_GETDETACHSTATE=1; HAVE_PTHREAD_ATTR_SETDETACHSTATE=1; HAVE_PTHREAD_ATTR_DESTROY=1; HAVE_PTHREAD_SELF=1; HAVE_PTHREAD_EQUAL=1; HAVE_PTHREAD_DETACH=1; HAVE_PTHREAD_JOIN=1; HAVE_PTHREAD_EXIT=1; HAVE_PTHREAD_ONCE=1; HAVE_PTHREAD_MUTEX_INIT=1; HAVE_PTHREAD_MUTEXATTR_INIT=1; HAVE_PTHREAD_MUTEXATTR_GETTYPE=1; HAVE_PTHREAD_MUTEXATTR_SETTYPE=1; HAVE_PTHREAD_MUTEXATTR_GETROBUST=1; HAVE_PTHREAD_MUTEXATTR_SETROBUST=1; HAVE_PTHREAD_MUTEXATTR_DESTROY=1; HAVE_PTHREAD_MUTEX_LOCK=1; HAVE_PTHREAD_MUTEX_TRYLOCK=1; HAVE_PTHREAD_MUTEX_TIMEDLOCK=1; HAVE_PTHREAD_MUTEX_UNLOCK=1; HAVE_PTHREAD_MUTEX_DESTROY=1; HAVE_PTHREAD_RWLOCK_INIT=1; HAVE_PTHREAD_RWLOCKATTR_INIT=1; HAVE_PTHREAD_RWLOCKATTR_DESTROY=1; HAVE_PTHREAD_RWLOCK_RDLOCK=1; HAVE_PTHREAD_RWLOCK_WRLOCK=1; HAVE_PTHREAD_RWLOCK_TRYRDLOCK=1; HAVE_PTHREAD_RWLOCK_TRYWRLOCK=1; HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK=1; HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK=1; HAVE_PTHREAD_RWLOCK_UNLOCK=1; HAVE_PTHREAD_RWLOCK_DESTROY=1; HAVE_PTHREAD_COND_INIT=1; HAVE_PTHREAD_CONDATTR_INIT=1; HAVE_PTHREAD_CONDATTR_DESTROY=1; HAVE_PTHREAD_COND_WAIT=1; HAVE_PTHREAD_COND_TIMEDWAIT=1; HAVE_PTHREAD_COND_SIGNAL=1; HAVE_PTHREAD_COND_BROADCAST=1; HAVE_PTHREAD_COND_DESTROY=1; HAVE_PTHREAD_KEY_CREATE=1; HAVE_PTHREAD_SETSPECIFIC=1; HAVE_PTHREAD_GETSPECIFIC=1; HAVE_PTHREAD_KEY_DELETE=1; HAVE_PTHREAD_SPIN_INIT=1; HAVE_PTHREAD_SPIN_LOCK=1; HAVE_PTHREAD_SPIN_TRYLOCK=1; HAVE_PTHREAD_SPIN_UNLOCK=1; HAVE_PTHREAD_SPIN_DESTROY=1; REPLACE_PTHREAD_CREATE=0; REPLACE_PTHREAD_ATTR_INIT=0; REPLACE_PTHREAD_ATTR_GETDETACHSTATE=0; REPLACE_PTHREAD_ATTR_SETDETACHSTATE=0; REPLACE_PTHREAD_ATTR_DESTROY=0; REPLACE_PTHREAD_SELF=0; REPLACE_PTHREAD_EQUAL=0; REPLACE_PTHREAD_DETACH=0; REPLACE_PTHREAD_JOIN=0; REPLACE_PTHREAD_EXIT=0; REPLACE_PTHREAD_ONCE=0; REPLACE_PTHREAD_MUTEX_INIT=0; REPLACE_PTHREAD_MUTEXATTR_INIT=0; REPLACE_PTHREAD_MUTEXATTR_GETTYPE=0; REPLACE_PTHREAD_MUTEXATTR_SETTYPE=0; REPLACE_PTHREAD_MUTEXATTR_GETROBUST=0; REPLACE_PTHREAD_MUTEXATTR_SETROBUST=0; REPLACE_PTHREAD_MUTEXATTR_DESTROY=0; REPLACE_PTHREAD_MUTEX_LOCK=0; REPLACE_PTHREAD_MUTEX_TRYLOCK=0; REPLACE_PTHREAD_MUTEX_TIMEDLOCK=0; REPLACE_PTHREAD_MUTEX_UNLOCK=0; REPLACE_PTHREAD_MUTEX_DESTROY=0; REPLACE_PTHREAD_RWLOCK_INIT=0; REPLACE_PTHREAD_RWLOCKATTR_INIT=0; REPLACE_PTHREAD_RWLOCKATTR_DESTROY=0; REPLACE_PTHREAD_RWLOCK_RDLOCK=0; REPLACE_PTHREAD_RWLOCK_WRLOCK=0; REPLACE_PTHREAD_RWLOCK_TRYRDLOCK=0; REPLACE_PTHREAD_RWLOCK_TRYWRLOCK=0; REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK=0; REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK=0; REPLACE_PTHREAD_RWLOCK_UNLOCK=0; REPLACE_PTHREAD_RWLOCK_DESTROY=0; REPLACE_PTHREAD_COND_INIT=0; REPLACE_PTHREAD_CONDATTR_INIT=0; REPLACE_PTHREAD_CONDATTR_DESTROY=0; REPLACE_PTHREAD_COND_WAIT=0; REPLACE_PTHREAD_COND_TIMEDWAIT=0; REPLACE_PTHREAD_COND_SIGNAL=0; REPLACE_PTHREAD_COND_BROADCAST=0; REPLACE_PTHREAD_COND_DESTROY=0; REPLACE_PTHREAD_KEY_CREATE=0; REPLACE_PTHREAD_SETSPECIFIC=0; REPLACE_PTHREAD_GETSPECIFIC=0; REPLACE_PTHREAD_KEY_DELETE=0; REPLACE_PTHREAD_SPIN_INIT=0; REPLACE_PTHREAD_SPIN_LOCK=0; REPLACE_PTHREAD_SPIN_TRYLOCK=0; REPLACE_PTHREAD_SPIN_UNLOCK=0; REPLACE_PTHREAD_SPIN_DESTROY=0; if test -z "$gl_pthreadlib_body_done"; then gl_pthread_api=no LIBPTHREAD= LIBPMULTITHREAD= # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that # it groks . It's added above, in gl_ANYTHREADLIB_EARLY. ac_fn_c_check_header_compile "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default" if test "x$ac_cv_header_pthread_h" = xyes then : gl_have_pthread_h=yes else case e in #( e) gl_have_pthread_h=no ;; esac fi if test "$gl_have_pthread_h" = yes; then # Other possible tests: # -lpthreads (FSU threads, PCthreads) # -lgthreads # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist # in libc. IRIX 6.5 has the first one in both libc and libpthread, but # the second one only in libpthread, and lock.c needs it. # # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04 # needs -pthread for some reason. See: # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html saved_LIBS="$LIBS" for gl_pthread in '' '-pthread'; do LIBS="$LIBS $gl_pthread" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include pthread_mutex_t m; pthread_mutexattr_t ma; int main (void) { pthread_mutex_lock (&m); pthread_mutexattr_init (&ma); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_pthread_api=yes LIBPTHREAD=$gl_pthread LIBPMULTITHREAD=$gl_pthread fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS="$saved_LIBS" test $gl_pthread_api = yes && break done echo "$as_me:29547: gl_pthread_api=$gl_pthread_api" >&5 echo "$as_me:29548: LIBPTHREAD=$LIBPTHREAD" >&5 gl_pthread_in_glibc=no # On Linux with glibc >= 2.34, libc contains the fully functional # pthread functions. case "$host_os" in linux*) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #ifdef __GNU_LIBRARY__ #if (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 34) || (__GLIBC__ > 2) Lucky user #endif #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Lucky user" >/dev/null 2>&1 then : gl_pthread_in_glibc=yes fi rm -rf conftest* ;; esac echo "$as_me:29574: gl_pthread_in_glibc=$gl_pthread_in_glibc" >&5 # Test for libpthread by looking for pthread_kill. (Not pthread_self, # since it is defined as a macro on OSF/1.) if test $gl_pthread_api = yes && test -z "$LIBPTHREAD"; then # The program links fine without libpthread. But it may actually # need to link with libpthread in order to create multiple threads. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lpthread # On Solaris and HP-UX, most pthread functions exist also in libc. # Therefore pthread_in_use() needs to actually try to create a # thread: pthread_create from libc will fail, whereas # pthread_create will actually create a thread. # On Solaris 10 or newer, this test is no longer needed, because # libc contains the fully functional pthread functions. case "$host_os" in solaris | solaris2.[1-9] | solaris2.[1-9].* | hpux*) printf "%s\n" "#define PTHREAD_IN_USE_DETECTION_HARD 1" >>confdefs.h esac fi else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lthr" >&5 printf %s "checking for pthread_kill in -lthr... " >&6; } if test ${ac_cv_lib_thr_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lthr $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_thr_pthread_kill=yes else case e in #( e) ac_cv_lib_thr_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_thr_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_thr_pthread_kill" >&6; } if test "x$ac_cv_lib_thr_pthread_kill" = xyes then : if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lthr fi fi ;; esac fi elif test $gl_pthread_api != yes; then # Some library is needed. Try libpthread and libc_r. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lpthread" >&5 printf %s "checking for pthread_kill in -lpthread... " >&6; } if test ${ac_cv_lib_pthread_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lpthread $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_pthread_pthread_kill=yes else case e in #( e) ac_cv_lib_pthread_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_pthread_pthread_kill" >&6; } if test "x$ac_cv_lib_pthread_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lpthread LIBPMULTITHREAD=-lpthread fi if test $gl_pthread_api != yes; then # For FreeBSD 4. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_kill in -lc_r" >&5 printf %s "checking for pthread_kill in -lc_r... " >&6; } if test ${ac_cv_lib_c_r_pthread_kill+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lc_r $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char pthread_kill (void); int main (void) { return pthread_kill (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_c_r_pthread_kill=yes else case e in #( e) ac_cv_lib_c_r_pthread_kill=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_c_r_pthread_kill" >&5 printf "%s\n" "$ac_cv_lib_c_r_pthread_kill" >&6; } if test "x$ac_cv_lib_c_r_pthread_kill" = xyes then : gl_pthread_api=yes LIBPTHREAD=-lc_r LIBPMULTITHREAD=-lc_r fi fi fi echo "$as_me:29808: LIBPMULTITHREAD=$LIBPMULTITHREAD" >&5 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether POSIX threads API is available" >&5 printf %s "checking whether POSIX threads API is available... " >&6; } { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_pthread_api" >&5 printf "%s\n" "$gl_pthread_api" >&6; } if test $gl_pthread_api = yes; then printf "%s\n" "#define HAVE_PTHREAD_API 1" >>confdefs.h fi cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : SCHED_YIELD_LIB= else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lrt" >&5 printf %s "checking for sched_yield in -lrt... " >&6; } if test ${ac_cv_lib_rt_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lrt $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_rt_sched_yield=yes else case e in #( e) ac_cv_lib_rt_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_rt_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_rt_sched_yield" >&6; } if test "x$ac_cv_lib_rt_sched_yield" = xyes then : SCHED_YIELD_LIB=-lrt else case e in #( e) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for sched_yield in -lposix4" >&5 printf %s "checking for sched_yield in -lposix4... " >&6; } if test ${ac_cv_lib_posix4_sched_yield+y} then : printf %s "(cached) " >&6 else case e in #( e) ac_check_lib_save_LIBS=$LIBS LIBS="-lposix4 $LIBS" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Override any GCC internal prototype to avoid an error. Use char because int might match the return type of a GCC builtin and then its argument prototype would still apply. The 'extern "C"' is for builds by C++ compilers; although this is not generally supported in C code supporting it here has little cost and some practical benefit (sr 110532). */ #ifdef __cplusplus extern "C" #endif char sched_yield (void); int main (void) { return sched_yield (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : ac_cv_lib_posix4_sched_yield=yes else case e in #( e) ac_cv_lib_posix4_sched_yield=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS=$ac_check_lib_save_LIBS ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_posix4_sched_yield" >&5 printf "%s\n" "$ac_cv_lib_posix4_sched_yield" >&6; } if test "x$ac_cv_lib_posix4_sched_yield" = xyes then : SCHED_YIELD_LIB=-lposix4 fi ;; esac fi ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIB_SCHED_YIELD="$SCHED_YIELD_LIB" gl_pthreadlib_body_done=done fi if test $gl_cv_have_include_next = yes; then gl_cv_next_pthread_h='<'pthread.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_pthread_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_pthread_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'pthread.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_pthread_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_pthread_h gl_cv_next_pthread_h='"'$gl_header'"' else gl_cv_next_pthread_h='<'pthread.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_pthread_h" >&5 printf "%s\n" "$gl_cv_next_pthread_h" >&6; } fi NEXT_PTHREAD_H=$gl_cv_next_pthread_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'pthread.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_pthread_h fi NEXT_AS_FIRST_DIRECTIVE_PTHREAD_H=$gl_next_as_first_directive if test $ac_cv_header_pthread_h = yes; then HAVE_PTHREAD_H=1 if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then HAVE_PTHREAD_H=0 fi else HAVE_PTHREAD_H=0 fi ac_fn_c_check_type "$LINENO" "pthread_t" "ac_cv_type_pthread_t" "$ac_includes_default #if HAVE_PTHREAD_H #include #endif " if test "x$ac_cv_type_pthread_t" = xyes then : printf "%s\n" "#define HAVE_PTHREAD_T 1" >>confdefs.h fi ac_fn_c_check_type "$LINENO" "pthread_spinlock_t" "ac_cv_type_pthread_spinlock_t" "$ac_includes_default #if HAVE_PTHREAD_H #include #endif " if test "x$ac_cv_type_pthread_spinlock_t" = xyes then : printf "%s\n" "#define HAVE_PTHREAD_SPINLOCK_T 1" >>confdefs.h fi if test $ac_cv_type_pthread_t != yes; then HAVE_PTHREAD_T=0 fi if test $ac_cv_type_pthread_spinlock_t != yes; then HAVE_PTHREAD_SPINLOCK_T=0 fi if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then REPLACE_PTHREAD_SPIN_INIT=1 REPLACE_PTHREAD_SPIN_LOCK=1 REPLACE_PTHREAD_SPIN_TRYLOCK=1 REPLACE_PTHREAD_SPIN_UNLOCK=1 REPLACE_PTHREAD_SPIN_DESTROY=1 else if test $HAVE_PTHREAD_H = 0 || test $HAVE_PTHREAD_SPINLOCK_T = 0; then HAVE_PTHREAD_SPIN_INIT=0 HAVE_PTHREAD_SPIN_LOCK=0 HAVE_PTHREAD_SPIN_TRYLOCK=0 HAVE_PTHREAD_SPIN_UNLOCK=0 HAVE_PTHREAD_SPIN_DESTROY=0 else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for pthread_spin_init" >&5 printf %s "checking for pthread_spin_init... " >&6; } if test ${gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_saved_LIBS="$LIBS" LIBS="$LIBS $LIBMULTITHREAD" cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { pthread_spinlock_t lock; return pthread_spin_init (&lock, 0); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD=yes else case e in #( e) gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext LIBS="$gl_saved_LIBS" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD" >&5 printf "%s\n" "$gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD" >&6; } if test $gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD != yes; then HAVE_PTHREAD_SPIN_INIT=0 REPLACE_PTHREAD_SPIN_INIT=1 HAVE_PTHREAD_SPIN_LOCK=0 REPLACE_PTHREAD_SPIN_LOCK=1 HAVE_PTHREAD_SPIN_TRYLOCK=0 REPLACE_PTHREAD_SPIN_TRYLOCK=1 HAVE_PTHREAD_SPIN_UNLOCK=0 REPLACE_PTHREAD_SPIN_UNLOCK=1 HAVE_PTHREAD_SPIN_DESTROY=0 REPLACE_PTHREAD_SPIN_DESTROY=1 fi fi fi GL_GNULIB_PTHREAD_THREAD=0 GL_GNULIB_PTHREAD_ONCE=0 GL_GNULIB_PTHREAD_MUTEX=0 GL_GNULIB_PTHREAD_RWLOCK=0 GL_GNULIB_PTHREAD_COND=0 GL_GNULIB_PTHREAD_TSS=0 GL_GNULIB_PTHREAD_SPIN=0 GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK=0 HAVE_POSIX_SIGNALBLOCKING=1; HAVE_PTHREAD_SIGMASK=1; HAVE_RAISE=1; HAVE_SIG2STR=1; HAVE_SIGSET_T=1; HAVE_SIGINFO_T=1; HAVE_SIGACTION=1; HAVE_STR2SIG=1; HAVE_STRUCT_SIGACTION_SA_SIGACTION=1; HAVE_TYPE_VOLATILE_SIG_ATOMIC_T=1; HAVE_SIGHANDLER_T=1; REPLACE_PTHREAD_SIGMASK=0; REPLACE_RAISE=0; ac_fn_c_check_type "$LINENO" "sigset_t" "ac_cv_type_sigset_t" " #include /* Mingw defines sigset_t not in , but in . */ #include " if test "x$ac_cv_type_sigset_t" = xyes then : printf "%s\n" "#define HAVE_SIGSET_T 1" >>confdefs.h gl_cv_type_sigset_t=yes else case e in #( e) gl_cv_type_sigset_t=no ;; esac fi if test $gl_cv_type_sigset_t != yes; then HAVE_SIGSET_T=0 fi GL_GNULIB_PTHREAD_SIGMASK=0 GL_GNULIB_RAISE=0 GL_GNULIB_SIG2STR=0 GL_GNULIB_SIGNAL_H_SIGPIPE=0 GL_GNULIB_SIGPROCMASK=0 GL_GNULIB_SIGACTION=0 HAVE_SCHED_YIELD=1; REPLACE_SCHED_YIELD=0; { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for glibc-compatible sys/cdefs.h" >&5 printf %s "checking for glibc-compatible sys/cdefs.h... " >&6; } if test ${gl_cv_header_sys_cdefs_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include enum { foo = __GNUC_PREREQ (14, 1) } bar; _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_sys_cdefs_h=yes else case e in #( e) gl_cv_header_sys_cdefs_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_sys_cdefs_h" >&5 printf "%s\n" "$gl_cv_header_sys_cdefs_h" >&6; } if test "$gl_cv_header_sys_cdefs_h" = yes; then HAVE_SYS_CDEFS_H=1 else HAVE_SYS_CDEFS_H=0 fi ac_fn_c_check_header_compile "$LINENO" "sched.h" "ac_cv_header_sched_h" "#if HAVE_SYS_CDEFS_H #include #endif " if test "x$ac_cv_header_sched_h" = xyes then : printf "%s\n" "#define HAVE_SCHED_H 1" >>confdefs.h fi if test $gl_cv_have_include_next = yes; then gl_cv_next_sched_h='<'sched.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_sched_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'sched.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_sched_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_sched_h gl_cv_next_sched_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_sched_h" >&5 printf "%s\n" "$gl_cv_next_sched_h" >&6; } fi NEXT_SCHED_H=$gl_cv_next_sched_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'sched.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_sched_h fi NEXT_AS_FIRST_DIRECTIVE_SCHED_H=$gl_next_as_first_directive if test "$ac_cv_header_sched_h" = yes; then HAVE_SCHED_H=1 else HAVE_SCHED_H=0 fi if test "$HAVE_SCHED_H" = 1; then ac_fn_c_check_type "$LINENO" "struct sched_param" "ac_cv_type_struct_sched_param" "#if HAVE_SYS_CDEFS_H #include #endif #include " if test "x$ac_cv_type_struct_sched_param" = xyes then : HAVE_STRUCT_SCHED_PARAM=1 else case e in #( e) HAVE_STRUCT_SCHED_PARAM=0 ;; esac fi else HAVE_STRUCT_SCHED_PARAM=0 case "$host_os" in os2*) ac_fn_c_check_type "$LINENO" "struct sched_param" "ac_cv_type_struct_sched_param" "#include " if test "x$ac_cv_type_struct_sched_param" = xyes then : HAVE_STRUCT_SCHED_PARAM=1 fi ;; vms) ac_fn_c_check_type "$LINENO" "struct sched_param" "ac_cv_type_struct_sched_param" "#include " if test "x$ac_cv_type_struct_sched_param" = xyes then : HAVE_STRUCT_SCHED_PARAM=1 fi ;; esac fi GL_GNULIB_SCHED_YIELD=0 ac_fn_c_check_type "$LINENO" "uid_t" "ac_cv_type_uid_t" "$ac_includes_default" if test "x$ac_cv_type_uid_t" = xyes then : else case e in #( e) printf "%s\n" "#define uid_t int" >>confdefs.h ;; esac fi ac_fn_c_check_type "$LINENO" "gid_t" "ac_cv_type_gid_t" "$ac_includes_default" if test "x$ac_cv_type_gid_t" = xyes then : else case e in #( e) printf "%s\n" "#define gid_t int" >>confdefs.h ;; esac fi if test $gl_cv_have_include_next = yes; then gl_cv_next_signal_h='<'signal.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_signal_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'signal.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_signal_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_signal_h gl_cv_next_signal_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_signal_h" >&5 printf "%s\n" "$gl_cv_next_signal_h" >&6; } fi NEXT_SIGNAL_H=$gl_cv_next_signal_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'signal.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_signal_h fi NEXT_AS_FIRST_DIRECTIVE_SIGNAL_H=$gl_next_as_first_directive # AIX declares sig_atomic_t to already include volatile, and C89 compilers # then choke on 'volatile sig_atomic_t'. C99 requires that it compile. ac_fn_c_check_type "$LINENO" "volatile sig_atomic_t" "ac_cv_type_volatile_sig_atomic_t" " #include " if test "x$ac_cv_type_volatile_sig_atomic_t" = xyes then : else case e in #( e) HAVE_TYPE_VOLATILE_SIG_ATOMIC_T=0 ;; esac fi ac_fn_c_check_type "$LINENO" "sighandler_t" "ac_cv_type_sighandler_t" " #include " if test "x$ac_cv_type_sighandler_t" = xyes then : else case e in #( e) HAVE_SIGHANDLER_T=0 ;; esac fi NULLPTR_T_NEEDS_STDDEF=1; STDDEF_NOT_IDEMPOTENT=0; REPLACE_NULL=0; HAVE_MAX_ALIGN_T=1; GL_GENERATE_STDDEF_H=false { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for good max_align_t" >&5 printf %s "checking for good max_align_t... " >&6; } if test ${gl_cv_type_max_align_t+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* On FreeBSD 12.0/x86, max_align_t defined by has the correct alignment with the default (wrong) definition of _Alignof, but a wrong alignment as soon as we activate an ISO C compliant _Alignof definition. */ #if ((defined __GNUC__ && 4 <= __GNUC__) || defined __clang__) && !defined __cplusplus #define _Alignof(type) __builtin_offsetof (struct { char __a; type __b; }, __b) #endif #include unsigned int s = sizeof (max_align_t); #if defined __GNUC__ || defined __clang__ || defined __IBM__ALIGNOF__ int check1[2 * (__alignof__ (double) <= __alignof__ (max_align_t)) - 1]; int check2[2 * (__alignof__ (long double) <= __alignof__ (max_align_t)) - 1]; #endif typedef struct { char a; max_align_t b; } max_helper; typedef struct { char a; long b; } long_helper; typedef struct { char a; double b; } double_helper; typedef struct { char a; long double b; } long_double_helper; int check3[2 * (offsetof (long_helper, b) <= offsetof (max_helper, b)) - 1]; int check4[2 * (offsetof (double_helper, b) <= offsetof (max_helper, b)) - 1]; int check5[2 * (offsetof (long_double_helper, b) <= offsetof (max_helper, b)) - 1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_type_max_align_t=yes else case e in #( e) gl_cv_type_max_align_t=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_type_max_align_t" >&5 printf "%s\n" "$gl_cv_type_max_align_t" >&6; } if test $gl_cv_type_max_align_t = no; then HAVE_MAX_ALIGN_T=0 GL_GENERATE_STDDEF_H=true fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether NULL can be used in arbitrary expressions" >&5 printf %s "checking whether NULL can be used in arbitrary expressions... " >&6; } if test ${gl_cv_decl_null_works+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int test[2 * (sizeof NULL == sizeof (void *)) -1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_decl_null_works=yes else case e in #( e) gl_cv_decl_null_works=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_decl_null_works" >&5 printf "%s\n" "$gl_cv_decl_null_works" >&6; } if test $gl_cv_decl_null_works = no; then REPLACE_NULL=1 GL_GENERATE_STDDEF_H=true fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for unreachable" >&5 printf %s "checking for unreachable... " >&6; } if test ${gl_cv_func_unreachable+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { unreachable (); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_func_unreachable=yes else case e in #( e) gl_cv_func_unreachable=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_unreachable" >&5 printf "%s\n" "$gl_cv_func_unreachable" >&6; } if test $gl_cv_func_unreachable = no; then GL_GENERATE_STDDEF_H=true fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether nullptr_t needs " >&5 printf %s "checking whether nullptr_t needs ... " >&6; } if test ${gl_cv_nullptr_t_needs_stddef+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ nullptr_t x; _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_nullptr_t_needs_stddef=no else case e in #( e) gl_cv_nullptr_t_needs_stddef=yes ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_nullptr_t_needs_stddef" >&5 printf "%s\n" "$gl_cv_nullptr_t_needs_stddef" >&6; } if test "$gl_cv_nullptr_t_needs_stddef" = no; then NULLPTR_T_NEEDS_STDDEF=0 GL_GENERATE_STDDEF_H=true fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for clean definition of __STDC_VERSION_STDDEF_H__" >&5 printf %s "checking for clean definition of __STDC_VERSION_STDDEF_H__... " >&6; } if test ${gl_cv_clean_version_stddef+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* https://gcc.gnu.org/bugzilla/show_bug.cgi?id=114870 */ #include #undef __STDC_VERSION_STDDEF_H__ #include #ifdef __STDC_VERSION_STDDEF_H__ # error " defines __STDC_VERSION_STDDEF_H__" #endif _ACEOF if ac_fn_c_try_cpp "$LINENO" then : gl_cv_clean_version_stddef=yes else case e in #( e) gl_cv_clean_version_stddef=no ;; esac fi rm -f conftest.err conftest.i conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_clean_version_stddef" >&5 printf "%s\n" "$gl_cv_clean_version_stddef" >&6; } if test "$gl_cv_clean_version_stddef" = no; then STDDEF_NOT_IDEMPOTENT=1 GL_GENERATE_STDDEF_H=true fi if $GL_GENERATE_STDDEF_H; then if test $gl_cv_have_include_next = yes; then gl_cv_next_stddef_h='<'stddef.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_stddef_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'stddef.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_stddef_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_stddef_h gl_cv_next_stddef_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_stddef_h" >&5 printf "%s\n" "$gl_cv_next_stddef_h" >&6; } fi NEXT_STDDEF_H=$gl_cv_next_stddef_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'stddef.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_stddef_h fi NEXT_AS_FIRST_DIRECTIVE_STDDEF_H=$gl_next_as_first_directive fi HAVE_DECL_FCLOSEALL=1; HAVE_DECL_FPURGE=1; HAVE_DECL_FSEEKO=1; HAVE_DECL_FTELLO=1; HAVE_DECL_GETDELIM=1; HAVE_DECL_GETLINE=1; HAVE_DECL_GETW=1; HAVE_DECL_OBSTACK_PRINTF=1; HAVE_DECL_PUTW=1; HAVE_DECL_SNPRINTF=1; HAVE_DECL_VSNPRINTF=1; HAVE_DPRINTF=1; HAVE_FSEEKO=1; HAVE_FTELLO=1; HAVE_PCLOSE=1; HAVE_POPEN=1; HAVE_RENAMEAT=1; HAVE_VASPRINTF=1; HAVE_VDPRINTF=1; REPLACE_DPRINTF=0; REPLACE_FCLOSE=0; REPLACE_FDOPEN=0; REPLACE_FFLUSH=0; REPLACE_FOPEN=0; REPLACE_FOPEN_FOR_FOPEN_GNU=0; REPLACE_FPRINTF=0; REPLACE_FPURGE=0; REPLACE_FREOPEN=0; REPLACE_FSEEK=0; REPLACE_FSEEKO=0; REPLACE_FTELL=0; REPLACE_FTELLO=0; REPLACE_GETDELIM=0; REPLACE_GETLINE=0; REPLACE_OBSTACK_PRINTF=0; REPLACE_PERROR=0; REPLACE_POPEN=0; REPLACE_PRINTF=0; REPLACE_REMOVE=0; REPLACE_RENAME=0; REPLACE_RENAMEAT=0; REPLACE_SNPRINTF=0; REPLACE_SPRINTF=0; REPLACE_STDIO_READ_FUNCS=0; REPLACE_STDIO_WRITE_FUNCS=0; REPLACE_TMPFILE=0; REPLACE_VASPRINTF=0; REPLACE_VDPRINTF=0; REPLACE_VFPRINTF=0; REPLACE_VPRINTF=0; REPLACE_VSNPRINTF=0; REPLACE_VSPRINTF=0; case "$host_os" in *-musl* | midipix*) printf "%s\n" "#define MUSL_LIBC 1" >>confdefs.h ;; esac ac_fn_check_decl "$LINENO" "fcloseall" "ac_cv_have_decl_fcloseall" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_fcloseall" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_FCLOSEALL $ac_have_decl" >>confdefs.h ac_fn_check_decl "$LINENO" "getw" "ac_cv_have_decl_getw" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_getw" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_GETW $ac_have_decl" >>confdefs.h ac_fn_check_decl "$LINENO" "putw" "ac_cv_have_decl_putw" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_putw" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_PUTW $ac_have_decl" >>confdefs.h if test $gl_cv_have_include_next = yes; then gl_cv_next_stdio_h='<'stdio.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_stdio_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'stdio.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_stdio_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_stdio_h gl_cv_next_stdio_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_stdio_h" >&5 printf "%s\n" "$gl_cv_next_stdio_h" >&6; } fi NEXT_STDIO_H=$gl_cv_next_stdio_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'stdio.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_stdio_h fi NEXT_AS_FIRST_DIRECTIVE_STDIO_H=$gl_next_as_first_directive { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking which flavor of printf attribute matches inttypes macros" >&5 printf %s "checking which flavor of printf attribute matches inttypes macros... " >&6; } if test ${gl_cv_func_printf_attribute_flavor+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #define __STDC_FORMAT_MACROS 1 #include #include /* For non-mingw systems, compilation will trivially succeed. For mingw, compilation will succeed for older mingw (system printf, "I64d") and fail for newer mingw (gnu printf, "lld"). */ #if (defined _WIN32 && ! defined __CYGWIN__) && \ (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4)) extern char PRIdMAX_probe[sizeof PRIdMAX == sizeof "I64d" ? 1 : -1]; #endif int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_func_printf_attribute_flavor=system else case e in #( e) gl_cv_func_printf_attribute_flavor=gnu ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_printf_attribute_flavor" >&5 printf "%s\n" "$gl_cv_func_printf_attribute_flavor" >&6; } if test "$gl_cv_func_printf_attribute_flavor" = gnu; then printf "%s\n" "#define GNULIB_PRINTF_ATTRIBUTE_FLAVOR_GNU 1" >>confdefs.h fi if test $ac_cv_have_decl_fcloseall = no; then HAVE_DECL_FCLOSEALL=0 fi if test $ac_cv_have_decl_getw = no; then HAVE_DECL_GETW=0 fi if test $ac_cv_have_decl_putw = no; then HAVE_DECL_PUTW=0 fi GL_GNULIB_DPRINTF=0 GL_GNULIB_DZPRINTF=0 GL_GNULIB_FCLOSE=0 GL_GNULIB_FDOPEN=0 GL_GNULIB_FFLUSH=0 GL_GNULIB_FGETC=0 GL_GNULIB_FGETS=0 GL_GNULIB_FOPEN=0 GL_GNULIB_FOPEN_GNU=0 GL_GNULIB_FPRINTF=0 GL_GNULIB_FPRINTF_POSIX=0 GL_GNULIB_FPURGE=0 GL_GNULIB_FPUTC=0 GL_GNULIB_FPUTS=0 GL_GNULIB_FREAD=0 GL_GNULIB_FREOPEN=0 GL_GNULIB_FSCANF=0 GL_GNULIB_FSEEK=0 GL_GNULIB_FSEEKO=0 GL_GNULIB_FTELL=0 GL_GNULIB_FTELLO=0 GL_GNULIB_FWRITE=0 GL_GNULIB_FZPRINTF=0 GL_GNULIB_GETC=0 GL_GNULIB_GETCHAR=0 GL_GNULIB_GETDELIM=0 GL_GNULIB_GETLINE=0 GL_GNULIB_OBSTACK_PRINTF=0 GL_GNULIB_OBSTACK_PRINTF_POSIX=0 GL_GNULIB_OBSTACK_ZPRINTF=0 GL_GNULIB_PCLOSE=0 GL_GNULIB_PERROR=0 GL_GNULIB_POPEN=0 GL_GNULIB_PRINTF=0 GL_GNULIB_PRINTF_POSIX=0 GL_GNULIB_PUTC=0 GL_GNULIB_PUTCHAR=0 GL_GNULIB_PUTS=0 GL_GNULIB_REMOVE=0 GL_GNULIB_RENAME=0 GL_GNULIB_RENAMEAT=0 GL_GNULIB_SCANF=0 GL_GNULIB_SNPRINTF=0 GL_GNULIB_SNZPRINTF=0 GL_GNULIB_SPRINTF_POSIX=0 GL_GNULIB_STDIO_H_NONBLOCKING=0 GL_GNULIB_STDIO_H_SIGPIPE=0 GL_GNULIB_SZPRINTF=0 GL_GNULIB_TMPFILE=0 GL_GNULIB_VASPRINTF=0 GL_GNULIB_VASZPRINTF=0 GL_GNULIB_VFSCANF=0 GL_GNULIB_VSCANF=0 GL_GNULIB_VDPRINTF=0 GL_GNULIB_VDZPRINTF=0 GL_GNULIB_VFPRINTF=0 GL_GNULIB_VFPRINTF_POSIX=0 GL_GNULIB_VFZPRINTF=0 GL_GNULIB_VPRINTF=0 GL_GNULIB_VPRINTF_POSIX=0 GL_GNULIB_VSNPRINTF=0 GL_GNULIB_VSNZPRINTF=0 GL_GNULIB_VSPRINTF_POSIX=0 GL_GNULIB_VSZPRINTF=0 GL_GNULIB_VZPRINTF=0 GL_GNULIB_ZPRINTF=0 GL_GNULIB_MDA_FCLOSEALL=1 GL_GNULIB_MDA_FDOPEN=1 GL_GNULIB_MDA_FILENO=1 GL_GNULIB_MDA_GETW=1 GL_GNULIB_MDA_PUTW=1 GL_GNULIB_MDA_TEMPNAM=1 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for nl_langinfo and CODESET" >&5 printf %s "checking for nl_langinfo and CODESET... " >&6; } if test ${am_cv_langinfo_codeset+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { char* cs = nl_langinfo(CODESET); return !cs; ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : am_cv_langinfo_codeset=yes else case e in #( e) am_cv_langinfo_codeset=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $am_cv_langinfo_codeset" >&5 printf "%s\n" "$am_cv_langinfo_codeset" >&6; } if test $am_cv_langinfo_codeset = yes; then printf "%s\n" "#define HAVE_LANGINFO_CODESET 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for an english Unicode locale" >&5 printf %s "checking for an english Unicode locale... " >&6; } if test ${gt_cv_locale_en_utf8+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in *-musl* | midipix*) gt_cv_locale_en_utf8=en_US.UTF-8 ;; *) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_LANGINFO_CODESET # include #endif #include #include struct tm t; char buf[16]; int main () { /* On BeOS and Haiku, locales are not implemented in libc. Rather, libintl imitates locale dependent behaviour by looking at the environment variables, and all locales use the UTF-8 encoding. */ #if !(defined __BEOS__ || defined __HAIKU__) /* Check whether the given locale name is recognized by the system. */ # if defined _WIN32 && !defined __CYGWIN__ /* On native Windows, setlocale(category, "") looks at the system settings, not at the environment variables. Also, when an encoding suffix such as ".65001" or ".54936" is specified, it succeeds but sets the LC_CTYPE category of the locale to "C". */ if (setlocale (LC_ALL, getenv ("LC_ALL")) == NULL || strcmp (setlocale (LC_CTYPE, NULL), "C") == 0) return 1; # else if (setlocale (LC_ALL, "") == NULL) return 1; # endif /* Check whether nl_langinfo(CODESET) is "UTF-8" or equivalent. */ # if HAVE_LANGINFO_CODESET { const char *cs = nl_langinfo (CODESET); if (!(strcmp (cs, "UTF-8") == 0 || strcmp (cs, "UTF8") == 0 || strcmp (cs, "utf-8") == 0 || strcmp (cs, "utf8") == 0)) return 1; } # endif # ifdef __CYGWIN__ /* On Cygwin, avoid locale names without encoding suffix, because the locale_charset() function relies on the encoding suffix. Note that LC_ALL is set on the command line. */ if (strchr (getenv ("LC_ALL"), '.') == NULL) return 1; # endif /* Check the third month name. */ t.tm_year = 1975 - 1900; t.tm_mon = 3 - 1; t.tm_mday = 24; if (strftime (buf, sizeof (buf), "%B", &t) < 5 || strcmp (buf, "March") != 0) return 1; #endif #if !defined __BIONIC__ /* Bionic libc's 'struct lconv' is just a dummy. */ /* Check whether the decimal separator is a dot. */ if (localeconv () ->decimal_point[0] != '.') return 1; #endif return 0; } _ACEOF if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_link\""; } >&5 (eval $ac_link) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; } && test -s conftest$ac_exeext; then case "$host_os" in # Handle native Windows specially, because there setlocale() interprets # "ar" or "ara" as "Arabic" or "Arabic_Saudi Arabia.1256", # "en" or "eng" as "English" or "English_United States.1252", # "fr" or "fra" as "French" or "French_France.1252", # "ge"(!) or "deu"(!) as "German" or "German_Germany.1252", # "ja" or "jpn" as "Japanese" or "Japanese_Japan.932", # and similar. mingw* | windows*) # Test for the hypothetical native Windows locale name. if (LC_ALL='English_United States.65001' LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8='English_United States.65001' else # None found. gt_cv_locale_en_utf8=none fi ;; *) # Setting LC_ALL is not enough. Need to set LC_TIME to empty, because # otherwise on Mac OS X 10.3.5 the LC_TIME=C from the beginning of the # configure script would override the LC_ALL setting. Likewise for # LC_CTYPE, which is also set at the beginning of the configure script. # Test for the locale name with explicit encoding suffix first # (this is necessary on Haiku). if (LC_ALL=en_US.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en_US.UTF-8 else # Test for the locale name without encoding suffix. if (LC_ALL=en_US LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en_US else # Test for the Solaris 10 locale name. if (LC_ALL=en.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en.UTF-8 else # None found. gt_cv_locale_en_utf8=none fi fi fi ;; esac fi rm -fr conftest* ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gt_cv_locale_en_utf8" >&5 printf "%s\n" "$gt_cv_locale_en_utf8" >&6; } LOCALE_EN_UTF8="$gt_cv_locale_en_utf8" case "$LOCALE_EN_UTF8" in #( '' | *[\"\$\'*[]*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: invalid locale \"$LOCALE_EN_UTF8\"; assuming \"none\"" >&5 printf "%s\n" "$as_me: WARNING: invalid locale \"$LOCALE_EN_UTF8\"; assuming \"none\"" >&2;} LOCALE_EN_UTF8=none;; esac ac_fn_check_decl "$LINENO" "ecvt" "ac_cv_have_decl_ecvt" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_ecvt" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_ECVT $ac_have_decl" >>confdefs.h ac_fn_check_decl "$LINENO" "fcvt" "ac_cv_have_decl_fcvt" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_fcvt" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_FCVT $ac_have_decl" >>confdefs.h ac_fn_check_decl "$LINENO" "gcvt" "ac_cv_have_decl_gcvt" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_gcvt" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_GCVT $ac_have_decl" >>confdefs.h if test $gl_cv_have_include_next = yes; then gl_cv_next_stdlib_h='<'stdlib.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_stdlib_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'stdlib.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_stdlib_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_stdlib_h gl_cv_next_stdlib_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_stdlib_h" >&5 printf "%s\n" "$gl_cv_next_stdlib_h" >&6; } fi NEXT_STDLIB_H=$gl_cv_next_stdlib_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'stdlib.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_stdlib_h fi NEXT_AS_FIRST_DIRECTIVE_STDLIB_H=$gl_next_as_first_directive { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether MB_CUR_MAX is correct" >&5 printf %s "checking whether MB_CUR_MAX is correct... " >&6; } if test ${gl_cv_macro_MB_CUR_MAX_good+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in # Guess no on Solaris and Haiku. solaris* | haiku*) gl_cv_macro_MB_CUR_MAX_good="guessing no" ;; # Guess yes otherwise. *) gl_cv_macro_MB_CUR_MAX_good="guessing yes" ;; esac if test "$LOCALE_EN_UTF8" != none; then if test "$cross_compiling" = yes then : : else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main () { int result = 0; if (setlocale (LC_ALL, "$LOCALE_EN_UTF8") != NULL) { if (MB_CUR_MAX < 4) result |= 1; } return result; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_macro_MB_CUR_MAX_good=yes else case e in #( e) gl_cv_macro_MB_CUR_MAX_good=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_macro_MB_CUR_MAX_good" >&5 printf "%s\n" "$gl_cv_macro_MB_CUR_MAX_good" >&6; } case "$gl_cv_macro_MB_CUR_MAX_good" in *yes) ;; *) REPLACE_MB_CUR_MAX=1 ;; esac if test $ac_cv_have_decl_ecvt = no; then HAVE_DECL_ECVT=0 fi if test $ac_cv_have_decl_fcvt = no; then HAVE_DECL_FCVT=0 fi if test $ac_cv_have_decl_gcvt = no; then HAVE_DECL_GCVT=0 fi HAVE_MBSLEN=0; HAVE_EXPLICIT_BZERO=1; HAVE_FFSL=1; HAVE_FFSLL=1; HAVE_DECL_MEMMEM=1; HAVE_MEMPCPY=1; HAVE_MEMSET_EXPLICIT=1; HAVE_DECL_MEMRCHR=1; HAVE_RAWMEMCHR=1; HAVE_STPCPY=1; HAVE_STPNCPY=1; HAVE_STRCHRNUL=1; HAVE_DECL_STRDUP=1; HAVE_DECL_STRNDUP=1; HAVE_DECL_STRNLEN=1; HAVE_STRPBRK=1; HAVE_STRSEP=1; HAVE_STRCASESTR=1; HAVE_DECL_STRTOK_R=1; HAVE_DECL_STRERROR_R=1; HAVE_STRERRORNAME_NP=1; HAVE_SIGABBREV_NP=1; HAVE_SIGDESCR_NP=1; HAVE_DECL_STRSIGNAL=1; HAVE_STRVERSCMP=1; REPLACE_FFSLL=0; REPLACE_MEMCHR=0; REPLACE_MEMMEM=0; REPLACE_MEMPCPY=0; REPLACE_MEMSET_EXPLICIT=0; REPLACE_STPCPY=0; REPLACE_STPNCPY=0; REPLACE_STRCHRNUL=0; REPLACE_STRDUP=0; REPLACE_STRNCAT=0; REPLACE_STRNDUP=0; REPLACE_STRNLEN=0; REPLACE_STRSTR=0; REPLACE_STRCASESTR=0; REPLACE_STRTOK_R=0; REPLACE_STRERROR=0; REPLACE_STRERROR_R=0; REPLACE_STRERRORNAME_NP=0; REPLACE_STRSIGNAL=0; REPLACE_STRVERSCMP=0; UNDEFINE_STRTOK_R=0; REPLACE_STRERROR_0=0 { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether strerror(0) succeeds" >&5 printf %s "checking whether strerror(0) succeeds... " >&6; } if test ${gl_cv_func_strerror_0_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_strerror_0_works="guessing yes" ;; # Guess yes on musl systems. *-musl* | midipix*) gl_cv_func_strerror_0_works="guessing yes" ;; # Guess yes on native Windows. mingw* | windows*) gl_cv_func_strerror_0_works="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_strerror_0_works="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main (void) { int result = 0; char *str; errno = 0; str = strerror (0); if (!*str) result |= 1; if (errno) result |= 2; if (strstr (str, "nknown") || strstr (str, "ndefined")) result |= 4; return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_strerror_0_works=yes else case e in #( e) gl_cv_func_strerror_0_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_strerror_0_works" >&5 printf "%s\n" "$gl_cv_func_strerror_0_works" >&6; } case "$gl_cv_func_strerror_0_works" in *yes) ;; *) REPLACE_STRERROR_0=1 printf "%s\n" "#define REPLACE_STRERROR_0 1" >>confdefs.h ;; esac GL_GNULIB_EXPLICIT_BZERO=0 GL_GNULIB_FFSL=0 GL_GNULIB_FFSLL=0 GL_GNULIB_MEMCHR=0 GL_GNULIB_MEMMEM=0 GL_GNULIB_MEMPCPY=0 GL_GNULIB_MEMRCHR=0 GL_GNULIB_MEMSET_EXPLICIT=0 GL_GNULIB_RAWMEMCHR=0 GL_GNULIB_STPCPY=0 GL_GNULIB_STPNCPY=0 GL_GNULIB_STRCHRNUL=0 GL_GNULIB_STRDUP=0 GL_GNULIB_STRNCAT=0 GL_GNULIB_STRNDUP=0 GL_GNULIB_STRNLEN=0 GL_GNULIB_STRPBRK=0 GL_GNULIB_STRSEP=0 GL_GNULIB_STRSTR=0 GL_GNULIB_STRCASESTR=0 GL_GNULIB_STRTOK_R=0 GL_GNULIB_MBSLEN=0 GL_GNULIB_MBSNLEN=0 GL_GNULIB_MBSCHR=0 GL_GNULIB_MBSRCHR=0 GL_GNULIB_MBSSTR=0 GL_GNULIB_MBSCASECMP=0 GL_GNULIB_MBSNCASECMP=0 GL_GNULIB_MBSPCASECMP=0 GL_GNULIB_MBSCASESTR=0 GL_GNULIB_MBSCSPN=0 GL_GNULIB_MBSPBRK=0 GL_GNULIB_MBSSPN=0 GL_GNULIB_MBSSEP=0 GL_GNULIB_MBSTOK_R=0 GL_GNULIB_STRERROR=0 GL_GNULIB_STRERROR_R=0 GL_GNULIB_STRERRORNAME_NP=0 GL_GNULIB_SIGABBREV_NP=0 GL_GNULIB_SIGDESCR_NP=0 GL_GNULIB_STRSIGNAL=0 GL_GNULIB_STRVERSCMP=0 GL_GNULIB_MDA_MEMCCPY=1 GL_GNULIB_MDA_STRDUP=1 if test $gl_cv_have_include_next = yes; then gl_cv_next_string_h='<'string.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_string_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'string.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_string_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_string_h gl_cv_next_string_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_string_h" >&5 printf "%s\n" "$gl_cv_next_string_h" >&6; } fi NEXT_STRING_H=$gl_cv_next_string_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'string.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_string_h fi NEXT_AS_FIRST_DIRECTIVE_STRING_H=$gl_next_as_first_directive HAVE_DECL_LOCALTIME_R=1; HAVE_NANOSLEEP=1; HAVE_STRPTIME=1; HAVE_TIMEGM=1; HAVE_TIMESPEC_GET=1; HAVE_TIMESPEC_GETRES=1; HAVE_TIMEZONE_T=0; REPLACE_CTIME=0; REPLACE_GMTIME=0; REPLACE_LOCALTIME=0; REPLACE_LOCALTIME_R=0; REPLACE_MKTIME=0; REPLACE_NANOSLEEP=0; REPLACE_STRFTIME=0; REPLACE_TIME=0; REPLACE_TIMEGM=0; REPLACE_TIMESPEC_GET=0; REPLACE_TIMESPEC_GETRES=0; REPLACE_TZSET=0; { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for struct timespec in " >&5 printf %s "checking for struct timespec in ... " >&6; } if test ${gl_cv_sys_struct_timespec_in_time_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { static struct timespec x; x.tv_sec = x.tv_nsec; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_sys_struct_timespec_in_time_h=yes else case e in #( e) gl_cv_sys_struct_timespec_in_time_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_sys_struct_timespec_in_time_h" >&5 printf "%s\n" "$gl_cv_sys_struct_timespec_in_time_h" >&6; } TIME_H_DEFINES_STRUCT_TIMESPEC=0 SYS_TIME_H_DEFINES_STRUCT_TIMESPEC=0 PTHREAD_H_DEFINES_STRUCT_TIMESPEC=0 UNISTD_H_DEFINES_STRUCT_TIMESPEC=0 if test $gl_cv_sys_struct_timespec_in_time_h = yes; then TIME_H_DEFINES_STRUCT_TIMESPEC=1 else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for struct timespec in " >&5 printf %s "checking for struct timespec in ... " >&6; } if test ${gl_cv_sys_struct_timespec_in_sys_time_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { static struct timespec x; x.tv_sec = x.tv_nsec; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_sys_struct_timespec_in_sys_time_h=yes else case e in #( e) gl_cv_sys_struct_timespec_in_sys_time_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_sys_struct_timespec_in_sys_time_h" >&5 printf "%s\n" "$gl_cv_sys_struct_timespec_in_sys_time_h" >&6; } if test $gl_cv_sys_struct_timespec_in_sys_time_h = yes; then SYS_TIME_H_DEFINES_STRUCT_TIMESPEC=1 else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for struct timespec in " >&5 printf %s "checking for struct timespec in ... " >&6; } if test ${gl_cv_sys_struct_timespec_in_pthread_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { static struct timespec x; x.tv_sec = x.tv_nsec; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_sys_struct_timespec_in_pthread_h=yes else case e in #( e) gl_cv_sys_struct_timespec_in_pthread_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_sys_struct_timespec_in_pthread_h" >&5 printf "%s\n" "$gl_cv_sys_struct_timespec_in_pthread_h" >&6; } if test $gl_cv_sys_struct_timespec_in_pthread_h = yes; then PTHREAD_H_DEFINES_STRUCT_TIMESPEC=1 else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for struct timespec in " >&5 printf %s "checking for struct timespec in ... " >&6; } if test ${gl_cv_sys_struct_timespec_in_unistd_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { static struct timespec x; x.tv_sec = x.tv_nsec; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_sys_struct_timespec_in_unistd_h=yes else case e in #( e) gl_cv_sys_struct_timespec_in_unistd_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_sys_struct_timespec_in_unistd_h" >&5 printf "%s\n" "$gl_cv_sys_struct_timespec_in_unistd_h" >&6; } if test $gl_cv_sys_struct_timespec_in_unistd_h = yes; then UNISTD_H_DEFINES_STRUCT_TIMESPEC=1 fi fi fi fi if test $gl_cv_have_include_next = yes; then gl_cv_next_time_h='<'time.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_time_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'time.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_time_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_time_h gl_cv_next_time_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_time_h" >&5 printf "%s\n" "$gl_cv_next_time_h" >&6; } fi NEXT_TIME_H=$gl_cv_next_time_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'time.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_time_h fi NEXT_AS_FIRST_DIRECTIVE_TIME_H=$gl_next_as_first_directive { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for TIME_UTC in " >&5 printf %s "checking for TIME_UTC in ... " >&6; } if test ${gl_cv_time_h_has_TIME_UTC+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { static int x = TIME_UTC; x++; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_time_h_has_TIME_UTC=yes else case e in #( e) gl_cv_time_h_has_TIME_UTC=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_time_h_has_TIME_UTC" >&5 printf "%s\n" "$gl_cv_time_h_has_TIME_UTC" >&6; } if test $gl_cv_time_h_has_TIME_UTC = yes; then TIME_H_DEFINES_TIME_UTC=1 else TIME_H_DEFINES_TIME_UTC=0 fi GL_GNULIB_CTIME=0 GL_GNULIB_MKTIME=0 GL_GNULIB_LOCALTIME=0 GL_GNULIB_NANOSLEEP=0 GL_GNULIB_STRFTIME=0 GL_GNULIB_STRPTIME=0 GL_GNULIB_TIME=0 GL_GNULIB_TIMEGM=0 GL_GNULIB_TIMESPEC_GET=0 GL_GNULIB_TIMESPEC_GETRES=0 GL_GNULIB_TIME_R=0 GL_GNULIB_TIME_RZ=0 GL_GNULIB_TZNAME=0 GL_GNULIB_TZSET=0 GL_GNULIB_MDA_TZSET=1 ac_fn_check_decl "$LINENO" "execvpe" "ac_cv_have_decl_execvpe" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_execvpe" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_EXECVPE $ac_have_decl" >>confdefs.h if test $gl_cv_have_include_next = yes; then gl_cv_next_unistd_h='<'unistd.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_unistd_h+y} then : printf %s "(cached) " >&6 else case e in #( e) if test $ac_cv_header_unistd_h = yes; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'unistd.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_unistd_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_unistd_h gl_cv_next_unistd_h='"'$gl_header'"' else gl_cv_next_unistd_h='<'unistd.h'>' fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_unistd_h" >&5 printf "%s\n" "$gl_cv_next_unistd_h" >&6; } fi NEXT_UNISTD_H=$gl_cv_next_unistd_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'unistd.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_unistd_h fi NEXT_AS_FIRST_DIRECTIVE_UNISTD_H=$gl_next_as_first_directive if test $ac_cv_header_unistd_h = yes; then HAVE_UNISTD_H=1 else HAVE_UNISTD_H=0 fi if test $ac_cv_have_decl_execvpe = no; then HAVE_DECL_EXECVPE=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for C compiler option to allow warnings" >&5 printf %s "checking for C compiler option to allow warnings... " >&6; } if test ${gl_cv_cc_wallow+y} then : printf %s "(cached) " >&6 else case e in #( e) rm -f conftest* echo 'int dummy;' > conftest.c { ac_try='${CC-cc} $CFLAGS $CPPFLAGS -c conftest.c 2>conftest1.err' { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5 (eval $ac_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } >/dev/null { ac_try='${CC-cc} $CFLAGS $CPPFLAGS -Wno-error -c conftest.c 2>conftest2.err' { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$ac_try\""; } >&5 (eval $ac_try) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; } >/dev/null if test $? = 0 && test `wc -l < conftest1.err` = `wc -l < conftest2.err`; then gl_cv_cc_wallow='-Wno-error' else gl_cv_cc_wallow=none fi rm -f conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_cc_wallow" >&5 printf "%s\n" "$gl_cv_cc_wallow" >&6; } case "$gl_cv_cc_wallow" in none) GL_CFLAG_ALLOW_WARNINGS='' ;; *) GL_CFLAG_ALLOW_WARNINGS="$gl_cv_cc_wallow" ;; esac GL_CFLAG_GNULIB_WARNINGS='' if test -n "$GL_CFLAG_ALLOW_WARNINGS"; then cat > conftest.c <<\EOF #if (__GNUC__ >= 3 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-cast-qual -Wno-conversion -Wno-float-equal -Wno-sign-compare -Wno-undef -Wno-unused-function -Wno-unused-parameter #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 9) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-float-conversion #endif #if (__GNUC__ >= 7 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wimplicit-fallthrough #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-pedantic #endif #if 3 < __clang_major__ + (9 <= __clang_minor__) -Wno-tautological-constant-out-of-range-compare #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-sign-conversion -Wno-type-limits #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 5) > 4 && !defined __clang__) -Wno-unsuffixed-float-constants #endif EOF gl_command="$CC $CFLAGS $CPPFLAGS -E conftest.c > conftest.out" if { { eval echo "\"\$as_me\":${as_lineno-$LINENO}: \"$gl_command\""; } >&5 (eval $gl_command) 2>&5 ac_status=$? printf "%s\n" "$as_me:${as_lineno-$LINENO}: \$? = $ac_status" >&5 test $ac_status = 0; }; then gl_options=`grep -v '#' conftest.out` for word in $gl_options; do GL_CFLAG_GNULIB_WARNINGS="$GL_CFLAG_GNULIB_WARNINGS $word" done fi rm -f conftest.c conftest.out fi if true; then GL_COND_LIBTOOL_TRUE= GL_COND_LIBTOOL_FALSE='#' else GL_COND_LIBTOOL_TRUE='#' GL_COND_LIBTOOL_FALSE= fi gl_cond_libtool=true gl_m4_base='gnulib-m4' gl_source_base='gnulib-lib' gl_source_base_prefix= case "$GL_GENERATE_LIMITS_H" in false) LIMITS_H='' ;; true) if test -z "$LIMITS_H"; then LIMITS_H="${gl_source_base_prefix}limits.h" fi ;; *) echo "*** GL_GENERATE_LIMITS_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_LIMITS_H; then GL_GENERATE_LIMITS_H_TRUE= GL_GENERATE_LIMITS_H_FALSE='#' else GL_GENERATE_LIMITS_H_TRUE='#' GL_GENERATE_LIMITS_H_FALSE= fi : if test -z "${GL_GENERATE_LIMITS_H_TRUE}" && test -z "${GL_GENERATE_LIMITS_H_FALSE}"; then GL_GENERATE_LIMITS_H_TRUE='#' GL_GENERATE_LIMITS_H_FALSE='#' fi if test "$gl_threads_api" = posix; then # OSF/1 4.0 and Mac OS X 10.1 lack the pthread_rwlock_t type and the # pthread_rwlock_* functions. has_rwlock=false ac_fn_c_check_type "$LINENO" "pthread_rwlock_t" "ac_cv_type_pthread_rwlock_t" "#include " if test "x$ac_cv_type_pthread_rwlock_t" = xyes then : has_rwlock=true printf "%s\n" "#define HAVE_PTHREAD_RWLOCK 1" >>confdefs.h fi if $has_rwlock; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether pthread_rwlock_rdlock prefers a writer to a reader" >&5 printf %s "checking whether pthread_rwlock_rdlock prefers a writer to a reader... " >&6; } if test ${gl_cv_pthread_rwlock_rdlock_prefer_writer+y} then : printf %s "(cached) " >&6 else case e in #( e) saved_LIBS="$LIBS" LIBS="$LIBS $LIBMULTITHREAD" if test "$cross_compiling" = yes then : case "$host_os" in # Guess no on glibc systems. *-gnu* | gnu*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess no on musl systems. *-musl* | midipix*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess no on bionic systems. *-android*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess yes on native Windows with the mingw-w64 winpthreads library. # Guess no on native Windows with the gnulib windows-rwlock module. mingw* | windows*) if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing yes" else gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" fi ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_pthread_rwlock_rdlock_prefer_writer="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include #include #define SUCCEED() exit (0) #define FAILURE() exit (1) #define UNEXPECTED(n) (exit (10 + (n))) /* The main thread creates the waiting writer and the requesting reader threads in the default way; this guarantees that they have the same priority. We can reuse the main thread as first reader thread. */ static pthread_rwlock_t lock; static pthread_t reader1; static pthread_t writer; static pthread_t reader2; static pthread_t timer; /* Used to pass control from writer to reader2 and from reader2 to timer, as in a relay race. Passing control from one running thread to another running thread is most likely faster than to create the second thread. */ static pthread_mutex_t baton; static void * timer_func (void *ignored) { /* Step 13 (can be before or after step 12): The timer thread takes the baton, then waits a moment to make sure it can tell whether the second reader thread is blocked at step 12. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (13); usleep (100000); /* By the time we get here, it's clear that the second reader thread is blocked at step 12. This is the desired behaviour. */ SUCCEED (); } static void * reader2_func (void *ignored) { int err; /* Step 8 (can be before or after step 7): The second reader thread takes the baton, then waits a moment to make sure the writer thread has reached step 7. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (8); usleep (100000); /* Step 9: The second reader thread requests the lock. */ err = pthread_rwlock_tryrdlock (&lock); if (err == 0) FAILURE (); else if (err != EBUSY) UNEXPECTED (9); /* Step 10: Launch a timer, to test whether the next call blocks. */ if (pthread_create (&timer, NULL, timer_func, NULL)) UNEXPECTED (10); /* Step 11: Release the baton. */ if (pthread_mutex_unlock (&baton)) UNEXPECTED (11); /* Step 12: The second reader thread requests the lock. */ err = pthread_rwlock_rdlock (&lock); if (err == 0) FAILURE (); else UNEXPECTED (12); } static void * writer_func (void *ignored) { /* Step 4: Take the baton, so that the second reader thread does not go ahead too early. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (4); /* Step 5: Create the second reader thread. */ if (pthread_create (&reader2, NULL, reader2_func, NULL)) UNEXPECTED (5); /* Step 6: Release the baton. */ if (pthread_mutex_unlock (&baton)) UNEXPECTED (6); /* Step 7: The writer thread requests the lock. */ if (pthread_rwlock_wrlock (&lock)) UNEXPECTED (7); return NULL; } int main () { reader1 = pthread_self (); /* Step 1: The main thread initializes the lock and the baton. */ if (pthread_rwlock_init (&lock, NULL)) UNEXPECTED (1); if (pthread_mutex_init (&baton, NULL)) UNEXPECTED (1); /* Step 2: The main thread acquires the lock as a reader. */ if (pthread_rwlock_rdlock (&lock)) UNEXPECTED (2); /* Step 3: Create the writer thread. */ if (pthread_create (&writer, NULL, writer_func, NULL)) UNEXPECTED (3); /* Job done. Go to sleep. */ for (;;) { sleep (1); } } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_pthread_rwlock_rdlock_prefer_writer=yes else case e in #( e) gl_cv_pthread_rwlock_rdlock_prefer_writer=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi LIBS="$saved_LIBS" ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_pthread_rwlock_rdlock_prefer_writer" >&5 printf "%s\n" "$gl_cv_pthread_rwlock_rdlock_prefer_writer" >&6; } case "$gl_cv_pthread_rwlock_rdlock_prefer_writer" in *yes) printf "%s\n" "#define HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER 1" >>confdefs.h ;; esac fi # glibc defines PTHREAD_MUTEX_RECURSIVE as enum, not as a macro. cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { #if __FreeBSD__ == 4 error "No, in FreeBSD 4.0 recursive mutexes actually don't work." #elif (defined __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ \ && __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1070) error "No, in Mac OS X < 10.7 recursive mutexes actually don't work." #else int x = (int)PTHREAD_MUTEX_RECURSIVE; return !x; #endif ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : printf "%s\n" "#define HAVE_PTHREAD_MUTEX_RECURSIVE 1" >>confdefs.h fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi : printf "%s\n" "#define GNULIB_LOCK 1" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for ssize_t" >&5 printf %s "checking for ssize_t... " >&6; } if test ${gl_cv_ssize_t+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { int x = sizeof (ssize_t *) + sizeof (ssize_t); return !x; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_ssize_t=yes else case e in #( e) gl_cv_ssize_t=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_ssize_t" >&5 printf "%s\n" "$gl_cv_ssize_t" >&6; } if test $gl_cv_ssize_t = no; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether size_t is wider than 'long'" >&5 printf %s "checking whether size_t is wider than 'long'... " >&6; } if test ${gl_cv_size_t_large+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include typedef int array [2 * (sizeof (size_t) > sizeof (long)) - 1]; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_size_t_large=yes else case e in #( e) gl_cv_size_t_large=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_size_t_large" >&5 printf "%s\n" "$gl_cv_size_t_large" >&6; } if test $gl_cv_size_t_large = yes; then gl_def_ssize_t='long long' else gl_def_ssize_t='long' fi printf "%s\n" "#define ssize_t $gl_def_ssize_t" >>confdefs.h fi case "$GL_GENERATE_STDINT_H" in false) STDINT_H='' ;; true) if test -z "$STDINT_H"; then STDINT_H="${gl_source_base_prefix}stdint.h" fi ;; *) echo "*** GL_GENERATE_STDINT_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_STDINT_H; then GL_GENERATE_STDINT_H_TRUE= GL_GENERATE_STDINT_H_FALSE='#' else GL_GENERATE_STDINT_H_TRUE='#' GL_GENERATE_STDINT_H_FALSE= fi : if test -z "${GL_GENERATE_STDINT_H_TRUE}" && test -z "${GL_GENERATE_STDINT_H_FALSE}"; then GL_GENERATE_STDINT_H_TRUE='#' GL_GENERATE_STDINT_H_FALSE='#' fi case "$GL_GENERATE_LIMITS_H" in false) LIMITS_H='' ;; true) if test -z "$LIMITS_H"; then LIMITS_H="${gl_source_base_prefix}limits.h" fi ;; *) echo "*** GL_GENERATE_LIMITS_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_LIMITS_H; then GL_GENERATE_LIMITS_H_TRUE= GL_GENERATE_LIMITS_H_FALSE='#' else GL_GENERATE_LIMITS_H_TRUE='#' GL_GENERATE_LIMITS_H_FALSE= fi : if test -z "${GL_GENERATE_LIMITS_H_TRUE}" && test -z "${GL_GENERATE_LIMITS_H_FALSE}"; then GL_GENERATE_LIMITS_H_TRUE='#' GL_GENERATE_LIMITS_H_FALSE='#' fi case "$host_os" in cygwin*) GL_GENERATE_STDNORETURN_H=true ;; *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working stdnoreturn.h" >&5 printf %s "checking for working stdnoreturn.h... " >&6; } if test ${gl_cv_header_working_stdnoreturn_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if defined _WIN32 && !defined __CYGWIN__ # include #endif /* Do not check for 'noreturn' after the return type. C11 allows it, but it's rarely done that way and circa-2012 bleeding-edge GCC rejects it when given -Werror=old-style-declaration. */ noreturn void foo1 (void) { exit (0); } _Noreturn void foo2 (void) { exit (0); } int testit (int argc, char **argv) { if (argc & 1) return 0; (argv[0][0] ? foo1 : foo2) (); } int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_header_working_stdnoreturn_h=yes else case e in #( e) gl_cv_header_working_stdnoreturn_h=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_header_working_stdnoreturn_h" >&5 printf "%s\n" "$gl_cv_header_working_stdnoreturn_h" >&6; } if test $gl_cv_header_working_stdnoreturn_h = yes; then GL_GENERATE_STDNORETURN_H=false else GL_GENERATE_STDNORETURN_H=true fi ;; esac case "$GL_GENERATE_STDNORETURN_H" in false) STDNORETURN_H='' ;; true) if test -z "$STDNORETURN_H"; then STDNORETURN_H="${gl_source_base_prefix}stdnoreturn.h" fi ;; *) echo "*** GL_GENERATE_STDNORETURN_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_STDNORETURN_H; then GL_GENERATE_STDNORETURN_H_TRUE= GL_GENERATE_STDNORETURN_H_FALSE='#' else GL_GENERATE_STDNORETURN_H_TRUE='#' GL_GENERATE_STDNORETURN_H_FALSE= fi : if test -z "${GL_GENERATE_STDNORETURN_H_TRUE}" && test -z "${GL_GENERATE_STDNORETURN_H_FALSE}"; then GL_GENERATE_STDNORETURN_H_TRUE='#' GL_GENERATE_STDNORETURN_H_FALSE='#' fi gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04=false gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f=false gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce=false gl_gnulib_enabled_attribute=false gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f=false gl_gnulib_enabled_c99=false gl_gnulib_enabled_55e6e810e702cce3e72865884958a831=false gl_gnulib_enabled_cloexec=false gl_gnulib_enabled_close=false gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346=false gl_gnulib_enabled_dup2=false gl_gnulib_enabled_errno=false gl_gnulib_enabled_error=false gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0=false gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5=false gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27=false gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057=false gl_gnulib_enabled_fcntl=false gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8=false gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239=false gl_gnulib_enabled_filename=false gl_gnulib_enabled_fstat=false gl_gnulib_enabled_getdtablesize=false gl_gnulib_enabled_getpagesize=false gl_gnulib_enabled_getprogname=false gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=false gl_gnulib_enabled_hasmntopt=false gl_gnulib_enabled_idx=false gl_gnulib_enabled_intprops=false gl_gnulib_enabled_largefile=false gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2=false gl_gnulib_enabled_list=false gl_gnulib_enabled_malloca=false gl_gnulib_enabled_mntent=false gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616=false gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07=false gl_gnulib_enabled_open=false gl_gnulib_enabled_pathmax=false gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c=false gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a=false gl_gnulib_enabled_raise=false gl_gnulib_enabled_rmdir=false gl_gnulib_enabled_sched=false gl_gnulib_enabled_sigaction=false gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9=false gl_gnulib_enabled_sigprocmask=false gl_gnulib_enabled_size_max=false gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54=false gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c=false gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5=false gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b=false gl_gnulib_enabled_stat=false gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c=false gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81=false gl_gnulib_enabled_stdbool=false gl_gnulib_enabled_stdckdint=false gl_gnulib_enabled_stddef=false gl_gnulib_enabled_stdio=false gl_gnulib_enabled_stdlib=false gl_gnulib_enabled_strerror=false gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72=false gl_gnulib_enabled_string=false gl_gnulib_enabled_sys_stat=false gl_gnulib_enabled_ff372e41059705989544356242e580a9=false gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd=false gl_gnulib_enabled_unistd=false gl_gnulib_enabled_vararrays=false gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556=false gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d=false gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440=false gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab=false gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354=false gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef=false gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f=false gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec=false gl_gnulib_enabled_xsize=false func_gl_gnulib_m4code_4661e0b4e500a1a00180219f0280fb04 () { if $gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04; then :; else if test $ac_cv_func_alloca_works = no; then : fi # Define an additional variable used in the Makefile substitution. if test $ac_cv_working_alloca_h = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for alloca as a compiler built-in" >&5 printf %s "checking for alloca as a compiler built-in... " >&6; } if test ${gl_cv_rpl_alloca+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __GNUC__ || defined _AIX || defined _MSC_VER Need own alloca #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Need own alloca" >/dev/null 2>&1 then : gl_cv_rpl_alloca=yes else case e in #( e) gl_cv_rpl_alloca=no ;; esac fi rm -rf conftest* ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_rpl_alloca" >&5 printf "%s\n" "$gl_cv_rpl_alloca" >&6; } if test $gl_cv_rpl_alloca = yes; then printf "%s\n" "#define HAVE_ALLOCA 1" >>confdefs.h GL_GENERATE_ALLOCA_H=true else GL_GENERATE_ALLOCA_H=false fi else GL_GENERATE_ALLOCA_H=true fi if test $ac_cv_working_alloca_h = yes; then HAVE_ALLOCA_H=1 else HAVE_ALLOCA_H=0 fi case "$GL_GENERATE_ALLOCA_H" in false) ALLOCA_H='' ;; true) if test -z "$ALLOCA_H"; then ALLOCA_H="${gl_source_base_prefix}alloca.h" fi ;; *) echo "*** GL_GENERATE_ALLOCA_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_ALLOCA_H; then GL_GENERATE_ALLOCA_H_TRUE= GL_GENERATE_ALLOCA_H_FALSE='#' else GL_GENERATE_ALLOCA_H_TRUE='#' GL_GENERATE_ALLOCA_H_FALSE= fi : if test -z "${GL_GENERATE_ALLOCA_H_TRUE}" && test -z "${GL_GENERATE_ALLOCA_H_FALSE}"; then GL_GENERATE_ALLOCA_H_TRUE='#' GL_GENERATE_ALLOCA_H_FALSE='#' fi gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04=true fi } func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f () { if $gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for static_assert" >&5 printf %s "checking for static_assert... " >&6; } if test ${gl_cv_static_assert+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_saved_CFLAGS=$CFLAGS for gl_working in "yes, a keyword" "yes, an macro"; do case $gl_working in #( *assert.h*) : CFLAGS="$gl_saved_CFLAGS -DINCLUDE_ASSERT_H" ;; #( *) : ;; esac cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if defined __clang__ && __STDC_VERSION__ < 202311 #pragma clang diagnostic error "-Wc2x-extensions" #pragma clang diagnostic error "-Wc++1z-extensions" #endif #ifdef INCLUDE_ASSERT_H #include #endif static_assert (2 + 2 == 4, "arithmetic does not work"); static_assert (2 + 2 == 4); int main (void) { static_assert (sizeof (char) == 1, "sizeof does not work"); static_assert (sizeof (char) == 1); ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_static_assert=$gl_working else case e in #( e) gl_cv_static_assert=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext CFLAGS=$gl_saved_CFLAGS test "$gl_cv_static_assert" != no && break done ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_static_assert" >&5 printf "%s\n" "$gl_cv_static_assert" >&6; } GL_GENERATE_ASSERT_H=false case $gl_cv_static_assert in #( yes*keyword*) : printf "%s\n" "#define HAVE_C_STATIC_ASSERT 1" >>confdefs.h ;; #( no) : GL_GENERATE_ASSERT_H=true if test $gl_cv_have_include_next = yes; then gl_cv_next_assert_h='<'assert.h'>' else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking absolute name of " >&5 printf %s "checking absolute name of ... " >&6; } if test ${gl_cv_next_assert_h+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include _ACEOF case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac case "$host_os" in mingw* | windows*) gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo 'assert.h' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' gl_cv_absolute_assert_h=`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&5 | sed -n "$gl_absolute_header_sed"` gl_header=$gl_cv_absolute_assert_h gl_cv_next_assert_h='"'$gl_header'"' ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_next_assert_h" >&5 printf "%s\n" "$gl_cv_next_assert_h" >&6; } fi NEXT_ASSERT_H=$gl_cv_next_assert_h if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'assert.h'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=$gl_cv_next_assert_h fi NEXT_AS_FIRST_DIRECTIVE_ASSERT_H=$gl_next_as_first_directive ;; #( *) : ;; esac case "$GL_GENERATE_ASSERT_H" in false) ASSERT_H='' ;; true) if test -z "$ASSERT_H"; then ASSERT_H="${gl_source_base_prefix}assert.h" fi ;; *) echo "*** GL_GENERATE_ASSERT_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_ASSERT_H; then GL_GENERATE_ASSERT_H_TRUE= GL_GENERATE_ASSERT_H_FALSE='#' else GL_GENERATE_ASSERT_H_TRUE='#' GL_GENERATE_ASSERT_H_FALSE= fi : if test -z "${GL_GENERATE_ASSERT_H_TRUE}" && test -z "${GL_GENERATE_ASSERT_H_FALSE}"; then GL_GENERATE_ASSERT_H_TRUE='#' GL_GENERATE_ASSERT_H_FALSE='#' fi gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f=true fi } func_gl_gnulib_m4code_3146726593c1fd888d32adc5a62973ce () { if $gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce; then :; else gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce=true func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 func_gl_gnulib_m4code_sigprocmask func_gl_gnulib_m4code_11f0455f01baad17427f00c3f461553b func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_b26fd0a0c34f92c929116e0e7f1d232f fi } func_gl_gnulib_m4code_attribute () { if $gl_gnulib_enabled_attribute; then :; else gl_gnulib_enabled_attribute=true fi } func_gl_gnulib_m4code_ae0d979e17e723693567f9efd1d2294f () { if $gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f; then :; else gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f=true func_gl_gnulib_m4code_36afd6902ac3aacf32e3ff12a686c346 func_gl_gnulib_m4code_filename func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_c99 () { if $gl_gnulib_enabled_c99; then :; else gl_gnulib_enabled_c99=true func_gl_gnulib_m4code_4ecd6d4226a85c8d3e919d781a515f81 fi } func_gl_gnulib_m4code_55e6e810e702cce3e72865884958a831 () { if $gl_gnulib_enabled_55e6e810e702cce3e72865884958a831; then :; else printf "%s\n" "#define SIGNAL_SAFE_LIST 1" >>confdefs.h gl_gnulib_enabled_55e6e810e702cce3e72865884958a831=true func_gl_gnulib_m4code_3146726593c1fd888d32adc5a62973ce func_gl_gnulib_m4code_c99 func_gl_gnulib_m4code_error func_gl_gnulib_m4code_83e4d5f60933eb2f07d525a5bfabe057 func_gl_gnulib_m4code_be453cec5eecf5731a274f2de7f2db36 func_gl_gnulib_m4code_5b88be6afdf85eedb41cc8063ca35aa2 func_gl_gnulib_m4code_list func_gl_gnulib_m4code_rmdir func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_cloexec () { if $gl_gnulib_enabled_cloexec; then :; else printf "%s\n" "#define GNULIB_TEST_CLOEXEC 1" >>confdefs.h gl_gnulib_enabled_cloexec=true func_gl_gnulib_m4code_dup2 func_gl_gnulib_m4code_fcntl func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_close () { if $gl_gnulib_enabled_close; then :; else if test $REPLACE_CLOSE = 1; then GL_COND_OBJ_CLOSE_TRUE= GL_COND_OBJ_CLOSE_FALSE='#' else GL_COND_OBJ_CLOSE_TRUE='#' GL_COND_OBJ_CLOSE_FALSE= fi : if test -z "${GL_COND_OBJ_CLOSE_TRUE}" && test -z "${GL_COND_OBJ_CLOSE_FALSE}"; then GL_COND_OBJ_CLOSE_TRUE='#' GL_COND_OBJ_CLOSE_FALSE='#' fi GL_GNULIB_CLOSE=1 printf "%s\n" "#define GNULIB_TEST_CLOSE 1" >>confdefs.h printf "%s\n" "#define GNULIB_CLOSE 1" >>confdefs.h gl_gnulib_enabled_close=true if test $REPLACE_CLOSE = 1; then func_gl_gnulib_m4code_43fe87a341d9b4b93c47c3ad819a5239 fi if test $REPLACE_CLOSE = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_36afd6902ac3aacf32e3ff12a686c346 () { if $gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether // is distinct from /" >&5 printf %s "checking whether // is distinct from /... " >&6; } if test ${gl_cv_double_slash_root+y} then : printf %s "(cached) " >&6 else case e in #( e) if test x"$cross_compiling" = xyes ; then # When cross-compiling, there is no way to tell whether // is special # short of a list of hosts. However, the only known hosts to date # that have a distinct // are Apollo DomainOS (too old to port to), # Cygwin, and z/OS. If anyone knows of another system for which // has # special semantics and is distinct from /, please report it to # . case $host in *-cygwin | i370-ibm-openedition) gl_cv_double_slash_root=yes ;; *) # Be optimistic and assume that / and // are the same when we # don't know. gl_cv_double_slash_root='unknown, assuming no' ;; esac else set x `ls -di / // 2>/dev/null` if test "$2" = "$4" && wc //dev/null >/dev/null 2>&1; then gl_cv_double_slash_root=no else gl_cv_double_slash_root=yes fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_double_slash_root" >&5 printf "%s\n" "$gl_cv_double_slash_root" >&6; } if test "$gl_cv_double_slash_root" = yes; then printf "%s\n" "#define DOUBLE_SLASH_IS_DISTINCT_ROOT 1" >>confdefs.h fi gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346=true fi } func_gl_gnulib_m4code_dup2 () { if $gl_gnulib_enabled_dup2; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether dup2 works" >&5 printf %s "checking whether dup2 works... " >&6; } if test ${gl_cv_func_dup2_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in mingw* | windows*) # on this platform, dup2 always returns 0 for success gl_cv_func_dup2_works="guessing no" ;; cygwin*) # on cygwin 1.5.x, dup2(1,1) returns 0 gl_cv_func_dup2_works="guessing no" ;; aix* | freebsd*) # on AIX 7.1 and FreeBSD 6.1, dup2 (1,toobig) gives EMFILE, # not EBADF. gl_cv_func_dup2_works="guessing no" ;; haiku*) # on Haiku alpha 2, dup2(1, 1) resets FD_CLOEXEC. gl_cv_func_dup2_works="guessing no" ;; *-android*) # implemented using dup3(), which fails if oldfd == newfd gl_cv_func_dup2_works="guessing no" ;; os2*) # on OS/2 kLIBC, dup2() does not work on a directory fd. gl_cv_func_dup2_works="guessing no" ;; *) gl_cv_func_dup2_works="guessing yes" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include #include #include $gl_mda_defines #ifndef RLIM_SAVED_CUR # define RLIM_SAVED_CUR RLIM_INFINITY #endif #ifndef RLIM_SAVED_MAX # define RLIM_SAVED_MAX RLIM_INFINITY #endif int main (void) { int result = 0; int bad_fd = INT_MAX; struct rlimit rlim; if (getrlimit (RLIMIT_NOFILE, &rlim) == 0 && 0 <= rlim.rlim_cur && rlim.rlim_cur <= INT_MAX && rlim.rlim_cur != RLIM_INFINITY && rlim.rlim_cur != RLIM_SAVED_MAX && rlim.rlim_cur != RLIM_SAVED_CUR) bad_fd = rlim.rlim_cur; #ifdef FD_CLOEXEC if (fcntl (1, F_SETFD, FD_CLOEXEC) == -1) result |= 1; #endif if (dup2 (1, 1) != 1) result |= 2; #ifdef FD_CLOEXEC if (fcntl (1, F_GETFD) != FD_CLOEXEC) result |= 4; #endif close (0); if (dup2 (0, 0) != -1) result |= 8; /* Many gnulib modules require POSIX conformance of EBADF. */ if (dup2 (2, bad_fd) == -1 && errno != EBADF) result |= 16; /* Flush out some cygwin core dumps. */ if (dup2 (2, -1) != -1 || errno != EBADF) result |= 32; dup2 (2, 255); dup2 (2, 256); /* On OS/2 kLIBC, dup2() does not work on a directory fd. */ { int fd = open (".", O_RDONLY); if (fd == -1) result |= 64; else if (dup2 (fd, fd + 1) == -1) result |= 128; close (fd); } return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_dup2_works=yes else case e in #( e) gl_cv_func_dup2_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_dup2_works" >&5 printf "%s\n" "$gl_cv_func_dup2_works" >&6; } case "$gl_cv_func_dup2_works" in *yes) ;; *) REPLACE_DUP2=1 ac_fn_c_check_func "$LINENO" "setdtablesize" "ac_cv_func_setdtablesize" if test "x$ac_cv_func_setdtablesize" = xyes then : printf "%s\n" "#define HAVE_SETDTABLESIZE 1" >>confdefs.h fi ;; esac if test $REPLACE_DUP2 = 1; then GL_COND_OBJ_DUP2_TRUE= GL_COND_OBJ_DUP2_FALSE='#' else GL_COND_OBJ_DUP2_TRUE='#' GL_COND_OBJ_DUP2_FALSE= fi : if test -z "${GL_COND_OBJ_DUP2_TRUE}" && test -z "${GL_COND_OBJ_DUP2_FALSE}"; then GL_COND_OBJ_DUP2_TRUE='#' GL_COND_OBJ_DUP2_FALSE='#' fi if test -z "$GL_COND_OBJ_DUP2_TRUE"; then : fi GL_GNULIB_DUP2=1 printf "%s\n" "#define GNULIB_TEST_DUP2 1" >>confdefs.h gl_gnulib_enabled_dup2=true if test $REPLACE_DUP2 = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi if test $REPLACE_DUP2 = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_errno () { if $gl_gnulib_enabled_errno; then :; else case "$GL_GENERATE_ERRNO_H" in false) ERRNO_H='' ;; true) if test -z "$ERRNO_H"; then ERRNO_H="${gl_source_base_prefix}errno.h" fi ;; *) echo "*** GL_GENERATE_ERRNO_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_ERRNO_H; then GL_GENERATE_ERRNO_H_TRUE= GL_GENERATE_ERRNO_H_FALSE='#' else GL_GENERATE_ERRNO_H_TRUE='#' GL_GENERATE_ERRNO_H_FALSE= fi : if test -z "${GL_GENERATE_ERRNO_H_TRUE}" && test -z "${GL_GENERATE_ERRNO_H_FALSE}"; then GL_GENERATE_ERRNO_H_TRUE='#' GL_GENERATE_ERRNO_H_FALSE='#' fi gl_gnulib_enabled_errno=true func_gl_gnulib_m4code_303a13eed89acabfd6998a952149f2d5 fi } func_gl_gnulib_m4code_error () { if $gl_gnulib_enabled_error; then :; else if test $COMPILE_ERROR_C = 1; then GL_COND_OBJ_ERROR_TRUE= GL_COND_OBJ_ERROR_FALSE='#' else GL_COND_OBJ_ERROR_TRUE='#' GL_COND_OBJ_ERROR_FALSE= fi : if test -z "${GL_COND_OBJ_ERROR_TRUE}" && test -z "${GL_COND_OBJ_ERROR_FALSE}"; then GL_COND_OBJ_ERROR_TRUE='#' GL_COND_OBJ_ERROR_FALSE='#' fi if test -z "$GL_COND_OBJ_ERROR_TRUE"; then : : fi gl_gnulib_enabled_error=true func_gl_gnulib_m4code_97a0594d08da5f192f25b8c02c46f5f0 if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_getprogname fi if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_stdio if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_strerror fi if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_unistd fi fi } func_gl_gnulib_m4code_97a0594d08da5f192f25b8c02c46f5f0 () { if $gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0; then :; else gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0=true func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c fi } func_gl_gnulib_m4code_303a13eed89acabfd6998a952149f2d5 () { if $gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5; then :; else gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5=true fi } func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 () { if $gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27; then :; else gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27=true fi } func_gl_gnulib_m4code_83e4d5f60933eb2f07d525a5bfabe057 () { if $gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057; then :; else : gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057=true func_gl_gnulib_m4code_c99 func_gl_gnulib_m4code_raise func_gl_gnulib_m4code_sigaction func_gl_gnulib_m4code_sigprocmask func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_fcntl () { if $gl_gnulib_enabled_fcntl; then :; else if test $ac_cv_func_fcntl = no; then if test $ac_cv_func_fcntl = no; then HAVE_FCNTL=0 else REPLACE_FCNTL=1 fi else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether fcntl handles F_DUPFD correctly" >&5 printf %s "checking whether fcntl handles F_DUPFD correctly... " >&6; } if test ${gl_cv_func_fcntl_f_dupfd_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case $host_os in aix* | cygwin* | haiku*) gl_cv_func_fcntl_f_dupfd_works="guessing no" ;; *) gl_cv_func_fcntl_f_dupfd_works="guessing yes" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #include #include #include $gl_mda_defines #ifndef RLIM_SAVED_CUR # define RLIM_SAVED_CUR RLIM_INFINITY #endif #ifndef RLIM_SAVED_MAX # define RLIM_SAVED_MAX RLIM_INFINITY #endif int main (void) { int result = 0; int bad_fd = INT_MAX; struct rlimit rlim; if (getrlimit (RLIMIT_NOFILE, &rlim) == 0 && 0 <= rlim.rlim_cur && rlim.rlim_cur <= INT_MAX && rlim.rlim_cur != RLIM_INFINITY && rlim.rlim_cur != RLIM_SAVED_MAX && rlim.rlim_cur != RLIM_SAVED_CUR) bad_fd = rlim.rlim_cur; if (fcntl (0, F_DUPFD, -1) != -1) result |= 1; if (errno != EINVAL) result |= 2; if (fcntl (0, F_DUPFD, bad_fd) != -1) result |= 4; if (errno != EINVAL) result |= 8; /* On OS/2 kLIBC, F_DUPFD does not work on a directory fd */ { int fd; fd = open (".", O_RDONLY); if (fd == -1) result |= 16; else if (fcntl (fd, F_DUPFD, STDERR_FILENO + 1) == -1) result |= 32; close (fd); } return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_fcntl_f_dupfd_works=yes else case e in #( e) gl_cv_func_fcntl_f_dupfd_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_fcntl_f_dupfd_works" >&5 printf "%s\n" "$gl_cv_func_fcntl_f_dupfd_works" >&6; } case $gl_cv_func_fcntl_f_dupfd_works in *yes) ;; *) if test $ac_cv_func_fcntl = no; then HAVE_FCNTL=0 else REPLACE_FCNTL=1 fi printf "%s\n" "#define FCNTL_DUPFD_BUGGY 1" >>confdefs.h ;; esac { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether fcntl understands F_DUPFD_CLOEXEC" >&5 printf %s "checking whether fcntl understands F_DUPFD_CLOEXEC... " >&6; } if test ${gl_cv_func_fcntl_f_dupfd_cloexec+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # Guess no on NetBSD. netbsd*) gl_cv_func_fcntl_f_dupfd_cloexec="guessing no" ;; *) gl_cv_func_fcntl_f_dupfd_cloexec="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main (int argc, char *argv[]) { if (argc == 1) /* parent process */ { if (fcntl (1, F_DUPFD_CLOEXEC, 10) < 0) return 1; return execl ("./conftest", "./conftest", "child", NULL); } else /* child process */ return (fcntl (10, F_GETFL) < 0 ? 0 : 42); } _ACEOF if ac_fn_c_try_run "$LINENO" then : cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifdef __linux__ /* The Linux kernel only added F_DUPFD_CLOEXEC in 2.6.24, so we always replace it to support the semantics on older kernels that failed with EINVAL. */ choke me #endif int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_func_fcntl_f_dupfd_cloexec=yes else case e in #( e) gl_cv_func_fcntl_f_dupfd_cloexec="needs runtime check" ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext else case e in #( e) gl_cv_func_fcntl_f_dupfd_cloexec=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_fcntl_f_dupfd_cloexec" >&5 printf "%s\n" "$gl_cv_func_fcntl_f_dupfd_cloexec" >&6; } case "$gl_cv_func_fcntl_f_dupfd_cloexec" in *yes) ;; *) if test $ac_cv_func_fcntl = no; then HAVE_FCNTL=0 else REPLACE_FCNTL=1 fi ;; esac fi if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then GL_COND_OBJ_FCNTL_TRUE= GL_COND_OBJ_FCNTL_FALSE='#' else GL_COND_OBJ_FCNTL_TRUE='#' GL_COND_OBJ_FCNTL_FALSE= fi : if test -z "${GL_COND_OBJ_FCNTL_TRUE}" && test -z "${GL_COND_OBJ_FCNTL_FALSE}"; then GL_COND_OBJ_FCNTL_TRUE='#' GL_COND_OBJ_FCNTL_FALSE='#' fi GL_GNULIB_FCNTL=1 printf "%s\n" "#define GNULIB_TEST_FCNTL 1" >>confdefs.h gl_gnulib_enabled_fcntl=true if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_close fi if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_dup2 fi func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_getdtablesize fi if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi fi } func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 () { if $gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8; then :; else gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_43fe87a341d9b4b93c47c3ad819a5239 () { if $gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239; then :; else gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_filename () { if $gl_gnulib_enabled_filename; then :; else gl_gnulib_enabled_filename=true fi } func_gl_gnulib_m4code_fstat () { if $gl_gnulib_enabled_fstat; then :; else case "$host_os" in darwin* | mingw* | windows* | solaris*) REPLACE_FSTAT=1 ;; esac if test $REPLACE_FSTAT = 1; then GL_COND_OBJ_FSTAT_TRUE= GL_COND_OBJ_FSTAT_FALSE='#' else GL_COND_OBJ_FSTAT_TRUE='#' GL_COND_OBJ_FSTAT_FALSE= fi : if test -z "${GL_COND_OBJ_FSTAT_TRUE}" && test -z "${GL_COND_OBJ_FSTAT_FALSE}"; then GL_COND_OBJ_FSTAT_TRUE='#' GL_COND_OBJ_FSTAT_FALSE='#' fi if test -z "$GL_COND_OBJ_FSTAT_TRUE"; then : case "$host_os" in mingw* | windows*) gl_LIBOBJS="$gl_LIBOBJS stat-w32.$ac_objext" ;; esac : fi GL_GNULIB_FSTAT=1 printf "%s\n" "#define GNULIB_TEST_FSTAT 1" >>confdefs.h printf "%s\n" "#define GNULIB_FSTAT 1" >>confdefs.h gl_gnulib_enabled_fstat=true if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi func_gl_gnulib_m4code_largefile if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_pathmax fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_stat fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c fi func_gl_gnulib_m4code_sys_stat if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_unistd fi fi } func_gl_gnulib_m4code_getdtablesize () { if $gl_gnulib_enabled_getdtablesize; then :; else if test $ac_cv_func_getdtablesize = yes && test $ac_cv_have_decl_getdtablesize = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether getdtablesize works" >&5 printf %s "checking whether getdtablesize works... " >&6; } if test ${gl_cv_func_getdtablesize_works+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in vms*) gl_cv_func_getdtablesize_works="no (limitation)" ;; *) if test "$cross_compiling" = yes then : case "$host_os" in cygwin*) # on cygwin 1.5.25, getdtablesize() automatically grows gl_cv_func_getdtablesize_works="guessing no" ;; *) gl_cv_func_getdtablesize_works="guessing yes" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include $gl_mda_defines int main (void) { int size = getdtablesize(); if (dup2 (0, getdtablesize()) != -1) return 1; if (size != getdtablesize()) return 2; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_getdtablesize_works=yes else case e in #( e) gl_cv_func_getdtablesize_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_getdtablesize_works" >&5 printf "%s\n" "$gl_cv_func_getdtablesize_works" >&6; } case "$gl_cv_func_getdtablesize_works" in *yes | "no (limitation)") ;; *) REPLACE_GETDTABLESIZE=1 ;; esac else HAVE_GETDTABLESIZE=0 fi if test $HAVE_GETDTABLESIZE = 0 || test $REPLACE_GETDTABLESIZE = 1; then GL_COND_OBJ_GETDTABLESIZE_TRUE= GL_COND_OBJ_GETDTABLESIZE_FALSE='#' else GL_COND_OBJ_GETDTABLESIZE_TRUE='#' GL_COND_OBJ_GETDTABLESIZE_FALSE= fi : if test -z "${GL_COND_OBJ_GETDTABLESIZE_TRUE}" && test -z "${GL_COND_OBJ_GETDTABLESIZE_FALSE}"; then GL_COND_OBJ_GETDTABLESIZE_TRUE='#' GL_COND_OBJ_GETDTABLESIZE_FALSE='#' fi if test -z "$GL_COND_OBJ_GETDTABLESIZE_TRUE"; then : : fi GL_GNULIB_GETDTABLESIZE=1 printf "%s\n" "#define GNULIB_TEST_GETDTABLESIZE 1" >>confdefs.h gl_gnulib_enabled_getdtablesize=true if test $HAVE_GETDTABLESIZE = 0; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_getpagesize () { if $gl_gnulib_enabled_getpagesize; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for getpagesize" >&5 printf %s "checking for getpagesize... " >&6; } if test ${gl_cv_func_getpagesize+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { return getpagesize(); ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_func_getpagesize=yes else case e in #( e) gl_cv_func_getpagesize=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_getpagesize" >&5 printf "%s\n" "$gl_cv_func_getpagesize" >&6; } if test $gl_cv_func_getpagesize = no; then HAVE_GETPAGESIZE=0 ac_fn_c_check_header_compile "$LINENO" "OS.h" "ac_cv_header_OS_h" "$ac_includes_default" if test "x$ac_cv_header_OS_h" = xyes then : printf "%s\n" "#define HAVE_OS_H 1" >>confdefs.h fi if test $ac_cv_header_OS_h = yes; then HAVE_OS_H=1 fi ac_fn_c_check_header_compile "$LINENO" "sys/param.h" "ac_cv_header_sys_param_h" "$ac_includes_default" if test "x$ac_cv_header_sys_param_h" = xyes then : printf "%s\n" "#define HAVE_SYS_PARAM_H 1" >>confdefs.h fi if test $ac_cv_header_sys_param_h = yes; then HAVE_SYS_PARAM_H=1 fi fi case "$host_os" in mingw* | windows*) REPLACE_GETPAGESIZE=1 ;; esac ac_fn_check_decl "$LINENO" "getpagesize" "ac_cv_have_decl_getpagesize" "$ac_includes_default" "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_getpagesize" = xyes then : else case e in #( e) HAVE_DECL_GETPAGESIZE=0 ;; esac fi if test $REPLACE_GETPAGESIZE = 1; then GL_COND_OBJ_GETPAGESIZE_TRUE= GL_COND_OBJ_GETPAGESIZE_FALSE='#' else GL_COND_OBJ_GETPAGESIZE_TRUE='#' GL_COND_OBJ_GETPAGESIZE_FALSE= fi : if test -z "${GL_COND_OBJ_GETPAGESIZE_TRUE}" && test -z "${GL_COND_OBJ_GETPAGESIZE_FALSE}"; then GL_COND_OBJ_GETPAGESIZE_TRUE='#' GL_COND_OBJ_GETPAGESIZE_FALSE='#' fi GL_GNULIB_GETPAGESIZE=1 printf "%s\n" "#define GNULIB_TEST_GETPAGESIZE 1" >>confdefs.h gl_gnulib_enabled_getpagesize=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_getprogname () { if $gl_gnulib_enabled_getprogname; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for getprogname" >&5 printf %s "checking for getprogname... " >&6; } if test ${gl_cv_onwards_func_getprogname+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "getprogname" "ac_cv_have_decl_getprogname" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_getprogname" = xyes then : fi if test $ac_cv_have_decl_getprogname = yes; then ac_fn_c_check_func "$LINENO" "getprogname" "ac_cv_func_getprogname" if test "x$ac_cv_func_getprogname" = xyes then : fi if test $ac_cv_func_getprogname = yes; then gl_cv_onwards_func_getprogname=yes else gl_cv_onwards_func_getprogname='future OS version' fi else gl_cv_onwards_func_getprogname='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "getprogname" "ac_cv_func_getprogname" if test "x$ac_cv_func_getprogname" = xyes then : fi gl_cv_onwards_func_getprogname=$ac_cv_func_getprogname ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_getprogname" >&5 printf "%s\n" "$gl_cv_onwards_func_getprogname" >&6; } case "$gl_cv_onwards_func_getprogname" in future*) ac_cv_func_getprogname=no ;; *) ac_cv_func_getprogname=$gl_cv_onwards_func_getprogname ;; esac if test $ac_cv_func_getprogname = yes; then printf "%s\n" "#define HAVE_GETPROGNAME 1" >>confdefs.h fi if test $ac_cv_func_getprogname = no; then HAVE_GETPROGNAME=0 case "$gl_cv_onwards_func_getprogname" in future*) REPLACE_GETPROGNAME=1 ;; esac fi ac_fn_check_decl "$LINENO" "program_invocation_name" "ac_cv_have_decl_program_invocation_name" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_program_invocation_name" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_PROGRAM_INVOCATION_NAME $ac_have_decl" >>confdefs.h if test $ac_have_decl = 1 then : else case e in #( e) HAVE_DECL_PROGRAM_INVOCATION_NAME=0 ;; esac fi if test $HAVE_GETPROGNAME = 0 || test $REPLACE_GETPROGNAME = 1; then GL_COND_OBJ_GETPROGNAME_TRUE= GL_COND_OBJ_GETPROGNAME_FALSE='#' else GL_COND_OBJ_GETPROGNAME_TRUE='#' GL_COND_OBJ_GETPROGNAME_FALSE= fi : if test -z "${GL_COND_OBJ_GETPROGNAME_TRUE}" && test -z "${GL_COND_OBJ_GETPROGNAME_FALSE}"; then GL_COND_OBJ_GETPROGNAME_TRUE='#' GL_COND_OBJ_GETPROGNAME_FALSE='#' fi if test -z "$GL_COND_OBJ_GETPROGNAME_TRUE"; then : ac_found=0 ac_fn_check_decl "$LINENO" "program_invocation_name" "ac_cv_have_decl_program_invocation_name" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_program_invocation_name" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_PROGRAM_INVOCATION_NAME $ac_have_decl" >>confdefs.h if test $ac_have_decl = 1 then : ac_found=1 fi ac_fn_check_decl "$LINENO" "program_invocation_short_name" "ac_cv_have_decl_program_invocation_short_name" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_program_invocation_short_name" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL_PROGRAM_INVOCATION_SHORT_NAME $ac_have_decl" >>confdefs.h if test $ac_have_decl = 1 then : ac_found=1 fi ac_fn_check_decl "$LINENO" "__argv" "ac_cv_have_decl___argv" "#include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl___argv" = xyes then : ac_have_decl=1 else case e in #( e) ac_have_decl=0 ;; esac fi printf "%s\n" "#define HAVE_DECL___ARGV $ac_have_decl" >>confdefs.h if test $ac_have_decl = 1 then : ac_found=1 fi # Incur the cost of this test only if none of the above worked. if test $ac_found = 0; then # On OpenBSD 5.1, using the global __progname variable appears to be # the only way to implement getprogname. { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether __progname is defined in default libraries" >&5 printf %s "checking whether __progname is defined in default libraries... " >&6; } if test ${gl_cv_var___progname+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_var___progname= cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ extern char *__progname; int main (void) { return *__progname; ; return 0; } _ACEOF if ac_fn_c_try_link "$LINENO" then : gl_cv_var___progname=yes fi rm -f core conftest.err conftest.$ac_objext conftest.beam \ conftest$ac_exeext conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_var___progname" >&5 printf "%s\n" "$gl_cv_var___progname" >&6; } if test "$gl_cv_var___progname" = yes; then printf "%s\n" "#define HAVE_VAR___PROGNAME 1" >>confdefs.h fi fi fi GL_GNULIB_GETPROGNAME=1 printf "%s\n" "#define GNULIB_TEST_GETPROGNAME 1" >>confdefs.h gl_gnulib_enabled_getprogname=true if test $HAVE_GETPROGNAME = 0; then func_gl_gnulib_m4code_ae0d979e17e723693567f9efd1d2294f fi if test $HAVE_GETPROGNAME = 0 && case "$host_os" in irix* | osf* | sco* | unixware*) true;; *) false;; esac; then func_gl_gnulib_m4code_open fi func_gl_gnulib_m4code_stdlib fi } func_gl_gnulib_m4code_be453cec5eecf5731a274f2de7f2db36 () { if $gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36; then :; else gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=true func_gl_gnulib_m4code_vararrays fi } func_gl_gnulib_m4code_hasmntopt () { if $gl_gnulib_enabled_hasmntopt; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for setmntent" >&5 printf %s "checking for setmntent... " >&6; } if test ${gl_cv_onwards_func_setmntent+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "setmntent" "ac_cv_have_decl_setmntent" "#include #include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_setmntent" = xyes then : fi if test $ac_cv_have_decl_setmntent = yes; then ac_fn_c_check_func "$LINENO" "setmntent" "ac_cv_func_setmntent" if test "x$ac_cv_func_setmntent" = xyes then : fi if test $ac_cv_func_setmntent = yes; then gl_cv_onwards_func_setmntent=yes else gl_cv_onwards_func_setmntent='future OS version' fi else gl_cv_onwards_func_setmntent='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "setmntent" "ac_cv_func_setmntent" if test "x$ac_cv_func_setmntent" = xyes then : fi gl_cv_onwards_func_setmntent=$ac_cv_func_setmntent ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_setmntent" >&5 printf "%s\n" "$gl_cv_onwards_func_setmntent" >&6; } case "$gl_cv_onwards_func_setmntent" in future*) ac_cv_func_setmntent=no ;; *) ac_cv_func_setmntent=$gl_cv_onwards_func_setmntent ;; esac if test $ac_cv_func_setmntent = yes; then printf "%s\n" "#define HAVE_SETMNTENT 1" >>confdefs.h fi if test $ac_cv_func_setmntent != yes; then HAVE_SETMNTENT=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for hasmntopt" >&5 printf %s "checking for hasmntopt... " >&6; } if test ${gl_cv_onwards_func_hasmntopt+y} then : printf %s "(cached) " >&6 else case e in #( e) exec 9>&6 6>/dev/null case "$host_os" in linux*-android*) ac_fn_check_decl "$LINENO" "hasmntopt" "ac_cv_have_decl_hasmntopt" "#include #include " "$ac_c_undeclared_builtin_options" "CFLAGS" if test "x$ac_cv_have_decl_hasmntopt" = xyes then : fi if test $ac_cv_have_decl_hasmntopt = yes; then ac_fn_c_check_func "$LINENO" "hasmntopt" "ac_cv_func_hasmntopt" if test "x$ac_cv_func_hasmntopt" = xyes then : fi if test $ac_cv_func_hasmntopt = yes; then gl_cv_onwards_func_hasmntopt=yes else gl_cv_onwards_func_hasmntopt='future OS version' fi else gl_cv_onwards_func_hasmntopt='future OS version' fi ;; *) ac_fn_c_check_func "$LINENO" "hasmntopt" "ac_cv_func_hasmntopt" if test "x$ac_cv_func_hasmntopt" = xyes then : fi gl_cv_onwards_func_hasmntopt=$ac_cv_func_hasmntopt ;; esac exec 6>&9 9>&- ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_onwards_func_hasmntopt" >&5 printf "%s\n" "$gl_cv_onwards_func_hasmntopt" >&6; } case "$gl_cv_onwards_func_hasmntopt" in future*) ac_cv_func_hasmntopt=no ;; *) ac_cv_func_hasmntopt=$gl_cv_onwards_func_hasmntopt ;; esac if test $ac_cv_func_hasmntopt = yes; then printf "%s\n" "#define HAVE_HASMNTOPT 1" >>confdefs.h fi if test $ac_cv_func_hasmntopt = yes; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether hasmntopt works" >&5 printf %s "checking whether hasmntopt works... " >&6; } if test ${gl_cv_func_hasmntopt_works+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_hasmntopt_works="guessing yes" ;; # Guess no on musl systems. *-musl* | midipix*) gl_cv_func_hasmntopt_works="guessing no" ;; *) gl_cv_func_hasmntopt_works="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include int main (void) { int result = 0; /* This test fails on musl libc 1.2.5. */ { char options[] = "rw,noatime"; struct mntent me; me.mnt_opts = options; if (hasmntopt (&me, "atime") != NULL) result |= 1; } return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_hasmntopt_works=yes else case e in #( e) gl_cv_func_hasmntopt_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_hasmntopt_works" >&5 printf "%s\n" "$gl_cv_func_hasmntopt_works" >&6; } case "$gl_cv_func_hasmntopt_works" in *yes) ;; *) REPLACE_HASMNTOPT=1 ;; esac else HAVE_HASMNTOPT=0 case "$gl_cv_onwards_func_hasmntopt" in future*) REPLACE_HASMNTOPT=1 ;; esac fi if test $HAVE_SETMNTENT = 1 && { test $HAVE_HASMNTOPT = 0 || test $REPLACE_HASMNTOPT = 1; }; then GL_COND_OBJ_HASMNTOPT_TRUE= GL_COND_OBJ_HASMNTOPT_FALSE='#' else GL_COND_OBJ_HASMNTOPT_TRUE='#' GL_COND_OBJ_HASMNTOPT_FALSE= fi : if test -z "${GL_COND_OBJ_HASMNTOPT_TRUE}" && test -z "${GL_COND_OBJ_HASMNTOPT_FALSE}"; then GL_COND_OBJ_HASMNTOPT_TRUE='#' GL_COND_OBJ_HASMNTOPT_FALSE='#' fi if test -z "$GL_COND_OBJ_HASMNTOPT_TRUE"; then : : fi GL_GNULIB_HASMNTOPT=1 printf "%s\n" "#define GNULIB_TEST_HASMNTOPT 1" >>confdefs.h gl_gnulib_enabled_hasmntopt=true func_gl_gnulib_m4code_mntent fi } func_gl_gnulib_m4code_idx () { if $gl_gnulib_enabled_idx; then :; else gl_gnulib_enabled_idx=true fi } func_gl_gnulib_m4code_intprops () { if $gl_gnulib_enabled_intprops; then :; else gl_gnulib_enabled_intprops=true fi } func_gl_gnulib_m4code_largefile () { if $gl_gnulib_enabled_largefile; then :; else gl_gnulib_enabled_largefile=true fi } func_gl_gnulib_m4code_5b88be6afdf85eedb41cc8063ca35aa2 () { if $gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2; then :; else gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2=true func_gl_gnulib_m4code_list func_gl_gnulib_m4code_xsize fi } func_gl_gnulib_m4code_list () { if $gl_gnulib_enabled_list; then :; else gl_gnulib_enabled_list=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_malloca () { if $gl_gnulib_enabled_malloca; then :; else gl_gnulib_enabled_malloca=true func_gl_gnulib_m4code_4661e0b4e500a1a00180219f0280fb04 func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f func_gl_gnulib_m4code_idx func_gl_gnulib_m4code_stdckdint func_gl_gnulib_m4code_682e609604ccaac6be382e4ee3a4eaec fi } func_gl_gnulib_m4code_mntent () { if $gl_gnulib_enabled_mntent; then :; else case "$GL_GENERATE_MNTENT_H" in false) MNTENT_H='' ;; true) if test -z "$MNTENT_H"; then MNTENT_H="${gl_source_base_prefix}mntent.h" fi ;; *) echo "*** GL_GENERATE_MNTENT_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_MNTENT_H; then GL_GENERATE_MNTENT_H_TRUE= GL_GENERATE_MNTENT_H_FALSE='#' else GL_GENERATE_MNTENT_H_TRUE='#' GL_GENERATE_MNTENT_H_FALSE= fi : if test -z "${GL_GENERATE_MNTENT_H_TRUE}" && test -z "${GL_GENERATE_MNTENT_H_FALSE}"; then GL_GENERATE_MNTENT_H_TRUE='#' GL_GENERATE_MNTENT_H_FALSE='#' fi gl_gnulib_enabled_mntent=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 () { if $gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616; then :; else if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then GL_COND_OBJ_MSVC_INVAL_TRUE= GL_COND_OBJ_MSVC_INVAL_FALSE='#' else GL_COND_OBJ_MSVC_INVAL_TRUE='#' GL_COND_OBJ_MSVC_INVAL_FALSE= fi : if test -z "${GL_COND_OBJ_MSVC_INVAL_TRUE}" && test -z "${GL_COND_OBJ_MSVC_INVAL_FALSE}"; then GL_COND_OBJ_MSVC_INVAL_TRUE='#' GL_COND_OBJ_MSVC_INVAL_FALSE='#' fi gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616=true fi } func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 () { if $gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07; then :; else if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then GL_COND_OBJ_MSVC_NOTHROW_TRUE= GL_COND_OBJ_MSVC_NOTHROW_FALSE='#' else GL_COND_OBJ_MSVC_NOTHROW_TRUE='#' GL_COND_OBJ_MSVC_NOTHROW_FALSE= fi : if test -z "${GL_COND_OBJ_MSVC_NOTHROW_TRUE}" && test -z "${GL_COND_OBJ_MSVC_NOTHROW_FALSE}"; then GL_COND_OBJ_MSVC_NOTHROW_TRUE='#' GL_COND_OBJ_MSVC_NOTHROW_FALSE='#' fi printf "%s\n" "#define GNULIB_MSVC_NOTHROW 1" >>confdefs.h gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07=true func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi } func_gl_gnulib_m4code_open () { if $gl_gnulib_enabled_open; then :; else case "$host_os" in mingw* | windows* | pw*) REPLACE_OPEN=1 ;; *) if test "$gl_cv_macro_O_CLOEXEC" != yes; then REPLACE_OPEN=1 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether open recognizes a trailing slash" >&5 printf %s "checking whether open recognizes a trailing slash... " >&6; } if test ${gl_cv_func_open_slash+y} then : printf %s "(cached) " >&6 else case e in #( e) # Assume that if we have lstat, we can also check symlinks. if test $ac_cv_func_lstat = yes; then touch conftest.tmp ln -s conftest.tmp conftest.lnk fi if test "$cross_compiling" = yes then : case "$host_os" in freebsd* | aix* | hpux* | solaris2.[0-9] | solaris2.[0-9].*) gl_cv_func_open_slash="guessing no" ;; *) gl_cv_func_open_slash="guessing yes" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if HAVE_UNISTD_H # include #endif $gl_mda_defines int main () { int result = 0; #if HAVE_LSTAT if (open ("conftest.lnk/", O_RDONLY) != -1) result |= 1; #endif if (open ("conftest.sl/", O_CREAT, 0600) >= 0) result |= 2; return result; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_open_slash=yes else case e in #( e) gl_cv_func_open_slash=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f conftest.sl conftest.tmp conftest.lnk ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_open_slash" >&5 printf "%s\n" "$gl_cv_func_open_slash" >&6; } case "$gl_cv_func_open_slash" in *no) printf "%s\n" "#define OPEN_TRAILING_SLASH_BUG 1" >>confdefs.h ;; esac case "$gl_cv_func_open_slash" in *no) REPLACE_OPEN=1 ;; esac ;; esac if test $REPLACE_OPEN = 1; then GL_COND_OBJ_OPEN_TRUE= GL_COND_OBJ_OPEN_FALSE='#' else GL_COND_OBJ_OPEN_TRUE='#' GL_COND_OBJ_OPEN_FALSE= fi : if test -z "${GL_COND_OBJ_OPEN_TRUE}" && test -z "${GL_COND_OBJ_OPEN_FALSE}"; then GL_COND_OBJ_OPEN_TRUE='#' GL_COND_OBJ_OPEN_FALSE='#' fi if test -z "$GL_COND_OBJ_OPEN_TRUE"; then : : fi GL_GNULIB_OPEN=1 printf "%s\n" "#define GNULIB_TEST_OPEN 1" >>confdefs.h gl_gnulib_enabled_open=true if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_cloexec fi func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_fstat fi func_gl_gnulib_m4code_largefile if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_stat fi fi } func_gl_gnulib_m4code_pathmax () { if $gl_gnulib_enabled_pathmax; then :; else gl_gnulib_enabled_pathmax=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_94ea50e7ff7c2508f8a5894b17b1211c () { if $gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for PTHREAD_CREATE_DETACHED" >&5 printf %s "checking for PTHREAD_CREATE_DETACHED... " >&6; } if test ${gl_cv_const_PTHREAD_CREATE_DETACHED+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int x = PTHREAD_CREATE_DETACHED; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_const_PTHREAD_CREATE_DETACHED=yes else case e in #( e) gl_cv_const_PTHREAD_CREATE_DETACHED=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_const_PTHREAD_CREATE_DETACHED" >&5 printf "%s\n" "$gl_cv_const_PTHREAD_CREATE_DETACHED" >&6; } if test $gl_cv_const_PTHREAD_CREATE_DETACHED != yes; then HAVE_PTHREAD_CREATE_DETACHED=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for PTHREAD_MUTEX_RECURSIVE" >&5 printf %s "checking for PTHREAD_MUTEX_RECURSIVE... " >&6; } if test ${gl_cv_const_PTHREAD_MUTEX_RECURSIVE+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int x = PTHREAD_MUTEX_RECURSIVE; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_const_PTHREAD_MUTEX_RECURSIVE=yes else case e in #( e) gl_cv_const_PTHREAD_MUTEX_RECURSIVE=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_const_PTHREAD_MUTEX_RECURSIVE" >&5 printf "%s\n" "$gl_cv_const_PTHREAD_MUTEX_RECURSIVE" >&6; } if test $gl_cv_const_PTHREAD_MUTEX_RECURSIVE != yes; then HAVE_PTHREAD_MUTEX_RECURSIVE=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for PTHREAD_MUTEX_ROBUST" >&5 printf %s "checking for PTHREAD_MUTEX_ROBUST... " >&6; } if test ${gl_cv_const_PTHREAD_MUTEX_ROBUST+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int x = PTHREAD_MUTEX_ROBUST; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_const_PTHREAD_MUTEX_ROBUST=yes else case e in #( e) gl_cv_const_PTHREAD_MUTEX_ROBUST=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_const_PTHREAD_MUTEX_ROBUST" >&5 printf "%s\n" "$gl_cv_const_PTHREAD_MUTEX_ROBUST" >&6; } if test $gl_cv_const_PTHREAD_MUTEX_ROBUST != yes; then HAVE_PTHREAD_MUTEX_ROBUST=0 fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for PTHREAD_PROCESS_SHARED" >&5 printf %s "checking for PTHREAD_PROCESS_SHARED... " >&6; } if test ${gl_cv_const_PTHREAD_PROCESS_SHARED+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int x = PTHREAD_PROCESS_SHARED; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_const_PTHREAD_PROCESS_SHARED=yes else case e in #( e) gl_cv_const_PTHREAD_PROCESS_SHARED=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_const_PTHREAD_PROCESS_SHARED" >&5 printf "%s\n" "$gl_cv_const_PTHREAD_PROCESS_SHARED" >&6; } if test $gl_cv_const_PTHREAD_PROCESS_SHARED != yes; then HAVE_PTHREAD_PROCESS_SHARED=0 fi LIB_PTHREAD="$LIBPMULTITHREAD" gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_sched func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_e0dc424e76447be3f4b8566d84038f5a () { if $gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a; then :; else if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then REPLACE_PTHREAD_ONCE=1 else if test $HAVE_PTHREAD_H = 0; then HAVE_PTHREAD_ONCE=0 else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether pthread_once works" >&5 printf %s "checking whether pthread_once works... " >&6; } if test ${gl_cv_func_pthread_once_works+y} then : printf %s "(cached) " >&6 else case e in #( e) case "$host_os" in cygwin*) gl_cv_func_pthread_once_works="guessing no" ;; *) gl_cv_func_pthread_once_works="yes" ;; esac ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_pthread_once_works" >&5 printf "%s\n" "$gl_cv_func_pthread_once_works" >&6; } case "$gl_cv_func_pthread_once_works" in *yes) ;; *) REPLACE_PTHREAD_ONCE=1 ;; esac fi fi if test $HAVE_PTHREAD_ONCE = 0 || test $REPLACE_PTHREAD_ONCE = 1; then GL_COND_OBJ_PTHREAD_ONCE_TRUE= GL_COND_OBJ_PTHREAD_ONCE_FALSE='#' else GL_COND_OBJ_PTHREAD_ONCE_TRUE='#' GL_COND_OBJ_PTHREAD_ONCE_FALSE= fi : if test -z "${GL_COND_OBJ_PTHREAD_ONCE_TRUE}" && test -z "${GL_COND_OBJ_PTHREAD_ONCE_FALSE}"; then GL_COND_OBJ_PTHREAD_ONCE_TRUE='#' GL_COND_OBJ_PTHREAD_ONCE_FALSE='#' fi GL_GNULIB_PTHREAD_ONCE=1 printf "%s\n" "#define GNULIB_TEST_PTHREAD_ONCE 1" >>confdefs.h gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a=true func_gl_gnulib_m4code_94ea50e7ff7c2508f8a5894b17b1211c if test $gl_threads_api = windows; then func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab fi fi } func_gl_gnulib_m4code_raise () { if $gl_gnulib_enabled_raise; then :; else ac_fn_c_check_func "$LINENO" "raise" "ac_cv_func_raise" if test "x$ac_cv_func_raise" = xyes then : printf "%s\n" "#define HAVE_RAISE 1" >>confdefs.h fi if test $ac_cv_func_raise = no; then HAVE_RAISE=0 else if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then REPLACE_RAISE=1 fi HAVE_POSIX_SIGNALBLOCKING=0 if test "$gl_cv_type_sigset_t" = yes; then ac_fn_c_check_func "$LINENO" "sigprocmask" "ac_cv_func_sigprocmask" if test "x$ac_cv_func_sigprocmask" = xyes then : HAVE_POSIX_SIGNALBLOCKING=1 fi fi if test $HAVE_POSIX_SIGNALBLOCKING = 0; then : fi fi if test $HAVE_RAISE = 0 || test $REPLACE_RAISE = 1; then GL_COND_OBJ_RAISE_TRUE= GL_COND_OBJ_RAISE_FALSE='#' else GL_COND_OBJ_RAISE_TRUE='#' GL_COND_OBJ_RAISE_FALSE= fi : if test -z "${GL_COND_OBJ_RAISE_TRUE}" && test -z "${GL_COND_OBJ_RAISE_FALSE}"; then GL_COND_OBJ_RAISE_TRUE='#' GL_COND_OBJ_RAISE_FALSE='#' fi if test -z "$GL_COND_OBJ_RAISE_TRUE"; then : : fi GL_GNULIB_RAISE=1 printf "%s\n" "#define GNULIB_TEST_RAISE 1" >>confdefs.h gl_gnulib_enabled_raise=true if test $HAVE_RAISE = 0 || test $REPLACE_RAISE = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 fi } func_gl_gnulib_m4code_rmdir () { if $gl_gnulib_enabled_rmdir; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether rmdir works" >&5 printf %s "checking whether rmdir works... " >&6; } if test ${gl_cv_func_rmdir_works+y} then : printf %s "(cached) " >&6 else case e in #( e) mkdir conftest.dir touch conftest.file if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on Linux systems. linux-* | linux) gl_cv_func_rmdir_works="guessing yes" ;; # Guess yes on systems that emulate the Linux system calls. midipix*) gl_cv_func_rmdir_works="guessing yes" ;; # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_rmdir_works="guessing yes" ;; # Guess no on native Windows. mingw* | windows*) gl_cv_func_rmdir_works="guessing no" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_rmdir_works="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_UNISTD_H # include #else /* on Windows with MSVC */ # include #endif $gl_mda_defines int main (void) { int result = 0; if (!rmdir ("conftest.file/")) result |= 1; else if (errno != ENOTDIR) result |= 2; if (!rmdir ("conftest.dir/./")) result |= 4; return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_rmdir_works=yes else case e in #( e) gl_cv_func_rmdir_works=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -rf conftest.dir conftest.file ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_rmdir_works" >&5 printf "%s\n" "$gl_cv_func_rmdir_works" >&6; } case "$gl_cv_func_rmdir_works" in *yes) ;; *) REPLACE_RMDIR=1 ;; esac if test $REPLACE_RMDIR = 1; then GL_COND_OBJ_RMDIR_TRUE= GL_COND_OBJ_RMDIR_FALSE='#' else GL_COND_OBJ_RMDIR_TRUE='#' GL_COND_OBJ_RMDIR_FALSE= fi : if test -z "${GL_COND_OBJ_RMDIR_TRUE}" && test -z "${GL_COND_OBJ_RMDIR_FALSE}"; then GL_COND_OBJ_RMDIR_TRUE='#' GL_COND_OBJ_RMDIR_FALSE='#' fi GL_GNULIB_RMDIR=1 printf "%s\n" "#define GNULIB_TEST_RMDIR 1" >>confdefs.h gl_gnulib_enabled_rmdir=true if test $REPLACE_RMDIR = 1; then func_gl_gnulib_m4code_filename fi if test $REPLACE_RMDIR = 1; then func_gl_gnulib_m4code_sys_stat fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_sched () { if $gl_gnulib_enabled_sched; then :; else gl_gnulib_enabled_sched=true func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_sigaction () { if $gl_gnulib_enabled_sigaction; then :; else if test $ac_cv_func_sigaction = yes; then ac_fn_c_check_member "$LINENO" "struct sigaction" "sa_sigaction" "ac_cv_member_struct_sigaction_sa_sigaction" "#include " if test "x$ac_cv_member_struct_sigaction_sa_sigaction" = xyes then : printf "%s\n" "#define HAVE_STRUCT_SIGACTION_SA_SIGACTION 1" >>confdefs.h fi if test $ac_cv_member_struct_sigaction_sa_sigaction = no; then HAVE_STRUCT_SIGACTION_SA_SIGACTION=0 fi else HAVE_SIGACTION=0 fi if test $HAVE_SIGACTION = 0; then GL_COND_OBJ_SIGACTION_TRUE= GL_COND_OBJ_SIGACTION_FALSE='#' else GL_COND_OBJ_SIGACTION_TRUE='#' GL_COND_OBJ_SIGACTION_FALSE= fi : if test -z "${GL_COND_OBJ_SIGACTION_TRUE}" && test -z "${GL_COND_OBJ_SIGACTION_FALSE}"; then GL_COND_OBJ_SIGACTION_TRUE='#' GL_COND_OBJ_SIGACTION_FALSE='#' fi if test -z "$GL_COND_OBJ_SIGACTION_TRUE"; then : ac_fn_c_check_type "$LINENO" "siginfo_t" "ac_cv_type_siginfo_t" " #include " if test "x$ac_cv_type_siginfo_t" = xyes then : printf "%s\n" "#define HAVE_SIGINFO_T 1" >>confdefs.h fi if test $ac_cv_type_siginfo_t = no; then HAVE_SIGINFO_T=0 fi fi GL_GNULIB_SIGACTION=1 printf "%s\n" "#define GNULIB_TEST_SIGACTION 1" >>confdefs.h gl_gnulib_enabled_sigaction=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 if test $HAVE_SIGACTION = 0; then func_gl_gnulib_m4code_sigprocmask fi fi } func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 () { if $gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9; then :; else gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_sigprocmask () { if $gl_gnulib_enabled_sigprocmask; then :; else HAVE_POSIX_SIGNALBLOCKING=0 if test "$gl_cv_type_sigset_t" = yes; then ac_fn_c_check_func "$LINENO" "sigprocmask" "ac_cv_func_sigprocmask" if test "x$ac_cv_func_sigprocmask" = xyes then : HAVE_POSIX_SIGNALBLOCKING=1 fi fi if test $HAVE_POSIX_SIGNALBLOCKING = 0; then GL_COND_OBJ_SIGPROCMASK_TRUE= GL_COND_OBJ_SIGPROCMASK_FALSE='#' else GL_COND_OBJ_SIGPROCMASK_TRUE='#' GL_COND_OBJ_SIGPROCMASK_FALSE= fi : if test -z "${GL_COND_OBJ_SIGPROCMASK_TRUE}" && test -z "${GL_COND_OBJ_SIGPROCMASK_FALSE}"; then GL_COND_OBJ_SIGPROCMASK_TRUE='#' GL_COND_OBJ_SIGPROCMASK_FALSE='#' fi if test -z "$GL_COND_OBJ_SIGPROCMASK_TRUE"; then : : fi GL_GNULIB_SIGPROCMASK=1 printf "%s\n" "#define GNULIB_TEST_SIGPROCMASK 1" >>confdefs.h gl_gnulib_enabled_sigprocmask=true if test $HAVE_POSIX_SIGNALBLOCKING = 0; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi if test $HAVE_POSIX_SIGNALBLOCKING = 0; then func_gl_gnulib_m4code_raise fi func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 fi } func_gl_gnulib_m4code_size_max () { if $gl_gnulib_enabled_size_max; then :; else ac_fn_c_check_header_compile "$LINENO" "stdint.h" "ac_cv_header_stdint_h" "$ac_includes_default" if test "x$ac_cv_header_stdint_h" = xyes then : printf "%s\n" "#define HAVE_STDINT_H 1" >>confdefs.h fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for SIZE_MAX" >&5 printf %s "checking for SIZE_MAX... " >&6; } if test ${gl_cv_size_max+y} then : printf %s "(cached) " >&6 else case e in #( e) gl_cv_size_max=no cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #if HAVE_STDINT_H #include #endif #ifdef SIZE_MAX Found it #endif _ACEOF if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | $EGREP_TRADITIONAL "Found it" >/dev/null 2>&1 then : gl_cv_size_max=yes fi rm -rf conftest* if test $gl_cv_size_max != yes; then if ac_fn_c_compute_int "$LINENO" "sizeof (size_t) * CHAR_BIT - 1" "size_t_bits_minus_1" "#include #include " then : else case e in #( e) size_t_bits_minus_1= ;; esac fi if ac_fn_c_compute_int "$LINENO" "sizeof (size_t) <= sizeof (unsigned int)" "fits_in_uint" "#include " then : else case e in #( e) fits_in_uint= ;; esac fi if test -n "$size_t_bits_minus_1" && test -n "$fits_in_uint"; then if test $fits_in_uint = 1; then cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include extern size_t foo; extern unsigned long foo; int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : fits_in_uint=0 fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext fi if test $fits_in_uint = 1; then gl_cv_size_max="(((1U << $size_t_bits_minus_1) - 1) * 2 + 1)" else gl_cv_size_max="(((1UL << $size_t_bits_minus_1) - 1) * 2 + 1)" fi else gl_cv_size_max='((size_t)~(size_t)0)' fi fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_size_max" >&5 printf "%s\n" "$gl_cv_size_max" >&6; } if test "$gl_cv_size_max" != yes; then printf "%s\n" "#define SIZE_MAX $gl_cv_size_max" >>confdefs.h fi gl_gnulib_enabled_size_max=true fi } func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 () { if $gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54; then :; else gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54=true fi } func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c () { if $gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c; then :; else gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c=true fi } func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 () { if $gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5; then :; else gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5=true fi } func_gl_gnulib_m4code_11f0455f01baad17427f00c3f461553b () { if $gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b; then :; else gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b=true fi } func_gl_gnulib_m4code_stat () { if $gl_gnulib_enabled_stat; then :; else case "$host_os" in mingw* | windows*) REPLACE_STAT=1 ;; *) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether stat handles trailing slashes on files" >&5 printf %s "checking whether stat handles trailing slashes on files... " >&6; } if test ${gl_cv_func_stat_file_slash+y} then : printf %s "(cached) " >&6 else case e in #( e) touch conftest.tmp # Assume that if we have lstat, we can also check symlinks. if test $ac_cv_func_lstat = yes; then ln -s conftest.tmp conftest.lnk fi if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on Linux systems. linux-* | linux) gl_cv_func_stat_file_slash="guessing yes" ;; # Guess yes on systems that emulate the Linux system calls. midipix*) gl_cv_func_stat_file_slash="guessing yes" ;; # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_stat_file_slash="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_stat_file_slash="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { int result = 0; struct stat st; if (!stat ("conftest.tmp/", &st)) result |= 1; #if HAVE_LSTAT if (!stat ("conftest.lnk/", &st)) result |= 2; #endif return result; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_stat_file_slash=yes else case e in #( e) gl_cv_func_stat_file_slash=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f conftest.tmp conftest.lnk ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_stat_file_slash" >&5 printf "%s\n" "$gl_cv_func_stat_file_slash" >&6; } case $gl_cv_func_stat_file_slash in *no) REPLACE_STAT=1 printf "%s\n" "#define REPLACE_FUNC_STAT_FILE 1" >>confdefs.h ;; esac case $host_os in darwin* | solaris*) REPLACE_FSTAT=1 ;; esac ;; esac if test $REPLACE_STAT = 1; then GL_COND_OBJ_STAT_TRUE= GL_COND_OBJ_STAT_FALSE='#' else GL_COND_OBJ_STAT_TRUE='#' GL_COND_OBJ_STAT_FALSE= fi : if test -z "${GL_COND_OBJ_STAT_TRUE}" && test -z "${GL_COND_OBJ_STAT_FALSE}"; then GL_COND_OBJ_STAT_TRUE='#' GL_COND_OBJ_STAT_FALSE='#' fi if test -z "$GL_COND_OBJ_STAT_TRUE"; then : case "$host_os" in mingw* | windows*) gl_LIBOBJS="$gl_LIBOBJS stat-w32.$ac_objext" ;; esac : fi GL_GNULIB_STAT=1 printf "%s\n" "#define GNULIB_TEST_STAT 1" >>confdefs.h printf "%s\n" "#define GNULIB_STAT 1" >>confdefs.h gl_gnulib_enabled_stat=true if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_filename fi func_gl_gnulib_m4code_largefile if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_malloca fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_pathmax fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_stdbool fi func_gl_gnulib_m4code_sys_stat fi } func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c () { if $gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c; then :; else ac_fn_c_check_member "$LINENO" "struct stat" "st_atim.tv_nsec" "ac_cv_member_struct_stat_st_atim_tv_nsec" "#include #include " if test "x$ac_cv_member_struct_stat_st_atim_tv_nsec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_ATIM_TV_NSEC 1" >>confdefs.h { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking whether struct stat.st_atim is of type struct timespec" >&5 printf %s "checking whether struct stat.st_atim is of type struct timespec... " >&6; } if test ${ac_cv_typeof_struct_stat_st_atim_is_struct_timespec+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include #include #if HAVE_SYS_TIME_H # include #endif #include struct timespec ts; struct stat st; int main (void) { st.st_atim = ts; ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_typeof_struct_stat_st_atim_is_struct_timespec=yes else case e in #( e) ac_cv_typeof_struct_stat_st_atim_is_struct_timespec=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_typeof_struct_stat_st_atim_is_struct_timespec" >&5 printf "%s\n" "$ac_cv_typeof_struct_stat_st_atim_is_struct_timespec" >&6; } if test $ac_cv_typeof_struct_stat_st_atim_is_struct_timespec = yes; then printf "%s\n" "#define TYPEOF_STRUCT_STAT_ST_ATIM_IS_STRUCT_TIMESPEC 1" >>confdefs.h fi else case e in #( e) ac_fn_c_check_member "$LINENO" "struct stat" "st_atimespec.tv_nsec" "ac_cv_member_struct_stat_st_atimespec_tv_nsec" "#include #include " if test "x$ac_cv_member_struct_stat_st_atimespec_tv_nsec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_ATIMESPEC_TV_NSEC 1" >>confdefs.h else case e in #( e) ac_fn_c_check_member "$LINENO" "struct stat" "st_atimensec" "ac_cv_member_struct_stat_st_atimensec" "#include #include " if test "x$ac_cv_member_struct_stat_st_atimensec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_ATIMENSEC 1" >>confdefs.h else case e in #( e) ac_fn_c_check_member "$LINENO" "struct stat" "st_atim.st__tim.tv_nsec" "ac_cv_member_struct_stat_st_atim_st__tim_tv_nsec" "#include #include " if test "x$ac_cv_member_struct_stat_st_atim_st__tim_tv_nsec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_ATIM_ST__TIM_TV_NSEC 1" >>confdefs.h fi ;; esac fi ;; esac fi ;; esac fi ac_fn_c_check_member "$LINENO" "struct stat" "st_birthtimespec.tv_nsec" "ac_cv_member_struct_stat_st_birthtimespec_tv_nsec" "#include #include " if test "x$ac_cv_member_struct_stat_st_birthtimespec_tv_nsec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_BIRTHTIMESPEC_TV_NSEC 1" >>confdefs.h else case e in #( e) ac_fn_c_check_member "$LINENO" "struct stat" "st_birthtimensec" "ac_cv_member_struct_stat_st_birthtimensec" "#include #include " if test "x$ac_cv_member_struct_stat_st_birthtimensec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_BIRTHTIMENSEC 1" >>confdefs.h else case e in #( e) ac_fn_c_check_member "$LINENO" "struct stat" "st_birthtim.tv_nsec" "ac_cv_member_struct_stat_st_birthtim_tv_nsec" "#include #include " if test "x$ac_cv_member_struct_stat_st_birthtim_tv_nsec" = xyes then : printf "%s\n" "#define HAVE_STRUCT_STAT_ST_BIRTHTIM_TV_NSEC 1" >>confdefs.h fi ;; esac fi ;; esac fi gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c=true func_gl_gnulib_m4code_errno func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_stdckdint func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_4ecd6d4226a85c8d3e919d781a515f81 () { if $gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81; then :; else gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81=true fi } func_gl_gnulib_m4code_stdbool () { if $gl_gnulib_enabled_stdbool; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for bool, true, false" >&5 printf %s "checking for bool, true, false... " >&6; } if test ${gl_cv_c_bool+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #if true == false #error "true == false" #endif extern bool b; bool b = true == false; _ACEOF if ac_fn_c_try_compile "$LINENO" then : gl_cv_c_bool=yes else case e in #( e) gl_cv_c_bool=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_c_bool" >&5 printf "%s\n" "$gl_cv_c_bool" >&6; } if test "$gl_cv_c_bool" = yes; then printf "%s\n" "#define HAVE_C_BOOL 1" >>confdefs.h fi gl_gnulib_enabled_stdbool=true func_gl_gnulib_m4code_c99 fi } func_gl_gnulib_m4code_stdckdint () { if $gl_gnulib_enabled_stdckdint; then :; else if test $ac_cv_header_stdckdint_h = yes; then GL_GENERATE_STDCKDINT_H=false else GL_GENERATE_STDCKDINT_H=true fi case "$GL_GENERATE_STDCKDINT_H" in false) STDCKDINT_H='' ;; true) if test -z "$STDCKDINT_H"; then STDCKDINT_H="${gl_source_base_prefix}stdckdint.h" fi ;; *) echo "*** GL_GENERATE_STDCKDINT_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_STDCKDINT_H; then GL_GENERATE_STDCKDINT_H_TRUE= GL_GENERATE_STDCKDINT_H_FALSE='#' else GL_GENERATE_STDCKDINT_H_TRUE='#' GL_GENERATE_STDCKDINT_H_FALSE= fi : if test -z "${GL_GENERATE_STDCKDINT_H_TRUE}" && test -z "${GL_GENERATE_STDCKDINT_H_FALSE}"; then GL_GENERATE_STDCKDINT_H_TRUE='#' GL_GENERATE_STDCKDINT_H_FALSE='#' fi gl_gnulib_enabled_stdckdint=true func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_stddef () { if $gl_gnulib_enabled_stddef; then :; else case "$GL_GENERATE_STDDEF_H" in false) STDDEF_H='' ;; true) if test -z "$STDDEF_H"; then STDDEF_H="${gl_source_base_prefix}stddef.h" fi ;; *) echo "*** GL_GENERATE_STDDEF_H is not set correctly" 1>&2; exit 1 ;; esac if $GL_GENERATE_STDDEF_H; then GL_GENERATE_STDDEF_H_TRUE= GL_GENERATE_STDDEF_H_FALSE='#' else GL_GENERATE_STDDEF_H_TRUE='#' GL_GENERATE_STDDEF_H_FALSE= fi : if test -z "${GL_GENERATE_STDDEF_H_TRUE}" && test -z "${GL_GENERATE_STDDEF_H_FALSE}"; then GL_GENERATE_STDDEF_H_TRUE='#' GL_GENERATE_STDDEF_H_FALSE='#' fi gl_gnulib_enabled_stddef=true fi } func_gl_gnulib_m4code_stdio () { if $gl_gnulib_enabled_stdio; then :; else if test $REPLACE_STDIO_READ_FUNCS = 1; then GL_COND_OBJ_STDIO_READ_TRUE= GL_COND_OBJ_STDIO_READ_FALSE='#' else GL_COND_OBJ_STDIO_READ_TRUE='#' GL_COND_OBJ_STDIO_READ_FALSE= fi : if test -z "${GL_COND_OBJ_STDIO_READ_TRUE}" && test -z "${GL_COND_OBJ_STDIO_READ_FALSE}"; then GL_COND_OBJ_STDIO_READ_TRUE='#' GL_COND_OBJ_STDIO_READ_FALSE='#' fi if test $REPLACE_STDIO_WRITE_FUNCS = 1; then GL_COND_OBJ_STDIO_WRITE_TRUE= GL_COND_OBJ_STDIO_WRITE_FALSE='#' else GL_COND_OBJ_STDIO_WRITE_TRUE='#' GL_COND_OBJ_STDIO_WRITE_FALSE= fi : if test -z "${GL_COND_OBJ_STDIO_WRITE_TRUE}" && test -z "${GL_COND_OBJ_STDIO_WRITE_FALSE}"; then GL_COND_OBJ_STDIO_WRITE_TRUE='#' GL_COND_OBJ_STDIO_WRITE_FALSE='#' fi GL_GNULIB_FSCANF=1 printf "%s\n" "#define GNULIB_TEST_FSCANF 1" >>confdefs.h printf "%s\n" "#define GNULIB_FSCANF 1" >>confdefs.h GL_GNULIB_SCANF=1 printf "%s\n" "#define GNULIB_TEST_SCANF 1" >>confdefs.h printf "%s\n" "#define GNULIB_SCANF 1" >>confdefs.h GL_GNULIB_FGETC=1 printf "%s\n" "#define GNULIB_TEST_FGETC 1" >>confdefs.h GL_GNULIB_GETC=1 printf "%s\n" "#define GNULIB_TEST_GETC 1" >>confdefs.h GL_GNULIB_GETCHAR=1 printf "%s\n" "#define GNULIB_TEST_GETCHAR 1" >>confdefs.h GL_GNULIB_FGETS=1 printf "%s\n" "#define GNULIB_TEST_FGETS 1" >>confdefs.h GL_GNULIB_FREAD=1 printf "%s\n" "#define GNULIB_TEST_FREAD 1" >>confdefs.h GL_GNULIB_FPRINTF=1 printf "%s\n" "#define GNULIB_TEST_FPRINTF 1" >>confdefs.h GL_GNULIB_PRINTF=1 printf "%s\n" "#define GNULIB_TEST_PRINTF 1" >>confdefs.h GL_GNULIB_VFPRINTF=1 printf "%s\n" "#define GNULIB_TEST_VFPRINTF 1" >>confdefs.h GL_GNULIB_VPRINTF=1 printf "%s\n" "#define GNULIB_TEST_VPRINTF 1" >>confdefs.h GL_GNULIB_FPUTC=1 printf "%s\n" "#define GNULIB_TEST_FPUTC 1" >>confdefs.h GL_GNULIB_PUTC=1 printf "%s\n" "#define GNULIB_TEST_PUTC 1" >>confdefs.h GL_GNULIB_PUTCHAR=1 printf "%s\n" "#define GNULIB_TEST_PUTCHAR 1" >>confdefs.h GL_GNULIB_FPUTS=1 printf "%s\n" "#define GNULIB_TEST_FPUTS 1" >>confdefs.h GL_GNULIB_PUTS=1 printf "%s\n" "#define GNULIB_TEST_PUTS 1" >>confdefs.h GL_GNULIB_FWRITE=1 printf "%s\n" "#define GNULIB_TEST_FWRITE 1" >>confdefs.h gl_gnulib_enabled_stdio=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_stdlib () { if $gl_gnulib_enabled_stdlib; then :; else gl_gnulib_enabled_stdlib=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_strerror () { if $gl_gnulib_enabled_strerror; then :; else if test "$GL_GENERATE_ERRNO_H:$REPLACE_STRERROR_0" = false:0; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for working strerror function" >&5 printf %s "checking for working strerror function... " >&6; } if test ${gl_cv_func_working_strerror+y} then : printf %s "(cached) " >&6 else case e in #( e) if test "$cross_compiling" = yes then : case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_working_strerror="guessing yes" ;; # Guess yes on musl systems. *-musl* | midipix*) gl_cv_func_working_strerror="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_working_strerror="$gl_cross_guess_normal" ;; esac else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #include int main (void) { if (!*strerror (-2)) return 1; ; return 0; } _ACEOF if ac_fn_c_try_run "$LINENO" then : gl_cv_func_working_strerror=yes else case e in #( e) gl_cv_func_working_strerror=no ;; esac fi rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $gl_cv_func_working_strerror" >&5 printf "%s\n" "$gl_cv_func_working_strerror" >&6; } case "$gl_cv_func_working_strerror" in *yes) ;; *) REPLACE_STRERROR=1 ;; esac else REPLACE_STRERROR=1 fi if test $REPLACE_STRERROR = 1; then GL_COND_OBJ_STRERROR_TRUE= GL_COND_OBJ_STRERROR_FALSE='#' else GL_COND_OBJ_STRERROR_TRUE='#' GL_COND_OBJ_STRERROR_FALSE= fi : if test -z "${GL_COND_OBJ_STRERROR_TRUE}" && test -z "${GL_COND_OBJ_STRERROR_FALSE}"; then GL_COND_OBJ_STRERROR_TRUE='#' GL_COND_OBJ_STRERROR_FALSE='#' fi printf "%s\n" "#define GNULIB_STRERROR 1" >>confdefs.h GL_GNULIB_STRERROR=1 printf "%s\n" "#define GNULIB_TEST_STRERROR 1" >>confdefs.h gl_gnulib_enabled_strerror=true if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_errno fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_intprops fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_dbb57f49352be8fb86869629a254fb72 fi func_gl_gnulib_m4code_string fi } func_gl_gnulib_m4code_dbb57f49352be8fb86869629a254fb72 () { if $gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72; then :; else if test -n "$ERRNO_H" || test $REPLACE_STRERROR_0 = 1; then GL_COND_OBJ_STRERROR_OVERRIDE_TRUE= GL_COND_OBJ_STRERROR_OVERRIDE_FALSE='#' else GL_COND_OBJ_STRERROR_OVERRIDE_TRUE='#' GL_COND_OBJ_STRERROR_OVERRIDE_FALSE= fi : if test -z "${GL_COND_OBJ_STRERROR_OVERRIDE_TRUE}" && test -z "${GL_COND_OBJ_STRERROR_OVERRIDE_FALSE}"; then GL_COND_OBJ_STRERROR_OVERRIDE_TRUE='#' GL_COND_OBJ_STRERROR_OVERRIDE_FALSE='#' fi if test -z "$GL_COND_OBJ_STRERROR_OVERRIDE_TRUE"; then : if test $ac_cv_header_sys_socket_h != yes; then ac_fn_c_check_header_compile "$LINENO" "winsock2.h" "ac_cv_header_winsock2_h" "$ac_includes_default" if test "x$ac_cv_header_winsock2_h" = xyes then : printf "%s\n" "#define HAVE_WINSOCK2_H 1" >>confdefs.h fi fi if test "$ac_cv_header_winsock2_h" = yes; then HAVE_WINSOCK2_H=1 UNISTD_H_HAVE_WINSOCK2_H=1 SYS_IOCTL_H_HAVE_WINSOCK2_H=1 else HAVE_WINSOCK2_H=0 fi fi gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72=true func_gl_gnulib_m4code_errno fi } func_gl_gnulib_m4code_string () { if $gl_gnulib_enabled_string; then :; else gl_gnulib_enabled_string=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_stdlib fi } func_gl_gnulib_m4code_sys_stat () { if $gl_gnulib_enabled_sys_stat; then :; else gl_gnulib_enabled_sys_stat=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 () { if $gl_gnulib_enabled_ff372e41059705989544356242e580a9; then :; else ac_fn_c_check_header_compile "$LINENO" "sys/single_threaded.h" "ac_cv_header_sys_single_threaded_h" "$ac_includes_default" if test "x$ac_cv_header_sys_single_threaded_h" = xyes then : printf "%s\n" "#define HAVE_SYS_SINGLE_THREADED_H 1" >>confdefs.h fi gl_gnulib_enabled_ff372e41059705989544356242e580a9=true fi } func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd () { if $gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd; then :; else gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_unistd () { if $gl_gnulib_enabled_unistd; then :; else gl_gnulib_enabled_unistd=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_vararrays () { if $gl_gnulib_enabled_vararrays; then :; else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking for variable-length arrays" >&5 printf %s "checking for variable-length arrays... " >&6; } if test ${ac_cv_c_vararrays+y} then : printf %s "(cached) " >&6 else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ #ifndef __STDC_NO_VLA__ #error __STDC_NO_VLA__ not defined #endif _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_c_vararrays='no: __STDC_NO_VLA__ is defined' else case e in #( e) cat confdefs.h - <<_ACEOF >conftest.$ac_ext /* end confdefs.h. */ /* Test for VLA support. This test is partly inspired from examples in the C standard. Use at least two VLA functions to detect the GCC 3.4.3 bug described in: https://lists.gnu.org/archive/html/bug-gnulib/2014-08/msg00014.html */ #ifdef __STDC_NO_VLA__ syntax error; #else extern int n; int B[100]; int fvla (int m, int C[m][m]); int simple (int count, int all[static count]) { return all[count - 1]; } int fvla (int m, int C[m][m]) { typedef int VLA[m][m]; VLA x; int D[m]; static int (*q)[m] = &B; int (*s)[n] = q; return C && &x[0][0] == &D[0] && &D[0] == s[0]; } #endif int main (void) { ; return 0; } _ACEOF if ac_fn_c_try_compile "$LINENO" then : ac_cv_c_vararrays=yes else case e in #( e) ac_cv_c_vararrays=no ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi rm -f core conftest.err conftest.$ac_objext conftest.beam conftest.$ac_ext ;; esac fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: $ac_cv_c_vararrays" >&5 printf "%s\n" "$ac_cv_c_vararrays" >&6; } if test "$ac_cv_c_vararrays" = yes; then printf "%s\n" "#define HAVE_C_VARARRAYS 1" >>confdefs.h elif test "$ac_cv_c_vararrays" = no; then printf "%s\n" "#define __STDC_NO_VLA__ 1" >>confdefs.h fi gl_gnulib_enabled_vararrays=true fi } func_gl_gnulib_m4code_c07c4a2fda832e3f2717a77545d62556 () { if $gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556; then :; else gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556=true func_gl_gnulib_m4code_getpagesize func_gl_gnulib_m4code_open func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_cc1f80dc8888cfce5fb6c3f6d4a3d97d () { if $gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d; then :; else gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d=true func_gl_gnulib_m4code_c07c4a2fda832e3f2717a77545d62556 fi } func_gl_gnulib_m4code_503a4cb75d69c787103d0aa2ab7d8440 () { if $gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440; then :; else if case "$host_os" in mingw* | windows*) true;; *) false;; esac; then GL_COND_OBJ_WINDOWS_MUTEX_TRUE= GL_COND_OBJ_WINDOWS_MUTEX_FALSE='#' else GL_COND_OBJ_WINDOWS_MUTEX_TRUE='#' GL_COND_OBJ_WINDOWS_MUTEX_FALSE= fi : if test -z "${GL_COND_OBJ_WINDOWS_MUTEX_TRUE}" && test -z "${GL_COND_OBJ_WINDOWS_MUTEX_FALSE}"; then GL_COND_OBJ_WINDOWS_MUTEX_TRUE='#' GL_COND_OBJ_WINDOWS_MUTEX_FALSE='#' fi gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440=true fi } func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab () { if $gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab; then :; else if case "$host_os" in mingw* | windows*) true;; *) false;; esac; then GL_COND_OBJ_WINDOWS_ONCE_TRUE= GL_COND_OBJ_WINDOWS_ONCE_FALSE='#' else GL_COND_OBJ_WINDOWS_ONCE_TRUE='#' GL_COND_OBJ_WINDOWS_ONCE_FALSE= fi : if test -z "${GL_COND_OBJ_WINDOWS_ONCE_TRUE}" && test -z "${GL_COND_OBJ_WINDOWS_ONCE_FALSE}"; then GL_COND_OBJ_WINDOWS_ONCE_TRUE='#' GL_COND_OBJ_WINDOWS_ONCE_FALSE='#' fi gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab=true fi } func_gl_gnulib_m4code_f0efff84a70f4afba30902bb8ffe9354 () { if $gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354; then :; else if case "$host_os" in mingw* | windows*) true;; *) false;; esac; then GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE= GL_COND_OBJ_WINDOWS_RECMUTEX_FALSE='#' else GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE='#' GL_COND_OBJ_WINDOWS_RECMUTEX_FALSE= fi : if test -z "${GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE}" && test -z "${GL_COND_OBJ_WINDOWS_RECMUTEX_FALSE}"; then GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE='#' GL_COND_OBJ_WINDOWS_RECMUTEX_FALSE='#' fi gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354=true fi } func_gl_gnulib_m4code_8bb827fe37eaccf1b97feb0c87bc92ef () { if $gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef; then :; else if case "$host_os" in mingw* | windows*) true;; *) false;; esac; then GL_COND_OBJ_WINDOWS_RWLOCK_TRUE= GL_COND_OBJ_WINDOWS_RWLOCK_FALSE='#' else GL_COND_OBJ_WINDOWS_RWLOCK_TRUE='#' GL_COND_OBJ_WINDOWS_RWLOCK_FALSE= fi : if test -z "${GL_COND_OBJ_WINDOWS_RWLOCK_TRUE}" && test -z "${GL_COND_OBJ_WINDOWS_RWLOCK_FALSE}"; then GL_COND_OBJ_WINDOWS_RWLOCK_TRUE='#' GL_COND_OBJ_WINDOWS_RWLOCK_FALSE='#' fi gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef=true fi } func_gl_gnulib_m4code_b26fd0a0c34f92c929116e0e7f1d232f () { if $gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f; then :; else if case "$host_os" in mingw* | windows*) true;; *) false;; esac; then GL_COND_OBJ_WINDOWS_SPIN_TRUE= GL_COND_OBJ_WINDOWS_SPIN_FALSE='#' else GL_COND_OBJ_WINDOWS_SPIN_TRUE='#' GL_COND_OBJ_WINDOWS_SPIN_FALSE= fi : if test -z "${GL_COND_OBJ_WINDOWS_SPIN_TRUE}" && test -z "${GL_COND_OBJ_WINDOWS_SPIN_FALSE}"; then GL_COND_OBJ_WINDOWS_SPIN_TRUE='#' GL_COND_OBJ_WINDOWS_SPIN_FALSE='#' fi gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f=true fi } func_gl_gnulib_m4code_682e609604ccaac6be382e4ee3a4eaec () { if $gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec; then :; else gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec=true fi } func_gl_gnulib_m4code_xsize () { if $gl_gnulib_enabled_xsize; then :; else ac_fn_c_check_header_compile "$LINENO" "stdint.h" "ac_cv_header_stdint_h" "$ac_includes_default" if test "x$ac_cv_header_stdint_h" = xyes then : printf "%s\n" "#define HAVE_STDINT_H 1" >>confdefs.h fi gl_gnulib_enabled_xsize=true func_gl_gnulib_m4code_attribute func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_size_max fi } if case "$host_os" in darwin*) true;; *) false;; esac; then func_gl_gnulib_m4code_55e6e810e702cce3e72865884958a831 fi if case "$host_os" in linux*) true;; *) false;; esac; then func_gl_gnulib_m4code_hasmntopt fi if case "$host_os" in openbsd*) true;; *) false;; esac; then func_gl_gnulib_m4code_cc1f80dc8888cfce5fb6c3f6d4a3d97d fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_503a4cb75d69c787103d0aa2ab7d8440 fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_f0efff84a70f4afba30902bb8ffe9354 fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_8bb827fe37eaccf1b97feb0c87bc92ef fi if test $gl_threads_api = posix; then func_gl_gnulib_m4code_e0dc424e76447be3f4b8566d84038f5a fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab fi if $gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04; then gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE= gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_FALSE='#' else gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE='#' gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_FALSE= fi if $gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f; then gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE= gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_FALSE='#' else gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE='#' gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_FALSE= fi if $gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce; then gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE= gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_FALSE='#' else gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE='#' gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_FALSE= fi if $gl_gnulib_enabled_attribute; then gl_GNULIB_ENABLED_attribute_TRUE= gl_GNULIB_ENABLED_attribute_FALSE='#' else gl_GNULIB_ENABLED_attribute_TRUE='#' gl_GNULIB_ENABLED_attribute_FALSE= fi if $gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f; then gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE= gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_FALSE='#' else gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE='#' gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_FALSE= fi if $gl_gnulib_enabled_c99; then gl_GNULIB_ENABLED_c99_TRUE= gl_GNULIB_ENABLED_c99_FALSE='#' else gl_GNULIB_ENABLED_c99_TRUE='#' gl_GNULIB_ENABLED_c99_FALSE= fi if $gl_gnulib_enabled_55e6e810e702cce3e72865884958a831; then gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE= gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_FALSE='#' else gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE='#' gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_FALSE= fi if $gl_gnulib_enabled_cloexec; then gl_GNULIB_ENABLED_cloexec_TRUE= gl_GNULIB_ENABLED_cloexec_FALSE='#' else gl_GNULIB_ENABLED_cloexec_TRUE='#' gl_GNULIB_ENABLED_cloexec_FALSE= fi if $gl_gnulib_enabled_close; then gl_GNULIB_ENABLED_close_TRUE= gl_GNULIB_ENABLED_close_FALSE='#' else gl_GNULIB_ENABLED_close_TRUE='#' gl_GNULIB_ENABLED_close_FALSE= fi if $gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346; then gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_TRUE= gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_FALSE='#' else gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_TRUE='#' gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_FALSE= fi if $gl_gnulib_enabled_dup2; then gl_GNULIB_ENABLED_dup2_TRUE= gl_GNULIB_ENABLED_dup2_FALSE='#' else gl_GNULIB_ENABLED_dup2_TRUE='#' gl_GNULIB_ENABLED_dup2_FALSE= fi if $gl_gnulib_enabled_errno; then gl_GNULIB_ENABLED_errno_TRUE= gl_GNULIB_ENABLED_errno_FALSE='#' else gl_GNULIB_ENABLED_errno_TRUE='#' gl_GNULIB_ENABLED_errno_FALSE= fi if $gl_gnulib_enabled_error; then gl_GNULIB_ENABLED_error_TRUE= gl_GNULIB_ENABLED_error_FALSE='#' else gl_GNULIB_ENABLED_error_TRUE='#' gl_GNULIB_ENABLED_error_FALSE= fi if $gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0; then gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE= gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_FALSE='#' else gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE='#' gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_FALSE= fi if $gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5; then gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_TRUE= gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_FALSE='#' else gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_TRUE='#' gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_FALSE= fi if $gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27; then gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_TRUE= gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_FALSE='#' else gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_TRUE='#' gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_FALSE= fi if $gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057; then gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE= gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_FALSE='#' else gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE='#' gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_FALSE= fi if $gl_gnulib_enabled_fcntl; then gl_GNULIB_ENABLED_fcntl_TRUE= gl_GNULIB_ENABLED_fcntl_FALSE='#' else gl_GNULIB_ENABLED_fcntl_TRUE='#' gl_GNULIB_ENABLED_fcntl_FALSE= fi if $gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8; then gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE= gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_FALSE='#' else gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE='#' gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_FALSE= fi if $gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239; then gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE= gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_FALSE='#' else gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE='#' gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_FALSE= fi if $gl_gnulib_enabled_filename; then gl_GNULIB_ENABLED_filename_TRUE= gl_GNULIB_ENABLED_filename_FALSE='#' else gl_GNULIB_ENABLED_filename_TRUE='#' gl_GNULIB_ENABLED_filename_FALSE= fi if $gl_gnulib_enabled_fstat; then gl_GNULIB_ENABLED_fstat_TRUE= gl_GNULIB_ENABLED_fstat_FALSE='#' else gl_GNULIB_ENABLED_fstat_TRUE='#' gl_GNULIB_ENABLED_fstat_FALSE= fi if $gl_gnulib_enabled_getdtablesize; then gl_GNULIB_ENABLED_getdtablesize_TRUE= gl_GNULIB_ENABLED_getdtablesize_FALSE='#' else gl_GNULIB_ENABLED_getdtablesize_TRUE='#' gl_GNULIB_ENABLED_getdtablesize_FALSE= fi if $gl_gnulib_enabled_getpagesize; then gl_GNULIB_ENABLED_getpagesize_TRUE= gl_GNULIB_ENABLED_getpagesize_FALSE='#' else gl_GNULIB_ENABLED_getpagesize_TRUE='#' gl_GNULIB_ENABLED_getpagesize_FALSE= fi if $gl_gnulib_enabled_getprogname; then gl_GNULIB_ENABLED_getprogname_TRUE= gl_GNULIB_ENABLED_getprogname_FALSE='#' else gl_GNULIB_ENABLED_getprogname_TRUE='#' gl_GNULIB_ENABLED_getprogname_FALSE= fi if $gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36; then gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_TRUE= gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_FALSE='#' else gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_TRUE='#' gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_FALSE= fi if $gl_gnulib_enabled_hasmntopt; then gl_GNULIB_ENABLED_hasmntopt_TRUE= gl_GNULIB_ENABLED_hasmntopt_FALSE='#' else gl_GNULIB_ENABLED_hasmntopt_TRUE='#' gl_GNULIB_ENABLED_hasmntopt_FALSE= fi if $gl_gnulib_enabled_idx; then gl_GNULIB_ENABLED_idx_TRUE= gl_GNULIB_ENABLED_idx_FALSE='#' else gl_GNULIB_ENABLED_idx_TRUE='#' gl_GNULIB_ENABLED_idx_FALSE= fi if $gl_gnulib_enabled_intprops; then gl_GNULIB_ENABLED_intprops_TRUE= gl_GNULIB_ENABLED_intprops_FALSE='#' else gl_GNULIB_ENABLED_intprops_TRUE='#' gl_GNULIB_ENABLED_intprops_FALSE= fi if $gl_gnulib_enabled_largefile; then gl_GNULIB_ENABLED_largefile_TRUE= gl_GNULIB_ENABLED_largefile_FALSE='#' else gl_GNULIB_ENABLED_largefile_TRUE='#' gl_GNULIB_ENABLED_largefile_FALSE= fi if $gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2; then gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE= gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_FALSE='#' else gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE='#' gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_FALSE= fi if $gl_gnulib_enabled_list; then gl_GNULIB_ENABLED_list_TRUE= gl_GNULIB_ENABLED_list_FALSE='#' else gl_GNULIB_ENABLED_list_TRUE='#' gl_GNULIB_ENABLED_list_FALSE= fi if $gl_gnulib_enabled_malloca; then gl_GNULIB_ENABLED_malloca_TRUE= gl_GNULIB_ENABLED_malloca_FALSE='#' else gl_GNULIB_ENABLED_malloca_TRUE='#' gl_GNULIB_ENABLED_malloca_FALSE= fi if $gl_gnulib_enabled_mntent; then gl_GNULIB_ENABLED_mntent_TRUE= gl_GNULIB_ENABLED_mntent_FALSE='#' else gl_GNULIB_ENABLED_mntent_TRUE='#' gl_GNULIB_ENABLED_mntent_FALSE= fi if $gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616; then gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE= gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_FALSE='#' else gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE='#' gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_FALSE= fi if $gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07; then gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE= gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_FALSE='#' else gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE='#' gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_FALSE= fi if $gl_gnulib_enabled_open; then gl_GNULIB_ENABLED_open_TRUE= gl_GNULIB_ENABLED_open_FALSE='#' else gl_GNULIB_ENABLED_open_TRUE='#' gl_GNULIB_ENABLED_open_FALSE= fi if $gl_gnulib_enabled_pathmax; then gl_GNULIB_ENABLED_pathmax_TRUE= gl_GNULIB_ENABLED_pathmax_FALSE='#' else gl_GNULIB_ENABLED_pathmax_TRUE='#' gl_GNULIB_ENABLED_pathmax_FALSE= fi if $gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c; then gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE= gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_FALSE='#' else gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE='#' gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_FALSE= fi if $gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a; then gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE= gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_FALSE='#' else gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE='#' gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_FALSE= fi if $gl_gnulib_enabled_raise; then gl_GNULIB_ENABLED_raise_TRUE= gl_GNULIB_ENABLED_raise_FALSE='#' else gl_GNULIB_ENABLED_raise_TRUE='#' gl_GNULIB_ENABLED_raise_FALSE= fi if $gl_gnulib_enabled_rmdir; then gl_GNULIB_ENABLED_rmdir_TRUE= gl_GNULIB_ENABLED_rmdir_FALSE='#' else gl_GNULIB_ENABLED_rmdir_TRUE='#' gl_GNULIB_ENABLED_rmdir_FALSE= fi if $gl_gnulib_enabled_sched; then gl_GNULIB_ENABLED_sched_TRUE= gl_GNULIB_ENABLED_sched_FALSE='#' else gl_GNULIB_ENABLED_sched_TRUE='#' gl_GNULIB_ENABLED_sched_FALSE= fi if $gl_gnulib_enabled_sigaction; then gl_GNULIB_ENABLED_sigaction_TRUE= gl_GNULIB_ENABLED_sigaction_FALSE='#' else gl_GNULIB_ENABLED_sigaction_TRUE='#' gl_GNULIB_ENABLED_sigaction_FALSE= fi if $gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9; then gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE= gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_FALSE='#' else gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE='#' gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_FALSE= fi if $gl_gnulib_enabled_sigprocmask; then gl_GNULIB_ENABLED_sigprocmask_TRUE= gl_GNULIB_ENABLED_sigprocmask_FALSE='#' else gl_GNULIB_ENABLED_sigprocmask_TRUE='#' gl_GNULIB_ENABLED_sigprocmask_FALSE= fi if $gl_gnulib_enabled_size_max; then gl_GNULIB_ENABLED_size_max_TRUE= gl_GNULIB_ENABLED_size_max_FALSE='#' else gl_GNULIB_ENABLED_size_max_TRUE='#' gl_GNULIB_ENABLED_size_max_FALSE= fi if $gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54; then gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_TRUE= gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_FALSE='#' else gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_TRUE='#' gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_FALSE= fi if $gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c; then gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_TRUE= gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_FALSE='#' else gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_TRUE='#' gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_FALSE= fi if $gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5; then gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_TRUE= gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_FALSE='#' else gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_TRUE='#' gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_FALSE= fi if $gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b; then gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_TRUE= gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_FALSE='#' else gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_TRUE='#' gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_FALSE= fi if $gl_gnulib_enabled_stat; then gl_GNULIB_ENABLED_stat_TRUE= gl_GNULIB_ENABLED_stat_FALSE='#' else gl_GNULIB_ENABLED_stat_TRUE='#' gl_GNULIB_ENABLED_stat_FALSE= fi if $gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c; then gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE= gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_FALSE='#' else gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE='#' gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_FALSE= fi if $gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81; then gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_TRUE= gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_FALSE='#' else gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_TRUE='#' gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_FALSE= fi if $gl_gnulib_enabled_stdbool; then gl_GNULIB_ENABLED_stdbool_TRUE= gl_GNULIB_ENABLED_stdbool_FALSE='#' else gl_GNULIB_ENABLED_stdbool_TRUE='#' gl_GNULIB_ENABLED_stdbool_FALSE= fi if $gl_gnulib_enabled_stdckdint; then gl_GNULIB_ENABLED_stdckdint_TRUE= gl_GNULIB_ENABLED_stdckdint_FALSE='#' else gl_GNULIB_ENABLED_stdckdint_TRUE='#' gl_GNULIB_ENABLED_stdckdint_FALSE= fi if $gl_gnulib_enabled_stddef; then gl_GNULIB_ENABLED_stddef_TRUE= gl_GNULIB_ENABLED_stddef_FALSE='#' else gl_GNULIB_ENABLED_stddef_TRUE='#' gl_GNULIB_ENABLED_stddef_FALSE= fi if $gl_gnulib_enabled_stdio; then gl_GNULIB_ENABLED_stdio_TRUE= gl_GNULIB_ENABLED_stdio_FALSE='#' else gl_GNULIB_ENABLED_stdio_TRUE='#' gl_GNULIB_ENABLED_stdio_FALSE= fi if $gl_gnulib_enabled_stdlib; then gl_GNULIB_ENABLED_stdlib_TRUE= gl_GNULIB_ENABLED_stdlib_FALSE='#' else gl_GNULIB_ENABLED_stdlib_TRUE='#' gl_GNULIB_ENABLED_stdlib_FALSE= fi if $gl_gnulib_enabled_strerror; then gl_GNULIB_ENABLED_strerror_TRUE= gl_GNULIB_ENABLED_strerror_FALSE='#' else gl_GNULIB_ENABLED_strerror_TRUE='#' gl_GNULIB_ENABLED_strerror_FALSE= fi if $gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72; then gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE= gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_FALSE='#' else gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE='#' gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_FALSE= fi if $gl_gnulib_enabled_string; then gl_GNULIB_ENABLED_string_TRUE= gl_GNULIB_ENABLED_string_FALSE='#' else gl_GNULIB_ENABLED_string_TRUE='#' gl_GNULIB_ENABLED_string_FALSE= fi if $gl_gnulib_enabled_sys_stat; then gl_GNULIB_ENABLED_sys_stat_TRUE= gl_GNULIB_ENABLED_sys_stat_FALSE='#' else gl_GNULIB_ENABLED_sys_stat_TRUE='#' gl_GNULIB_ENABLED_sys_stat_FALSE= fi if $gl_gnulib_enabled_ff372e41059705989544356242e580a9; then gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_TRUE= gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_FALSE='#' else gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_TRUE='#' gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_FALSE= fi if $gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd; then gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE= gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_FALSE='#' else gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE='#' gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_FALSE= fi if $gl_gnulib_enabled_unistd; then gl_GNULIB_ENABLED_unistd_TRUE= gl_GNULIB_ENABLED_unistd_FALSE='#' else gl_GNULIB_ENABLED_unistd_TRUE='#' gl_GNULIB_ENABLED_unistd_FALSE= fi if $gl_gnulib_enabled_vararrays; then gl_GNULIB_ENABLED_vararrays_TRUE= gl_GNULIB_ENABLED_vararrays_FALSE='#' else gl_GNULIB_ENABLED_vararrays_TRUE='#' gl_GNULIB_ENABLED_vararrays_FALSE= fi if $gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556; then gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE= gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_FALSE='#' else gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE='#' gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_FALSE= fi if $gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d; then gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE= gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_FALSE='#' else gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE='#' gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_FALSE= fi if $gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440; then gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE= gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_FALSE='#' else gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE='#' gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_FALSE= fi if $gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab; then gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE= gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_FALSE='#' else gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE='#' gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_FALSE= fi if $gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354; then gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE= gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_FALSE='#' else gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE='#' gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_FALSE= fi if $gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef; then gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE= gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_FALSE='#' else gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE='#' gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_FALSE= fi if $gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f; then gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE= gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_FALSE='#' else gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE='#' gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_FALSE= fi if $gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec; then gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_TRUE= gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_FALSE='#' else gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_TRUE='#' gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_FALSE= fi if $gl_gnulib_enabled_xsize; then gl_GNULIB_ENABLED_xsize_TRUE= gl_GNULIB_ENABLED_xsize_FALSE='#' else gl_GNULIB_ENABLED_xsize_TRUE='#' gl_GNULIB_ENABLED_xsize_FALSE= fi # End of code from modules gltests_libdeps= gltests_ltlibdeps= gl_source_base='tests' gl_source_base_prefix= gltests_WITNESS=IN_`echo "${PACKAGE-$PACKAGE_TARNAME}" | LC_ALL=C tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ | LC_ALL=C sed -e 's/[^A-Z0-9_]/_/g'`_GNULIB_TESTS gl_module_indicator_condition=$gltests_WITNESS extrasub="$extrasub"' /@subdir@/{ h g s/@subdir@/gnulib-lib/g p g s/@subdir@/avcall/g p g s/@subdir@/vacall/g p g s/@subdir@/trampoline/g p g s/@subdir@/callback/g p d } ' extrasub="$extrasub"' /@callback_subdir@/{ h g s/@callback_subdir@/vacall_r/g p g s/@callback_subdir@/trampoline_r/g p d } ' cat >confcache <<\_ACEOF # This file is a shell script that caches the results of configure # tests run on this system so they can be shared between configure # scripts and configure runs, see configure's option --config-cache. # It is not useful on other systems. If it contains results you don't # want to keep, you may remove or edit it. # # config.status only pays attention to the cache file if you give it # the --recheck option to rerun configure. # # 'ac_cv_env_foo' variables (set or unset) will be overridden when # loading this file, other *unset* 'ac_cv_foo' will be assigned the # following values. _ACEOF # The following way of writing the cache mishandles newlines in values, # but we know of no workaround that is simple, portable, and efficient. # So, we kill variables containing newlines. # Ultrix sh set writes to stderr and can't be redirected directly, # and sets the high bit in the cache file unless we assign to the vars. ( for ac_var in `(set) 2>&1 | sed -n 's/^\([a-zA-Z_][a-zA-Z0-9_]*\)=.*/\1/p'`; do eval ac_val=\$$ac_var case $ac_val in #( *${as_nl}*) case $ac_var in #( *_cv_*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: cache variable $ac_var contains a newline" >&5 printf "%s\n" "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;; esac case $ac_var in #( _ | IFS | as_nl) ;; #( BASH_ARGV | BASH_SOURCE) eval $ac_var= ;; #( *) { eval $ac_var=; unset $ac_var;} ;; esac ;; esac done (set) 2>&1 | case $as_nl`(ac_space=' '; set) 2>&1` in #( *${as_nl}ac_space=\ *) # 'set' does not quote correctly, so add quotes: double-quote # substitution turns \\\\ into \\, and sed turns \\ into \. sed -n \ "s/'/'\\\\''/g; s/^\\([_$as_cr_alnum]*_cv_[_$as_cr_alnum]*\\)=\\(.*\\)/\\1='\\2'/p" ;; #( *) # 'set' quotes correctly as required by POSIX, so do not add quotes. sed -n "/^[_$as_cr_alnum]*_cv_[_$as_cr_alnum]*=/p" ;; esac | sort ) | sed ' /^ac_cv_env_/b end t clear :clear s/^\([^=]*\)=\(.*[{}].*\)$/test ${\1+y} || &/ t end s/^\([^=]*\)=\(.*\)$/\1=${\1=\2}/ :end' >>confcache if diff "$cache_file" confcache >/dev/null 2>&1; then :; else if test -w "$cache_file"; then if test "x$cache_file" != "x/dev/null"; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5 printf "%s\n" "$as_me: updating cache $cache_file" >&6;} if test ! -f "$cache_file" || test -h "$cache_file"; then cat confcache >"$cache_file" else case $cache_file in #( */* | ?:*) mv -f confcache "$cache_file"$$ && mv -f "$cache_file"$$ "$cache_file" ;; #( *) mv -f confcache "$cache_file" ;; esac fi fi else { printf "%s\n" "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5 printf "%s\n" "$as_me: not updating unwritable cache $cache_file" >&6;} fi fi rm -f confcache test "x$prefix" = xNONE && prefix=$ac_default_prefix # Let make expand exec_prefix. test "x$exec_prefix" = xNONE && exec_prefix='${prefix}' DEFS=-DHAVE_CONFIG_H ac_libobjs= ac_ltlibobjs= U= for ac_i in : $LIBOBJS; do test "x$ac_i" = x: && continue # 1. Remove the extension, and $U if already installed. ac_script='s/\$U\././;s/\.o$//;s/\.obj$//' ac_i=`printf "%s\n" "$ac_i" | sed "$ac_script"` # 2. Prepend LIBOBJDIR. When used with automake>=1.10 LIBOBJDIR # will be set to the directory where LIBOBJS objects are built. as_fn_append ac_libobjs " \${LIBOBJDIR}$ac_i\$U.$ac_objext" as_fn_append ac_ltlibobjs " \${LIBOBJDIR}$ac_i"'$U.lo' done LIBOBJS=$ac_libobjs LTLIBOBJS=$ac_ltlibobjs { printf "%s\n" "$as_me:${as_lineno-$LINENO}: checking that generated files are newer than configure" >&5 printf %s "checking that generated files are newer than configure... " >&6; } if test -n "$am_sleep_pid"; then # Hide warnings about reused PIDs. wait $am_sleep_pid 2>/dev/null fi { printf "%s\n" "$as_me:${as_lineno-$LINENO}: result: done" >&5 printf "%s\n" "done" >&6; } case $enable_silent_rules in # ((( yes) AM_DEFAULT_VERBOSITY=0;; no) AM_DEFAULT_VERBOSITY=1;; esac if test $am_cv_make_support_nested_variables = yes; then AM_V='$(V)' AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)' else AM_V=$AM_DEFAULT_VERBOSITY AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY fi if test -n "$EXEEXT"; then am__EXEEXT_TRUE= am__EXEEXT_FALSE='#' else am__EXEEXT_TRUE='#' am__EXEEXT_FALSE= fi if test -z "${AMDEP_TRUE}" && test -z "${AMDEP_FALSE}"; then as_fn_error $? "conditional \"AMDEP\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${am__fastdepCC_TRUE}" && test -z "${am__fastdepCC_FALSE}"; then as_fn_error $? "conditional \"am__fastdepCC\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${ANSICXX_TRUE}" && test -z "${ANSICXX_FALSE}"; then as_fn_error $? "conditional \"ANSICXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then as_fn_error $? "conditional \"am__fastdepCXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then as_fn_error $? "conditional \"am__fastdepCXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${ANSICXX_TRUE}" && test -z "${ANSICXX_FALSE}"; then as_fn_error $? "conditional \"ANSICXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then as_fn_error $? "conditional \"am__fastdepCXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${am__fastdepCXX_TRUE}" && test -z "${am__fastdepCXX_FALSE}"; then as_fn_error $? "conditional \"am__fastdepCXX\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi # Check whether --enable-year2038 was given. if test ${enable_year2038+y} then : enableval=$enable_year2038; fi if test -z "${GL_COND_LIBTOOL_TRUE}" && test -z "${GL_COND_LIBTOOL_FALSE}"; then as_fn_error $? "conditional \"GL_COND_LIBTOOL\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE}" && test -z "${gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE}" && test -z "${gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE}" && test -z "${gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_attribute_TRUE}" && test -z "${gl_GNULIB_ENABLED_attribute_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_attribute\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE}" && test -z "${gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_c99_TRUE}" && test -z "${gl_GNULIB_ENABLED_c99_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_c99\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE}" && test -z "${gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_cloexec_TRUE}" && test -z "${gl_GNULIB_ENABLED_cloexec_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_cloexec\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_close_TRUE}" && test -z "${gl_GNULIB_ENABLED_close_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_close\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_TRUE}" && test -z "${gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_dup2_TRUE}" && test -z "${gl_GNULIB_ENABLED_dup2_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_dup2\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_errno_TRUE}" && test -z "${gl_GNULIB_ENABLED_errno_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_errno\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_error_TRUE}" && test -z "${gl_GNULIB_ENABLED_error_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_error\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE}" && test -z "${gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_TRUE}" && test -z "${gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_TRUE}" && test -z "${gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE}" && test -z "${gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_fcntl_TRUE}" && test -z "${gl_GNULIB_ENABLED_fcntl_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_fcntl\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE}" && test -z "${gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE}" && test -z "${gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_filename_TRUE}" && test -z "${gl_GNULIB_ENABLED_filename_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_filename\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_fstat_TRUE}" && test -z "${gl_GNULIB_ENABLED_fstat_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_fstat\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_getdtablesize_TRUE}" && test -z "${gl_GNULIB_ENABLED_getdtablesize_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_getdtablesize\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_getpagesize_TRUE}" && test -z "${gl_GNULIB_ENABLED_getpagesize_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_getpagesize\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_getprogname_TRUE}" && test -z "${gl_GNULIB_ENABLED_getprogname_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_getprogname\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_TRUE}" && test -z "${gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_hasmntopt_TRUE}" && test -z "${gl_GNULIB_ENABLED_hasmntopt_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_hasmntopt\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_idx_TRUE}" && test -z "${gl_GNULIB_ENABLED_idx_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_idx\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_intprops_TRUE}" && test -z "${gl_GNULIB_ENABLED_intprops_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_intprops\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_largefile_TRUE}" && test -z "${gl_GNULIB_ENABLED_largefile_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_largefile\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE}" && test -z "${gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_list_TRUE}" && test -z "${gl_GNULIB_ENABLED_list_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_list\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_malloca_TRUE}" && test -z "${gl_GNULIB_ENABLED_malloca_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_malloca\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_mntent_TRUE}" && test -z "${gl_GNULIB_ENABLED_mntent_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_mntent\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE}" && test -z "${gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE}" && test -z "${gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_open_TRUE}" && test -z "${gl_GNULIB_ENABLED_open_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_open\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_pathmax_TRUE}" && test -z "${gl_GNULIB_ENABLED_pathmax_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_pathmax\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE}" && test -z "${gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE}" && test -z "${gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_raise_TRUE}" && test -z "${gl_GNULIB_ENABLED_raise_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_raise\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_rmdir_TRUE}" && test -z "${gl_GNULIB_ENABLED_rmdir_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_rmdir\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_sched_TRUE}" && test -z "${gl_GNULIB_ENABLED_sched_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_sched\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_sigaction_TRUE}" && test -z "${gl_GNULIB_ENABLED_sigaction_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_sigaction\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE}" && test -z "${gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_sigprocmask_TRUE}" && test -z "${gl_GNULIB_ENABLED_sigprocmask_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_sigprocmask\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_size_max_TRUE}" && test -z "${gl_GNULIB_ENABLED_size_max_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_size_max\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_TRUE}" && test -z "${gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_TRUE}" && test -z "${gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_TRUE}" && test -z "${gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_TRUE}" && test -z "${gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stat_TRUE}" && test -z "${gl_GNULIB_ENABLED_stat_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stat\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE}" && test -z "${gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_TRUE}" && test -z "${gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stdbool_TRUE}" && test -z "${gl_GNULIB_ENABLED_stdbool_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stdbool\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stdckdint_TRUE}" && test -z "${gl_GNULIB_ENABLED_stdckdint_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stdckdint\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stddef_TRUE}" && test -z "${gl_GNULIB_ENABLED_stddef_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stddef\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stdio_TRUE}" && test -z "${gl_GNULIB_ENABLED_stdio_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stdio\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_stdlib_TRUE}" && test -z "${gl_GNULIB_ENABLED_stdlib_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_stdlib\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_strerror_TRUE}" && test -z "${gl_GNULIB_ENABLED_strerror_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_strerror\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE}" && test -z "${gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_string_TRUE}" && test -z "${gl_GNULIB_ENABLED_string_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_string\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_sys_stat_TRUE}" && test -z "${gl_GNULIB_ENABLED_sys_stat_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_sys_stat\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_TRUE}" && test -z "${gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE}" && test -z "${gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_unistd_TRUE}" && test -z "${gl_GNULIB_ENABLED_unistd_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_unistd\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_vararrays_TRUE}" && test -z "${gl_GNULIB_ENABLED_vararrays_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_vararrays\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE}" && test -z "${gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE}" && test -z "${gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE}" && test -z "${gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE}" && test -z "${gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE}" && test -z "${gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE}" && test -z "${gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE}" && test -z "${gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_TRUE}" && test -z "${gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi if test -z "${gl_GNULIB_ENABLED_xsize_TRUE}" && test -z "${gl_GNULIB_ENABLED_xsize_FALSE}"; then as_fn_error $? "conditional \"gl_GNULIB_ENABLED_xsize\" was never defined. Usually this means the macro was only invoked conditionally." "$LINENO" 5 fi gl_libobjs= gl_ltlibobjs= gl_libobjdeps= if test -n "$gl_LIBOBJS"; then # Remove the extension. sed_drop_objext='s/\.o$//;s/\.obj$//' sed_dirname1='s,//*,/,g' sed_dirname2='s,\(.\)/$,\1,' sed_dirname3='s,^[^/]*$,.,' sed_dirname4='s,\(.\)/[^/]*$,\1,' sed_basename1='s,.*/,,' for i in `for i in $gl_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do gl_libobjs="$gl_libobjs $i.$ac_objext" gl_ltlibobjs="$gl_ltlibobjs $i.lo" i_dir=`echo "$i" | sed -e "$sed_dirname1" -e "$sed_dirname2" -e "$sed_dirname3" -e "$sed_dirname4"` i_base=`echo "$i" | sed -e "$sed_basename1"` gl_libobjdeps="$gl_libobjdeps $i_dir/\$(DEPDIR)/$i_base.Plo" done fi gl_LIBOBJS=$gl_libobjs gl_LTLIBOBJS=$gl_ltlibobjs gl_LIBOBJDEPS=$gl_libobjdeps gltests_libobjs= gltests_ltlibobjs= gltests_libobjdeps= if test -n "$gltests_LIBOBJS"; then # Remove the extension. sed_drop_objext='s/\.o$//;s/\.obj$//' sed_dirname1='s,//*,/,g' sed_dirname2='s,\(.\)/$,\1,' sed_dirname3='s,^[^/]*$,.,' sed_dirname4='s,\(.\)/[^/]*$,\1,' sed_basename1='s,.*/,,' for i in `for i in $gltests_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do gltests_libobjs="$gltests_libobjs $i.$ac_objext" gltests_ltlibobjs="$gltests_ltlibobjs $i.lo" i_dir=`echo "$i" | sed -e "$sed_dirname1" -e "$sed_dirname2" -e "$sed_dirname3" -e "$sed_dirname4"` i_base=`echo "$i" | sed -e "$sed_basename1"` gltests_libobjdeps="$gltests_libobjdeps $i_dir/\$(DEPDIR)/$i_base.Plo" done fi gltests_LIBOBJS=$gltests_libobjs gltests_LTLIBOBJS=$gltests_ltlibobjs gltests_LIBOBJDEPS=$gltests_libobjdeps : "${CONFIG_STATUS=./config.status}" ac_write_fail=0 ac_clean_files_save=$ac_clean_files ac_clean_files="$ac_clean_files $CONFIG_STATUS" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating $CONFIG_STATUS" >&5 printf "%s\n" "$as_me: creating $CONFIG_STATUS" >&6;} as_write_fail=0 cat >$CONFIG_STATUS <<_ASEOF || as_write_fail=1 #! $SHELL # Generated by $as_me. # Run this file to recreate the current configuration. # Compiler output produced by configure, useful for debugging # configure, is in config.log if it exists. debug=false ac_cs_recheck=false ac_cs_silent=false SHELL=\${CONFIG_SHELL-$SHELL} export SHELL _ASEOF cat >>$CONFIG_STATUS <<\_ASEOF || as_write_fail=1 ## -------------------- ## ## M4sh Initialization. ## ## -------------------- ## # Be more Bourne compatible DUALCASE=1; export DUALCASE # for MKS sh if test ${ZSH_VERSION+y} && (emulate sh) >/dev/null 2>&1 then : emulate sh NULLCMD=: # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which # is contrary to our usage. Disable this feature. alias -g '${1+"$@"}'='"$@"' setopt NO_GLOB_SUBST else case e in #( e) case `(set -o) 2>/dev/null` in #( *posix*) : set -o posix ;; #( *) : ;; esac ;; esac fi # Reset variables that may have inherited troublesome values from # the environment. # IFS needs to be set, to space, tab, and newline, in precisely that order. # (If _AS_PATH_WALK were called with IFS unset, it would have the # side effect of setting IFS to empty, thus disabling word splitting.) # Quoting is to prevent editors from complaining about space-tab. as_nl=' ' export as_nl IFS=" "" $as_nl" PS1='$ ' PS2='> ' PS4='+ ' # Ensure predictable behavior from utilities with locale-dependent output. LC_ALL=C export LC_ALL LANGUAGE=C export LANGUAGE # We cannot yet rely on "unset" to work, but we need these variables # to be unset--not just set to an empty or harmless value--now, to # avoid bugs in old shells (e.g. pre-3.0 UWIN ksh). This construct # also avoids known problems related to "unset" and subshell syntax # in other old shells (e.g. bash 2.01 and pdksh 5.2.14). for as_var in BASH_ENV ENV MAIL MAILPATH CDPATH do eval test \${$as_var+y} \ && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || : done # Ensure that fds 0, 1, and 2 are open. if (exec 3>&0) 2>/dev/null; then :; else exec 0&1) 2>/dev/null; then :; else exec 1>/dev/null; fi if (exec 3>&2) ; then :; else exec 2>/dev/null; fi # The user is always right. if ${PATH_SEPARATOR+false} :; then PATH_SEPARATOR=: (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && { (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 || PATH_SEPARATOR=';' } fi # Find who we are. Look in the path if we contain no directory separator. as_myself= case $0 in #(( *[\\/]* ) as_myself=$0 ;; *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS case $as_dir in #((( '') as_dir=./ ;; */) ;; *) as_dir=$as_dir/ ;; esac test -r "$as_dir$0" && as_myself=$as_dir$0 && break done IFS=$as_save_IFS ;; esac # We did not find ourselves, most probably we were run as 'sh COMMAND' # in which case we are not to be found in the path. if test "x$as_myself" = x; then as_myself=$0 fi if test ! -f "$as_myself"; then printf "%s\n" "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2 exit 1 fi # as_fn_error STATUS ERROR [LINENO LOG_FD] # ---------------------------------------- # Output "`basename $0`: error: ERROR" to stderr. If LINENO and LOG_FD are # provided, also output the error to LOG_FD, referencing LINENO. Then exit the # script with STATUS, using 1 if that was 0. as_fn_error () { as_status=$1; test $as_status -eq 0 && as_status=1 if test "$4"; then as_lineno=${as_lineno-"$3"} as_lineno_stack=as_lineno_stack=$as_lineno_stack printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: $2" >&$4 fi printf "%s\n" "$as_me: error: $2" >&2 as_fn_exit $as_status } # as_fn_error # as_fn_set_status STATUS # ----------------------- # Set $? to STATUS, without forking. as_fn_set_status () { return $1 } # as_fn_set_status # as_fn_exit STATUS # ----------------- # Exit the shell with STATUS, even in a "trap 0" or "set -e" context. as_fn_exit () { set +e as_fn_set_status $1 exit $1 } # as_fn_exit # as_fn_unset VAR # --------------- # Portably unset VAR. as_fn_unset () { { eval $1=; unset $1;} } as_unset=as_fn_unset # as_fn_append VAR VALUE # ---------------------- # Append the text in VALUE to the end of the definition contained in VAR. Take # advantage of any shell optimizations that allow amortized linear growth over # repeated appends, instead of the typical quadratic growth present in naive # implementations. if (eval "as_var=1; as_var+=2; test x\$as_var = x12") 2>/dev/null then : eval 'as_fn_append () { eval $1+=\$2 }' else case e in #( e) as_fn_append () { eval $1=\$$1\$2 } ;; esac fi # as_fn_append # as_fn_arith ARG... # ------------------ # Perform arithmetic evaluation on the ARGs, and store the result in the # global $as_val. Take advantage of shells that can avoid forks. The arguments # must be portable across $(()) and expr. if (eval "test \$(( 1 + 1 )) = 2") 2>/dev/null then : eval 'as_fn_arith () { as_val=$(( $* )) }' else case e in #( e) as_fn_arith () { as_val=`expr "$@" || test $? -eq 1` } ;; esac fi # as_fn_arith if expr a : '\(a\)' >/dev/null 2>&1 && test "X`expr 00001 : '.*\(...\)'`" = X001; then as_expr=expr else as_expr=false fi if (basename -- /) >/dev/null 2>&1 && test "X`basename -- / 2>&1`" = "X/"; then as_basename=basename else as_basename=false fi if (as_dir=`dirname -- /` && test "X$as_dir" = X/) >/dev/null 2>&1; then as_dirname=dirname else as_dirname=false fi as_me=`$as_basename -- "$0" || $as_expr X/"$0" : '.*/\([^/][^/]*\)/*$' \| \ X"$0" : 'X\(//\)$' \| \ X"$0" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X/"$0" | sed '/^.*\/\([^/][^/]*\)\/*$/{ s//\1/ q } /^X\/\(\/\/\)$/{ s//\1/ q } /^X\/\(\/\).*/{ s//\1/ q } s/.*/./; q'` # Avoid depending upon Character Ranges. as_cr_letters='abcdefghijklmnopqrstuvwxyz' as_cr_LETTERS='ABCDEFGHIJKLMNOPQRSTUVWXYZ' as_cr_Letters=$as_cr_letters$as_cr_LETTERS as_cr_digits='0123456789' as_cr_alnum=$as_cr_Letters$as_cr_digits # Determine whether it's possible to make 'echo' print without a newline. # These variables are no longer used directly by Autoconf, but are AC_SUBSTed # for compatibility with existing Makefiles. ECHO_C= ECHO_N= ECHO_T= case `echo -n x` in #((((( -n*) case `echo 'xy\c'` in *c*) ECHO_T=' ';; # ECHO_T is single tab character. xy) ECHO_C='\c';; *) echo `echo ksh88 bug on AIX 6.1` > /dev/null ECHO_T=' ';; esac;; *) ECHO_N='-n';; esac # For backward compatibility with old third-party macros, we provide # the shell variables $as_echo and $as_echo_n. New code should use # AS_ECHO(["message"]) and AS_ECHO_N(["message"]), respectively. as_echo='printf %s\n' as_echo_n='printf %s' rm -f conf$$ conf$$.exe conf$$.file if test -d conf$$.dir; then rm -f conf$$.dir/conf$$.file else rm -f conf$$.dir mkdir conf$$.dir 2>/dev/null fi if (echo >conf$$.file) 2>/dev/null; then if ln -s conf$$.file conf$$ 2>/dev/null; then as_ln_s='ln -s' # ... but there are two gotchas: # 1) On MSYS, both 'ln -s file dir' and 'ln file dir' fail. # 2) DJGPP < 2.04 has no symlinks; 'ln -s' creates a wrapper executable. # In both cases, we have to default to 'cp -pR'. ln -s conf$$.file conf$$.dir 2>/dev/null && test ! -f conf$$.exe || as_ln_s='cp -pR' elif ln conf$$.file conf$$ 2>/dev/null; then as_ln_s=ln else as_ln_s='cp -pR' fi else as_ln_s='cp -pR' fi rm -f conf$$ conf$$.exe conf$$.dir/conf$$.file conf$$.file rmdir conf$$.dir 2>/dev/null # as_fn_mkdir_p # ------------- # Create "$as_dir" as a directory, including parents if necessary. as_fn_mkdir_p () { case $as_dir in #( -*) as_dir=./$as_dir;; esac test -d "$as_dir" || eval $as_mkdir_p || { as_dirs= while :; do case $as_dir in #( *\'*) as_qdir=`printf "%s\n" "$as_dir" | sed "s/'/'\\\\\\\\''/g"`;; #'( *) as_qdir=$as_dir;; esac as_dirs="'$as_qdir' $as_dirs" as_dir=`$as_dirname -- "$as_dir" || $as_expr X"$as_dir" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$as_dir" : 'X\(//\)[^/]' \| \ X"$as_dir" : 'X\(//\)$' \| \ X"$as_dir" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$as_dir" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'` test -d "$as_dir" && break done test -z "$as_dirs" || eval "mkdir $as_dirs" } || test -d "$as_dir" || as_fn_error $? "cannot create directory $as_dir" } # as_fn_mkdir_p if mkdir -p . 2>/dev/null; then as_mkdir_p='mkdir -p "$as_dir"' else test -d ./-p && rmdir ./-p as_mkdir_p=false fi # as_fn_executable_p FILE # ----------------------- # Test if FILE is an executable regular file. as_fn_executable_p () { test -f "$1" && test -x "$1" } # as_fn_executable_p as_test_x='test -x' as_executable_p=as_fn_executable_p # Sed expression to map a string onto a valid CPP name. as_sed_cpp="y%*$as_cr_letters%P$as_cr_LETTERS%;s%[^_$as_cr_alnum]%_%g" as_tr_cpp="eval sed '$as_sed_cpp'" # deprecated # Sed expression to map a string onto a valid variable name. as_sed_sh="y%*+%pp%;s%[^_$as_cr_alnum]%_%g" as_tr_sh="eval sed '$as_sed_sh'" # deprecated exec 6>&1 ## ----------------------------------- ## ## Main body of $CONFIG_STATUS script. ## ## ----------------------------------- ## _ASEOF test $as_write_fail = 0 && chmod +x $CONFIG_STATUS || ac_write_fail=1 cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 # Save the log message, to keep $0 and so on meaningful, and to # report actual input values of CONFIG_FILES etc. instead of their # values after options handling. ac_log=" This file was extended by GNU libffcall $as_me 2.5, which was generated by GNU Autoconf 2.72. Invocation command line was CONFIG_FILES = $CONFIG_FILES CONFIG_HEADERS = $CONFIG_HEADERS CONFIG_LINKS = $CONFIG_LINKS CONFIG_COMMANDS = $CONFIG_COMMANDS $ $0 $@ on `(hostname || uname -n) 2>/dev/null | sed 1q` " _ACEOF case $ac_config_files in *" "*) set x $ac_config_files; shift; ac_config_files=$*;; esac case $ac_config_headers in *" "*) set x $ac_config_headers; shift; ac_config_headers=$*;; esac cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 # Files that config.status was made for. config_files="$ac_config_files" config_headers="$ac_config_headers" config_commands="$ac_config_commands" _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 ac_cs_usage="\ '$as_me' instantiates files and other configuration actions from templates according to the current configuration. Unless the files and actions are specified as TAGs, all are instantiated by default. Usage: $0 [OPTION]... [TAG]... -h, --help print this help, then exit -V, --version print version number and configuration settings, then exit --config print configuration, then exit -q, --quiet, --silent do not print progress messages -d, --debug don't remove temporary files --recheck update $as_me by reconfiguring in the same conditions --file=FILE[:TEMPLATE] instantiate the configuration file FILE --header=FILE[:TEMPLATE] instantiate the configuration header FILE Configuration files: $config_files Configuration headers: $config_headers Configuration commands: $config_commands Report bugs to . GNU libffcall home page: . General help using GNU software: ." _ACEOF ac_cs_config=`printf "%s\n" "$ac_configure_args" | sed "$ac_safe_unquote"` ac_cs_config_escaped=`printf "%s\n" "$ac_cs_config" | sed "s/^ //; s/'/'\\\\\\\\''/g"` cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_cs_config='$ac_cs_config_escaped' ac_cs_version="\\ GNU libffcall config.status 2.5 configured by $0, generated by GNU Autoconf 2.72, with options \\"\$ac_cs_config\\" Copyright (C) 2023 Free Software Foundation, Inc. This config.status script is free software; the Free Software Foundation gives unlimited permission to copy, distribute and modify it." ac_pwd='$ac_pwd' srcdir='$srcdir' INSTALL='$INSTALL' MKDIR_P='$MKDIR_P' AWK='$AWK' test -n "\$AWK" || AWK=awk _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 # The default lists apply if the user does not specify any file. ac_need_defaults=: while test $# != 0 do case $1 in --*=?*) ac_option=`expr "X$1" : 'X\([^=]*\)='` ac_optarg=`expr "X$1" : 'X[^=]*=\(.*\)'` ac_shift=: ;; --*=) ac_option=`expr "X$1" : 'X\([^=]*\)='` ac_optarg= ac_shift=: ;; *) ac_option=$1 ac_optarg=$2 ac_shift=shift ;; esac case $ac_option in # Handling of the options. -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r) ac_cs_recheck=: ;; --version | --versio | --versi | --vers | --ver | --ve | --v | -V ) printf "%s\n" "$ac_cs_version"; exit ;; --config | --confi | --conf | --con | --co | --c ) printf "%s\n" "$ac_cs_config"; exit ;; --debug | --debu | --deb | --de | --d | -d ) debug=: ;; --file | --fil | --fi | --f ) $ac_shift case $ac_optarg in *\'*) ac_optarg=`printf "%s\n" "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;; '') as_fn_error $? "missing file argument" ;; esac as_fn_append CONFIG_FILES " '$ac_optarg'" ac_need_defaults=false;; --header | --heade | --head | --hea ) $ac_shift case $ac_optarg in *\'*) ac_optarg=`printf "%s\n" "$ac_optarg" | sed "s/'/'\\\\\\\\''/g"` ;; esac as_fn_append CONFIG_HEADERS " '$ac_optarg'" ac_need_defaults=false;; --he | --h) # Conflict between --help and --header as_fn_error $? "ambiguous option: '$1' Try '$0 --help' for more information.";; --help | --hel | -h ) printf "%s\n" "$ac_cs_usage"; exit ;; -q | -quiet | --quiet | --quie | --qui | --qu | --q \ | -silent | --silent | --silen | --sile | --sil | --si | --s) ac_cs_silent=: ;; # This is an error. -*) as_fn_error $? "unrecognized option: '$1' Try '$0 --help' for more information." ;; *) as_fn_append ac_config_targets " $1" ac_need_defaults=false ;; esac shift done ac_configure_extra_args= if $ac_cs_silent; then exec 6>/dev/null ac_configure_extra_args="$ac_configure_extra_args --silent" fi _ACEOF cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 if \$ac_cs_recheck; then set X $SHELL '$0' $ac_configure_args \$ac_configure_extra_args --no-create --no-recursion shift \printf "%s\n" "running CONFIG_SHELL=$SHELL \$*" >&6 CONFIG_SHELL='$SHELL' export CONFIG_SHELL exec "\$@" fi _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 exec 5>>config.log { echo sed 'h;s/./-/g;s/^.../## /;s/...$/ ##/;p;x;p;x' <<_ASBOX ## Running $as_me. ## _ASBOX printf "%s\n" "$ac_log" } >&5 _ACEOF cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 # # INIT-COMMANDS # AMDEP_TRUE="$AMDEP_TRUE" MAKE="${MAKE-make}" # The HP-UX ksh and POSIX shell print the target directory to stdout # if CDPATH is set. (unset CDPATH) >/dev/null 2>&1 && unset CDPATH sed_quote_subst='$sed_quote_subst' double_quote_subst='$double_quote_subst' delay_variable_subst='$delay_variable_subst' macro_version='`$ECHO "$macro_version" | $SED "$delay_single_quote_subst"`' macro_revision='`$ECHO "$macro_revision" | $SED "$delay_single_quote_subst"`' AS='`$ECHO "$AS" | $SED "$delay_single_quote_subst"`' DLLTOOL='`$ECHO "$DLLTOOL" | $SED "$delay_single_quote_subst"`' OBJDUMP='`$ECHO "$OBJDUMP" | $SED "$delay_single_quote_subst"`' enable_shared='`$ECHO "$enable_shared" | $SED "$delay_single_quote_subst"`' enable_static='`$ECHO "$enable_static" | $SED "$delay_single_quote_subst"`' pic_mode='`$ECHO "$pic_mode" | $SED "$delay_single_quote_subst"`' enable_fast_install='`$ECHO "$enable_fast_install" | $SED "$delay_single_quote_subst"`' shared_archive_member_spec='`$ECHO "$shared_archive_member_spec" | $SED "$delay_single_quote_subst"`' SHELL='`$ECHO "$SHELL" | $SED "$delay_single_quote_subst"`' ECHO='`$ECHO "$ECHO" | $SED "$delay_single_quote_subst"`' PATH_SEPARATOR='`$ECHO "$PATH_SEPARATOR" | $SED "$delay_single_quote_subst"`' host_alias='`$ECHO "$host_alias" | $SED "$delay_single_quote_subst"`' host='`$ECHO "$host" | $SED "$delay_single_quote_subst"`' host_os='`$ECHO "$host_os" | $SED "$delay_single_quote_subst"`' build_alias='`$ECHO "$build_alias" | $SED "$delay_single_quote_subst"`' build='`$ECHO "$build" | $SED "$delay_single_quote_subst"`' build_os='`$ECHO "$build_os" | $SED "$delay_single_quote_subst"`' SED='`$ECHO "$SED" | $SED "$delay_single_quote_subst"`' Xsed='`$ECHO "$Xsed" | $SED "$delay_single_quote_subst"`' GREP='`$ECHO "$GREP" | $SED "$delay_single_quote_subst"`' EGREP='`$ECHO "$EGREP" | $SED "$delay_single_quote_subst"`' FGREP='`$ECHO "$FGREP" | $SED "$delay_single_quote_subst"`' LD='`$ECHO "$LD" | $SED "$delay_single_quote_subst"`' NM='`$ECHO "$NM" | $SED "$delay_single_quote_subst"`' LN_S='`$ECHO "$LN_S" | $SED "$delay_single_quote_subst"`' max_cmd_len='`$ECHO "$max_cmd_len" | $SED "$delay_single_quote_subst"`' ac_objext='`$ECHO "$ac_objext" | $SED "$delay_single_quote_subst"`' exeext='`$ECHO "$exeext" | $SED "$delay_single_quote_subst"`' lt_unset='`$ECHO "$lt_unset" | $SED "$delay_single_quote_subst"`' lt_SP2NL='`$ECHO "$lt_SP2NL" | $SED "$delay_single_quote_subst"`' lt_NL2SP='`$ECHO "$lt_NL2SP" | $SED "$delay_single_quote_subst"`' lt_cv_to_host_file_cmd='`$ECHO "$lt_cv_to_host_file_cmd" | $SED "$delay_single_quote_subst"`' lt_cv_to_tool_file_cmd='`$ECHO "$lt_cv_to_tool_file_cmd" | $SED "$delay_single_quote_subst"`' reload_flag='`$ECHO "$reload_flag" | $SED "$delay_single_quote_subst"`' reload_cmds='`$ECHO "$reload_cmds" | $SED "$delay_single_quote_subst"`' FILECMD='`$ECHO "$FILECMD" | $SED "$delay_single_quote_subst"`' deplibs_check_method='`$ECHO "$deplibs_check_method" | $SED "$delay_single_quote_subst"`' file_magic_cmd='`$ECHO "$file_magic_cmd" | $SED "$delay_single_quote_subst"`' file_magic_glob='`$ECHO "$file_magic_glob" | $SED "$delay_single_quote_subst"`' want_nocaseglob='`$ECHO "$want_nocaseglob" | $SED "$delay_single_quote_subst"`' sharedlib_from_linklib_cmd='`$ECHO "$sharedlib_from_linklib_cmd" | $SED "$delay_single_quote_subst"`' AR='`$ECHO "$AR" | $SED "$delay_single_quote_subst"`' lt_ar_flags='`$ECHO "$lt_ar_flags" | $SED "$delay_single_quote_subst"`' AR_FLAGS='`$ECHO "$AR_FLAGS" | $SED "$delay_single_quote_subst"`' archiver_list_spec='`$ECHO "$archiver_list_spec" | $SED "$delay_single_quote_subst"`' STRIP='`$ECHO "$STRIP" | $SED "$delay_single_quote_subst"`' RANLIB='`$ECHO "$RANLIB" | $SED "$delay_single_quote_subst"`' old_postinstall_cmds='`$ECHO "$old_postinstall_cmds" | $SED "$delay_single_quote_subst"`' old_postuninstall_cmds='`$ECHO "$old_postuninstall_cmds" | $SED "$delay_single_quote_subst"`' old_archive_cmds='`$ECHO "$old_archive_cmds" | $SED "$delay_single_quote_subst"`' lock_old_archive_extraction='`$ECHO "$lock_old_archive_extraction" | $SED "$delay_single_quote_subst"`' CC='`$ECHO "$CC" | $SED "$delay_single_quote_subst"`' CFLAGS='`$ECHO "$CFLAGS" | $SED "$delay_single_quote_subst"`' compiler='`$ECHO "$compiler" | $SED "$delay_single_quote_subst"`' GCC='`$ECHO "$GCC" | $SED "$delay_single_quote_subst"`' lt_cv_sys_global_symbol_pipe='`$ECHO "$lt_cv_sys_global_symbol_pipe" | $SED "$delay_single_quote_subst"`' lt_cv_sys_global_symbol_to_cdecl='`$ECHO "$lt_cv_sys_global_symbol_to_cdecl" | $SED "$delay_single_quote_subst"`' lt_cv_sys_global_symbol_to_import='`$ECHO "$lt_cv_sys_global_symbol_to_import" | $SED "$delay_single_quote_subst"`' lt_cv_sys_global_symbol_to_c_name_address='`$ECHO "$lt_cv_sys_global_symbol_to_c_name_address" | $SED "$delay_single_quote_subst"`' lt_cv_sys_global_symbol_to_c_name_address_lib_prefix='`$ECHO "$lt_cv_sys_global_symbol_to_c_name_address_lib_prefix" | $SED "$delay_single_quote_subst"`' lt_cv_nm_interface='`$ECHO "$lt_cv_nm_interface" | $SED "$delay_single_quote_subst"`' nm_file_list_spec='`$ECHO "$nm_file_list_spec" | $SED "$delay_single_quote_subst"`' lt_sysroot='`$ECHO "$lt_sysroot" | $SED "$delay_single_quote_subst"`' lt_cv_truncate_bin='`$ECHO "$lt_cv_truncate_bin" | $SED "$delay_single_quote_subst"`' objdir='`$ECHO "$objdir" | $SED "$delay_single_quote_subst"`' MAGIC_CMD='`$ECHO "$MAGIC_CMD" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_no_builtin_flag='`$ECHO "$lt_prog_compiler_no_builtin_flag" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_pic='`$ECHO "$lt_prog_compiler_pic" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_wl='`$ECHO "$lt_prog_compiler_wl" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_static='`$ECHO "$lt_prog_compiler_static" | $SED "$delay_single_quote_subst"`' lt_cv_prog_compiler_c_o='`$ECHO "$lt_cv_prog_compiler_c_o" | $SED "$delay_single_quote_subst"`' need_locks='`$ECHO "$need_locks" | $SED "$delay_single_quote_subst"`' MANIFEST_TOOL='`$ECHO "$MANIFEST_TOOL" | $SED "$delay_single_quote_subst"`' DSYMUTIL='`$ECHO "$DSYMUTIL" | $SED "$delay_single_quote_subst"`' NMEDIT='`$ECHO "$NMEDIT" | $SED "$delay_single_quote_subst"`' LIPO='`$ECHO "$LIPO" | $SED "$delay_single_quote_subst"`' OTOOL='`$ECHO "$OTOOL" | $SED "$delay_single_quote_subst"`' OTOOL64='`$ECHO "$OTOOL64" | $SED "$delay_single_quote_subst"`' libext='`$ECHO "$libext" | $SED "$delay_single_quote_subst"`' shrext_cmds='`$ECHO "$shrext_cmds" | $SED "$delay_single_quote_subst"`' extract_expsyms_cmds='`$ECHO "$extract_expsyms_cmds" | $SED "$delay_single_quote_subst"`' archive_cmds_need_lc='`$ECHO "$archive_cmds_need_lc" | $SED "$delay_single_quote_subst"`' enable_shared_with_static_runtimes='`$ECHO "$enable_shared_with_static_runtimes" | $SED "$delay_single_quote_subst"`' export_dynamic_flag_spec='`$ECHO "$export_dynamic_flag_spec" | $SED "$delay_single_quote_subst"`' whole_archive_flag_spec='`$ECHO "$whole_archive_flag_spec" | $SED "$delay_single_quote_subst"`' compiler_needs_object='`$ECHO "$compiler_needs_object" | $SED "$delay_single_quote_subst"`' old_archive_from_new_cmds='`$ECHO "$old_archive_from_new_cmds" | $SED "$delay_single_quote_subst"`' old_archive_from_expsyms_cmds='`$ECHO "$old_archive_from_expsyms_cmds" | $SED "$delay_single_quote_subst"`' archive_cmds='`$ECHO "$archive_cmds" | $SED "$delay_single_quote_subst"`' archive_expsym_cmds='`$ECHO "$archive_expsym_cmds" | $SED "$delay_single_quote_subst"`' module_cmds='`$ECHO "$module_cmds" | $SED "$delay_single_quote_subst"`' module_expsym_cmds='`$ECHO "$module_expsym_cmds" | $SED "$delay_single_quote_subst"`' with_gnu_ld='`$ECHO "$with_gnu_ld" | $SED "$delay_single_quote_subst"`' allow_undefined_flag='`$ECHO "$allow_undefined_flag" | $SED "$delay_single_quote_subst"`' no_undefined_flag='`$ECHO "$no_undefined_flag" | $SED "$delay_single_quote_subst"`' hardcode_libdir_flag_spec='`$ECHO "$hardcode_libdir_flag_spec" | $SED "$delay_single_quote_subst"`' hardcode_libdir_separator='`$ECHO "$hardcode_libdir_separator" | $SED "$delay_single_quote_subst"`' hardcode_direct='`$ECHO "$hardcode_direct" | $SED "$delay_single_quote_subst"`' hardcode_direct_absolute='`$ECHO "$hardcode_direct_absolute" | $SED "$delay_single_quote_subst"`' hardcode_minus_L='`$ECHO "$hardcode_minus_L" | $SED "$delay_single_quote_subst"`' hardcode_shlibpath_var='`$ECHO "$hardcode_shlibpath_var" | $SED "$delay_single_quote_subst"`' hardcode_automatic='`$ECHO "$hardcode_automatic" | $SED "$delay_single_quote_subst"`' inherit_rpath='`$ECHO "$inherit_rpath" | $SED "$delay_single_quote_subst"`' link_all_deplibs='`$ECHO "$link_all_deplibs" | $SED "$delay_single_quote_subst"`' always_export_symbols='`$ECHO "$always_export_symbols" | $SED "$delay_single_quote_subst"`' export_symbols_cmds='`$ECHO "$export_symbols_cmds" | $SED "$delay_single_quote_subst"`' exclude_expsyms='`$ECHO "$exclude_expsyms" | $SED "$delay_single_quote_subst"`' include_expsyms='`$ECHO "$include_expsyms" | $SED "$delay_single_quote_subst"`' prelink_cmds='`$ECHO "$prelink_cmds" | $SED "$delay_single_quote_subst"`' postlink_cmds='`$ECHO "$postlink_cmds" | $SED "$delay_single_quote_subst"`' file_list_spec='`$ECHO "$file_list_spec" | $SED "$delay_single_quote_subst"`' variables_saved_for_relink='`$ECHO "$variables_saved_for_relink" | $SED "$delay_single_quote_subst"`' need_lib_prefix='`$ECHO "$need_lib_prefix" | $SED "$delay_single_quote_subst"`' need_version='`$ECHO "$need_version" | $SED "$delay_single_quote_subst"`' version_type='`$ECHO "$version_type" | $SED "$delay_single_quote_subst"`' runpath_var='`$ECHO "$runpath_var" | $SED "$delay_single_quote_subst"`' shlibpath_var='`$ECHO "$shlibpath_var" | $SED "$delay_single_quote_subst"`' shlibpath_overrides_runpath='`$ECHO "$shlibpath_overrides_runpath" | $SED "$delay_single_quote_subst"`' libname_spec='`$ECHO "$libname_spec" | $SED "$delay_single_quote_subst"`' library_names_spec='`$ECHO "$library_names_spec" | $SED "$delay_single_quote_subst"`' soname_spec='`$ECHO "$soname_spec" | $SED "$delay_single_quote_subst"`' install_override_mode='`$ECHO "$install_override_mode" | $SED "$delay_single_quote_subst"`' postinstall_cmds='`$ECHO "$postinstall_cmds" | $SED "$delay_single_quote_subst"`' postuninstall_cmds='`$ECHO "$postuninstall_cmds" | $SED "$delay_single_quote_subst"`' finish_cmds='`$ECHO "$finish_cmds" | $SED "$delay_single_quote_subst"`' finish_eval='`$ECHO "$finish_eval" | $SED "$delay_single_quote_subst"`' hardcode_into_libs='`$ECHO "$hardcode_into_libs" | $SED "$delay_single_quote_subst"`' sys_lib_search_path_spec='`$ECHO "$sys_lib_search_path_spec" | $SED "$delay_single_quote_subst"`' configure_time_dlsearch_path='`$ECHO "$configure_time_dlsearch_path" | $SED "$delay_single_quote_subst"`' configure_time_lt_sys_library_path='`$ECHO "$configure_time_lt_sys_library_path" | $SED "$delay_single_quote_subst"`' hardcode_action='`$ECHO "$hardcode_action" | $SED "$delay_single_quote_subst"`' enable_dlopen='`$ECHO "$enable_dlopen" | $SED "$delay_single_quote_subst"`' enable_dlopen_self='`$ECHO "$enable_dlopen_self" | $SED "$delay_single_quote_subst"`' enable_dlopen_self_static='`$ECHO "$enable_dlopen_self_static" | $SED "$delay_single_quote_subst"`' old_striplib='`$ECHO "$old_striplib" | $SED "$delay_single_quote_subst"`' striplib='`$ECHO "$striplib" | $SED "$delay_single_quote_subst"`' compiler_lib_search_dirs='`$ECHO "$compiler_lib_search_dirs" | $SED "$delay_single_quote_subst"`' predep_objects='`$ECHO "$predep_objects" | $SED "$delay_single_quote_subst"`' postdep_objects='`$ECHO "$postdep_objects" | $SED "$delay_single_quote_subst"`' predeps='`$ECHO "$predeps" | $SED "$delay_single_quote_subst"`' postdeps='`$ECHO "$postdeps" | $SED "$delay_single_quote_subst"`' compiler_lib_search_path='`$ECHO "$compiler_lib_search_path" | $SED "$delay_single_quote_subst"`' LD_CXX='`$ECHO "$LD_CXX" | $SED "$delay_single_quote_subst"`' reload_flag_CXX='`$ECHO "$reload_flag_CXX" | $SED "$delay_single_quote_subst"`' reload_cmds_CXX='`$ECHO "$reload_cmds_CXX" | $SED "$delay_single_quote_subst"`' old_archive_cmds_CXX='`$ECHO "$old_archive_cmds_CXX" | $SED "$delay_single_quote_subst"`' compiler_CXX='`$ECHO "$compiler_CXX" | $SED "$delay_single_quote_subst"`' GCC_CXX='`$ECHO "$GCC_CXX" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_no_builtin_flag_CXX='`$ECHO "$lt_prog_compiler_no_builtin_flag_CXX" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_pic_CXX='`$ECHO "$lt_prog_compiler_pic_CXX" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_wl_CXX='`$ECHO "$lt_prog_compiler_wl_CXX" | $SED "$delay_single_quote_subst"`' lt_prog_compiler_static_CXX='`$ECHO "$lt_prog_compiler_static_CXX" | $SED "$delay_single_quote_subst"`' lt_cv_prog_compiler_c_o_CXX='`$ECHO "$lt_cv_prog_compiler_c_o_CXX" | $SED "$delay_single_quote_subst"`' archive_cmds_need_lc_CXX='`$ECHO "$archive_cmds_need_lc_CXX" | $SED "$delay_single_quote_subst"`' enable_shared_with_static_runtimes_CXX='`$ECHO "$enable_shared_with_static_runtimes_CXX" | $SED "$delay_single_quote_subst"`' export_dynamic_flag_spec_CXX='`$ECHO "$export_dynamic_flag_spec_CXX" | $SED "$delay_single_quote_subst"`' whole_archive_flag_spec_CXX='`$ECHO "$whole_archive_flag_spec_CXX" | $SED "$delay_single_quote_subst"`' compiler_needs_object_CXX='`$ECHO "$compiler_needs_object_CXX" | $SED "$delay_single_quote_subst"`' old_archive_from_new_cmds_CXX='`$ECHO "$old_archive_from_new_cmds_CXX" | $SED "$delay_single_quote_subst"`' old_archive_from_expsyms_cmds_CXX='`$ECHO "$old_archive_from_expsyms_cmds_CXX" | $SED "$delay_single_quote_subst"`' archive_cmds_CXX='`$ECHO "$archive_cmds_CXX" | $SED "$delay_single_quote_subst"`' archive_expsym_cmds_CXX='`$ECHO "$archive_expsym_cmds_CXX" | $SED "$delay_single_quote_subst"`' module_cmds_CXX='`$ECHO "$module_cmds_CXX" | $SED "$delay_single_quote_subst"`' module_expsym_cmds_CXX='`$ECHO "$module_expsym_cmds_CXX" | $SED "$delay_single_quote_subst"`' with_gnu_ld_CXX='`$ECHO "$with_gnu_ld_CXX" | $SED "$delay_single_quote_subst"`' allow_undefined_flag_CXX='`$ECHO "$allow_undefined_flag_CXX" | $SED "$delay_single_quote_subst"`' no_undefined_flag_CXX='`$ECHO "$no_undefined_flag_CXX" | $SED "$delay_single_quote_subst"`' hardcode_libdir_flag_spec_CXX='`$ECHO "$hardcode_libdir_flag_spec_CXX" | $SED "$delay_single_quote_subst"`' hardcode_libdir_separator_CXX='`$ECHO "$hardcode_libdir_separator_CXX" | $SED "$delay_single_quote_subst"`' hardcode_direct_CXX='`$ECHO "$hardcode_direct_CXX" | $SED "$delay_single_quote_subst"`' hardcode_direct_absolute_CXX='`$ECHO "$hardcode_direct_absolute_CXX" | $SED "$delay_single_quote_subst"`' hardcode_minus_L_CXX='`$ECHO "$hardcode_minus_L_CXX" | $SED "$delay_single_quote_subst"`' hardcode_shlibpath_var_CXX='`$ECHO "$hardcode_shlibpath_var_CXX" | $SED "$delay_single_quote_subst"`' hardcode_automatic_CXX='`$ECHO "$hardcode_automatic_CXX" | $SED "$delay_single_quote_subst"`' inherit_rpath_CXX='`$ECHO "$inherit_rpath_CXX" | $SED "$delay_single_quote_subst"`' link_all_deplibs_CXX='`$ECHO "$link_all_deplibs_CXX" | $SED "$delay_single_quote_subst"`' always_export_symbols_CXX='`$ECHO "$always_export_symbols_CXX" | $SED "$delay_single_quote_subst"`' export_symbols_cmds_CXX='`$ECHO "$export_symbols_cmds_CXX" | $SED "$delay_single_quote_subst"`' exclude_expsyms_CXX='`$ECHO "$exclude_expsyms_CXX" | $SED "$delay_single_quote_subst"`' include_expsyms_CXX='`$ECHO "$include_expsyms_CXX" | $SED "$delay_single_quote_subst"`' prelink_cmds_CXX='`$ECHO "$prelink_cmds_CXX" | $SED "$delay_single_quote_subst"`' postlink_cmds_CXX='`$ECHO "$postlink_cmds_CXX" | $SED "$delay_single_quote_subst"`' file_list_spec_CXX='`$ECHO "$file_list_spec_CXX" | $SED "$delay_single_quote_subst"`' hardcode_action_CXX='`$ECHO "$hardcode_action_CXX" | $SED "$delay_single_quote_subst"`' compiler_lib_search_dirs_CXX='`$ECHO "$compiler_lib_search_dirs_CXX" | $SED "$delay_single_quote_subst"`' predep_objects_CXX='`$ECHO "$predep_objects_CXX" | $SED "$delay_single_quote_subst"`' postdep_objects_CXX='`$ECHO "$postdep_objects_CXX" | $SED "$delay_single_quote_subst"`' predeps_CXX='`$ECHO "$predeps_CXX" | $SED "$delay_single_quote_subst"`' postdeps_CXX='`$ECHO "$postdeps_CXX" | $SED "$delay_single_quote_subst"`' compiler_lib_search_path_CXX='`$ECHO "$compiler_lib_search_path_CXX" | $SED "$delay_single_quote_subst"`' LTCC='$LTCC' LTCFLAGS='$LTCFLAGS' compiler='$compiler_DEFAULT' # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF \$1 _LTECHO_EOF' } # Quote evaled strings. for var in AS \ DLLTOOL \ OBJDUMP \ SHELL \ ECHO \ PATH_SEPARATOR \ SED \ GREP \ EGREP \ FGREP \ LD \ NM \ LN_S \ lt_SP2NL \ lt_NL2SP \ reload_flag \ FILECMD \ deplibs_check_method \ file_magic_cmd \ file_magic_glob \ want_nocaseglob \ sharedlib_from_linklib_cmd \ AR \ archiver_list_spec \ STRIP \ RANLIB \ CC \ CFLAGS \ compiler \ lt_cv_sys_global_symbol_pipe \ lt_cv_sys_global_symbol_to_cdecl \ lt_cv_sys_global_symbol_to_import \ lt_cv_sys_global_symbol_to_c_name_address \ lt_cv_sys_global_symbol_to_c_name_address_lib_prefix \ lt_cv_nm_interface \ nm_file_list_spec \ lt_cv_truncate_bin \ lt_prog_compiler_no_builtin_flag \ lt_prog_compiler_pic \ lt_prog_compiler_wl \ lt_prog_compiler_static \ lt_cv_prog_compiler_c_o \ need_locks \ MANIFEST_TOOL \ DSYMUTIL \ NMEDIT \ LIPO \ OTOOL \ OTOOL64 \ shrext_cmds \ export_dynamic_flag_spec \ whole_archive_flag_spec \ compiler_needs_object \ with_gnu_ld \ allow_undefined_flag \ no_undefined_flag \ hardcode_libdir_flag_spec \ hardcode_libdir_separator \ exclude_expsyms \ include_expsyms \ file_list_spec \ variables_saved_for_relink \ libname_spec \ library_names_spec \ soname_spec \ install_override_mode \ finish_eval \ old_striplib \ striplib \ compiler_lib_search_dirs \ predep_objects \ postdep_objects \ predeps \ postdeps \ compiler_lib_search_path \ LD_CXX \ reload_flag_CXX \ compiler_CXX \ lt_prog_compiler_no_builtin_flag_CXX \ lt_prog_compiler_pic_CXX \ lt_prog_compiler_wl_CXX \ lt_prog_compiler_static_CXX \ lt_cv_prog_compiler_c_o_CXX \ export_dynamic_flag_spec_CXX \ whole_archive_flag_spec_CXX \ compiler_needs_object_CXX \ with_gnu_ld_CXX \ allow_undefined_flag_CXX \ no_undefined_flag_CXX \ hardcode_libdir_flag_spec_CXX \ hardcode_libdir_separator_CXX \ exclude_expsyms_CXX \ include_expsyms_CXX \ file_list_spec_CXX \ compiler_lib_search_dirs_CXX \ predep_objects_CXX \ postdep_objects_CXX \ predeps_CXX \ postdeps_CXX \ compiler_lib_search_path_CXX; do case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in *[\\\\\\\`\\"\\\$]*) eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED \\"\\\$sed_quote_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes ;; *) eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\"" ;; esac done # Double-quote double-evaled strings. for var in reload_cmds \ old_postinstall_cmds \ old_postuninstall_cmds \ old_archive_cmds \ extract_expsyms_cmds \ old_archive_from_new_cmds \ old_archive_from_expsyms_cmds \ archive_cmds \ archive_expsym_cmds \ module_cmds \ module_expsym_cmds \ export_symbols_cmds \ prelink_cmds \ postlink_cmds \ postinstall_cmds \ postuninstall_cmds \ finish_cmds \ sys_lib_search_path_spec \ configure_time_dlsearch_path \ configure_time_lt_sys_library_path \ reload_cmds_CXX \ old_archive_cmds_CXX \ old_archive_from_new_cmds_CXX \ old_archive_from_expsyms_cmds_CXX \ archive_cmds_CXX \ archive_expsym_cmds_CXX \ module_cmds_CXX \ module_expsym_cmds_CXX \ export_symbols_cmds_CXX \ prelink_cmds_CXX \ postlink_cmds_CXX; do case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in *[\\\\\\\`\\"\\\$]*) eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED -e \\"\\\$double_quote_subst\\" -e \\"\\\$sed_quote_subst\\" -e \\"\\\$delay_variable_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes ;; *) eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\"" ;; esac done ac_aux_dir='$ac_aux_dir' # See if we are running on zsh, and set the options that allow our # commands through without removal of \ escapes INIT. if test -n "\${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi PACKAGE='$PACKAGE' VERSION='$VERSION' RM='$RM' ofile='$ofile' _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 # Handling of arguments. for ac_config_target in $ac_config_targets do case $ac_config_target in "config.h") CONFIG_HEADERS="$CONFIG_HEADERS config.h" ;; "ffcall-version.h") CONFIG_HEADERS="$CONFIG_HEADERS ffcall-version.h:ffcall-version.in.h" ;; "Makefile") CONFIG_FILES="$CONFIG_FILES Makefile" ;; "gnulib-lib/Makefile") CONFIG_FILES="$CONFIG_FILES gnulib-lib/Makefile" ;; "avcall/Makefile") CONFIG_FILES="$CONFIG_FILES avcall/Makefile" ;; "vacall/Makefile") CONFIG_FILES="$CONFIG_FILES vacall/Makefile" ;; "trampoline/Makefile") CONFIG_FILES="$CONFIG_FILES trampoline/Makefile" ;; "callback/Makefile") CONFIG_FILES="$CONFIG_FILES callback/Makefile" ;; "callback/vacall_r/Makefile") CONFIG_FILES="$CONFIG_FILES callback/vacall_r/Makefile" ;; "callback/trampoline_r/Makefile") CONFIG_FILES="$CONFIG_FILES callback/trampoline_r/Makefile" ;; "depfiles") CONFIG_COMMANDS="$CONFIG_COMMANDS depfiles" ;; "libtool") CONFIG_COMMANDS="$CONFIG_COMMANDS libtool" ;; *) as_fn_error $? "invalid argument: '$ac_config_target'" "$LINENO" 5;; esac done # If the user did not use the arguments to specify the items to instantiate, # then the envvar interface is used. Set only those that are not. # We use the long form for the default assignment because of an extremely # bizarre bug on SunOS 4.1.3. if $ac_need_defaults; then test ${CONFIG_FILES+y} || CONFIG_FILES=$config_files test ${CONFIG_HEADERS+y} || CONFIG_HEADERS=$config_headers test ${CONFIG_COMMANDS+y} || CONFIG_COMMANDS=$config_commands fi # Have a temporary directory for convenience. Make it in the build tree # simply because there is no reason against having it here, and in addition, # creating and moving files from /tmp can sometimes cause problems. # Hook for its removal unless debugging. # Note that there is a small window in which the directory will not be cleaned: # after its creation but before its name has been assigned to '$tmp'. $debug || { tmp= ac_tmp= trap 'exit_status=$? : "${ac_tmp:=$tmp}" { test ! -d "$ac_tmp" || rm -fr "$ac_tmp"; } && exit $exit_status ' 0 trap 'as_fn_exit 1' 1 2 13 15 } # Create a (secure) tmp directory for tmp files. { tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` && test -d "$tmp" } || { tmp=./conf$$-$RANDOM (umask 077 && mkdir "$tmp") } || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5 ac_tmp=$tmp # Set up the scripts for CONFIG_FILES section. # No need to generate them if there are no CONFIG_FILES. # This happens for instance with './config.status config.h'. if test -n "$CONFIG_FILES"; then ac_cr=`echo X | tr X '\015'` # On cygwin, bash can eat \r inside `` if the user requested igncr. # But we know of no other shell where ac_cr would be empty at this # point, so we can use a bashism as a fallback. if test "x$ac_cr" = x; then eval ac_cr=\$\'\\r\' fi ac_cs_awk_cr=`$AWK 'BEGIN { print "a\rb" }' /dev/null` if test "$ac_cs_awk_cr" = "a${ac_cr}b"; then ac_cs_awk_cr='\\r' else ac_cs_awk_cr=$ac_cr fi echo 'BEGIN {' >"$ac_tmp/subs1.awk" && _ACEOF { echo "cat >conf$$subs.awk <<_ACEOF" && echo "$ac_subst_vars" | sed 's/.*/&!$&$ac_delim/' && echo "_ACEOF" } >conf$$subs.sh || as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 ac_delim_num=`echo "$ac_subst_vars" | grep -c '^'` ac_delim='%!_!# ' for ac_last_try in false false false false false :; do . ./conf$$subs.sh || as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 ac_delim_n=`sed -n "s/.*$ac_delim\$/X/p" conf$$subs.awk | grep -c X` if test $ac_delim_n = $ac_delim_num; then break elif $ac_last_try; then as_fn_error $? "could not make $CONFIG_STATUS" "$LINENO" 5 else ac_delim="$ac_delim!$ac_delim _$ac_delim!! " fi done rm -f conf$$subs.sh cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK && _ACEOF sed -n ' h s/^/S["/; s/!.*/"]=/ p g s/^[^!]*!// :repl t repl s/'"$ac_delim"'$// t delim :nl h s/\(.\{148\}\)..*/\1/ t more1 s/["\\]/\\&/g; s/^/"/; s/$/\\n"\\/ p n b repl :more1 s/["\\]/\\&/g; s/^/"/; s/$/"\\/ p g s/.\{148\}// t nl :delim h s/\(.\{148\}\)..*/\1/ t more2 s/["\\]/\\&/g; s/^/"/; s/$/"/ p b :more2 s/["\\]/\\&/g; s/^/"/; s/$/"\\/ p g s/.\{148\}// t delim ' >$CONFIG_STATUS || ac_write_fail=1 rm -f conf$$subs.awk cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 _ACAWK cat >>"\$ac_tmp/subs1.awk" <<_ACAWK && for (key in S) S_is_set[key] = 1 FS = "" } { line = $ 0 nfields = split(line, field, "@") substed = 0 len = length(field[1]) for (i = 2; i < nfields; i++) { key = field[i] keylen = length(key) if (S_is_set[key]) { value = S[key] line = substr(line, 1, len) "" value "" substr(line, len + keylen + 3) len += length(value) + length(field[++i]) substed = 1 } else len += 1 + keylen } print line } _ACAWK _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 if sed "s/$ac_cr//" < /dev/null > /dev/null 2>&1; then sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g" else cat fi < "$ac_tmp/subs1.awk" > "$ac_tmp/subs.awk" \ || as_fn_error $? "could not setup config files machinery" "$LINENO" 5 _ACEOF # VPATH may cause trouble with some makes, so we remove sole $(srcdir), # ${srcdir} and @srcdir@ entries from VPATH if srcdir is ".", strip leading and # trailing colons and then remove the whole line if VPATH becomes empty # (actually we leave an empty line to preserve line numbers). if test "x$srcdir" = x.; then ac_vpsub='/^[ ]*VPATH[ ]*=[ ]*/{ h s/// s/^/:/ s/[ ]*$/:/ s/:\$(srcdir):/:/g s/:\${srcdir}:/:/g s/:@srcdir@:/:/g s/^:*// s/:*$// x s/\(=[ ]*\).*/\1/ G s/\n// s/^[^=]*=[ ]*$// }' fi cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 fi # test -n "$CONFIG_FILES" # Set up the scripts for CONFIG_HEADERS section. # No need to generate them if there are no CONFIG_HEADERS. # This happens for instance with './config.status Makefile'. if test -n "$CONFIG_HEADERS"; then cat >"$ac_tmp/defines.awk" <<\_ACAWK || BEGIN { _ACEOF # Transform confdefs.h into an awk script 'defines.awk', embedded as # here-document in config.status, that substitutes the proper values into # config.h.in to produce config.h. # Create a delimiter string that does not exist in confdefs.h, to ease # handling of long lines. ac_delim='%!_!# ' for ac_last_try in false false :; do ac_tt=`sed -n "/$ac_delim/p" confdefs.h` if test -z "$ac_tt"; then break elif $ac_last_try; then as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5 else ac_delim="$ac_delim!$ac_delim _$ac_delim!! " fi done # For the awk script, D is an array of macro values keyed by name, # likewise P contains macro parameters if any. Preserve backslash # newline sequences. ac_word_re=[_$as_cr_Letters][_$as_cr_alnum]* sed -n ' s/.\{148\}/&'"$ac_delim"'/g t rset :rset s/^[ ]*#[ ]*define[ ][ ]*/ / t def d :def s/\\$// t bsnl s/["\\]/\\&/g s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\ D["\1"]=" \3"/p s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2"/p d :bsnl s/["\\]/\\&/g s/^ \('"$ac_word_re"'\)\(([^()]*)\)[ ]*\(.*\)/P["\1"]="\2"\ D["\1"]=" \3\\\\\\n"\\/p t cont s/^ \('"$ac_word_re"'\)[ ]*\(.*\)/D["\1"]=" \2\\\\\\n"\\/p t cont d :cont n s/.\{148\}/&'"$ac_delim"'/g t clear :clear s/\\$// t bsnlc s/["\\]/\\&/g; s/^/"/; s/$/"/p d :bsnlc s/["\\]/\\&/g; s/^/"/; s/$/\\\\\\n"\\/p b cont ' >$CONFIG_STATUS || ac_write_fail=1 cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 for (key in D) D_is_set[key] = 1 FS = "" } /^[\t ]*#[\t ]*(define|undef)[\t ]+$ac_word_re([\t (]|\$)/ { line = \$ 0 split(line, arg, " ") if (arg[1] == "#") { defundef = arg[2] mac1 = arg[3] } else { defundef = substr(arg[1], 2) mac1 = arg[2] } split(mac1, mac2, "(") #) macro = mac2[1] prefix = substr(line, 1, index(line, defundef) - 1) if (D_is_set[macro]) { # Preserve the white space surrounding the "#". print prefix "define", macro P[macro] D[macro] next } else { # Replace #undef with comments. This is necessary, for example, # in the case of _POSIX_SOURCE, which is predefined and required # on some systems where configure will not decide to define it. if (defundef == "undef") { print "/*", prefix defundef, macro, "*/" next } } } { print } _ACAWK _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 as_fn_error $? "could not setup config headers machinery" "$LINENO" 5 fi # test -n "$CONFIG_HEADERS" eval set X " :F $CONFIG_FILES :H $CONFIG_HEADERS :C $CONFIG_COMMANDS" shift for ac_tag do case $ac_tag in :[FHLC]) ac_mode=$ac_tag; continue;; esac case $ac_mode$ac_tag in :[FHL]*:*);; :L* | :C*:*) as_fn_error $? "invalid tag '$ac_tag'" "$LINENO" 5;; :[FH]-) ac_tag=-:-;; :[FH]*) ac_tag=$ac_tag:$ac_tag.in;; esac ac_save_IFS=$IFS IFS=: set x $ac_tag IFS=$ac_save_IFS shift ac_file=$1 shift case $ac_mode in :L) ac_source=$1;; :[FH]) ac_file_inputs= for ac_f do case $ac_f in -) ac_f="$ac_tmp/stdin";; *) # Look for the file first in the build tree, then in the source tree # (if the path is not absolute). The absolute path cannot be DOS-style, # because $ac_f cannot contain ':'. test -f "$ac_f" || case $ac_f in [\\/$]*) false;; *) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";; esac || as_fn_error 1 "cannot find input file: '$ac_f'" "$LINENO" 5;; esac case $ac_f in *\'*) ac_f=`printf "%s\n" "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac as_fn_append ac_file_inputs " '$ac_f'" done # Let's still pretend it is 'configure' which instantiates (i.e., don't # use $as_me), people would be surprised to read: # /* config.h. Generated by config.status. */ configure_input='Generated from '` printf "%s\n" "$*" | sed 's|^[^:]*/||;s|:[^:]*/|, |g' `' by configure.' if test x"$ac_file" != x-; then configure_input="$ac_file. $configure_input" { printf "%s\n" "$as_me:${as_lineno-$LINENO}: creating $ac_file" >&5 printf "%s\n" "$as_me: creating $ac_file" >&6;} fi # Neutralize special characters interpreted by sed in replacement strings. case $configure_input in #( *\&* | *\|* | *\\* ) ac_sed_conf_input=`printf "%s\n" "$configure_input" | sed 's/[\\\\&|]/\\\\&/g'`;; #( *) ac_sed_conf_input=$configure_input;; esac case $ac_tag in *:-:* | *:-) cat >"$ac_tmp/stdin" \ || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;; esac ;; esac ac_dir=`$as_dirname -- "$ac_file" || $as_expr X"$ac_file" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$ac_file" : 'X\(//\)[^/]' \| \ X"$ac_file" : 'X\(//\)$' \| \ X"$ac_file" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$ac_file" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'` as_dir="$ac_dir"; as_fn_mkdir_p ac_builddir=. case "$ac_dir" in .) ac_dir_suffix= ac_top_builddir_sub=. ac_top_build_prefix= ;; *) ac_dir_suffix=/`printf "%s\n" "$ac_dir" | sed 's|^\.[\\/]||'` # A ".." for each directory in $ac_dir_suffix. ac_top_builddir_sub=`printf "%s\n" "$ac_dir_suffix" | sed 's|/[^\\/]*|/..|g;s|/||'` case $ac_top_builddir_sub in "") ac_top_builddir_sub=. ac_top_build_prefix= ;; *) ac_top_build_prefix=$ac_top_builddir_sub/ ;; esac ;; esac ac_abs_top_builddir=$ac_pwd ac_abs_builddir=$ac_pwd$ac_dir_suffix # for backward compatibility: ac_top_builddir=$ac_top_build_prefix case $srcdir in .) # We are building in place. ac_srcdir=. ac_top_srcdir=$ac_top_builddir_sub ac_abs_top_srcdir=$ac_pwd ;; [\\/]* | ?:[\\/]* ) # Absolute name. ac_srcdir=$srcdir$ac_dir_suffix; ac_top_srcdir=$srcdir ac_abs_top_srcdir=$srcdir ;; *) # Relative name. ac_srcdir=$ac_top_build_prefix$srcdir$ac_dir_suffix ac_top_srcdir=$ac_top_build_prefix$srcdir ac_abs_top_srcdir=$ac_pwd/$srcdir ;; esac ac_abs_srcdir=$ac_abs_top_srcdir$ac_dir_suffix case $ac_mode in :F) # # CONFIG_FILE # case $INSTALL in [\\/$]* | ?:[\\/]* ) ac_INSTALL=$INSTALL ;; *) ac_INSTALL=$ac_top_build_prefix$INSTALL ;; esac ac_MKDIR_P=$MKDIR_P case $MKDIR_P in [\\/$]* | ?:[\\/]* ) ;; */*) ac_MKDIR_P=$ac_top_build_prefix$MKDIR_P ;; esac _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 # If the template does not know about datarootdir, expand it. # FIXME: This hack should be removed a few years after 2.60. ac_datarootdir_hack=; ac_datarootdir_seen= ac_sed_dataroot=' /datarootdir/ { p q } /@datadir@/p /@docdir@/p /@infodir@/p /@localedir@/p /@mandir@/p' case `eval "sed -n \"\$ac_sed_dataroot\" $ac_file_inputs"` in *datarootdir*) ac_datarootdir_seen=yes;; *@datadir@*|*@docdir@*|*@infodir@*|*@localedir@*|*@mandir@*) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&5 printf "%s\n" "$as_me: WARNING: $ac_file_inputs seems to ignore the --datarootdir setting" >&2;} _ACEOF cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_datarootdir_hack=' s&@datadir@&$datadir&g s&@docdir@&$docdir&g s&@infodir@&$infodir&g s&@localedir@&$localedir&g s&@mandir@&$mandir&g s&\\\${datarootdir}&$datarootdir&g' ;; esac _ACEOF # Neutralize VPATH when '$srcdir' = '.'. # Shell code in configure.ac might set extrasub. # FIXME: do we really want to maintain this feature? cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_sed_extra="$ac_vpsub $extrasub _ACEOF cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 :t /@[a-zA-Z_][a-zA-Z_0-9]*@/!b s|@configure_input@|$ac_sed_conf_input|;t t s&@top_builddir@&$ac_top_builddir_sub&;t t s&@top_build_prefix@&$ac_top_build_prefix&;t t s&@srcdir@&$ac_srcdir&;t t s&@abs_srcdir@&$ac_abs_srcdir&;t t s&@top_srcdir@&$ac_top_srcdir&;t t s&@abs_top_srcdir@&$ac_abs_top_srcdir&;t t s&@builddir@&$ac_builddir&;t t s&@abs_builddir@&$ac_abs_builddir&;t t s&@abs_top_builddir@&$ac_abs_top_builddir&;t t s&@INSTALL@&$ac_INSTALL&;t t s&@MKDIR_P@&$ac_MKDIR_P&;t t $ac_datarootdir_hack " eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | $AWK -f "$ac_tmp/subs.awk" \ >$ac_tmp/out || as_fn_error $? "could not create $ac_file" "$LINENO" 5 test -z "$ac_datarootdir_hack$ac_datarootdir_seen" && { ac_out=`sed -n '/\${datarootdir}/p' "$ac_tmp/out"`; test -n "$ac_out"; } && { ac_out=`sed -n '/^[ ]*datarootdir[ ]*:*=/p' \ "$ac_tmp/out"`; test -z "$ac_out"; } && { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable 'datarootdir' which seems to be undefined. Please make sure it is defined" >&5 printf "%s\n" "$as_me: WARNING: $ac_file contains a reference to the variable 'datarootdir' which seems to be undefined. Please make sure it is defined" >&2;} rm -f "$ac_tmp/stdin" case $ac_file in -) cat "$ac_tmp/out" && rm -f "$ac_tmp/out";; *) rm -f "$ac_file" && mv "$ac_tmp/out" "$ac_file";; esac \ || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;; :H) # # CONFIG_HEADER # if test x"$ac_file" != x-; then { printf "%s\n" "/* $configure_input */" >&1 \ && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" } >"$ac_tmp/config.h" \ || as_fn_error $? "could not create $ac_file" "$LINENO" 5 if diff "$ac_file" "$ac_tmp/config.h" >/dev/null 2>&1; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5 printf "%s\n" "$as_me: $ac_file is unchanged" >&6;} else rm -f "$ac_file" mv "$ac_tmp/config.h" "$ac_file" \ || as_fn_error $? "could not create $ac_file" "$LINENO" 5 fi else printf "%s\n" "/* $configure_input */" >&1 \ && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" \ || as_fn_error $? "could not create -" "$LINENO" 5 fi # Compute "$ac_file"'s index in $config_headers. _am_arg="$ac_file" _am_stamp_count=1 for _am_header in $config_headers :; do case $_am_header in $_am_arg | $_am_arg:* ) break ;; * ) _am_stamp_count=`expr $_am_stamp_count + 1` ;; esac done echo "timestamp for $_am_arg" >`$as_dirname -- "$_am_arg" || $as_expr X"$_am_arg" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$_am_arg" : 'X\(//\)[^/]' \| \ X"$_am_arg" : 'X\(//\)$' \| \ X"$_am_arg" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$_am_arg" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'`/stamp-h$_am_stamp_count ;; :C) { printf "%s\n" "$as_me:${as_lineno-$LINENO}: executing $ac_file commands" >&5 printf "%s\n" "$as_me: executing $ac_file commands" >&6;} ;; esac case $ac_file$ac_mode in "depfiles":C) test x"$AMDEP_TRUE" != x"" || { # Older Autoconf quotes --file arguments for eval, but not when files # are listed without --file. Let's play safe and only enable the eval # if we detect the quoting. # TODO: see whether this extra hack can be removed once we start # requiring Autoconf 2.70 or later. case $CONFIG_FILES in #( *\'*) : eval set x "$CONFIG_FILES" ;; #( *) : set x $CONFIG_FILES ;; #( *) : ;; esac shift # Used to flag and report bootstrapping failures. am_rc=0 for am_mf do # Strip MF so we end up with the name of the file. am_mf=`printf "%s\n" "$am_mf" | sed -e 's/:.*$//'` # Check whether this is an Automake generated Makefile which includes # dependency-tracking related rules and includes. # Grep'ing the whole file directly is not great: AIX grep has a line # limit of 2048, but all sed's we know have understand at least 4000. sed -n 's,^am--depfiles:.*,X,p' "$am_mf" | grep X >/dev/null 2>&1 \ || continue am_dirpart=`$as_dirname -- "$am_mf" || $as_expr X"$am_mf" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \ X"$am_mf" : 'X\(//\)[^/]' \| \ X"$am_mf" : 'X\(//\)$' \| \ X"$am_mf" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X"$am_mf" | sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{ s//\1/ q } /^X\(\/\/\)[^/].*/{ s//\1/ q } /^X\(\/\/\)$/{ s//\1/ q } /^X\(\/\).*/{ s//\1/ q } s/.*/./; q'` am_filepart=`$as_basename -- "$am_mf" || $as_expr X/"$am_mf" : '.*/\([^/][^/]*\)/*$' \| \ X"$am_mf" : 'X\(//\)$' \| \ X"$am_mf" : 'X\(/\)' \| . 2>/dev/null || printf "%s\n" X/"$am_mf" | sed '/^.*\/\([^/][^/]*\)\/*$/{ s//\1/ q } /^X\/\(\/\/\)$/{ s//\1/ q } /^X\/\(\/\).*/{ s//\1/ q } s/.*/./; q'` { echo "$as_me:$LINENO: cd "$am_dirpart" \ && sed -e '/# am--include-marker/d' "$am_filepart" \ | $MAKE -f - am--depfiles" >&5 (cd "$am_dirpart" \ && sed -e '/# am--include-marker/d' "$am_filepart" \ | $MAKE -f - am--depfiles) >&5 2>&5 ac_status=$? echo "$as_me:$LINENO: \$? = $ac_status" >&5 (exit $ac_status); } || am_rc=$? done if test $am_rc -ne 0; then { { printf "%s\n" "$as_me:${as_lineno-$LINENO}: error: in '$ac_pwd':" >&5 printf "%s\n" "$as_me: error: in '$ac_pwd':" >&2;} as_fn_error $? "Something went wrong bootstrapping makefile fragments for automatic dependency tracking. If GNU make was not used, consider re-running the configure script with MAKE=\"gmake\" (or whatever is necessary). You can also try re-running configure with the '--disable-dependency-tracking' option to at least be able to build the package (albeit without support for automatic dependency tracking). See 'config.log' for more details" "$LINENO" 5; } fi { am_dirpart=; unset am_dirpart;} { am_filepart=; unset am_filepart;} { am_mf=; unset am_mf;} { am_rc=; unset am_rc;} rm -f conftest-deps.mk } ;; "libtool":C) # See if we are running on zsh, and set the options that allow our # commands through without removal of \ escapes. if test -n "${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi cfgfile=${ofile}T trap "$RM \"$cfgfile\"; exit 1" 1 2 15 $RM "$cfgfile" cat <<_LT_EOF >> "$cfgfile" #! $SHELL # Generated automatically by $as_me ($PACKAGE) $VERSION # Libtool was configured on host `(hostname || uname -n) 2>/dev/null | sed 1q`: # NOTE: Changes made to this file will be lost: look at ltmain.sh. # Provide generalized library-building support services. # Written by Gordon Matzigkeit, 1996 # Copyright (C) 2014 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # GNU Libtool is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of of the License, or # (at your option) any later version. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program or library that is built # using GNU Libtool, you may include this file under the same # distribution terms that you use for the rest of that program. # # GNU Libtool is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . # The names of the tagged configurations supported by this script. available_tags='CXX ' # Configured defaults for sys_lib_dlsearch_path munging. : \${LT_SYS_LIBRARY_PATH="$configure_time_lt_sys_library_path"} # ### BEGIN LIBTOOL CONFIG # Which release of libtool.m4 was used? macro_version=$macro_version macro_revision=$macro_revision # Assembler program. AS=$lt_AS # DLL creation program. DLLTOOL=$lt_DLLTOOL # Object dumper program. OBJDUMP=$lt_OBJDUMP # Whether or not to build shared libraries. build_libtool_libs=$enable_shared # Whether or not to build static libraries. build_old_libs=$enable_static # What type of objects to build. pic_mode=$pic_mode # Whether or not to optimize for fast installation. fast_install=$enable_fast_install # Shared archive member basename,for filename based shared library versioning on AIX. shared_archive_member_spec=$shared_archive_member_spec # Shell to use when invoking shell scripts. SHELL=$lt_SHELL # An echo program that protects backslashes. ECHO=$lt_ECHO # The PATH separator for the build system. PATH_SEPARATOR=$lt_PATH_SEPARATOR # The host system. host_alias=$host_alias host=$host host_os=$host_os # The build system. build_alias=$build_alias build=$build build_os=$build_os # A sed program that does not truncate output. SED=$lt_SED # Sed that helps us avoid accidentally triggering echo(1) options like -n. Xsed="\$SED -e 1s/^X//" # A grep program that handles long lines. GREP=$lt_GREP # An ERE matcher. EGREP=$lt_EGREP # A literal string matcher. FGREP=$lt_FGREP # A BSD- or MS-compatible name lister. NM=$lt_NM # Whether we need soft or hard links. LN_S=$lt_LN_S # What is the maximum length of a command? max_cmd_len=$max_cmd_len # Object file suffix (normally "o"). objext=$ac_objext # Executable file suffix (normally ""). exeext=$exeext # whether the shell understands "unset". lt_unset=$lt_unset # turn spaces into newlines. SP2NL=$lt_lt_SP2NL # turn newlines into spaces. NL2SP=$lt_lt_NL2SP # convert \$build file names to \$host format. to_host_file_cmd=$lt_cv_to_host_file_cmd # convert \$build files to toolchain format. to_tool_file_cmd=$lt_cv_to_tool_file_cmd # A file(cmd) program that detects file types. FILECMD=$lt_FILECMD # Method to check whether dependent libraries are shared objects. deplibs_check_method=$lt_deplibs_check_method # Command to use when deplibs_check_method = "file_magic". file_magic_cmd=$lt_file_magic_cmd # How to find potential files when deplibs_check_method = "file_magic". file_magic_glob=$lt_file_magic_glob # Find potential files using nocaseglob when deplibs_check_method = "file_magic". want_nocaseglob=$lt_want_nocaseglob # Command to associate shared and link libraries. sharedlib_from_linklib_cmd=$lt_sharedlib_from_linklib_cmd # The archiver. AR=$lt_AR # Flags to create an archive (by configure). lt_ar_flags=$lt_ar_flags # Flags to create an archive. AR_FLAGS=\${ARFLAGS-"\$lt_ar_flags"} # How to feed a file listing to the archiver. archiver_list_spec=$lt_archiver_list_spec # A symbol stripping program. STRIP=$lt_STRIP # Commands used to install an old-style archive. RANLIB=$lt_RANLIB old_postinstall_cmds=$lt_old_postinstall_cmds old_postuninstall_cmds=$lt_old_postuninstall_cmds # Whether to use a lock for old archive extraction. lock_old_archive_extraction=$lock_old_archive_extraction # A C compiler. LTCC=$lt_CC # LTCC compiler flags. LTCFLAGS=$lt_CFLAGS # Take the output of nm and produce a listing of raw symbols and C names. global_symbol_pipe=$lt_lt_cv_sys_global_symbol_pipe # Transform the output of nm in a proper C declaration. global_symbol_to_cdecl=$lt_lt_cv_sys_global_symbol_to_cdecl # Transform the output of nm into a list of symbols to manually relocate. global_symbol_to_import=$lt_lt_cv_sys_global_symbol_to_import # Transform the output of nm in a C name address pair. global_symbol_to_c_name_address=$lt_lt_cv_sys_global_symbol_to_c_name_address # Transform the output of nm in a C name address pair when lib prefix is needed. global_symbol_to_c_name_address_lib_prefix=$lt_lt_cv_sys_global_symbol_to_c_name_address_lib_prefix # The name lister interface. nm_interface=$lt_lt_cv_nm_interface # Specify filename containing input files for \$NM. nm_file_list_spec=$lt_nm_file_list_spec # The root where to search for dependent libraries,and where our libraries should be installed. lt_sysroot=$lt_sysroot # Command to truncate a binary pipe. lt_truncate_bin=$lt_lt_cv_truncate_bin # The name of the directory that contains temporary libtool files. objdir=$objdir # Used to examine libraries when file_magic_cmd begins with "file". MAGIC_CMD=$MAGIC_CMD # Must we lock files when doing compilation? need_locks=$lt_need_locks # Manifest tool. MANIFEST_TOOL=$lt_MANIFEST_TOOL # Tool to manipulate archived DWARF debug symbol files on Mac OS X. DSYMUTIL=$lt_DSYMUTIL # Tool to change global to local symbols on Mac OS X. NMEDIT=$lt_NMEDIT # Tool to manipulate fat objects and archives on Mac OS X. LIPO=$lt_LIPO # ldd/readelf like tool for Mach-O binaries on Mac OS X. OTOOL=$lt_OTOOL # ldd/readelf like tool for 64 bit Mach-O binaries on Mac OS X 10.4. OTOOL64=$lt_OTOOL64 # Old archive suffix (normally "a"). libext=$libext # Shared library suffix (normally ".so"). shrext_cmds=$lt_shrext_cmds # The commands to extract the exported symbol list from a shared archive. extract_expsyms_cmds=$lt_extract_expsyms_cmds # Variables whose values should be saved in libtool wrapper scripts and # restored at link time. variables_saved_for_relink=$lt_variables_saved_for_relink # Do we need the "lib" prefix for modules? need_lib_prefix=$need_lib_prefix # Do we need a version for libraries? need_version=$need_version # Library versioning type. version_type=$version_type # Shared library runtime path variable. runpath_var=$runpath_var # Shared library path variable. shlibpath_var=$shlibpath_var # Is shlibpath searched before the hard-coded library search path? shlibpath_overrides_runpath=$shlibpath_overrides_runpath # Format of library name prefix. libname_spec=$lt_libname_spec # List of archive names. First name is the real one, the rest are links. # The last name is the one that the linker finds with -lNAME library_names_spec=$lt_library_names_spec # The coded name of the library, if different from the real name. soname_spec=$lt_soname_spec # Permission mode override for installation of shared libraries. install_override_mode=$lt_install_override_mode # Command to use after installation of a shared archive. postinstall_cmds=$lt_postinstall_cmds # Command to use after uninstallation of a shared archive. postuninstall_cmds=$lt_postuninstall_cmds # Commands used to finish a libtool library installation in a directory. finish_cmds=$lt_finish_cmds # As "finish_cmds", except a single script fragment to be evaled but # not shown. finish_eval=$lt_finish_eval # Whether we should hardcode library paths into libraries. hardcode_into_libs=$hardcode_into_libs # Compile-time system search path for libraries. sys_lib_search_path_spec=$lt_sys_lib_search_path_spec # Detected run-time system search path for libraries. sys_lib_dlsearch_path_spec=$lt_configure_time_dlsearch_path # Explicit LT_SYS_LIBRARY_PATH set during ./configure time. configure_time_lt_sys_library_path=$lt_configure_time_lt_sys_library_path # Whether dlopen is supported. dlopen_support=$enable_dlopen # Whether dlopen of programs is supported. dlopen_self=$enable_dlopen_self # Whether dlopen of statically linked programs is supported. dlopen_self_static=$enable_dlopen_self_static # Commands to strip libraries. old_striplib=$lt_old_striplib striplib=$lt_striplib # The linker used to build libraries. LD=$lt_LD # How to create reloadable object files. reload_flag=$lt_reload_flag reload_cmds=$lt_reload_cmds # Commands used to build an old-style archive. old_archive_cmds=$lt_old_archive_cmds # A language specific compiler. CC=$lt_compiler # Is the compiler the GNU compiler? with_gcc=$GCC # Compiler flag to turn off builtin functions. no_builtin_flag=$lt_lt_prog_compiler_no_builtin_flag # Additional compiler flags for building library objects. pic_flag=$lt_lt_prog_compiler_pic # How to pass a linker flag through the compiler. wl=$lt_lt_prog_compiler_wl # Compiler flag to prevent dynamic linking. link_static_flag=$lt_lt_prog_compiler_static # Does compiler simultaneously support -c and -o options? compiler_c_o=$lt_lt_cv_prog_compiler_c_o # Whether or not to add -lc for building shared libraries. build_libtool_need_lc=$archive_cmds_need_lc # Whether or not to disallow shared libs when runtime libs are static. allow_libtool_libs_with_static_runtimes=$enable_shared_with_static_runtimes # Compiler flag to allow reflexive dlopens. export_dynamic_flag_spec=$lt_export_dynamic_flag_spec # Compiler flag to generate shared objects directly from archives. whole_archive_flag_spec=$lt_whole_archive_flag_spec # Whether the compiler copes with passing no objects directly. compiler_needs_object=$lt_compiler_needs_object # Create an old-style archive from a shared archive. old_archive_from_new_cmds=$lt_old_archive_from_new_cmds # Create a temporary old-style archive to link instead of a shared archive. old_archive_from_expsyms_cmds=$lt_old_archive_from_expsyms_cmds # Commands used to build a shared archive. archive_cmds=$lt_archive_cmds archive_expsym_cmds=$lt_archive_expsym_cmds # Commands used to build a loadable module if different from building # a shared archive. module_cmds=$lt_module_cmds module_expsym_cmds=$lt_module_expsym_cmds # Whether we are building with GNU ld or not. with_gnu_ld=$lt_with_gnu_ld # Flag that allows shared libraries with undefined symbols to be built. allow_undefined_flag=$lt_allow_undefined_flag # Flag that enforces no undefined symbols. no_undefined_flag=$lt_no_undefined_flag # Flag to hardcode \$libdir into a binary during linking. # This must work even if \$libdir does not exist hardcode_libdir_flag_spec=$lt_hardcode_libdir_flag_spec # Whether we need a single "-rpath" flag with a separated argument. hardcode_libdir_separator=$lt_hardcode_libdir_separator # Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes # DIR into the resulting binary. hardcode_direct=$hardcode_direct # Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes # DIR into the resulting binary and the resulting library dependency is # "absolute",i.e impossible to change by setting \$shlibpath_var if the # library is relocated. hardcode_direct_absolute=$hardcode_direct_absolute # Set to "yes" if using the -LDIR flag during linking hardcodes DIR # into the resulting binary. hardcode_minus_L=$hardcode_minus_L # Set to "yes" if using SHLIBPATH_VAR=DIR during linking hardcodes DIR # into the resulting binary. hardcode_shlibpath_var=$hardcode_shlibpath_var # Set to "yes" if building a shared library automatically hardcodes DIR # into the library and all subsequent libraries and executables linked # against it. hardcode_automatic=$hardcode_automatic # Set to yes if linker adds runtime paths of dependent libraries # to runtime path list. inherit_rpath=$inherit_rpath # Whether libtool must link a program against all its dependency libraries. link_all_deplibs=$link_all_deplibs # Set to "yes" if exported symbols are required. always_export_symbols=$always_export_symbols # The commands to list exported symbols. export_symbols_cmds=$lt_export_symbols_cmds # Symbols that should not be listed in the preloaded symbols. exclude_expsyms=$lt_exclude_expsyms # Symbols that must always be exported. include_expsyms=$lt_include_expsyms # Commands necessary for linking programs (against libraries) with templates. prelink_cmds=$lt_prelink_cmds # Commands necessary for finishing linking programs. postlink_cmds=$lt_postlink_cmds # Specify filename containing input files. file_list_spec=$lt_file_list_spec # How to hardcode a shared library path into an executable. hardcode_action=$hardcode_action # The directories searched by this compiler when creating a shared library. compiler_lib_search_dirs=$lt_compiler_lib_search_dirs # Dependencies to place before and after the objects being linked to # create a shared library. predep_objects=$lt_predep_objects postdep_objects=$lt_postdep_objects predeps=$lt_predeps postdeps=$lt_postdeps # The library search path used internally by the compiler when linking # a shared library. compiler_lib_search_path=$lt_compiler_lib_search_path # ### END LIBTOOL CONFIG _LT_EOF cat <<'_LT_EOF' >> "$cfgfile" # ### BEGIN FUNCTIONS SHARED WITH CONFIGURE # func_munge_path_list VARIABLE PATH # ----------------------------------- # VARIABLE is name of variable containing _space_ separated list of # directories to be munged by the contents of PATH, which is string # having a format: # "DIR[:DIR]:" # string "DIR[ DIR]" will be prepended to VARIABLE # ":DIR[:DIR]" # string "DIR[ DIR]" will be appended to VARIABLE # "DIRP[:DIRP]::[DIRA:]DIRA" # string "DIRP[ DIRP]" will be prepended to VARIABLE and string # "DIRA[ DIRA]" will be appended to VARIABLE # "DIR[:DIR]" # VARIABLE will be replaced by "DIR[ DIR]" func_munge_path_list () { case x$2 in x) ;; *:) eval $1=\"`$ECHO $2 | $SED 's/:/ /g'` \$$1\" ;; x:*) eval $1=\"\$$1 `$ECHO $2 | $SED 's/:/ /g'`\" ;; *::*) eval $1=\"\$$1\ `$ECHO $2 | $SED -e 's/.*:://' -e 's/:/ /g'`\" eval $1=\"`$ECHO $2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \$$1\" ;; *) eval $1=\"`$ECHO $2 | $SED 's/:/ /g'`\" ;; esac } # Calculate cc_basename. Skip known compiler wrappers and cross-prefix. func_cc_basename () { for cc_temp in $*""; do case $cc_temp in compile | *[\\/]compile | ccache | *[\\/]ccache ) ;; distcc | *[\\/]distcc | purify | *[\\/]purify ) ;; \-*) ;; *) break;; esac done func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"` } # ### END FUNCTIONS SHARED WITH CONFIGURE _LT_EOF case $host_os in aix3*) cat <<\_LT_EOF >> "$cfgfile" # AIX sometimes has problems with the GCC collect2 program. For some # reason, if we set the COLLECT_NAMES environment variable, the problems # vanish in a puff of smoke. if test set != "${COLLECT_NAMES+set}"; then COLLECT_NAMES= export COLLECT_NAMES fi _LT_EOF ;; esac ltmain=$ac_aux_dir/ltmain.sh # We use sed instead of cat because bash on DJGPP gets confused if # if finds mixed CR/LF and LF-only lines. Since sed operates in # text mode, it properly converts lines to CR/LF. This bash problem # is reportedly fixed, but why not run on old versions too? $SED '$q' "$ltmain" >> "$cfgfile" \ || (rm -f "$cfgfile"; exit 1) mv -f "$cfgfile" "$ofile" || (rm -f "$ofile" && cp "$cfgfile" "$ofile" && rm -f "$cfgfile") chmod +x "$ofile" cat <<_LT_EOF >> "$ofile" # ### BEGIN LIBTOOL TAG CONFIG: CXX # The linker used to build libraries. LD=$lt_LD_CXX # How to create reloadable object files. reload_flag=$lt_reload_flag_CXX reload_cmds=$lt_reload_cmds_CXX # Commands used to build an old-style archive. old_archive_cmds=$lt_old_archive_cmds_CXX # A language specific compiler. CC=$lt_compiler_CXX # Is the compiler the GNU compiler? with_gcc=$GCC_CXX # Compiler flag to turn off builtin functions. no_builtin_flag=$lt_lt_prog_compiler_no_builtin_flag_CXX # Additional compiler flags for building library objects. pic_flag=$lt_lt_prog_compiler_pic_CXX # How to pass a linker flag through the compiler. wl=$lt_lt_prog_compiler_wl_CXX # Compiler flag to prevent dynamic linking. link_static_flag=$lt_lt_prog_compiler_static_CXX # Does compiler simultaneously support -c and -o options? compiler_c_o=$lt_lt_cv_prog_compiler_c_o_CXX # Whether or not to add -lc for building shared libraries. build_libtool_need_lc=$archive_cmds_need_lc_CXX # Whether or not to disallow shared libs when runtime libs are static. allow_libtool_libs_with_static_runtimes=$enable_shared_with_static_runtimes_CXX # Compiler flag to allow reflexive dlopens. export_dynamic_flag_spec=$lt_export_dynamic_flag_spec_CXX # Compiler flag to generate shared objects directly from archives. whole_archive_flag_spec=$lt_whole_archive_flag_spec_CXX # Whether the compiler copes with passing no objects directly. compiler_needs_object=$lt_compiler_needs_object_CXX # Create an old-style archive from a shared archive. old_archive_from_new_cmds=$lt_old_archive_from_new_cmds_CXX # Create a temporary old-style archive to link instead of a shared archive. old_archive_from_expsyms_cmds=$lt_old_archive_from_expsyms_cmds_CXX # Commands used to build a shared archive. archive_cmds=$lt_archive_cmds_CXX archive_expsym_cmds=$lt_archive_expsym_cmds_CXX # Commands used to build a loadable module if different from building # a shared archive. module_cmds=$lt_module_cmds_CXX module_expsym_cmds=$lt_module_expsym_cmds_CXX # Whether we are building with GNU ld or not. with_gnu_ld=$lt_with_gnu_ld_CXX # Flag that allows shared libraries with undefined symbols to be built. allow_undefined_flag=$lt_allow_undefined_flag_CXX # Flag that enforces no undefined symbols. no_undefined_flag=$lt_no_undefined_flag_CXX # Flag to hardcode \$libdir into a binary during linking. # This must work even if \$libdir does not exist hardcode_libdir_flag_spec=$lt_hardcode_libdir_flag_spec_CXX # Whether we need a single "-rpath" flag with a separated argument. hardcode_libdir_separator=$lt_hardcode_libdir_separator_CXX # Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes # DIR into the resulting binary. hardcode_direct=$hardcode_direct_CXX # Set to "yes" if using DIR/libNAME\$shared_ext during linking hardcodes # DIR into the resulting binary and the resulting library dependency is # "absolute",i.e impossible to change by setting \$shlibpath_var if the # library is relocated. hardcode_direct_absolute=$hardcode_direct_absolute_CXX # Set to "yes" if using the -LDIR flag during linking hardcodes DIR # into the resulting binary. hardcode_minus_L=$hardcode_minus_L_CXX # Set to "yes" if using SHLIBPATH_VAR=DIR during linking hardcodes DIR # into the resulting binary. hardcode_shlibpath_var=$hardcode_shlibpath_var_CXX # Set to "yes" if building a shared library automatically hardcodes DIR # into the library and all subsequent libraries and executables linked # against it. hardcode_automatic=$hardcode_automatic_CXX # Set to yes if linker adds runtime paths of dependent libraries # to runtime path list. inherit_rpath=$inherit_rpath_CXX # Whether libtool must link a program against all its dependency libraries. link_all_deplibs=$link_all_deplibs_CXX # Set to "yes" if exported symbols are required. always_export_symbols=$always_export_symbols_CXX # The commands to list exported symbols. export_symbols_cmds=$lt_export_symbols_cmds_CXX # Symbols that should not be listed in the preloaded symbols. exclude_expsyms=$lt_exclude_expsyms_CXX # Symbols that must always be exported. include_expsyms=$lt_include_expsyms_CXX # Commands necessary for linking programs (against libraries) with templates. prelink_cmds=$lt_prelink_cmds_CXX # Commands necessary for finishing linking programs. postlink_cmds=$lt_postlink_cmds_CXX # Specify filename containing input files. file_list_spec=$lt_file_list_spec_CXX # How to hardcode a shared library path into an executable. hardcode_action=$hardcode_action_CXX # The directories searched by this compiler when creating a shared library. compiler_lib_search_dirs=$lt_compiler_lib_search_dirs_CXX # Dependencies to place before and after the objects being linked to # create a shared library. predep_objects=$lt_predep_objects_CXX postdep_objects=$lt_postdep_objects_CXX predeps=$lt_predeps_CXX postdeps=$lt_postdeps_CXX # The library search path used internally by the compiler when linking # a shared library. compiler_lib_search_path=$lt_compiler_lib_search_path_CXX # ### END LIBTOOL TAG CONFIG: CXX _LT_EOF ;; esac done # for ac_tag as_fn_exit 0 _ACEOF ac_clean_files=$ac_clean_files_save test $ac_write_fail = 0 || as_fn_error $? "write failure creating $CONFIG_STATUS" "$LINENO" 5 # configure is writing to config.log, and then calls config.status. # config.status does its own redirection, appending to config.log. # Unfortunately, on DOS this fails, as config.log is still kept open # by configure, so config.status won't be able to write to it; its # output is simply discarded. So we exec the FD to /dev/null, # effectively closing config.log, so it can be properly (re)opened and # appended to by config.status. When coming back to configure, we # need to make the FD available again. if test "$no_create" != yes; then ac_cs_success=: ac_config_status_args= test "$silent" = yes && ac_config_status_args="$ac_config_status_args --quiet" exec 5>/dev/null $SHELL $CONFIG_STATUS $ac_config_status_args || ac_cs_success=false exec 5>>config.log # Use ||, not &&, to avoid exiting from the if with $? = 1, which # would make configure fail if this is the last instruction. $ac_cs_success || as_fn_exit 1 fi if test -n "$ac_unrecognized_opts" && test "$enable_option_checking" != no; then { printf "%s\n" "$as_me:${as_lineno-$LINENO}: WARNING: unrecognized options: $ac_unrecognized_opts" >&5 printf "%s\n" "$as_me: WARNING: unrecognized options: $ac_unrecognized_opts" >&2;} fi libffcall-2.5/Makefile.in0000664000000000000000000001602714665326227012257 00000000000000# Makefile for libffcall #### Start of system configuration section. #### # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ # Programs used by "make": # C compiler CC = @CC@ CFLAGS = @CFLAGS@ CPP = @CPP@ # Both C and C++ compiler CPPFLAGS = @CPPFLAGS@ INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. -I$(srcdir)/vacall_r LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_DATA = @INSTALL_DATA@ #### End of system configuration section. #### SHELL = /bin/sh # This package does not support parallel make. # So, turn off parallel execution (at least in GNU make >= 4.0). GNUMAKEFLAGS = -j1 # Needed by $(LIBTOOL). top_builddir = . # Limit the set of exported symbols, on those platforms where libtool supports it. # Currently this excludes the symbols from gnulib modules. LIBFFCALL_EXPORTED_SYMBOLS_REGEX = '^ffcall_|^avcall_|^callback_|_callback$$' # Before making a release, change this according to the libtool documentation, # section "Library interface versions". LIBFFCALL_VERSION_INFO = 1:1:1 all : all-subdirs libffcall.la all-subdirs : ffcall-version.h force cd @subdir@ && $(MAKE) all ffcall-version.h : $(srcdir)/ffcall-version.in.h cd .. && ./config.status --header=ffcall-version.h:ffcall-version.in.h ffcall-version.lo : $(srcdir)/ffcall-version.c ffcall-version.h config.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/ffcall-version.c libffcall.la : ffcall-version.lo avcall/avcall.lo avcall/avcall-libapi.lo avcall/avcall-structcpy.lo callback/vacall_r/libvacall.la callback/trampoline_r/libtrampoline.la callback/callback-libapi.lo $(LIBTOOL_LINK) $(CC) -o libffcall.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBFFCALL_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBFFCALL_VERSION_INFO) ffcall-version.lo avcall/avcall.lo avcall/avcall-libapi.lo avcall/avcall-structcpy.lo callback/vacall_r/vacall.lo callback/vacall_r/vacall-libapi.lo callback/vacall_r/vacall-structcpy.lo callback/trampoline_r/*.lo callback/callback-libapi.lo gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD) install : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libffcall.la $(DESTDIR)$(libdir)/libffcall.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) ffcall-version.h $(DESTDIR)$(includedir)/ffcall-version.h $(INSTALL_DATA) $(srcdir)/ffcall-abi.h $(DESTDIR)$(includedir)/ffcall-abi.h cd @subdir@ && $(MAKE) install installdirs : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) cd @subdir@ && $(MAKE) installdirs uninstall : force cd @subdir@ && $(MAKE) uninstall $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libffcall.la $(RM) $(DESTDIR)$(includedir)/ffcall-abi.h $(RM) $(DESTDIR)$(includedir)/ffcall-version.h check : force cd @subdir@ && $(MAKE) check extracheck : force cd @subdir@ && $(MAKE) extracheck MOSTLYCLEANDIRS = .libs _libs MOSTLYCLEANFILES = \ *.@OBJEXT@ *.lo core \ libffcall.* mostlyclean : force cd @subdir@ && $(MAKE) mostlyclean $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) clean : force cd @subdir@ && $(MAKE) clean $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) DISTCLEANFILES = \ config.status config.log config.cache Makefile config.h ffcall-version.h libtool \ stamp-h1 stamp-h2 distclean : force cd @subdir@; if test -f Makefile; then $(MAKE) distclean; fi $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) $(RM) $(DISTCLEANFILES) maintainer-clean : force cd @subdir@; if test -f Makefile; then $(MAKE) maintainer-clean; fi $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) $(RM) $(DISTCLEANFILES) # List of source files (committed in version control). SOURCE_FILES = \ COPYING DEPENDENCIES INSTALL.os2 INSTALL.windows NEWS PLATFORMS README \ README-hacking JOIN-GNU \ ChangeLog \ VERSION \ autogen.sh \ Makefile.devel \ Makefile.maint \ Makefile.in \ configure.ac \ m4/as-underscore.m4 \ m4/cc-gcc.m4 \ m4/codeexec.m4 \ m4/endianness.m4 \ m4/ln.m4 \ common/asm-alpha.sh \ common/asm-arm.sh common/asm-arm.h \ common/asm-arm64.sh common/asm-arm64.h \ common/asm-hppa.sh common/asm-hppa.h \ common/asm-hppa64.sh common/asm-hppa64.h \ common/asm-i386.sh common/asm-i386.h \ common/asm-loongarch.sh \ common/asm-m68k.sh common/asm-m68k.h \ common/asm-mips.sh common/asm-mips.h \ common/asm-powerpc.sh \ common/asm-riscv.sh \ common/asm-s390.sh \ common/asm-sparc.sh common/asm-sparc.h \ common/asm-x86_64.sh common/asm-x86_64.h \ common/noexecstack.h common/noexecstack-arm.h \ common/structcpy.c \ common/uniq-u.c \ ffcall-version.in.h dummy/ffcall-version.h \ ffcall-abi.h \ ffcall-stdint.h \ ffcall-version.c \ testcases.c # List of distributed files imported from other packages or directories. LIBTOOL_IMPORTED_FILES = \ build-aux/ltmain.sh \ m4/libtool.m4 \ m4/lt~obsolete.m4 \ m4/ltoptions.m4 \ m4/ltsugar.m4 \ m4/ltversion.m4 GNULIB_IMPORTED_FILES = \ build-aux/ar-lib \ build-aux/compile \ build-aux/config.guess \ build-aux/config.sub \ build-aux/install-sh \ gnulib-m4/*.m4 \ m4/mmap-anon.m4 AUTOMAKE_IMPORTED_FILES = \ build-aux/missing IMPORTED_FILES = \ $(LIBTOOL_IMPORTED_FILES) $(GNULIB_IMPORTED_FILES) $(AUTOMAKE_IMPORTED_FILES) # List of files copied by autogen.sh. COPIED_FILES = \ callback/trampoline_r/PORTING \ callback/trampoline_r/cache.c \ callback/trampoline_r/cache-alpha.c \ callback/trampoline_r/cache-hppa.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ aclocal.m4 \ configure \ config.h.in # List of distributed files. DISTFILES = $(SOURCE_FILES) $(IMPORTED_FILES) $(COPIED_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ destdir=`echo '$(distdir)'/$$file | sed -e 's|//*[^/]*$$||'`; \ test -d "$$destdir" || mkdir -p "$$destdir"; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done test -d '$(distdir)'/@subdir@ || mkdir '$(distdir)'/@subdir@; cd @subdir@ && $(MAKE) distdir distdir='$(distdir)'/@subdir@ # Creating a distribution tarball. # Example: make dist VERSION=1.13-pre-20161227 PACKAGE = @PACKAGE_TARNAME@ VERSION = @VERSION@ TAR = tar GZIP = gzip dist : force tmpdistdir=$(PACKAGE)-$(VERSION); \ abstmpdistdir=`pwd`/$$tmpdistdir; \ rm -rf $$tmpdistdir $$tmpdistdir.tar $$tmpdistdir.tar.gz \ && mkdir $$tmpdistdir \ && $(MAKE) distdir distdir="$$abstmpdistdir" \ && $(TAR) chof $$tmpdistdir.tar --owner=root --group=root $$tmpdistdir \ && $(GZIP) -9 $$tmpdistdir.tar \ && rm -rf $$tmpdistdir force : libffcall-2.5/gnulib-lib/0000775000000000000000000000000014665334232012303 500000000000000libffcall-2.5/gnulib-lib/sched.in.h0000664000000000000000000000577614631432055014101 00000000000000/* A GNU-like . Copyright (C) 2008-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _@GUARD_PREFIX@_SCHED_H #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* This file uses #include_next of a system file that defines time_t. For the 'year2038' module to work right, needs to have been included before. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* The include_next requires a split double-inclusion guard. */ #if @HAVE_SCHED_H@ # if @HAVE_SYS_CDEFS_H@ # include # endif # @INCLUDE_NEXT@ @NEXT_SCHED_H@ #endif #ifndef _@GUARD_PREFIX@_SCHED_H #define _@GUARD_PREFIX@_SCHED_H /* This file uses GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Get pid_t. This is needed on glibc 2.11 (see glibc bug ) and Mac OS X 10.5. */ #include #ifdef __KLIBC__ /* On OS/2 kLIBC, struct sched_param is in spawn.h. */ # include #endif #ifdef __VMS /* On OpenVMS, struct sched_param is in . */ # include #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ #if !@HAVE_STRUCT_SCHED_PARAM@ # if !GNULIB_defined_struct_sched_param struct sched_param { int sched_priority; }; # define GNULIB_defined_struct_sched_param 1 # endif #endif #if !(defined SCHED_FIFO && defined SCHED_RR && defined SCHED_OTHER) # define SCHED_FIFO 1 # define SCHED_RR 2 # define SCHED_OTHER 0 #endif #if @GNULIB_SCHED_YIELD@ # if @REPLACE_SCHED_YIELD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef sched_yield # define sched_yield rpl_sched_yield # endif _GL_FUNCDECL_RPL (sched_yield, int, (void)); _GL_CXXALIAS_RPL (sched_yield, int, (void)); # else # if !@HAVE_SCHED_YIELD@ _GL_FUNCDECL_SYS (sched_yield, int, (void)); # endif _GL_CXXALIAS_SYS (sched_yield, int, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (sched_yield); # endif #elif defined GNULIB_POSIXCHECK # undef sched_yield # if HAVE_RAW_DECL_SCHED_YIELD _GL_WARN_ON_USE (sched_yield, "sched_yield is not portable - " "use gnulib module sched_yield for portability"); # endif #endif #endif /* _@GUARD_PREFIX@_SCHED_H */ #endif /* _@GUARD_PREFIX@_SCHED_H */ libffcall-2.5/gnulib-lib/stat-time.h0000664000000000000000000001764414631432055014312 00000000000000/* stat-related time functions. Copyright (C) 2005, 2007, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Paul Eggert. */ #ifndef STAT_TIME_H #define STAT_TIME_H 1 /* This file uses _GL_INLINE_HEADER_BEGIN, _GL_INLINE, _GL_UNUSED, _GL_ATTRIBUTE_PURE, HAVE_STRUCT_STAT_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #include #include #include #include _GL_INLINE_HEADER_BEGIN #ifndef _GL_STAT_TIME_INLINE # define _GL_STAT_TIME_INLINE _GL_INLINE #endif #ifdef __cplusplus extern "C" { #endif /* STAT_TIMESPEC (ST, ST_XTIM) is the ST_XTIM member for *ST of type struct timespec, if available. If not, then STAT_TIMESPEC_NS (ST, ST_XTIM) is the nanosecond component of the ST_XTIM member for *ST, if available. ST_XTIM can be st_atim, st_ctim, st_mtim, or st_birthtim for access, status change, data modification, or birth (creation) time respectively. These macros are private to stat-time.h. */ #if _GL_WINDOWS_STAT_TIMESPEC || defined HAVE_STRUCT_STAT_ST_ATIM_TV_NSEC # if _GL_WINDOWS_STAT_TIMESPEC || defined TYPEOF_STRUCT_STAT_ST_ATIM_IS_STRUCT_TIMESPEC # define STAT_TIMESPEC(st, st_xtim) ((st)->st_xtim) # define STAT_TIMESPEC_OFFSETOF(st_xtim) offsetof (struct stat, st_xtim) # else # define STAT_TIMESPEC_NS(st, st_xtim) ((st)->st_xtim.tv_nsec) # endif #elif defined HAVE_STRUCT_STAT_ST_ATIMESPEC_TV_NSEC # define STAT_TIMESPEC(st, st_xtim) ((st)->st_xtim##espec) # define STAT_TIMESPEC_OFFSETOF(st_xtim) offsetof (struct stat, st_xtim##espec) #elif defined HAVE_STRUCT_STAT_ST_ATIMENSEC # define STAT_TIMESPEC_NS(st, st_xtim) ((st)->st_xtim##ensec) #elif defined HAVE_STRUCT_STAT_ST_ATIM_ST__TIM_TV_NSEC # define STAT_TIMESPEC_NS(st, st_xtim) ((st)->st_xtim.st__tim.tv_nsec) #endif /* Return the nanosecond component of *ST's access time. */ _GL_STAT_TIME_INLINE long int _GL_ATTRIBUTE_PURE get_stat_atime_ns (struct stat const *st) { # if defined STAT_TIMESPEC return STAT_TIMESPEC (st, st_atim).tv_nsec; # elif defined STAT_TIMESPEC_NS return STAT_TIMESPEC_NS (st, st_atim); # else return 0; # endif } /* Return the nanosecond component of *ST's status change time. */ _GL_STAT_TIME_INLINE long int _GL_ATTRIBUTE_PURE get_stat_ctime_ns (struct stat const *st) { # if defined STAT_TIMESPEC return STAT_TIMESPEC (st, st_ctim).tv_nsec; # elif defined STAT_TIMESPEC_NS return STAT_TIMESPEC_NS (st, st_ctim); # else return 0; # endif } /* Return the nanosecond component of *ST's data modification time. */ _GL_STAT_TIME_INLINE long int _GL_ATTRIBUTE_PURE get_stat_mtime_ns (struct stat const *st) { # if defined STAT_TIMESPEC return STAT_TIMESPEC (st, st_mtim).tv_nsec; # elif defined STAT_TIMESPEC_NS return STAT_TIMESPEC_NS (st, st_mtim); # else return 0; # endif } /* Return the nanosecond component of *ST's birth time. */ _GL_STAT_TIME_INLINE long int _GL_ATTRIBUTE_PURE get_stat_birthtime_ns (_GL_UNUSED struct stat const *st) { # if defined HAVE_STRUCT_STAT_ST_BIRTHTIMESPEC_TV_NSEC return STAT_TIMESPEC (st, st_birthtim).tv_nsec; # elif defined HAVE_STRUCT_STAT_ST_BIRTHTIMENSEC return STAT_TIMESPEC_NS (st, st_birthtim); # else return 0; # endif } /* Return *ST's access time. */ _GL_STAT_TIME_INLINE struct timespec _GL_ATTRIBUTE_PURE get_stat_atime (struct stat const *st) { #ifdef STAT_TIMESPEC return STAT_TIMESPEC (st, st_atim); #else return (struct timespec) { .tv_sec = st->st_atime, .tv_nsec = get_stat_atime_ns (st) }; #endif } /* Return *ST's status change time. */ _GL_STAT_TIME_INLINE struct timespec _GL_ATTRIBUTE_PURE get_stat_ctime (struct stat const *st) { #ifdef STAT_TIMESPEC return STAT_TIMESPEC (st, st_ctim); #else return (struct timespec) { .tv_sec = st->st_ctime, .tv_nsec = get_stat_ctime_ns (st) }; #endif } /* Return *ST's data modification time. */ _GL_STAT_TIME_INLINE struct timespec _GL_ATTRIBUTE_PURE get_stat_mtime (struct stat const *st) { #ifdef STAT_TIMESPEC return STAT_TIMESPEC (st, st_mtim); #else return (struct timespec) { .tv_sec = st->st_mtime, .tv_nsec = get_stat_mtime_ns (st) }; #endif } /* Return *ST's birth time, if available; otherwise return a value with tv_sec and tv_nsec both equal to -1. */ _GL_STAT_TIME_INLINE struct timespec _GL_ATTRIBUTE_PURE get_stat_birthtime (_GL_UNUSED struct stat const *st) { struct timespec t; #if (defined HAVE_STRUCT_STAT_ST_BIRTHTIMESPEC_TV_NSEC \ || defined HAVE_STRUCT_STAT_ST_BIRTHTIM_TV_NSEC) t = STAT_TIMESPEC (st, st_birthtim); #elif defined HAVE_STRUCT_STAT_ST_BIRTHTIMENSEC t = (struct timespec) { .tv_sec = st->st_birthtime, .tv_nsec = st->st_birthtimensec }; #elif defined _WIN32 && ! defined __CYGWIN__ /* Native Windows platforms (but not Cygwin) put the "file creation time" in st_ctime (!). See . */ # if _GL_WINDOWS_STAT_TIMESPEC t = st->st_ctim; # else t = (struct timespec) { .tv_sec = st->st_ctime }; # endif #else /* Birth time is not supported. */ t = (struct timespec) { .tv_sec = -1, .tv_nsec = -1 }; #endif #if (defined HAVE_STRUCT_STAT_ST_BIRTHTIMESPEC_TV_NSEC \ || defined HAVE_STRUCT_STAT_ST_BIRTHTIM_TV_NSEC \ || defined HAVE_STRUCT_STAT_ST_BIRTHTIMENSEC) /* FreeBSD and NetBSD sometimes signal the absence of knowledge by using zero. Attempt to work around this problem. Alas, this can report failure even for valid timestamps. Also, NetBSD sometimes returns junk in the birth time fields; work around this bug if it is detected. */ if (! (t.tv_sec && 0 <= t.tv_nsec && t.tv_nsec < 1000000000)) t = (struct timespec) { .tv_sec = -1, .tv_nsec = -1 }; #endif return t; } /* If a stat-like function returned RESULT, normalize the timestamps in *ST, if this platform suffers from a macOS and Solaris bug where tv_nsec might be negative. Return the adjusted RESULT, setting errno to EOVERFLOW if normalization overflowed. This function is intended to be private to this .h file. */ _GL_STAT_TIME_INLINE int stat_time_normalize (int result, _GL_UNUSED struct stat *st) { #if (((defined __APPLE__ && defined __MACH__) || defined __sun) \ && defined STAT_TIMESPEC_OFFSETOF) if (result == 0) { long int timespec_hz = 1000000000; short int const ts_off[] = { STAT_TIMESPEC_OFFSETOF (st_atim), STAT_TIMESPEC_OFFSETOF (st_mtim), STAT_TIMESPEC_OFFSETOF (st_ctim) }; int i; for (i = 0; i < sizeof ts_off / sizeof *ts_off; i++) { struct timespec *ts = (struct timespec *) ((char *) st + ts_off[i]); long int q = ts->tv_nsec / timespec_hz; long int r = ts->tv_nsec % timespec_hz; if (r < 0) { r += timespec_hz; q--; } ts->tv_nsec = r; /* Overflow is possible, as Solaris 11 stat can yield tv_sec == TYPE_MINIMUM (time_t) && tv_nsec == -1000000000. */ if (ckd_add (&ts->tv_sec, q, ts->tv_sec)) { errno = EOVERFLOW; return -1; } } } #endif return result; } #ifdef __cplusplus } #endif _GL_INLINE_HEADER_END #endif libffcall-2.5/gnulib-lib/stat-w32.c0000664000000000000000000004420714631432055013755 00000000000000/* Core of implementation of fstat and stat for native Windows. Copyright (C) 2017-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible. */ #include #if defined _WIN32 && ! defined __CYGWIN__ /* Attempt to make define FILE_ID_INFO. But ensure that the redefinition of _WIN32_WINNT does not make us assume Windows Vista or newer when building for an older version of Windows. */ #if HAVE_SDKDDKVER_H # include # if _WIN32_WINNT >= _WIN32_WINNT_VISTA # define WIN32_ASSUME_VISTA 1 # else # define WIN32_ASSUME_VISTA 0 # endif # if !defined _WIN32_WINNT || (_WIN32_WINNT < _WIN32_WINNT_WIN8) # undef _WIN32_WINNT # define _WIN32_WINNT _WIN32_WINNT_WIN8 # endif #else # define WIN32_ASSUME_VISTA (_WIN32_WINNT >= _WIN32_WINNT_VISTA) #endif #include #include #include #include #include #include #include /* Specification. */ #include "stat-w32.h" #include "pathmax.h" /* Don't assume that UNICODE is not defined. */ #undef LoadLibrary #define LoadLibrary LoadLibraryA #undef GetFinalPathNameByHandle #define GetFinalPathNameByHandle GetFinalPathNameByHandleA /* Older mingw headers do not define VOLUME_NAME_NONE. */ #ifndef VOLUME_NAME_NONE # define VOLUME_NAME_NONE 4 #endif #if !WIN32_ASSUME_VISTA /* Avoid warnings from gcc -Wcast-function-type. */ # define GetProcAddress \ (void *) GetProcAddress # if _GL_WINDOWS_STAT_INODES == 2 /* GetFileInformationByHandleEx was introduced only in Windows Vista. */ typedef DWORD (WINAPI * GetFileInformationByHandleExFuncType) (HANDLE hFile, FILE_INFO_BY_HANDLE_CLASS fiClass, LPVOID lpBuffer, DWORD dwBufferSize); static GetFileInformationByHandleExFuncType GetFileInformationByHandleExFunc = NULL; # endif /* GetFinalPathNameByHandle was introduced only in Windows Vista. */ typedef DWORD (WINAPI * GetFinalPathNameByHandleFuncType) (HANDLE hFile, LPSTR lpFilePath, DWORD lenFilePath, DWORD dwFlags); static GetFinalPathNameByHandleFuncType GetFinalPathNameByHandleFunc = NULL; static BOOL initialized = FALSE; static void initialize (void) { HMODULE kernel32 = LoadLibrary ("kernel32.dll"); if (kernel32 != NULL) { # if _GL_WINDOWS_STAT_INODES == 2 GetFileInformationByHandleExFunc = (GetFileInformationByHandleExFuncType) GetProcAddress (kernel32, "GetFileInformationByHandleEx"); # endif GetFinalPathNameByHandleFunc = (GetFinalPathNameByHandleFuncType) GetProcAddress (kernel32, "GetFinalPathNameByHandleA"); } initialized = TRUE; } #else # define GetFileInformationByHandleExFunc GetFileInformationByHandleEx # define GetFinalPathNameByHandleFunc GetFinalPathNameByHandle #endif /* Converts a FILETIME to GMT time since 1970-01-01 00:00:00. */ #if _GL_WINDOWS_STAT_TIMESPEC struct timespec _gl_convert_FILETIME_to_timespec (const FILETIME *ft) { struct timespec result; /* FILETIME: */ unsigned long long since_1601 = ((unsigned long long) ft->dwHighDateTime << 32) | (unsigned long long) ft->dwLowDateTime; if (since_1601 == 0) { result.tv_sec = 0; result.tv_nsec = 0; } else { /* Between 1601-01-01 and 1970-01-01 there were 280 normal years and 89 leap years, in total 134774 days. */ unsigned long long since_1970 = since_1601 - (unsigned long long) 134774 * (unsigned long long) 86400 * (unsigned long long) 10000000; result.tv_sec = since_1970 / (unsigned long long) 10000000; result.tv_nsec = (unsigned long) (since_1970 % (unsigned long long) 10000000) * 100; } return result; } #else time_t _gl_convert_FILETIME_to_POSIX (const FILETIME *ft) { /* FILETIME: */ unsigned long long since_1601 = ((unsigned long long) ft->dwHighDateTime << 32) | (unsigned long long) ft->dwLowDateTime; if (since_1601 == 0) return 0; else { /* Between 1601-01-01 and 1970-01-01 there were 280 normal years and 89 leap years, in total 134774 days. */ unsigned long long since_1970 = since_1601 - (unsigned long long) 134774 * (unsigned long long) 86400 * (unsigned long long) 10000000; return since_1970 / (unsigned long long) 10000000; } } #endif /* Fill *BUF with information about the file designated by H. PATH is the file name, if known, otherwise NULL. Return 0 if successful, or -1 with errno set upon failure. */ int _gl_fstat_by_handle (HANDLE h, const char *path, struct stat *buf) { /* GetFileType */ DWORD type = GetFileType (h); if (type == FILE_TYPE_DISK) { #if !WIN32_ASSUME_VISTA if (!initialized) initialize (); #endif /* st_mode can be determined through GetFileAttributesEx or through GetFileInformationByHandle or through GetFileInformationByHandleEx with argument FileBasicInfo The latter requires -D_WIN32_WINNT=_WIN32_WINNT_VISTA or higher. */ BY_HANDLE_FILE_INFORMATION info; if (! GetFileInformationByHandle (h, &info)) goto failed; /* Test for error conditions before starting to fill *buf. */ if (sizeof (buf->st_size) <= 4 && info.nFileSizeHigh > 0) { errno = EOVERFLOW; return -1; } #if _GL_WINDOWS_STAT_INODES /* st_ino can be determined through GetFileInformationByHandle as 64 bits, or through GetFileInformationByHandleEx with argument FileIdInfo as 128 bits. The latter requires -D_WIN32_WINNT=_WIN32_WINNT_WIN8 or higher. */ /* Experiments show that GetFileInformationByHandleEx does not provide much more information than GetFileInformationByHandle: * The dwVolumeSerialNumber from GetFileInformationByHandle is equal to the low 32 bits of the 64-bit VolumeSerialNumber from GetFileInformationByHandleEx, and is apparently sufficient for identifying the device. * The nFileIndex from GetFileInformationByHandle is equal to the low 64 bits of the 128-bit FileId from GetFileInformationByHandleEx, and the high 64 bits of this 128-bit FileId are zero. * On a FAT file system, GetFileInformationByHandleEx fails with error ERROR_INVALID_PARAMETER, whereas GetFileInformationByHandle succeeds. * On a CIFS/SMB file system, GetFileInformationByHandleEx fails with error ERROR_INVALID_LEVEL, whereas GetFileInformationByHandle succeeds. */ # if _GL_WINDOWS_STAT_INODES == 2 if (GetFileInformationByHandleExFunc != NULL) { FILE_ID_INFO id; if (GetFileInformationByHandleExFunc (h, FileIdInfo, &id, sizeof (id))) { buf->st_dev = id.VolumeSerialNumber; static_assert (sizeof (ino_t) == sizeof (id.FileId)); memcpy (&buf->st_ino, &id.FileId, sizeof (ino_t)); goto ino_done; } else { switch (GetLastError ()) { case ERROR_INVALID_PARAMETER: /* older Windows version, or FAT */ case ERROR_INVALID_LEVEL: /* CIFS/SMB file system */ goto fallback; default: goto failed; } } } fallback: ; /* Fallback for older Windows versions. */ buf->st_dev = info.dwVolumeSerialNumber; buf->st_ino._gl_ino[0] = ((ULONGLONG) info.nFileIndexHigh << 32) | (ULONGLONG) info.nFileIndexLow; buf->st_ino._gl_ino[1] = 0; ino_done: ; # else /* _GL_WINDOWS_STAT_INODES == 1 */ buf->st_dev = info.dwVolumeSerialNumber; buf->st_ino = ((ULONGLONG) info.nFileIndexHigh << 32) | (ULONGLONG) info.nFileIndexLow; # endif #else /* st_ino is not wide enough for identifying a file on a device. Without st_ino, st_dev is pointless. */ buf->st_dev = 0; buf->st_ino = 0; #endif /* st_mode. */ unsigned int mode = /* XXX How to handle FILE_ATTRIBUTE_REPARSE_POINT ? */ ((info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? _S_IFDIR | S_IEXEC_UGO : _S_IFREG) | S_IREAD_UGO | ((info.dwFileAttributes & FILE_ATTRIBUTE_READONLY) ? 0 : S_IWRITE_UGO); if (!(info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) { /* Determine whether the file is executable by looking at the file name suffix. If the file name is already known, use it. Otherwise, for non-empty files, it can be determined through GetFinalPathNameByHandle or through GetFileInformationByHandleEx with argument FileNameInfo Both require -D_WIN32_WINNT=_WIN32_WINNT_VISTA or higher. */ if (info.nFileSizeHigh > 0 || info.nFileSizeLow > 0) { char fpath[PATH_MAX]; if (path != NULL || (GetFinalPathNameByHandleFunc != NULL && GetFinalPathNameByHandleFunc (h, fpath, sizeof (fpath), VOLUME_NAME_NONE) < sizeof (fpath) && (path = fpath, 1))) { const char *last_dot = NULL; const char *p; for (p = path; *p != '\0'; p++) if (*p == '.') last_dot = p; if (last_dot != NULL) { const char *suffix = last_dot + 1; if (_stricmp (suffix, "exe") == 0 || _stricmp (suffix, "bat") == 0 || _stricmp (suffix, "cmd") == 0 || _stricmp (suffix, "com") == 0) mode |= S_IEXEC_UGO; } } else /* Cannot determine file name. Pretend that it is executable. */ mode |= S_IEXEC_UGO; } } buf->st_mode = mode; /* st_nlink can be determined through GetFileInformationByHandle or through GetFileInformationByHandleEx with argument FileStandardInfo The latter requires -D_WIN32_WINNT=_WIN32_WINNT_VISTA or higher. */ buf->st_nlink = (info.nNumberOfLinks > SHRT_MAX ? SHRT_MAX : info.nNumberOfLinks); /* There's no easy way to map the Windows SID concept to an integer. */ buf->st_uid = 0; buf->st_gid = 0; /* st_rdev is irrelevant for normal files and directories. */ buf->st_rdev = 0; /* st_size can be determined through GetFileSizeEx or through GetFileAttributesEx or through GetFileInformationByHandle or through GetFileInformationByHandleEx with argument FileStandardInfo The latter requires -D_WIN32_WINNT=_WIN32_WINNT_VISTA or higher. */ if (sizeof (buf->st_size) <= 4) /* Range check already done above. */ buf->st_size = info.nFileSizeLow; else buf->st_size = ((long long) info.nFileSizeHigh << 32) | (long long) info.nFileSizeLow; /* st_atime, st_mtime, st_ctime can be determined through GetFileTime or through GetFileAttributesEx or through GetFileInformationByHandle or through GetFileInformationByHandleEx with argument FileBasicInfo The latter requires -D_WIN32_WINNT=_WIN32_WINNT_VISTA or higher. */ #if _GL_WINDOWS_STAT_TIMESPEC buf->st_atim = _gl_convert_FILETIME_to_timespec (&info.ftLastAccessTime); buf->st_mtim = _gl_convert_FILETIME_to_timespec (&info.ftLastWriteTime); buf->st_ctim = _gl_convert_FILETIME_to_timespec (&info.ftCreationTime); #else buf->st_atime = _gl_convert_FILETIME_to_POSIX (&info.ftLastAccessTime); buf->st_mtime = _gl_convert_FILETIME_to_POSIX (&info.ftLastWriteTime); buf->st_ctime = _gl_convert_FILETIME_to_POSIX (&info.ftCreationTime); #endif return 0; } else if (type == FILE_TYPE_CHAR || type == FILE_TYPE_PIPE) { buf->st_dev = 0; #if _GL_WINDOWS_STAT_INODES == 2 buf->st_ino._gl_ino[0] = buf->st_ino._gl_ino[1] = 0; #else buf->st_ino = 0; #endif buf->st_mode = (type == FILE_TYPE_PIPE ? _S_IFIFO : _S_IFCHR); buf->st_nlink = 1; buf->st_uid = 0; buf->st_gid = 0; buf->st_rdev = 0; if (type == FILE_TYPE_PIPE) { /* PeekNamedPipe */ DWORD bytes_available; if (PeekNamedPipe (h, NULL, 0, NULL, &bytes_available, NULL)) buf->st_size = bytes_available; else buf->st_size = 0; } else buf->st_size = 0; #if _GL_WINDOWS_STAT_TIMESPEC buf->st_atim.tv_sec = 0; buf->st_atim.tv_nsec = 0; buf->st_mtim.tv_sec = 0; buf->st_mtim.tv_nsec = 0; buf->st_ctim.tv_sec = 0; buf->st_ctim.tv_nsec = 0; #else buf->st_atime = 0; buf->st_mtime = 0; buf->st_ctime = 0; #endif return 0; } else { errno = ENOENT; return -1; } failed: { DWORD error = GetLastError (); #if 0 fprintf (stderr, "_gl_fstat_by_handle error 0x%x\n", (unsigned int) error); #endif switch (error) { case ERROR_ACCESS_DENIED: case ERROR_SHARING_VIOLATION: errno = EACCES; break; case ERROR_OUTOFMEMORY: errno = ENOMEM; break; case ERROR_WRITE_FAULT: case ERROR_READ_FAULT: case ERROR_GEN_FAILURE: errno = EIO; break; default: errno = EINVAL; break; } return -1; } } #else /* This declaration is solely to ensure that after preprocessing this file is never empty. */ typedef int dummy; #endif libffcall-2.5/gnulib-lib/windows-recmutex.h0000664000000000000000000000367514631432055015726 00000000000000/* Plain recursive mutexes (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #ifndef _WINDOWS_RECMUTEX_H #define _WINDOWS_RECMUTEX_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include #include "windows-initguard.h" /* The native Windows documentation says that CRITICAL_SECTION already implements a recursive lock. But we need not rely on it: It's easy to implement a recursive lock without this assumption. */ typedef struct { glwthread_initguard_t guard; /* protects the initialization */ DWORD owner; unsigned long depth; CRITICAL_SECTION lock; } glwthread_recmutex_t; #define GLWTHREAD_RECMUTEX_INIT { GLWTHREAD_INITGUARD_INIT, 0, 0 } #ifdef __cplusplus extern "C" { #endif extern void glwthread_recmutex_init (glwthread_recmutex_t *mutex); extern int glwthread_recmutex_lock (glwthread_recmutex_t *mutex); extern int glwthread_recmutex_trylock (glwthread_recmutex_t *mutex); extern int glwthread_recmutex_unlock (glwthread_recmutex_t *mutex); extern int glwthread_recmutex_destroy (glwthread_recmutex_t *mutex); #ifdef __cplusplus } #endif #endif /* _WINDOWS_RECMUTEX_H */ libffcall-2.5/gnulib-lib/stdnoreturn.in.h0000664000000000000000000000447014631432055015370 00000000000000/* A substitute for ISO C11 . Copyright 2012-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Paul Eggert. */ /* This file uses _Noreturn. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #ifndef noreturn /* ISO C11 for platforms that lack it. References: ISO C11 (latest free draft ) section 7.23 is obsolescent in C23, so new code should avoid it. */ /* The definition of _Noreturn is copied here. */ #if 1200 <= _MSC_VER || defined __CYGWIN__ /* On MSVC, standard include files contain declarations like __declspec (noreturn) void abort (void); "#define noreturn _Noreturn" would cause this declaration to be rewritten to the invalid __declspec (__declspec (noreturn)) void abort (void); Similarly, on Cygwin, standard include files contain declarations like void __cdecl abort (void) __attribute__ ((noreturn)); "#define noreturn _Noreturn" would cause this declaration to be rewritten to the invalid void __cdecl abort (void) __attribute__ ((__attribute__ ((__noreturn__)))); Instead, define noreturn to empty, so that such declarations are rewritten to __declspec () void abort (void); or void __cdecl abort (void) __attribute__ (()); respectively. This gives up on noreturn's advice to the compiler but at least it is valid code. */ # define noreturn /*empty*/ #else # define noreturn _Noreturn #endif /* Did he ever return? No he never returned And his fate is still unlearn'd ... -- Steiner J, Hawes BL. M.T.A. (1949) */ #endif /* noreturn */ libffcall-2.5/gnulib-lib/malloca.h0000664000000000000000000001262214631432055014002 00000000000000/* Safe automatic memory allocation. Copyright (C) 2003-2007, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2003. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _MALLOCA_H #define _MALLOCA_H /* This file uses _GL_ATTRIBUTE_ALLOC_SIZE, _GL_ATTRIBUTE_DEALLOC, _GL_ATTRIBUTE_MALLOC, HAVE_ALLOCA. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #include #include #include #if defined __CHERI_PURE_CAPABILITY__ # include #endif #include "xalloc-oversized.h" #ifdef __cplusplus extern "C" { #endif /* safe_alloca(N) is equivalent to alloca(N) when it is safe to call alloca(N); otherwise it returns NULL. It either returns N bytes of memory allocated on the stack, that lasts until the function returns, or NULL. Use of safe_alloca should be avoided: - inside arguments of function calls - undefined behaviour, - in inline functions - the allocation may actually last until the calling function returns. */ #if HAVE_ALLOCA /* The OS usually guarantees only one guard page at the bottom of the stack, and a page size can be as small as 4096 bytes. So we cannot safely allocate anything larger than 4096 bytes. Also care for the possibility of a few compiler-allocated temporary stack slots. This must be a macro, not a function. */ # define safe_alloca(N) ((N) < 4032 ? alloca (N) : NULL) #else # define safe_alloca(N) ((void) (N), NULL) #endif /* Free a block of memory allocated through malloca(). */ #if HAVE_ALLOCA extern void freea (void *p); #else # define freea free #endif /* malloca(N) is a safe variant of alloca(N). It allocates N bytes of memory allocated on the stack, that must be freed using freea() before the function returns. Upon failure, it returns NULL. */ #if HAVE_ALLOCA # if defined __CHERI_PURE_CAPABILITY__ # define malloca(N) \ ((N) < 4032 - (2 * sa_alignment_max - 1) \ ? cheri_bounds_set ((void *) (((uintptr_t) \ (char *) \ alloca ((N) + 2 * sa_alignment_max - 1) \ + (2 * sa_alignment_max - 1)) \ & ~(uintptr_t)(2 * sa_alignment_max - 1)), \ (N)) \ : mmalloca (N)) # else # define malloca(N) \ ((N) < 4032 - (2 * sa_alignment_max - 1) \ ? (void *) (((uintptr_t) (char *) alloca ((N) + 2 * sa_alignment_max - 1) \ + (2 * sa_alignment_max - 1)) \ & ~(uintptr_t)(2 * sa_alignment_max - 1)) \ : mmalloca (N)) # endif #else # define malloca(N) \ mmalloca (N) #endif extern void *mmalloca (size_t n) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC (freea, 1) _GL_ATTRIBUTE_ALLOC_SIZE ((1)); /* nmalloca(N,S) is an overflow-safe variant of malloca (N * S). It allocates an array of N objects, each with S bytes of memory, on the stack. N and S should be nonnegative and free of side effects. The array must be freed using freea() before the function returns. */ #define nmalloca(n, s) \ (xalloc_oversized (n, s) ? NULL : malloca ((n) * (size_t) (s))) #ifdef __cplusplus } #endif /* ------------------- Auxiliary, non-public definitions ------------------- */ /* Determine the alignment of a type at compile time. */ #if defined __GNUC__ || defined __clang__ || defined __IBM__ALIGNOF__ # define sa_alignof __alignof__ #elif defined __cplusplus template struct sa_alignof_helper { char __slot1; type __slot2; }; # define sa_alignof(type) offsetof (sa_alignof_helper, __slot2) #elif defined __hpux /* Work around a HP-UX 10.20 cc bug with enums constants defined as offsetof values. */ # define sa_alignof(type) (sizeof (type) <= 4 ? 4 : 8) #elif defined _AIX /* Work around an AIX 3.2.5 xlc bug with enums constants defined as offsetof values. */ # define sa_alignof(type) (sizeof (type) <= 4 ? 4 : 8) #else # define sa_alignof(type) offsetof (struct { char __slot1; type __slot2; }, __slot2) #endif enum { /* The desired alignment of memory allocations is the maximum alignment among all elementary types. */ sa_alignment_long = sa_alignof (long), sa_alignment_double = sa_alignof (double), sa_alignment_longlong = sa_alignof (long long), sa_alignment_longdouble = sa_alignof (long double), sa_alignment_max = ((sa_alignment_long - 1) | (sa_alignment_double - 1) | (sa_alignment_longlong - 1) | (sa_alignment_longdouble - 1) ) + 1 }; #endif /* _MALLOCA_H */ libffcall-2.5/gnulib-lib/windows-once.c0000664000000000000000000001132014631432055014773 00000000000000/* Once-only control (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #include /* Specification. */ #include "windows-once.h" #include void glwthread_once (glwthread_once_t *once_control, void (*initfunction) (void)) { if (once_control->inited <= 0) { InterlockedIncrement (&once_control->num_threads); /* If once_control->started is == -1, set it to 0. */ if (InterlockedCompareExchange (&once_control->started, 0, -1) < 0) { /* This thread is the first one to come to this once_control. */ InitializeCriticalSection (&once_control->lock); EnterCriticalSection (&once_control->lock); once_control->inited = 0; initfunction (); once_control->inited = 1; LeaveCriticalSection (&once_control->lock); } else { /* Some other thread has already started the initialization. Yield the CPU while waiting for the other thread to finish initializing and taking the lock. */ while (once_control->inited < 0) Sleep (0); if (once_control->inited <= 0) { /* Take the lock. This blocks until the other thread has finished calling the initfunction. */ EnterCriticalSection (&once_control->lock); LeaveCriticalSection (&once_control->lock); if (!(once_control->inited > 0)) abort (); } } /* Here once_control->started == 0 and once_control->inited > 0. */ if (InterlockedDecrement (&once_control->num_threads) == 0) /* once_control->num_threads is now zero, and once_control->started == 0 and once_control->inited > 0. No other thread will need to use the lock. We can therefore destroy the lock, to free resources. */ /* If once_control->inited is == 1, set it to 2. */ if (InterlockedCompareExchange (&once_control->inited, 2, 1) == 1) DeleteCriticalSection (&once_control->lock); } /* Proof of correctness: * num_threads is incremented and then decremented by some threads. Therefore, num_threads always stays >= 0, and is == 0 at the end. * The first thread to go through the once_control->started fence initializes the lock and moves inited from <= 0 to > 0. The other threads don't move inited from <= 0 to > 0. * started, once == 0, stays == 0. * inited, once > 0, stays > 0 (since at the place where it is assigned 0, it cannot be > 0). * inited does not change any more once it is 2. Therefore, it can be changed from 1 to 2 only once. * DeleteCriticalSection gets invoked right after inited has been changed from 1 to 2. Therefore, DeleteCriticalSection gets invoked only once. * After a moment where num_threads was 0 and started was 0 and inited was > 0, no thread can reach an InitializeCriticalSection or EnterCriticalSection invocation. Proof: - At such a moment, no thread is in the code range between InterlockedIncrement (&once_control->num_threads) and InterlockedDecrement (&once_control->num_threads) - After such a moment, some thread can increment num_threads, but from there they cannot reach the InitializeCriticalSection invocation, because the once_control->started test prevents that, and they cannot reach the EnterCriticalSection invocation in the other branch because the if (once_control->inited <= 0) test prevents that. * From this it follows that: - DeleteCriticalSection cannot be executed while the lock is taken (because DeleteCriticalSection is only executed after a moment where num_threads was 0 and started was 0 and inited was > 0). - Once DeleteCriticalSection has been executed, the lock is not used any more. */ } libffcall-2.5/gnulib-lib/idx.h0000664000000000000000000001217114631432055013155 00000000000000/* A type for indices and sizes. Copyright (C) 2020-2024 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see . */ #ifndef _IDX_H #define _IDX_H /* Get ptrdiff_t. */ #include /* Get PTRDIFF_MAX. */ #include /* The type 'idx_t' holds an (array) index or an (object) size. Its implementation promotes to a signed integer type, which can hold the values 0..2^63-1 (on 64-bit platforms) or 0..2^31-1 (on 32-bit platforms). Why a signed integer type? * Security: Signed types can be checked for overflow via '-fsanitize=undefined', but unsigned types cannot. * Comparisons without surprises: ISO C99 § 6.3.1.8 specifies a few surprising results for comparisons, such as (int) -3 < (unsigned long) 7 => false (int) -3 < (unsigned int) 7 => false and on 32-bit machines: (long) -3 < (unsigned int) 7 => false This is surprising because the natural comparison order is by value in the realm of infinite-precision signed integers (ℤ). The best way to get rid of such surprises is to use signed types for numerical integer values, and use unsigned types only for bit masks and enums. Why not use 'size_t' directly? * Because 'size_t' is an unsigned type, and a signed type is better. See above. Why not use 'ssize_t'? * 'ptrdiff_t' is more portable; it is standardized by ISO C whereas 'ssize_t' is standardized only by POSIX. * 'ssize_t' is not required to be as wide as 'size_t', and some now-obsolete POSIX platforms had 'size_t' wider than 'ssize_t'. * Conversely, some now-obsolete platforms had 'ptrdiff_t' wider than 'size_t', which can be a win and conforms to POSIX. Won't this cause a problem with objects larger than PTRDIFF_MAX? * Typical modern or large platforms do not allocate such objects, so this is not much of a problem in practice; for example, you can safely write 'idx_t len = strlen (s);'. To port to older small platforms where allocations larger than PTRDIFF_MAX could in theory be a problem, you can use Gnulib's ialloc module, or functions like ximalloc in Gnulib's xalloc module. Why not use 'ptrdiff_t' directly? * Maintainability: When reading and modifying code, it helps to know that a certain variable cannot have negative values. For example, when you have a loop int n = ...; for (int i = 0; i < n; i++) ... or ptrdiff_t n = ...; for (ptrdiff_t i = 0; i < n; i++) ... you have to ask yourself "what if n < 0?". Whereas in idx_t n = ...; for (idx_t i = 0; i < n; i++) ... you know that this case cannot happen. Similarly, when a programmer writes idx_t = ptr2 - ptr1; there is an implied assertion that ptr1 and ptr2 point into the same object and that ptr1 <= ptr2. * Being future-proof: In the future, range types (integers which are constrained to a certain range of values) may be added to C compilers or to the C standard. Several programming languages (Ada, Haskell, Common Lisp, Pascal) already have range types. Such range types may help producing good code and good warnings. The type 'idx_t' could then be typedef'ed to a range type that is signed after promotion. */ #ifdef __cplusplus extern "C" { #endif /* In the future, idx_t could be typedef'ed to a signed range type. The clang "extended integer types", supported in Clang 11 or newer , are a special case of range types. However, these types don't support binary operators with plain integer types (e.g. expressions such as x > 1). Therefore, they don't behave like signed types (and not like unsigned types either). So, we cannot use them here. */ /* Use the signed type 'ptrdiff_t'. */ /* Note: ISO C does not mandate that 'size_t' and 'ptrdiff_t' have the same size, but it is so on all platforms we have seen since 1990. */ typedef ptrdiff_t idx_t; /* IDX_MAX is the maximum value of an idx_t. */ #define IDX_MAX PTRDIFF_MAX /* So far no need has been found for an IDX_WIDTH macro. Perhaps there should be another macro IDX_VALUE_BITS that does not count the sign bit and is therefore one less than PTRDIFF_WIDTH. */ #ifdef __cplusplus } #endif #endif /* _IDX_H */ libffcall-2.5/gnulib-lib/getprogname.h0000664000000000000000000000171014631432055014676 00000000000000/* Program name management. Copyright (C) 2016-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_GETPROGNAME_H #define _GL_GETPROGNAME_H #include #if __GNUC__ || (__clang_major__ >= 4) # warning "The include file getprogname.h is deprecated. Use instead." #endif #endif libffcall-2.5/gnulib-lib/fcntl.c0000664000000000000000000004462114631432055013477 00000000000000/* Provide file descriptor control. Copyright (C) 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Eric Blake . */ #include /* Specification. */ #include #include #include #include #include #include #ifdef __KLIBC__ # define INCL_DOS # include #endif #if defined _WIN32 && ! defined __CYGWIN__ /* Get declarations of the native Windows API functions. */ # define WIN32_LEAN_AND_MEAN # include /* Get _get_osfhandle. */ # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif /* Upper bound on getdtablesize(). See lib/getdtablesize.c. */ # define OPEN_MAX_MAX 0x10000 /* Duplicate OLDFD into the first available slot of at least NEWFD, which must be positive, with FLAGS determining whether the duplicate will be inheritable. */ static int dupfd (int oldfd, int newfd, int flags) { /* Mingw has no way to create an arbitrary fd. Iterate until all file descriptors less than newfd are filled up. */ HANDLE curr_process = GetCurrentProcess (); HANDLE old_handle = (HANDLE) _get_osfhandle (oldfd); unsigned char fds_to_close[OPEN_MAX_MAX / CHAR_BIT]; unsigned int fds_to_close_bound = 0; int result; BOOL inherit = flags & O_CLOEXEC ? FALSE : TRUE; int mode; if (newfd < 0 || getdtablesize () <= newfd) { errno = EINVAL; return -1; } if (old_handle == INVALID_HANDLE_VALUE || (mode = _setmode (oldfd, O_BINARY)) == -1) { /* oldfd is not open, or is an unassigned standard file descriptor. */ errno = EBADF; return -1; } _setmode (oldfd, mode); flags |= mode; for (;;) { HANDLE new_handle; int duplicated_fd; unsigned int index; if (!DuplicateHandle (curr_process, /* SourceProcessHandle */ old_handle, /* SourceHandle */ curr_process, /* TargetProcessHandle */ (PHANDLE) &new_handle, /* TargetHandle */ (DWORD) 0, /* DesiredAccess */ inherit, /* InheritHandle */ DUPLICATE_SAME_ACCESS)) /* Options */ { switch (GetLastError ()) { case ERROR_TOO_MANY_OPEN_FILES: errno = EMFILE; break; case ERROR_INVALID_HANDLE: case ERROR_INVALID_TARGET_HANDLE: case ERROR_DIRECT_ACCESS_HANDLE: errno = EBADF; break; case ERROR_INVALID_PARAMETER: case ERROR_INVALID_FUNCTION: case ERROR_INVALID_ACCESS: errno = EINVAL; break; default: errno = EACCES; break; } result = -1; break; } duplicated_fd = _open_osfhandle ((intptr_t) new_handle, flags); if (duplicated_fd < 0) { CloseHandle (new_handle); result = -1; break; } if (newfd <= duplicated_fd) { result = duplicated_fd; break; } /* Set the bit duplicated_fd in fds_to_close[]. */ index = (unsigned int) duplicated_fd / CHAR_BIT; if (fds_to_close_bound <= index) { if (sizeof fds_to_close <= index) /* Need to increase OPEN_MAX_MAX. */ abort (); memset (fds_to_close + fds_to_close_bound, '\0', index + 1 - fds_to_close_bound); fds_to_close_bound = index + 1; } fds_to_close[index] |= 1 << ((unsigned int) duplicated_fd % CHAR_BIT); } /* Close the previous fds that turned out to be too small. */ { int saved_errno = errno; unsigned int duplicated_fd; for (duplicated_fd = 0; duplicated_fd < fds_to_close_bound * CHAR_BIT; duplicated_fd++) if ((fds_to_close[duplicated_fd / CHAR_BIT] >> (duplicated_fd % CHAR_BIT)) & 1) close (duplicated_fd); errno = saved_errno; } # if REPLACE_FCHDIR if (0 <= result) result = _gl_register_dup (oldfd, result); # endif return result; } #endif /* W32 */ /* Forward declarations, because we '#undef fcntl' in the middle of this compilation unit. */ /* Our implementation of fcntl (fd, F_DUPFD, target). */ static int rpl_fcntl_DUPFD (int fd, int target); /* Our implementation of fcntl (fd, F_DUPFD_CLOEXEC, target). */ static int rpl_fcntl_DUPFD_CLOEXEC (int fd, int target); #ifdef __KLIBC__ /* Adds support for fcntl on directories. */ static int klibc_fcntl (int fd, int action, /* arg */...); #endif /* Perform the specified ACTION on the file descriptor FD, possibly using the argument ARG further described below. This replacement handles the following actions, and forwards all others on to the native fcntl. An unrecognized ACTION returns -1 with errno set to EINVAL. F_DUPFD - duplicate FD, with int ARG being the minimum target fd. If successful, return the duplicate, which will be inheritable; otherwise return -1 and set errno. F_DUPFD_CLOEXEC - duplicate FD, with int ARG being the minimum target fd. If successful, return the duplicate, which will not be inheritable; otherwise return -1 and set errno. F_GETFD - ARG need not be present. If successful, return a non-negative value containing the descriptor flags of FD (only FD_CLOEXEC is portable, but other flags may be present); otherwise return -1 and set errno. */ int fcntl (int fd, int action, /* arg */...) #undef fcntl #ifdef __KLIBC__ # define fcntl klibc_fcntl #endif { va_list arg; int result = -1; va_start (arg, action); switch (action) { case F_DUPFD: { int target = va_arg (arg, int); result = rpl_fcntl_DUPFD (fd, target); break; } case F_DUPFD_CLOEXEC: { int target = va_arg (arg, int); result = rpl_fcntl_DUPFD_CLOEXEC (fd, target); break; } #if !HAVE_FCNTL case F_GETFD: { # if defined _WIN32 && ! defined __CYGWIN__ HANDLE handle = (HANDLE) _get_osfhandle (fd); DWORD flags; if (handle == INVALID_HANDLE_VALUE || GetHandleInformation (handle, &flags) == 0) errno = EBADF; else result = (flags & HANDLE_FLAG_INHERIT) ? 0 : FD_CLOEXEC; # else /* !W32 */ /* Use dup2 to reject invalid file descriptors. No way to access this information, so punt. */ if (0 <= dup2 (fd, fd)) result = 0; # endif /* !W32 */ break; } /* F_GETFD */ #endif /* !HAVE_FCNTL */ /* Implementing F_SETFD on mingw is not trivial - there is no API for changing the O_NOINHERIT bit on an fd, and merely changing the HANDLE_FLAG_INHERIT bit on the underlying handle can lead to odd state. It may be possible by duplicating the handle, using _open_osfhandle with the right flags, then using dup2 to move the duplicate onto the original, but that is not supported for now. */ default: { #if HAVE_FCNTL switch (action) { #ifdef F_BARRIERFSYNC /* macOS */ case F_BARRIERFSYNC: #endif #ifdef F_CHKCLEAN /* macOS */ case F_CHKCLEAN: #endif #ifdef F_CLOSEM /* NetBSD, HP-UX */ case F_CLOSEM: #endif #ifdef F_FLUSH_DATA /* macOS */ case F_FLUSH_DATA: #endif #ifdef F_FREEZE_FS /* macOS */ case F_FREEZE_FS: #endif #ifdef F_FULLFSYNC /* macOS */ case F_FULLFSYNC: #endif #ifdef F_GETCONFINED /* macOS */ case F_GETCONFINED: #endif #ifdef F_GETDEFAULTPROTLEVEL /* macOS */ case F_GETDEFAULTPROTLEVEL: #endif #ifdef F_GETFD /* POSIX */ case F_GETFD: #endif #ifdef F_GETFL /* POSIX */ case F_GETFL: #endif #ifdef F_GETLEASE /* Linux */ case F_GETLEASE: #endif #ifdef F_GETNOSIGPIPE /* macOS */ case F_GETNOSIGPIPE: #endif #ifdef F_GETOWN /* POSIX */ case F_GETOWN: #endif #ifdef F_GETPIPE_SZ /* Linux */ case F_GETPIPE_SZ: #endif #ifdef F_GETPROTECTIONCLASS /* macOS */ case F_GETPROTECTIONCLASS: #endif #ifdef F_GETPROTECTIONLEVEL /* macOS */ case F_GETPROTECTIONLEVEL: #endif #ifdef F_GET_SEALS /* Linux */ case F_GET_SEALS: #endif #ifdef F_GETSIG /* Linux */ case F_GETSIG: #endif #ifdef F_MAXFD /* NetBSD */ case F_MAXFD: #endif #ifdef F_RECYCLE /* macOS */ case F_RECYCLE: #endif #ifdef F_SETFIFOENH /* HP-UX */ case F_SETFIFOENH: #endif #ifdef F_THAW_FS /* macOS */ case F_THAW_FS: #endif /* These actions take no argument. */ result = fcntl (fd, action); break; #ifdef F_ADD_SEALS /* Linux */ case F_ADD_SEALS: #endif #ifdef F_BADFD /* Solaris */ case F_BADFD: #endif #ifdef F_CHECK_OPENEVT /* macOS */ case F_CHECK_OPENEVT: #endif #ifdef F_DUP2FD /* FreeBSD, AIX, Solaris */ case F_DUP2FD: #endif #ifdef F_DUP2FD_CLOEXEC /* FreeBSD, Solaris */ case F_DUP2FD_CLOEXEC: #endif #ifdef F_DUP2FD_CLOFORK /* Solaris */ case F_DUP2FD_CLOFORK: #endif #ifdef F_DUPFD /* POSIX */ case F_DUPFD: #endif #ifdef F_DUPFD_CLOEXEC /* POSIX */ case F_DUPFD_CLOEXEC: #endif #ifdef F_DUPFD_CLOFORK /* Solaris */ case F_DUPFD_CLOFORK: #endif #ifdef F_GETXFL /* Solaris */ case F_GETXFL: #endif #ifdef F_GLOBAL_NOCACHE /* macOS */ case F_GLOBAL_NOCACHE: #endif #ifdef F_MAKECOMPRESSED /* macOS */ case F_MAKECOMPRESSED: #endif #ifdef F_MOVEDATAEXTENTS /* macOS */ case F_MOVEDATAEXTENTS: #endif #ifdef F_NOCACHE /* macOS */ case F_NOCACHE: #endif #ifdef F_NODIRECT /* macOS */ case F_NODIRECT: #endif #ifdef F_NOTIFY /* Linux */ case F_NOTIFY: #endif #ifdef F_OPLKACK /* IRIX */ case F_OPLKACK: #endif #ifdef F_OPLKREG /* IRIX */ case F_OPLKREG: #endif #ifdef F_RDAHEAD /* macOS */ case F_RDAHEAD: #endif #ifdef F_SETBACKINGSTORE /* macOS */ case F_SETBACKINGSTORE: #endif #ifdef F_SETCONFINED /* macOS */ case F_SETCONFINED: #endif #ifdef F_SETFD /* POSIX */ case F_SETFD: #endif #ifdef F_SETFL /* POSIX */ case F_SETFL: #endif #ifdef F_SETLEASE /* Linux */ case F_SETLEASE: #endif #ifdef F_SETNOSIGPIPE /* macOS */ case F_SETNOSIGPIPE: #endif #ifdef F_SETOWN /* POSIX */ case F_SETOWN: #endif #ifdef F_SETPIPE_SZ /* Linux */ case F_SETPIPE_SZ: #endif #ifdef F_SETPROTECTIONCLASS /* macOS */ case F_SETPROTECTIONCLASS: #endif #ifdef F_SETSIG /* Linux */ case F_SETSIG: #endif #ifdef F_SINGLE_WRITER /* macOS */ case F_SINGLE_WRITER: #endif /* These actions take an 'int' argument. */ { int x = va_arg (arg, int); result = fcntl (fd, action, x); } break; default: /* Other actions take a pointer argument. */ { void *p = va_arg (arg, void *); result = fcntl (fd, action, p); } break; } #else errno = EINVAL; #endif break; } } va_end (arg); return result; } static int rpl_fcntl_DUPFD (int fd, int target) { int result; #if !HAVE_FCNTL result = dupfd (fd, target, 0); #elif FCNTL_DUPFD_BUGGY || REPLACE_FCHDIR /* Detect invalid target; needed for cygwin 1.5.x. */ if (target < 0 || getdtablesize () <= target) { result = -1; errno = EINVAL; } else { /* Haiku alpha 2 loses fd flags on original. */ int flags = fcntl (fd, F_GETFD); if (flags < 0) result = -1; else { result = fcntl (fd, F_DUPFD, target); if (0 <= result && fcntl (fd, F_SETFD, flags) == -1) { int saved_errno = errno; close (result); result = -1; errno = saved_errno; } # if REPLACE_FCHDIR if (0 <= result) result = _gl_register_dup (fd, result); # endif } } #else result = fcntl (fd, F_DUPFD, target); #endif return result; } static int rpl_fcntl_DUPFD_CLOEXEC (int fd, int target) { int result; #if !HAVE_FCNTL result = dupfd (fd, target, O_CLOEXEC); #else /* HAVE_FCNTL */ # if defined __NetBSD__ || defined __HAIKU__ /* On NetBSD 9.0, the system fcntl (fd, F_DUPFD_CLOEXEC, target) has only the same effect as fcntl (fd, F_DUPFD, target). */ /* On Haiku, the system fcntl (fd, F_DUPFD_CLOEXEC, target) sets the FD_CLOEXEC flag on fd, not on target. Therefore avoid the system fcntl in this case. */ # define have_dupfd_cloexec -1 # else /* Try the system call first, if the headers claim it exists (that is, if GNULIB_defined_F_DUPFD_CLOEXEC is 0), since we may be running with a glibc that has the macro but with an older kernel that does not support it. Cache the information on whether the system call really works, but avoid caching failure if the corresponding F_DUPFD fails for any reason. 0 = unknown, 1 = yes, -1 = no. */ static int have_dupfd_cloexec = GNULIB_defined_F_DUPFD_CLOEXEC ? -1 : 0; if (0 <= have_dupfd_cloexec) { result = fcntl (fd, F_DUPFD_CLOEXEC, target); if (0 <= result || errno != EINVAL) { have_dupfd_cloexec = 1; # if REPLACE_FCHDIR if (0 <= result) result = _gl_register_dup (fd, result); # endif } else { result = rpl_fcntl_DUPFD (fd, target); if (result >= 0) have_dupfd_cloexec = -1; } } else # endif result = rpl_fcntl_DUPFD (fd, target); if (0 <= result && have_dupfd_cloexec == -1) { int flags = fcntl (result, F_GETFD); if (flags < 0 || fcntl (result, F_SETFD, flags | FD_CLOEXEC) == -1) { int saved_errno = errno; close (result); errno = saved_errno; result = -1; } } #endif /* HAVE_FCNTL */ return result; } #undef fcntl #ifdef __KLIBC__ static int klibc_fcntl (int fd, int action, /* arg */...) { va_list arg_ptr; int arg; struct stat sbuf; int result; va_start (arg_ptr, action); arg = va_arg (arg_ptr, int); result = fcntl (fd, action, arg); /* EPERM for F_DUPFD, ENOTSUP for others */ if (result == -1 && (errno == EPERM || errno == ENOTSUP) && !fstat (fd, &sbuf) && S_ISDIR (sbuf.st_mode)) { ULONG ulMode; switch (action) { case F_DUPFD: /* Find available fd */ while (fcntl (arg, F_GETFL) != -1 || errno != EBADF) arg++; result = dup2 (fd, arg); break; /* Using underlying APIs is right ? */ case F_GETFD: if (DosQueryFHState (fd, &ulMode)) break; result = (ulMode & OPEN_FLAGS_NOINHERIT) ? FD_CLOEXEC : 0; break; case F_SETFD: if (arg & ~FD_CLOEXEC) break; if (DosQueryFHState (fd, &ulMode)) break; if (arg & FD_CLOEXEC) ulMode |= OPEN_FLAGS_NOINHERIT; else ulMode &= ~OPEN_FLAGS_NOINHERIT; /* Filter supported flags. */ ulMode &= (OPEN_FLAGS_WRITE_THROUGH | OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NO_CACHE | OPEN_FLAGS_NOINHERIT); if (DosSetFHState (fd, ulMode)) break; result = 0; break; case F_GETFL: result = 0; break; case F_SETFL: if (arg != 0) break; result = 0; break; default: errno = EINVAL; break; } } va_end (arg_ptr); return result; } #endif libffcall-2.5/gnulib-lib/close.c0000664000000000000000000000314314631432055013470 00000000000000/* close replacement. Copyright (C) 2008-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #include #include "fd-hook.h" #if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" #endif #undef close #if defined _WIN32 && !defined __CYGWIN__ # if HAVE_MSVC_INVALID_PARAMETER_HANDLER static int close_nothrow (int fd) { int result; TRY_MSVC_INVAL { result = _close (fd); } CATCH_MSVC_INVAL { result = -1; errno = EBADF; } DONE_MSVC_INVAL; return result; } # else # define close_nothrow _close # endif #else # define close_nothrow close #endif /* Override close() to call into other gnulib modules. */ int rpl_close (int fd) { #if WINDOWS_SOCKETS int retval = execute_all_close_hooks (close_nothrow, fd); #else int retval = close_nothrow (fd); #endif #if REPLACE_FCHDIR if (retval >= 0) _gl_unregister_fd (fd); #endif return retval; } libffcall-2.5/gnulib-lib/gl_anylinked_list1.h0000664000000000000000000000337214631432055016150 00000000000000/* Sequential list data type implemented by a linked list. Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Common code of gl_linked_list.c and gl_linkedhash_list.c. */ /* -------------------------- gl_list_t Data Type -------------------------- */ /* Concrete list node implementation, valid for this file only. */ struct gl_list_node_impl { #if WITH_HASHTABLE struct gl_hash_entry h; /* hash table entry fields; must be first */ #endif struct gl_list_node_impl *next; struct gl_list_node_impl *prev; const void *value; }; /* Concrete gl_list_impl type, valid for this file only. */ struct gl_list_impl { struct gl_list_impl_base base; #if WITH_HASHTABLE /* A hash table: managed as an array of collision lists. */ struct gl_hash_entry **table; size_t table_size; #endif /* A circular list anchored at root. The first node is = root.next, the last node is = root.prev. The root's value is unused. */ struct gl_list_node_impl root; /* Number of list nodes, excluding the root. */ size_t count; }; libffcall-2.5/gnulib-lib/filename.h0000664000000000000000000001110614631432055014146 00000000000000/* Basic filename support macros. Copyright (C) 2001-2024 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see . */ /* From Paul Eggert and Jim Meyering. */ #ifndef _FILENAME_H #define _FILENAME_H #include #ifdef __cplusplus extern "C" { #endif /* Filename support. ISSLASH(C) tests whether C is a directory separator character. HAS_DEVICE(Filename) tests whether Filename contains a device specification. FILE_SYSTEM_PREFIX_LEN(Filename) length of the device specification at the beginning of Filename, index of the part consisting of alternating components and slashes. FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE 1 when a non-empty device specification can be followed by an empty or relative part, 0 when a non-empty device specification must be followed by a slash, 0 when device specification don't exist. IS_ABSOLUTE_FILE_NAME(Filename) tests whether Filename is independent of any notion of "current directory". IS_RELATIVE_FILE_NAME(Filename) tests whether Filename may be concatenated to a directory filename. Note: On native Windows, OS/2, DOS, "c:" is neither an absolute nor a relative file name! IS_FILE_NAME_WITH_DIR(Filename) tests whether Filename contains a device or directory specification. */ #if defined _WIN32 || defined __CYGWIN__ \ || defined __EMX__ || defined __MSDOS__ || defined __DJGPP__ /* Native Windows, Cygwin, OS/2, DOS */ # define ISSLASH(C) ((C) == '/' || (C) == '\\') /* Internal macro: Tests whether a character is a drive letter. */ # define _IS_DRIVE_LETTER(C) \ (((C) >= 'A' && (C) <= 'Z') || ((C) >= 'a' && (C) <= 'z')) /* Help the compiler optimizing it. This assumes ASCII. */ # undef _IS_DRIVE_LETTER # define _IS_DRIVE_LETTER(C) \ (((unsigned int) (C) | ('a' - 'A')) - 'a' <= 'z' - 'a') # define HAS_DEVICE(Filename) \ (_IS_DRIVE_LETTER ((Filename)[0]) && (Filename)[1] == ':') # define FILE_SYSTEM_PREFIX_LEN(Filename) (HAS_DEVICE (Filename) ? 2 : 0) # ifdef __CYGWIN__ # define FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE 0 # else /* On native Windows, OS/2, DOS, the system has the notion of a "current directory" on each drive. */ # define FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE 1 # endif # if FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE # define IS_ABSOLUTE_FILE_NAME(Filename) \ ISSLASH ((Filename)[FILE_SYSTEM_PREFIX_LEN (Filename)]) # else # define IS_ABSOLUTE_FILE_NAME(Filename) \ (ISSLASH ((Filename)[0]) || HAS_DEVICE (Filename)) # endif # define IS_RELATIVE_FILE_NAME(Filename) \ (! (ISSLASH ((Filename)[0]) || HAS_DEVICE (Filename))) # define IS_FILE_NAME_WITH_DIR(Filename) \ (strchr ((Filename), '/') != NULL || strchr ((Filename), '\\') != NULL \ || HAS_DEVICE (Filename)) #else /* Unix */ # define ISSLASH(C) ((C) == '/') # define HAS_DEVICE(Filename) ((void) (Filename), 0) # define FILE_SYSTEM_PREFIX_LEN(Filename) ((void) (Filename), 0) # define FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE 0 # define IS_ABSOLUTE_FILE_NAME(Filename) ISSLASH ((Filename)[0]) # define IS_RELATIVE_FILE_NAME(Filename) (! ISSLASH ((Filename)[0])) # define IS_FILE_NAME_WITH_DIR(Filename) (strchr ((Filename), '/') != NULL) #endif /* Deprecated macros. For backward compatibility with old users of the 'filename' module. */ #define IS_ABSOLUTE_PATH IS_ABSOLUTE_FILE_NAME #define IS_PATH_WITH_DIR IS_FILE_NAME_WITH_DIR #ifdef __cplusplus } #endif #endif /* _FILENAME_H */ libffcall-2.5/gnulib-lib/msvc-nothrow.h0000664000000000000000000000334314631432055015040 00000000000000/* Wrappers that don't throw invalid parameter notifications with MSVC runtime libraries. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _MSVC_NOTHROW_H #define _MSVC_NOTHROW_H /* With MSVC runtime libraries with the "invalid parameter handler" concept, functions like fprintf(), dup2(), or close() crash when the caller passes an invalid argument. But POSIX wants error codes (such as EINVAL or EBADF) instead. This file defines wrappers that turn such an invalid parameter notification into an error code. */ /* This file uses HAVE_MSVC_INVALID_PARAMETER_HANDLER. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #if defined _WIN32 && ! defined __CYGWIN__ /* Get original declaration of _get_osfhandle. */ # include # ifdef __cplusplus extern "C" { # endif # if HAVE_MSVC_INVALID_PARAMETER_HANDLER /* Override _get_osfhandle. */ extern intptr_t _gl_nothrow_get_osfhandle (int fd); # define _get_osfhandle _gl_nothrow_get_osfhandle # endif # ifdef __cplusplus } # endif #endif #endif /* _MSVC_NOTHROW_H */ libffcall-2.5/gnulib-lib/mntent.in.h0000664000000000000000000000507514660662607014322 00000000000000/* Provide a more complete mntent.h. Copyright (C) 2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #ifndef _@GUARD_PREFIX@_MNTENT_H /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_MNTENT_H@ #ifndef _@GUARD_PREFIX@_MNTENT_H #define _@GUARD_PREFIX@_MNTENT_H /* This file uses GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ #ifdef __cplusplus extern "C" { #endif #if @GNULIB_HASMNTOPT@ && @HAVE_SETMNTENT@ /* Searches ME->mnt_opts for an option matching OPTION. Returns the address of the substring, or null if none found. */ # if @REPLACE_HASMNTOPT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef hasmntopt # define hasmntopt rpl_hasmntopt # endif _GL_FUNCDECL_RPL (hasmntopt, char *, (const struct mntent *me, const char *option), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (hasmntopt, char *, (const struct mntent *me, const char *option)); # else # if !@HAVE_HASMNTOPT@ _GL_FUNCDECL_SYS (hasmntopt, char *, (const struct mntent *me, const char *option), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (hasmntopt, char *, (const struct mntent *me, const char *option)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (hasmntopt); # endif #elif defined GNULIB_POSIXCHECK # undef hasmntopt # if HAVE_RAW_DECL_HASMNTOPT _GL_WARN_ON_USE (hasmntopt, "hasmntopt is unportable - " "use gnulib module hasmntopt for portability"); # endif #endif #ifdef __cplusplus } #endif #endif /* _@GUARD_PREFIX@_MNTENT_H */ #endif /* _@GUARD_PREFIX@_MNTENT_H */ libffcall-2.5/gnulib-lib/assert.in.h0000664000000000000000000000202514631432055014274 00000000000000/* Substitute for and wrapper around Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Do not guard the include, since is supposed to define the assert macro each time it is included. */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #@INCLUDE_NEXT@ @NEXT_ASSERT_H@ /* The definition of static_assert is copied here. */ libffcall-2.5/gnulib-lib/fatal-signal.h0000664000000000000000000000775414631432055014746 00000000000000/* Emergency actions in case of a fatal signal. Copyright (C) 2003-2004, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2003. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _FATAL_SIGNAL_H #define _FATAL_SIGNAL_H /* This file uses _GL_ASYNC_SAFE. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #ifdef __cplusplus extern "C" { #endif /* It is often useful to do some cleanup action when a usually fatal signal terminates the process, like removing a temporary file or killing a subprocess that may be stuck waiting for a device, pipe or network input. Such signals are SIGHUP, SIGINT, SIGPIPE, SIGTERM, and possibly others. The limitation of this facility is that it cannot work for SIGKILL. Signals with a SIG_IGN handler are considered to be non-fatal. The functions in this file assume that when a SIG_IGN handler is installed for a signal, it was installed before any functions in this file were called and it stays so for the whole lifetime of the process. */ /* Register a cleanup function to be executed when a catchable fatal signal occurs. Restrictions for the cleanup function: - The cleanup function can do all kinds of system calls. It may also modify (clobber) errno. - It can also access application dependent memory locations and data structures provided they are in a consistent state. One way to ensure this is through block_fatal_signals()/unblock_fatal_signals(), see below. Another - more tricky - way to ensure this is the careful use of 'volatile'. However, - malloc() and similarly complex facilities are not safe to be called because they are not guaranteed to be in a consistent state. - Also, the cleanup function must not block the catchable fatal signals and leave them blocked upon return. The cleanup function is executed asynchronously. It is unspecified whether during its execution the catchable fatal signals are blocked or not. Return 0 upon success, or -1 if there was a memory allocation problem. */ extern int at_fatal_signal (_GL_ASYNC_SAFE void (*function) (int sig)); /* Sometimes it is necessary to block the usually fatal signals while the data structures being accessed by the cleanup action are being built or reorganized. This is the case, for example, when a temporary file or directory is created through mkstemp() or mkdtemp(), because these functions create the temporary file or directory _before_ returning its name to the application. */ /* Temporarily delay the catchable fatal signals. The signals will be blocked (= delayed) until the next call to unblock_fatal_signals(). If the signals are already blocked, a further call to block_fatal_signals() has no effect. */ extern void block_fatal_signals (void); /* Stop delaying the catchable fatal signals. */ extern void unblock_fatal_signals (void); /* Return the list of signals that block_fatal_signals/unblock_fatal_signals would block or unblock. Fills signals[0..count-1] and returns count. */ extern unsigned int get_fatal_signals (int signals[64]); /* Return the list of signals that block_fatal_signals/unblock_fatal_signals would block or unblock. */ extern const sigset_t * get_fatal_signal_set (void); #ifdef __cplusplus } #endif #endif /* _FATAL_SIGNAL_H */ libffcall-2.5/gnulib-lib/fcntl.in.h0000664000000000000000000003165314657156076014130 00000000000000/* Like , but with non-working flags defined to 0. Copyright (C) 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* written by Paul Eggert */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined __need_system_fcntl_h /* Special invocation convention. */ /* Needed before . May also define off_t to a 64-bit type on native Windows. */ #include /* On some systems other than glibc, is a prerequisite of . On glibc systems, we would like to avoid namespace pollution. But on glibc systems, includes inside an extern "C" { ... } block, which leads to errors in C++ mode with the overridden from gnulib. These errors are known to be gone with g++ version >= 4.3. */ #if !(defined __GLIBC__ || defined __UCLIBC__) || (defined __cplusplus && defined GNULIB_NAMESPACE && (defined __ICC || !(__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3)))) # include #endif #@INCLUDE_NEXT@ @NEXT_FCNTL_H@ /* Native Windows platforms declare open(), creat() in . */ #if (@GNULIB_CREAT@ || @GNULIB_OPEN@ || defined GNULIB_POSIXCHECK) \ && (defined _WIN32 && ! defined __CYGWIN__) # include #endif #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_FCNTL_H /* Needed before . May also define off_t to a 64-bit type on native Windows. Also defines off64_t on macOS, NetBSD, OpenBSD, MSVC, Cygwin, Haiku. */ #include /* On some systems other than glibc, is a prerequisite of . On glibc systems, we would like to avoid namespace pollution. But on glibc systems, includes inside an extern "C" { ... } block, which leads to errors in C++ mode with the overridden from gnulib. These errors are known to be gone with g++ version >= 4.3. */ #if !(defined __GLIBC__ || defined __UCLIBC__) || (defined __cplusplus && defined GNULIB_NAMESPACE && (defined __ICC || !(__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3)))) # include #endif /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_FCNTL_H@ /* Native Windows platforms declare open(), creat() in . */ #if (@GNULIB_CREAT@ || @GNULIB_OPEN@ || defined GNULIB_POSIXCHECK) \ && (defined _WIN32 && ! defined __CYGWIN__) # include #endif #ifndef _@GUARD_PREFIX@_FCNTL_H #define _@GUARD_PREFIX@_FCNTL_H /* This file uses GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #ifndef __GLIBC__ /* Avoid namespace pollution on glibc systems. */ # include #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Declare overridden functions. */ #if @GNULIB_CREAT@ # if @REPLACE_CREAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef creat # define creat rpl_creat # endif _GL_FUNCDECL_RPL (creat, int, (const char *filename, mode_t mode), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (creat, int, (const char *filename, mode_t mode)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef creat # define creat _creat # endif _GL_CXXALIAS_MDA (creat, int, (const char *filename, mode_t mode)); # else _GL_CXXALIAS_SYS (creat, int, (const char *filename, mode_t mode)); # endif _GL_CXXALIASWARN (creat); #elif defined GNULIB_POSIXCHECK # undef creat /* Assume creat is always declared. */ _GL_WARN_ON_USE (creat, "creat is not always POSIX compliant - " "use gnulib module creat for portability"); #elif @GNULIB_MDA_CREAT@ /* On native Windows, map 'creat' to '_creat', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::creat always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef creat # define creat _creat # endif /* Need to cast, because in mingw the last argument is 'int mode'. */ _GL_CXXALIAS_MDA_CAST (creat, int, (const char *filename, mode_t mode)); # else _GL_CXXALIAS_SYS (creat, int, (const char *filename, mode_t mode)); # endif _GL_CXXALIASWARN (creat); #endif #if @GNULIB_FCNTL@ # if @REPLACE_FCNTL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fcntl # define fcntl rpl_fcntl # endif _GL_FUNCDECL_RPL (fcntl, int, (int fd, int action, ...)); _GL_CXXALIAS_RPL (fcntl, int, (int fd, int action, ...)); # if !GNULIB_defined_rpl_fcntl # define GNULIB_defined_rpl_fcntl 1 # endif # else # if !@HAVE_FCNTL@ _GL_FUNCDECL_SYS (fcntl, int, (int fd, int action, ...)); # if !GNULIB_defined_fcntl # define GNULIB_defined_fcntl 1 # endif # endif _GL_CXXALIAS_SYS (fcntl, int, (int fd, int action, ...)); # endif _GL_CXXALIASWARN (fcntl); #elif defined GNULIB_POSIXCHECK # undef fcntl # if HAVE_RAW_DECL_FCNTL _GL_WARN_ON_USE (fcntl, "fcntl is not always POSIX compliant - " "use gnulib module fcntl for portability"); # endif #endif #if @GNULIB_OPEN@ # if @REPLACE_OPEN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef open # define open rpl_open # endif _GL_FUNCDECL_RPL (open, int, (const char *filename, int flags, ...), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (open, int, (const char *filename, int flags, ...)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef open # define open _open # endif _GL_CXXALIAS_MDA (open, int, (const char *filename, int flags, ...)); # else _GL_CXXALIAS_SYS (open, int, (const char *filename, int flags, ...)); # endif /* On HP-UX 11, in C++ mode, open() is defined as an inline function with a default argument. _GL_CXXALIASWARN does not work in this case. */ # if !defined __hpux _GL_CXXALIASWARN (open); # endif #elif defined GNULIB_POSIXCHECK # undef open /* Assume open is always declared. */ _GL_WARN_ON_USE (open, "open is not always POSIX compliant - " "use gnulib module open for portability"); #elif @GNULIB_MDA_OPEN@ /* On native Windows, map 'open' to '_open', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::open always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef open # define open _open # endif _GL_CXXALIAS_MDA (open, int, (const char *filename, int flags, ...)); # else _GL_CXXALIAS_SYS (open, int, (const char *filename, int flags, ...)); # endif # if !defined __hpux _GL_CXXALIASWARN (open); # endif #endif #if @GNULIB_OPENAT@ # if @REPLACE_OPENAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef openat # define openat rpl_openat # endif _GL_FUNCDECL_RPL (openat, int, (int fd, char const *file, int flags, /* mode_t mode */ ...), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (openat, int, (int fd, char const *file, int flags, /* mode_t mode */ ...)); # else # if !@HAVE_OPENAT@ _GL_FUNCDECL_SYS (openat, int, (int fd, char const *file, int flags, /* mode_t mode */ ...), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (openat, int, (int fd, char const *file, int flags, /* mode_t mode */ ...)); # endif _GL_CXXALIASWARN (openat); #elif defined GNULIB_POSIXCHECK # undef openat # if HAVE_RAW_DECL_OPENAT _GL_WARN_ON_USE (openat, "openat is not portable - " "use gnulib module openat for portability"); # endif #endif /* Fix up the FD_* macros, only known to be missing on mingw. */ #ifndef FD_CLOEXEC # define FD_CLOEXEC 1 #endif /* Fix up the supported F_* macros. Intentionally leave other F_* macros undefined. Only known to be missing on mingw. */ #ifndef F_DUPFD_CLOEXEC # define F_DUPFD_CLOEXEC 0x40000000 /* Witness variable: 1 if gnulib defined F_DUPFD_CLOEXEC, 0 otherwise. */ # define GNULIB_defined_F_DUPFD_CLOEXEC 1 #else # define GNULIB_defined_F_DUPFD_CLOEXEC 0 #endif #ifndef F_DUPFD # define F_DUPFD 1 #endif #ifndef F_GETFD # define F_GETFD 2 #endif /* Fix up the O_* macros. */ /* AIX 7.1 with XL C 12.1 defines O_CLOEXEC, O_NOFOLLOW, and O_TTY_INIT to values outside 'int' range, so omit these misdefinitions. But avoid namespace pollution on non-AIX systems. */ #ifdef _AIX # include # if defined O_CLOEXEC && ! (INT_MIN <= O_CLOEXEC && O_CLOEXEC <= INT_MAX) # undef O_CLOEXEC # endif # if defined O_NOFOLLOW && ! (INT_MIN <= O_NOFOLLOW && O_NOFOLLOW <= INT_MAX) # undef O_NOFOLLOW # endif # if defined O_TTY_INIT && ! (INT_MIN <= O_TTY_INIT && O_TTY_INIT <= INT_MAX) # undef O_TTY_INIT # endif #endif #if !defined O_DIRECT && defined O_DIRECTIO /* Tru64 spells it 'O_DIRECTIO'. */ # define O_DIRECT O_DIRECTIO #endif #if !defined O_CLOEXEC && defined O_NOINHERIT /* Mingw spells it 'O_NOINHERIT'. */ # define O_CLOEXEC O_NOINHERIT #endif #ifndef O_CLOEXEC # define O_CLOEXEC 0x40000000 /* Try to not collide with system O_* flags. */ # define GNULIB_defined_O_CLOEXEC 1 #else # define GNULIB_defined_O_CLOEXEC 0 #endif #ifndef O_DIRECT # define O_DIRECT 0 #endif #ifndef O_DIRECTORY # define O_DIRECTORY 0 #endif #ifndef O_DSYNC # define O_DSYNC 0 #endif #ifndef O_EXEC # define O_EXEC O_RDONLY /* This is often close enough in older systems. */ #endif #ifndef O_IGNORE_CTTY # define O_IGNORE_CTTY 0 #endif #ifndef O_NDELAY # define O_NDELAY 0 #endif #ifndef O_NOATIME # define O_NOATIME 0 #endif #ifndef O_NONBLOCK # define O_NONBLOCK O_NDELAY #endif /* If the gnulib module 'nonblocking' is in use, guarantee a working non-zero value of O_NONBLOCK. Otherwise, O_NONBLOCK is defined (above) to O_NDELAY or to 0 as fallback. */ #if @GNULIB_NONBLOCKING@ # if O_NONBLOCK # define GNULIB_defined_O_NONBLOCK 0 # else # define GNULIB_defined_O_NONBLOCK 1 # undef O_NONBLOCK # define O_NONBLOCK 0x40000000 # endif #endif #ifndef O_NOCTTY # define O_NOCTTY 0 #endif #ifndef O_NOFOLLOW # define O_NOFOLLOW 0 #endif #ifndef O_NOLINK # define O_NOLINK 0 #endif #ifndef O_NOLINKS # define O_NOLINKS 0 #endif #ifndef O_NOTRANS # define O_NOTRANS 0 #endif #ifndef O_RSYNC # define O_RSYNC 0 #endif #ifndef O_SEARCH # define O_SEARCH O_RDONLY /* This is often close enough in older systems. */ #endif #ifndef O_SYNC # define O_SYNC 0 #endif #ifndef O_TTY_INIT # define O_TTY_INIT 0 #endif #if ~O_ACCMODE & (O_RDONLY | O_WRONLY | O_RDWR | O_EXEC | O_SEARCH) # undef O_ACCMODE # define O_ACCMODE (O_RDONLY | O_WRONLY | O_RDWR | O_EXEC | O_SEARCH) #endif /* For systems that distinguish between text and binary I/O. O_BINARY is usually declared in fcntl.h */ #if !defined O_BINARY && defined _O_BINARY /* For MSC-compatible compilers. */ # define O_BINARY _O_BINARY # define O_TEXT _O_TEXT #endif #if defined __BEOS__ || defined __HAIKU__ /* BeOS 5 and Haiku have O_BINARY and O_TEXT, but they have no effect. */ # undef O_BINARY # undef O_TEXT #endif #ifndef O_BINARY # define O_BINARY 0 # define O_TEXT 0 #endif /* Fix up the AT_* macros. */ /* Work around a bug in Solaris 9 and 10: AT_FDCWD is positive. Its value exceeds INT_MAX, so its use as an int doesn't conform to the C standard, and GCC and Sun C complain in some cases. If the bug is present, undef AT_FDCWD here, so it can be redefined below. */ #if 0 < AT_FDCWD && AT_FDCWD == 0xffd19553 # undef AT_FDCWD #endif /* Use the same bit pattern as Solaris 9, but with the proper signedness. The bit pattern is important, in case this actually is Solaris with the above workaround. */ #ifndef AT_FDCWD # define AT_FDCWD (-3041965) #endif /* Use the same values as Solaris 9. This shouldn't matter, but there's no real reason to differ. */ #ifndef AT_SYMLINK_NOFOLLOW # define AT_SYMLINK_NOFOLLOW 4096 #endif #ifndef AT_REMOVEDIR # define AT_REMOVEDIR 1 #endif /* Solaris 9 lacks these two, so just pick unique values. */ #ifndef AT_SYMLINK_FOLLOW # define AT_SYMLINK_FOLLOW 2 #endif #ifndef AT_EACCESS # define AT_EACCESS 4 #endif /* Ignore this flag if not supported. */ #ifndef AT_NO_AUTOMOUNT # define AT_NO_AUTOMOUNT 0 #endif #endif /* _@GUARD_PREFIX@_FCNTL_H */ #endif /* _@GUARD_PREFIX@_FCNTL_H */ #endif libffcall-2.5/gnulib-lib/sig-handler.c0000664000000000000000000000155214631432055014562 00000000000000/* Convenience declarations when working with . Copyright (C) 2012-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #define SIG_HANDLER_INLINE _GL_EXTERN_INLINE #include "sig-handler.h" libffcall-2.5/gnulib-lib/pathmax.h0000664000000000000000000000601714631432055014035 00000000000000/* Define PATH_MAX somehow. Requires sys/types.h. Copyright (C) 1992, 1999, 2001, 2003, 2005, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _PATHMAX_H # define _PATHMAX_H /* POSIX:2008 defines PATH_MAX to be the maximum number of bytes in a filename, including the terminating NUL byte. PATH_MAX is not defined on systems which have no limit on filename length, such as GNU/Hurd. This file does *not* define PATH_MAX always. Programs that use this file can handle the GNU/Hurd case in several ways: - Either with a package-wide handling, or with a per-file handling, - Either through a #ifdef PATH_MAX or through a fallback like #ifndef PATH_MAX # define PATH_MAX 8192 #endif or through a fallback like #ifndef PATH_MAX # define PATH_MAX pathconf ("/", _PC_PATH_MAX) #endif */ /* This file uses HAVE_SYS_PARAM_H. */ # if !_GL_CONFIG_H_INCLUDED # error "Please include config.h first." # endif # include # include # ifndef _POSIX_PATH_MAX # define _POSIX_PATH_MAX 256 # endif /* Don't include sys/param.h if it already has been. */ # if defined HAVE_SYS_PARAM_H && !defined PATH_MAX && !defined MAXPATHLEN # include # endif # if !defined PATH_MAX && defined MAXPATHLEN # define PATH_MAX MAXPATHLEN # endif # ifdef __hpux /* On HP-UX, PATH_MAX designates the maximum number of bytes in a filename, *not* including the terminating NUL byte, and is set to 1023. Additionally, when _XOPEN_SOURCE is defined to 500 or more, PATH_MAX is not defined at all any more. */ # undef PATH_MAX # define PATH_MAX 1024 # endif # if defined _WIN32 && ! defined __CYGWIN__ /* The page "Naming Files, Paths, and Namespaces" on msdn.microsoft.com, section "Maximum Path Length Limitation", explains that the maximum size of a filename, including the terminating NUL byte, is 260 = 3 + 256 + 1. This is the same value as - FILENAME_MAX in , - _MAX_PATH in , - MAX_PATH in . Undefine the original value, because mingw's gets it wrong. */ # undef PATH_MAX # define PATH_MAX 260 # endif #endif /* _PATHMAX_H */ libffcall-2.5/gnulib-lib/sig-handler.h0000664000000000000000000000367614631432055014600 00000000000000/* Convenience declarations when working with . Copyright (C) 2008-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_SIG_HANDLER_H #define _GL_SIG_HANDLER_H /* This file uses _GL_INLINE_HEADER_BEGIN, _GL_INLINE, _GL_ATTRIBUTE_PURE. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include _GL_INLINE_HEADER_BEGIN #ifndef SIG_HANDLER_INLINE # define SIG_HANDLER_INLINE _GL_INLINE #endif /* Convenience type when working with signal handlers. */ typedef void (*sa_handler_t) (int); /* Return the handler of a signal, as a sa_handler_t value regardless of its true type. The resulting function can be compared to special values like SIG_IGN but it is not portable to call it. */ SIG_HANDLER_INLINE sa_handler_t _GL_ATTRIBUTE_PURE get_handler (struct sigaction const *a) { /* POSIX says that special values like SIG_IGN can only occur when action.sa_flags does not contain SA_SIGINFO. But in Linux 2.4, for example, sa_sigaction and sa_handler are aliases and a signal is ignored if sa_sigaction (after casting) equals SIG_IGN. In this case, this implementation relies on the fact that the two are aliases, and simply returns sa_handler. */ return a->sa_handler; } _GL_INLINE_HEADER_END #endif /* _GL_SIG_HANDLER_H */ libffcall-2.5/gnulib-lib/gl_linkedhash_list.h0000664000000000000000000000224314631432055016217 00000000000000/* Sequential list data type implemented by a hash table with a linked list. Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_LINKEDHASH_LIST_H #define _GL_LINKEDHASH_LIST_H #include "gl_list.h" #ifdef __cplusplus extern "C" { #endif extern const struct gl_list_implementation gl_linkedhash_list_implementation; #define GL_LINKEDHASH_LIST &gl_linkedhash_list_implementation #ifdef __cplusplus } #endif #endif /* _GL_LINKEDHASH_LIST_H */ libffcall-2.5/gnulib-lib/dup2.c0000664000000000000000000000774214631432055013246 00000000000000/* Duplicate an open file descriptor to a specified file descriptor. Copyright (C) 1999, 2004-2007, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* written by Paul Eggert */ #include /* Specification. */ #include #include #include #undef dup2 #if defined _WIN32 && ! defined __CYGWIN__ /* Get declarations of the native Windows API functions. */ # define WIN32_LEAN_AND_MEAN # include # if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" # endif /* Get _get_osfhandle. */ # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif # if HAVE_MSVC_INVALID_PARAMETER_HANDLER static int dup2_nothrow (int fd, int desired_fd) { int result; TRY_MSVC_INVAL { result = _dup2 (fd, desired_fd); } CATCH_MSVC_INVAL { errno = EBADF; result = -1; } DONE_MSVC_INVAL; return result; } # else # define dup2_nothrow _dup2 # endif static int ms_windows_dup2 (int fd, int desired_fd) { int result; /* If fd is closed, mingw hangs on dup2 (fd, fd). If fd is open, dup2 (fd, fd) returns 0, but all further attempts to use fd in future dup2 calls will hang. */ if (fd == desired_fd) { if ((HANDLE) _get_osfhandle (fd) == INVALID_HANDLE_VALUE) { errno = EBADF; return -1; } return fd; } /* Wine 1.0.1 return 0 when desired_fd is negative but not -1: https://bugs.winehq.org/show_bug.cgi?id=21289 */ if (desired_fd < 0) { errno = EBADF; return -1; } result = dup2_nothrow (fd, desired_fd); if (result == 0) result = desired_fd; return result; } # define dup2 ms_windows_dup2 #elif defined __KLIBC__ # include static int klibc_dup2dirfd (int fd, int desired_fd) { int tempfd; int dupfd; tempfd = open ("NUL", O_RDONLY); if (tempfd == -1) return -1; if (tempfd == desired_fd) { close (tempfd); char path[_MAX_PATH]; if (__libc_Back_ioFHToPath (fd, path, sizeof (path))) return -1; return open(path, O_RDONLY); } dupfd = klibc_dup2dirfd (fd, desired_fd); close (tempfd); return dupfd; } static int klibc_dup2 (int fd, int desired_fd) { int dupfd; struct stat sbuf; dupfd = dup2 (fd, desired_fd); if (dupfd == -1 && errno == ENOTSUP \ && !fstat (fd, &sbuf) && S_ISDIR (sbuf.st_mode)) { close (desired_fd); return klibc_dup2dirfd (fd, desired_fd); } return dupfd; } # define dup2 klibc_dup2 #endif int rpl_dup2 (int fd, int desired_fd) { int result; #ifdef F_GETFL /* On Linux kernels 2.6.26-2.6.29, dup2 (fd, fd) returns -EBADF. On Cygwin 1.5.x, dup2 (1, 1) returns 0. On Cygwin 1.7.17, dup2 (1, -1) dumps core. On Cygwin 1.7.25, dup2 (1, 256) can dump core. On Haiku, dup2 (fd, fd) mistakenly clears FD_CLOEXEC. */ # if HAVE_SETDTABLESIZE setdtablesize (desired_fd + 1); # endif if (desired_fd < 0) fd = desired_fd; if (fd == desired_fd) return fcntl (fd, F_GETFL) == -1 ? -1 : fd; #endif result = dup2 (fd, desired_fd); /* Correct an errno value on FreeBSD 6.1 and Cygwin 1.5.x. */ if (result == -1 && errno == EMFILE) errno = EBADF; #if REPLACE_FCHDIR if (fd != desired_fd && result != -1) result = _gl_register_dup (fd, result); #endif return result; } libffcall-2.5/gnulib-lib/stdio-read.c0000664000000000000000000001361414631432055014422 00000000000000/* POSIX compatible FILE stream read function. Copyright (C) 2008-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2011. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include /* Replace these functions only if module 'nonblocking' is requested. */ #if GNULIB_NONBLOCKING /* On native Windows platforms, when read() is called on a non-blocking pipe with an empty buffer, ReadFile() fails with error GetLastError() = ERROR_NO_DATA, and read() in consequence fails with error EINVAL. This read() function is at the basis of the function which fills the buffer of a FILE stream. */ # if defined _WIN32 && ! defined __CYGWIN__ # include # include # define WIN32_LEAN_AND_MEAN /* avoid including junk */ # include # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif /* Don't assume that UNICODE is not defined. */ # undef GetNamedPipeHandleState # define GetNamedPipeHandleState GetNamedPipeHandleStateA # define CALL_WITH_ERRNO_FIX(RETTYPE, EXPRESSION, FAILED) \ if (ferror (stream)) \ return (EXPRESSION); \ else \ { \ RETTYPE ret; \ SetLastError (0); \ ret = (EXPRESSION); \ if (FAILED) \ { \ if (GetLastError () == ERROR_NO_DATA && ferror (stream)) \ { \ int fd = fileno (stream); \ if (fd >= 0) \ { \ HANDLE h = (HANDLE) _get_osfhandle (fd); \ if (GetFileType (h) == FILE_TYPE_PIPE) \ { \ /* h is a pipe or socket. */ \ DWORD state; \ if (GetNamedPipeHandleState (h, &state, NULL, NULL, \ NULL, NULL, 0) \ && (state & PIPE_NOWAIT) != 0) \ /* h is a pipe in non-blocking mode. \ Change errno from EINVAL to EAGAIN. */ \ errno = EAGAIN; \ } \ } \ } \ } \ return ret; \ } /* Enable this function definition only if gnulib's has prepared it. Otherwise we get a function definition conflict with mingw64's . */ # if GNULIB_SCANF int scanf (const char *format, ...) { int retval; va_list args; va_start (args, format); retval = vfscanf (stdin, format, args); va_end (args); return retval; } # endif /* Enable this function definition only if gnulib's has prepared it. Otherwise we get a function definition conflict with mingw64's . */ # if GNULIB_FSCANF int fscanf (FILE *stream, const char *format, ...) { int retval; va_list args; va_start (args, format); retval = vfscanf (stream, format, args); va_end (args); return retval; } # endif /* Enable this function definition only if gnulib's has prepared it. Otherwise we get a function definition conflict with mingw64's . */ # if GNULIB_VSCANF int vscanf (const char *format, va_list args) { return vfscanf (stdin, format, args); } # endif /* Enable this function definition only if gnulib's has prepared it. Otherwise we get a function definition conflict with mingw64's . */ # if GNULIB_VFSCANF int vfscanf (FILE *stream, const char *format, va_list args) #undef vfscanf { CALL_WITH_ERRNO_FIX (int, vfscanf (stream, format, args), ret == EOF) } # endif int getchar (void) { return fgetc (stdin); } int fgetc (FILE *stream) #undef fgetc { CALL_WITH_ERRNO_FIX (int, fgetc (stream), ret == EOF) } char * fgets (char *s, int n, FILE *stream) #undef fgets { CALL_WITH_ERRNO_FIX (char *, fgets (s, n, stream), ret == NULL) } /* We intentionally don't bother to fix gets. */ size_t fread (void *ptr, size_t s, size_t n, FILE *stream) #undef fread { CALL_WITH_ERRNO_FIX (size_t, fread (ptr, s, n, stream), ret < n) } # endif #endif libffcall-2.5/gnulib-lib/msvc-nothrow.c0000664000000000000000000000255614631432055015040 00000000000000/* Wrappers that don't throw invalid parameter notifications with MSVC runtime libraries. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "msvc-nothrow.h" /* Get declarations of the native Windows API functions. */ #define WIN32_LEAN_AND_MEAN #include #if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" #endif #undef _get_osfhandle #if HAVE_MSVC_INVALID_PARAMETER_HANDLER intptr_t _gl_nothrow_get_osfhandle (int fd) { intptr_t result; TRY_MSVC_INVAL { result = _get_osfhandle (fd); } CATCH_MSVC_INVAL { result = (intptr_t) INVALID_HANDLE_VALUE; } DONE_MSVC_INVAL; return result; } #endif libffcall-2.5/gnulib-lib/vma-iter.c0000664000000000000000000015771714664171733014141 00000000000000/* Iteration over virtual memory areas. Copyright (C) 2011-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2011-2017. This file is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ #include /* On Solaris in 32-bit mode, when gnulib module 'largefile' is in use, prevent a compilation error "Cannot use procfs in the large file compilation environment" while also preventing from not defining off_t. On Android, when targeting Android 4.4 or older with a GCC toolchain, prevent a compilation error "error: call to 'mmap' declared with attribute error: mmap is not available with _FILE_OFFSET_BITS=64 when using GCC until android-21. Either raise your minSdkVersion, disable _FILE_OFFSET_BITS=64, or switch to Clang." The files that we access in this compilation unit are less than 2 GB large. */ #if defined __sun && !defined _LP64 && _FILE_OFFSET_BITS == 64 # undef _FILE_OFFSET_BITS # define _FILE_OFFSET_BITS 32 #endif #ifdef __ANDROID__ # undef _FILE_OFFSET_BITS #endif /* Specification. */ #include "vma-iter.h" #include /* errno */ #include /* size_t */ #include /* open, O_RDONLY */ #include /* getpagesize, lseek, read, close, getpid */ #if defined __linux__ || defined __ANDROID__ # include /* PATH_MAX */ #endif #if defined __linux__ || defined __ANDROID__ || defined __FreeBSD_kernel__ || defined __FreeBSD__ || defined __DragonFly__ || defined __NetBSD__ || defined __minix /* || defined __CYGWIN__ */ # include # include /* mmap, munmap */ #endif #if defined __minix # include /* memcpy */ #endif #if defined __FreeBSD__ || defined __FreeBSD_kernel__ /* FreeBSD, GNU/kFreeBSD */ # include # include /* mmap, munmap */ # include /* prerequisite of */ # include /* struct kinfo_vmentry */ # include /* sysctl */ #endif #if defined __NetBSD__ || defined __OpenBSD__ /* NetBSD, OpenBSD */ # include # include /* mmap, munmap */ # include /* sysctl, struct kinfo_vmentry */ #endif #if defined _AIX /* AIX */ # include /* memcpy */ # include # include /* mmap, munmap */ # include /* prmap_t */ #endif #if defined __sgi || defined __osf__ /* IRIX, OSF/1 */ # include /* memcpy */ # include # include /* mmap, munmap */ # include /* PIOC*, prmap_t */ #endif #if defined __sun /* Solaris */ # include /* memcpy */ # include # include /* mmap, munmap */ /* Try to use the newer ("structured") /proc filesystem API, if supported. */ # define _STRUCTURED_PROC 1 # include /* prmap_t, optionally PIOC* */ #endif #if HAVE_PSTAT_GETPROCVM /* HP-UX */ # include /* pstat_getprocvm */ #endif #if defined __APPLE__ && defined __MACH__ /* Mac OS X */ # include #endif #if defined __GNU__ /* GNU/Hurd */ # include #endif #if defined _WIN32 || defined __CYGWIN__ /* Windows */ # include #endif #if defined __BEOS__ || defined __HAIKU__ /* BeOS, Haiku */ # include #endif #if HAVE_MQUERY /* OpenBSD */ # include # include /* mquery */ #endif /* Support for reading text files in the /proc file system. */ #if defined __linux__ || defined __ANDROID__ || defined __FreeBSD_kernel__ || defined __FreeBSD__ || defined __DragonFly__ || defined __NetBSD__ || defined __minix /* || defined __CYGWIN__ */ /* Buffered read-only streams. We cannot use here, because fopen() calls malloc(), and a malloc() call may call mmap() and thus pre-allocate available memory. Also, we cannot use multiple read() calls, because if the buffer size is smaller than the file's contents: - On NetBSD, the second read() call would return 0, thus making the file appear truncated. - On DragonFly BSD, the first read() call would fail with errno = EFBIG. - On all platforms, if some other thread is doing memory allocations or deallocations between two read() calls, there is a high risk that the result of these two read() calls don't fit together, and as a consequence we will parse garbage and either omit some VMAs or return VMAs with nonsensical addresses. So use mmap(), and ignore the resulting VMA. */ # if defined __linux__ || defined __ANDROID__ /* On Linux, if the file does not entirely fit into the buffer, the read() function stops before the line that would come out truncated. The maximum size of such a line is 73 + PATH_MAX bytes. To be sure that we have read everything, we must verify that at least that many bytes are left when read() returned. */ # define MIN_LEFTOVER (73 + PATH_MAX) # else # define MIN_LEFTOVER 1 # endif # ifdef TEST /* During testing, we want to run into the hairy cases. */ # define STACK_ALLOCATED_BUFFER_SIZE 32 # else # if MIN_LEFTOVER < 1024 # define STACK_ALLOCATED_BUFFER_SIZE 1024 # else /* There is no point in using a stack-allocated buffer if it is too small anyway. */ # define STACK_ALLOCATED_BUFFER_SIZE 1 # endif # endif struct rofile { size_t position; size_t filled; int eof_seen; /* These fields deal with allocation of the buffer. */ char *buffer; char *auxmap; size_t auxmap_length; unsigned long auxmap_start; unsigned long auxmap_end; char stack_allocated_buffer[STACK_ALLOCATED_BUFFER_SIZE]; }; /* Open a read-only file stream. */ static int rof_open (struct rofile *rof, const char *filename) { int fd; unsigned long pagesize; size_t size; fd = open (filename, O_RDONLY | O_CLOEXEC); if (fd < 0) return -1; rof->position = 0; rof->eof_seen = 0; /* Try the static buffer first. */ pagesize = 0; rof->buffer = rof->stack_allocated_buffer; size = sizeof (rof->stack_allocated_buffer); rof->auxmap = NULL; rof->auxmap_start = 0; rof->auxmap_end = 0; for (;;) { /* Attempt to read the contents in a single system call. */ if (size > MIN_LEFTOVER) { int n = read (fd, rof->buffer, size); if (n < 0 && errno == EINTR) goto retry; # if defined __DragonFly__ if (!(n < 0 && errno == EFBIG)) # endif { if (n <= 0) /* Empty file. */ goto fail1; if (n + MIN_LEFTOVER <= size) { /* The buffer was sufficiently large. */ rof->filled = n; # if defined __linux__ || defined __ANDROID__ /* On Linux, the read() call may stop even if the buffer was large enough. We need the equivalent of full_read(). */ for (;;) { n = read (fd, rof->buffer + rof->filled, size - rof->filled); if (n < 0 && errno == EINTR) goto retry; if (n < 0) /* Some error. */ goto fail1; if (n + MIN_LEFTOVER > size - rof->filled) /* Allocate a larger buffer. */ break; if (n == 0) { /* Reached the end of file. */ close (fd); return 0; } rof->filled += n; } # else close (fd); return 0; # endif } } } /* Allocate a larger buffer. */ if (pagesize == 0) { pagesize = getpagesize (); size = pagesize; while (size <= MIN_LEFTOVER) size = 2 * size; } else { size = 2 * size; if (size == 0) /* Wraparound. */ goto fail1; if (rof->auxmap != NULL) munmap (rof->auxmap, rof->auxmap_length); } rof->auxmap = (void *) mmap ((void *) 0, size, PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); if (rof->auxmap == (void *) -1) { close (fd); return -1; } rof->auxmap_length = size; rof->auxmap_start = (unsigned long) rof->auxmap; rof->auxmap_end = rof->auxmap_start + size; rof->buffer = (char *) rof->auxmap; retry: /* Restart. */ if (lseek (fd, 0, SEEK_SET) < 0) { close (fd); fd = open (filename, O_RDONLY | O_CLOEXEC); if (fd < 0) goto fail2; } } fail1: close (fd); fail2: if (rof->auxmap != NULL) munmap (rof->auxmap, rof->auxmap_length); return -1; } /* Return the next byte from a read-only file stream without consuming it, or -1 at EOF. */ static int rof_peekchar (struct rofile *rof) { if (rof->position == rof->filled) { rof->eof_seen = 1; return -1; } return (unsigned char) rof->buffer[rof->position]; } /* Return the next byte from a read-only file stream, or -1 at EOF. */ static int rof_getchar (struct rofile *rof) { int c = rof_peekchar (rof); if (c >= 0) rof->position++; return c; } /* Parse an unsigned hexadecimal number from a read-only file stream. */ static int rof_scanf_lx (struct rofile *rof, unsigned long *valuep) { unsigned long value = 0; unsigned int numdigits = 0; for (;;) { int c = rof_peekchar (rof); if (c >= '0' && c <= '9') value = (value << 4) + (c - '0'); else if (c >= 'A' && c <= 'F') value = (value << 4) + (c - 'A' + 10); else if (c >= 'a' && c <= 'f') value = (value << 4) + (c - 'a' + 10); else break; rof_getchar (rof); numdigits++; } if (numdigits == 0) return -1; *valuep = value; return 0; } /* Close a read-only file stream. */ static void rof_close (struct rofile *rof) { if (rof->auxmap != NULL) munmap (rof->auxmap, rof->auxmap_length); } #endif /* Support for reading the info from a text file in the /proc file system. */ #if defined __linux__ || defined __ANDROID__ || (defined __FreeBSD_kernel__ && !defined __FreeBSD__) /* || defined __CYGWIN__ */ /* GNU/kFreeBSD mounts /proc as linprocfs, which looks like a Linux /proc file system. */ static int vma_iterate_proc (vma_iterate_callback_fn callback, void *data) { struct rofile rof; /* Open the current process' maps file. It describes one VMA per line. */ if (rof_open (&rof, "/proc/self/maps") >= 0) { unsigned long auxmap_start = rof.auxmap_start; unsigned long auxmap_end = rof.auxmap_end; for (;;) { unsigned long start, end; unsigned int flags; int c; /* Parse one line. First start and end. */ if (!(rof_scanf_lx (&rof, &start) >= 0 && rof_getchar (&rof) == '-' && rof_scanf_lx (&rof, &end) >= 0)) break; /* Then the flags. */ do c = rof_getchar (&rof); while (c == ' '); flags = 0; if (c == 'r') flags |= VMA_PROT_READ; c = rof_getchar (&rof); if (c == 'w') flags |= VMA_PROT_WRITE; c = rof_getchar (&rof); if (c == 'x') flags |= VMA_PROT_EXECUTE; while (c = rof_getchar (&rof), c != -1 && c != '\n') ; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } rof_close (&rof); return 0; } return -1; } #elif defined __FreeBSD__ || defined __DragonFly__ || defined __NetBSD__ static int vma_iterate_proc (vma_iterate_callback_fn callback, void *data) { struct rofile rof; /* Open the current process' maps file. It describes one VMA per line. */ if (rof_open (&rof, "/proc/curproc/map") >= 0) { unsigned long auxmap_start = rof.auxmap_start; unsigned long auxmap_end = rof.auxmap_end; for (;;) { unsigned long start, end; unsigned int flags; int c; /* Parse one line. First start. */ if (!(rof_getchar (&rof) == '0' && rof_getchar (&rof) == 'x' && rof_scanf_lx (&rof, &start) >= 0)) break; while (c = rof_peekchar (&rof), c == ' ' || c == '\t') rof_getchar (&rof); /* Then end. */ if (!(rof_getchar (&rof) == '0' && rof_getchar (&rof) == 'x' && rof_scanf_lx (&rof, &end) >= 0)) break; # if defined __FreeBSD__ || defined __DragonFly__ /* Then the resident pages count. */ do c = rof_getchar (&rof); while (c == ' '); do c = rof_getchar (&rof); while (c != -1 && c != '\n' && c != ' '); /* Then the private resident pages count. */ do c = rof_getchar (&rof); while (c == ' '); do c = rof_getchar (&rof); while (c != -1 && c != '\n' && c != ' '); /* Then some kernel address. */ do c = rof_getchar (&rof); while (c == ' '); do c = rof_getchar (&rof); while (c != -1 && c != '\n' && c != ' '); # endif /* Then the flags. */ do c = rof_getchar (&rof); while (c == ' '); flags = 0; if (c == 'r') flags |= VMA_PROT_READ; c = rof_getchar (&rof); if (c == 'w') flags |= VMA_PROT_WRITE; c = rof_getchar (&rof); if (c == 'x') flags |= VMA_PROT_EXECUTE; while (c = rof_getchar (&rof), c != -1 && c != '\n') ; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } rof_close (&rof); return 0; } return -1; } #elif defined __minix static int vma_iterate_proc (vma_iterate_callback_fn callback, void *data) { char fnamebuf[6+10+4+1]; char *fname; struct rofile rof; /* Construct fname = sprintf (fnamebuf+i, "/proc/%u/map", getpid ()). */ fname = fnamebuf + sizeof (fnamebuf) - (4 + 1); memcpy (fname, "/map", 4 + 1); { unsigned int value = getpid (); do *--fname = (value % 10) + '0'; while ((value = value / 10) > 0); } fname -= 6; memcpy (fname, "/proc/", 6); /* Open the current process' maps file. It describes one VMA per line. */ if (rof_open (&rof, fname) >= 0) { unsigned long auxmap_start = rof.auxmap_start; unsigned long auxmap_end = rof.auxmap_end; for (;;) { unsigned long start, end; unsigned int flags; int c; /* Parse one line. First start and end. */ if (!(rof_scanf_lx (&rof, &start) >= 0 && rof_getchar (&rof) == '-' && rof_scanf_lx (&rof, &end) >= 0)) break; /* Then the flags. */ do c = rof_getchar (&rof); while (c == ' '); flags = 0; if (c == 'r') flags |= VMA_PROT_READ; c = rof_getchar (&rof); if (c == 'w') flags |= VMA_PROT_WRITE; c = rof_getchar (&rof); if (c == 'x') flags |= VMA_PROT_EXECUTE; while (c = rof_getchar (&rof), c != -1 && c != '\n') ; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } rof_close (&rof); return 0; } return -1; } #else static inline int vma_iterate_proc (vma_iterate_callback_fn callback, void *data) { return -1; } #endif /* Support for reading the info from the BSD sysctl() system call. */ #if (defined __FreeBSD__ || defined __FreeBSD_kernel__) && defined KERN_PROC_VMMAP /* FreeBSD >= 7.1 */ static int vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) { /* Documentation: https://www.freebsd.org/cgi/man.cgi?sysctl(3) */ int info_path[] = { CTL_KERN, KERN_PROC, KERN_PROC_VMMAP, getpid () }; size_t len; size_t pagesize; size_t memneed; void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; char *mem; char *p; char *p_end; len = 0; if (sysctl (info_path, 4, NULL, &len, NULL, 0) < 0) return -1; /* Allow for small variations over time. In a multithreaded program new VMAs can be allocated at any moment. */ len = 2 * len + 200; /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ pagesize = getpagesize (); memneed = len; memneed = ((memneed - 1) / pagesize + 1) * pagesize; auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); if (auxmap == (void *) -1) return -1; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; mem = (char *) auxmap; if (sysctl (info_path, 4, mem, &len, NULL, 0) < 0) { munmap (auxmap, memneed); return -1; } p = mem; p_end = mem + len; while (p < p_end) { struct kinfo_vmentry *kve = (struct kinfo_vmentry *) p; unsigned long start = kve->kve_start; unsigned long end = kve->kve_end; unsigned int flags = 0; if (kve->kve_protection & KVME_PROT_READ) flags |= VMA_PROT_READ; if (kve->kve_protection & KVME_PROT_WRITE) flags |= VMA_PROT_WRITE; if (kve->kve_protection & KVME_PROT_EXEC) flags |= VMA_PROT_EXECUTE; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } p += kve->kve_structsize; } munmap (auxmap, memneed); return 0; } #elif defined __NetBSD__ && defined VM_PROC_MAP /* NetBSD >= 8.0 */ static int vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) { /* Documentation: https://man.netbsd.org/man/sysctl+7 */ unsigned int entry_size = /* If we wanted to have the path of each entry, we would need sizeof (struct kinfo_vmentry). But we need only the non-string parts of each entry. */ offsetof (struct kinfo_vmentry, kve_path); int info_path[] = { CTL_VM, VM_PROC, VM_PROC_MAP, getpid (), entry_size }; size_t len; size_t pagesize; size_t memneed; void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; char *mem; char *p; char *p_end; len = 0; if (sysctl (info_path, 5, NULL, &len, NULL, 0) < 0) return -1; /* Allow for small variations over time. In a multithreaded program new VMAs can be allocated at any moment. */ len = 2 * len + 10 * entry_size; /* But the system call rejects lengths > 1 MB. */ if (len > 0x100000) len = 0x100000; /* And the system call causes a kernel panic if the length is not a multiple of entry_size. */ len = (len / entry_size) * entry_size; /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ pagesize = getpagesize (); memneed = len; memneed = ((memneed - 1) / pagesize + 1) * pagesize; auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); if (auxmap == (void *) -1) return -1; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; mem = (char *) auxmap; if (sysctl (info_path, 5, mem, &len, NULL, 0) < 0 || len > 0x100000 - entry_size) { /* sysctl failed, or the list of VMAs is possibly truncated. */ munmap (auxmap, memneed); return -1; } p = mem; p_end = mem + len; while (p < p_end) { struct kinfo_vmentry *kve = (struct kinfo_vmentry *) p; unsigned long start = kve->kve_start; unsigned long end = kve->kve_end; unsigned int flags = 0; if (kve->kve_protection & KVME_PROT_READ) flags |= VMA_PROT_READ; if (kve->kve_protection & KVME_PROT_WRITE) flags |= VMA_PROT_WRITE; if (kve->kve_protection & KVME_PROT_EXEC) flags |= VMA_PROT_EXECUTE; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } p += entry_size; } munmap (auxmap, memneed); return 0; } #elif defined __OpenBSD__ && defined KERN_PROC_VMMAP /* OpenBSD >= 5.7 */ static int vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) { /* Documentation: https://man.openbsd.org/sysctl.2 */ int info_path[] = { CTL_KERN, KERN_PROC_VMMAP, getpid () }; size_t len; size_t pagesize; size_t memneed; void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; char *mem; char *p; char *p_end; len = 0; if (sysctl (info_path, 3, NULL, &len, NULL, 0) < 0) return -1; /* Allow for small variations over time. In a multithreaded program new VMAs can be allocated at any moment. */ len = 2 * len + 10 * sizeof (struct kinfo_vmentry); /* But the system call rejects lengths > 64 KB. */ if (len > 0x10000) len = 0x10000; /* And the system call rejects lengths that are not a multiple of sizeof (struct kinfo_vmentry). */ len = (len / sizeof (struct kinfo_vmentry)) * sizeof (struct kinfo_vmentry); /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ pagesize = getpagesize (); memneed = len; memneed = ((memneed - 1) / pagesize + 1) * pagesize; auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); if (auxmap == (void *) -1) return -1; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; mem = (char *) auxmap; if (sysctl (info_path, 3, mem, &len, NULL, 0) < 0 || len > 0x10000 - sizeof (struct kinfo_vmentry)) { /* sysctl failed, or the list of VMAs is possibly truncated. */ munmap (auxmap, memneed); return -1; } p = mem; p_end = mem + len; while (p < p_end) { struct kinfo_vmentry *kve = (struct kinfo_vmentry *) p; unsigned long start = kve->kve_start; unsigned long end = kve->kve_end; unsigned int flags = 0; if (kve->kve_protection & KVE_PROT_READ) flags |= VMA_PROT_READ; if (kve->kve_protection & KVE_PROT_WRITE) flags |= VMA_PROT_WRITE; if (kve->kve_protection & KVE_PROT_EXEC) flags |= VMA_PROT_EXECUTE; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (start != end) if (callback (data, start, end, flags)) break; } p += sizeof (struct kinfo_vmentry); } munmap (auxmap, memneed); return 0; } #else static inline int vma_iterate_bsd (vma_iterate_callback_fn callback, void *data) { return -1; } #endif int vma_iterate (vma_iterate_callback_fn callback, void *data) { #if defined __linux__ || defined __ANDROID__ || defined __FreeBSD_kernel__ || defined __FreeBSD__ || defined __DragonFly__ || defined __NetBSD__ || defined __minix /* || defined __CYGWIN__ */ # if defined __FreeBSD__ /* On FreeBSD with procfs (but not GNU/kFreeBSD, which uses linprocfs), the function vma_iterate_proc does not return the virtual memory areas that were created by anonymous mmap. See So use vma_iterate_proc only as a fallback. */ int retval = vma_iterate_bsd (callback, data); if (retval == 0) return 0; return vma_iterate_proc (callback, data); # else /* On the other platforms, try the /proc approach first, and the sysctl() as a fallback. */ int retval = vma_iterate_proc (callback, data); if (retval == 0) return 0; return vma_iterate_bsd (callback, data); # endif #elif defined _AIX /* AIX */ /* On AIX, there is a /proc/$pic/map file, that contains records of type prmap_t, defined in . In older versions of AIX, it lists only the virtual memory areas that are connected to a file, not the anonymous ones. But at least since AIX 7.1, it is well usable. */ size_t pagesize; char fnamebuf[6+10+4+1]; char *fname; int fd; size_t memneed; pagesize = getpagesize (); /* Construct fname = sprintf (fnamebuf+i, "/proc/%u/map", getpid ()). */ fname = fnamebuf + sizeof (fnamebuf) - (4+1); memcpy (fname, "/map", 4+1); { unsigned int value = getpid (); do *--fname = (value % 10) + '0'; while ((value = value / 10) > 0); } fname -= 6; memcpy (fname, "/proc/", 6); fd = open (fname, O_RDONLY | O_CLOEXEC); if (fd < 0) return -1; /* The contents of /proc//map contains a number of prmap_t entries, then an entirely null prmap_t entry, then a heap of NUL terminated strings. Documentation: https://www.ibm.com/docs/en/aix/7.1?topic=files-proc-file We read the entire contents, but look only at the prmap_t entries and ignore the tail part. */ for (memneed = 2 * pagesize; ; memneed = 2 * memneed) { /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA if it occurs among the resulting VMAs. (Normally it doesn't, because it was allocated after the open() call.) */ void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; ssize_t nbytes; auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, MAP_ANONYMOUS | MAP_PRIVATE, -1, 0); if (auxmap == (void *) -1) { close (fd); return -1; } auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; /* Read the contents of /proc//map in a single system call. This guarantees a consistent result (no duplicated or omitted entries). */ retry: do nbytes = read (fd, auxmap, memneed); while (nbytes < 0 && errno == EINTR); if (nbytes <= 0) { munmap (auxmap, memneed); close (fd); return -1; } if (nbytes == memneed) { /* Need more memory. */ munmap (auxmap, memneed); if (lseek (fd, 0, SEEK_SET) < 0) { close (fd); return -1; } } else { if (read (fd, (char *) auxmap + nbytes, 1) > 0) { /* Oops, we had a short read. Retry. */ if (lseek (fd, 0, SEEK_SET) < 0) { munmap (auxmap, memneed); close (fd); return -1; } goto retry; } /* We now have the entire contents of /proc//map in memory. */ prmap_t* maps = (prmap_t *) auxmap; /* The entries are not sorted by address. Therefore 1. Extract the relevant information into an array. 2. Sort the array in ascending order. 3. Invoke the callback. */ typedef struct { uintptr_t start; uintptr_t end; unsigned int flags; } vma_t; /* Since 2 * sizeof (vma_t) <= sizeof (prmap_t), we can reuse the same memory. */ vma_t *vmas = (vma_t *) auxmap; vma_t *vp = vmas; { prmap_t* mp; for (mp = maps;;) { unsigned long start, end; start = (unsigned long) mp->pr_vaddr; end = start + mp->pr_size; if (start == 0 && end == 0 && mp->pr_mflags == 0) break; /* Discard empty VMAs and kernel VMAs. */ if (start < end && (mp->pr_mflags & MA_KERNTEXT) == 0) { unsigned int flags; flags = 0; if (mp->pr_mflags & MA_READ) flags |= VMA_PROT_READ; if (mp->pr_mflags & MA_WRITE) flags |= VMA_PROT_WRITE; if (mp->pr_mflags & MA_EXEC) flags |= VMA_PROT_EXECUTE; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) { vp->start = start; vp->end = auxmap_start; vp->flags = flags; vp++; } if (auxmap_end - 1 < end - 1) { vp->start = auxmap_end; vp->end = end; vp->flags = flags; vp++; } } else { vp->start = start; vp->end = end; vp->flags = flags; vp++; } } mp++; } } size_t nvmas = vp - vmas; /* Sort the array in ascending order. Better not call qsort(), since it may call malloc(). Insertion-sort is OK in this case, despite its worst-case running time of O(N²), since the number of VMAs will rarely be larger than 1000. */ { size_t i; for (i = 1; i < nvmas; i++) { /* Invariant: Here vmas[0..i-1] is sorted. */ size_t j; for (j = i; j > 0 && vmas[j - 1].start > vmas[j].start; j--) { vma_t tmp = vmas[j - 1]; vmas[j - 1] = vmas[j]; vmas[j] = tmp; } /* Invariant: Here vmas[0..i] is sorted. */ } } /* Invoke the callback. */ { size_t i; for (i = 0; i < nvmas; i++) { vma_t *vpi = &vmas[i]; if (callback (data, vpi->start, vpi->end, vpi->flags)) break; } } munmap (auxmap, memneed); break; } } close (fd); return 0; #elif defined __sgi || defined __osf__ /* IRIX, OSF/1 */ size_t pagesize; char fnamebuf[6+10+1]; char *fname; int fd; int nmaps; size_t memneed; # if HAVE_MAP_ANONYMOUS # define zero_fd -1 # define map_flags MAP_ANONYMOUS # else int zero_fd; # define map_flags 0 # endif void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; prmap_t* maps; prmap_t* mp; pagesize = getpagesize (); /* Construct fname = sprintf (fnamebuf+i, "/proc/%u", getpid ()). */ fname = fnamebuf + sizeof (fnamebuf) - 1; *fname = '\0'; { unsigned int value = getpid (); do *--fname = (value % 10) + '0'; while ((value = value / 10) > 0); } fname -= 6; memcpy (fname, "/proc/", 6); fd = open (fname, O_RDONLY | O_CLOEXEC); if (fd < 0) return -1; if (ioctl (fd, PIOCNMAP, &nmaps) < 0) goto fail2; memneed = (nmaps + 10) * sizeof (prmap_t); /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ memneed = ((memneed - 1) / pagesize + 1) * pagesize; # if !HAVE_MAP_ANONYMOUS zero_fd = open ("/dev/zero", O_RDONLY | O_CLOEXEC, 0644); if (zero_fd < 0) goto fail2; # endif auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, map_flags | MAP_PRIVATE, zero_fd, 0); # if !HAVE_MAP_ANONYMOUS close (zero_fd); # endif if (auxmap == (void *) -1) goto fail2; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; maps = (prmap_t *) auxmap; if (ioctl (fd, PIOCMAP, maps) < 0) goto fail1; for (mp = maps;;) { unsigned long start, end; unsigned int flags; start = (unsigned long) mp->pr_vaddr; end = start + mp->pr_size; if (start == 0 && end == 0) break; flags = 0; if (mp->pr_mflags & MA_READ) flags |= VMA_PROT_READ; if (mp->pr_mflags & MA_WRITE) flags |= VMA_PROT_WRITE; if (mp->pr_mflags & MA_EXEC) flags |= VMA_PROT_EXECUTE; mp++; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } munmap (auxmap, memneed); close (fd); return 0; fail1: munmap (auxmap, memneed); fail2: close (fd); return -1; #elif defined __sun /* Solaris */ /* Note: Solaris defines a different type prmap_t with _STRUCTURED_PROC than without! Here's a table of sizeof(prmap_t): 32-bit 64-bit _STRUCTURED_PROC = 0 32 56 _STRUCTURED_PROC = 1 96 104 Therefore, if the include files provide the newer API, prmap_t has the bigger size, and thus you MUST use the newer API. And if the include files provide the older API, prmap_t has the smaller size, and thus you MUST use the older API. */ # if defined PIOCNMAP && defined PIOCMAP /* We must use the older /proc interface. */ size_t pagesize; char fnamebuf[6+10+1]; char *fname; int fd; int nmaps; size_t memneed; # if HAVE_MAP_ANONYMOUS # define zero_fd -1 # define map_flags MAP_ANONYMOUS # else /* Solaris <= 7 */ int zero_fd; # define map_flags 0 # endif void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; prmap_t* maps; prmap_t* mp; pagesize = getpagesize (); /* Construct fname = sprintf (fnamebuf+i, "/proc/%u", getpid ()). */ fname = fnamebuf + sizeof (fnamebuf) - 1; *fname = '\0'; { unsigned int value = getpid (); do *--fname = (value % 10) + '0'; while ((value = value / 10) > 0); } fname -= 6; memcpy (fname, "/proc/", 6); fd = open (fname, O_RDONLY | O_CLOEXEC); if (fd < 0) return -1; if (ioctl (fd, PIOCNMAP, &nmaps) < 0) goto fail2; memneed = (nmaps + 10) * sizeof (prmap_t); /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ memneed = ((memneed - 1) / pagesize + 1) * pagesize; # if !HAVE_MAP_ANONYMOUS zero_fd = open ("/dev/zero", O_RDONLY | O_CLOEXEC, 0644); if (zero_fd < 0) goto fail2; # endif auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, map_flags | MAP_PRIVATE, zero_fd, 0); # if !HAVE_MAP_ANONYMOUS close (zero_fd); # endif if (auxmap == (void *) -1) goto fail2; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; maps = (prmap_t *) auxmap; if (ioctl (fd, PIOCMAP, maps) < 0) goto fail1; for (mp = maps;;) { unsigned long start, end; unsigned int flags; start = (unsigned long) mp->pr_vaddr; end = start + mp->pr_size; if (start == 0 && end == 0) break; flags = 0; if (mp->pr_mflags & MA_READ) flags |= VMA_PROT_READ; if (mp->pr_mflags & MA_WRITE) flags |= VMA_PROT_WRITE; if (mp->pr_mflags & MA_EXEC) flags |= VMA_PROT_EXECUTE; mp++; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } munmap (auxmap, memneed); close (fd); return 0; fail1: munmap (auxmap, memneed); fail2: close (fd); return -1; # else /* We must use the newer /proc interface. Documentation: https://docs.oracle.com/cd/E23824_01/html/821-1473/proc-4.html The contents of /proc//map consists of records of type prmap_t. These are different in 32-bit and 64-bit processes, but here we are fortunately accessing only the current process. */ size_t pagesize; char fnamebuf[6+10+4+1]; char *fname; int fd; int nmaps; size_t memneed; # if HAVE_MAP_ANONYMOUS # define zero_fd -1 # define map_flags MAP_ANONYMOUS # else /* Solaris <= 7 */ int zero_fd; # define map_flags 0 # endif void *auxmap; unsigned long auxmap_start; unsigned long auxmap_end; prmap_t* maps; prmap_t* maps_end; prmap_t* mp; pagesize = getpagesize (); /* Construct fname = sprintf (fnamebuf+i, "/proc/%u/map", getpid ()). */ fname = fnamebuf + sizeof (fnamebuf) - 1 - 4; memcpy (fname, "/map", 4 + 1); { unsigned int value = getpid (); do *--fname = (value % 10) + '0'; while ((value = value / 10) > 0); } fname -= 6; memcpy (fname, "/proc/", 6); fd = open (fname, O_RDONLY | O_CLOEXEC); if (fd < 0) return -1; { struct stat statbuf; if (fstat (fd, &statbuf) < 0) goto fail2; nmaps = statbuf.st_size / sizeof (prmap_t); } memneed = (nmaps + 10) * sizeof (prmap_t); /* Allocate memneed bytes of memory. We cannot use alloca here, because not much stack space is guaranteed. We also cannot use malloc here, because a malloc() call may call mmap() and thus pre-allocate available memory. So use mmap(), and ignore the resulting VMA. */ memneed = ((memneed - 1) / pagesize + 1) * pagesize; # if !HAVE_MAP_ANONYMOUS zero_fd = open ("/dev/zero", O_RDONLY | O_CLOEXEC, 0644); if (zero_fd < 0) goto fail2; # endif auxmap = (void *) mmap ((void *) 0, memneed, PROT_READ | PROT_WRITE, map_flags | MAP_PRIVATE, zero_fd, 0); # if !HAVE_MAP_ANONYMOUS close (zero_fd); # endif if (auxmap == (void *) -1) goto fail2; auxmap_start = (unsigned long) auxmap; auxmap_end = auxmap_start + memneed; maps = (prmap_t *) auxmap; /* Read up to memneed bytes from fd into maps. */ { size_t remaining = memneed; size_t total_read = 0; char *ptr = (char *) maps; do { size_t nread = read (fd, ptr, remaining); if (nread == (size_t)-1) { if (errno == EINTR) continue; goto fail1; } if (nread == 0) /* EOF */ break; total_read += nread; ptr += nread; remaining -= nread; } while (remaining > 0); nmaps = (memneed - remaining) / sizeof (prmap_t); maps_end = maps + nmaps; } for (mp = maps; mp < maps_end; mp++) { unsigned long start, end; unsigned int flags; start = (unsigned long) mp->pr_vaddr; end = start + mp->pr_size; flags = 0; if (mp->pr_mflags & MA_READ) flags |= VMA_PROT_READ; if (mp->pr_mflags & MA_WRITE) flags |= VMA_PROT_WRITE; if (mp->pr_mflags & MA_EXEC) flags |= VMA_PROT_EXECUTE; if (start <= auxmap_start && auxmap_end - 1 <= end - 1) { /* Consider [start,end-1] \ [auxmap_start,auxmap_end-1] = [start,auxmap_start-1] u [auxmap_end,end-1]. */ if (start < auxmap_start) if (callback (data, start, auxmap_start, flags)) break; if (auxmap_end - 1 < end - 1) if (callback (data, auxmap_end, end, flags)) break; } else { if (callback (data, start, end, flags)) break; } } munmap (auxmap, memneed); close (fd); return 0; fail1: munmap (auxmap, memneed); fail2: close (fd); return -1; # endif #elif HAVE_PSTAT_GETPROCVM /* HP-UX */ unsigned long pagesize = getpagesize (); int i; for (i = 0; ; i++) { struct pst_vm_status info; int ret = pstat_getprocvm (&info, sizeof (info), 0, i); if (ret < 0) return -1; if (ret == 0) break; { unsigned long start = info.pst_vaddr; unsigned long end = start + info.pst_length * pagesize; unsigned int flags = 0; if (info.pst_permission & PS_PROT_READ) flags |= VMA_PROT_READ; if (info.pst_permission & PS_PROT_WRITE) flags |= VMA_PROT_WRITE; if (info.pst_permission & PS_PROT_EXECUTE) flags |= VMA_PROT_EXECUTE; if (callback (data, start, end, flags)) break; } } #elif defined __APPLE__ && defined __MACH__ /* Mac OS X */ task_t task = mach_task_self (); vm_address_t address; vm_size_t size; for (address = VM_MIN_ADDRESS;; address += size) { int more; mach_port_t object_name; unsigned int flags; /* In Mac OS X 10.5, the types vm_address_t, vm_offset_t, vm_size_t have 32 bits in 32-bit processes and 64 bits in 64-bit processes. Whereas mach_vm_address_t and mach_vm_size_t are always 64 bits large. Mac OS X 10.5 has three vm_region like methods: - vm_region. It has arguments that depend on whether the current process is 32-bit or 64-bit. When linking dynamically, this function exists only in 32-bit processes. Therefore we use it only in 32-bit processes. - vm_region_64. It has arguments that depend on whether the current process is 32-bit or 64-bit. It interprets a flavor VM_REGION_BASIC_INFO as VM_REGION_BASIC_INFO_64, which is dangerous since 'struct vm_region_basic_info_64' is larger than 'struct vm_region_basic_info'; therefore let's write VM_REGION_BASIC_INFO_64 explicitly. - mach_vm_region. It has arguments that are 64-bit always. This function is useful when you want to access the VM of a process other than the current process. In 64-bit processes, we could use vm_region_64 or mach_vm_region. I choose vm_region_64 because it uses the same types as vm_region, resulting in less conditional code. */ # if defined __aarch64__ || defined __ppc64__ || defined __x86_64__ struct vm_region_basic_info_64 info; mach_msg_type_number_t info_count = VM_REGION_BASIC_INFO_COUNT_64; more = (vm_region_64 (task, &address, &size, VM_REGION_BASIC_INFO_64, (vm_region_info_t)&info, &info_count, &object_name) == KERN_SUCCESS); # else struct vm_region_basic_info info; mach_msg_type_number_t info_count = VM_REGION_BASIC_INFO_COUNT; more = (vm_region (task, &address, &size, VM_REGION_BASIC_INFO, (vm_region_info_t)&info, &info_count, &object_name) == KERN_SUCCESS); # endif if (object_name != MACH_PORT_NULL) mach_port_deallocate (mach_task_self (), object_name); if (!more) break; flags = 0; if (info.protection & VM_PROT_READ) flags |= VMA_PROT_READ; if (info.protection & VM_PROT_WRITE) flags |= VMA_PROT_WRITE; if (info.protection & VM_PROT_EXECUTE) flags |= VMA_PROT_EXECUTE; if (callback (data, address, address + size, flags)) break; } return 0; #elif defined __GNU__ /* GNU/Hurd */ /* The Hurd has a /proc/self/maps that looks like the Linux one, but it lacks the VMAs created through anonymous mmap. Therefore use the Mach API. Documentation: https://www.gnu.org/software/hurd/gnumach-doc/Memory-Attributes.html */ task_t task = mach_task_self (); vm_address_t address; vm_size_t size; for (address = 0;; address += size) { vm_prot_t protection; vm_prot_t max_protection; vm_inherit_t inheritance; boolean_t shared; memory_object_name_t object_name; vm_offset_t offset; unsigned int flags; if (!(vm_region (task, &address, &size, &protection, &max_protection, &inheritance, &shared, &object_name, &offset) == KERN_SUCCESS)) break; mach_port_deallocate (task, object_name); flags = 0; if (protection & VM_PROT_READ) flags |= VMA_PROT_READ; if (protection & VM_PROT_WRITE) flags |= VMA_PROT_WRITE; if (protection & VM_PROT_EXECUTE) flags |= VMA_PROT_EXECUTE; if (callback (data, address, address + size, flags)) break; } return 0; #elif defined _WIN32 || defined __CYGWIN__ /* Windows platform. Use the native Windows API. */ MEMORY_BASIC_INFORMATION info; uintptr_t address = 0; while (VirtualQuery ((void*)address, &info, sizeof(info)) == sizeof(info)) { if (info.State != MEM_FREE) /* Ignore areas where info.State has the value MEM_RESERVE or, equivalently, info.Protect has the undocumented value 0. This is needed, so that on Cygwin, areas used by malloc() are distinguished from areas reserved for future malloc(). */ if (info.State != MEM_RESERVE) { uintptr_t start, end; unsigned int flags; start = (uintptr_t)info.BaseAddress; end = start + info.RegionSize; switch (info.Protect & ~(PAGE_GUARD|PAGE_NOCACHE)) { case PAGE_READONLY: flags = VMA_PROT_READ; break; case PAGE_READWRITE: case PAGE_WRITECOPY: flags = VMA_PROT_READ | VMA_PROT_WRITE; break; case PAGE_EXECUTE: flags = VMA_PROT_EXECUTE; break; case PAGE_EXECUTE_READ: flags = VMA_PROT_READ | VMA_PROT_EXECUTE; break; case PAGE_EXECUTE_READWRITE: case PAGE_EXECUTE_WRITECOPY: flags = VMA_PROT_READ | VMA_PROT_WRITE | VMA_PROT_EXECUTE; break; case PAGE_NOACCESS: default: flags = 0; break; } if (callback (data, start, end, flags)) break; } address = (uintptr_t)info.BaseAddress + info.RegionSize; } return 0; #elif defined __BEOS__ || defined __HAIKU__ /* Use the BeOS specific API. */ area_info info; ssize_t cookie; cookie = 0; while (get_next_area_info (0, &cookie, &info) == B_OK) { unsigned long start, end; unsigned int flags; start = (unsigned long) info.address; end = start + info.size; flags = 0; if (info.protection & B_READ_AREA) flags |= VMA_PROT_READ | VMA_PROT_EXECUTE; if (info.protection & B_WRITE_AREA) flags |= VMA_PROT_WRITE; if (callback (data, start, end, flags)) break; } return 0; #elif HAVE_MQUERY /* OpenBSD */ # if defined __OpenBSD__ /* Try sysctl() first. It is more efficient than the mquery() loop below and also provides the flags. */ { int retval = vma_iterate_bsd (callback, data); if (retval == 0) return 0; } # endif { uintptr_t pagesize; uintptr_t address; int /*bool*/ address_known_mapped; pagesize = getpagesize (); /* Avoid calling mquery with a NULL first argument, because this argument value has a specific meaning. We know the NULL page is unmapped. */ address = pagesize; address_known_mapped = 0; for (;;) { /* Test whether the page at address is mapped. */ if (address_known_mapped || mquery ((void *) address, pagesize, 0, MAP_FIXED, -1, 0) == (void *) -1) { /* The page at address is mapped. This is the start of an interval. */ uintptr_t start = address; uintptr_t end; /* Find the end of the interval. */ end = (uintptr_t) mquery ((void *) address, pagesize, 0, 0, -1, 0); if (end == (uintptr_t) (void *) -1) end = 0; /* wrap around */ address = end; /* It's too complicated to find out about the flags. Just pass 0. */ if (callback (data, start, end, 0)) break; if (address < pagesize) /* wrap around? */ break; } /* Here we know that the page at address is unmapped. */ { uintptr_t query_size = pagesize; address += pagesize; /* Query larger and larger blocks, to get through the unmapped address range with few mquery() calls. */ for (;;) { if (2 * query_size > query_size) query_size = 2 * query_size; if (address + query_size - 1 < query_size) /* wrap around? */ { address_known_mapped = 0; break; } if (mquery ((void *) address, query_size, 0, MAP_FIXED, -1, 0) == (void *) -1) { /* Not all the interval [address .. address + query_size - 1] is unmapped. */ address_known_mapped = (query_size == pagesize); break; } /* The interval [address .. address + query_size - 1] is unmapped. */ address += query_size; } /* Reduce the query size again, to determine the precise size of the unmapped interval that starts at address. */ while (query_size > pagesize) { query_size = query_size / 2; if (address + query_size - 1 >= query_size) { if (mquery ((void *) address, query_size, 0, MAP_FIXED, -1, 0) != (void *) -1) { /* The interval [address .. address + query_size - 1] is unmapped. */ address += query_size; address_known_mapped = 0; } else address_known_mapped = (query_size == pagesize); } } /* Here again query_size = pagesize, and either address + pagesize - 1 < pagesize, or mquery ((void *) address, pagesize, 0, MAP_FIXED, -1, 0) fails. So, the unmapped area ends at address. */ } if (address + pagesize - 1 < pagesize) /* wrap around? */ break; } return 0; } #else /* Not implemented. */ return -1; #endif } #ifdef TEST #include /* Output the VMAs of the current process in a format similar to the Linux /proc/$pid/maps file. */ static int vma_iterate_callback (void *data, uintptr_t start, uintptr_t end, unsigned int flags) { printf ("%08lx-%08lx %c%c%c\n", (unsigned long) start, (unsigned long) end, flags & VMA_PROT_READ ? 'r' : '-', flags & VMA_PROT_WRITE ? 'w' : '-', flags & VMA_PROT_EXECUTE ? 'x' : '-'); return 0; } int main () { vma_iterate (vma_iterate_callback, NULL); /* Let the user interactively look at the /proc file system. */ sleep (10); return 0; } /* * Local Variables: * compile-command: "gcc -ggdb -DTEST -Wall -I.. vma-iter.c" * End: */ #endif /* TEST */ libffcall-2.5/gnulib-lib/getprogname.c0000664000000000000000000002361014631432055014674 00000000000000/* Program name management. Copyright (C) 2016-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. Also get __argv declaration. */ #include #include /* get program_invocation_name declaration */ #ifdef _AIX # include # include # include #endif #ifdef __MVS__ # ifndef _OPEN_SYS # define _OPEN_SYS # endif # include # include #endif #ifdef __hpux # include # include # include # include #endif #if defined __sgi || defined __osf__ # include # include # include # include # include #endif #if defined __SCO_VERSION__ || defined __sysv5__ # include # include #endif #include "basename-lgpl.h" #ifndef HAVE_GETPROGNAME /* not Mac OS X, FreeBSD, NetBSD, OpenBSD >= 5.4, Solaris >= 11, Cygwin, Android API level >= 21 */ char const * getprogname (void) { # if HAVE_DECL_PROGRAM_INVOCATION_SHORT_NAME /* glibc, BeOS */ /* https://www.gnu.org/software/libc/manual/html_node/Error-Messages.html */ return program_invocation_short_name; # elif HAVE_DECL_PROGRAM_INVOCATION_NAME /* glibc, BeOS */ /* https://www.gnu.org/software/libc/manual/html_node/Error-Messages.html */ return last_component (program_invocation_name); # elif HAVE_GETEXECNAME /* Solaris */ /* https://docs.oracle.com/cd/E19253-01/816-5168/6mbb3hrb1/index.html */ const char *p = getexecname (); if (!p) p = "?"; return last_component (p); # elif HAVE_DECL___ARGV /* mingw, MSVC */ /* https://docs.microsoft.com/en-us/cpp/c-runtime-library/argc-argv-wargv */ const char *p = __argv && __argv[0] ? __argv[0] : "?"; return last_component (p); # elif HAVE_VAR___PROGNAME /* OpenBSD, Android, QNX */ /* https://man.openbsd.org/style.9 */ /* http://www.qnx.de/developers/docs/6.5.0/index.jsp?topic=%2Fcom.qnx.doc.neutrino_lib_ref%2Fp%2F__progname.html */ /* Be careful to declare this only when we absolutely need it (OpenBSD 5.1), rather than when it's available. Otherwise, its mere declaration makes program_invocation_short_name malfunction (have zero length) with Fedora 25's glibc. */ extern char *__progname; const char *p = __progname; # if defined __ANDROID__ return last_component (p); # else return p && p[0] ? p : "?"; # endif # elif _AIX /* AIX */ /* Idea by Bastien ROUCARIÈS, https://lists.gnu.org/r/bug-gnulib/2010-12/msg00095.html Reference: https://www.ibm.com/support/knowledgecenter/en/ssw_aix_61/com.ibm.aix.basetrf1/getprocs.htm */ static char *p; static int first = 1; if (first) { first = 0; pid_t pid = getpid (); struct procentry64 procs; p = (0 < getprocs64 (&procs, sizeof procs, NULL, 0, &pid, 1) ? strdup (procs.pi_comm) : NULL); if (!p) p = "?"; } return p; # elif defined __hpux static char *p; static int first = 1; if (first) { first = 0; pid_t pid = getpid (); struct pst_status status; if (pstat_getproc (&status, sizeof status, 0, pid) > 0) { char *ucomm = status.pst_ucomm; char *cmd = status.pst_cmd; if (strlen (ucomm) < PST_UCOMMLEN - 1) p = ucomm; else { /* ucomm is truncated to length PST_UCOMMLEN - 1. Look at cmd instead. */ char *space = strchr (cmd, ' '); if (space != NULL) *space = '\0'; p = strrchr (cmd, '/'); if (p != NULL) p++; else p = cmd; if (strlen (p) > PST_UCOMMLEN - 1 && memcmp (p, ucomm, PST_UCOMMLEN - 1) == 0) /* p is less truncated than ucomm. */ ; else p = ucomm; } p = strdup (p); } else { # if !defined __LP64__ /* Support for 32-bit programs running in 64-bit HP-UX. The documented way to do this is to use the same source code as above, but in a compilation unit where '#define _PSTAT64 1' is in effect. I prefer a single compilation unit; the struct size and the offsets are not going to change. */ char status64[1216]; if (__pstat_getproc64 (status64, sizeof status64, 0, pid) > 0) { char *ucomm = status64 + 288; char *cmd = status64 + 168; if (strlen (ucomm) < PST_UCOMMLEN - 1) p = ucomm; else { /* ucomm is truncated to length PST_UCOMMLEN - 1. Look at cmd instead. */ char *space = strchr (cmd, ' '); if (space != NULL) *space = '\0'; p = strrchr (cmd, '/'); if (p != NULL) p++; else p = cmd; if (strlen (p) > PST_UCOMMLEN - 1 && memcmp (p, ucomm, PST_UCOMMLEN - 1) == 0) /* p is less truncated than ucomm. */ ; else p = ucomm; } p = strdup (p); } else # endif p = NULL; } if (!p) p = "?"; } return p; # elif __MVS__ /* z/OS */ /* https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/rtwgetp.htm */ static char *p = "?"; static int first = 1; if (first) { pid_t pid = getpid (); int token; W_PSPROC buf; first = 0; memset (&buf, 0, sizeof(buf)); buf.ps_cmdptr = (char *) malloc (buf.ps_cmdlen = PS_CMDBLEN_LONG); buf.ps_conttyptr = (char *) malloc (buf.ps_conttylen = PS_CONTTYBLEN); buf.ps_pathptr = (char *) malloc (buf.ps_pathlen = PS_PATHBLEN); if (buf.ps_cmdptr && buf.ps_conttyptr && buf.ps_pathptr) { for (token = 0; token >= 0; token = w_getpsent (token, &buf, sizeof(buf))) { if (token > 0 && buf.ps_pid == pid) { char *s = strdup (last_component (buf.ps_pathptr)); if (s) { # if defined __XPLINK__ && __CHARSET_LIB == 1 /* The compiler option -qascii is in use. https://makingdeveloperslivesbetter.wordpress.com/2022/01/07/is-z-os-ascii-or-ebcdic-yes/ https://www.ibm.com/docs/en/zos/2.5.0?topic=features-macros-related-compiler-option-settings So, convert the result from EBCDIC to ASCII. https://www.ibm.com/docs/en/zos/2.5.0?topic=functions-e2a-s-convert-string-from-ebcdic-ascii */ if (__e2a_s (s) == (size_t)-1) free (s); else # endif p = s; } break; } } } free (buf.ps_cmdptr); free (buf.ps_conttyptr); free (buf.ps_pathptr); } return p; # elif defined __sgi || defined __osf__ /* IRIX or Tru64 */ char filename[50]; int fd; # if defined __sgi sprintf (filename, "/proc/pinfo/%d", (int) getpid ()); # else sprintf (filename, "/proc/%d", (int) getpid ()); # endif fd = open (filename, O_RDONLY | O_CLOEXEC); if (0 <= fd) { prpsinfo_t buf; int ioctl_ok = 0 <= ioctl (fd, PIOCPSINFO, &buf); close (fd); if (ioctl_ok) { char *name = buf.pr_fname; size_t namesize = sizeof buf.pr_fname; /* It may not be NUL-terminated. */ char *namenul = memchr (name, '\0', namesize); size_t namelen = namenul ? namenul - name : namesize; char *namecopy = malloc (namelen + 1); if (namecopy) { namecopy[namelen] = '\0'; return memcpy (namecopy, name, namelen); } } } return NULL; # elif defined __SCO_VERSION__ || defined __sysv5__ /* SCO OpenServer6/UnixWare */ char buf[80]; int fd; sprintf (buf, "/proc/%d/cmdline", getpid()); fd = open (buf, O_RDONLY); if (0 <= fd) { size_t n = read (fd, buf, 79); if (n > 0) { buf[n] = '\0'; /* Guarantee null-termination */ char *progname; progname = strrchr (buf, '/'); if (progname) { progname = progname + 1; /* Skip the '/' */ } else { progname = buf; } char *ret; ret = malloc (strlen (progname) + 1); if (ret) { strcpy (ret, progname); return ret; } } close (fd); } return "?"; # else # error "getprogname module not ported to this OS" # endif } #endif /* * Hey Emacs! * Local Variables: * coding: utf-8 * End: */ libffcall-2.5/gnulib-lib/cloexec.h0000664000000000000000000000303614631432055014013 00000000000000/* cloexec.c - set or clear the close-on-exec descriptor flag Copyright (C) 2004, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifdef __cplusplus extern "C" { #endif /* Set the 'FD_CLOEXEC' flag of DESC if VALUE is true, or clear the flag if VALUE is false. Return 0 on success, or -1 on error with 'errno' set. Note that on MingW, this function does NOT protect DESC from being inherited into spawned children. Instead, either use dup_cloexec followed by closing the original DESC, or use interfaces such as open or pipe2 that accept flags like O_CLOEXEC to create DESC non-inheritable in the first place. */ int set_cloexec_flag (int desc, bool value); /* Duplicates a file handle FD, while marking the copy to be closed prior to exec or spawn. Returns -1 and sets errno if FD could not be duplicated. */ int dup_cloexec (int fd); #ifdef __cplusplus } #endif libffcall-2.5/gnulib-lib/size_max.h0000664000000000000000000000243414631432055014211 00000000000000/* size_max.h -- declare SIZE_MAX through system headers Copyright (C) 2005-2006, 2009-2024 Free Software Foundation, Inc. Written by Simon Josefsson. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef GNULIB_SIZE_MAX_H #define GNULIB_SIZE_MAX_H /* This file uses HAVE_STDINT_H. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Get SIZE_MAX declaration on systems like Solaris 7/8/9. */ # include /* Get SIZE_MAX declaration on systems like glibc 2. */ # if HAVE_STDINT_H # include # endif /* On systems where these include files don't define it, SIZE_MAX is defined in config.h. */ #endif /* GNULIB_SIZE_MAX_H */ libffcall-2.5/gnulib-lib/Makefile.am0000664000000000000000000025260614665266362014302 00000000000000## DO NOT EDIT! GENERATED AUTOMATICALLY! ## Process this file with automake to produce Makefile.in. # Copyright (C) 2002-2024 Free Software Foundation, Inc. # # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This file is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this file. If not, see . # # As a special exception to the GNU General Public License, # this file may be distributed as part of a program that # contains a configuration script generated by Autoconf, under # the same distribution terms as the rest of that program. # # Generated by gnulib-tool. # Reproduce by: # gnulib-tool --import \ # --local-dir=gnulib-local \ # --lib=libgnu \ # --source-base=gnulib-lib \ # --m4-base=gnulib-m4 \ # --doc-base=doc \ # --tests-base=tests \ # --aux-dir=build-aux \ # --gpl=2 \ # --conditional-dependencies \ # --libtool \ # --macro-prefix=gl \ # ansi-c++-opt \ # host-cpu-c-abi \ # libffcall-imports \ # nocrash \ # stdint \ # stdnoreturn AUTOMAKE_OPTIONS = 1.14 gnits subdir-objects SUBDIRS = noinst_HEADERS = noinst_LIBRARIES = noinst_LTLIBRARIES = pkgdata_DATA = EXTRA_DIST = BUILT_SOURCES = SUFFIXES = MOSTLYCLEANFILES = core *.stackdump MOSTLYCLEANDIRS = CLEANFILES = DISTCLEANFILES = MAINTAINERCLEANFILES = # No GNU Make output. AM_CPPFLAGS = AM_CFLAGS = noinst_LTLIBRARIES += libgnu.la libgnu_la_SOURCES = libgnu_la_CFLAGS = $(AM_CFLAGS) $(GL_CFLAG_GNULIB_WARNINGS) libgnu_la_LIBADD = $(gl_LTLIBOBJS) libgnu_la_DEPENDENCIES = $(gl_LTLIBOBJS) EXTRA_libgnu_la_SOURCES = libgnu_la_LDFLAGS = $(AM_LDFLAGS) libgnu_la_LDFLAGS += -no-undefined libgnu_la_LDFLAGS += $(LIBPMULTITHREAD) libgnu_la_LDFLAGS += $(LIBPTHREAD) libgnu_la_LDFLAGS += $(LIBTHREAD) libgnu_la_LDFLAGS += $(LTLIBINTL) ## begin gnulib module absolute-header # Use this preprocessor expression to decide whether #include_next works. # Do not rely on a 'configure'-time test for this, since the expression # might appear in an installed header, which is used by some other compiler. HAVE_INCLUDE_NEXT = (__GNUC__ || __clang__ || 60000000 <= __DECC_VER) ## end gnulib module absolute-header ## begin gnulib module alloca-opt if gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04 BUILT_SOURCES += $(ALLOCA_H) # We need the following in order to create when the system # doesn't have one that works with the given compiler. if GL_GENERATE_ALLOCA_H alloca.h: alloca.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''HAVE_ALLOCA_H''@|$(HAVE_ALLOCA_H)|g' \ $(srcdir)/alloca.in.h > $@-t $(AM_V_at)mv $@-t $@ else alloca.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += alloca.h alloca.h-t endif EXTRA_DIST += alloca.in.h ## end gnulib module alloca-opt ## begin gnulib module assert-h if gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f BUILT_SOURCES += $(ASSERT_H) # We need the following in order to create when the system # doesn't have one that works with the given compiler. if GL_GENERATE_ASSERT_H assert.h: assert.in.h verify.h $(top_builddir)/config.status $(gl_V_at){ $(SED_HEADER_STDOUT) \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_ASSERT_H''@|$(NEXT_ASSERT_H)|g' \ < $(srcdir)/assert.in.h && \ sed -e '/@assert.h omit start@/,/@assert.h omit end@/d' \ -e 's|_gl_verify|_gl_static_assert|g' \ -e 's|_GL_VERIFY|_GL_STATIC_ASSERT|g' \ -e 's|_GL\(_STATIC_ASSERT_H\)|_GL\1|g' \ < $(srcdir)/verify.h; \ } > $@-t $(AM_V_at)mv $@-t $@ else assert.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += assert.h assert.h-t endif EXTRA_DIST += assert.in.h verify.h ## end gnulib module assert-h ## begin gnulib module asyncsafe-spin if gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce libgnu_la_SOURCES += asyncsafe-spin.c endif EXTRA_DIST += asyncsafe-spin.h ## end gnulib module asyncsafe-spin ## begin gnulib module attribute if gl_GNULIB_ENABLED_attribute endif EXTRA_DIST += attribute.h ## end gnulib module attribute ## begin gnulib module basename-lgpl if gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f libgnu_la_SOURCES += basename-lgpl.c endif EXTRA_DIST += basename-lgpl.h ## end gnulib module basename-lgpl ## begin gnulib module clean-temp-simple if gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831 libgnu_la_SOURCES += clean-temp-simple.h clean-temp-simple.c endif EXTRA_DIST += clean-temp-private.h ## end gnulib module clean-temp-simple ## begin gnulib module cloexec if gl_GNULIB_ENABLED_cloexec libgnu_la_SOURCES += cloexec.c endif EXTRA_DIST += cloexec.h ## end gnulib module cloexec ## begin gnulib module close if gl_GNULIB_ENABLED_close if GL_COND_OBJ_CLOSE libgnu_la_SOURCES += close.c endif endif ## end gnulib module close ## begin gnulib module dup2 if gl_GNULIB_ENABLED_dup2 if GL_COND_OBJ_DUP2 libgnu_la_SOURCES += dup2.c endif endif ## end gnulib module dup2 ## begin gnulib module errno if gl_GNULIB_ENABLED_errno BUILT_SOURCES += $(ERRNO_H) # We need the following in order to create when the system # doesn't have one that is POSIX compliant. if GL_GENERATE_ERRNO_H errno.h: errno.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_ERRNO_H''@|$(NEXT_ERRNO_H)|g' \ -e 's|@''EMULTIHOP_HIDDEN''@|$(EMULTIHOP_HIDDEN)|g' \ -e 's|@''EMULTIHOP_VALUE''@|$(EMULTIHOP_VALUE)|g' \ -e 's|@''ENOLINK_HIDDEN''@|$(ENOLINK_HIDDEN)|g' \ -e 's|@''ENOLINK_VALUE''@|$(ENOLINK_VALUE)|g' \ -e 's|@''EOVERFLOW_HIDDEN''@|$(EOVERFLOW_HIDDEN)|g' \ -e 's|@''EOVERFLOW_VALUE''@|$(EOVERFLOW_VALUE)|g' \ $(srcdir)/errno.in.h > $@-t $(AM_V_at)mv $@-t $@ else errno.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += errno.h errno.h-t endif EXTRA_DIST += errno.in.h ## end gnulib module errno ## begin gnulib module error if gl_GNULIB_ENABLED_error if GL_COND_OBJ_ERROR libgnu_la_SOURCES += error.c endif endif ## end gnulib module error ## begin gnulib module error-h if gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0 BUILT_SOURCES += error.h # We need the following in order to override . error.h: error.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_ERROR_H''@|$(HAVE_ERROR_H)|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''NEXT_ERROR_H''@|$(NEXT_ERROR_H)|g' \ -e 's|@''HAVE_ERROR''@|$(HAVE_ERROR)|g' \ -e 's|@''HAVE_ERROR_AT_LINE''@|$(HAVE_ERROR_AT_LINE)|g' \ -e 's|@''REPLACE_ERROR''@|$(REPLACE_ERROR)|g' \ -e 's|@''REPLACE_ERROR_AT_LINE''@|$(REPLACE_ERROR_AT_LINE)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ $(srcdir)/error.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += error.h error.h-t endif EXTRA_DIST += error.in.h ## end gnulib module error-h ## begin gnulib module fatal-signal if gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057 libgnu_la_SOURCES += fatal-signal.h fatal-signal.c endif ## end gnulib module fatal-signal ## begin gnulib module fcntl if gl_GNULIB_ENABLED_fcntl if GL_COND_OBJ_FCNTL libgnu_la_SOURCES += fcntl.c endif endif ## end gnulib module fcntl ## begin gnulib module fcntl-h if gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8 BUILT_SOURCES += fcntl.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. fcntl.h: fcntl.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_FCNTL_H''@|$(NEXT_FCNTL_H)|g' \ -e 's/@''GNULIB_CREAT''@/$(GL_GNULIB_CREAT)/g' \ -e 's/@''GNULIB_FCNTL''@/$(GL_GNULIB_FCNTL)/g' \ -e 's/@''GNULIB_NONBLOCKING''@/$(GL_GNULIB_NONBLOCKING)/g' \ -e 's/@''GNULIB_OPEN''@/$(GL_GNULIB_OPEN)/g' \ -e 's/@''GNULIB_OPENAT''@/$(GL_GNULIB_OPENAT)/g' \ -e 's/@''GNULIB_MDA_CREAT''@/$(GL_GNULIB_MDA_CREAT)/g' \ -e 's/@''GNULIB_MDA_OPEN''@/$(GL_GNULIB_MDA_OPEN)/g' \ -e 's|@''HAVE_FCNTL''@|$(HAVE_FCNTL)|g' \ -e 's|@''HAVE_OPENAT''@|$(HAVE_OPENAT)|g' \ -e 's|@''REPLACE_CREAT''@|$(REPLACE_CREAT)|g' \ -e 's|@''REPLACE_FCNTL''@|$(REPLACE_FCNTL)|g' \ -e 's|@''REPLACE_OPEN''@|$(REPLACE_OPEN)|g' \ -e 's|@''REPLACE_OPENAT''@|$(REPLACE_OPENAT)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/fcntl.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += fcntl.h fcntl.h-t endif EXTRA_DIST += fcntl.in.h ## end gnulib module fcntl-h ## begin gnulib module fd-hook if gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239 libgnu_la_SOURCES += fd-hook.c endif EXTRA_DIST += fd-hook.h ## end gnulib module fd-hook ## begin gnulib module filename if gl_GNULIB_ENABLED_filename endif EXTRA_DIST += filename.h ## end gnulib module filename ## begin gnulib module fstat if gl_GNULIB_ENABLED_fstat if GL_COND_OBJ_FSTAT libgnu_la_SOURCES += fstat.c endif endif EXTRA_DIST += stat-w32.c stat-w32.h EXTRA_libgnu_la_SOURCES += stat-w32.c ## end gnulib module fstat ## begin gnulib module gen-header # In 'sed', replace the pattern space with a "DO NOT EDIT" comment. SED_HEADER_NOEDIT = s,.*,/* DO NOT EDIT! GENERATED AUTOMATICALLY! */, # '$(SED_HEADER_STDOUT) -e "..."' runs 'sed' but first outputs "DO NOT EDIT". SED_HEADER_STDOUT = sed -e 1h -e '1$(SED_HEADER_NOEDIT)' -e 1G # '$(SED_HEADER_TO_AT_t) FILE' copies FILE to $@-t, prepending a leading # "DO_NOT_EDIT". Although this could be done more simply via: # SED_HEADER_TO_AT_t = $(SED_HEADER_STDOUT) > $@-t # the -n and 'w' avoid a fork+exec, at least when GNU Make is used. SED_HEADER_TO_AT_t = $(SED_HEADER_STDOUT) -n -e 'w $@-t' # Use $(gl_V_at) instead of $(AM_V_GEN) or $(AM_V_at) on a line that # is its recipe's first line if and only if @NMD@ lines are absent. gl_V_at = $(AM_V_GEN) ## end gnulib module gen-header ## begin gnulib module getdtablesize if gl_GNULIB_ENABLED_getdtablesize if GL_COND_OBJ_GETDTABLESIZE libgnu_la_SOURCES += getdtablesize.c endif endif ## end gnulib module getdtablesize ## begin gnulib module getpagesize if gl_GNULIB_ENABLED_getpagesize if GL_COND_OBJ_GETPAGESIZE libgnu_la_SOURCES += getpagesize.c endif endif ## end gnulib module getpagesize ## begin gnulib module getprogname if gl_GNULIB_ENABLED_getprogname if GL_COND_OBJ_GETPROGNAME libgnu_la_SOURCES += getprogname.c endif endif EXTRA_DIST += getprogname.h ## end gnulib module getprogname ## begin gnulib module gettext-h if gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36 libgnu_la_SOURCES += gettext.h endif ## end gnulib module gettext-h ## begin gnulib module hasmntopt if gl_GNULIB_ENABLED_hasmntopt if GL_COND_OBJ_HASMNTOPT libgnu_la_SOURCES += hasmntopt.c endif endif ## end gnulib module hasmntopt ## begin gnulib module idx if gl_GNULIB_ENABLED_idx libgnu_la_SOURCES += idx.h endif ## end gnulib module idx ## begin gnulib module intprops if gl_GNULIB_ENABLED_intprops endif EXTRA_DIST += intprops-internal.h intprops.h ## end gnulib module intprops ## begin gnulib module limits-h BUILT_SOURCES += $(LIMITS_H) # We need the following in order to create when the system # doesn't have one that is compatible with GNU. if GL_GENERATE_LIMITS_H limits.h: limits.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_LIMITS_H''@|$(NEXT_LIMITS_H)|g' \ $(srcdir)/limits.in.h > $@-t $(AM_V_at)mv $@-t $@ else limits.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += limits.h limits.h-t EXTRA_DIST += limits.in.h ## end gnulib module limits-h ## begin gnulib module linkedhash-list if gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2 libgnu_la_SOURCES += gl_linkedhash_list.h gl_linkedhash_list.c gl_anyhash1.h gl_anyhash2.h gl_anyhash_primes.h gl_anylinked_list1.h gl_anylinked_list2.h endif ## end gnulib module linkedhash-list ## begin gnulib module list if gl_GNULIB_ENABLED_list libgnu_la_SOURCES += gl_list.h gl_list.c endif ## end gnulib module list ## begin gnulib module lock libgnu_la_SOURCES += glthread/lock.h glthread/lock.c ## end gnulib module lock ## begin gnulib module malloca if gl_GNULIB_ENABLED_malloca libgnu_la_SOURCES += malloca.c endif EXTRA_DIST += malloca.h ## end gnulib module malloca ## begin gnulib module mntent if gl_GNULIB_ENABLED_mntent BUILT_SOURCES += $(MNTENT_H) # We need the following in order to create when desired. if GL_GENERATE_MNTENT_H mntent.h: mntent.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(AM_V_GEN)$(MKDIR_P) '%reldir%' $(AM_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_MNTENT_H''@|$(NEXT_MNTENT_H)|g' \ -e 's/@''GNULIB_HASMNTOPT''@/$(GL_GNULIB_HASMNTOPT)/g' \ -e 's|@''HAVE_HASMNTOPT''@|$(HAVE_HASMNTOPT)|g' \ -e 's|@''HAVE_SETMNTENT''@|$(HAVE_SETMNTENT)|g' \ -e 's|@''REPLACE_HASMNTOPT''@|$(REPLACE_HASMNTOPT)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/mntent.in.h > $@-t $(AM_V_at)mv $@-t $@ else mntent.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += mntent.h mntent.h-t endif EXTRA_DIST += mntent.in.h ## end gnulib module mntent ## begin gnulib module msvc-inval if gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616 if GL_COND_OBJ_MSVC_INVAL libgnu_la_SOURCES += msvc-inval.c endif endif EXTRA_DIST += msvc-inval.h ## end gnulib module msvc-inval ## begin gnulib module msvc-nothrow if gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07 if GL_COND_OBJ_MSVC_NOTHROW libgnu_la_SOURCES += msvc-nothrow.c endif endif EXTRA_DIST += msvc-nothrow.h ## end gnulib module msvc-nothrow ## begin gnulib module once libgnu_la_SOURCES += glthread/once.h glthread/once.c ## end gnulib module once ## begin gnulib module open if gl_GNULIB_ENABLED_open if GL_COND_OBJ_OPEN libgnu_la_SOURCES += open.c endif endif ## end gnulib module open ## begin gnulib module pathmax if gl_GNULIB_ENABLED_pathmax endif EXTRA_DIST += pathmax.h ## end gnulib module pathmax ## begin gnulib module pthread-h if gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c BUILT_SOURCES += pthread.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. pthread.h: pthread.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(_NORETURN_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_PTHREAD_H''@|$(HAVE_PTHREAD_H)|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_PTHREAD_H''@|$(NEXT_PTHREAD_H)|g' \ -e 's/@''GNULIB_PTHREAD_THREAD''@/$(GL_GNULIB_PTHREAD_THREAD)/g' \ -e 's/@''GNULIB_PTHREAD_ONCE''@/$(GL_GNULIB_PTHREAD_ONCE)/g' \ -e 's/@''GNULIB_PTHREAD_MUTEX''@/$(GL_GNULIB_PTHREAD_MUTEX)/g' \ -e 's/@''GNULIB_PTHREAD_RWLOCK''@/$(GL_GNULIB_PTHREAD_RWLOCK)/g' \ -e 's/@''GNULIB_PTHREAD_COND''@/$(GL_GNULIB_PTHREAD_COND)/g' \ -e 's/@''GNULIB_PTHREAD_TSS''@/$(GL_GNULIB_PTHREAD_TSS)/g' \ -e 's/@''GNULIB_PTHREAD_SPIN''@/$(GL_GNULIB_PTHREAD_SPIN)/g' \ -e 's/@''GNULIB_PTHREAD_MUTEX_TIMEDLOCK''@/$(GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK)/g' \ -e 's|@''HAVE_PTHREAD_T''@|$(HAVE_PTHREAD_T)|g' \ -e 's|@''HAVE_PTHREAD_SPINLOCK_T''@|$(HAVE_PTHREAD_SPINLOCK_T)|g' \ -e 's|@''HAVE_PTHREAD_CREATE_DETACHED''@|$(HAVE_PTHREAD_CREATE_DETACHED)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_RECURSIVE''@|$(HAVE_PTHREAD_MUTEX_RECURSIVE)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_ROBUST''@|$(HAVE_PTHREAD_MUTEX_ROBUST)|g' \ -e 's|@''HAVE_PTHREAD_PROCESS_SHARED''@|$(HAVE_PTHREAD_PROCESS_SHARED)|g' \ -e 's|@''HAVE_PTHREAD_CREATE''@|$(HAVE_PTHREAD_CREATE)|g' \ -e 's|@''HAVE_PTHREAD_ATTR_INIT''@|$(HAVE_PTHREAD_ATTR_INIT)|g' \ -e 's|@''HAVE_PTHREAD_ATTR_GETDETACHSTATE''@|$(HAVE_PTHREAD_ATTR_GETDETACHSTATE)|g' \ -e 's|@''HAVE_PTHREAD_ATTR_SETDETACHSTATE''@|$(HAVE_PTHREAD_ATTR_SETDETACHSTATE)|g' \ -e 's|@''HAVE_PTHREAD_ATTR_DESTROY''@|$(HAVE_PTHREAD_ATTR_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_SELF''@|$(HAVE_PTHREAD_SELF)|g' \ -e 's|@''HAVE_PTHREAD_EQUAL''@|$(HAVE_PTHREAD_EQUAL)|g' \ -e 's|@''HAVE_PTHREAD_DETACH''@|$(HAVE_PTHREAD_DETACH)|g' \ -e 's|@''HAVE_PTHREAD_JOIN''@|$(HAVE_PTHREAD_JOIN)|g' \ -e 's|@''HAVE_PTHREAD_EXIT''@|$(HAVE_PTHREAD_EXIT)|g' \ < $(srcdir)/pthread.in.h > $@-t1 $(AM_V_at)sed \ -e 's|@''HAVE_PTHREAD_ONCE''@|$(HAVE_PTHREAD_ONCE)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_INIT''@|$(HAVE_PTHREAD_MUTEX_INIT)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_INIT''@|$(HAVE_PTHREAD_MUTEXATTR_INIT)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_GETTYPE''@|$(HAVE_PTHREAD_MUTEXATTR_GETTYPE)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_SETTYPE''@|$(HAVE_PTHREAD_MUTEXATTR_SETTYPE)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_GETROBUST''@|$(HAVE_PTHREAD_MUTEXATTR_GETROBUST)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_SETROBUST''@|$(HAVE_PTHREAD_MUTEXATTR_SETROBUST)|g' \ -e 's|@''HAVE_PTHREAD_MUTEXATTR_DESTROY''@|$(HAVE_PTHREAD_MUTEXATTR_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_LOCK''@|$(HAVE_PTHREAD_MUTEX_LOCK)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_TRYLOCK''@|$(HAVE_PTHREAD_MUTEX_TRYLOCK)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_TIMEDLOCK''@|$(HAVE_PTHREAD_MUTEX_TIMEDLOCK)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_UNLOCK''@|$(HAVE_PTHREAD_MUTEX_UNLOCK)|g' \ -e 's|@''HAVE_PTHREAD_MUTEX_DESTROY''@|$(HAVE_PTHREAD_MUTEX_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_INIT''@|$(HAVE_PTHREAD_RWLOCK_INIT)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCKATTR_INIT''@|$(HAVE_PTHREAD_RWLOCKATTR_INIT)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCKATTR_DESTROY''@|$(HAVE_PTHREAD_RWLOCKATTR_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_RDLOCK''@|$(HAVE_PTHREAD_RWLOCK_RDLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_WRLOCK''@|$(HAVE_PTHREAD_RWLOCK_WRLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_TRYRDLOCK''@|$(HAVE_PTHREAD_RWLOCK_TRYRDLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_TRYWRLOCK''@|$(HAVE_PTHREAD_RWLOCK_TRYWRLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK''@|$(HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK''@|$(HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_UNLOCK''@|$(HAVE_PTHREAD_RWLOCK_UNLOCK)|g' \ -e 's|@''HAVE_PTHREAD_RWLOCK_DESTROY''@|$(HAVE_PTHREAD_RWLOCK_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_COND_INIT''@|$(HAVE_PTHREAD_COND_INIT)|g' \ -e 's|@''HAVE_PTHREAD_CONDATTR_INIT''@|$(HAVE_PTHREAD_CONDATTR_INIT)|g' \ -e 's|@''HAVE_PTHREAD_CONDATTR_DESTROY''@|$(HAVE_PTHREAD_CONDATTR_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_COND_WAIT''@|$(HAVE_PTHREAD_COND_WAIT)|g' \ -e 's|@''HAVE_PTHREAD_COND_TIMEDWAIT''@|$(HAVE_PTHREAD_COND_TIMEDWAIT)|g' \ -e 's|@''HAVE_PTHREAD_COND_SIGNAL''@|$(HAVE_PTHREAD_COND_SIGNAL)|g' \ -e 's|@''HAVE_PTHREAD_COND_BROADCAST''@|$(HAVE_PTHREAD_COND_BROADCAST)|g' \ -e 's|@''HAVE_PTHREAD_COND_DESTROY''@|$(HAVE_PTHREAD_COND_DESTROY)|g' \ -e 's|@''HAVE_PTHREAD_KEY_CREATE''@|$(HAVE_PTHREAD_KEY_CREATE)|g' \ -e 's|@''HAVE_PTHREAD_SETSPECIFIC''@|$(HAVE_PTHREAD_SETSPECIFIC)|g' \ -e 's|@''HAVE_PTHREAD_GETSPECIFIC''@|$(HAVE_PTHREAD_GETSPECIFIC)|g' \ -e 's|@''HAVE_PTHREAD_KEY_DELETE''@|$(HAVE_PTHREAD_KEY_DELETE)|g' \ -e 's|@''HAVE_PTHREAD_SPIN_INIT''@|$(HAVE_PTHREAD_SPIN_INIT)|g' \ -e 's|@''HAVE_PTHREAD_SPIN_LOCK''@|$(HAVE_PTHREAD_SPIN_LOCK)|g' \ -e 's|@''HAVE_PTHREAD_SPIN_TRYLOCK''@|$(HAVE_PTHREAD_SPIN_TRYLOCK)|g' \ -e 's|@''HAVE_PTHREAD_SPIN_UNLOCK''@|$(HAVE_PTHREAD_SPIN_UNLOCK)|g' \ -e 's|@''HAVE_PTHREAD_SPIN_DESTROY''@|$(HAVE_PTHREAD_SPIN_DESTROY)|g' \ < $@-t1 > $@-t2 $(AM_V_at)sed \ -e 's|@''REPLACE_PTHREAD_CREATE''@|$(REPLACE_PTHREAD_CREATE)|g' \ -e 's|@''REPLACE_PTHREAD_ATTR_INIT''@|$(REPLACE_PTHREAD_ATTR_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_ATTR_GETDETACHSTATE''@|$(REPLACE_PTHREAD_ATTR_GETDETACHSTATE)|g' \ -e 's|@''REPLACE_PTHREAD_ATTR_SETDETACHSTATE''@|$(REPLACE_PTHREAD_ATTR_SETDETACHSTATE)|g' \ -e 's|@''REPLACE_PTHREAD_ATTR_DESTROY''@|$(REPLACE_PTHREAD_ATTR_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_SELF''@|$(REPLACE_PTHREAD_SELF)|g' \ -e 's|@''REPLACE_PTHREAD_EQUAL''@|$(REPLACE_PTHREAD_EQUAL)|g' \ -e 's|@''REPLACE_PTHREAD_DETACH''@|$(REPLACE_PTHREAD_DETACH)|g' \ -e 's|@''REPLACE_PTHREAD_JOIN''@|$(REPLACE_PTHREAD_JOIN)|g' \ -e 's|@''REPLACE_PTHREAD_EXIT''@|$(REPLACE_PTHREAD_EXIT)|g' \ -e 's|@''REPLACE_PTHREAD_ONCE''@|$(REPLACE_PTHREAD_ONCE)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_INIT''@|$(REPLACE_PTHREAD_MUTEX_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_INIT''@|$(REPLACE_PTHREAD_MUTEXATTR_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_GETTYPE''@|$(REPLACE_PTHREAD_MUTEXATTR_GETTYPE)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_SETTYPE''@|$(REPLACE_PTHREAD_MUTEXATTR_SETTYPE)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_GETROBUST''@|$(REPLACE_PTHREAD_MUTEXATTR_GETROBUST)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_SETROBUST''@|$(REPLACE_PTHREAD_MUTEXATTR_SETROBUST)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_DESTROY''@|$(REPLACE_PTHREAD_MUTEXATTR_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_LOCK''@|$(REPLACE_PTHREAD_MUTEX_LOCK)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_TRYLOCK''@|$(REPLACE_PTHREAD_MUTEX_TRYLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_TIMEDLOCK''@|$(REPLACE_PTHREAD_MUTEX_TIMEDLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_UNLOCK''@|$(REPLACE_PTHREAD_MUTEX_UNLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_MUTEX_DESTROY''@|$(REPLACE_PTHREAD_MUTEX_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_INIT''@|$(REPLACE_PTHREAD_RWLOCK_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCKATTR_INIT''@|$(REPLACE_PTHREAD_RWLOCKATTR_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCKATTR_DESTROY''@|$(REPLACE_PTHREAD_RWLOCKATTR_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_RDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_RDLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_WRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_WRLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_TRYRDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TRYRDLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_TRYWRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TRYWRLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_UNLOCK''@|$(REPLACE_PTHREAD_RWLOCK_UNLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_RWLOCK_DESTROY''@|$(REPLACE_PTHREAD_RWLOCK_DESTROY)|g' \ < $@-t2 > $@-t3 $(AM_V_at)sed \ -e 's|@''REPLACE_PTHREAD_COND_INIT''@|$(REPLACE_PTHREAD_COND_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_CONDATTR_INIT''@|$(REPLACE_PTHREAD_CONDATTR_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_CONDATTR_DESTROY''@|$(REPLACE_PTHREAD_CONDATTR_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_COND_WAIT''@|$(REPLACE_PTHREAD_COND_WAIT)|g' \ -e 's|@''REPLACE_PTHREAD_COND_TIMEDWAIT''@|$(REPLACE_PTHREAD_COND_TIMEDWAIT)|g' \ -e 's|@''REPLACE_PTHREAD_COND_SIGNAL''@|$(REPLACE_PTHREAD_COND_SIGNAL)|g' \ -e 's|@''REPLACE_PTHREAD_COND_BROADCAST''@|$(REPLACE_PTHREAD_COND_BROADCAST)|g' \ -e 's|@''REPLACE_PTHREAD_COND_DESTROY''@|$(REPLACE_PTHREAD_COND_DESTROY)|g' \ -e 's|@''REPLACE_PTHREAD_KEY_CREATE''@|$(REPLACE_PTHREAD_KEY_CREATE)|g' \ -e 's|@''REPLACE_PTHREAD_SETSPECIFIC''@|$(REPLACE_PTHREAD_SETSPECIFIC)|g' \ -e 's|@''REPLACE_PTHREAD_GETSPECIFIC''@|$(REPLACE_PTHREAD_GETSPECIFIC)|g' \ -e 's|@''REPLACE_PTHREAD_KEY_DELETE''@|$(REPLACE_PTHREAD_KEY_DELETE)|g' \ -e 's|@''REPLACE_PTHREAD_SPIN_INIT''@|$(REPLACE_PTHREAD_SPIN_INIT)|g' \ -e 's|@''REPLACE_PTHREAD_SPIN_LOCK''@|$(REPLACE_PTHREAD_SPIN_LOCK)|g' \ -e 's|@''REPLACE_PTHREAD_SPIN_TRYLOCK''@|$(REPLACE_PTHREAD_SPIN_TRYLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_SPIN_UNLOCK''@|$(REPLACE_PTHREAD_SPIN_UNLOCK)|g' \ -e 's|@''REPLACE_PTHREAD_SPIN_DESTROY''@|$(REPLACE_PTHREAD_SPIN_DESTROY)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ < $@-t3 > $@-t4 $(AM_V_at)rm -f $@-t1 $@-t2 $@-t3 $(AM_V_at)mv $@-t4 $@ MOSTLYCLEANFILES += pthread.h pthread.h-t1 pthread.h-t2 pthread.h-t3 pthread.h-t4 endif EXTRA_DIST += pthread.in.h ## end gnulib module pthread-h ## begin gnulib module pthread-once if gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a if GL_COND_OBJ_PTHREAD_ONCE libgnu_la_SOURCES += pthread-once.c endif endif ## end gnulib module pthread-once ## begin gnulib module raise if gl_GNULIB_ENABLED_raise if GL_COND_OBJ_RAISE libgnu_la_SOURCES += raise.c endif endif ## end gnulib module raise ## begin gnulib module rmdir if gl_GNULIB_ENABLED_rmdir if GL_COND_OBJ_RMDIR libgnu_la_SOURCES += rmdir.c endif endif ## end gnulib module rmdir ## begin gnulib module sched if gl_GNULIB_ENABLED_sched BUILT_SOURCES += sched.h # We need the following in order to create a replacement for when # the system doesn't have one. sched.h: sched.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_SCHED_H''@|$(HAVE_SCHED_H)|g' \ -e 's|@''HAVE_SYS_CDEFS_H''@|$(HAVE_SYS_CDEFS_H)|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_SCHED_H''@|$(NEXT_SCHED_H)|g' \ -e 's|@''HAVE_STRUCT_SCHED_PARAM''@|$(HAVE_STRUCT_SCHED_PARAM)|g' \ -e 's/@''GNULIB_SCHED_YIELD''@/$(GL_GNULIB_SCHED_YIELD)/g' \ -e 's|@''HAVE_SCHED_YIELD''@|$(HAVE_SCHED_YIELD)|g' \ -e 's|@''REPLACE_SCHED_YIELD''@|$(REPLACE_SCHED_YIELD)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/sched.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += sched.h sched.h-t endif EXTRA_DIST += sched.in.h ## end gnulib module sched ## begin gnulib module sigaction if gl_GNULIB_ENABLED_sigaction if GL_COND_OBJ_SIGACTION libgnu_la_SOURCES += sigaction.c endif libgnu_la_SOURCES += sig-handler.c endif EXTRA_DIST += sig-handler.h ## end gnulib module sigaction ## begin gnulib module signal-h if gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9 BUILT_SOURCES += signal.h # We need the following in order to create when the system # doesn't have a complete one. signal.h: signal.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_SIGNAL_H''@|$(NEXT_SIGNAL_H)|g' \ -e 's/@''GNULIB_PTHREAD_SIGMASK''@/$(GL_GNULIB_PTHREAD_SIGMASK)/g' \ -e 's/@''GNULIB_RAISE''@/$(GL_GNULIB_RAISE)/g' \ -e 's/@''GNULIB_SIG2STR''@/$(GL_GNULIB_SIG2STR)/g' \ -e 's/@''GNULIB_SIGNAL_H_SIGPIPE''@/$(GL_GNULIB_SIGNAL_H_SIGPIPE)/g' \ -e 's/@''GNULIB_SIGPROCMASK''@/$(GL_GNULIB_SIGPROCMASK)/g' \ -e 's/@''GNULIB_SIGACTION''@/$(GL_GNULIB_SIGACTION)/g' \ -e 's|@''HAVE_POSIX_SIGNALBLOCKING''@|$(HAVE_POSIX_SIGNALBLOCKING)|g' \ -e 's|@''HAVE_PTHREAD_SIGMASK''@|$(HAVE_PTHREAD_SIGMASK)|g' \ -e 's|@''HAVE_RAISE''@|$(HAVE_RAISE)|g' \ -e 's|@''HAVE_SIG2STR''@|$(HAVE_SIG2STR)|g' \ -e 's|@''HAVE_SIGSET_T''@|$(HAVE_SIGSET_T)|g' \ -e 's|@''HAVE_SIGINFO_T''@|$(HAVE_SIGINFO_T)|g' \ -e 's|@''HAVE_SIGACTION''@|$(HAVE_SIGACTION)|g' \ -e 's|@''HAVE_STR2SIG''@|$(HAVE_STR2SIG)|g' \ -e 's|@''HAVE_STRUCT_SIGACTION_SA_SIGACTION''@|$(HAVE_STRUCT_SIGACTION_SA_SIGACTION)|g' \ -e 's|@''HAVE_TYPE_VOLATILE_SIG_ATOMIC_T''@|$(HAVE_TYPE_VOLATILE_SIG_ATOMIC_T)|g' \ -e 's|@''HAVE_SIGHANDLER_T''@|$(HAVE_SIGHANDLER_T)|g' \ -e 's|@''REPLACE_PTHREAD_SIGMASK''@|$(REPLACE_PTHREAD_SIGMASK)|g' \ -e 's|@''REPLACE_RAISE''@|$(REPLACE_RAISE)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/signal.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += signal.h signal.h-t endif EXTRA_DIST += signal.in.h ## end gnulib module signal-h ## begin gnulib module sigprocmask if gl_GNULIB_ENABLED_sigprocmask if GL_COND_OBJ_SIGPROCMASK libgnu_la_SOURCES += sigprocmask.c endif endif ## end gnulib module sigprocmask ## begin gnulib module size_max if gl_GNULIB_ENABLED_size_max libgnu_la_SOURCES += size_max.h endif ## end gnulib module size_max ## begin gnulib module snippet/_Noreturn # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. _NORETURN_H=$(srcdir)/_Noreturn.h EXTRA_DIST += _Noreturn.h ## end gnulib module snippet/_Noreturn ## begin gnulib module snippet/arg-nonnull if gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54 # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. ARG_NONNULL_H=$(srcdir)/arg-nonnull.h endif EXTRA_DIST += arg-nonnull.h ## end gnulib module snippet/arg-nonnull ## begin gnulib module snippet/c++defs if gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. CXXDEFS_H=$(srcdir)/c++defs.h endif EXTRA_DIST += c++defs.h ## end gnulib module snippet/c++defs ## begin gnulib module snippet/warn-on-use if gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5 # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. WARN_ON_USE_H=$(srcdir)/warn-on-use.h endif EXTRA_DIST += warn-on-use.h ## end gnulib module snippet/warn-on-use ## begin gnulib module stat if gl_GNULIB_ENABLED_stat if GL_COND_OBJ_STAT libgnu_la_SOURCES += stat.c endif endif EXTRA_DIST += stat-w32.c stat-w32.h EXTRA_libgnu_la_SOURCES += stat-w32.c ## end gnulib module stat ## begin gnulib module stat-time if gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c libgnu_la_SOURCES += stat-time.c endif EXTRA_DIST += stat-time.h ## end gnulib module stat-time ## begin gnulib module stdckdint if gl_GNULIB_ENABLED_stdckdint BUILT_SOURCES += $(STDCKDINT_H) # We need the following in order to create when the system # doesn't have one that works with the given compiler. if GL_GENERATE_STDCKDINT_H stdckdint.h: stdckdint.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ $(srcdir)/stdckdint.in.h > $@-t $(AM_V_at)mv $@-t $@ else stdckdint.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += stdckdint.h stdckdint.h-t endif EXTRA_DIST += intprops-internal.h stdckdint.in.h ## end gnulib module stdckdint ## begin gnulib module stddef if gl_GNULIB_ENABLED_stddef BUILT_SOURCES += $(STDDEF_H) # We need the following in order to create when the system # doesn't have one that works with the given compiler. if GL_GENERATE_STDDEF_H stddef.h: stddef.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_STDDEF_H''@|$(NEXT_STDDEF_H)|g' \ -e 's|@''NULLPTR_T_NEEDS_STDDEF''@|$(NULLPTR_T_NEEDS_STDDEF)|g' \ -e 's|@''STDDEF_NOT_IDEMPOTENT''@|$(STDDEF_NOT_IDEMPOTENT)|g' \ -e 's|@''REPLACE_NULL''@|$(REPLACE_NULL)|g' \ -e 's|@''HAVE_MAX_ALIGN_T''@|$(HAVE_MAX_ALIGN_T)|g' \ $(srcdir)/stddef.in.h > $@-t $(AM_V_at)mv $@-t $@ else stddef.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += stddef.h stddef.h-t endif EXTRA_DIST += stddef.in.h ## end gnulib module stddef ## begin gnulib module stdint BUILT_SOURCES += $(STDINT_H) # We need the following in order to create when the system # doesn't have one that works with the given compiler. if GL_GENERATE_STDINT_H stdint.h: stdint.in.h $(top_builddir)/config.status $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's/@''HAVE_STDINT_H''@/$(HAVE_STDINT_H)/g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_STDINT_H''@|$(NEXT_STDINT_H)|g' \ -e 's/@''HAVE_C99_STDINT_H''@/$(HAVE_C99_STDINT_H)/g' \ -e 's/@''HAVE_SYS_TYPES_H''@/$(HAVE_SYS_TYPES_H)/g' \ -e 's/@''HAVE_INTTYPES_H''@/$(HAVE_INTTYPES_H)/g' \ -e 's/@''HAVE_SYS_INTTYPES_H''@/$(HAVE_SYS_INTTYPES_H)/g' \ -e 's/@''HAVE_SYS_BITYPES_H''@/$(HAVE_SYS_BITYPES_H)/g' \ -e 's/@''HAVE_WCHAR_H''@/$(HAVE_WCHAR_H)/g' \ -e 's/@''APPLE_UNIVERSAL_BUILD''@/$(APPLE_UNIVERSAL_BUILD)/g' \ -e 's/@''BITSIZEOF_PTRDIFF_T''@/$(BITSIZEOF_PTRDIFF_T)/g' \ -e 's/@''PTRDIFF_T_SUFFIX''@/$(PTRDIFF_T_SUFFIX)/g' \ -e 's/@''BITSIZEOF_SIG_ATOMIC_T''@/$(BITSIZEOF_SIG_ATOMIC_T)/g' \ -e 's/@''HAVE_SIGNED_SIG_ATOMIC_T''@/$(HAVE_SIGNED_SIG_ATOMIC_T)/g' \ -e 's/@''SIG_ATOMIC_T_SUFFIX''@/$(SIG_ATOMIC_T_SUFFIX)/g' \ -e 's/@''BITSIZEOF_SIZE_T''@/$(BITSIZEOF_SIZE_T)/g' \ -e 's/@''SIZE_T_SUFFIX''@/$(SIZE_T_SUFFIX)/g' \ -e 's/@''BITSIZEOF_WCHAR_T''@/$(BITSIZEOF_WCHAR_T)/g' \ -e 's/@''HAVE_SIGNED_WCHAR_T''@/$(HAVE_SIGNED_WCHAR_T)/g' \ -e 's/@''WCHAR_T_SUFFIX''@/$(WCHAR_T_SUFFIX)/g' \ -e 's/@''BITSIZEOF_WINT_T''@/$(BITSIZEOF_WINT_T)/g' \ -e 's/@''HAVE_SIGNED_WINT_T''@/$(HAVE_SIGNED_WINT_T)/g' \ -e 's/@''WINT_T_SUFFIX''@/$(WINT_T_SUFFIX)/g' \ -e 's/@''GNULIBHEADERS_OVERRIDE_WINT_T''@/$(GNULIBHEADERS_OVERRIDE_WINT_T)/g' \ $(srcdir)/stdint.in.h > $@-t $(AM_V_at)mv $@-t $@ else stdint.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += stdint.h stdint.h-t EXTRA_DIST += stdint.in.h ## end gnulib module stdint ## begin gnulib module stdio if gl_GNULIB_ENABLED_stdio BUILT_SOURCES += stdio.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. stdio.h: stdio.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_STDIO_H''@|$(NEXT_STDIO_H)|g' \ -e 's/@''GNULIB_DPRINTF''@/$(GL_GNULIB_DPRINTF)/g' \ -e 's/@''GNULIB_DZPRINTF''@/$(GL_GNULIB_DZPRINTF)/g' \ -e 's/@''GNULIB_FCLOSE''@/$(GL_GNULIB_FCLOSE)/g' \ -e 's/@''GNULIB_FDOPEN''@/$(GL_GNULIB_FDOPEN)/g' \ -e 's/@''GNULIB_FFLUSH''@/$(GL_GNULIB_FFLUSH)/g' \ -e 's/@''GNULIB_FGETC''@/$(GL_GNULIB_FGETC)/g' \ -e 's/@''GNULIB_FGETS''@/$(GL_GNULIB_FGETS)/g' \ -e 's/@''GNULIB_FOPEN''@/$(GL_GNULIB_FOPEN)/g' \ -e 's/@''GNULIB_FOPEN_GNU''@/$(GL_GNULIB_FOPEN_GNU)/g' \ -e 's/@''GNULIB_FPRINTF''@/$(GL_GNULIB_FPRINTF)/g' \ -e 's/@''GNULIB_FPRINTF_POSIX''@/$(GL_GNULIB_FPRINTF_POSIX)/g' \ -e 's/@''GNULIB_FPURGE''@/$(GL_GNULIB_FPURGE)/g' \ -e 's/@''GNULIB_FPUTC''@/$(GL_GNULIB_FPUTC)/g' \ -e 's/@''GNULIB_FPUTS''@/$(GL_GNULIB_FPUTS)/g' \ -e 's/@''GNULIB_FREAD''@/$(GL_GNULIB_FREAD)/g' \ -e 's/@''GNULIB_FREOPEN''@/$(GL_GNULIB_FREOPEN)/g' \ -e 's/@''GNULIB_FSCANF''@/$(GL_GNULIB_FSCANF)/g' \ -e 's/@''GNULIB_FSEEK''@/$(GL_GNULIB_FSEEK)/g' \ -e 's/@''GNULIB_FSEEKO''@/$(GL_GNULIB_FSEEKO)/g' \ -e 's/@''GNULIB_FTELL''@/$(GL_GNULIB_FTELL)/g' \ -e 's/@''GNULIB_FTELLO''@/$(GL_GNULIB_FTELLO)/g' \ -e 's/@''GNULIB_FWRITE''@/$(GL_GNULIB_FWRITE)/g' \ -e 's/@''GNULIB_FZPRINTF''@/$(GL_GNULIB_FZPRINTF)/g' \ -e 's/@''GNULIB_GETC''@/$(GL_GNULIB_GETC)/g' \ -e 's/@''GNULIB_GETCHAR''@/$(GL_GNULIB_GETCHAR)/g' \ -e 's/@''GNULIB_GETDELIM''@/$(GL_GNULIB_GETDELIM)/g' \ -e 's/@''GNULIB_GETLINE''@/$(GL_GNULIB_GETLINE)/g' \ -e 's/@''GNULIB_OBSTACK_PRINTF''@/$(GL_GNULIB_OBSTACK_PRINTF)/g' \ -e 's/@''GNULIB_OBSTACK_PRINTF_POSIX''@/$(GL_GNULIB_OBSTACK_PRINTF_POSIX)/g' \ -e 's/@''GNULIB_OBSTACK_ZPRINTF''@/$(GL_GNULIB_OBSTACK_ZPRINTF)/g' \ -e 's/@''GNULIB_PCLOSE''@/$(GL_GNULIB_PCLOSE)/g' \ -e 's/@''GNULIB_PERROR''@/$(GL_GNULIB_PERROR)/g' \ -e 's/@''GNULIB_POPEN''@/$(GL_GNULIB_POPEN)/g' \ -e 's/@''GNULIB_PRINTF''@/$(GL_GNULIB_PRINTF)/g' \ -e 's/@''GNULIB_PRINTF_POSIX''@/$(GL_GNULIB_PRINTF_POSIX)/g' \ -e 's/@''GNULIB_PUTC''@/$(GL_GNULIB_PUTC)/g' \ -e 's/@''GNULIB_PUTCHAR''@/$(GL_GNULIB_PUTCHAR)/g' \ -e 's/@''GNULIB_PUTS''@/$(GL_GNULIB_PUTS)/g' \ -e 's/@''GNULIB_REMOVE''@/$(GL_GNULIB_REMOVE)/g' \ -e 's/@''GNULIB_RENAME''@/$(GL_GNULIB_RENAME)/g' \ -e 's/@''GNULIB_RENAMEAT''@/$(GL_GNULIB_RENAMEAT)/g' \ -e 's/@''GNULIB_SCANF''@/$(GL_GNULIB_SCANF)/g' \ -e 's/@''GNULIB_SNPRINTF''@/$(GL_GNULIB_SNPRINTF)/g' \ -e 's/@''GNULIB_SNZPRINTF''@/$(GL_GNULIB_SNZPRINTF)/g' \ -e 's/@''GNULIB_SPRINTF_POSIX''@/$(GL_GNULIB_SPRINTF_POSIX)/g' \ -e 's/@''GNULIB_STDIO_H_NONBLOCKING''@/$(GL_GNULIB_STDIO_H_NONBLOCKING)/g' \ -e 's/@''GNULIB_STDIO_H_SIGPIPE''@/$(GL_GNULIB_STDIO_H_SIGPIPE)/g' \ -e 's/@''GNULIB_SZPRINTF''@/$(GL_GNULIB_SZPRINTF)/g' \ -e 's/@''GNULIB_TMPFILE''@/$(GL_GNULIB_TMPFILE)/g' \ -e 's/@''GNULIB_VASPRINTF''@/$(GL_GNULIB_VASPRINTF)/g' \ -e 's/@''GNULIB_VASZPRINTF''@/$(GL_GNULIB_VASZPRINTF)/g' \ -e 's/@''GNULIB_VDPRINTF''@/$(GL_GNULIB_VDPRINTF)/g' \ -e 's/@''GNULIB_VDZPRINTF''@/$(GL_GNULIB_VDZPRINTF)/g' \ -e 's/@''GNULIB_VFPRINTF''@/$(GL_GNULIB_VFPRINTF)/g' \ -e 's/@''GNULIB_VFPRINTF_POSIX''@/$(GL_GNULIB_VFPRINTF_POSIX)/g' \ -e 's/@''GNULIB_VFZPRINTF''@/$(GL_GNULIB_VFZPRINTF)/g' \ -e 's/@''GNULIB_VFSCANF''@/$(GL_GNULIB_VFSCANF)/g' \ -e 's/@''GNULIB_VSCANF''@/$(GL_GNULIB_VSCANF)/g' \ -e 's/@''GNULIB_VPRINTF''@/$(GL_GNULIB_VPRINTF)/g' \ -e 's/@''GNULIB_VPRINTF_POSIX''@/$(GL_GNULIB_VPRINTF_POSIX)/g' \ -e 's/@''GNULIB_VSNPRINTF''@/$(GL_GNULIB_VSNPRINTF)/g' \ -e 's/@''GNULIB_VSNZPRINTF''@/$(GL_GNULIB_VSNZPRINTF)/g' \ -e 's/@''GNULIB_VSPRINTF_POSIX''@/$(GL_GNULIB_VSPRINTF_POSIX)/g' \ -e 's/@''GNULIB_VSZPRINTF''@/$(GL_GNULIB_VSZPRINTF)/g' \ -e 's/@''GNULIB_VZPRINTF''@/$(GL_GNULIB_VZPRINTF)/g' \ -e 's/@''GNULIB_ZPRINTF''@/$(GL_GNULIB_ZPRINTF)/g' \ -e 's/@''GNULIB_MDA_FCLOSEALL''@/$(GL_GNULIB_MDA_FCLOSEALL)/g' \ -e 's/@''GNULIB_MDA_FDOPEN''@/$(GL_GNULIB_MDA_FDOPEN)/g' \ -e 's/@''GNULIB_MDA_FILENO''@/$(GL_GNULIB_MDA_FILENO)/g' \ -e 's/@''GNULIB_MDA_GETW''@/$(GL_GNULIB_MDA_GETW)/g' \ -e 's/@''GNULIB_MDA_PUTW''@/$(GL_GNULIB_MDA_PUTW)/g' \ -e 's/@''GNULIB_MDA_TEMPNAM''@/$(GL_GNULIB_MDA_TEMPNAM)/g' \ < $(srcdir)/stdio.in.h > $@-t1 $(AM_V_at)sed \ -e 's|@''HAVE_DECL_FCLOSEALL''@|$(HAVE_DECL_FCLOSEALL)|g' \ -e 's|@''HAVE_DECL_FPURGE''@|$(HAVE_DECL_FPURGE)|g' \ -e 's|@''HAVE_DECL_FSEEKO''@|$(HAVE_DECL_FSEEKO)|g' \ -e 's|@''HAVE_DECL_FTELLO''@|$(HAVE_DECL_FTELLO)|g' \ -e 's|@''HAVE_DECL_GETDELIM''@|$(HAVE_DECL_GETDELIM)|g' \ -e 's|@''HAVE_DECL_GETLINE''@|$(HAVE_DECL_GETLINE)|g' \ -e 's|@''HAVE_DECL_GETW''@|$(HAVE_DECL_GETW)|g' \ -e 's|@''HAVE_DECL_OBSTACK_PRINTF''@|$(HAVE_DECL_OBSTACK_PRINTF)|g' \ -e 's|@''HAVE_DECL_PUTW''@|$(HAVE_DECL_PUTW)|g' \ -e 's|@''HAVE_DECL_SNPRINTF''@|$(HAVE_DECL_SNPRINTF)|g' \ -e 's|@''HAVE_DECL_VSNPRINTF''@|$(HAVE_DECL_VSNPRINTF)|g' \ -e 's|@''HAVE_DPRINTF''@|$(HAVE_DPRINTF)|g' \ -e 's|@''HAVE_FSEEKO''@|$(HAVE_FSEEKO)|g' \ -e 's|@''HAVE_FTELLO''@|$(HAVE_FTELLO)|g' \ -e 's|@''HAVE_PCLOSE''@|$(HAVE_PCLOSE)|g' \ -e 's|@''HAVE_POPEN''@|$(HAVE_POPEN)|g' \ -e 's|@''HAVE_RENAMEAT''@|$(HAVE_RENAMEAT)|g' \ -e 's|@''HAVE_VASPRINTF''@|$(HAVE_VASPRINTF)|g' \ -e 's|@''HAVE_VDPRINTF''@|$(HAVE_VDPRINTF)|g' \ < $@-t1 > $@-t2 $(AM_V_at)sed \ -e 's|@''REPLACE_DPRINTF''@|$(REPLACE_DPRINTF)|g' \ -e 's|@''REPLACE_FCLOSE''@|$(REPLACE_FCLOSE)|g' \ -e 's|@''REPLACE_FDOPEN''@|$(REPLACE_FDOPEN)|g' \ -e 's|@''REPLACE_FFLUSH''@|$(REPLACE_FFLUSH)|g' \ -e 's|@''REPLACE_FOPEN''@|$(REPLACE_FOPEN)|g' \ -e 's|@''REPLACE_FOPEN_FOR_FOPEN_GNU''@|$(REPLACE_FOPEN_FOR_FOPEN_GNU)|g' \ -e 's|@''REPLACE_FPRINTF''@|$(REPLACE_FPRINTF)|g' \ -e 's|@''REPLACE_FPURGE''@|$(REPLACE_FPURGE)|g' \ -e 's|@''REPLACE_FREOPEN''@|$(REPLACE_FREOPEN)|g' \ -e 's|@''REPLACE_FSEEK''@|$(REPLACE_FSEEK)|g' \ -e 's|@''REPLACE_FSEEKO''@|$(REPLACE_FSEEKO)|g' \ -e 's|@''REPLACE_FTELL''@|$(REPLACE_FTELL)|g' \ -e 's|@''REPLACE_FTELLO''@|$(REPLACE_FTELLO)|g' \ -e 's|@''REPLACE_GETDELIM''@|$(REPLACE_GETDELIM)|g' \ -e 's|@''REPLACE_GETLINE''@|$(REPLACE_GETLINE)|g' \ -e 's|@''REPLACE_OBSTACK_PRINTF''@|$(REPLACE_OBSTACK_PRINTF)|g' \ -e 's|@''REPLACE_PERROR''@|$(REPLACE_PERROR)|g' \ -e 's|@''REPLACE_POPEN''@|$(REPLACE_POPEN)|g' \ -e 's|@''REPLACE_PRINTF''@|$(REPLACE_PRINTF)|g' \ -e 's|@''REPLACE_REMOVE''@|$(REPLACE_REMOVE)|g' \ -e 's|@''REPLACE_RENAME''@|$(REPLACE_RENAME)|g' \ -e 's|@''REPLACE_RENAMEAT''@|$(REPLACE_RENAMEAT)|g' \ -e 's|@''REPLACE_SNPRINTF''@|$(REPLACE_SNPRINTF)|g' \ -e 's|@''REPLACE_SPRINTF''@|$(REPLACE_SPRINTF)|g' \ -e 's|@''REPLACE_STDIO_READ_FUNCS''@|$(REPLACE_STDIO_READ_FUNCS)|g' \ -e 's|@''REPLACE_STDIO_WRITE_FUNCS''@|$(REPLACE_STDIO_WRITE_FUNCS)|g' \ -e 's|@''REPLACE_TMPFILE''@|$(REPLACE_TMPFILE)|g' \ -e 's|@''REPLACE_VASPRINTF''@|$(REPLACE_VASPRINTF)|g' \ -e 's|@''REPLACE_VDPRINTF''@|$(REPLACE_VDPRINTF)|g' \ -e 's|@''REPLACE_VFPRINTF''@|$(REPLACE_VFPRINTF)|g' \ -e 's|@''REPLACE_VPRINTF''@|$(REPLACE_VPRINTF)|g' \ -e 's|@''REPLACE_VSNPRINTF''@|$(REPLACE_VSNPRINTF)|g' \ -e 's|@''REPLACE_VSPRINTF''@|$(REPLACE_VSPRINTF)|g' \ -e 's|@''ASM_SYMBOL_PREFIX''@|$(ASM_SYMBOL_PREFIX)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ < $@-t2 > $@-t3 $(AM_V_at)rm -f $@-t1 $@-t2 $(AM_V_at)mv $@-t3 $@ MOSTLYCLEANFILES += stdio.h stdio.h-t1 stdio.h-t2 stdio.h-t3 if GL_COND_OBJ_STDIO_READ libgnu_la_SOURCES += stdio-read.c endif if GL_COND_OBJ_STDIO_WRITE libgnu_la_SOURCES += stdio-write.c endif endif EXTRA_DIST += stdio.in.h ## end gnulib module stdio ## begin gnulib module stdlib if gl_GNULIB_ENABLED_stdlib BUILT_SOURCES += stdlib.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. stdlib.h: stdlib.in.h $(top_builddir)/config.status $(CXXDEFS_H) \ $(_NORETURN_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_STDLIB_H''@|$(NEXT_STDLIB_H)|g' \ -e 's/@''GNULIB__EXIT''@/$(GL_GNULIB__EXIT)/g' \ -e 's/@''GNULIB_ABORT_DEBUG''@/$(GL_GNULIB_ABORT_DEBUG)/g' \ -e 's/@''GNULIB_ALIGNED_ALLOC''@/$(GL_GNULIB_ALIGNED_ALLOC)/g' \ -e 's/@''GNULIB_ATOLL''@/$(GL_GNULIB_ATOLL)/g' \ -e 's/@''GNULIB_CALLOC_GNU''@/$(GL_GNULIB_CALLOC_GNU)/g' \ -e 's/@''GNULIB_CALLOC_POSIX''@/$(GL_GNULIB_CALLOC_POSIX)/g' \ -e 's/@''GNULIB_CANONICALIZE_FILE_NAME''@/$(GL_GNULIB_CANONICALIZE_FILE_NAME)/g' \ -e 's/@''GNULIB_FREE_POSIX''@/$(GL_GNULIB_FREE_POSIX)/g' \ -e 's/@''GNULIB_GETLOADAVG''@/$(GL_GNULIB_GETLOADAVG)/g' \ -e 's/@''GNULIB_GETPROGNAME''@/$(GL_GNULIB_GETPROGNAME)/g' \ -e 's/@''GNULIB_GETSUBOPT''@/$(GL_GNULIB_GETSUBOPT)/g' \ -e 's/@''GNULIB_GRANTPT''@/$(GL_GNULIB_GRANTPT)/g' \ -e 's/@''GNULIB_MALLOC_GNU''@/$(GL_GNULIB_MALLOC_GNU)/g' \ -e 's/@''GNULIB_MALLOC_POSIX''@/$(GL_GNULIB_MALLOC_POSIX)/g' \ -e 's/@''GNULIB_MBSTOWCS''@/$(GL_GNULIB_MBSTOWCS)/g' \ -e 's/@''GNULIB_MBTOWC''@/$(GL_GNULIB_MBTOWC)/g' \ -e 's/@''GNULIB_MKDTEMP''@/$(GL_GNULIB_MKDTEMP)/g' \ -e 's/@''GNULIB_MKOSTEMP''@/$(GL_GNULIB_MKOSTEMP)/g' \ -e 's/@''GNULIB_MKOSTEMPS''@/$(GL_GNULIB_MKOSTEMPS)/g' \ -e 's/@''GNULIB_MKSTEMP''@/$(GL_GNULIB_MKSTEMP)/g' \ -e 's/@''GNULIB_MKSTEMPS''@/$(GL_GNULIB_MKSTEMPS)/g' \ -e 's/@''GNULIB_POSIX_MEMALIGN''@/$(GL_GNULIB_POSIX_MEMALIGN)/g' \ -e 's/@''GNULIB_POSIX_OPENPT''@/$(GL_GNULIB_POSIX_OPENPT)/g' \ -e 's/@''GNULIB_PTSNAME''@/$(GL_GNULIB_PTSNAME)/g' \ -e 's/@''GNULIB_PTSNAME_R''@/$(GL_GNULIB_PTSNAME_R)/g' \ -e 's/@''GNULIB_PUTENV''@/$(GL_GNULIB_PUTENV)/g' \ -e 's/@''GNULIB_QSORT_R''@/$(GL_GNULIB_QSORT_R)/g' \ -e 's/@''GNULIB_RAND''@/$(GL_GNULIB_RAND)/g' \ -e 's/@''GNULIB_RANDOM''@/$(GL_GNULIB_RANDOM)/g' \ -e 's/@''GNULIB_RANDOM_R''@/$(GL_GNULIB_RANDOM_R)/g' \ -e 's/@''GNULIB_REALLOC_GNU''@/$(GL_GNULIB_REALLOC_GNU)/g' \ -e 's/@''GNULIB_REALLOC_POSIX''@/$(GL_GNULIB_REALLOC_POSIX)/g' \ -e 's/@''GNULIB_REALLOCARRAY''@/$(GL_GNULIB_REALLOCARRAY)/g' \ -e 's/@''GNULIB_REALPATH''@/$(GL_GNULIB_REALPATH)/g' \ -e 's/@''GNULIB_RPMATCH''@/$(GL_GNULIB_RPMATCH)/g' \ -e 's/@''GNULIB_SECURE_GETENV''@/$(GL_GNULIB_SECURE_GETENV)/g' \ -e 's/@''GNULIB_SETENV''@/$(GL_GNULIB_SETENV)/g' \ -e 's/@''GNULIB_STACK_TRACE''@/$(GL_GNULIB_STACK_TRACE)/g' \ -e 's/@''GNULIB_STRTOD''@/$(GL_GNULIB_STRTOD)/g' \ -e 's/@''GNULIB_STRTOF''@/$(GL_GNULIB_STRTOF)/g' \ -e 's/@''GNULIB_STRTOL''@/$(GL_GNULIB_STRTOL)/g' \ -e 's/@''GNULIB_STRTOLD''@/$(GL_GNULIB_STRTOLD)/g' \ -e 's/@''GNULIB_STRTOLL''@/$(GL_GNULIB_STRTOLL)/g' \ -e 's/@''GNULIB_STRTOUL''@/$(GL_GNULIB_STRTOUL)/g' \ -e 's/@''GNULIB_STRTOULL''@/$(GL_GNULIB_STRTOULL)/g' \ -e 's/@''GNULIB_SYSTEM_POSIX''@/$(GL_GNULIB_SYSTEM_POSIX)/g' \ -e 's/@''GNULIB_UNLOCKPT''@/$(GL_GNULIB_UNLOCKPT)/g' \ -e 's/@''GNULIB_UNSETENV''@/$(GL_GNULIB_UNSETENV)/g' \ -e 's/@''GNULIB_WCTOMB''@/$(GL_GNULIB_WCTOMB)/g' \ -e 's/@''GNULIB_MDA_ECVT''@/$(GL_GNULIB_MDA_ECVT)/g' \ -e 's/@''GNULIB_MDA_FCVT''@/$(GL_GNULIB_MDA_FCVT)/g' \ -e 's/@''GNULIB_MDA_GCVT''@/$(GL_GNULIB_MDA_GCVT)/g' \ -e 's/@''GNULIB_MDA_MKTEMP''@/$(GL_GNULIB_MDA_MKTEMP)/g' \ -e 's/@''GNULIB_MDA_PUTENV''@/$(GL_GNULIB_MDA_PUTENV)/g' \ < $(srcdir)/stdlib.in.h > $@-t1 $(AM_V_at)sed \ -e 's|@''HAVE__EXIT''@|$(HAVE__EXIT)|g' \ -e 's|@''HAVE_ALIGNED_ALLOC''@|$(HAVE_ALIGNED_ALLOC)|g' \ -e 's|@''HAVE_ATOLL''@|$(HAVE_ATOLL)|g' \ -e 's|@''HAVE_CANONICALIZE_FILE_NAME''@|$(HAVE_CANONICALIZE_FILE_NAME)|g' \ -e 's|@''HAVE_DECL_ECVT''@|$(HAVE_DECL_ECVT)|g' \ -e 's|@''HAVE_DECL_FCVT''@|$(HAVE_DECL_FCVT)|g' \ -e 's|@''HAVE_DECL_GCVT''@|$(HAVE_DECL_GCVT)|g' \ -e 's|@''HAVE_DECL_GETLOADAVG''@|$(HAVE_DECL_GETLOADAVG)|g' \ -e 's|@''HAVE_DECL_PROGRAM_INVOCATION_NAME''@|$(HAVE_DECL_PROGRAM_INVOCATION_NAME)|g' \ -e 's|@''HAVE_GETPROGNAME''@|$(HAVE_GETPROGNAME)|g' \ -e 's|@''HAVE_GETSUBOPT''@|$(HAVE_GETSUBOPT)|g' \ -e 's|@''HAVE_GRANTPT''@|$(HAVE_GRANTPT)|g' \ -e 's|@''HAVE_INITSTATE''@|$(HAVE_INITSTATE)|g' \ -e 's|@''HAVE_DECL_INITSTATE''@|$(HAVE_DECL_INITSTATE)|g' \ -e 's|@''HAVE_MBTOWC''@|$(HAVE_MBTOWC)|g' \ -e 's|@''HAVE_MKDTEMP''@|$(HAVE_MKDTEMP)|g' \ -e 's|@''HAVE_MKOSTEMP''@|$(HAVE_MKOSTEMP)|g' \ -e 's|@''HAVE_MKOSTEMPS''@|$(HAVE_MKOSTEMPS)|g' \ -e 's|@''HAVE_MKSTEMP''@|$(HAVE_MKSTEMP)|g' \ -e 's|@''HAVE_MKSTEMPS''@|$(HAVE_MKSTEMPS)|g' \ -e 's|@''HAVE_POSIX_MEMALIGN''@|$(HAVE_POSIX_MEMALIGN)|g' \ -e 's|@''HAVE_POSIX_OPENPT''@|$(HAVE_POSIX_OPENPT)|g' \ -e 's|@''HAVE_PTSNAME''@|$(HAVE_PTSNAME)|g' \ -e 's|@''HAVE_PTSNAME_R''@|$(HAVE_PTSNAME_R)|g' \ -e 's|@''HAVE_QSORT_R''@|$(HAVE_QSORT_R)|g' \ -e 's|@''HAVE_RANDOM''@|$(HAVE_RANDOM)|g' \ -e 's|@''HAVE_RANDOM_H''@|$(HAVE_RANDOM_H)|g' \ -e 's|@''HAVE_RANDOM_R''@|$(HAVE_RANDOM_R)|g' \ -e 's|@''HAVE_REALLOCARRAY''@|$(HAVE_REALLOCARRAY)|g' \ -e 's|@''HAVE_REALPATH''@|$(HAVE_REALPATH)|g' \ -e 's|@''HAVE_RPMATCH''@|$(HAVE_RPMATCH)|g' \ -e 's|@''HAVE_SECURE_GETENV''@|$(HAVE_SECURE_GETENV)|g' \ -e 's|@''HAVE_DECL_SETENV''@|$(HAVE_DECL_SETENV)|g' \ -e 's|@''HAVE_SETSTATE''@|$(HAVE_SETSTATE)|g' \ -e 's|@''HAVE_DECL_SETSTATE''@|$(HAVE_DECL_SETSTATE)|g' \ -e 's|@''HAVE_STRTOD''@|$(HAVE_STRTOD)|g' \ -e 's|@''HAVE_STRTOF''@|$(HAVE_STRTOF)|g' \ -e 's|@''HAVE_STRTOL''@|$(HAVE_STRTOL)|g' \ -e 's|@''HAVE_STRTOLD''@|$(HAVE_STRTOLD)|g' \ -e 's|@''HAVE_STRTOLL''@|$(HAVE_STRTOLL)|g' \ -e 's|@''HAVE_STRTOUL''@|$(HAVE_STRTOUL)|g' \ -e 's|@''HAVE_STRTOULL''@|$(HAVE_STRTOULL)|g' \ -e 's|@''HAVE_STRUCT_RANDOM_DATA''@|$(HAVE_STRUCT_RANDOM_DATA)|g' \ -e 's|@''HAVE_SYS_LOADAVG_H''@|$(HAVE_SYS_LOADAVG_H)|g' \ -e 's|@''HAVE_UNLOCKPT''@|$(HAVE_UNLOCKPT)|g' \ -e 's|@''HAVE_DECL_UNSETENV''@|$(HAVE_DECL_UNSETENV)|g' \ < $@-t1 > $@-t2 $(AM_V_at)sed \ -e 's|@''REPLACE__EXIT''@|$(REPLACE__EXIT)|g' \ -e 's|@''REPLACE_ABORT''@|$(REPLACE_ABORT)|g' \ -e 's|@''REPLACE_ALIGNED_ALLOC''@|$(REPLACE_ALIGNED_ALLOC)|g' \ -e 's|@''REPLACE_CALLOC_FOR_CALLOC_GNU''@|$(REPLACE_CALLOC_FOR_CALLOC_GNU)|g' \ -e 's|@''REPLACE_CALLOC_FOR_CALLOC_POSIX''@|$(REPLACE_CALLOC_FOR_CALLOC_POSIX)|g' \ -e 's|@''REPLACE_CANONICALIZE_FILE_NAME''@|$(REPLACE_CANONICALIZE_FILE_NAME)|g' \ -e 's|@''REPLACE_FREE''@|$(REPLACE_FREE)|g' \ -e 's|@''REPLACE_GETLOADAVG''@|$(REPLACE_GETLOADAVG)|g' \ -e 's|@''REPLACE_GETPROGNAME''@|$(REPLACE_GETPROGNAME)|g' \ -e 's|@''REPLACE_GETSUBOPT''@|$(REPLACE_GETSUBOPT)|g' \ -e 's|@''REPLACE_INITSTATE''@|$(REPLACE_INITSTATE)|g' \ -e 's|@''REPLACE_MALLOC_FOR_MALLOC_GNU''@|$(REPLACE_MALLOC_FOR_MALLOC_GNU)|g' \ -e 's|@''REPLACE_MALLOC_FOR_MALLOC_POSIX''@|$(REPLACE_MALLOC_FOR_MALLOC_POSIX)|g' \ -e 's|@''REPLACE_MB_CUR_MAX''@|$(REPLACE_MB_CUR_MAX)|g' \ -e 's|@''REPLACE_MBSTOWCS''@|$(REPLACE_MBSTOWCS)|g' \ -e 's|@''REPLACE_MBTOWC''@|$(REPLACE_MBTOWC)|g' \ -e 's|@''REPLACE_MKOSTEMP''@|$(REPLACE_MKOSTEMP)|g' \ -e 's|@''REPLACE_MKOSTEMPS''@|$(REPLACE_MKOSTEMPS)|g' \ -e 's|@''REPLACE_MKSTEMP''@|$(REPLACE_MKSTEMP)|g' \ -e 's|@''REPLACE_POSIX_MEMALIGN''@|$(REPLACE_POSIX_MEMALIGN)|g' \ -e 's|@''REPLACE_POSIX_OPENPT''@|$(REPLACE_POSIX_OPENPT)|g' \ -e 's|@''REPLACE_PTSNAME''@|$(REPLACE_PTSNAME)|g' \ -e 's|@''REPLACE_PTSNAME_R''@|$(REPLACE_PTSNAME_R)|g' \ -e 's|@''REPLACE_PUTENV''@|$(REPLACE_PUTENV)|g' \ -e 's|@''REPLACE_QSORT_R''@|$(REPLACE_QSORT_R)|g' \ -e 's|@''REPLACE_RAND''@|$(REPLACE_RAND)|g' \ -e 's|@''REPLACE_RANDOM''@|$(REPLACE_RANDOM)|g' \ -e 's|@''REPLACE_RANDOM_R''@|$(REPLACE_RANDOM_R)|g' \ -e 's|@''REPLACE_REALLOC_FOR_REALLOC_GNU''@|$(REPLACE_REALLOC_FOR_REALLOC_GNU)|g' \ -e 's|@''REPLACE_REALLOC_FOR_REALLOC_POSIX''@|$(REPLACE_REALLOC_FOR_REALLOC_POSIX)|g' \ -e 's|@''REPLACE_REALLOCARRAY''@|$(REPLACE_REALLOCARRAY)|g' \ -e 's|@''REPLACE_REALPATH''@|$(REPLACE_REALPATH)|g' \ -e 's|@''REPLACE_SETENV''@|$(REPLACE_SETENV)|g' \ -e 's|@''REPLACE_SETSTATE''@|$(REPLACE_SETSTATE)|g' \ -e 's|@''REPLACE_STRTOD''@|$(REPLACE_STRTOD)|g' \ -e 's|@''REPLACE_STRTOF''@|$(REPLACE_STRTOF)|g' \ -e 's|@''REPLACE_STRTOL''@|$(REPLACE_STRTOL)|g' \ -e 's|@''REPLACE_STRTOLD''@|$(REPLACE_STRTOLD)|g' \ -e 's|@''REPLACE_STRTOLL''@|$(REPLACE_STRTOLL)|g' \ -e 's|@''REPLACE_STRTOUL''@|$(REPLACE_STRTOUL)|g' \ -e 's|@''REPLACE_STRTOULL''@|$(REPLACE_STRTOULL)|g' \ -e 's|@''REPLACE_UNSETENV''@|$(REPLACE_UNSETENV)|g' \ -e 's|@''REPLACE_WCTOMB''@|$(REPLACE_WCTOMB)|g' \ -e 's|@''CAN_PRINT_STACK_TRACE''@|$(CAN_PRINT_STACK_TRACE)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ < $@-t2 > $@-t3 $(AM_V_at)rm -f $@-t1 $@-t2 $(AM_V_at)mv $@-t3 $@ MOSTLYCLEANFILES += stdlib.h stdlib.h-t1 stdlib.h-t2 stdlib.h-t3 endif EXTRA_DIST += stdlib.in.h ## end gnulib module stdlib ## begin gnulib module stdnoreturn BUILT_SOURCES += $(STDNORETURN_H) # We need the following in order to create when the system # doesn't have one that works. if GL_GENERATE_STDNORETURN_H stdnoreturn.h: stdnoreturn.in.h $(top_builddir)/config.status $(_NORETURN_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ $(srcdir)/stdnoreturn.in.h > $@-t $(AM_V_at)mv $@-t $@ else stdnoreturn.h: $(top_builddir)/config.status rm -f $@ endif MOSTLYCLEANFILES += stdnoreturn.h stdnoreturn.h-t EXTRA_DIST += stdnoreturn.in.h ## end gnulib module stdnoreturn ## begin gnulib module strerror if gl_GNULIB_ENABLED_strerror if GL_COND_OBJ_STRERROR libgnu_la_SOURCES += strerror.c endif endif ## end gnulib module strerror ## begin gnulib module strerror-override if gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72 if GL_COND_OBJ_STRERROR_OVERRIDE libgnu_la_SOURCES += strerror-override.c endif endif EXTRA_DIST += strerror-override.h ## end gnulib module strerror-override ## begin gnulib module string if gl_GNULIB_ENABLED_string BUILT_SOURCES += string.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. string.h: string.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_STRING_H''@|$(NEXT_STRING_H)|g' \ -e 's/@''GNULIB_EXPLICIT_BZERO''@/$(GL_GNULIB_EXPLICIT_BZERO)/g' \ -e 's/@''GNULIB_FFSL''@/$(GL_GNULIB_FFSL)/g' \ -e 's/@''GNULIB_FFSLL''@/$(GL_GNULIB_FFSLL)/g' \ -e 's/@''GNULIB_MBSLEN''@/$(GL_GNULIB_MBSLEN)/g' \ -e 's/@''GNULIB_MBSNLEN''@/$(GL_GNULIB_MBSNLEN)/g' \ -e 's/@''GNULIB_MBSCHR''@/$(GL_GNULIB_MBSCHR)/g' \ -e 's/@''GNULIB_MBSRCHR''@/$(GL_GNULIB_MBSRCHR)/g' \ -e 's/@''GNULIB_MBSSTR''@/$(GL_GNULIB_MBSSTR)/g' \ -e 's/@''GNULIB_MBSCASECMP''@/$(GL_GNULIB_MBSCASECMP)/g' \ -e 's/@''GNULIB_MBSNCASECMP''@/$(GL_GNULIB_MBSNCASECMP)/g' \ -e 's/@''GNULIB_MBSPCASECMP''@/$(GL_GNULIB_MBSPCASECMP)/g' \ -e 's/@''GNULIB_MBSCASESTR''@/$(GL_GNULIB_MBSCASESTR)/g' \ -e 's/@''GNULIB_MBSCSPN''@/$(GL_GNULIB_MBSCSPN)/g' \ -e 's/@''GNULIB_MBSPBRK''@/$(GL_GNULIB_MBSPBRK)/g' \ -e 's/@''GNULIB_MBSSPN''@/$(GL_GNULIB_MBSSPN)/g' \ -e 's/@''GNULIB_MBSSEP''@/$(GL_GNULIB_MBSSEP)/g' \ -e 's/@''GNULIB_MBSTOK_R''@/$(GL_GNULIB_MBSTOK_R)/g' \ -e 's/@''GNULIB_MEMCHR''@/$(GL_GNULIB_MEMCHR)/g' \ -e 's/@''GNULIB_MEMMEM''@/$(GL_GNULIB_MEMMEM)/g' \ -e 's/@''GNULIB_MEMPCPY''@/$(GL_GNULIB_MEMPCPY)/g' \ -e 's/@''GNULIB_MEMRCHR''@/$(GL_GNULIB_MEMRCHR)/g' \ -e 's/@''GNULIB_MEMSET_EXPLICIT''@/$(GL_GNULIB_MEMSET_EXPLICIT)/g' \ -e 's/@''GNULIB_RAWMEMCHR''@/$(GL_GNULIB_RAWMEMCHR)/g' \ -e 's/@''GNULIB_STPCPY''@/$(GL_GNULIB_STPCPY)/g' \ -e 's/@''GNULIB_STPNCPY''@/$(GL_GNULIB_STPNCPY)/g' \ -e 's/@''GNULIB_STRCHRNUL''@/$(GL_GNULIB_STRCHRNUL)/g' \ -e 's/@''GNULIB_STRDUP''@/$(GL_GNULIB_STRDUP)/g' \ -e 's/@''GNULIB_STRNCAT''@/$(GL_GNULIB_STRNCAT)/g' \ -e 's/@''GNULIB_STRNDUP''@/$(GL_GNULIB_STRNDUP)/g' \ -e 's/@''GNULIB_STRNLEN''@/$(GL_GNULIB_STRNLEN)/g' \ -e 's/@''GNULIB_STRPBRK''@/$(GL_GNULIB_STRPBRK)/g' \ -e 's/@''GNULIB_STRSEP''@/$(GL_GNULIB_STRSEP)/g' \ -e 's/@''GNULIB_STRSTR''@/$(GL_GNULIB_STRSTR)/g' \ -e 's/@''GNULIB_STRCASESTR''@/$(GL_GNULIB_STRCASESTR)/g' \ -e 's/@''GNULIB_STRTOK_R''@/$(GL_GNULIB_STRTOK_R)/g' \ -e 's/@''GNULIB_STRERROR''@/$(GL_GNULIB_STRERROR)/g' \ -e 's/@''GNULIB_STRERROR_R''@/$(GL_GNULIB_STRERROR_R)/g' \ -e 's/@''GNULIB_STRERRORNAME_NP''@/$(GL_GNULIB_STRERRORNAME_NP)/g' \ -e 's/@''GNULIB_SIGABBREV_NP''@/$(GL_GNULIB_SIGABBREV_NP)/g' \ -e 's/@''GNULIB_SIGDESCR_NP''@/$(GL_GNULIB_SIGDESCR_NP)/g' \ -e 's/@''GNULIB_STRSIGNAL''@/$(GL_GNULIB_STRSIGNAL)/g' \ -e 's/@''GNULIB_STRVERSCMP''@/$(GL_GNULIB_STRVERSCMP)/g' \ -e 's/@''GNULIB_MDA_MEMCCPY''@/$(GL_GNULIB_MDA_MEMCCPY)/g' \ -e 's/@''GNULIB_MDA_STRDUP''@/$(GL_GNULIB_MDA_STRDUP)/g' \ -e 's/@''GNULIB_FREE_POSIX''@/$(GL_GNULIB_FREE_POSIX)/g' \ < $(srcdir)/string.in.h > $@-t1 $(AM_V_at)sed \ -e 's|@''HAVE_EXPLICIT_BZERO''@|$(HAVE_EXPLICIT_BZERO)|g' \ -e 's|@''HAVE_FFSL''@|$(HAVE_FFSL)|g' \ -e 's|@''HAVE_FFSLL''@|$(HAVE_FFSLL)|g' \ -e 's|@''HAVE_MBSLEN''@|$(HAVE_MBSLEN)|g' \ -e 's|@''HAVE_DECL_MEMMEM''@|$(HAVE_DECL_MEMMEM)|g' \ -e 's|@''HAVE_MEMPCPY''@|$(HAVE_MEMPCPY)|g' \ -e 's|@''HAVE_DECL_MEMRCHR''@|$(HAVE_DECL_MEMRCHR)|g' \ -e 's|@''HAVE_MEMSET_EXPLICIT''@|$(HAVE_MEMSET_EXPLICIT)|g' \ -e 's|@''HAVE_RAWMEMCHR''@|$(HAVE_RAWMEMCHR)|g' \ -e 's|@''HAVE_STPCPY''@|$(HAVE_STPCPY)|g' \ -e 's|@''HAVE_STPNCPY''@|$(HAVE_STPNCPY)|g' \ -e 's|@''HAVE_STRCHRNUL''@|$(HAVE_STRCHRNUL)|g' \ -e 's|@''HAVE_DECL_STRDUP''@|$(HAVE_DECL_STRDUP)|g' \ -e 's|@''HAVE_DECL_STRNDUP''@|$(HAVE_DECL_STRNDUP)|g' \ -e 's|@''HAVE_DECL_STRNLEN''@|$(HAVE_DECL_STRNLEN)|g' \ -e 's|@''HAVE_STRPBRK''@|$(HAVE_STRPBRK)|g' \ -e 's|@''HAVE_STRSEP''@|$(HAVE_STRSEP)|g' \ -e 's|@''HAVE_STRCASESTR''@|$(HAVE_STRCASESTR)|g' \ -e 's|@''HAVE_DECL_STRTOK_R''@|$(HAVE_DECL_STRTOK_R)|g' \ -e 's|@''HAVE_DECL_STRERROR_R''@|$(HAVE_DECL_STRERROR_R)|g' \ -e 's|@''HAVE_STRERRORNAME_NP''@|$(HAVE_STRERRORNAME_NP)|g' \ -e 's|@''HAVE_SIGABBREV_NP''@|$(HAVE_SIGABBREV_NP)|g' \ -e 's|@''HAVE_SIGDESCR_NP''@|$(HAVE_SIGDESCR_NP)|g' \ -e 's|@''HAVE_DECL_STRSIGNAL''@|$(HAVE_DECL_STRSIGNAL)|g' \ -e 's|@''HAVE_STRVERSCMP''@|$(HAVE_STRVERSCMP)|g' \ -e 's|@''REPLACE_FFSLL''@|$(REPLACE_FFSLL)|g' \ -e 's|@''REPLACE_MEMCHR''@|$(REPLACE_MEMCHR)|g' \ -e 's|@''REPLACE_MEMMEM''@|$(REPLACE_MEMMEM)|g' \ -e 's|@''REPLACE_MEMPCPY''@|$(REPLACE_MEMPCPY)|g' \ -e 's|@''REPLACE_MEMSET_EXPLICIT''@|$(REPLACE_MEMSET_EXPLICIT)|g' \ -e 's|@''REPLACE_FREE''@|$(REPLACE_FREE)|g' \ -e 's|@''REPLACE_STPCPY''@|$(REPLACE_STPCPY)|g' \ -e 's|@''REPLACE_STPNCPY''@|$(REPLACE_STPNCPY)|g' \ -e 's|@''REPLACE_STRCHRNUL''@|$(REPLACE_STRCHRNUL)|g' \ -e 's|@''REPLACE_STRDUP''@|$(REPLACE_STRDUP)|g' \ -e 's|@''REPLACE_STRNCAT''@|$(REPLACE_STRNCAT)|g' \ -e 's|@''REPLACE_STRNDUP''@|$(REPLACE_STRNDUP)|g' \ -e 's|@''REPLACE_STRNLEN''@|$(REPLACE_STRNLEN)|g' \ -e 's|@''REPLACE_STRSTR''@|$(REPLACE_STRSTR)|g' \ -e 's|@''REPLACE_STRCASESTR''@|$(REPLACE_STRCASESTR)|g' \ -e 's|@''REPLACE_STRTOK_R''@|$(REPLACE_STRTOK_R)|g' \ -e 's|@''REPLACE_STRERROR''@|$(REPLACE_STRERROR)|g' \ -e 's|@''REPLACE_STRERROR_R''@|$(REPLACE_STRERROR_R)|g' \ -e 's|@''REPLACE_STRERRORNAME_NP''@|$(REPLACE_STRERRORNAME_NP)|g' \ -e 's|@''REPLACE_STRSIGNAL''@|$(REPLACE_STRSIGNAL)|g' \ -e 's|@''REPLACE_STRVERSCMP''@|$(REPLACE_STRVERSCMP)|g' \ -e 's|@''UNDEFINE_STRTOK_R''@|$(UNDEFINE_STRTOK_R)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ < $@-t1 > $@-t2 $(AM_V_at)rm -f $@-t1 $(AM_V_at)mv $@-t2 $@ MOSTLYCLEANFILES += string.h string.h-t1 string.h-t2 endif EXTRA_DIST += string.in.h ## end gnulib module string ## begin gnulib module sys_stat if gl_GNULIB_ENABLED_sys_stat BUILT_SOURCES += sys/stat.h # We need the following in order to create when the system # has one that is incomplete. sys/stat.h: sys_stat.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(AM_V_GEN)$(MKDIR_P) '%reldir%/sys' $(AM_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_SYS_STAT_H''@|$(NEXT_SYS_STAT_H)|g' \ -e 's|@''WINDOWS_64_BIT_ST_SIZE''@|$(WINDOWS_64_BIT_ST_SIZE)|g' \ -e 's|@''WINDOWS_STAT_TIMESPEC''@|$(WINDOWS_STAT_TIMESPEC)|g' \ -e 's/@''GNULIB_CHMOD''@/$(GL_GNULIB_CHMOD)/g' \ -e 's/@''GNULIB_FCHMODAT''@/$(GL_GNULIB_FCHMODAT)/g' \ -e 's/@''GNULIB_FSTAT''@/$(GL_GNULIB_FSTAT)/g' \ -e 's/@''GNULIB_FSTATAT''@/$(GL_GNULIB_FSTATAT)/g' \ -e 's/@''GNULIB_FUTIMENS''@/$(GL_GNULIB_FUTIMENS)/g' \ -e 's/@''GNULIB_GETUMASK''@/$(GL_GNULIB_GETUMASK)/g' \ -e 's/@''GNULIB_LCHMOD''@/$(GL_GNULIB_LCHMOD)/g' \ -e 's/@''GNULIB_LSTAT''@/$(GL_GNULIB_LSTAT)/g' \ -e 's/@''GNULIB_MKDIR''@/$(GL_GNULIB_MKDIR)/g' \ -e 's/@''GNULIB_MKDIRAT''@/$(GL_GNULIB_MKDIRAT)/g' \ -e 's/@''GNULIB_MKFIFO''@/$(GL_GNULIB_MKFIFO)/g' \ -e 's/@''GNULIB_MKFIFOAT''@/$(GL_GNULIB_MKFIFOAT)/g' \ -e 's/@''GNULIB_MKNOD''@/$(GL_GNULIB_MKNOD)/g' \ -e 's/@''GNULIB_MKNODAT''@/$(GL_GNULIB_MKNODAT)/g' \ -e 's/@''GNULIB_STAT''@/$(GL_GNULIB_STAT)/g' \ -e 's/@''GNULIB_UTIMENSAT''@/$(GL_GNULIB_UTIMENSAT)/g' \ -e 's/@''GNULIB_OVERRIDES_STRUCT_STAT''@/$(GL_GNULIB_OVERRIDES_STRUCT_STAT)/g' \ -e 's/@''GNULIB_MDA_CHMOD''@/$(GL_GNULIB_MDA_CHMOD)/g' \ -e 's/@''GNULIB_MDA_MKDIR''@/$(GL_GNULIB_MDA_MKDIR)/g' \ -e 's/@''GNULIB_MDA_UMASK''@/$(GL_GNULIB_MDA_UMASK)/g' \ -e 's|@''HAVE_FCHMODAT''@|$(HAVE_FCHMODAT)|g' \ -e 's|@''HAVE_FSTATAT''@|$(HAVE_FSTATAT)|g' \ -e 's|@''HAVE_FUTIMENS''@|$(HAVE_FUTIMENS)|g' \ -e 's|@''HAVE_GETUMASK''@|$(HAVE_GETUMASK)|g' \ -e 's|@''HAVE_LCHMOD''@|$(HAVE_LCHMOD)|g' \ -e 's|@''HAVE_LSTAT''@|$(HAVE_LSTAT)|g' \ -e 's|@''HAVE_MKDIRAT''@|$(HAVE_MKDIRAT)|g' \ -e 's|@''HAVE_MKFIFO''@|$(HAVE_MKFIFO)|g' \ -e 's|@''HAVE_MKFIFOAT''@|$(HAVE_MKFIFOAT)|g' \ -e 's|@''HAVE_MKNOD''@|$(HAVE_MKNOD)|g' \ -e 's|@''HAVE_MKNODAT''@|$(HAVE_MKNODAT)|g' \ -e 's|@''HAVE_UTIMENSAT''@|$(HAVE_UTIMENSAT)|g' \ -e 's|@''REPLACE_CHMOD''@|$(REPLACE_CHMOD)|g' \ -e 's|@''REPLACE_FCHMODAT''@|$(REPLACE_FCHMODAT)|g' \ -e 's|@''REPLACE_FSTAT''@|$(REPLACE_FSTAT)|g' \ -e 's|@''REPLACE_FSTATAT''@|$(REPLACE_FSTATAT)|g' \ -e 's|@''REPLACE_FUTIMENS''@|$(REPLACE_FUTIMENS)|g' \ -e 's|@''REPLACE_LSTAT''@|$(REPLACE_LSTAT)|g' \ -e 's|@''REPLACE_MKDIR''@|$(REPLACE_MKDIR)|g' \ -e 's|@''REPLACE_MKFIFO''@|$(REPLACE_MKFIFO)|g' \ -e 's|@''REPLACE_MKFIFOAT''@|$(REPLACE_MKFIFOAT)|g' \ -e 's|@''REPLACE_MKNOD''@|$(REPLACE_MKNOD)|g' \ -e 's|@''REPLACE_MKNODAT''@|$(REPLACE_MKNODAT)|g' \ -e 's|@''REPLACE_STAT''@|$(REPLACE_STAT)|g' \ -e 's|@''REPLACE_UTIMENSAT''@|$(REPLACE_UTIMENSAT)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/sys_stat.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += sys/stat.h sys/stat.h-t MOSTLYCLEANDIRS += sys endif EXTRA_DIST += sys_stat.in.h ## end gnulib module sys_stat ## begin gnulib module sys_types BUILT_SOURCES += sys/types.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. sys/types.h: sys_types.in.h $(top_builddir)/config.status $(AM_V_GEN)$(MKDIR_P) '%reldir%/sys' $(AM_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_SYS_TYPES_H''@|$(NEXT_SYS_TYPES_H)|g' \ -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \ -e 's|@''HAVE_OFF64_T''@|$(HAVE_OFF64_T)|g' \ -e 's|@''WINDOWS_STAT_INODES''@|$(WINDOWS_STAT_INODES)|g' \ $(srcdir)/sys_types.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += sys/types.h sys/types.h-t MOSTLYCLEANDIRS += sys EXTRA_DIST += sys_types.in.h ## end gnulib module sys_types ## begin gnulib module thread-optim if gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9 endif EXTRA_DIST += thread-optim.h ## end gnulib module thread-optim ## begin gnulib module threadlib libgnu_la_SOURCES += glthread/threadlib.c ## end gnulib module threadlib ## begin gnulib module time-h if gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd BUILT_SOURCES += time.h # We need the following in order to create when the system # doesn't have one that works with the given compiler. time.h: time.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_TIME_H''@|$(NEXT_TIME_H)|g' \ -e 's/@''GNULIB_CTIME''@/$(GL_GNULIB_CTIME)/g' \ -e 's/@''GNULIB_LOCALTIME''@/$(GL_GNULIB_LOCALTIME)/g' \ -e 's/@''GNULIB_MKTIME''@/$(GL_GNULIB_MKTIME)/g' \ -e 's/@''GNULIB_NANOSLEEP''@/$(GL_GNULIB_NANOSLEEP)/g' \ -e 's/@''GNULIB_STRFTIME''@/$(GL_GNULIB_STRFTIME)/g' \ -e 's/@''GNULIB_STRPTIME''@/$(GL_GNULIB_STRPTIME)/g' \ -e 's/@''GNULIB_TIME''@/$(GL_GNULIB_TIME)/g' \ -e 's/@''GNULIB_TIMEGM''@/$(GL_GNULIB_TIMEGM)/g' \ -e 's/@''GNULIB_TIMESPEC_GET''@/$(GL_GNULIB_TIMESPEC_GET)/g' \ -e 's/@''GNULIB_TIMESPEC_GETRES''@/$(GL_GNULIB_TIMESPEC_GETRES)/g' \ -e 's/@''GNULIB_TIME_R''@/$(GL_GNULIB_TIME_R)/g' \ -e 's/@''GNULIB_TIME_RZ''@/$(GL_GNULIB_TIME_RZ)/g' \ -e 's/@''GNULIB_TZNAME''@/$(GL_GNULIB_TZNAME)/g' \ -e 's/@''GNULIB_TZSET''@/$(GL_GNULIB_TZSET)/g' \ -e 's/@''GNULIB_MDA_TZSET''@/$(GL_GNULIB_MDA_TZSET)/g' \ -e 's|@''HAVE_DECL_LOCALTIME_R''@|$(HAVE_DECL_LOCALTIME_R)|g' \ -e 's|@''HAVE_NANOSLEEP''@|$(HAVE_NANOSLEEP)|g' \ -e 's|@''HAVE_STRPTIME''@|$(HAVE_STRPTIME)|g' \ -e 's|@''HAVE_TIMEGM''@|$(HAVE_TIMEGM)|g' \ -e 's|@''HAVE_TIMESPEC_GET''@|$(HAVE_TIMESPEC_GET)|g' \ -e 's|@''HAVE_TIMESPEC_GETRES''@|$(HAVE_TIMESPEC_GETRES)|g' \ -e 's|@''HAVE_TIMEZONE_T''@|$(HAVE_TIMEZONE_T)|g' \ -e 's|@''REPLACE_CTIME''@|$(REPLACE_CTIME)|g' \ -e 's|@''REPLACE_GMTIME''@|$(REPLACE_GMTIME)|g' \ -e 's|@''REPLACE_LOCALTIME''@|$(REPLACE_LOCALTIME)|g' \ -e 's|@''REPLACE_LOCALTIME_R''@|$(REPLACE_LOCALTIME_R)|g' \ -e 's|@''REPLACE_MKTIME''@|$(REPLACE_MKTIME)|g' \ -e 's|@''REPLACE_NANOSLEEP''@|$(REPLACE_NANOSLEEP)|g' \ -e 's|@''REPLACE_STRFTIME''@|$(REPLACE_STRFTIME)|g' \ -e 's|@''REPLACE_TIME''@|$(REPLACE_TIME)|g' \ -e 's|@''REPLACE_TIMEGM''@|$(REPLACE_TIMEGM)|g' \ -e 's|@''REPLACE_TIMESPEC_GET''@|$(REPLACE_TIMESPEC_GET)|g' \ -e 's|@''REPLACE_TIMESPEC_GETRES''@|$(REPLACE_TIMESPEC_GETRES)|g' \ -e 's|@''REPLACE_TZSET''@|$(REPLACE_TZSET)|g' \ -e 's|@''PTHREAD_H_DEFINES_STRUCT_TIMESPEC''@|$(PTHREAD_H_DEFINES_STRUCT_TIMESPEC)|g' \ -e 's|@''SYS_TIME_H_DEFINES_STRUCT_TIMESPEC''@|$(SYS_TIME_H_DEFINES_STRUCT_TIMESPEC)|g' \ -e 's|@''TIME_H_DEFINES_STRUCT_TIMESPEC''@|$(TIME_H_DEFINES_STRUCT_TIMESPEC)|g' \ -e 's|@''UNISTD_H_DEFINES_STRUCT_TIMESPEC''@|$(UNISTD_H_DEFINES_STRUCT_TIMESPEC)|g' \ -e 's|@''TIME_H_DEFINES_TIME_UTC''@|$(TIME_H_DEFINES_TIME_UTC)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ $(srcdir)/time.in.h > $@-t $(AM_V_at)mv $@-t $@ MOSTLYCLEANFILES += time.h time.h-t endif EXTRA_DIST += time.in.h ## end gnulib module time-h ## begin gnulib module unistd if gl_GNULIB_ENABLED_unistd BUILT_SOURCES += unistd.h libgnu_la_SOURCES += unistd.c # We need the following in order to create an empty placeholder for # when the system doesn't have one. unistd.h: unistd.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) $(gl_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''HAVE_UNISTD_H''@|$(HAVE_UNISTD_H)|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_UNISTD_H''@|$(NEXT_UNISTD_H)|g' \ -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \ -e 's/@''GNULIB_ACCESS''@/$(GL_GNULIB_ACCESS)/g' \ -e 's/@''GNULIB_CHDIR''@/$(GL_GNULIB_CHDIR)/g' \ -e 's/@''GNULIB_CHOWN''@/$(GL_GNULIB_CHOWN)/g' \ -e 's/@''GNULIB_CLOSE''@/$(GL_GNULIB_CLOSE)/g' \ -e 's/@''GNULIB_COPY_FILE_RANGE''@/$(GL_GNULIB_COPY_FILE_RANGE)/g' \ -e 's/@''GNULIB_DUP''@/$(GL_GNULIB_DUP)/g' \ -e 's/@''GNULIB_DUP2''@/$(GL_GNULIB_DUP2)/g' \ -e 's/@''GNULIB_DUP3''@/$(GL_GNULIB_DUP3)/g' \ -e 's/@''GNULIB_ENVIRON''@/$(GL_GNULIB_ENVIRON)/g' \ -e 's/@''GNULIB_EUIDACCESS''@/$(GL_GNULIB_EUIDACCESS)/g' \ -e 's/@''GNULIB_EXECL''@/$(GL_GNULIB_EXECL)/g' \ -e 's/@''GNULIB_EXECLE''@/$(GL_GNULIB_EXECLE)/g' \ -e 's/@''GNULIB_EXECLP''@/$(GL_GNULIB_EXECLP)/g' \ -e 's/@''GNULIB_EXECV''@/$(GL_GNULIB_EXECV)/g' \ -e 's/@''GNULIB_EXECVE''@/$(GL_GNULIB_EXECVE)/g' \ -e 's/@''GNULIB_EXECVP''@/$(GL_GNULIB_EXECVP)/g' \ -e 's/@''GNULIB_EXECVPE''@/$(GL_GNULIB_EXECVPE)/g' \ -e 's/@''GNULIB_FACCESSAT''@/$(GL_GNULIB_FACCESSAT)/g' \ -e 's/@''GNULIB_FCHDIR''@/$(GL_GNULIB_FCHDIR)/g' \ -e 's/@''GNULIB_FCHOWNAT''@/$(GL_GNULIB_FCHOWNAT)/g' \ -e 's/@''GNULIB_FDATASYNC''@/$(GL_GNULIB_FDATASYNC)/g' \ -e 's/@''GNULIB_FSYNC''@/$(GL_GNULIB_FSYNC)/g' \ -e 's/@''GNULIB_FTRUNCATE''@/$(GL_GNULIB_FTRUNCATE)/g' \ < $(srcdir)/unistd.in.h > $@-t1 $(AM_V_at)sed \ -e 's/@''GNULIB_GETCWD''@/$(GL_GNULIB_GETCWD)/g' \ -e 's/@''GNULIB_GETDOMAINNAME''@/$(GL_GNULIB_GETDOMAINNAME)/g' \ -e 's/@''GNULIB_GETDTABLESIZE''@/$(GL_GNULIB_GETDTABLESIZE)/g' \ -e 's/@''GNULIB_GETENTROPY''@/$(GL_GNULIB_GETENTROPY)/g' \ -e 's/@''GNULIB_GETGROUPS''@/$(GL_GNULIB_GETGROUPS)/g' \ -e 's/@''GNULIB_GETHOSTNAME''@/$(GL_GNULIB_GETHOSTNAME)/g' \ -e 's/@''GNULIB_GETLOGIN''@/$(GL_GNULIB_GETLOGIN)/g' \ -e 's/@''GNULIB_GETLOGIN_R''@/$(GL_GNULIB_GETLOGIN_R)/g' \ -e 's/@''GNULIB_GETOPT_POSIX''@/$(GL_GNULIB_GETOPT_POSIX)/g' \ -e 's/@''GNULIB_GETPAGESIZE''@/$(GL_GNULIB_GETPAGESIZE)/g' \ -e 's/@''GNULIB_GETPASS''@/$(GL_GNULIB_GETPASS)/g' \ -e 's/@''GNULIB_GETPASS_GNU''@/$(GL_GNULIB_GETPASS_GNU)/g' \ -e 's/@''GNULIB_GETUSERSHELL''@/$(GL_GNULIB_GETUSERSHELL)/g' \ -e 's/@''GNULIB_GROUP_MEMBER''@/$(GL_GNULIB_GROUP_MEMBER)/g' \ -e 's/@''GNULIB_ISATTY''@/$(GL_GNULIB_ISATTY)/g' \ -e 's/@''GNULIB_LCHOWN''@/$(GL_GNULIB_LCHOWN)/g' \ -e 's/@''GNULIB_LINK''@/$(GL_GNULIB_LINK)/g' \ -e 's/@''GNULIB_LINKAT''@/$(GL_GNULIB_LINKAT)/g' \ -e 's/@''GNULIB_LSEEK''@/$(GL_GNULIB_LSEEK)/g' \ -e 's/@''GNULIB_PIPE''@/$(GL_GNULIB_PIPE)/g' \ -e 's/@''GNULIB_PIPE2''@/$(GL_GNULIB_PIPE2)/g' \ -e 's/@''GNULIB_PREAD''@/$(GL_GNULIB_PREAD)/g' \ -e 's/@''GNULIB_PWRITE''@/$(GL_GNULIB_PWRITE)/g' \ -e 's/@''GNULIB_READ''@/$(GL_GNULIB_READ)/g' \ -e 's/@''GNULIB_READLINK''@/$(GL_GNULIB_READLINK)/g' \ -e 's/@''GNULIB_READLINKAT''@/$(GL_GNULIB_READLINKAT)/g' \ -e 's/@''GNULIB_RMDIR''@/$(GL_GNULIB_RMDIR)/g' \ -e 's/@''GNULIB_SETHOSTNAME''@/$(GL_GNULIB_SETHOSTNAME)/g' \ -e 's/@''GNULIB_SLEEP''@/$(GL_GNULIB_SLEEP)/g' \ -e 's/@''GNULIB_SYMLINK''@/$(GL_GNULIB_SYMLINK)/g' \ -e 's/@''GNULIB_SYMLINKAT''@/$(GL_GNULIB_SYMLINKAT)/g' \ -e 's/@''GNULIB_TRUNCATE''@/$(GL_GNULIB_TRUNCATE)/g' \ -e 's/@''GNULIB_TTYNAME_R''@/$(GL_GNULIB_TTYNAME_R)/g' \ -e 's/@''GNULIB_UNISTD_H_GETOPT''@/0$(GL_GNULIB_UNISTD_H_GETOPT)/g' \ -e 's/@''GNULIB_UNISTD_H_NONBLOCKING''@/$(GL_GNULIB_UNISTD_H_NONBLOCKING)/g' \ -e 's/@''GNULIB_UNISTD_H_SIGPIPE''@/$(GL_GNULIB_UNISTD_H_SIGPIPE)/g' \ -e 's/@''GNULIB_UNLINK''@/$(GL_GNULIB_UNLINK)/g' \ -e 's/@''GNULIB_UNLINKAT''@/$(GL_GNULIB_UNLINKAT)/g' \ -e 's/@''GNULIB_USLEEP''@/$(GL_GNULIB_USLEEP)/g' \ -e 's/@''GNULIB_WRITE''@/$(GL_GNULIB_WRITE)/g' \ -e 's/@''GNULIB_MDA_ACCESS''@/$(GL_GNULIB_MDA_ACCESS)/g' \ -e 's/@''GNULIB_MDA_CHDIR''@/$(GL_GNULIB_MDA_CHDIR)/g' \ -e 's/@''GNULIB_MDA_CLOSE''@/$(GL_GNULIB_MDA_CLOSE)/g' \ -e 's/@''GNULIB_MDA_DUP''@/$(GL_GNULIB_MDA_DUP)/g' \ -e 's/@''GNULIB_MDA_DUP2''@/$(GL_GNULIB_MDA_DUP2)/g' \ -e 's/@''GNULIB_MDA_EXECL''@/$(GL_GNULIB_MDA_EXECL)/g' \ -e 's/@''GNULIB_MDA_EXECLE''@/$(GL_GNULIB_MDA_EXECLE)/g' \ -e 's/@''GNULIB_MDA_EXECLP''@/$(GL_GNULIB_MDA_EXECLP)/g' \ -e 's/@''GNULIB_MDA_EXECV''@/$(GL_GNULIB_MDA_EXECV)/g' \ -e 's/@''GNULIB_MDA_EXECVE''@/$(GL_GNULIB_MDA_EXECVE)/g' \ -e 's/@''GNULIB_MDA_EXECVP''@/$(GL_GNULIB_MDA_EXECVP)/g' \ -e 's/@''GNULIB_MDA_EXECVPE''@/$(GL_GNULIB_MDA_EXECVPE)/g' \ -e 's/@''GNULIB_MDA_GETCWD''@/$(GL_GNULIB_MDA_GETCWD)/g' \ -e 's/@''GNULIB_MDA_GETPID''@/$(GL_GNULIB_MDA_GETPID)/g' \ -e 's/@''GNULIB_MDA_ISATTY''@/$(GL_GNULIB_MDA_ISATTY)/g' \ -e 's/@''GNULIB_MDA_LSEEK''@/$(GL_GNULIB_MDA_LSEEK)/g' \ -e 's/@''GNULIB_MDA_READ''@/$(GL_GNULIB_MDA_READ)/g' \ -e 's/@''GNULIB_MDA_RMDIR''@/$(GL_GNULIB_MDA_RMDIR)/g' \ -e 's/@''GNULIB_MDA_SWAB''@/$(GL_GNULIB_MDA_SWAB)/g' \ -e 's/@''GNULIB_MDA_UNLINK''@/$(GL_GNULIB_MDA_UNLINK)/g' \ -e 's/@''GNULIB_MDA_WRITE''@/$(GL_GNULIB_MDA_WRITE)/g' \ < $@-t1 > $@-t2 $(AM_V_at)sed \ -e 's|@''HAVE_CHOWN''@|$(HAVE_CHOWN)|g' \ -e 's|@''HAVE_COPY_FILE_RANGE''@|$(HAVE_COPY_FILE_RANGE)|g' \ -e 's|@''HAVE_DUP3''@|$(HAVE_DUP3)|g' \ -e 's|@''HAVE_EUIDACCESS''@|$(HAVE_EUIDACCESS)|g' \ -e 's|@''HAVE_EXECVPE''@|$(HAVE_EXECVPE)|g' \ -e 's|@''HAVE_FACCESSAT''@|$(HAVE_FACCESSAT)|g' \ -e 's|@''HAVE_FCHDIR''@|$(HAVE_FCHDIR)|g' \ -e 's|@''HAVE_FCHOWNAT''@|$(HAVE_FCHOWNAT)|g' \ -e 's|@''HAVE_FDATASYNC''@|$(HAVE_FDATASYNC)|g' \ -e 's|@''HAVE_FSYNC''@|$(HAVE_FSYNC)|g' \ -e 's|@''HAVE_FTRUNCATE''@|$(HAVE_FTRUNCATE)|g' \ -e 's|@''HAVE_GETDTABLESIZE''@|$(HAVE_GETDTABLESIZE)|g' \ -e 's|@''HAVE_GETENTROPY''@|$(HAVE_GETENTROPY)|g' \ -e 's|@''HAVE_GETGROUPS''@|$(HAVE_GETGROUPS)|g' \ -e 's|@''HAVE_GETHOSTNAME''@|$(HAVE_GETHOSTNAME)|g' \ -e 's|@''HAVE_GETPAGESIZE''@|$(HAVE_GETPAGESIZE)|g' \ -e 's|@''HAVE_GETPASS''@|$(HAVE_GETPASS)|g' \ -e 's|@''HAVE_GROUP_MEMBER''@|$(HAVE_GROUP_MEMBER)|g' \ -e 's|@''HAVE_LCHOWN''@|$(HAVE_LCHOWN)|g' \ -e 's|@''HAVE_LINK''@|$(HAVE_LINK)|g' \ -e 's|@''HAVE_LINKAT''@|$(HAVE_LINKAT)|g' \ -e 's|@''HAVE_PIPE''@|$(HAVE_PIPE)|g' \ -e 's|@''HAVE_PIPE2''@|$(HAVE_PIPE2)|g' \ -e 's|@''HAVE_PREAD''@|$(HAVE_PREAD)|g' \ -e 's|@''HAVE_PWRITE''@|$(HAVE_PWRITE)|g' \ -e 's|@''HAVE_READLINK''@|$(HAVE_READLINK)|g' \ -e 's|@''HAVE_READLINKAT''@|$(HAVE_READLINKAT)|g' \ -e 's|@''HAVE_SETHOSTNAME''@|$(HAVE_SETHOSTNAME)|g' \ -e 's|@''HAVE_SLEEP''@|$(HAVE_SLEEP)|g' \ -e 's|@''HAVE_SYMLINK''@|$(HAVE_SYMLINK)|g' \ -e 's|@''HAVE_SYMLINKAT''@|$(HAVE_SYMLINKAT)|g' \ -e 's|@''HAVE_UNLINKAT''@|$(HAVE_UNLINKAT)|g' \ -e 's|@''HAVE_USLEEP''@|$(HAVE_USLEEP)|g' \ -e 's|@''HAVE_DECL_ENVIRON''@|$(HAVE_DECL_ENVIRON)|g' \ -e 's|@''HAVE_DECL_EXECVPE''@|$(HAVE_DECL_EXECVPE)|g' \ -e 's|@''HAVE_DECL_FCHDIR''@|$(HAVE_DECL_FCHDIR)|g' \ -e 's|@''HAVE_DECL_FDATASYNC''@|$(HAVE_DECL_FDATASYNC)|g' \ -e 's|@''HAVE_DECL_GETDOMAINNAME''@|$(HAVE_DECL_GETDOMAINNAME)|g' \ -e 's|@''HAVE_DECL_GETLOGIN''@|$(HAVE_DECL_GETLOGIN)|g' \ -e 's|@''HAVE_DECL_GETLOGIN_R''@|$(HAVE_DECL_GETLOGIN_R)|g' \ -e 's|@''HAVE_DECL_GETPAGESIZE''@|$(HAVE_DECL_GETPAGESIZE)|g' \ -e 's|@''HAVE_DECL_GETUSERSHELL''@|$(HAVE_DECL_GETUSERSHELL)|g' \ -e 's|@''HAVE_DECL_SETHOSTNAME''@|$(HAVE_DECL_SETHOSTNAME)|g' \ -e 's|@''HAVE_DECL_TRUNCATE''@|$(HAVE_DECL_TRUNCATE)|g' \ -e 's|@''HAVE_DECL_TTYNAME_R''@|$(HAVE_DECL_TTYNAME_R)|g' \ -e 's|@''HAVE_OS_H''@|$(HAVE_OS_H)|g' \ -e 's|@''HAVE_SYS_PARAM_H''@|$(HAVE_SYS_PARAM_H)|g' \ < $@-t2 > $@-t3 $(AM_V_at)sed \ -e 's|@''REPLACE_ACCESS''@|$(REPLACE_ACCESS)|g' \ -e 's|@''REPLACE_CHOWN''@|$(REPLACE_CHOWN)|g' \ -e 's|@''REPLACE_CLOSE''@|$(REPLACE_CLOSE)|g' \ -e 's|@''REPLACE_COPY_FILE_RANGE''@|$(REPLACE_COPY_FILE_RANGE)|g' \ -e 's|@''REPLACE_DUP''@|$(REPLACE_DUP)|g' \ -e 's|@''REPLACE_DUP2''@|$(REPLACE_DUP2)|g' \ -e 's|@''REPLACE_DUP3''@|$(REPLACE_DUP3)|g' \ -e 's|@''REPLACE_EXECL''@|$(REPLACE_EXECL)|g' \ -e 's|@''REPLACE_EXECLE''@|$(REPLACE_EXECLE)|g' \ -e 's|@''REPLACE_EXECLP''@|$(REPLACE_EXECLP)|g' \ -e 's|@''REPLACE_EXECV''@|$(REPLACE_EXECV)|g' \ -e 's|@''REPLACE_EXECVE''@|$(REPLACE_EXECVE)|g' \ -e 's|@''REPLACE_EXECVP''@|$(REPLACE_EXECVP)|g' \ -e 's|@''REPLACE_EXECVPE''@|$(REPLACE_EXECVPE)|g' \ -e 's|@''REPLACE_FACCESSAT''@|$(REPLACE_FACCESSAT)|g' \ -e 's|@''REPLACE_FCHDIR''@|$(REPLACE_FCHDIR)|g' \ -e 's|@''REPLACE_FCHOWNAT''@|$(REPLACE_FCHOWNAT)|g' \ -e 's|@''REPLACE_FDATASYNC''@|$(REPLACE_FDATASYNC)|g' \ -e 's|@''REPLACE_FTRUNCATE''@|$(REPLACE_FTRUNCATE)|g' \ -e 's|@''REPLACE_GETCWD''@|$(REPLACE_GETCWD)|g' \ -e 's|@''REPLACE_GETDOMAINNAME''@|$(REPLACE_GETDOMAINNAME)|g' \ -e 's|@''REPLACE_GETDTABLESIZE''@|$(REPLACE_GETDTABLESIZE)|g' \ -e 's|@''REPLACE_GETENTROPY''@|$(REPLACE_GETENTROPY)|g' \ -e 's|@''REPLACE_GETLOGIN_R''@|$(REPLACE_GETLOGIN_R)|g' \ -e 's|@''REPLACE_GETGROUPS''@|$(REPLACE_GETGROUPS)|g' \ -e 's|@''REPLACE_GETPAGESIZE''@|$(REPLACE_GETPAGESIZE)|g' \ -e 's|@''REPLACE_GETPASS''@|$(REPLACE_GETPASS)|g' \ -e 's|@''REPLACE_GETPASS_FOR_GETPASS_GNU''@|$(REPLACE_GETPASS_FOR_GETPASS_GNU)|g' \ -e 's|@''REPLACE_GETUSERSHELL''@|$(REPLACE_GETUSERSHELL)|g' \ -e 's|@''REPLACE_ISATTY''@|$(REPLACE_ISATTY)|g' \ -e 's|@''REPLACE_LCHOWN''@|$(REPLACE_LCHOWN)|g' \ -e 's|@''REPLACE_LINK''@|$(REPLACE_LINK)|g' \ -e 's|@''REPLACE_LINKAT''@|$(REPLACE_LINKAT)|g' \ -e 's|@''REPLACE_LSEEK''@|$(REPLACE_LSEEK)|g' \ -e 's|@''REPLACE_PIPE2''@|$(REPLACE_PIPE2)|g' \ -e 's|@''REPLACE_PREAD''@|$(REPLACE_PREAD)|g' \ -e 's|@''REPLACE_PWRITE''@|$(REPLACE_PWRITE)|g' \ -e 's|@''REPLACE_READ''@|$(REPLACE_READ)|g' \ -e 's|@''REPLACE_READLINK''@|$(REPLACE_READLINK)|g' \ -e 's|@''REPLACE_READLINKAT''@|$(REPLACE_READLINKAT)|g' \ -e 's|@''REPLACE_RMDIR''@|$(REPLACE_RMDIR)|g' \ -e 's|@''REPLACE_SETHOSTNAME''@|$(REPLACE_SETHOSTNAME)|g' \ -e 's|@''REPLACE_SLEEP''@|$(REPLACE_SLEEP)|g' \ -e 's|@''REPLACE_SYMLINK''@|$(REPLACE_SYMLINK)|g' \ -e 's|@''REPLACE_SYMLINKAT''@|$(REPLACE_SYMLINKAT)|g' \ -e 's|@''REPLACE_TRUNCATE''@|$(REPLACE_TRUNCATE)|g' \ -e 's|@''REPLACE_TTYNAME_R''@|$(REPLACE_TTYNAME_R)|g' \ -e 's|@''REPLACE_UNLINK''@|$(REPLACE_UNLINK)|g' \ -e 's|@''REPLACE_UNLINKAT''@|$(REPLACE_UNLINKAT)|g' \ -e 's|@''REPLACE_USLEEP''@|$(REPLACE_USLEEP)|g' \ -e 's|@''REPLACE_WRITE''@|$(REPLACE_WRITE)|g' \ -e 's|@''UNISTD_H_HAVE_SYS_RANDOM_H''@|$(UNISTD_H_HAVE_SYS_RANDOM_H)|g' \ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H''@|$(UNISTD_H_HAVE_WINSOCK2_H)|g' \ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS''@|$(UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS)|g' \ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ < $@-t3 > $@-t4 $(AM_V_at)rm -f $@-t1 $@-t2 $@-t3 $(AM_V_at)mv $@-t4 $@ MOSTLYCLEANFILES += unistd.h unistd.h-t1 unistd.h-t2 unistd.h-t3 unistd.h-t4 endif EXTRA_DIST += unistd.in.h ## end gnulib module unistd ## begin gnulib module vma-iter if gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556 libgnu_la_SOURCES += vma-iter.c endif EXTRA_DIST += vma-iter.h ## end gnulib module vma-iter ## begin gnulib module vma-prot if gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d libgnu_la_SOURCES += vma-prot.c endif EXTRA_DIST += vma-prot.h ## end gnulib module vma-prot ## begin gnulib module windows-mutex if gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440 if GL_COND_OBJ_WINDOWS_MUTEX libgnu_la_SOURCES += windows-mutex.c endif endif EXTRA_DIST += windows-initguard.h windows-mutex.h ## end gnulib module windows-mutex ## begin gnulib module windows-once if gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab if GL_COND_OBJ_WINDOWS_ONCE libgnu_la_SOURCES += windows-once.c endif endif EXTRA_DIST += windows-once.h ## end gnulib module windows-once ## begin gnulib module windows-recmutex if gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354 if GL_COND_OBJ_WINDOWS_RECMUTEX libgnu_la_SOURCES += windows-recmutex.c endif endif EXTRA_DIST += windows-initguard.h windows-recmutex.h ## end gnulib module windows-recmutex ## begin gnulib module windows-rwlock if gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef if GL_COND_OBJ_WINDOWS_RWLOCK libgnu_la_SOURCES += windows-rwlock.c endif endif EXTRA_DIST += windows-initguard.h windows-rwlock.h ## end gnulib module windows-rwlock ## begin gnulib module windows-spin if gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f if GL_COND_OBJ_WINDOWS_SPIN libgnu_la_SOURCES += windows-spin.c endif endif EXTRA_DIST += windows-spin.h ## end gnulib module windows-spin ## begin gnulib module xalloc-oversized if gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec endif EXTRA_DIST += xalloc-oversized.h ## end gnulib module xalloc-oversized ## begin gnulib module xsize if gl_GNULIB_ENABLED_xsize libgnu_la_SOURCES += xsize.h xsize.c endif ## end gnulib module xsize mostlyclean-local: mostlyclean-generic @for dir in '' $(MOSTLYCLEANDIRS); do \ if test -n "$$dir" && test -d $$dir; then \ echo "rmdir $$dir"; rmdir $$dir; \ fi; \ done; \ : distclean-local: distclean-gnulib-libobjs distclean-gnulib-libobjs: -rm -f @gl_LIBOBJDEPS@ maintainer-clean-local: distclean-gnulib-libobjs libffcall-2.5/gnulib-lib/raise.c0000664000000000000000000000343514631432055013472 00000000000000/* Provide a non-threads replacement for the POSIX raise function. Copyright (C) 2002-2003, 2005-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* written by Jim Meyering and Bruno Haible */ #include /* Specification. */ #include #if HAVE_RAISE /* Native Windows platform. */ # include # if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" # endif # if HAVE_MSVC_INVALID_PARAMETER_HANDLER /* Forward declaration. */ static int raise_nothrow (int sig); # else # define raise_nothrow raise # endif #else /* An old Unix platform. */ # include #endif int raise (int sig) #undef raise { #if GNULIB_defined_signal_blocking && GNULIB_defined_SIGPIPE if (sig == SIGPIPE) return _gl_raise_SIGPIPE (); #endif #if HAVE_RAISE return raise_nothrow (sig); #else return kill (getpid (), sig); #endif } #if HAVE_RAISE && HAVE_MSVC_INVALID_PARAMETER_HANDLER static int raise_nothrow (int sig) { int result; TRY_MSVC_INVAL { result = raise (sig); } CATCH_MSVC_INVAL { result = -1; errno = EINVAL; } DONE_MSVC_INVAL; return result; } #endif libffcall-2.5/gnulib-lib/asyncsafe-spin.c0000664000000000000000000002055414631432055015313 00000000000000/* Spin locks for communication between threads and signal handlers. Copyright (C) 2020-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2020. */ #include /* Specification. */ #include "asyncsafe-spin.h" #include #if defined _AIX # include #endif #if 0x590 <= __SUNPRO_C && __STDC__ # define asm __asm #endif #if defined _WIN32 && ! defined __CYGWIN__ /* Use Windows threads. */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { glwthread_spin_init (lock); } static inline void do_lock (asyncsafe_spinlock_t *lock) { glwthread_spin_lock (lock); } static inline void do_unlock (asyncsafe_spinlock_t *lock) { if (glwthread_spin_unlock (lock)) abort (); } void asyncsafe_spin_destroy (asyncsafe_spinlock_t *lock) { glwthread_spin_destroy (lock); } #else # if HAVE_PTHREAD_H /* Use POSIX threads. */ /* We don't use semaphores (although sem_post() is allowed in signal handlers), because it would require to link with -lrt on HP-UX 11, OSF/1, Solaris 10, and also because on macOS only named semaphores work. We don't use the C11 (available in GCC >= 4.9) because it would require to link with -latomic. */ # if (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 7) \ || __clang_major__ > 3 || (__clang_major__ == 3 && __clang_minor__ >= 1)) \ && !defined __ibmxl__ /* Use GCC built-ins (available in GCC >= 4.7 and clang >= 3.1) that operate on the first byte of the lock. Documentation: */ # if 1 /* An implementation that verifies the unlocks. */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { __atomic_store_n (lock, 0, __ATOMIC_SEQ_CST); } static inline void do_lock (asyncsafe_spinlock_t *lock) { /* Wait until *lock becomes 0, then replace it with 1. */ asyncsafe_spinlock_t zero; while (!(zero = 0, __atomic_compare_exchange_n (lock, &zero, 1, false, __ATOMIC_SEQ_CST, __ATOMIC_SEQ_CST))) ; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { /* If *lock is 1, then replace it with 0. */ asyncsafe_spinlock_t one = 1; if (!__atomic_compare_exchange_n (lock, &one, 0, false, __ATOMIC_SEQ_CST, __ATOMIC_SEQ_CST)) abort (); } # else /* An implementation that is a little bit more optimized, but does not verify the unlocks. */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { __atomic_clear (lock, __ATOMIC_SEQ_CST); } static inline void do_lock (asyncsafe_spinlock_t *lock) { while (__atomic_test_and_set (lock, __ATOMIC_SEQ_CST)) ; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { __atomic_clear (lock, __ATOMIC_SEQ_CST); } # endif # elif (((__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 1)) \ || __clang_major__ >= 3) \ && HAVE_ATOMIC_COMPARE_AND_SWAP_GCC41) /* Use GCC built-ins (available on many platforms with GCC >= 4.1 or clang >= 3.0). Documentation: */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; *vp = 0; __sync_synchronize (); } static inline void do_lock (asyncsafe_spinlock_t *lock) { /* Wait until *lock becomes 0, then replace it with 1. */ while (__sync_val_compare_and_swap (lock, 0, 1) != 0) ; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { /* If *lock is 1, then replace it with 0. */ if (__sync_val_compare_and_swap (lock, 1, 0) != 1) abort (); } # elif defined _AIX /* AIX */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { atomic_p vp = (int *) lock; _clear_lock (vp, 0); } static inline void do_lock (asyncsafe_spinlock_t *lock) { atomic_p vp = (int *) lock; while (_check_lock (vp, 0, 1)) ; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { atomic_p vp = (int *) lock; if (_check_lock (vp, 1, 0)) abort (); } # elif ((defined __GNUC__ || defined __clang__ || defined __SUNPRO_C) && (defined __sparc || defined __i386 || defined __x86_64__)) || (defined __TINYC__ && (defined __i386 || defined __x86_64__)) /* For older versions of GCC or clang, use inline assembly. GCC, clang, and the Oracle Studio C 12 compiler understand GCC's extended asm syntax, but the plain Oracle Studio C 11 compiler understands only simple asm. */ /* An implementation that verifies the unlocks. */ static void memory_barrier (void) { # if defined __GNUC__ || defined __clang__ || __SUNPRO_C >= 0x590 || defined __TINYC__ # if defined __i386 || defined __x86_64__ # if defined __TINYC__ && defined __i386 /* Cannot use the SSE instruction "mfence" with this compiler. */ asm volatile ("lock orl $0,(%esp)"); # else asm volatile ("mfence"); # endif # endif # if defined __sparc asm volatile ("membar 2"); # endif # else # if defined __i386 || defined __x86_64__ asm ("mfence"); # endif # if defined __sparc asm ("membar 2"); # endif # endif } /* Store NEWVAL in *VP if the old value *VP is == CMP. Return the old value. */ static unsigned int atomic_compare_and_swap (volatile unsigned int *vp, unsigned int cmp, unsigned int newval) { # if defined __GNUC__ || defined __clang__ || __SUNPRO_C >= 0x590 || defined __TINYC__ unsigned int oldval; # if defined __i386 || defined __x86_64__ asm volatile (" lock\n cmpxchgl %3,(%1)" : "=a" (oldval) : "r" (vp), "a" (cmp), "r" (newval) : "memory"); # endif # if defined __sparc asm volatile (" cas [%1],%2,%3\n" " mov %3,%0" : "=r" (oldval) : "r" (vp), "r" (cmp), "r" (newval) : "memory"); # endif return oldval; # else /* __SUNPRO_C */ # if defined __x86_64__ asm (" movl %esi,%eax\n" " lock\n cmpxchgl %edx,(%rdi)"); # elif defined __i386 asm (" movl 16(%ebp),%ecx\n" " movl 12(%ebp),%eax\n" " movl 8(%ebp),%edx\n" " lock\n cmpxchgl %ecx,(%edx)"); # endif # if defined __sparc asm (" cas [%i0],%i1,%i2\n" " mov %i2,%i0"); # endif # endif } void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; *vp = 0; memory_barrier (); } static inline void do_lock (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; while (atomic_compare_and_swap (vp, 0, 1) != 0) ; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; if (atomic_compare_and_swap (vp, 1, 0) != 1) abort (); } # else /* Fallback code. It has some race conditions. */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; *vp = 0; } static inline void do_lock (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; while (*vp) ; *vp = 1; } static inline void do_unlock (asyncsafe_spinlock_t *lock) { volatile unsigned int *vp = lock; *vp = 0; } # endif # else /* Provide a dummy implementation for single-threaded applications. */ void asyncsafe_spin_init (asyncsafe_spinlock_t *lock) { } static inline void do_lock (asyncsafe_spinlock_t *lock) { } static inline void do_unlock (asyncsafe_spinlock_t *lock) { } # endif void asyncsafe_spin_destroy (asyncsafe_spinlock_t *lock) { } #endif void asyncsafe_spin_lock (asyncsafe_spinlock_t *lock, const sigset_t *mask, sigset_t *saved_mask) { sigprocmask (SIG_BLOCK, mask, saved_mask); /* equivalent to pthread_sigmask */ do_lock (lock); } void asyncsafe_spin_unlock (asyncsafe_spinlock_t *lock, const sigset_t *saved_mask) { do_unlock (lock); sigprocmask (SIG_SETMASK, saved_mask, NULL); /* equivalent to pthread_sigmask */ } libffcall-2.5/gnulib-lib/basename-lgpl.c0000664000000000000000000000344014631432055015072 00000000000000/* basename.c -- return the last element in a file name Copyright (C) 1990, 1998-2001, 2003-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "basename-lgpl.h" #include #include "filename.h" char * last_component (char const *name) { char const *base = name + FILE_SYSTEM_PREFIX_LEN (name); char const *p; bool last_was_slash = false; while (ISSLASH (*base)) base++; for (p = base; *p; p++) { if (ISSLASH (*p)) last_was_slash = true; else if (last_was_slash) { base = p; last_was_slash = false; } } return (char *) base; } size_t base_len (char const *name) { size_t len; size_t prefix_len = FILE_SYSTEM_PREFIX_LEN (name); for (len = strlen (name); 1 < len && ISSLASH (name[len - 1]); len--) continue; if (DOUBLE_SLASH_IS_DISTINCT_ROOT && len == 1 && ISSLASH (name[0]) && ISSLASH (name[1]) && ! name[2]) return 2; if (FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE && prefix_len && len == prefix_len && ISSLASH (name[prefix_len])) return prefix_len + 1; return len; } libffcall-2.5/gnulib-lib/cloexec.c0000664000000000000000000000445414631432055014013 00000000000000/* cloexec.c - set or clear the close-on-exec descriptor flag Copyright (C) 1991, 2004-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* The code is taken from glibc/manual/llio.texi */ #include #include "cloexec.h" #include #include #include /* Set the 'FD_CLOEXEC' flag of DESC if VALUE is true, or clear the flag if VALUE is false. Return 0 on success, or -1 on error with 'errno' set. Note that on MingW, this function does NOT protect DESC from being inherited into spawned children. Instead, either use dup_cloexec followed by closing the original DESC, or use interfaces such as open or pipe2 that accept flags like O_CLOEXEC to create DESC non-inheritable in the first place. */ int set_cloexec_flag (int desc, bool value) { #ifdef F_SETFD int flags = fcntl (desc, F_GETFD, 0); if (0 <= flags) { int newflags = (value ? flags | FD_CLOEXEC : flags & ~FD_CLOEXEC); if (flags == newflags || fcntl (desc, F_SETFD, newflags) != -1) return 0; } return -1; #else /* !F_SETFD */ /* Use dup2 to reject invalid file descriptors; the cloexec flag will be unaffected. */ if (desc < 0) { errno = EBADF; return -1; } if (dup2 (desc, desc) < 0) /* errno is EBADF here. */ return -1; /* There is nothing we can do on this kind of platform. Punt. */ return 0; #endif /* !F_SETFD */ } /* Duplicates a file handle FD, while marking the copy to be closed prior to exec or spawn. Returns -1 and sets errno if FD could not be duplicated. */ int dup_cloexec (int fd) { return fcntl (fd, F_DUPFD_CLOEXEC, 0); } libffcall-2.5/gnulib-lib/vma-prot.c0000664000000000000000000000470714664171733014150 00000000000000/* Determine the protection of a virtual memory area. Copyright (C) 2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2024. */ #include /* Specification. */ #include "vma-prot.h" #include struct locals { /* The common protections seen so far. */ unsigned int prot_so_far; /* The remaining address interval. remaining_start <= remaining_end-1. */ uintptr_t remaining_start; uintptr_t remaining_end; }; static int callback (void *data, uintptr_t start, uintptr_t end, unsigned int flags) { struct locals *l = (struct locals *) data; if (start > l->remaining_start) { /* The interval [remaining_start, min (remaining_end, start)) is unmapped. */ l->prot_so_far = 0; return 1; } if (end - 1 < l->remaining_start) /* The interval [start,end) lies before [remaining_start,remaining_end). */ return 0; /* Here start <= remaining_start <= remaining_end-1 and remaining_start <= end-1, hence start <= remaining_start <= min (end-1, remaining_end-1). So, the two intervals intersect. */ l->prot_so_far &= flags; if (l->prot_so_far == 0) return 1; if (l->remaining_end - 1 <= end - 1) /* Done. */ return 1; /* Trim the remaining address interval. */ l->remaining_start = end; return 0; } int get_vma_prot (void *start, size_t size) { uintptr_t start_address = (uintptr_t) start; struct locals l; l.prot_so_far = VMA_PROT_READ | VMA_PROT_WRITE | VMA_PROT_EXECUTE; l.remaining_start = start_address; l.remaining_end = start_address + size; if (l.remaining_end < l.remaining_start) /* Invalid arguments. */ return -1; if (l.remaining_end > l.remaining_start) { if (vma_iterate (callback, &l) < 0) return -1; } return l.prot_so_far; } libffcall-2.5/gnulib-lib/Makefile.in0000664000000000000000000077222614665326517014317 00000000000000# Makefile.in generated by automake 1.17 from Makefile.am. # @configure_input@ # Copyright (C) 1994-2024 Free Software Foundation, Inc. # This Makefile.in is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY, to the extent permitted by law; without # even the implied warranty of MERCHANTABILITY or FITNESS FOR A # PARTICULAR PURPOSE. @SET_MAKE@ # Copyright (C) 2002-2024 Free Software Foundation, Inc. # # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This file is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this file. If not, see . # # As a special exception to the GNU General Public License, # this file may be distributed as part of a program that # contains a configuration script generated by Autoconf, under # the same distribution terms as the rest of that program. # # Generated by gnulib-tool. # Reproduce by: # gnulib-tool --import \ # --local-dir=gnulib-local \ # --lib=libgnu \ # --source-base=gnulib-lib \ # --m4-base=gnulib-m4 \ # --doc-base=doc \ # --tests-base=tests \ # --aux-dir=build-aux \ # --gpl=2 \ # --conditional-dependencies \ # --libtool \ # --macro-prefix=gl \ # ansi-c++-opt \ # host-cpu-c-abi \ # libffcall-imports \ # nocrash \ # stdint \ # stdnoreturn VPATH = @srcdir@ am__is_gnu_make = { \ if test -z '$(MAKELEVEL)'; then \ false; \ elif test -n '$(MAKE_HOST)'; then \ true; \ elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \ true; \ else \ false; \ fi; \ } am__make_running_with_option = \ case $${target_option-} in \ ?) ;; \ *) echo "am__make_running_with_option: internal error: invalid" \ "target option '$${target_option-}' specified" >&2; \ exit 1;; \ esac; \ has_opt=no; \ sane_makeflags=$$MAKEFLAGS; \ if $(am__is_gnu_make); then \ sane_makeflags=$$MFLAGS; \ else \ case $$MAKEFLAGS in \ *\\[\ \ ]*) \ bs=\\; \ sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \ | sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \ esac; \ fi; \ skip_next=no; \ strip_trailopt () \ { \ flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \ }; \ for flg in $$sane_makeflags; do \ test $$skip_next = yes && { skip_next=no; continue; }; \ case $$flg in \ *=*|--*) continue;; \ -*I) strip_trailopt 'I'; skip_next=yes;; \ -*I?*) strip_trailopt 'I';; \ -*O) strip_trailopt 'O'; skip_next=yes;; \ -*O?*) strip_trailopt 'O';; \ -*l) strip_trailopt 'l'; skip_next=yes;; \ -*l?*) strip_trailopt 'l';; \ -[dEDm]) skip_next=yes;; \ -[JT]) skip_next=yes;; \ esac; \ case $$flg in \ *$$target_option*) has_opt=yes; break;; \ esac; \ done; \ test $$has_opt = yes am__make_dryrun = (target_option=n; $(am__make_running_with_option)) am__make_keepgoing = (target_option=k; $(am__make_running_with_option)) am__rm_f = rm -f $(am__rm_f_notfound) am__rm_rf = rm -rf $(am__rm_f_notfound) pkgdatadir = $(datadir)/@PACKAGE@ pkgincludedir = $(includedir)/@PACKAGE@ pkglibdir = $(libdir)/@PACKAGE@ pkglibexecdir = $(libexecdir)/@PACKAGE@ am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd install_sh_DATA = $(install_sh) -c -m 644 install_sh_PROGRAM = $(install_sh) -c install_sh_SCRIPT = $(install_sh) -c INSTALL_HEADER = $(INSTALL_DATA) transform = $(program_transform_name) NORMAL_INSTALL = : PRE_INSTALL = : POST_INSTALL = : NORMAL_UNINSTALL = : PRE_UNINSTALL = : POST_UNINSTALL = : build_triplet = @build@ host_triplet = @host@ @gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@am__append_1 = $(ALLOCA_H) @gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@am__append_2 = alloca.h alloca.h-t @gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@am__append_3 = $(ASSERT_H) @gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@am__append_4 = assert.h assert.h-t @gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE@am__append_5 = asyncsafe-spin.c @gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE@am__append_6 = basename-lgpl.c @gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE@am__append_7 = clean-temp-simple.h clean-temp-simple.c @gl_GNULIB_ENABLED_cloexec_TRUE@am__append_8 = cloexec.c @GL_COND_OBJ_CLOSE_TRUE@@gl_GNULIB_ENABLED_close_TRUE@am__append_9 = close.c @GL_COND_OBJ_DUP2_TRUE@@gl_GNULIB_ENABLED_dup2_TRUE@am__append_10 = dup2.c @gl_GNULIB_ENABLED_errno_TRUE@am__append_11 = $(ERRNO_H) @gl_GNULIB_ENABLED_errno_TRUE@am__append_12 = errno.h errno.h-t @GL_COND_OBJ_ERROR_TRUE@@gl_GNULIB_ENABLED_error_TRUE@am__append_13 = error.c @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@am__append_14 = error.h @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@am__append_15 = error.h error.h-t @gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE@am__append_16 = fatal-signal.h fatal-signal.c @GL_COND_OBJ_FCNTL_TRUE@@gl_GNULIB_ENABLED_fcntl_TRUE@am__append_17 = fcntl.c @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@am__append_18 = fcntl.h @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@am__append_19 = fcntl.h fcntl.h-t @gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE@am__append_20 = fd-hook.c @GL_COND_OBJ_FSTAT_TRUE@@gl_GNULIB_ENABLED_fstat_TRUE@am__append_21 = fstat.c @GL_COND_OBJ_GETDTABLESIZE_TRUE@@gl_GNULIB_ENABLED_getdtablesize_TRUE@am__append_22 = getdtablesize.c @GL_COND_OBJ_GETPAGESIZE_TRUE@@gl_GNULIB_ENABLED_getpagesize_TRUE@am__append_23 = getpagesize.c @GL_COND_OBJ_GETPROGNAME_TRUE@@gl_GNULIB_ENABLED_getprogname_TRUE@am__append_24 = getprogname.c @gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36_TRUE@am__append_25 = gettext.h @GL_COND_OBJ_HASMNTOPT_TRUE@@gl_GNULIB_ENABLED_hasmntopt_TRUE@am__append_26 = hasmntopt.c @gl_GNULIB_ENABLED_idx_TRUE@am__append_27 = idx.h @gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE@am__append_28 = gl_linkedhash_list.h gl_linkedhash_list.c gl_anyhash1.h gl_anyhash2.h gl_anyhash_primes.h gl_anylinked_list1.h gl_anylinked_list2.h @gl_GNULIB_ENABLED_list_TRUE@am__append_29 = gl_list.h gl_list.c @gl_GNULIB_ENABLED_malloca_TRUE@am__append_30 = malloca.c @gl_GNULIB_ENABLED_mntent_TRUE@am__append_31 = $(MNTENT_H) @gl_GNULIB_ENABLED_mntent_TRUE@am__append_32 = mntent.h mntent.h-t @GL_COND_OBJ_MSVC_INVAL_TRUE@@gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE@am__append_33 = msvc-inval.c @GL_COND_OBJ_MSVC_NOTHROW_TRUE@@gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE@am__append_34 = msvc-nothrow.c @GL_COND_OBJ_OPEN_TRUE@@gl_GNULIB_ENABLED_open_TRUE@am__append_35 = open.c @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@am__append_36 = pthread.h @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@am__append_37 = pthread.h pthread.h-t1 pthread.h-t2 pthread.h-t3 pthread.h-t4 @GL_COND_OBJ_PTHREAD_ONCE_TRUE@@gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE@am__append_38 = pthread-once.c @GL_COND_OBJ_RAISE_TRUE@@gl_GNULIB_ENABLED_raise_TRUE@am__append_39 = raise.c @GL_COND_OBJ_RMDIR_TRUE@@gl_GNULIB_ENABLED_rmdir_TRUE@am__append_40 = rmdir.c @gl_GNULIB_ENABLED_sched_TRUE@am__append_41 = sched.h @gl_GNULIB_ENABLED_sched_TRUE@am__append_42 = sched.h sched.h-t @GL_COND_OBJ_SIGACTION_TRUE@@gl_GNULIB_ENABLED_sigaction_TRUE@am__append_43 = sigaction.c @gl_GNULIB_ENABLED_sigaction_TRUE@am__append_44 = sig-handler.c @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@am__append_45 = signal.h @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@am__append_46 = signal.h signal.h-t @GL_COND_OBJ_SIGPROCMASK_TRUE@@gl_GNULIB_ENABLED_sigprocmask_TRUE@am__append_47 = sigprocmask.c @gl_GNULIB_ENABLED_size_max_TRUE@am__append_48 = size_max.h @GL_COND_OBJ_STAT_TRUE@@gl_GNULIB_ENABLED_stat_TRUE@am__append_49 = stat.c @gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE@am__append_50 = stat-time.c @gl_GNULIB_ENABLED_stdckdint_TRUE@am__append_51 = $(STDCKDINT_H) @gl_GNULIB_ENABLED_stdckdint_TRUE@am__append_52 = stdckdint.h stdckdint.h-t @gl_GNULIB_ENABLED_stddef_TRUE@am__append_53 = $(STDDEF_H) @gl_GNULIB_ENABLED_stddef_TRUE@am__append_54 = stddef.h stddef.h-t @gl_GNULIB_ENABLED_stdio_TRUE@am__append_55 = stdio.h @gl_GNULIB_ENABLED_stdio_TRUE@am__append_56 = stdio.h stdio.h-t1 stdio.h-t2 stdio.h-t3 @GL_COND_OBJ_STDIO_READ_TRUE@@gl_GNULIB_ENABLED_stdio_TRUE@am__append_57 = stdio-read.c @GL_COND_OBJ_STDIO_WRITE_TRUE@@gl_GNULIB_ENABLED_stdio_TRUE@am__append_58 = stdio-write.c @gl_GNULIB_ENABLED_stdlib_TRUE@am__append_59 = stdlib.h @gl_GNULIB_ENABLED_stdlib_TRUE@am__append_60 = stdlib.h stdlib.h-t1 stdlib.h-t2 stdlib.h-t3 @GL_COND_OBJ_STRERROR_TRUE@@gl_GNULIB_ENABLED_strerror_TRUE@am__append_61 = strerror.c @GL_COND_OBJ_STRERROR_OVERRIDE_TRUE@@gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE@am__append_62 = strerror-override.c @gl_GNULIB_ENABLED_string_TRUE@am__append_63 = string.h @gl_GNULIB_ENABLED_string_TRUE@am__append_64 = string.h string.h-t1 string.h-t2 @gl_GNULIB_ENABLED_sys_stat_TRUE@am__append_65 = sys/stat.h @gl_GNULIB_ENABLED_sys_stat_TRUE@am__append_66 = sys/stat.h sys/stat.h-t @gl_GNULIB_ENABLED_sys_stat_TRUE@am__append_67 = sys @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@am__append_68 = time.h @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@am__append_69 = time.h time.h-t @gl_GNULIB_ENABLED_unistd_TRUE@am__append_70 = unistd.h @gl_GNULIB_ENABLED_unistd_TRUE@am__append_71 = unistd.c @gl_GNULIB_ENABLED_unistd_TRUE@am__append_72 = unistd.h unistd.h-t1 unistd.h-t2 unistd.h-t3 unistd.h-t4 @gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE@am__append_73 = vma-iter.c @gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE@am__append_74 = vma-prot.c @GL_COND_OBJ_WINDOWS_MUTEX_TRUE@@gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE@am__append_75 = windows-mutex.c @GL_COND_OBJ_WINDOWS_ONCE_TRUE@@gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE@am__append_76 = windows-once.c @GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE@@gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE@am__append_77 = windows-recmutex.c @GL_COND_OBJ_WINDOWS_RWLOCK_TRUE@@gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE@am__append_78 = windows-rwlock.c @GL_COND_OBJ_WINDOWS_SPIN_TRUE@@gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE@am__append_79 = windows-spin.c @gl_GNULIB_ENABLED_xsize_TRUE@am__append_80 = xsize.h xsize.c subdir = gnulib-lib ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 am__aclocal_m4_deps = $(top_srcdir)/gnulib-m4/00gnulib.m4 \ $(top_srcdir)/gnulib-m4/absolute-header.m4 \ $(top_srcdir)/gnulib-m4/alloca.m4 \ $(top_srcdir)/gnulib-m4/ansi-c++.m4 \ $(top_srcdir)/gnulib-m4/asm-underscore.m4 \ $(top_srcdir)/gnulib-m4/assert_h.m4 \ $(top_srcdir)/gnulib-m4/atomic-cas.m4 \ $(top_srcdir)/gnulib-m4/c-bool.m4 \ $(top_srcdir)/gnulib-m4/close.m4 \ $(top_srcdir)/gnulib-m4/codeset.m4 \ $(top_srcdir)/gnulib-m4/double-slash-root.m4 \ $(top_srcdir)/gnulib-m4/dup2.m4 \ $(top_srcdir)/gnulib-m4/eealloc.m4 \ $(top_srcdir)/gnulib-m4/errno_h.m4 \ $(top_srcdir)/gnulib-m4/error.m4 \ $(top_srcdir)/gnulib-m4/error_h.m4 \ $(top_srcdir)/gnulib-m4/extensions-aix.m4 \ $(top_srcdir)/gnulib-m4/extensions.m4 \ $(top_srcdir)/gnulib-m4/extern-inline.m4 \ $(top_srcdir)/gnulib-m4/fatal-signal.m4 \ $(top_srcdir)/gnulib-m4/fcntl-o.m4 \ $(top_srcdir)/gnulib-m4/fcntl.m4 \ $(top_srcdir)/gnulib-m4/fcntl_h.m4 \ $(top_srcdir)/gnulib-m4/fstat.m4 \ $(top_srcdir)/gnulib-m4/getdtablesize.m4 \ $(top_srcdir)/gnulib-m4/getpagesize.m4 \ $(top_srcdir)/gnulib-m4/getprogname.m4 \ $(top_srcdir)/gnulib-m4/gnulib-common.m4 \ $(top_srcdir)/gnulib-m4/gnulib-comp.m4 \ $(top_srcdir)/gnulib-m4/hasmntopt.m4 \ $(top_srcdir)/gnulib-m4/host-cpu-c-abi.m4 \ $(top_srcdir)/gnulib-m4/include_next.m4 \ $(top_srcdir)/gnulib-m4/largefile.m4 \ $(top_srcdir)/gnulib-m4/limits-h.m4 \ $(top_srcdir)/gnulib-m4/locale-en.m4 \ $(top_srcdir)/gnulib-m4/lock.m4 \ $(top_srcdir)/gnulib-m4/malloca.m4 \ $(top_srcdir)/gnulib-m4/mntent_h.m4 \ $(top_srcdir)/gnulib-m4/mode_t.m4 \ $(top_srcdir)/gnulib-m4/msvc-inval.m4 \ $(top_srcdir)/gnulib-m4/msvc-nothrow.m4 \ $(top_srcdir)/gnulib-m4/multiarch.m4 \ $(top_srcdir)/gnulib-m4/musl.m4 \ $(top_srcdir)/gnulib-m4/nocrash.m4 \ $(top_srcdir)/gnulib-m4/off64_t.m4 \ $(top_srcdir)/gnulib-m4/off_t.m4 \ $(top_srcdir)/gnulib-m4/once.m4 \ $(top_srcdir)/gnulib-m4/open-cloexec.m4 \ $(top_srcdir)/gnulib-m4/open-slash.m4 \ $(top_srcdir)/gnulib-m4/open.m4 \ $(top_srcdir)/gnulib-m4/pathmax.m4 \ $(top_srcdir)/gnulib-m4/pthread-once.m4 \ $(top_srcdir)/gnulib-m4/pthread-spin.m4 \ $(top_srcdir)/gnulib-m4/pthread_h.m4 \ $(top_srcdir)/gnulib-m4/pthread_rwlock_rdlock.m4 \ $(top_srcdir)/gnulib-m4/raise.m4 \ $(top_srcdir)/gnulib-m4/rmdir.m4 \ $(top_srcdir)/gnulib-m4/sched_h.m4 \ $(top_srcdir)/gnulib-m4/sig_atomic_t.m4 \ $(top_srcdir)/gnulib-m4/sigaction.m4 \ $(top_srcdir)/gnulib-m4/signal_h.m4 \ $(top_srcdir)/gnulib-m4/signalblocking.m4 \ $(top_srcdir)/gnulib-m4/size_max.m4 \ $(top_srcdir)/gnulib-m4/sparcv8+.m4 \ $(top_srcdir)/gnulib-m4/ssize_t.m4 \ $(top_srcdir)/gnulib-m4/stat-time.m4 \ $(top_srcdir)/gnulib-m4/stat.m4 \ $(top_srcdir)/gnulib-m4/stddef_h.m4 \ $(top_srcdir)/gnulib-m4/stdint.m4 \ $(top_srcdir)/gnulib-m4/stdio_h.m4 \ $(top_srcdir)/gnulib-m4/stdlib_h.m4 \ $(top_srcdir)/gnulib-m4/stdnoreturn.m4 \ $(top_srcdir)/gnulib-m4/strerror.m4 \ $(top_srcdir)/gnulib-m4/string_h.m4 \ $(top_srcdir)/gnulib-m4/sys_cdefs_h.m4 \ $(top_srcdir)/gnulib-m4/sys_socket_h.m4 \ $(top_srcdir)/gnulib-m4/sys_stat_h.m4 \ $(top_srcdir)/gnulib-m4/sys_types_h.m4 \ $(top_srcdir)/gnulib-m4/threadlib.m4 \ $(top_srcdir)/gnulib-m4/time_h.m4 \ $(top_srcdir)/gnulib-m4/unistd_h.m4 \ $(top_srcdir)/gnulib-m4/warn-on-use.m4 \ $(top_srcdir)/gnulib-m4/wint_t.m4 \ $(top_srcdir)/gnulib-m4/xsize.m4 \ $(top_srcdir)/gnulib-m4/zzgnulib.m4 \ $(top_srcdir)/m4/as-underscore.m4 $(top_srcdir)/m4/cc-gcc.m4 \ $(top_srcdir)/m4/codeexec.m4 $(top_srcdir)/m4/endianness.m4 \ $(top_srcdir)/m4/libtool.m4 $(top_srcdir)/m4/ln.m4 \ $(top_srcdir)/m4/ltoptions.m4 $(top_srcdir)/m4/ltsugar.m4 \ $(top_srcdir)/m4/ltversion.m4 $(top_srcdir)/m4/lt~obsolete.m4 \ $(top_srcdir)/m4/mmap-anon.m4 $(top_srcdir)/configure.ac am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \ $(ACLOCAL_M4) DIST_COMMON = $(srcdir)/Makefile.am $(noinst_HEADERS) \ $(am__DIST_COMMON) mkinstalldirs = $(install_sh) -d CONFIG_HEADER = $(top_builddir)/config.h \ $(top_builddir)/ffcall-version.h CONFIG_CLEAN_FILES = CONFIG_CLEAN_VPATH_FILES = LIBRARIES = $(noinst_LIBRARIES) LTLIBRARIES = $(noinst_LTLIBRARIES) am__DEPENDENCIES_1 = am__libgnu_la_SOURCES_DIST = asyncsafe-spin.c basename-lgpl.c \ clean-temp-simple.h clean-temp-simple.c cloexec.c close.c \ dup2.c error.c fatal-signal.h fatal-signal.c fcntl.c fd-hook.c \ fstat.c getdtablesize.c getpagesize.c getprogname.c gettext.h \ hasmntopt.c idx.h gl_linkedhash_list.h gl_linkedhash_list.c \ gl_anyhash1.h gl_anyhash2.h gl_anyhash_primes.h \ gl_anylinked_list1.h gl_anylinked_list2.h gl_list.h gl_list.c \ glthread/lock.h glthread/lock.c malloca.c msvc-inval.c \ msvc-nothrow.c glthread/once.h glthread/once.c open.c \ pthread-once.c raise.c rmdir.c sigaction.c sig-handler.c \ sigprocmask.c size_max.h stat.c stat-time.c stdio-read.c \ stdio-write.c strerror.c strerror-override.c \ glthread/threadlib.c unistd.c vma-iter.c vma-prot.c \ windows-mutex.c windows-once.c windows-recmutex.c \ windows-rwlock.c windows-spin.c xsize.h xsize.c @gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce_TRUE@am__objects_1 = libgnu_la-asyncsafe-spin.lo @gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f_TRUE@am__objects_2 = libgnu_la-basename-lgpl.lo @gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831_TRUE@am__objects_3 = libgnu_la-clean-temp-simple.lo @gl_GNULIB_ENABLED_cloexec_TRUE@am__objects_4 = libgnu_la-cloexec.lo @GL_COND_OBJ_CLOSE_TRUE@@gl_GNULIB_ENABLED_close_TRUE@am__objects_5 = libgnu_la-close.lo @GL_COND_OBJ_DUP2_TRUE@@gl_GNULIB_ENABLED_dup2_TRUE@am__objects_6 = libgnu_la-dup2.lo @GL_COND_OBJ_ERROR_TRUE@@gl_GNULIB_ENABLED_error_TRUE@am__objects_7 = libgnu_la-error.lo @gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057_TRUE@am__objects_8 = libgnu_la-fatal-signal.lo @GL_COND_OBJ_FCNTL_TRUE@@gl_GNULIB_ENABLED_fcntl_TRUE@am__objects_9 = libgnu_la-fcntl.lo @gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239_TRUE@am__objects_10 = libgnu_la-fd-hook.lo @GL_COND_OBJ_FSTAT_TRUE@@gl_GNULIB_ENABLED_fstat_TRUE@am__objects_11 = libgnu_la-fstat.lo @GL_COND_OBJ_GETDTABLESIZE_TRUE@@gl_GNULIB_ENABLED_getdtablesize_TRUE@am__objects_12 = libgnu_la-getdtablesize.lo @GL_COND_OBJ_GETPAGESIZE_TRUE@@gl_GNULIB_ENABLED_getpagesize_TRUE@am__objects_13 = libgnu_la-getpagesize.lo @GL_COND_OBJ_GETPROGNAME_TRUE@@gl_GNULIB_ENABLED_getprogname_TRUE@am__objects_14 = libgnu_la-getprogname.lo am__objects_15 = @GL_COND_OBJ_HASMNTOPT_TRUE@@gl_GNULIB_ENABLED_hasmntopt_TRUE@am__objects_16 = libgnu_la-hasmntopt.lo @gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2_TRUE@am__objects_17 = libgnu_la-gl_linkedhash_list.lo @gl_GNULIB_ENABLED_list_TRUE@am__objects_18 = libgnu_la-gl_list.lo am__dirstamp = $(am__leading_dot)dirstamp @gl_GNULIB_ENABLED_malloca_TRUE@am__objects_19 = libgnu_la-malloca.lo @GL_COND_OBJ_MSVC_INVAL_TRUE@@gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616_TRUE@am__objects_20 = libgnu_la-msvc-inval.lo @GL_COND_OBJ_MSVC_NOTHROW_TRUE@@gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07_TRUE@am__objects_21 = libgnu_la-msvc-nothrow.lo @GL_COND_OBJ_OPEN_TRUE@@gl_GNULIB_ENABLED_open_TRUE@am__objects_22 = libgnu_la-open.lo @GL_COND_OBJ_PTHREAD_ONCE_TRUE@@gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a_TRUE@am__objects_23 = libgnu_la-pthread-once.lo @GL_COND_OBJ_RAISE_TRUE@@gl_GNULIB_ENABLED_raise_TRUE@am__objects_24 = libgnu_la-raise.lo @GL_COND_OBJ_RMDIR_TRUE@@gl_GNULIB_ENABLED_rmdir_TRUE@am__objects_25 = libgnu_la-rmdir.lo @GL_COND_OBJ_SIGACTION_TRUE@@gl_GNULIB_ENABLED_sigaction_TRUE@am__objects_26 = libgnu_la-sigaction.lo @gl_GNULIB_ENABLED_sigaction_TRUE@am__objects_27 = \ @gl_GNULIB_ENABLED_sigaction_TRUE@ libgnu_la-sig-handler.lo @GL_COND_OBJ_SIGPROCMASK_TRUE@@gl_GNULIB_ENABLED_sigprocmask_TRUE@am__objects_28 = libgnu_la-sigprocmask.lo @GL_COND_OBJ_STAT_TRUE@@gl_GNULIB_ENABLED_stat_TRUE@am__objects_29 = libgnu_la-stat.lo @gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c_TRUE@am__objects_30 = libgnu_la-stat-time.lo @GL_COND_OBJ_STDIO_READ_TRUE@@gl_GNULIB_ENABLED_stdio_TRUE@am__objects_31 = libgnu_la-stdio-read.lo @GL_COND_OBJ_STDIO_WRITE_TRUE@@gl_GNULIB_ENABLED_stdio_TRUE@am__objects_32 = libgnu_la-stdio-write.lo @GL_COND_OBJ_STRERROR_TRUE@@gl_GNULIB_ENABLED_strerror_TRUE@am__objects_33 = libgnu_la-strerror.lo @GL_COND_OBJ_STRERROR_OVERRIDE_TRUE@@gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72_TRUE@am__objects_34 = libgnu_la-strerror-override.lo @gl_GNULIB_ENABLED_unistd_TRUE@am__objects_35 = libgnu_la-unistd.lo @gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556_TRUE@am__objects_36 = libgnu_la-vma-iter.lo @gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d_TRUE@am__objects_37 = libgnu_la-vma-prot.lo @GL_COND_OBJ_WINDOWS_MUTEX_TRUE@@gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440_TRUE@am__objects_38 = libgnu_la-windows-mutex.lo @GL_COND_OBJ_WINDOWS_ONCE_TRUE@@gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab_TRUE@am__objects_39 = libgnu_la-windows-once.lo @GL_COND_OBJ_WINDOWS_RECMUTEX_TRUE@@gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354_TRUE@am__objects_40 = libgnu_la-windows-recmutex.lo @GL_COND_OBJ_WINDOWS_RWLOCK_TRUE@@gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef_TRUE@am__objects_41 = libgnu_la-windows-rwlock.lo @GL_COND_OBJ_WINDOWS_SPIN_TRUE@@gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f_TRUE@am__objects_42 = libgnu_la-windows-spin.lo @gl_GNULIB_ENABLED_xsize_TRUE@am__objects_43 = libgnu_la-xsize.lo am_libgnu_la_OBJECTS = $(am__objects_1) $(am__objects_2) \ $(am__objects_3) $(am__objects_4) $(am__objects_5) \ $(am__objects_6) $(am__objects_7) $(am__objects_8) \ $(am__objects_9) $(am__objects_10) $(am__objects_11) \ $(am__objects_12) $(am__objects_13) $(am__objects_14) \ $(am__objects_15) $(am__objects_16) $(am__objects_15) \ $(am__objects_17) $(am__objects_18) glthread/libgnu_la-lock.lo \ $(am__objects_19) $(am__objects_20) $(am__objects_21) \ glthread/libgnu_la-once.lo $(am__objects_22) $(am__objects_23) \ $(am__objects_24) $(am__objects_25) $(am__objects_26) \ $(am__objects_27) $(am__objects_28) $(am__objects_15) \ $(am__objects_29) $(am__objects_30) $(am__objects_31) \ $(am__objects_32) $(am__objects_33) $(am__objects_34) \ glthread/libgnu_la-threadlib.lo $(am__objects_35) \ $(am__objects_36) $(am__objects_37) $(am__objects_38) \ $(am__objects_39) $(am__objects_40) $(am__objects_41) \ $(am__objects_42) $(am__objects_43) libgnu_la_OBJECTS = $(am_libgnu_la_OBJECTS) AM_V_lt = $(am__v_lt_@AM_V@) am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@) am__v_lt_0 = --silent am__v_lt_1 = libgnu_la_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ $(LIBTOOLFLAGS) --mode=link $(CCLD) $(libgnu_la_CFLAGS) \ $(CFLAGS) $(libgnu_la_LDFLAGS) $(LDFLAGS) -o $@ AM_V_P = $(am__v_P_@AM_V@) am__v_P_ = $(am__v_P_@AM_DEFAULT_V@) am__v_P_0 = false am__v_P_1 = : AM_V_GEN = $(am__v_GEN_@AM_V@) am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@) am__v_GEN_0 = @echo " GEN " $@; am__v_GEN_1 = AM_V_at = $(am__v_at_@AM_V@) am__v_at_ = $(am__v_at_@AM_DEFAULT_V@) am__v_at_0 = @ am__v_at_1 = DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir) depcomp = $(SHELL) $(top_srcdir)/build-aux/depcomp am__maybe_remake_depfiles = depfiles am__depfiles_remade = ./$(DEPDIR)/libgnu_la-asyncsafe-spin.Plo \ ./$(DEPDIR)/libgnu_la-basename-lgpl.Plo \ ./$(DEPDIR)/libgnu_la-clean-temp-simple.Plo \ ./$(DEPDIR)/libgnu_la-cloexec.Plo \ ./$(DEPDIR)/libgnu_la-close.Plo ./$(DEPDIR)/libgnu_la-dup2.Plo \ ./$(DEPDIR)/libgnu_la-error.Plo \ ./$(DEPDIR)/libgnu_la-fatal-signal.Plo \ ./$(DEPDIR)/libgnu_la-fcntl.Plo \ ./$(DEPDIR)/libgnu_la-fd-hook.Plo \ ./$(DEPDIR)/libgnu_la-fstat.Plo \ ./$(DEPDIR)/libgnu_la-getdtablesize.Plo \ ./$(DEPDIR)/libgnu_la-getpagesize.Plo \ ./$(DEPDIR)/libgnu_la-getprogname.Plo \ ./$(DEPDIR)/libgnu_la-gl_linkedhash_list.Plo \ ./$(DEPDIR)/libgnu_la-gl_list.Plo \ ./$(DEPDIR)/libgnu_la-hasmntopt.Plo \ ./$(DEPDIR)/libgnu_la-malloca.Plo \ ./$(DEPDIR)/libgnu_la-msvc-inval.Plo \ ./$(DEPDIR)/libgnu_la-msvc-nothrow.Plo \ ./$(DEPDIR)/libgnu_la-open.Plo \ ./$(DEPDIR)/libgnu_la-pthread-once.Plo \ ./$(DEPDIR)/libgnu_la-raise.Plo \ ./$(DEPDIR)/libgnu_la-rmdir.Plo \ ./$(DEPDIR)/libgnu_la-sig-handler.Plo \ ./$(DEPDIR)/libgnu_la-sigaction.Plo \ ./$(DEPDIR)/libgnu_la-sigprocmask.Plo \ ./$(DEPDIR)/libgnu_la-stat-time.Plo \ ./$(DEPDIR)/libgnu_la-stat-w32.Plo \ ./$(DEPDIR)/libgnu_la-stat.Plo \ ./$(DEPDIR)/libgnu_la-stdio-read.Plo \ ./$(DEPDIR)/libgnu_la-stdio-write.Plo \ ./$(DEPDIR)/libgnu_la-strerror-override.Plo \ ./$(DEPDIR)/libgnu_la-strerror.Plo \ ./$(DEPDIR)/libgnu_la-unistd.Plo \ ./$(DEPDIR)/libgnu_la-vma-iter.Plo \ ./$(DEPDIR)/libgnu_la-vma-prot.Plo \ ./$(DEPDIR)/libgnu_la-windows-mutex.Plo \ ./$(DEPDIR)/libgnu_la-windows-once.Plo \ ./$(DEPDIR)/libgnu_la-windows-recmutex.Plo \ ./$(DEPDIR)/libgnu_la-windows-rwlock.Plo \ ./$(DEPDIR)/libgnu_la-windows-spin.Plo \ ./$(DEPDIR)/libgnu_la-xsize.Plo \ glthread/$(DEPDIR)/libgnu_la-lock.Plo \ glthread/$(DEPDIR)/libgnu_la-once.Plo \ glthread/$(DEPDIR)/libgnu_la-threadlib.Plo am__mv = mv -f COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \ $(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS) LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \ $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \ $(AM_CFLAGS) $(CFLAGS) AM_V_CC = $(am__v_CC_@AM_V@) am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@) am__v_CC_0 = @echo " CC " $@; am__v_CC_1 = CCLD = $(CC) LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \ $(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \ $(AM_LDFLAGS) $(LDFLAGS) -o $@ AM_V_CCLD = $(am__v_CCLD_@AM_V@) am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@) am__v_CCLD_0 = @echo " CCLD " $@; am__v_CCLD_1 = SOURCES = $(libgnu_la_SOURCES) $(EXTRA_libgnu_la_SOURCES) DIST_SOURCES = $(am__libgnu_la_SOURCES_DIST) \ $(EXTRA_libgnu_la_SOURCES) RECURSIVE_TARGETS = all-recursive check-recursive cscopelist-recursive \ ctags-recursive dvi-recursive html-recursive info-recursive \ install-data-recursive install-dvi-recursive \ install-exec-recursive install-html-recursive \ install-info-recursive install-pdf-recursive \ install-ps-recursive install-recursive installcheck-recursive \ installdirs-recursive pdf-recursive ps-recursive \ tags-recursive uninstall-recursive am__can_run_installinfo = \ case $$AM_UPDATE_INFO_DIR in \ n|no|NO) false;; \ *) (install-info --version) >/dev/null 2>&1;; \ esac am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`; am__vpath_adj = case $$p in \ $(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \ *) f=$$p;; \ esac; am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`; am__install_max = 40 am__nobase_strip_setup = \ srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'` am__nobase_strip = \ for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||" am__nobase_list = $(am__nobase_strip_setup); \ for p in $$list; do echo "$$p $$p"; done | \ sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \ $(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \ if (++n[$$2] == $(am__install_max)) \ { print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \ END { for (dir in files) print dir, files[dir] }' am__base_list = \ sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \ sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g' am__uninstall_files_from_dir = { \ { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \ || { echo " ( cd '$$dir' && rm -f" $$files ")"; \ $(am__cd) "$$dir" && echo $$files | $(am__xargs_n) 40 $(am__rm_f); }; \ } am__installdirs = "$(DESTDIR)$(pkgdatadir)" DATA = $(pkgdata_DATA) HEADERS = $(noinst_HEADERS) RECURSIVE_CLEAN_TARGETS = mostlyclean-recursive clean-recursive \ distclean-recursive maintainer-clean-recursive am__recursive_targets = \ $(RECURSIVE_TARGETS) \ $(RECURSIVE_CLEAN_TARGETS) \ $(am__extra_recursive_targets) AM_RECURSIVE_TARGETS = $(am__recursive_targets:-recursive=) TAGS CTAGS \ distdir distdir-am am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP) # Read a list of newline-separated strings from the standard input, # and print each of them once, without duplicates. Input order is # *not* preserved. am__uniquify_input = $(AWK) '\ BEGIN { nonempty = 0; } \ { items[$$0] = 1; nonempty = 1; } \ END { if (nonempty) { for (i in items) print i; }; } \ ' # Make sure the list of sources is unique. This is necessary because, # e.g., the same source file might be shared among _SOURCES variables # for different programs/libraries. am__define_uniq_tagged_files = \ list='$(am__tagged_files)'; \ unique=`for i in $$list; do \ if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \ done | $(am__uniquify_input)` DIST_SUBDIRS = $(SUBDIRS) am__DIST_COMMON = $(srcdir)/Makefile.in \ $(top_srcdir)/build-aux/depcomp DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) am__relativize = \ dir0=`pwd`; \ sed_first='s,^\([^/]*\)/.*$$,\1,'; \ sed_rest='s,^[^/]*/*,,'; \ sed_last='s,^.*/\([^/]*\)$$,\1,'; \ sed_butlast='s,/*[^/]*$$,,'; \ while test -n "$$dir1"; do \ first=`echo "$$dir1" | sed -e "$$sed_first"`; \ if test "$$first" != "."; then \ if test "$$first" = ".."; then \ dir2=`echo "$$dir0" | sed -e "$$sed_last"`/"$$dir2"; \ dir0=`echo "$$dir0" | sed -e "$$sed_butlast"`; \ else \ first2=`echo "$$dir2" | sed -e "$$sed_first"`; \ if test "$$first2" = "$$first"; then \ dir2=`echo "$$dir2" | sed -e "$$sed_rest"`; \ else \ dir2="../$$dir2"; \ fi; \ dir0="$$dir0"/"$$first"; \ fi; \ fi; \ dir1=`echo "$$dir1" | sed -e "$$sed_rest"`; \ done; \ reldir="$$dir2" ACLOCAL = @ACLOCAL@ ALLOCA = @ALLOCA@ ALLOCA_H = @ALLOCA_H@ AMTAR = @AMTAR@ AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@ APPLE_UNIVERSAL_BUILD = @APPLE_UNIVERSAL_BUILD@ AR = @AR@ ARFLAGS = @ARFLAGS@ AS = @AS@ ASM_SYMBOL_PREFIX = @ASM_SYMBOL_PREFIX@ ASSERT_H = @ASSERT_H@ AS_UNDERSCORE = @AS_UNDERSCORE@ AUTOCONF = @AUTOCONF@ AUTOHEADER = @AUTOHEADER@ AUTOMAKE = @AUTOMAKE@ AWK = @AWK@ BITSIZEOF_PTRDIFF_T = @BITSIZEOF_PTRDIFF_T@ BITSIZEOF_SIG_ATOMIC_T = @BITSIZEOF_SIG_ATOMIC_T@ BITSIZEOF_SIZE_T = @BITSIZEOF_SIZE_T@ BITSIZEOF_WCHAR_T = @BITSIZEOF_WCHAR_T@ BITSIZEOF_WINT_T = @BITSIZEOF_WINT_T@ CAN_PRINT_STACK_TRACE = @CAN_PRINT_STACK_TRACE@ CC = @CC@ CCDEPMODE = @CCDEPMODE@ CC_GCC = @CC_GCC@ CFLAGS = @CFLAGS@ CPP = @CPP@ CPPFLAGS = @CPPFLAGS@ CPU_OBJECTS = @CPU_OBJECTS@ CSCOPE = @CSCOPE@ CTAGS = @CTAGS@ CXX = @CXX@ CXXCPP = @CXXCPP@ CXXDEPMODE = @CXXDEPMODE@ CXXFLAGS = @CXXFLAGS@ CXX_CHOICE = @CXX_CHOICE@ CYGPATH_W = @CYGPATH_W@ DEFS = @DEFS@ DEPDIR = @DEPDIR@ DISABLE_TYPE_BASED_ALIASING = @DISABLE_TYPE_BASED_ALIASING@ DLLTOOL = @DLLTOOL@ DSYMUTIL = @DSYMUTIL@ DUMPBIN = @DUMPBIN@ ECHO_C = @ECHO_C@ ECHO_N = @ECHO_N@ ECHO_T = @ECHO_T@ EGREP = @EGREP@ EMULTIHOP_HIDDEN = @EMULTIHOP_HIDDEN@ EMULTIHOP_VALUE = @EMULTIHOP_VALUE@ ENDIANNESS = @ENDIANNESS@ ENOLINK_HIDDEN = @ENOLINK_HIDDEN@ ENOLINK_VALUE = @ENOLINK_VALUE@ EOVERFLOW_HIDDEN = @EOVERFLOW_HIDDEN@ EOVERFLOW_VALUE = @EOVERFLOW_VALUE@ ERRNO_H = @ERRNO_H@ ETAGS = @ETAGS@ EXEEXT = @EXEEXT@ FGREP = @FGREP@ FILECMD = @FILECMD@ GCC_X_NONE = @GCC_X_NONE@ GL_CFLAG_ALLOW_WARNINGS = @GL_CFLAG_ALLOW_WARNINGS@ GL_CFLAG_GNULIB_WARNINGS = @GL_CFLAG_GNULIB_WARNINGS@ GL_GNULIB_ABORT_DEBUG = @GL_GNULIB_ABORT_DEBUG@ GL_GNULIB_ACCESS = @GL_GNULIB_ACCESS@ GL_GNULIB_ALIGNED_ALLOC = @GL_GNULIB_ALIGNED_ALLOC@ GL_GNULIB_ATOLL = @GL_GNULIB_ATOLL@ GL_GNULIB_CALLOC_GNU = @GL_GNULIB_CALLOC_GNU@ GL_GNULIB_CALLOC_POSIX = @GL_GNULIB_CALLOC_POSIX@ GL_GNULIB_CANONICALIZE_FILE_NAME = @GL_GNULIB_CANONICALIZE_FILE_NAME@ GL_GNULIB_CHDIR = @GL_GNULIB_CHDIR@ GL_GNULIB_CHMOD = @GL_GNULIB_CHMOD@ GL_GNULIB_CHOWN = @GL_GNULIB_CHOWN@ GL_GNULIB_CLOSE = @GL_GNULIB_CLOSE@ GL_GNULIB_COPY_FILE_RANGE = @GL_GNULIB_COPY_FILE_RANGE@ GL_GNULIB_CREAT = @GL_GNULIB_CREAT@ GL_GNULIB_CTIME = @GL_GNULIB_CTIME@ GL_GNULIB_DPRINTF = @GL_GNULIB_DPRINTF@ GL_GNULIB_DUP = @GL_GNULIB_DUP@ GL_GNULIB_DUP2 = @GL_GNULIB_DUP2@ GL_GNULIB_DUP3 = @GL_GNULIB_DUP3@ GL_GNULIB_DZPRINTF = @GL_GNULIB_DZPRINTF@ GL_GNULIB_ENVIRON = @GL_GNULIB_ENVIRON@ GL_GNULIB_EUIDACCESS = @GL_GNULIB_EUIDACCESS@ GL_GNULIB_EXECL = @GL_GNULIB_EXECL@ GL_GNULIB_EXECLE = @GL_GNULIB_EXECLE@ GL_GNULIB_EXECLP = @GL_GNULIB_EXECLP@ GL_GNULIB_EXECV = @GL_GNULIB_EXECV@ GL_GNULIB_EXECVE = @GL_GNULIB_EXECVE@ GL_GNULIB_EXECVP = @GL_GNULIB_EXECVP@ GL_GNULIB_EXECVPE = @GL_GNULIB_EXECVPE@ GL_GNULIB_EXPLICIT_BZERO = @GL_GNULIB_EXPLICIT_BZERO@ GL_GNULIB_FACCESSAT = @GL_GNULIB_FACCESSAT@ GL_GNULIB_FCHDIR = @GL_GNULIB_FCHDIR@ GL_GNULIB_FCHMODAT = @GL_GNULIB_FCHMODAT@ GL_GNULIB_FCHOWNAT = @GL_GNULIB_FCHOWNAT@ GL_GNULIB_FCLOSE = @GL_GNULIB_FCLOSE@ GL_GNULIB_FCNTL = @GL_GNULIB_FCNTL@ GL_GNULIB_FDATASYNC = @GL_GNULIB_FDATASYNC@ GL_GNULIB_FDOPEN = @GL_GNULIB_FDOPEN@ GL_GNULIB_FFLUSH = @GL_GNULIB_FFLUSH@ GL_GNULIB_FFSL = @GL_GNULIB_FFSL@ GL_GNULIB_FFSLL = @GL_GNULIB_FFSLL@ GL_GNULIB_FGETC = @GL_GNULIB_FGETC@ GL_GNULIB_FGETS = @GL_GNULIB_FGETS@ GL_GNULIB_FOPEN = @GL_GNULIB_FOPEN@ GL_GNULIB_FOPEN_GNU = @GL_GNULIB_FOPEN_GNU@ GL_GNULIB_FPRINTF = @GL_GNULIB_FPRINTF@ GL_GNULIB_FPRINTF_POSIX = @GL_GNULIB_FPRINTF_POSIX@ GL_GNULIB_FPURGE = @GL_GNULIB_FPURGE@ GL_GNULIB_FPUTC = @GL_GNULIB_FPUTC@ GL_GNULIB_FPUTS = @GL_GNULIB_FPUTS@ GL_GNULIB_FREAD = @GL_GNULIB_FREAD@ GL_GNULIB_FREE_POSIX = @GL_GNULIB_FREE_POSIX@ GL_GNULIB_FREOPEN = @GL_GNULIB_FREOPEN@ GL_GNULIB_FSCANF = @GL_GNULIB_FSCANF@ GL_GNULIB_FSEEK = @GL_GNULIB_FSEEK@ GL_GNULIB_FSEEKO = @GL_GNULIB_FSEEKO@ GL_GNULIB_FSTAT = @GL_GNULIB_FSTAT@ GL_GNULIB_FSTATAT = @GL_GNULIB_FSTATAT@ GL_GNULIB_FSYNC = @GL_GNULIB_FSYNC@ GL_GNULIB_FTELL = @GL_GNULIB_FTELL@ GL_GNULIB_FTELLO = @GL_GNULIB_FTELLO@ GL_GNULIB_FTRUNCATE = @GL_GNULIB_FTRUNCATE@ GL_GNULIB_FUTIMENS = @GL_GNULIB_FUTIMENS@ GL_GNULIB_FWRITE = @GL_GNULIB_FWRITE@ GL_GNULIB_FZPRINTF = @GL_GNULIB_FZPRINTF@ GL_GNULIB_GETC = @GL_GNULIB_GETC@ GL_GNULIB_GETCHAR = @GL_GNULIB_GETCHAR@ GL_GNULIB_GETCWD = @GL_GNULIB_GETCWD@ GL_GNULIB_GETDELIM = @GL_GNULIB_GETDELIM@ GL_GNULIB_GETDOMAINNAME = @GL_GNULIB_GETDOMAINNAME@ GL_GNULIB_GETDTABLESIZE = @GL_GNULIB_GETDTABLESIZE@ GL_GNULIB_GETENTROPY = @GL_GNULIB_GETENTROPY@ GL_GNULIB_GETGROUPS = @GL_GNULIB_GETGROUPS@ GL_GNULIB_GETHOSTNAME = @GL_GNULIB_GETHOSTNAME@ GL_GNULIB_GETLINE = @GL_GNULIB_GETLINE@ GL_GNULIB_GETLOADAVG = @GL_GNULIB_GETLOADAVG@ GL_GNULIB_GETLOGIN = @GL_GNULIB_GETLOGIN@ GL_GNULIB_GETLOGIN_R = @GL_GNULIB_GETLOGIN_R@ GL_GNULIB_GETOPT_POSIX = @GL_GNULIB_GETOPT_POSIX@ GL_GNULIB_GETPAGESIZE = @GL_GNULIB_GETPAGESIZE@ GL_GNULIB_GETPASS = @GL_GNULIB_GETPASS@ GL_GNULIB_GETPASS_GNU = @GL_GNULIB_GETPASS_GNU@ GL_GNULIB_GETPROGNAME = @GL_GNULIB_GETPROGNAME@ GL_GNULIB_GETSUBOPT = @GL_GNULIB_GETSUBOPT@ GL_GNULIB_GETUMASK = @GL_GNULIB_GETUMASK@ GL_GNULIB_GETUSERSHELL = @GL_GNULIB_GETUSERSHELL@ GL_GNULIB_GRANTPT = @GL_GNULIB_GRANTPT@ GL_GNULIB_GROUP_MEMBER = @GL_GNULIB_GROUP_MEMBER@ GL_GNULIB_HASMNTOPT = @GL_GNULIB_HASMNTOPT@ GL_GNULIB_ISATTY = @GL_GNULIB_ISATTY@ GL_GNULIB_LCHMOD = @GL_GNULIB_LCHMOD@ GL_GNULIB_LCHOWN = @GL_GNULIB_LCHOWN@ GL_GNULIB_LINK = @GL_GNULIB_LINK@ GL_GNULIB_LINKAT = @GL_GNULIB_LINKAT@ GL_GNULIB_LOCALTIME = @GL_GNULIB_LOCALTIME@ GL_GNULIB_LSEEK = @GL_GNULIB_LSEEK@ GL_GNULIB_LSTAT = @GL_GNULIB_LSTAT@ GL_GNULIB_MALLOC_GNU = @GL_GNULIB_MALLOC_GNU@ GL_GNULIB_MALLOC_POSIX = @GL_GNULIB_MALLOC_POSIX@ GL_GNULIB_MBSCASECMP = @GL_GNULIB_MBSCASECMP@ GL_GNULIB_MBSCASESTR = @GL_GNULIB_MBSCASESTR@ GL_GNULIB_MBSCHR = @GL_GNULIB_MBSCHR@ GL_GNULIB_MBSCSPN = @GL_GNULIB_MBSCSPN@ GL_GNULIB_MBSLEN = @GL_GNULIB_MBSLEN@ GL_GNULIB_MBSNCASECMP = @GL_GNULIB_MBSNCASECMP@ GL_GNULIB_MBSNLEN = @GL_GNULIB_MBSNLEN@ GL_GNULIB_MBSPBRK = @GL_GNULIB_MBSPBRK@ GL_GNULIB_MBSPCASECMP = @GL_GNULIB_MBSPCASECMP@ GL_GNULIB_MBSRCHR = @GL_GNULIB_MBSRCHR@ GL_GNULIB_MBSSEP = @GL_GNULIB_MBSSEP@ GL_GNULIB_MBSSPN = @GL_GNULIB_MBSSPN@ GL_GNULIB_MBSSTR = @GL_GNULIB_MBSSTR@ GL_GNULIB_MBSTOK_R = @GL_GNULIB_MBSTOK_R@ GL_GNULIB_MBSTOWCS = @GL_GNULIB_MBSTOWCS@ GL_GNULIB_MBTOWC = @GL_GNULIB_MBTOWC@ GL_GNULIB_MDA_ACCESS = @GL_GNULIB_MDA_ACCESS@ GL_GNULIB_MDA_CHDIR = @GL_GNULIB_MDA_CHDIR@ GL_GNULIB_MDA_CHMOD = @GL_GNULIB_MDA_CHMOD@ GL_GNULIB_MDA_CLOSE = @GL_GNULIB_MDA_CLOSE@ GL_GNULIB_MDA_CREAT = @GL_GNULIB_MDA_CREAT@ GL_GNULIB_MDA_DUP = @GL_GNULIB_MDA_DUP@ GL_GNULIB_MDA_DUP2 = @GL_GNULIB_MDA_DUP2@ GL_GNULIB_MDA_ECVT = @GL_GNULIB_MDA_ECVT@ GL_GNULIB_MDA_EXECL = @GL_GNULIB_MDA_EXECL@ GL_GNULIB_MDA_EXECLE = @GL_GNULIB_MDA_EXECLE@ GL_GNULIB_MDA_EXECLP = @GL_GNULIB_MDA_EXECLP@ GL_GNULIB_MDA_EXECV = @GL_GNULIB_MDA_EXECV@ GL_GNULIB_MDA_EXECVE = @GL_GNULIB_MDA_EXECVE@ GL_GNULIB_MDA_EXECVP = @GL_GNULIB_MDA_EXECVP@ GL_GNULIB_MDA_EXECVPE = @GL_GNULIB_MDA_EXECVPE@ GL_GNULIB_MDA_FCLOSEALL = @GL_GNULIB_MDA_FCLOSEALL@ GL_GNULIB_MDA_FCVT = @GL_GNULIB_MDA_FCVT@ GL_GNULIB_MDA_FDOPEN = @GL_GNULIB_MDA_FDOPEN@ GL_GNULIB_MDA_FILENO = @GL_GNULIB_MDA_FILENO@ GL_GNULIB_MDA_GCVT = @GL_GNULIB_MDA_GCVT@ GL_GNULIB_MDA_GETCWD = @GL_GNULIB_MDA_GETCWD@ GL_GNULIB_MDA_GETPID = @GL_GNULIB_MDA_GETPID@ GL_GNULIB_MDA_GETW = @GL_GNULIB_MDA_GETW@ GL_GNULIB_MDA_ISATTY = @GL_GNULIB_MDA_ISATTY@ GL_GNULIB_MDA_LSEEK = @GL_GNULIB_MDA_LSEEK@ GL_GNULIB_MDA_MEMCCPY = @GL_GNULIB_MDA_MEMCCPY@ GL_GNULIB_MDA_MKDIR = @GL_GNULIB_MDA_MKDIR@ GL_GNULIB_MDA_MKTEMP = @GL_GNULIB_MDA_MKTEMP@ GL_GNULIB_MDA_OPEN = @GL_GNULIB_MDA_OPEN@ GL_GNULIB_MDA_PUTENV = @GL_GNULIB_MDA_PUTENV@ GL_GNULIB_MDA_PUTW = @GL_GNULIB_MDA_PUTW@ GL_GNULIB_MDA_READ = @GL_GNULIB_MDA_READ@ GL_GNULIB_MDA_RMDIR = @GL_GNULIB_MDA_RMDIR@ GL_GNULIB_MDA_STRDUP = @GL_GNULIB_MDA_STRDUP@ GL_GNULIB_MDA_SWAB = @GL_GNULIB_MDA_SWAB@ GL_GNULIB_MDA_TEMPNAM = @GL_GNULIB_MDA_TEMPNAM@ GL_GNULIB_MDA_TZSET = @GL_GNULIB_MDA_TZSET@ GL_GNULIB_MDA_UMASK = @GL_GNULIB_MDA_UMASK@ GL_GNULIB_MDA_UNLINK = @GL_GNULIB_MDA_UNLINK@ GL_GNULIB_MDA_WRITE = @GL_GNULIB_MDA_WRITE@ GL_GNULIB_MEMCHR = @GL_GNULIB_MEMCHR@ GL_GNULIB_MEMMEM = @GL_GNULIB_MEMMEM@ GL_GNULIB_MEMPCPY = @GL_GNULIB_MEMPCPY@ GL_GNULIB_MEMRCHR = @GL_GNULIB_MEMRCHR@ GL_GNULIB_MEMSET_EXPLICIT = @GL_GNULIB_MEMSET_EXPLICIT@ GL_GNULIB_MKDIR = @GL_GNULIB_MKDIR@ GL_GNULIB_MKDIRAT = @GL_GNULIB_MKDIRAT@ GL_GNULIB_MKDTEMP = @GL_GNULIB_MKDTEMP@ GL_GNULIB_MKFIFO = @GL_GNULIB_MKFIFO@ GL_GNULIB_MKFIFOAT = @GL_GNULIB_MKFIFOAT@ GL_GNULIB_MKNOD = @GL_GNULIB_MKNOD@ GL_GNULIB_MKNODAT = @GL_GNULIB_MKNODAT@ GL_GNULIB_MKOSTEMP = @GL_GNULIB_MKOSTEMP@ GL_GNULIB_MKOSTEMPS = @GL_GNULIB_MKOSTEMPS@ GL_GNULIB_MKSTEMP = @GL_GNULIB_MKSTEMP@ GL_GNULIB_MKSTEMPS = @GL_GNULIB_MKSTEMPS@ GL_GNULIB_MKTIME = @GL_GNULIB_MKTIME@ GL_GNULIB_NANOSLEEP = @GL_GNULIB_NANOSLEEP@ GL_GNULIB_NONBLOCKING = @GL_GNULIB_NONBLOCKING@ GL_GNULIB_OBSTACK_PRINTF = @GL_GNULIB_OBSTACK_PRINTF@ GL_GNULIB_OBSTACK_PRINTF_POSIX = @GL_GNULIB_OBSTACK_PRINTF_POSIX@ GL_GNULIB_OBSTACK_ZPRINTF = @GL_GNULIB_OBSTACK_ZPRINTF@ GL_GNULIB_OPEN = @GL_GNULIB_OPEN@ GL_GNULIB_OPENAT = @GL_GNULIB_OPENAT@ GL_GNULIB_OVERRIDES_STRUCT_STAT = @GL_GNULIB_OVERRIDES_STRUCT_STAT@ GL_GNULIB_PCLOSE = @GL_GNULIB_PCLOSE@ GL_GNULIB_PERROR = @GL_GNULIB_PERROR@ GL_GNULIB_PIPE = @GL_GNULIB_PIPE@ GL_GNULIB_PIPE2 = @GL_GNULIB_PIPE2@ GL_GNULIB_POPEN = @GL_GNULIB_POPEN@ GL_GNULIB_POSIX_MEMALIGN = @GL_GNULIB_POSIX_MEMALIGN@ GL_GNULIB_POSIX_OPENPT = @GL_GNULIB_POSIX_OPENPT@ GL_GNULIB_PREAD = @GL_GNULIB_PREAD@ GL_GNULIB_PRINTF = @GL_GNULIB_PRINTF@ GL_GNULIB_PRINTF_POSIX = @GL_GNULIB_PRINTF_POSIX@ GL_GNULIB_PTHREAD_COND = @GL_GNULIB_PTHREAD_COND@ GL_GNULIB_PTHREAD_MUTEX = @GL_GNULIB_PTHREAD_MUTEX@ GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK = @GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK@ GL_GNULIB_PTHREAD_ONCE = @GL_GNULIB_PTHREAD_ONCE@ GL_GNULIB_PTHREAD_RWLOCK = @GL_GNULIB_PTHREAD_RWLOCK@ GL_GNULIB_PTHREAD_SIGMASK = @GL_GNULIB_PTHREAD_SIGMASK@ GL_GNULIB_PTHREAD_SPIN = @GL_GNULIB_PTHREAD_SPIN@ GL_GNULIB_PTHREAD_THREAD = @GL_GNULIB_PTHREAD_THREAD@ GL_GNULIB_PTHREAD_TSS = @GL_GNULIB_PTHREAD_TSS@ GL_GNULIB_PTSNAME = @GL_GNULIB_PTSNAME@ GL_GNULIB_PTSNAME_R = @GL_GNULIB_PTSNAME_R@ GL_GNULIB_PUTC = @GL_GNULIB_PUTC@ GL_GNULIB_PUTCHAR = @GL_GNULIB_PUTCHAR@ GL_GNULIB_PUTENV = @GL_GNULIB_PUTENV@ GL_GNULIB_PUTS = @GL_GNULIB_PUTS@ GL_GNULIB_PWRITE = @GL_GNULIB_PWRITE@ GL_GNULIB_QSORT_R = @GL_GNULIB_QSORT_R@ GL_GNULIB_RAISE = @GL_GNULIB_RAISE@ GL_GNULIB_RAND = @GL_GNULIB_RAND@ GL_GNULIB_RANDOM = @GL_GNULIB_RANDOM@ GL_GNULIB_RANDOM_R = @GL_GNULIB_RANDOM_R@ GL_GNULIB_RAWMEMCHR = @GL_GNULIB_RAWMEMCHR@ GL_GNULIB_READ = @GL_GNULIB_READ@ GL_GNULIB_READLINK = @GL_GNULIB_READLINK@ GL_GNULIB_READLINKAT = @GL_GNULIB_READLINKAT@ GL_GNULIB_REALLOCARRAY = @GL_GNULIB_REALLOCARRAY@ GL_GNULIB_REALLOC_GNU = @GL_GNULIB_REALLOC_GNU@ GL_GNULIB_REALLOC_POSIX = @GL_GNULIB_REALLOC_POSIX@ GL_GNULIB_REALPATH = @GL_GNULIB_REALPATH@ GL_GNULIB_REMOVE = @GL_GNULIB_REMOVE@ GL_GNULIB_RENAME = @GL_GNULIB_RENAME@ GL_GNULIB_RENAMEAT = @GL_GNULIB_RENAMEAT@ GL_GNULIB_RMDIR = @GL_GNULIB_RMDIR@ GL_GNULIB_RPMATCH = @GL_GNULIB_RPMATCH@ GL_GNULIB_SCANF = @GL_GNULIB_SCANF@ GL_GNULIB_SCHED_YIELD = @GL_GNULIB_SCHED_YIELD@ GL_GNULIB_SECURE_GETENV = @GL_GNULIB_SECURE_GETENV@ GL_GNULIB_SETENV = @GL_GNULIB_SETENV@ GL_GNULIB_SETHOSTNAME = @GL_GNULIB_SETHOSTNAME@ GL_GNULIB_SIG2STR = @GL_GNULIB_SIG2STR@ GL_GNULIB_SIGABBREV_NP = @GL_GNULIB_SIGABBREV_NP@ GL_GNULIB_SIGACTION = @GL_GNULIB_SIGACTION@ GL_GNULIB_SIGDESCR_NP = @GL_GNULIB_SIGDESCR_NP@ GL_GNULIB_SIGNAL_H_SIGPIPE = @GL_GNULIB_SIGNAL_H_SIGPIPE@ GL_GNULIB_SIGPROCMASK = @GL_GNULIB_SIGPROCMASK@ GL_GNULIB_SLEEP = @GL_GNULIB_SLEEP@ GL_GNULIB_SNPRINTF = @GL_GNULIB_SNPRINTF@ GL_GNULIB_SNZPRINTF = @GL_GNULIB_SNZPRINTF@ GL_GNULIB_SPRINTF_POSIX = @GL_GNULIB_SPRINTF_POSIX@ GL_GNULIB_STACK_TRACE = @GL_GNULIB_STACK_TRACE@ GL_GNULIB_STAT = @GL_GNULIB_STAT@ GL_GNULIB_STDIO_H_NONBLOCKING = @GL_GNULIB_STDIO_H_NONBLOCKING@ GL_GNULIB_STDIO_H_SIGPIPE = @GL_GNULIB_STDIO_H_SIGPIPE@ GL_GNULIB_STPCPY = @GL_GNULIB_STPCPY@ GL_GNULIB_STPNCPY = @GL_GNULIB_STPNCPY@ GL_GNULIB_STRCASESTR = @GL_GNULIB_STRCASESTR@ GL_GNULIB_STRCHRNUL = @GL_GNULIB_STRCHRNUL@ GL_GNULIB_STRDUP = @GL_GNULIB_STRDUP@ GL_GNULIB_STRERROR = @GL_GNULIB_STRERROR@ GL_GNULIB_STRERRORNAME_NP = @GL_GNULIB_STRERRORNAME_NP@ GL_GNULIB_STRERROR_R = @GL_GNULIB_STRERROR_R@ GL_GNULIB_STRFTIME = @GL_GNULIB_STRFTIME@ GL_GNULIB_STRNCAT = @GL_GNULIB_STRNCAT@ GL_GNULIB_STRNDUP = @GL_GNULIB_STRNDUP@ GL_GNULIB_STRNLEN = @GL_GNULIB_STRNLEN@ GL_GNULIB_STRPBRK = @GL_GNULIB_STRPBRK@ GL_GNULIB_STRPTIME = @GL_GNULIB_STRPTIME@ GL_GNULIB_STRSEP = @GL_GNULIB_STRSEP@ GL_GNULIB_STRSIGNAL = @GL_GNULIB_STRSIGNAL@ GL_GNULIB_STRSTR = @GL_GNULIB_STRSTR@ GL_GNULIB_STRTOD = @GL_GNULIB_STRTOD@ GL_GNULIB_STRTOF = @GL_GNULIB_STRTOF@ GL_GNULIB_STRTOK_R = @GL_GNULIB_STRTOK_R@ GL_GNULIB_STRTOL = @GL_GNULIB_STRTOL@ GL_GNULIB_STRTOLD = @GL_GNULIB_STRTOLD@ GL_GNULIB_STRTOLL = @GL_GNULIB_STRTOLL@ GL_GNULIB_STRTOUL = @GL_GNULIB_STRTOUL@ GL_GNULIB_STRTOULL = @GL_GNULIB_STRTOULL@ GL_GNULIB_STRVERSCMP = @GL_GNULIB_STRVERSCMP@ GL_GNULIB_SYMLINK = @GL_GNULIB_SYMLINK@ GL_GNULIB_SYMLINKAT = @GL_GNULIB_SYMLINKAT@ GL_GNULIB_SYSTEM_POSIX = @GL_GNULIB_SYSTEM_POSIX@ GL_GNULIB_SZPRINTF = @GL_GNULIB_SZPRINTF@ GL_GNULIB_TIME = @GL_GNULIB_TIME@ GL_GNULIB_TIMEGM = @GL_GNULIB_TIMEGM@ GL_GNULIB_TIMESPEC_GET = @GL_GNULIB_TIMESPEC_GET@ GL_GNULIB_TIMESPEC_GETRES = @GL_GNULIB_TIMESPEC_GETRES@ GL_GNULIB_TIME_R = @GL_GNULIB_TIME_R@ GL_GNULIB_TIME_RZ = @GL_GNULIB_TIME_RZ@ GL_GNULIB_TMPFILE = @GL_GNULIB_TMPFILE@ GL_GNULIB_TRUNCATE = @GL_GNULIB_TRUNCATE@ GL_GNULIB_TTYNAME_R = @GL_GNULIB_TTYNAME_R@ GL_GNULIB_TZNAME = @GL_GNULIB_TZNAME@ GL_GNULIB_TZSET = @GL_GNULIB_TZSET@ GL_GNULIB_UNISTD_H_GETOPT = @GL_GNULIB_UNISTD_H_GETOPT@ GL_GNULIB_UNISTD_H_NONBLOCKING = @GL_GNULIB_UNISTD_H_NONBLOCKING@ GL_GNULIB_UNISTD_H_SIGPIPE = @GL_GNULIB_UNISTD_H_SIGPIPE@ GL_GNULIB_UNLINK = @GL_GNULIB_UNLINK@ GL_GNULIB_UNLINKAT = @GL_GNULIB_UNLINKAT@ GL_GNULIB_UNLOCKPT = @GL_GNULIB_UNLOCKPT@ GL_GNULIB_UNSETENV = @GL_GNULIB_UNSETENV@ GL_GNULIB_USLEEP = @GL_GNULIB_USLEEP@ GL_GNULIB_UTIMENSAT = @GL_GNULIB_UTIMENSAT@ GL_GNULIB_VASPRINTF = @GL_GNULIB_VASPRINTF@ GL_GNULIB_VASZPRINTF = @GL_GNULIB_VASZPRINTF@ GL_GNULIB_VDPRINTF = @GL_GNULIB_VDPRINTF@ GL_GNULIB_VDZPRINTF = @GL_GNULIB_VDZPRINTF@ GL_GNULIB_VFPRINTF = @GL_GNULIB_VFPRINTF@ GL_GNULIB_VFPRINTF_POSIX = @GL_GNULIB_VFPRINTF_POSIX@ GL_GNULIB_VFSCANF = @GL_GNULIB_VFSCANF@ GL_GNULIB_VFZPRINTF = @GL_GNULIB_VFZPRINTF@ GL_GNULIB_VPRINTF = @GL_GNULIB_VPRINTF@ GL_GNULIB_VPRINTF_POSIX = @GL_GNULIB_VPRINTF_POSIX@ GL_GNULIB_VSCANF = @GL_GNULIB_VSCANF@ GL_GNULIB_VSNPRINTF = @GL_GNULIB_VSNPRINTF@ GL_GNULIB_VSNZPRINTF = @GL_GNULIB_VSNZPRINTF@ GL_GNULIB_VSPRINTF_POSIX = @GL_GNULIB_VSPRINTF_POSIX@ GL_GNULIB_VSZPRINTF = @GL_GNULIB_VSZPRINTF@ GL_GNULIB_VZPRINTF = @GL_GNULIB_VZPRINTF@ GL_GNULIB_WCTOMB = @GL_GNULIB_WCTOMB@ GL_GNULIB_WRITE = @GL_GNULIB_WRITE@ GL_GNULIB_ZPRINTF = @GL_GNULIB_ZPRINTF@ GL_GNULIB__EXIT = @GL_GNULIB__EXIT@ GNULIBHEADERS_OVERRIDE_WINT_T = @GNULIBHEADERS_OVERRIDE_WINT_T@ GREP = @GREP@ HAVE_ALIGNED_ALLOC = @HAVE_ALIGNED_ALLOC@ HAVE_ALLOCA_H = @HAVE_ALLOCA_H@ HAVE_ATOLL = @HAVE_ATOLL@ HAVE_C99_STDINT_H = @HAVE_C99_STDINT_H@ HAVE_CANONICALIZE_FILE_NAME = @HAVE_CANONICALIZE_FILE_NAME@ HAVE_CHOWN = @HAVE_CHOWN@ HAVE_COPY_FILE_RANGE = @HAVE_COPY_FILE_RANGE@ HAVE_DECL_ECVT = @HAVE_DECL_ECVT@ HAVE_DECL_ENVIRON = @HAVE_DECL_ENVIRON@ HAVE_DECL_EXECVPE = @HAVE_DECL_EXECVPE@ HAVE_DECL_FCHDIR = @HAVE_DECL_FCHDIR@ HAVE_DECL_FCLOSEALL = @HAVE_DECL_FCLOSEALL@ HAVE_DECL_FCVT = @HAVE_DECL_FCVT@ HAVE_DECL_FDATASYNC = @HAVE_DECL_FDATASYNC@ HAVE_DECL_FPURGE = @HAVE_DECL_FPURGE@ HAVE_DECL_FSEEKO = @HAVE_DECL_FSEEKO@ HAVE_DECL_FTELLO = @HAVE_DECL_FTELLO@ HAVE_DECL_GCVT = @HAVE_DECL_GCVT@ HAVE_DECL_GETDELIM = @HAVE_DECL_GETDELIM@ HAVE_DECL_GETDOMAINNAME = @HAVE_DECL_GETDOMAINNAME@ HAVE_DECL_GETLINE = @HAVE_DECL_GETLINE@ HAVE_DECL_GETLOADAVG = @HAVE_DECL_GETLOADAVG@ HAVE_DECL_GETLOGIN = @HAVE_DECL_GETLOGIN@ HAVE_DECL_GETLOGIN_R = @HAVE_DECL_GETLOGIN_R@ HAVE_DECL_GETPAGESIZE = @HAVE_DECL_GETPAGESIZE@ HAVE_DECL_GETUSERSHELL = @HAVE_DECL_GETUSERSHELL@ HAVE_DECL_GETW = @HAVE_DECL_GETW@ HAVE_DECL_INITSTATE = @HAVE_DECL_INITSTATE@ HAVE_DECL_LOCALTIME_R = @HAVE_DECL_LOCALTIME_R@ HAVE_DECL_MEMMEM = @HAVE_DECL_MEMMEM@ HAVE_DECL_MEMRCHR = @HAVE_DECL_MEMRCHR@ HAVE_DECL_OBSTACK_PRINTF = @HAVE_DECL_OBSTACK_PRINTF@ HAVE_DECL_PROGRAM_INVOCATION_NAME = @HAVE_DECL_PROGRAM_INVOCATION_NAME@ HAVE_DECL_PUTW = @HAVE_DECL_PUTW@ HAVE_DECL_SETENV = @HAVE_DECL_SETENV@ HAVE_DECL_SETHOSTNAME = @HAVE_DECL_SETHOSTNAME@ HAVE_DECL_SETSTATE = @HAVE_DECL_SETSTATE@ HAVE_DECL_SNPRINTF = @HAVE_DECL_SNPRINTF@ HAVE_DECL_STRDUP = @HAVE_DECL_STRDUP@ HAVE_DECL_STRERROR_R = @HAVE_DECL_STRERROR_R@ HAVE_DECL_STRNDUP = @HAVE_DECL_STRNDUP@ HAVE_DECL_STRNLEN = @HAVE_DECL_STRNLEN@ HAVE_DECL_STRSIGNAL = @HAVE_DECL_STRSIGNAL@ HAVE_DECL_STRTOK_R = @HAVE_DECL_STRTOK_R@ HAVE_DECL_TRUNCATE = @HAVE_DECL_TRUNCATE@ HAVE_DECL_TTYNAME_R = @HAVE_DECL_TTYNAME_R@ HAVE_DECL_UNSETENV = @HAVE_DECL_UNSETENV@ HAVE_DECL_VSNPRINTF = @HAVE_DECL_VSNPRINTF@ HAVE_DPRINTF = @HAVE_DPRINTF@ HAVE_DUP3 = @HAVE_DUP3@ HAVE_ERROR = @HAVE_ERROR@ HAVE_ERROR_AT_LINE = @HAVE_ERROR_AT_LINE@ HAVE_ERROR_H = @HAVE_ERROR_H@ HAVE_EUIDACCESS = @HAVE_EUIDACCESS@ HAVE_EXECVPE = @HAVE_EXECVPE@ HAVE_EXPLICIT_BZERO = @HAVE_EXPLICIT_BZERO@ HAVE_FACCESSAT = @HAVE_FACCESSAT@ HAVE_FCHDIR = @HAVE_FCHDIR@ HAVE_FCHMODAT = @HAVE_FCHMODAT@ HAVE_FCHOWNAT = @HAVE_FCHOWNAT@ HAVE_FCNTL = @HAVE_FCNTL@ HAVE_FDATASYNC = @HAVE_FDATASYNC@ HAVE_FFSL = @HAVE_FFSL@ HAVE_FFSLL = @HAVE_FFSLL@ HAVE_FSEEKO = @HAVE_FSEEKO@ HAVE_FSTATAT = @HAVE_FSTATAT@ HAVE_FSYNC = @HAVE_FSYNC@ HAVE_FTELLO = @HAVE_FTELLO@ HAVE_FTRUNCATE = @HAVE_FTRUNCATE@ HAVE_FUTIMENS = @HAVE_FUTIMENS@ HAVE_GETDTABLESIZE = @HAVE_GETDTABLESIZE@ HAVE_GETENTROPY = @HAVE_GETENTROPY@ HAVE_GETGROUPS = @HAVE_GETGROUPS@ HAVE_GETHOSTNAME = @HAVE_GETHOSTNAME@ HAVE_GETLOGIN = @HAVE_GETLOGIN@ HAVE_GETPAGESIZE = @HAVE_GETPAGESIZE@ HAVE_GETPASS = @HAVE_GETPASS@ HAVE_GETPROGNAME = @HAVE_GETPROGNAME@ HAVE_GETSUBOPT = @HAVE_GETSUBOPT@ HAVE_GETUMASK = @HAVE_GETUMASK@ HAVE_GRANTPT = @HAVE_GRANTPT@ HAVE_GROUP_MEMBER = @HAVE_GROUP_MEMBER@ HAVE_HASMNTOPT = @HAVE_HASMNTOPT@ HAVE_INITSTATE = @HAVE_INITSTATE@ HAVE_INTTYPES_H = @HAVE_INTTYPES_H@ HAVE_LCHMOD = @HAVE_LCHMOD@ HAVE_LCHOWN = @HAVE_LCHOWN@ HAVE_LINK = @HAVE_LINK@ HAVE_LINKAT = @HAVE_LINKAT@ HAVE_LSTAT = @HAVE_LSTAT@ HAVE_MAX_ALIGN_T = @HAVE_MAX_ALIGN_T@ HAVE_MBSLEN = @HAVE_MBSLEN@ HAVE_MBTOWC = @HAVE_MBTOWC@ HAVE_MEMPCPY = @HAVE_MEMPCPY@ HAVE_MEMSET_EXPLICIT = @HAVE_MEMSET_EXPLICIT@ HAVE_MKDIRAT = @HAVE_MKDIRAT@ HAVE_MKDTEMP = @HAVE_MKDTEMP@ HAVE_MKFIFO = @HAVE_MKFIFO@ HAVE_MKFIFOAT = @HAVE_MKFIFOAT@ HAVE_MKNOD = @HAVE_MKNOD@ HAVE_MKNODAT = @HAVE_MKNODAT@ HAVE_MKOSTEMP = @HAVE_MKOSTEMP@ HAVE_MKOSTEMPS = @HAVE_MKOSTEMPS@ HAVE_MKSTEMP = @HAVE_MKSTEMP@ HAVE_MKSTEMPS = @HAVE_MKSTEMPS@ HAVE_MSVC_INVALID_PARAMETER_HANDLER = @HAVE_MSVC_INVALID_PARAMETER_HANDLER@ HAVE_NANOSLEEP = @HAVE_NANOSLEEP@ HAVE_OFF64_T = @HAVE_OFF64_T@ HAVE_OPENAT = @HAVE_OPENAT@ HAVE_OS_H = @HAVE_OS_H@ HAVE_PCLOSE = @HAVE_PCLOSE@ HAVE_PIPE = @HAVE_PIPE@ HAVE_PIPE2 = @HAVE_PIPE2@ HAVE_POPEN = @HAVE_POPEN@ HAVE_POSIX_MEMALIGN = @HAVE_POSIX_MEMALIGN@ HAVE_POSIX_OPENPT = @HAVE_POSIX_OPENPT@ HAVE_POSIX_SIGNALBLOCKING = @HAVE_POSIX_SIGNALBLOCKING@ HAVE_PREAD = @HAVE_PREAD@ HAVE_PTHREAD_ATTR_DESTROY = @HAVE_PTHREAD_ATTR_DESTROY@ HAVE_PTHREAD_ATTR_GETDETACHSTATE = @HAVE_PTHREAD_ATTR_GETDETACHSTATE@ HAVE_PTHREAD_ATTR_INIT = @HAVE_PTHREAD_ATTR_INIT@ HAVE_PTHREAD_ATTR_SETDETACHSTATE = @HAVE_PTHREAD_ATTR_SETDETACHSTATE@ HAVE_PTHREAD_CONDATTR_DESTROY = @HAVE_PTHREAD_CONDATTR_DESTROY@ HAVE_PTHREAD_CONDATTR_INIT = @HAVE_PTHREAD_CONDATTR_INIT@ HAVE_PTHREAD_COND_BROADCAST = @HAVE_PTHREAD_COND_BROADCAST@ HAVE_PTHREAD_COND_DESTROY = @HAVE_PTHREAD_COND_DESTROY@ HAVE_PTHREAD_COND_INIT = @HAVE_PTHREAD_COND_INIT@ HAVE_PTHREAD_COND_SIGNAL = @HAVE_PTHREAD_COND_SIGNAL@ HAVE_PTHREAD_COND_TIMEDWAIT = @HAVE_PTHREAD_COND_TIMEDWAIT@ HAVE_PTHREAD_COND_WAIT = @HAVE_PTHREAD_COND_WAIT@ HAVE_PTHREAD_CREATE = @HAVE_PTHREAD_CREATE@ HAVE_PTHREAD_CREATE_DETACHED = @HAVE_PTHREAD_CREATE_DETACHED@ HAVE_PTHREAD_DETACH = @HAVE_PTHREAD_DETACH@ HAVE_PTHREAD_EQUAL = @HAVE_PTHREAD_EQUAL@ HAVE_PTHREAD_EXIT = @HAVE_PTHREAD_EXIT@ HAVE_PTHREAD_GETSPECIFIC = @HAVE_PTHREAD_GETSPECIFIC@ HAVE_PTHREAD_H = @HAVE_PTHREAD_H@ HAVE_PTHREAD_JOIN = @HAVE_PTHREAD_JOIN@ HAVE_PTHREAD_KEY_CREATE = @HAVE_PTHREAD_KEY_CREATE@ HAVE_PTHREAD_KEY_DELETE = @HAVE_PTHREAD_KEY_DELETE@ HAVE_PTHREAD_MUTEXATTR_DESTROY = @HAVE_PTHREAD_MUTEXATTR_DESTROY@ HAVE_PTHREAD_MUTEXATTR_GETROBUST = @HAVE_PTHREAD_MUTEXATTR_GETROBUST@ HAVE_PTHREAD_MUTEXATTR_GETTYPE = @HAVE_PTHREAD_MUTEXATTR_GETTYPE@ HAVE_PTHREAD_MUTEXATTR_INIT = @HAVE_PTHREAD_MUTEXATTR_INIT@ HAVE_PTHREAD_MUTEXATTR_SETROBUST = @HAVE_PTHREAD_MUTEXATTR_SETROBUST@ HAVE_PTHREAD_MUTEXATTR_SETTYPE = @HAVE_PTHREAD_MUTEXATTR_SETTYPE@ HAVE_PTHREAD_MUTEX_DESTROY = @HAVE_PTHREAD_MUTEX_DESTROY@ HAVE_PTHREAD_MUTEX_INIT = @HAVE_PTHREAD_MUTEX_INIT@ HAVE_PTHREAD_MUTEX_LOCK = @HAVE_PTHREAD_MUTEX_LOCK@ HAVE_PTHREAD_MUTEX_RECURSIVE = @HAVE_PTHREAD_MUTEX_RECURSIVE@ HAVE_PTHREAD_MUTEX_ROBUST = @HAVE_PTHREAD_MUTEX_ROBUST@ HAVE_PTHREAD_MUTEX_TIMEDLOCK = @HAVE_PTHREAD_MUTEX_TIMEDLOCK@ HAVE_PTHREAD_MUTEX_TRYLOCK = @HAVE_PTHREAD_MUTEX_TRYLOCK@ HAVE_PTHREAD_MUTEX_UNLOCK = @HAVE_PTHREAD_MUTEX_UNLOCK@ HAVE_PTHREAD_ONCE = @HAVE_PTHREAD_ONCE@ HAVE_PTHREAD_PROCESS_SHARED = @HAVE_PTHREAD_PROCESS_SHARED@ HAVE_PTHREAD_RWLOCKATTR_DESTROY = @HAVE_PTHREAD_RWLOCKATTR_DESTROY@ HAVE_PTHREAD_RWLOCKATTR_INIT = @HAVE_PTHREAD_RWLOCKATTR_INIT@ HAVE_PTHREAD_RWLOCK_DESTROY = @HAVE_PTHREAD_RWLOCK_DESTROY@ HAVE_PTHREAD_RWLOCK_INIT = @HAVE_PTHREAD_RWLOCK_INIT@ HAVE_PTHREAD_RWLOCK_RDLOCK = @HAVE_PTHREAD_RWLOCK_RDLOCK@ HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK = @HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK@ HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK = @HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK@ HAVE_PTHREAD_RWLOCK_TRYRDLOCK = @HAVE_PTHREAD_RWLOCK_TRYRDLOCK@ HAVE_PTHREAD_RWLOCK_TRYWRLOCK = @HAVE_PTHREAD_RWLOCK_TRYWRLOCK@ HAVE_PTHREAD_RWLOCK_UNLOCK = @HAVE_PTHREAD_RWLOCK_UNLOCK@ HAVE_PTHREAD_RWLOCK_WRLOCK = @HAVE_PTHREAD_RWLOCK_WRLOCK@ HAVE_PTHREAD_SELF = @HAVE_PTHREAD_SELF@ HAVE_PTHREAD_SETSPECIFIC = @HAVE_PTHREAD_SETSPECIFIC@ HAVE_PTHREAD_SIGMASK = @HAVE_PTHREAD_SIGMASK@ HAVE_PTHREAD_SPINLOCK_T = @HAVE_PTHREAD_SPINLOCK_T@ HAVE_PTHREAD_SPIN_DESTROY = @HAVE_PTHREAD_SPIN_DESTROY@ HAVE_PTHREAD_SPIN_INIT = @HAVE_PTHREAD_SPIN_INIT@ HAVE_PTHREAD_SPIN_LOCK = @HAVE_PTHREAD_SPIN_LOCK@ HAVE_PTHREAD_SPIN_TRYLOCK = @HAVE_PTHREAD_SPIN_TRYLOCK@ HAVE_PTHREAD_SPIN_UNLOCK = @HAVE_PTHREAD_SPIN_UNLOCK@ HAVE_PTHREAD_T = @HAVE_PTHREAD_T@ HAVE_PTSNAME = @HAVE_PTSNAME@ HAVE_PTSNAME_R = @HAVE_PTSNAME_R@ HAVE_PWRITE = @HAVE_PWRITE@ HAVE_QSORT_R = @HAVE_QSORT_R@ HAVE_RAISE = @HAVE_RAISE@ HAVE_RANDOM = @HAVE_RANDOM@ HAVE_RANDOM_H = @HAVE_RANDOM_H@ HAVE_RANDOM_R = @HAVE_RANDOM_R@ HAVE_RAWMEMCHR = @HAVE_RAWMEMCHR@ HAVE_READLINK = @HAVE_READLINK@ HAVE_READLINKAT = @HAVE_READLINKAT@ HAVE_REALLOCARRAY = @HAVE_REALLOCARRAY@ HAVE_REALPATH = @HAVE_REALPATH@ HAVE_RENAMEAT = @HAVE_RENAMEAT@ HAVE_RPMATCH = @HAVE_RPMATCH@ HAVE_SCHED_H = @HAVE_SCHED_H@ HAVE_SCHED_YIELD = @HAVE_SCHED_YIELD@ HAVE_SECURE_GETENV = @HAVE_SECURE_GETENV@ HAVE_SETENV = @HAVE_SETENV@ HAVE_SETHOSTNAME = @HAVE_SETHOSTNAME@ HAVE_SETMNTENT = @HAVE_SETMNTENT@ HAVE_SETSTATE = @HAVE_SETSTATE@ HAVE_SIG2STR = @HAVE_SIG2STR@ HAVE_SIGABBREV_NP = @HAVE_SIGABBREV_NP@ HAVE_SIGACTION = @HAVE_SIGACTION@ HAVE_SIGDESCR_NP = @HAVE_SIGDESCR_NP@ HAVE_SIGHANDLER_T = @HAVE_SIGHANDLER_T@ HAVE_SIGINFO_T = @HAVE_SIGINFO_T@ HAVE_SIGNED_SIG_ATOMIC_T = @HAVE_SIGNED_SIG_ATOMIC_T@ HAVE_SIGNED_WCHAR_T = @HAVE_SIGNED_WCHAR_T@ HAVE_SIGNED_WINT_T = @HAVE_SIGNED_WINT_T@ HAVE_SIGSET_T = @HAVE_SIGSET_T@ HAVE_SLEEP = @HAVE_SLEEP@ HAVE_STDINT_H = @HAVE_STDINT_H@ HAVE_STPCPY = @HAVE_STPCPY@ HAVE_STPNCPY = @HAVE_STPNCPY@ HAVE_STR2SIG = @HAVE_STR2SIG@ HAVE_STRCASESTR = @HAVE_STRCASESTR@ HAVE_STRCHRNUL = @HAVE_STRCHRNUL@ HAVE_STRERRORNAME_NP = @HAVE_STRERRORNAME_NP@ HAVE_STRPBRK = @HAVE_STRPBRK@ HAVE_STRPTIME = @HAVE_STRPTIME@ HAVE_STRSEP = @HAVE_STRSEP@ HAVE_STRTOD = @HAVE_STRTOD@ HAVE_STRTOF = @HAVE_STRTOF@ HAVE_STRTOL = @HAVE_STRTOL@ HAVE_STRTOLD = @HAVE_STRTOLD@ HAVE_STRTOLL = @HAVE_STRTOLL@ HAVE_STRTOUL = @HAVE_STRTOUL@ HAVE_STRTOULL = @HAVE_STRTOULL@ HAVE_STRUCT_RANDOM_DATA = @HAVE_STRUCT_RANDOM_DATA@ HAVE_STRUCT_SCHED_PARAM = @HAVE_STRUCT_SCHED_PARAM@ HAVE_STRUCT_SIGACTION_SA_SIGACTION = @HAVE_STRUCT_SIGACTION_SA_SIGACTION@ HAVE_STRVERSCMP = @HAVE_STRVERSCMP@ HAVE_SYMLINK = @HAVE_SYMLINK@ HAVE_SYMLINKAT = @HAVE_SYMLINKAT@ HAVE_SYS_BITYPES_H = @HAVE_SYS_BITYPES_H@ HAVE_SYS_CDEFS_H = @HAVE_SYS_CDEFS_H@ HAVE_SYS_INTTYPES_H = @HAVE_SYS_INTTYPES_H@ HAVE_SYS_LOADAVG_H = @HAVE_SYS_LOADAVG_H@ HAVE_SYS_PARAM_H = @HAVE_SYS_PARAM_H@ HAVE_SYS_TYPES_H = @HAVE_SYS_TYPES_H@ HAVE_TIMEGM = @HAVE_TIMEGM@ HAVE_TIMESPEC_GET = @HAVE_TIMESPEC_GET@ HAVE_TIMESPEC_GETRES = @HAVE_TIMESPEC_GETRES@ HAVE_TIMEZONE_T = @HAVE_TIMEZONE_T@ HAVE_TYPE_VOLATILE_SIG_ATOMIC_T = @HAVE_TYPE_VOLATILE_SIG_ATOMIC_T@ HAVE_UNISTD_H = @HAVE_UNISTD_H@ HAVE_UNLINKAT = @HAVE_UNLINKAT@ HAVE_UNLOCKPT = @HAVE_UNLOCKPT@ HAVE_USLEEP = @HAVE_USLEEP@ HAVE_UTIMENSAT = @HAVE_UTIMENSAT@ HAVE_VASPRINTF = @HAVE_VASPRINTF@ HAVE_VDPRINTF = @HAVE_VDPRINTF@ HAVE_WCHAR_H = @HAVE_WCHAR_H@ HAVE_WINSOCK2_H = @HAVE_WINSOCK2_H@ HAVE__EXIT = @HAVE__EXIT@ HOST_CPU = @HOST_CPU@ HOST_CPU_C_ABI = @HOST_CPU_C_ABI@ IFNOT_MSVC = @IFNOT_MSVC@ IF_CXX = @IF_CXX@ IF_MSVC = @IF_MSVC@ INCLUDE_NEXT = @INCLUDE_NEXT@ INCLUDE_NEXT_AS_FIRST_DIRECTIVE = @INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ INSTALL = @INSTALL@ INSTALL_DATA = @INSTALL_DATA@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_SCRIPT = @INSTALL_SCRIPT@ INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@ LD = @LD@ LDFLAGS = @LDFLAGS@ LIBINTL = @LIBINTL@ LIBMULTITHREAD = @LIBMULTITHREAD@ LIBOBJS = @LIBOBJS@ LIBPMULTITHREAD = @LIBPMULTITHREAD@ LIBPTHREAD = @LIBPTHREAD@ LIBS = @LIBS@ LIBSTDTHREAD = @LIBSTDTHREAD@ LIBTHREAD = @LIBTHREAD@ LIBTOOL = @LIBTOOL@ LIB_PTHREAD = @LIB_PTHREAD@ LIB_SCHED_YIELD = @LIB_SCHED_YIELD@ LIMITS_H = @LIMITS_H@ LIPO = @LIPO@ LN = @LN@ LN_S = @LN_S@ LOCALE_EN_UTF8 = @LOCALE_EN_UTF8@ LTLIBINTL = @LTLIBINTL@ LTLIBMULTITHREAD = @LTLIBMULTITHREAD@ LTLIBOBJS = @LTLIBOBJS@ LTLIBTHREAD = @LTLIBTHREAD@ LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@ MAKEINFO = @MAKEINFO@ MANIFEST_TOOL = @MANIFEST_TOOL@ MKDIR_P = @MKDIR_P@ MNTENT_H = @MNTENT_H@ NEXT_ASSERT_H = @NEXT_ASSERT_H@ NEXT_AS_FIRST_DIRECTIVE_ASSERT_H = @NEXT_AS_FIRST_DIRECTIVE_ASSERT_H@ NEXT_AS_FIRST_DIRECTIVE_ERRNO_H = @NEXT_AS_FIRST_DIRECTIVE_ERRNO_H@ NEXT_AS_FIRST_DIRECTIVE_ERROR_H = @NEXT_AS_FIRST_DIRECTIVE_ERROR_H@ NEXT_AS_FIRST_DIRECTIVE_FCNTL_H = @NEXT_AS_FIRST_DIRECTIVE_FCNTL_H@ NEXT_AS_FIRST_DIRECTIVE_LIMITS_H = @NEXT_AS_FIRST_DIRECTIVE_LIMITS_H@ NEXT_AS_FIRST_DIRECTIVE_MNTENT_H = @NEXT_AS_FIRST_DIRECTIVE_MNTENT_H@ NEXT_AS_FIRST_DIRECTIVE_PTHREAD_H = @NEXT_AS_FIRST_DIRECTIVE_PTHREAD_H@ NEXT_AS_FIRST_DIRECTIVE_SCHED_H = @NEXT_AS_FIRST_DIRECTIVE_SCHED_H@ NEXT_AS_FIRST_DIRECTIVE_SIGNAL_H = @NEXT_AS_FIRST_DIRECTIVE_SIGNAL_H@ NEXT_AS_FIRST_DIRECTIVE_STDDEF_H = @NEXT_AS_FIRST_DIRECTIVE_STDDEF_H@ NEXT_AS_FIRST_DIRECTIVE_STDINT_H = @NEXT_AS_FIRST_DIRECTIVE_STDINT_H@ NEXT_AS_FIRST_DIRECTIVE_STDIO_H = @NEXT_AS_FIRST_DIRECTIVE_STDIO_H@ NEXT_AS_FIRST_DIRECTIVE_STDLIB_H = @NEXT_AS_FIRST_DIRECTIVE_STDLIB_H@ NEXT_AS_FIRST_DIRECTIVE_STRING_H = @NEXT_AS_FIRST_DIRECTIVE_STRING_H@ NEXT_AS_FIRST_DIRECTIVE_SYS_STAT_H = @NEXT_AS_FIRST_DIRECTIVE_SYS_STAT_H@ NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H = @NEXT_AS_FIRST_DIRECTIVE_SYS_TYPES_H@ NEXT_AS_FIRST_DIRECTIVE_TIME_H = @NEXT_AS_FIRST_DIRECTIVE_TIME_H@ NEXT_AS_FIRST_DIRECTIVE_UNISTD_H = @NEXT_AS_FIRST_DIRECTIVE_UNISTD_H@ NEXT_ERRNO_H = @NEXT_ERRNO_H@ NEXT_ERROR_H = @NEXT_ERROR_H@ NEXT_FCNTL_H = @NEXT_FCNTL_H@ NEXT_LIMITS_H = @NEXT_LIMITS_H@ NEXT_MNTENT_H = @NEXT_MNTENT_H@ NEXT_PTHREAD_H = @NEXT_PTHREAD_H@ NEXT_SCHED_H = @NEXT_SCHED_H@ NEXT_SIGNAL_H = @NEXT_SIGNAL_H@ NEXT_STDDEF_H = @NEXT_STDDEF_H@ NEXT_STDINT_H = @NEXT_STDINT_H@ NEXT_STDIO_H = @NEXT_STDIO_H@ NEXT_STDLIB_H = @NEXT_STDLIB_H@ NEXT_STRING_H = @NEXT_STRING_H@ NEXT_SYS_STAT_H = @NEXT_SYS_STAT_H@ NEXT_SYS_TYPES_H = @NEXT_SYS_TYPES_H@ NEXT_TIME_H = @NEXT_TIME_H@ NEXT_UNISTD_H = @NEXT_UNISTD_H@ NM = @NM@ NMEDIT = @NMEDIT@ NULLPTR_T_NEEDS_STDDEF = @NULLPTR_T_NEEDS_STDDEF@ OBJDUMP = @OBJDUMP@ OBJEXT = @OBJEXT@ OTOOL = @OTOOL@ OTOOL64 = @OTOOL64@ PACKAGE = @PACKAGE@ PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@ PACKAGE_NAME = @PACKAGE_NAME@ PACKAGE_STRING = @PACKAGE_STRING@ PACKAGE_TARNAME = @PACKAGE_TARNAME@ PACKAGE_URL = @PACKAGE_URL@ PACKAGE_VERSION = @PACKAGE_VERSION@ PATH_SEPARATOR = @PATH_SEPARATOR@ PRAGMA_COLUMNS = @PRAGMA_COLUMNS@ PRAGMA_SYSTEM_HEADER = @PRAGMA_SYSTEM_HEADER@ PTHREAD_H_DEFINES_STRUCT_TIMESPEC = @PTHREAD_H_DEFINES_STRUCT_TIMESPEC@ PTRDIFF_T_SUFFIX = @PTRDIFF_T_SUFFIX@ RANLIB = @RANLIB@ REPLACE_ABORT = @REPLACE_ABORT@ REPLACE_ACCESS = @REPLACE_ACCESS@ REPLACE_ALIGNED_ALLOC = @REPLACE_ALIGNED_ALLOC@ REPLACE_CALLOC_FOR_CALLOC_GNU = @REPLACE_CALLOC_FOR_CALLOC_GNU@ REPLACE_CALLOC_FOR_CALLOC_POSIX = @REPLACE_CALLOC_FOR_CALLOC_POSIX@ REPLACE_CANONICALIZE_FILE_NAME = @REPLACE_CANONICALIZE_FILE_NAME@ REPLACE_CHMOD = @REPLACE_CHMOD@ REPLACE_CHOWN = @REPLACE_CHOWN@ REPLACE_CLOSE = @REPLACE_CLOSE@ REPLACE_COPY_FILE_RANGE = @REPLACE_COPY_FILE_RANGE@ REPLACE_CREAT = @REPLACE_CREAT@ REPLACE_CTIME = @REPLACE_CTIME@ REPLACE_DPRINTF = @REPLACE_DPRINTF@ REPLACE_DUP = @REPLACE_DUP@ REPLACE_DUP2 = @REPLACE_DUP2@ REPLACE_DUP3 = @REPLACE_DUP3@ REPLACE_ERROR = @REPLACE_ERROR@ REPLACE_ERROR_AT_LINE = @REPLACE_ERROR_AT_LINE@ REPLACE_EXECL = @REPLACE_EXECL@ REPLACE_EXECLE = @REPLACE_EXECLE@ REPLACE_EXECLP = @REPLACE_EXECLP@ REPLACE_EXECV = @REPLACE_EXECV@ REPLACE_EXECVE = @REPLACE_EXECVE@ REPLACE_EXECVP = @REPLACE_EXECVP@ REPLACE_EXECVPE = @REPLACE_EXECVPE@ REPLACE_FACCESSAT = @REPLACE_FACCESSAT@ REPLACE_FCHDIR = @REPLACE_FCHDIR@ REPLACE_FCHMODAT = @REPLACE_FCHMODAT@ REPLACE_FCHOWNAT = @REPLACE_FCHOWNAT@ REPLACE_FCLOSE = @REPLACE_FCLOSE@ REPLACE_FCNTL = @REPLACE_FCNTL@ REPLACE_FDATASYNC = @REPLACE_FDATASYNC@ REPLACE_FDOPEN = @REPLACE_FDOPEN@ REPLACE_FFLUSH = @REPLACE_FFLUSH@ REPLACE_FFSLL = @REPLACE_FFSLL@ REPLACE_FOPEN = @REPLACE_FOPEN@ REPLACE_FOPEN_FOR_FOPEN_GNU = @REPLACE_FOPEN_FOR_FOPEN_GNU@ REPLACE_FPRINTF = @REPLACE_FPRINTF@ REPLACE_FPURGE = @REPLACE_FPURGE@ REPLACE_FREE = @REPLACE_FREE@ REPLACE_FREOPEN = @REPLACE_FREOPEN@ REPLACE_FSEEK = @REPLACE_FSEEK@ REPLACE_FSEEKO = @REPLACE_FSEEKO@ REPLACE_FSTAT = @REPLACE_FSTAT@ REPLACE_FSTATAT = @REPLACE_FSTATAT@ REPLACE_FTELL = @REPLACE_FTELL@ REPLACE_FTELLO = @REPLACE_FTELLO@ REPLACE_FTRUNCATE = @REPLACE_FTRUNCATE@ REPLACE_FUTIMENS = @REPLACE_FUTIMENS@ REPLACE_GETCWD = @REPLACE_GETCWD@ REPLACE_GETDELIM = @REPLACE_GETDELIM@ REPLACE_GETDOMAINNAME = @REPLACE_GETDOMAINNAME@ REPLACE_GETDTABLESIZE = @REPLACE_GETDTABLESIZE@ REPLACE_GETENTROPY = @REPLACE_GETENTROPY@ REPLACE_GETGROUPS = @REPLACE_GETGROUPS@ REPLACE_GETLINE = @REPLACE_GETLINE@ REPLACE_GETLOADAVG = @REPLACE_GETLOADAVG@ REPLACE_GETLOGIN_R = @REPLACE_GETLOGIN_R@ REPLACE_GETPAGESIZE = @REPLACE_GETPAGESIZE@ REPLACE_GETPASS = @REPLACE_GETPASS@ REPLACE_GETPASS_FOR_GETPASS_GNU = @REPLACE_GETPASS_FOR_GETPASS_GNU@ REPLACE_GETPROGNAME = @REPLACE_GETPROGNAME@ REPLACE_GETSUBOPT = @REPLACE_GETSUBOPT@ REPLACE_GETUSERSHELL = @REPLACE_GETUSERSHELL@ REPLACE_GMTIME = @REPLACE_GMTIME@ REPLACE_HASMNTOPT = @REPLACE_HASMNTOPT@ REPLACE_INITSTATE = @REPLACE_INITSTATE@ REPLACE_ISATTY = @REPLACE_ISATTY@ REPLACE_LCHOWN = @REPLACE_LCHOWN@ REPLACE_LINK = @REPLACE_LINK@ REPLACE_LINKAT = @REPLACE_LINKAT@ REPLACE_LOCALTIME = @REPLACE_LOCALTIME@ REPLACE_LOCALTIME_R = @REPLACE_LOCALTIME_R@ REPLACE_LSEEK = @REPLACE_LSEEK@ REPLACE_LSTAT = @REPLACE_LSTAT@ REPLACE_MALLOC_FOR_MALLOC_GNU = @REPLACE_MALLOC_FOR_MALLOC_GNU@ REPLACE_MALLOC_FOR_MALLOC_POSIX = @REPLACE_MALLOC_FOR_MALLOC_POSIX@ REPLACE_MBSTOWCS = @REPLACE_MBSTOWCS@ REPLACE_MBTOWC = @REPLACE_MBTOWC@ REPLACE_MB_CUR_MAX = @REPLACE_MB_CUR_MAX@ REPLACE_MEMCHR = @REPLACE_MEMCHR@ REPLACE_MEMMEM = @REPLACE_MEMMEM@ REPLACE_MEMPCPY = @REPLACE_MEMPCPY@ REPLACE_MEMSET_EXPLICIT = @REPLACE_MEMSET_EXPLICIT@ REPLACE_MKDIR = @REPLACE_MKDIR@ REPLACE_MKFIFO = @REPLACE_MKFIFO@ REPLACE_MKFIFOAT = @REPLACE_MKFIFOAT@ REPLACE_MKNOD = @REPLACE_MKNOD@ REPLACE_MKNODAT = @REPLACE_MKNODAT@ REPLACE_MKOSTEMP = @REPLACE_MKOSTEMP@ REPLACE_MKOSTEMPS = @REPLACE_MKOSTEMPS@ REPLACE_MKSTEMP = @REPLACE_MKSTEMP@ REPLACE_MKTIME = @REPLACE_MKTIME@ REPLACE_NANOSLEEP = @REPLACE_NANOSLEEP@ REPLACE_NULL = @REPLACE_NULL@ REPLACE_OBSTACK_PRINTF = @REPLACE_OBSTACK_PRINTF@ REPLACE_OPEN = @REPLACE_OPEN@ REPLACE_OPENAT = @REPLACE_OPENAT@ REPLACE_PERROR = @REPLACE_PERROR@ REPLACE_PIPE2 = @REPLACE_PIPE2@ REPLACE_POPEN = @REPLACE_POPEN@ REPLACE_POSIX_MEMALIGN = @REPLACE_POSIX_MEMALIGN@ REPLACE_POSIX_OPENPT = @REPLACE_POSIX_OPENPT@ REPLACE_PREAD = @REPLACE_PREAD@ REPLACE_PRINTF = @REPLACE_PRINTF@ REPLACE_PTHREAD_ATTR_DESTROY = @REPLACE_PTHREAD_ATTR_DESTROY@ REPLACE_PTHREAD_ATTR_GETDETACHSTATE = @REPLACE_PTHREAD_ATTR_GETDETACHSTATE@ REPLACE_PTHREAD_ATTR_INIT = @REPLACE_PTHREAD_ATTR_INIT@ REPLACE_PTHREAD_ATTR_SETDETACHSTATE = @REPLACE_PTHREAD_ATTR_SETDETACHSTATE@ REPLACE_PTHREAD_CONDATTR_DESTROY = @REPLACE_PTHREAD_CONDATTR_DESTROY@ REPLACE_PTHREAD_CONDATTR_INIT = @REPLACE_PTHREAD_CONDATTR_INIT@ REPLACE_PTHREAD_COND_BROADCAST = @REPLACE_PTHREAD_COND_BROADCAST@ REPLACE_PTHREAD_COND_DESTROY = @REPLACE_PTHREAD_COND_DESTROY@ REPLACE_PTHREAD_COND_INIT = @REPLACE_PTHREAD_COND_INIT@ REPLACE_PTHREAD_COND_SIGNAL = @REPLACE_PTHREAD_COND_SIGNAL@ REPLACE_PTHREAD_COND_TIMEDWAIT = @REPLACE_PTHREAD_COND_TIMEDWAIT@ REPLACE_PTHREAD_COND_WAIT = @REPLACE_PTHREAD_COND_WAIT@ REPLACE_PTHREAD_CREATE = @REPLACE_PTHREAD_CREATE@ REPLACE_PTHREAD_DETACH = @REPLACE_PTHREAD_DETACH@ REPLACE_PTHREAD_EQUAL = @REPLACE_PTHREAD_EQUAL@ REPLACE_PTHREAD_EXIT = @REPLACE_PTHREAD_EXIT@ REPLACE_PTHREAD_GETSPECIFIC = @REPLACE_PTHREAD_GETSPECIFIC@ REPLACE_PTHREAD_JOIN = @REPLACE_PTHREAD_JOIN@ REPLACE_PTHREAD_KEY_CREATE = @REPLACE_PTHREAD_KEY_CREATE@ REPLACE_PTHREAD_KEY_DELETE = @REPLACE_PTHREAD_KEY_DELETE@ REPLACE_PTHREAD_MUTEXATTR_DESTROY = @REPLACE_PTHREAD_MUTEXATTR_DESTROY@ REPLACE_PTHREAD_MUTEXATTR_GETROBUST = @REPLACE_PTHREAD_MUTEXATTR_GETROBUST@ REPLACE_PTHREAD_MUTEXATTR_GETTYPE = @REPLACE_PTHREAD_MUTEXATTR_GETTYPE@ REPLACE_PTHREAD_MUTEXATTR_INIT = @REPLACE_PTHREAD_MUTEXATTR_INIT@ REPLACE_PTHREAD_MUTEXATTR_SETROBUST = @REPLACE_PTHREAD_MUTEXATTR_SETROBUST@ REPLACE_PTHREAD_MUTEXATTR_SETTYPE = @REPLACE_PTHREAD_MUTEXATTR_SETTYPE@ REPLACE_PTHREAD_MUTEX_DESTROY = @REPLACE_PTHREAD_MUTEX_DESTROY@ REPLACE_PTHREAD_MUTEX_INIT = @REPLACE_PTHREAD_MUTEX_INIT@ REPLACE_PTHREAD_MUTEX_LOCK = @REPLACE_PTHREAD_MUTEX_LOCK@ REPLACE_PTHREAD_MUTEX_TIMEDLOCK = @REPLACE_PTHREAD_MUTEX_TIMEDLOCK@ REPLACE_PTHREAD_MUTEX_TRYLOCK = @REPLACE_PTHREAD_MUTEX_TRYLOCK@ REPLACE_PTHREAD_MUTEX_UNLOCK = @REPLACE_PTHREAD_MUTEX_UNLOCK@ REPLACE_PTHREAD_ONCE = @REPLACE_PTHREAD_ONCE@ REPLACE_PTHREAD_RWLOCKATTR_DESTROY = @REPLACE_PTHREAD_RWLOCKATTR_DESTROY@ REPLACE_PTHREAD_RWLOCKATTR_INIT = @REPLACE_PTHREAD_RWLOCKATTR_INIT@ REPLACE_PTHREAD_RWLOCK_DESTROY = @REPLACE_PTHREAD_RWLOCK_DESTROY@ REPLACE_PTHREAD_RWLOCK_INIT = @REPLACE_PTHREAD_RWLOCK_INIT@ REPLACE_PTHREAD_RWLOCK_RDLOCK = @REPLACE_PTHREAD_RWLOCK_RDLOCK@ REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK = @REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK@ REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK = @REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK@ REPLACE_PTHREAD_RWLOCK_TRYRDLOCK = @REPLACE_PTHREAD_RWLOCK_TRYRDLOCK@ REPLACE_PTHREAD_RWLOCK_TRYWRLOCK = @REPLACE_PTHREAD_RWLOCK_TRYWRLOCK@ REPLACE_PTHREAD_RWLOCK_UNLOCK = @REPLACE_PTHREAD_RWLOCK_UNLOCK@ REPLACE_PTHREAD_RWLOCK_WRLOCK = @REPLACE_PTHREAD_RWLOCK_WRLOCK@ REPLACE_PTHREAD_SELF = @REPLACE_PTHREAD_SELF@ REPLACE_PTHREAD_SETSPECIFIC = @REPLACE_PTHREAD_SETSPECIFIC@ REPLACE_PTHREAD_SIGMASK = @REPLACE_PTHREAD_SIGMASK@ REPLACE_PTHREAD_SPIN_DESTROY = @REPLACE_PTHREAD_SPIN_DESTROY@ REPLACE_PTHREAD_SPIN_INIT = @REPLACE_PTHREAD_SPIN_INIT@ REPLACE_PTHREAD_SPIN_LOCK = @REPLACE_PTHREAD_SPIN_LOCK@ REPLACE_PTHREAD_SPIN_TRYLOCK = @REPLACE_PTHREAD_SPIN_TRYLOCK@ REPLACE_PTHREAD_SPIN_UNLOCK = @REPLACE_PTHREAD_SPIN_UNLOCK@ REPLACE_PTSNAME = @REPLACE_PTSNAME@ REPLACE_PTSNAME_R = @REPLACE_PTSNAME_R@ REPLACE_PUTENV = @REPLACE_PUTENV@ REPLACE_PWRITE = @REPLACE_PWRITE@ REPLACE_QSORT_R = @REPLACE_QSORT_R@ REPLACE_RAISE = @REPLACE_RAISE@ REPLACE_RAND = @REPLACE_RAND@ REPLACE_RANDOM = @REPLACE_RANDOM@ REPLACE_RANDOM_R = @REPLACE_RANDOM_R@ REPLACE_READ = @REPLACE_READ@ REPLACE_READLINK = @REPLACE_READLINK@ REPLACE_READLINKAT = @REPLACE_READLINKAT@ REPLACE_REALLOCARRAY = @REPLACE_REALLOCARRAY@ REPLACE_REALLOC_FOR_REALLOC_GNU = @REPLACE_REALLOC_FOR_REALLOC_GNU@ REPLACE_REALLOC_FOR_REALLOC_POSIX = @REPLACE_REALLOC_FOR_REALLOC_POSIX@ REPLACE_REALPATH = @REPLACE_REALPATH@ REPLACE_REMOVE = @REPLACE_REMOVE@ REPLACE_RENAME = @REPLACE_RENAME@ REPLACE_RENAMEAT = @REPLACE_RENAMEAT@ REPLACE_RMDIR = @REPLACE_RMDIR@ REPLACE_SCHED_YIELD = @REPLACE_SCHED_YIELD@ REPLACE_SETENV = @REPLACE_SETENV@ REPLACE_SETHOSTNAME = @REPLACE_SETHOSTNAME@ REPLACE_SETSTATE = @REPLACE_SETSTATE@ REPLACE_SLEEP = @REPLACE_SLEEP@ REPLACE_SNPRINTF = @REPLACE_SNPRINTF@ REPLACE_SPRINTF = @REPLACE_SPRINTF@ REPLACE_STAT = @REPLACE_STAT@ REPLACE_STDIO_READ_FUNCS = @REPLACE_STDIO_READ_FUNCS@ REPLACE_STDIO_WRITE_FUNCS = @REPLACE_STDIO_WRITE_FUNCS@ REPLACE_STPCPY = @REPLACE_STPCPY@ REPLACE_STPNCPY = @REPLACE_STPNCPY@ REPLACE_STRCASESTR = @REPLACE_STRCASESTR@ REPLACE_STRCHRNUL = @REPLACE_STRCHRNUL@ REPLACE_STRDUP = @REPLACE_STRDUP@ REPLACE_STRERROR = @REPLACE_STRERROR@ REPLACE_STRERRORNAME_NP = @REPLACE_STRERRORNAME_NP@ REPLACE_STRERROR_R = @REPLACE_STRERROR_R@ REPLACE_STRFTIME = @REPLACE_STRFTIME@ REPLACE_STRNCAT = @REPLACE_STRNCAT@ REPLACE_STRNDUP = @REPLACE_STRNDUP@ REPLACE_STRNLEN = @REPLACE_STRNLEN@ REPLACE_STRSIGNAL = @REPLACE_STRSIGNAL@ REPLACE_STRSTR = @REPLACE_STRSTR@ REPLACE_STRTOD = @REPLACE_STRTOD@ REPLACE_STRTOF = @REPLACE_STRTOF@ REPLACE_STRTOK_R = @REPLACE_STRTOK_R@ REPLACE_STRTOL = @REPLACE_STRTOL@ REPLACE_STRTOLD = @REPLACE_STRTOLD@ REPLACE_STRTOLL = @REPLACE_STRTOLL@ REPLACE_STRTOUL = @REPLACE_STRTOUL@ REPLACE_STRTOULL = @REPLACE_STRTOULL@ REPLACE_STRVERSCMP = @REPLACE_STRVERSCMP@ REPLACE_SYMLINK = @REPLACE_SYMLINK@ REPLACE_SYMLINKAT = @REPLACE_SYMLINKAT@ REPLACE_TIME = @REPLACE_TIME@ REPLACE_TIMEGM = @REPLACE_TIMEGM@ REPLACE_TIMESPEC_GET = @REPLACE_TIMESPEC_GET@ REPLACE_TIMESPEC_GETRES = @REPLACE_TIMESPEC_GETRES@ REPLACE_TMPFILE = @REPLACE_TMPFILE@ REPLACE_TRUNCATE = @REPLACE_TRUNCATE@ REPLACE_TTYNAME_R = @REPLACE_TTYNAME_R@ REPLACE_TZSET = @REPLACE_TZSET@ REPLACE_UNLINK = @REPLACE_UNLINK@ REPLACE_UNLINKAT = @REPLACE_UNLINKAT@ REPLACE_UNSETENV = @REPLACE_UNSETENV@ REPLACE_USLEEP = @REPLACE_USLEEP@ REPLACE_UTIMENSAT = @REPLACE_UTIMENSAT@ REPLACE_VASPRINTF = @REPLACE_VASPRINTF@ REPLACE_VDPRINTF = @REPLACE_VDPRINTF@ REPLACE_VFPRINTF = @REPLACE_VFPRINTF@ REPLACE_VPRINTF = @REPLACE_VPRINTF@ REPLACE_VSNPRINTF = @REPLACE_VSNPRINTF@ REPLACE_VSPRINTF = @REPLACE_VSPRINTF@ REPLACE_WCTOMB = @REPLACE_WCTOMB@ REPLACE_WRITE = @REPLACE_WRITE@ REPLACE__EXIT = @REPLACE__EXIT@ SCHED_YIELD_LIB = @SCHED_YIELD_LIB@ SED = @SED@ SET_MAKE = @SET_MAKE@ SHELL = @SHELL@ SIG_ATOMIC_T_SUFFIX = @SIG_ATOMIC_T_SUFFIX@ SIZE_T_SUFFIX = @SIZE_T_SUFFIX@ STDCKDINT_H = @STDCKDINT_H@ STDDEF_H = @STDDEF_H@ STDDEF_NOT_IDEMPOTENT = @STDDEF_NOT_IDEMPOTENT@ STDINT_H = @STDINT_H@ STDNORETURN_H = @STDNORETURN_H@ STRIP = @STRIP@ SYS_TIME_H_DEFINES_STRUCT_TIMESPEC = @SYS_TIME_H_DEFINES_STRUCT_TIMESPEC@ TIME_H_DEFINES_STRUCT_TIMESPEC = @TIME_H_DEFINES_STRUCT_TIMESPEC@ TIME_H_DEFINES_TIME_UTC = @TIME_H_DEFINES_TIME_UTC@ UNDEFINE_STRTOK_R = @UNDEFINE_STRTOK_R@ UNISTD_H_DEFINES_STRUCT_TIMESPEC = @UNISTD_H_DEFINES_STRUCT_TIMESPEC@ UNISTD_H_HAVE_SYS_RANDOM_H = @UNISTD_H_HAVE_SYS_RANDOM_H@ UNISTD_H_HAVE_WINSOCK2_H = @UNISTD_H_HAVE_WINSOCK2_H@ UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS = @UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS@ VERSION = @VERSION@ WCHAR_T_SUFFIX = @WCHAR_T_SUFFIX@ WINDOWS_64_BIT_OFF_T = @WINDOWS_64_BIT_OFF_T@ WINDOWS_64_BIT_ST_SIZE = @WINDOWS_64_BIT_ST_SIZE@ WINDOWS_STAT_INODES = @WINDOWS_STAT_INODES@ WINDOWS_STAT_TIMESPEC = @WINDOWS_STAT_TIMESPEC@ WINT_T_SUFFIX = @WINT_T_SUFFIX@ WORKAROUND_BUG_81653 = @WORKAROUND_BUG_81653@ abs_builddir = @abs_builddir@ abs_srcdir = @abs_srcdir@ abs_top_builddir = @abs_top_builddir@ abs_top_srcdir = @abs_top_srcdir@ ac_ct_AR = @ac_ct_AR@ ac_ct_CC = @ac_ct_CC@ ac_ct_CXX = @ac_ct_CXX@ ac_ct_DUMPBIN = @ac_ct_DUMPBIN@ am__include = @am__include@ am__leading_dot = @am__leading_dot@ am__quote = @am__quote@ am__rm_f_notfound = @am__rm_f_notfound@ am__tar = @am__tar@ am__untar = @am__untar@ am__xargs_n = @am__xargs_n@ bindir = @bindir@ build = @build@ build_alias = @build_alias@ build_cpu = @build_cpu@ build_os = @build_os@ build_vendor = @build_vendor@ builddir = @builddir@ datadir = @datadir@ datarootdir = @datarootdir@ docdir = @docdir@ dvidir = @dvidir@ exec_prefix = @exec_prefix@ gl_LIBOBJDEPS = @gl_LIBOBJDEPS@ gl_LIBOBJS = @gl_LIBOBJS@ gl_LTLIBOBJS = @gl_LTLIBOBJS@ gltests_LIBOBJDEPS = @gltests_LIBOBJDEPS@ gltests_LIBOBJS = @gltests_LIBOBJS@ gltests_LTLIBOBJS = @gltests_LTLIBOBJS@ gltests_WITNESS = @gltests_WITNESS@ host = @host@ host_alias = @host_alias@ host_cpu = @host_cpu@ host_os = @host_os@ host_vendor = @host_vendor@ htmldir = @htmldir@ includedir = @includedir@ infodir = @infodir@ install_sh = @install_sh@ libdir = @libdir@ libexecdir = @libexecdir@ localedir = @localedir@ localstatedir = @localstatedir@ mandir = @mandir@ mkdir_p = @mkdir_p@ oldincludedir = @oldincludedir@ pdfdir = @pdfdir@ prefix = @prefix@ program_transform_name = @program_transform_name@ psdir = @psdir@ runstatedir = @runstatedir@ sbindir = @sbindir@ sharedstatedir = @sharedstatedir@ srcdir = @srcdir@ sysconfdir = @sysconfdir@ target_alias = @target_alias@ top_build_prefix = @top_build_prefix@ top_builddir = @top_builddir@ top_srcdir = @top_srcdir@ AUTOMAKE_OPTIONS = 1.14 gnits subdir-objects SUBDIRS = noinst_HEADERS = noinst_LIBRARIES = noinst_LTLIBRARIES = libgnu.la pkgdata_DATA = EXTRA_DIST = alloca.in.h assert.in.h verify.h asyncsafe-spin.h \ attribute.h basename-lgpl.h clean-temp-private.h cloexec.h \ errno.in.h error.in.h fcntl.in.h fd-hook.h filename.h \ stat-w32.c stat-w32.h getprogname.h intprops-internal.h \ intprops.h limits.in.h malloca.h mntent.in.h msvc-inval.h \ msvc-nothrow.h pathmax.h pthread.in.h sched.in.h sig-handler.h \ signal.in.h _Noreturn.h arg-nonnull.h c++defs.h warn-on-use.h \ stat-w32.c stat-w32.h stat-time.h intprops-internal.h \ stdckdint.in.h stddef.in.h stdint.in.h stdio.in.h stdlib.in.h \ stdnoreturn.in.h strerror-override.h string.in.h sys_stat.in.h \ sys_types.in.h thread-optim.h time.in.h unistd.in.h vma-iter.h \ vma-prot.h windows-initguard.h windows-mutex.h windows-once.h \ windows-initguard.h windows-recmutex.h windows-initguard.h \ windows-rwlock.h windows-spin.h xalloc-oversized.h BUILT_SOURCES = $(am__append_1) $(am__append_3) $(am__append_11) \ $(am__append_14) $(am__append_18) $(LIMITS_H) $(am__append_31) \ $(am__append_36) $(am__append_41) $(am__append_45) \ $(am__append_51) $(am__append_53) $(STDINT_H) $(am__append_55) \ $(am__append_59) $(STDNORETURN_H) $(am__append_63) \ $(am__append_65) sys/types.h $(am__append_68) $(am__append_70) SUFFIXES = MOSTLYCLEANFILES = core *.stackdump $(am__append_2) $(am__append_4) \ $(am__append_12) $(am__append_15) $(am__append_19) limits.h \ limits.h-t $(am__append_32) $(am__append_37) $(am__append_42) \ $(am__append_46) $(am__append_52) $(am__append_54) stdint.h \ stdint.h-t $(am__append_56) $(am__append_60) stdnoreturn.h \ stdnoreturn.h-t $(am__append_64) $(am__append_66) sys/types.h \ sys/types.h-t $(am__append_69) $(am__append_72) MOSTLYCLEANDIRS = $(am__append_67) sys CLEANFILES = DISTCLEANFILES = MAINTAINERCLEANFILES = # No GNU Make output. AM_CPPFLAGS = AM_CFLAGS = libgnu_la_SOURCES = $(am__append_5) $(am__append_6) $(am__append_7) \ $(am__append_8) $(am__append_9) $(am__append_10) \ $(am__append_13) $(am__append_16) $(am__append_17) \ $(am__append_20) $(am__append_21) $(am__append_22) \ $(am__append_23) $(am__append_24) $(am__append_25) \ $(am__append_26) $(am__append_27) $(am__append_28) \ $(am__append_29) glthread/lock.h glthread/lock.c \ $(am__append_30) $(am__append_33) $(am__append_34) \ glthread/once.h glthread/once.c $(am__append_35) \ $(am__append_38) $(am__append_39) $(am__append_40) \ $(am__append_43) $(am__append_44) $(am__append_47) \ $(am__append_48) $(am__append_49) $(am__append_50) \ $(am__append_57) $(am__append_58) $(am__append_61) \ $(am__append_62) glthread/threadlib.c $(am__append_71) \ $(am__append_73) $(am__append_74) $(am__append_75) \ $(am__append_76) $(am__append_77) $(am__append_78) \ $(am__append_79) $(am__append_80) libgnu_la_CFLAGS = $(AM_CFLAGS) $(GL_CFLAG_GNULIB_WARNINGS) libgnu_la_LIBADD = $(gl_LTLIBOBJS) libgnu_la_DEPENDENCIES = $(gl_LTLIBOBJS) EXTRA_libgnu_la_SOURCES = stat-w32.c stat-w32.c libgnu_la_LDFLAGS = $(AM_LDFLAGS) -no-undefined $(LIBPMULTITHREAD) \ $(LIBPTHREAD) $(LIBTHREAD) $(LTLIBINTL) # Use this preprocessor expression to decide whether #include_next works. # Do not rely on a 'configure'-time test for this, since the expression # might appear in an installed header, which is used by some other compiler. HAVE_INCLUDE_NEXT = (__GNUC__ || __clang__ || 60000000 <= __DECC_VER) # In 'sed', replace the pattern space with a "DO NOT EDIT" comment. SED_HEADER_NOEDIT = s,.*,/* DO NOT EDIT! GENERATED AUTOMATICALLY! */, # '$(SED_HEADER_STDOUT) -e "..."' runs 'sed' but first outputs "DO NOT EDIT". SED_HEADER_STDOUT = sed -e 1h -e '1$(SED_HEADER_NOEDIT)' -e 1G # '$(SED_HEADER_TO_AT_t) FILE' copies FILE to $@-t, prepending a leading # "DO_NOT_EDIT". Although this could be done more simply via: # SED_HEADER_TO_AT_t = $(SED_HEADER_STDOUT) > $@-t # the -n and 'w' avoid a fork+exec, at least when GNU Make is used. SED_HEADER_TO_AT_t = $(SED_HEADER_STDOUT) -n -e 'w $@-t' # Use $(gl_V_at) instead of $(AM_V_GEN) or $(AM_V_at) on a line that # is its recipe's first line if and only if @NMD@ lines are absent. gl_V_at = $(AM_V_GEN) # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. _NORETURN_H = $(srcdir)/_Noreturn.h # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. @gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54_TRUE@ARG_NONNULL_H = $(srcdir)/arg-nonnull.h # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. @gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c_TRUE@CXXDEFS_H = $(srcdir)/c++defs.h # Because this Makefile snippet defines a variable used by other # gnulib Makefile snippets, it must be present in all makefiles that # need it. This is ensured by the applicability 'all' defined above. @gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5_TRUE@WARN_ON_USE_H = $(srcdir)/warn-on-use.h all: $(BUILT_SOURCES) $(MAKE) $(AM_MAKEFLAGS) all-recursive .SUFFIXES: .SUFFIXES: .c .lo .o .obj $(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps) @for dep in $?; do \ case '$(am__configure_deps)' in \ *$$dep*) \ ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \ && { if test -f $@; then exit 0; else break; fi; }; \ exit 1;; \ esac; \ done; \ echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnits gnulib-lib/Makefile'; \ $(am__cd) $(top_srcdir) && \ $(AUTOMAKE) --gnits gnulib-lib/Makefile Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status @case '$?' in \ *config.status*) \ cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \ *) \ echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \ cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \ esac; $(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES) cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh $(top_srcdir)/configure: $(am__configure_deps) cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh $(ACLOCAL_M4): $(am__aclocal_m4_deps) cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh $(am__aclocal_m4_deps): clean-noinstLIBRARIES: -$(am__rm_f) $(noinst_LIBRARIES) clean-noinstLTLIBRARIES: -$(am__rm_f) $(noinst_LTLIBRARIES) @list='$(noinst_LTLIBRARIES)'; \ locs=`for p in $$list; do echo $$p; done | \ sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \ sort -u`; \ echo rm -f $${locs}; \ $(am__rm_f) $${locs} glthread/$(am__dirstamp): @$(MKDIR_P) glthread @: >>glthread/$(am__dirstamp) glthread/$(DEPDIR)/$(am__dirstamp): @$(MKDIR_P) glthread/$(DEPDIR) @: >>glthread/$(DEPDIR)/$(am__dirstamp) glthread/libgnu_la-lock.lo: glthread/$(am__dirstamp) \ glthread/$(DEPDIR)/$(am__dirstamp) glthread/libgnu_la-once.lo: glthread/$(am__dirstamp) \ glthread/$(DEPDIR)/$(am__dirstamp) glthread/libgnu_la-threadlib.lo: glthread/$(am__dirstamp) \ glthread/$(DEPDIR)/$(am__dirstamp) libgnu.la: $(libgnu_la_OBJECTS) $(libgnu_la_DEPENDENCIES) $(EXTRA_libgnu_la_DEPENDENCIES) $(AM_V_CCLD)$(libgnu_la_LINK) $(libgnu_la_OBJECTS) $(libgnu_la_LIBADD) $(LIBS) mostlyclean-compile: -rm -f *.$(OBJEXT) -rm -f glthread/*.$(OBJEXT) -rm -f glthread/*.lo distclean-compile: -rm -f *.tab.c @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-asyncsafe-spin.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-basename-lgpl.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-clean-temp-simple.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-cloexec.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-close.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-dup2.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-error.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-fatal-signal.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-fcntl.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-fd-hook.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-fstat.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-getdtablesize.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-getpagesize.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-getprogname.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-gl_linkedhash_list.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-gl_list.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-hasmntopt.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-malloca.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-msvc-inval.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-msvc-nothrow.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-open.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-pthread-once.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-raise.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-rmdir.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-sig-handler.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-sigaction.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-sigprocmask.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-stat-time.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-stat-w32.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-stat.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-stdio-read.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-stdio-write.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-strerror-override.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-strerror.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-unistd.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-vma-iter.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-vma-prot.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-windows-mutex.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-windows-once.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-windows-recmutex.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-windows-rwlock.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-windows-spin.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/libgnu_la-xsize.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@glthread/$(DEPDIR)/libgnu_la-lock.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@glthread/$(DEPDIR)/libgnu_la-once.Plo@am__quote@ # am--include-marker @AMDEP_TRUE@@am__include@ @am__quote@glthread/$(DEPDIR)/libgnu_la-threadlib.Plo@am__quote@ # am--include-marker $(am__depfiles_remade): @$(MKDIR_P) $(@D) @: >>$@ am--depfiles: $(am__depfiles_remade) .c.o: @am__fastdepCC_TRUE@ $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.o$$||'`;\ @am__fastdepCC_TRUE@ $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ $< &&\ @am__fastdepCC_TRUE@ $(am__mv) $$depbase.Tpo $$depbase.Po @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $< .c.obj: @am__fastdepCC_TRUE@ $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.obj$$||'`;\ @am__fastdepCC_TRUE@ $(COMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ `$(CYGPATH_W) '$<'` &&\ @am__fastdepCC_TRUE@ $(am__mv) $$depbase.Tpo $$depbase.Po @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'` .c.lo: @am__fastdepCC_TRUE@ $(AM_V_CC)depbase=`echo $@ | sed 's|[^/]*$$|$(DEPDIR)/&|;s|\.lo$$||'`;\ @am__fastdepCC_TRUE@ $(LTCOMPILE) -MT $@ -MD -MP -MF $$depbase.Tpo -c -o $@ $< &&\ @am__fastdepCC_TRUE@ $(am__mv) $$depbase.Tpo $$depbase.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $< libgnu_la-asyncsafe-spin.lo: asyncsafe-spin.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-asyncsafe-spin.lo -MD -MP -MF $(DEPDIR)/libgnu_la-asyncsafe-spin.Tpo -c -o libgnu_la-asyncsafe-spin.lo `test -f 'asyncsafe-spin.c' || echo '$(srcdir)/'`asyncsafe-spin.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-asyncsafe-spin.Tpo $(DEPDIR)/libgnu_la-asyncsafe-spin.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='asyncsafe-spin.c' object='libgnu_la-asyncsafe-spin.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-asyncsafe-spin.lo `test -f 'asyncsafe-spin.c' || echo '$(srcdir)/'`asyncsafe-spin.c libgnu_la-basename-lgpl.lo: basename-lgpl.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-basename-lgpl.lo -MD -MP -MF $(DEPDIR)/libgnu_la-basename-lgpl.Tpo -c -o libgnu_la-basename-lgpl.lo `test -f 'basename-lgpl.c' || echo '$(srcdir)/'`basename-lgpl.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-basename-lgpl.Tpo $(DEPDIR)/libgnu_la-basename-lgpl.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='basename-lgpl.c' object='libgnu_la-basename-lgpl.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-basename-lgpl.lo `test -f 'basename-lgpl.c' || echo '$(srcdir)/'`basename-lgpl.c libgnu_la-clean-temp-simple.lo: clean-temp-simple.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-clean-temp-simple.lo -MD -MP -MF $(DEPDIR)/libgnu_la-clean-temp-simple.Tpo -c -o libgnu_la-clean-temp-simple.lo `test -f 'clean-temp-simple.c' || echo '$(srcdir)/'`clean-temp-simple.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-clean-temp-simple.Tpo $(DEPDIR)/libgnu_la-clean-temp-simple.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='clean-temp-simple.c' object='libgnu_la-clean-temp-simple.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-clean-temp-simple.lo `test -f 'clean-temp-simple.c' || echo '$(srcdir)/'`clean-temp-simple.c libgnu_la-cloexec.lo: cloexec.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-cloexec.lo -MD -MP -MF $(DEPDIR)/libgnu_la-cloexec.Tpo -c -o libgnu_la-cloexec.lo `test -f 'cloexec.c' || echo '$(srcdir)/'`cloexec.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-cloexec.Tpo $(DEPDIR)/libgnu_la-cloexec.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='cloexec.c' object='libgnu_la-cloexec.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-cloexec.lo `test -f 'cloexec.c' || echo '$(srcdir)/'`cloexec.c libgnu_la-close.lo: close.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-close.lo -MD -MP -MF $(DEPDIR)/libgnu_la-close.Tpo -c -o libgnu_la-close.lo `test -f 'close.c' || echo '$(srcdir)/'`close.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-close.Tpo $(DEPDIR)/libgnu_la-close.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='close.c' object='libgnu_la-close.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-close.lo `test -f 'close.c' || echo '$(srcdir)/'`close.c libgnu_la-dup2.lo: dup2.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-dup2.lo -MD -MP -MF $(DEPDIR)/libgnu_la-dup2.Tpo -c -o libgnu_la-dup2.lo `test -f 'dup2.c' || echo '$(srcdir)/'`dup2.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-dup2.Tpo $(DEPDIR)/libgnu_la-dup2.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='dup2.c' object='libgnu_la-dup2.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-dup2.lo `test -f 'dup2.c' || echo '$(srcdir)/'`dup2.c libgnu_la-error.lo: error.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-error.lo -MD -MP -MF $(DEPDIR)/libgnu_la-error.Tpo -c -o libgnu_la-error.lo `test -f 'error.c' || echo '$(srcdir)/'`error.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-error.Tpo $(DEPDIR)/libgnu_la-error.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='error.c' object='libgnu_la-error.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-error.lo `test -f 'error.c' || echo '$(srcdir)/'`error.c libgnu_la-fatal-signal.lo: fatal-signal.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-fatal-signal.lo -MD -MP -MF $(DEPDIR)/libgnu_la-fatal-signal.Tpo -c -o libgnu_la-fatal-signal.lo `test -f 'fatal-signal.c' || echo '$(srcdir)/'`fatal-signal.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-fatal-signal.Tpo $(DEPDIR)/libgnu_la-fatal-signal.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='fatal-signal.c' object='libgnu_la-fatal-signal.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-fatal-signal.lo `test -f 'fatal-signal.c' || echo '$(srcdir)/'`fatal-signal.c libgnu_la-fcntl.lo: fcntl.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-fcntl.lo -MD -MP -MF $(DEPDIR)/libgnu_la-fcntl.Tpo -c -o libgnu_la-fcntl.lo `test -f 'fcntl.c' || echo '$(srcdir)/'`fcntl.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-fcntl.Tpo $(DEPDIR)/libgnu_la-fcntl.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='fcntl.c' object='libgnu_la-fcntl.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-fcntl.lo `test -f 'fcntl.c' || echo '$(srcdir)/'`fcntl.c libgnu_la-fd-hook.lo: fd-hook.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-fd-hook.lo -MD -MP -MF $(DEPDIR)/libgnu_la-fd-hook.Tpo -c -o libgnu_la-fd-hook.lo `test -f 'fd-hook.c' || echo '$(srcdir)/'`fd-hook.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-fd-hook.Tpo $(DEPDIR)/libgnu_la-fd-hook.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='fd-hook.c' object='libgnu_la-fd-hook.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-fd-hook.lo `test -f 'fd-hook.c' || echo '$(srcdir)/'`fd-hook.c libgnu_la-fstat.lo: fstat.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-fstat.lo -MD -MP -MF $(DEPDIR)/libgnu_la-fstat.Tpo -c -o libgnu_la-fstat.lo `test -f 'fstat.c' || echo '$(srcdir)/'`fstat.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-fstat.Tpo $(DEPDIR)/libgnu_la-fstat.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='fstat.c' object='libgnu_la-fstat.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-fstat.lo `test -f 'fstat.c' || echo '$(srcdir)/'`fstat.c libgnu_la-getdtablesize.lo: getdtablesize.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-getdtablesize.lo -MD -MP -MF $(DEPDIR)/libgnu_la-getdtablesize.Tpo -c -o libgnu_la-getdtablesize.lo `test -f 'getdtablesize.c' || echo '$(srcdir)/'`getdtablesize.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-getdtablesize.Tpo $(DEPDIR)/libgnu_la-getdtablesize.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='getdtablesize.c' object='libgnu_la-getdtablesize.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-getdtablesize.lo `test -f 'getdtablesize.c' || echo '$(srcdir)/'`getdtablesize.c libgnu_la-getpagesize.lo: getpagesize.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-getpagesize.lo -MD -MP -MF $(DEPDIR)/libgnu_la-getpagesize.Tpo -c -o libgnu_la-getpagesize.lo `test -f 'getpagesize.c' || echo '$(srcdir)/'`getpagesize.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-getpagesize.Tpo $(DEPDIR)/libgnu_la-getpagesize.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='getpagesize.c' object='libgnu_la-getpagesize.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-getpagesize.lo `test -f 'getpagesize.c' || echo '$(srcdir)/'`getpagesize.c libgnu_la-getprogname.lo: getprogname.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-getprogname.lo -MD -MP -MF $(DEPDIR)/libgnu_la-getprogname.Tpo -c -o libgnu_la-getprogname.lo `test -f 'getprogname.c' || echo '$(srcdir)/'`getprogname.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-getprogname.Tpo $(DEPDIR)/libgnu_la-getprogname.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='getprogname.c' object='libgnu_la-getprogname.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-getprogname.lo `test -f 'getprogname.c' || echo '$(srcdir)/'`getprogname.c libgnu_la-hasmntopt.lo: hasmntopt.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-hasmntopt.lo -MD -MP -MF $(DEPDIR)/libgnu_la-hasmntopt.Tpo -c -o libgnu_la-hasmntopt.lo `test -f 'hasmntopt.c' || echo '$(srcdir)/'`hasmntopt.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-hasmntopt.Tpo $(DEPDIR)/libgnu_la-hasmntopt.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='hasmntopt.c' object='libgnu_la-hasmntopt.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-hasmntopt.lo `test -f 'hasmntopt.c' || echo '$(srcdir)/'`hasmntopt.c libgnu_la-gl_linkedhash_list.lo: gl_linkedhash_list.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-gl_linkedhash_list.lo -MD -MP -MF $(DEPDIR)/libgnu_la-gl_linkedhash_list.Tpo -c -o libgnu_la-gl_linkedhash_list.lo `test -f 'gl_linkedhash_list.c' || echo '$(srcdir)/'`gl_linkedhash_list.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-gl_linkedhash_list.Tpo $(DEPDIR)/libgnu_la-gl_linkedhash_list.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='gl_linkedhash_list.c' object='libgnu_la-gl_linkedhash_list.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-gl_linkedhash_list.lo `test -f 'gl_linkedhash_list.c' || echo '$(srcdir)/'`gl_linkedhash_list.c libgnu_la-gl_list.lo: gl_list.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-gl_list.lo -MD -MP -MF $(DEPDIR)/libgnu_la-gl_list.Tpo -c -o libgnu_la-gl_list.lo `test -f 'gl_list.c' || echo '$(srcdir)/'`gl_list.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-gl_list.Tpo $(DEPDIR)/libgnu_la-gl_list.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='gl_list.c' object='libgnu_la-gl_list.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-gl_list.lo `test -f 'gl_list.c' || echo '$(srcdir)/'`gl_list.c glthread/libgnu_la-lock.lo: glthread/lock.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT glthread/libgnu_la-lock.lo -MD -MP -MF glthread/$(DEPDIR)/libgnu_la-lock.Tpo -c -o glthread/libgnu_la-lock.lo `test -f 'glthread/lock.c' || echo '$(srcdir)/'`glthread/lock.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) glthread/$(DEPDIR)/libgnu_la-lock.Tpo glthread/$(DEPDIR)/libgnu_la-lock.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='glthread/lock.c' object='glthread/libgnu_la-lock.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o glthread/libgnu_la-lock.lo `test -f 'glthread/lock.c' || echo '$(srcdir)/'`glthread/lock.c libgnu_la-malloca.lo: malloca.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-malloca.lo -MD -MP -MF $(DEPDIR)/libgnu_la-malloca.Tpo -c -o libgnu_la-malloca.lo `test -f 'malloca.c' || echo '$(srcdir)/'`malloca.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-malloca.Tpo $(DEPDIR)/libgnu_la-malloca.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='malloca.c' object='libgnu_la-malloca.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-malloca.lo `test -f 'malloca.c' || echo '$(srcdir)/'`malloca.c libgnu_la-msvc-inval.lo: msvc-inval.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-msvc-inval.lo -MD -MP -MF $(DEPDIR)/libgnu_la-msvc-inval.Tpo -c -o libgnu_la-msvc-inval.lo `test -f 'msvc-inval.c' || echo '$(srcdir)/'`msvc-inval.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-msvc-inval.Tpo $(DEPDIR)/libgnu_la-msvc-inval.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='msvc-inval.c' object='libgnu_la-msvc-inval.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-msvc-inval.lo `test -f 'msvc-inval.c' || echo '$(srcdir)/'`msvc-inval.c libgnu_la-msvc-nothrow.lo: msvc-nothrow.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-msvc-nothrow.lo -MD -MP -MF $(DEPDIR)/libgnu_la-msvc-nothrow.Tpo -c -o libgnu_la-msvc-nothrow.lo `test -f 'msvc-nothrow.c' || echo '$(srcdir)/'`msvc-nothrow.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-msvc-nothrow.Tpo $(DEPDIR)/libgnu_la-msvc-nothrow.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='msvc-nothrow.c' object='libgnu_la-msvc-nothrow.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-msvc-nothrow.lo `test -f 'msvc-nothrow.c' || echo '$(srcdir)/'`msvc-nothrow.c glthread/libgnu_la-once.lo: glthread/once.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT glthread/libgnu_la-once.lo -MD -MP -MF glthread/$(DEPDIR)/libgnu_la-once.Tpo -c -o glthread/libgnu_la-once.lo `test -f 'glthread/once.c' || echo '$(srcdir)/'`glthread/once.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) glthread/$(DEPDIR)/libgnu_la-once.Tpo glthread/$(DEPDIR)/libgnu_la-once.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='glthread/once.c' object='glthread/libgnu_la-once.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o glthread/libgnu_la-once.lo `test -f 'glthread/once.c' || echo '$(srcdir)/'`glthread/once.c libgnu_la-open.lo: open.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-open.lo -MD -MP -MF $(DEPDIR)/libgnu_la-open.Tpo -c -o libgnu_la-open.lo `test -f 'open.c' || echo '$(srcdir)/'`open.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-open.Tpo $(DEPDIR)/libgnu_la-open.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='open.c' object='libgnu_la-open.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-open.lo `test -f 'open.c' || echo '$(srcdir)/'`open.c libgnu_la-pthread-once.lo: pthread-once.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-pthread-once.lo -MD -MP -MF $(DEPDIR)/libgnu_la-pthread-once.Tpo -c -o libgnu_la-pthread-once.lo `test -f 'pthread-once.c' || echo '$(srcdir)/'`pthread-once.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-pthread-once.Tpo $(DEPDIR)/libgnu_la-pthread-once.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='pthread-once.c' object='libgnu_la-pthread-once.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-pthread-once.lo `test -f 'pthread-once.c' || echo '$(srcdir)/'`pthread-once.c libgnu_la-raise.lo: raise.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-raise.lo -MD -MP -MF $(DEPDIR)/libgnu_la-raise.Tpo -c -o libgnu_la-raise.lo `test -f 'raise.c' || echo '$(srcdir)/'`raise.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-raise.Tpo $(DEPDIR)/libgnu_la-raise.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='raise.c' object='libgnu_la-raise.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-raise.lo `test -f 'raise.c' || echo '$(srcdir)/'`raise.c libgnu_la-rmdir.lo: rmdir.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-rmdir.lo -MD -MP -MF $(DEPDIR)/libgnu_la-rmdir.Tpo -c -o libgnu_la-rmdir.lo `test -f 'rmdir.c' || echo '$(srcdir)/'`rmdir.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-rmdir.Tpo $(DEPDIR)/libgnu_la-rmdir.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='rmdir.c' object='libgnu_la-rmdir.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-rmdir.lo `test -f 'rmdir.c' || echo '$(srcdir)/'`rmdir.c libgnu_la-sigaction.lo: sigaction.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-sigaction.lo -MD -MP -MF $(DEPDIR)/libgnu_la-sigaction.Tpo -c -o libgnu_la-sigaction.lo `test -f 'sigaction.c' || echo '$(srcdir)/'`sigaction.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-sigaction.Tpo $(DEPDIR)/libgnu_la-sigaction.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='sigaction.c' object='libgnu_la-sigaction.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-sigaction.lo `test -f 'sigaction.c' || echo '$(srcdir)/'`sigaction.c libgnu_la-sig-handler.lo: sig-handler.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-sig-handler.lo -MD -MP -MF $(DEPDIR)/libgnu_la-sig-handler.Tpo -c -o libgnu_la-sig-handler.lo `test -f 'sig-handler.c' || echo '$(srcdir)/'`sig-handler.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-sig-handler.Tpo $(DEPDIR)/libgnu_la-sig-handler.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='sig-handler.c' object='libgnu_la-sig-handler.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-sig-handler.lo `test -f 'sig-handler.c' || echo '$(srcdir)/'`sig-handler.c libgnu_la-sigprocmask.lo: sigprocmask.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-sigprocmask.lo -MD -MP -MF $(DEPDIR)/libgnu_la-sigprocmask.Tpo -c -o libgnu_la-sigprocmask.lo `test -f 'sigprocmask.c' || echo '$(srcdir)/'`sigprocmask.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-sigprocmask.Tpo $(DEPDIR)/libgnu_la-sigprocmask.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='sigprocmask.c' object='libgnu_la-sigprocmask.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-sigprocmask.lo `test -f 'sigprocmask.c' || echo '$(srcdir)/'`sigprocmask.c libgnu_la-stat.lo: stat.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-stat.lo -MD -MP -MF $(DEPDIR)/libgnu_la-stat.Tpo -c -o libgnu_la-stat.lo `test -f 'stat.c' || echo '$(srcdir)/'`stat.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-stat.Tpo $(DEPDIR)/libgnu_la-stat.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='stat.c' object='libgnu_la-stat.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-stat.lo `test -f 'stat.c' || echo '$(srcdir)/'`stat.c libgnu_la-stat-time.lo: stat-time.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-stat-time.lo -MD -MP -MF $(DEPDIR)/libgnu_la-stat-time.Tpo -c -o libgnu_la-stat-time.lo `test -f 'stat-time.c' || echo '$(srcdir)/'`stat-time.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-stat-time.Tpo $(DEPDIR)/libgnu_la-stat-time.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='stat-time.c' object='libgnu_la-stat-time.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-stat-time.lo `test -f 'stat-time.c' || echo '$(srcdir)/'`stat-time.c libgnu_la-stdio-read.lo: stdio-read.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-stdio-read.lo -MD -MP -MF $(DEPDIR)/libgnu_la-stdio-read.Tpo -c -o libgnu_la-stdio-read.lo `test -f 'stdio-read.c' || echo '$(srcdir)/'`stdio-read.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-stdio-read.Tpo $(DEPDIR)/libgnu_la-stdio-read.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='stdio-read.c' object='libgnu_la-stdio-read.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-stdio-read.lo `test -f 'stdio-read.c' || echo '$(srcdir)/'`stdio-read.c libgnu_la-stdio-write.lo: stdio-write.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-stdio-write.lo -MD -MP -MF $(DEPDIR)/libgnu_la-stdio-write.Tpo -c -o libgnu_la-stdio-write.lo `test -f 'stdio-write.c' || echo '$(srcdir)/'`stdio-write.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-stdio-write.Tpo $(DEPDIR)/libgnu_la-stdio-write.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='stdio-write.c' object='libgnu_la-stdio-write.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-stdio-write.lo `test -f 'stdio-write.c' || echo '$(srcdir)/'`stdio-write.c libgnu_la-strerror.lo: strerror.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-strerror.lo -MD -MP -MF $(DEPDIR)/libgnu_la-strerror.Tpo -c -o libgnu_la-strerror.lo `test -f 'strerror.c' || echo '$(srcdir)/'`strerror.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-strerror.Tpo $(DEPDIR)/libgnu_la-strerror.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='strerror.c' object='libgnu_la-strerror.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-strerror.lo `test -f 'strerror.c' || echo '$(srcdir)/'`strerror.c libgnu_la-strerror-override.lo: strerror-override.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-strerror-override.lo -MD -MP -MF $(DEPDIR)/libgnu_la-strerror-override.Tpo -c -o libgnu_la-strerror-override.lo `test -f 'strerror-override.c' || echo '$(srcdir)/'`strerror-override.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-strerror-override.Tpo $(DEPDIR)/libgnu_la-strerror-override.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='strerror-override.c' object='libgnu_la-strerror-override.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-strerror-override.lo `test -f 'strerror-override.c' || echo '$(srcdir)/'`strerror-override.c glthread/libgnu_la-threadlib.lo: glthread/threadlib.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT glthread/libgnu_la-threadlib.lo -MD -MP -MF glthread/$(DEPDIR)/libgnu_la-threadlib.Tpo -c -o glthread/libgnu_la-threadlib.lo `test -f 'glthread/threadlib.c' || echo '$(srcdir)/'`glthread/threadlib.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) glthread/$(DEPDIR)/libgnu_la-threadlib.Tpo glthread/$(DEPDIR)/libgnu_la-threadlib.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='glthread/threadlib.c' object='glthread/libgnu_la-threadlib.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o glthread/libgnu_la-threadlib.lo `test -f 'glthread/threadlib.c' || echo '$(srcdir)/'`glthread/threadlib.c libgnu_la-unistd.lo: unistd.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-unistd.lo -MD -MP -MF $(DEPDIR)/libgnu_la-unistd.Tpo -c -o libgnu_la-unistd.lo `test -f 'unistd.c' || echo '$(srcdir)/'`unistd.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-unistd.Tpo $(DEPDIR)/libgnu_la-unistd.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='unistd.c' object='libgnu_la-unistd.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-unistd.lo `test -f 'unistd.c' || echo '$(srcdir)/'`unistd.c libgnu_la-vma-iter.lo: vma-iter.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-vma-iter.lo -MD -MP -MF $(DEPDIR)/libgnu_la-vma-iter.Tpo -c -o libgnu_la-vma-iter.lo `test -f 'vma-iter.c' || echo '$(srcdir)/'`vma-iter.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-vma-iter.Tpo $(DEPDIR)/libgnu_la-vma-iter.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='vma-iter.c' object='libgnu_la-vma-iter.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-vma-iter.lo `test -f 'vma-iter.c' || echo '$(srcdir)/'`vma-iter.c libgnu_la-vma-prot.lo: vma-prot.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-vma-prot.lo -MD -MP -MF $(DEPDIR)/libgnu_la-vma-prot.Tpo -c -o libgnu_la-vma-prot.lo `test -f 'vma-prot.c' || echo '$(srcdir)/'`vma-prot.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-vma-prot.Tpo $(DEPDIR)/libgnu_la-vma-prot.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='vma-prot.c' object='libgnu_la-vma-prot.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-vma-prot.lo `test -f 'vma-prot.c' || echo '$(srcdir)/'`vma-prot.c libgnu_la-windows-mutex.lo: windows-mutex.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-windows-mutex.lo -MD -MP -MF $(DEPDIR)/libgnu_la-windows-mutex.Tpo -c -o libgnu_la-windows-mutex.lo `test -f 'windows-mutex.c' || echo '$(srcdir)/'`windows-mutex.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-windows-mutex.Tpo $(DEPDIR)/libgnu_la-windows-mutex.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='windows-mutex.c' object='libgnu_la-windows-mutex.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-windows-mutex.lo `test -f 'windows-mutex.c' || echo '$(srcdir)/'`windows-mutex.c libgnu_la-windows-once.lo: windows-once.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-windows-once.lo -MD -MP -MF $(DEPDIR)/libgnu_la-windows-once.Tpo -c -o libgnu_la-windows-once.lo `test -f 'windows-once.c' || echo '$(srcdir)/'`windows-once.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-windows-once.Tpo $(DEPDIR)/libgnu_la-windows-once.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='windows-once.c' object='libgnu_la-windows-once.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-windows-once.lo `test -f 'windows-once.c' || echo '$(srcdir)/'`windows-once.c libgnu_la-windows-recmutex.lo: windows-recmutex.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-windows-recmutex.lo -MD -MP -MF $(DEPDIR)/libgnu_la-windows-recmutex.Tpo -c -o libgnu_la-windows-recmutex.lo `test -f 'windows-recmutex.c' || echo '$(srcdir)/'`windows-recmutex.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-windows-recmutex.Tpo $(DEPDIR)/libgnu_la-windows-recmutex.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='windows-recmutex.c' object='libgnu_la-windows-recmutex.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-windows-recmutex.lo `test -f 'windows-recmutex.c' || echo '$(srcdir)/'`windows-recmutex.c libgnu_la-windows-rwlock.lo: windows-rwlock.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-windows-rwlock.lo -MD -MP -MF $(DEPDIR)/libgnu_la-windows-rwlock.Tpo -c -o libgnu_la-windows-rwlock.lo `test -f 'windows-rwlock.c' || echo '$(srcdir)/'`windows-rwlock.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-windows-rwlock.Tpo $(DEPDIR)/libgnu_la-windows-rwlock.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='windows-rwlock.c' object='libgnu_la-windows-rwlock.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-windows-rwlock.lo `test -f 'windows-rwlock.c' || echo '$(srcdir)/'`windows-rwlock.c libgnu_la-windows-spin.lo: windows-spin.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-windows-spin.lo -MD -MP -MF $(DEPDIR)/libgnu_la-windows-spin.Tpo -c -o libgnu_la-windows-spin.lo `test -f 'windows-spin.c' || echo '$(srcdir)/'`windows-spin.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-windows-spin.Tpo $(DEPDIR)/libgnu_la-windows-spin.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='windows-spin.c' object='libgnu_la-windows-spin.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-windows-spin.lo `test -f 'windows-spin.c' || echo '$(srcdir)/'`windows-spin.c libgnu_la-xsize.lo: xsize.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-xsize.lo -MD -MP -MF $(DEPDIR)/libgnu_la-xsize.Tpo -c -o libgnu_la-xsize.lo `test -f 'xsize.c' || echo '$(srcdir)/'`xsize.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-xsize.Tpo $(DEPDIR)/libgnu_la-xsize.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='xsize.c' object='libgnu_la-xsize.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-xsize.lo `test -f 'xsize.c' || echo '$(srcdir)/'`xsize.c libgnu_la-stat-w32.lo: stat-w32.c @am__fastdepCC_TRUE@ $(AM_V_CC)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -MT libgnu_la-stat-w32.lo -MD -MP -MF $(DEPDIR)/libgnu_la-stat-w32.Tpo -c -o libgnu_la-stat-w32.lo `test -f 'stat-w32.c' || echo '$(srcdir)/'`stat-w32.c @am__fastdepCC_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/libgnu_la-stat-w32.Tpo $(DEPDIR)/libgnu_la-stat-w32.Plo @AMDEP_TRUE@@am__fastdepCC_FALSE@ $(AM_V_CC)source='stat-w32.c' object='libgnu_la-stat-w32.lo' libtool=yes @AMDEPBACKSLASH@ @AMDEP_TRUE@@am__fastdepCC_FALSE@ DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@ @am__fastdepCC_FALSE@ $(AM_V_CC@am__nodep@)$(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) $(libgnu_la_CFLAGS) $(CFLAGS) -c -o libgnu_la-stat-w32.lo `test -f 'stat-w32.c' || echo '$(srcdir)/'`stat-w32.c mostlyclean-libtool: -rm -f *.lo clean-libtool: -rm -rf .libs _libs -rm -rf glthread/.libs glthread/_libs install-pkgdataDATA: $(pkgdata_DATA) @$(NORMAL_INSTALL) @list='$(pkgdata_DATA)'; test -n "$(pkgdatadir)" || list=; \ if test -n "$$list"; then \ echo " $(MKDIR_P) '$(DESTDIR)$(pkgdatadir)'"; \ $(MKDIR_P) "$(DESTDIR)$(pkgdatadir)" || exit 1; \ fi; \ for p in $$list; do \ if test -f "$$p"; then d=; else d="$(srcdir)/"; fi; \ echo "$$d$$p"; \ done | $(am__base_list) | \ while read files; do \ echo " $(INSTALL_DATA) $$files '$(DESTDIR)$(pkgdatadir)'"; \ $(INSTALL_DATA) $$files "$(DESTDIR)$(pkgdatadir)" || exit $$?; \ done uninstall-pkgdataDATA: @$(NORMAL_UNINSTALL) @list='$(pkgdata_DATA)'; test -n "$(pkgdatadir)" || list=; \ files=`for p in $$list; do echo $$p; done | sed -e 's|^.*/||'`; \ dir='$(DESTDIR)$(pkgdatadir)'; $(am__uninstall_files_from_dir) # This directory's subdirectories are mostly independent; you can cd # into them and run 'make' without going through this Makefile. # To change the values of 'make' variables: instead of editing Makefiles, # (1) if the variable is set in 'config.status', edit 'config.status' # (which will cause the Makefiles to be regenerated when you run 'make'); # (2) otherwise, pass the desired values on the 'make' command line. $(am__recursive_targets): @fail=; \ if $(am__make_keepgoing); then \ failcom='fail=yes'; \ else \ failcom='exit 1'; \ fi; \ dot_seen=no; \ target=`echo $@ | sed s/-recursive//`; \ case "$@" in \ distclean-* | maintainer-clean-*) list='$(DIST_SUBDIRS)' ;; \ *) list='$(SUBDIRS)' ;; \ esac; \ for subdir in $$list; do \ echo "Making $$target in $$subdir"; \ if test "$$subdir" = "."; then \ dot_seen=yes; \ local_target="$$target-am"; \ else \ local_target="$$target"; \ fi; \ ($(am__cd) $$subdir && $(MAKE) $(AM_MAKEFLAGS) $$local_target) \ || eval $$failcom; \ done; \ if test "$$dot_seen" = "no"; then \ $(MAKE) $(AM_MAKEFLAGS) "$$target-am" || exit 1; \ fi; test -z "$$fail" ID: $(am__tagged_files) $(am__define_uniq_tagged_files); mkid -fID $$unique tags: tags-recursive TAGS: tags tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) set x; \ here=`pwd`; \ if ($(ETAGS) --etags-include --version) >/dev/null 2>&1; then \ include_option=--etags-include; \ empty_fix=.; \ else \ include_option=--include; \ empty_fix=; \ fi; \ list='$(SUBDIRS)'; for subdir in $$list; do \ if test "$$subdir" = .; then :; else \ test ! -f $$subdir/TAGS || \ set "$$@" "$$include_option=$$here/$$subdir/TAGS"; \ fi; \ done; \ $(am__define_uniq_tagged_files); \ shift; \ if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \ test -n "$$unique" || unique=$$empty_fix; \ if test $$# -gt 0; then \ $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ "$$@" $$unique; \ else \ $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \ $$unique; \ fi; \ fi ctags: ctags-recursive CTAGS: ctags ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files) $(am__define_uniq_tagged_files); \ test -z "$(CTAGS_ARGS)$$unique" \ || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \ $$unique GTAGS: here=`$(am__cd) $(top_builddir) && pwd` \ && $(am__cd) $(top_srcdir) \ && gtags -i $(GTAGS_ARGS) "$$here" cscopelist: cscopelist-recursive cscopelist-am: $(am__tagged_files) list='$(am__tagged_files)'; \ case "$(srcdir)" in \ [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \ *) sdir=$(subdir)/$(srcdir) ;; \ esac; \ for i in $$list; do \ if test -f "$$i"; then \ echo "$(subdir)/$$i"; \ else \ echo "$$sdir/$$i"; \ fi; \ done >> $(top_builddir)/cscope.files distclean-tags: -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags distdir: $(BUILT_SOURCES) $(MAKE) $(AM_MAKEFLAGS) distdir-am distdir-am: $(DISTFILES) @srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \ list='$(DISTFILES)'; \ dist_files=`for file in $$list; do echo $$file; done | \ sed -e "s|^$$srcdirstrip/||;t" \ -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \ case $$dist_files in \ */*) $(MKDIR_P) `echo "$$dist_files" | \ sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \ sort -u` ;; \ esac; \ for file in $$dist_files; do \ if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \ if test -d $$d/$$file; then \ dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \ if test -d "$(distdir)/$$file"; then \ find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ fi; \ if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \ cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \ find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \ fi; \ cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \ else \ test -f "$(distdir)/$$file" \ || cp -p $$d/$$file "$(distdir)/$$file" \ || exit 1; \ fi; \ done @list='$(DIST_SUBDIRS)'; for subdir in $$list; do \ if test "$$subdir" = .; then :; else \ $(am__make_dryrun) \ || test -d "$(distdir)/$$subdir" \ || $(MKDIR_P) "$(distdir)/$$subdir" \ || exit 1; \ dir1=$$subdir; dir2="$(distdir)/$$subdir"; \ $(am__relativize); \ new_distdir=$$reldir; \ dir1=$$subdir; dir2="$(top_distdir)"; \ $(am__relativize); \ new_top_distdir=$$reldir; \ echo " (cd $$subdir && $(MAKE) $(AM_MAKEFLAGS) top_distdir="$$new_top_distdir" distdir="$$new_distdir" \\"; \ echo " am__remove_distdir=: am__skip_length_check=: am__skip_mode_fix=: distdir)"; \ ($(am__cd) $$subdir && \ $(MAKE) $(AM_MAKEFLAGS) \ top_distdir="$$new_top_distdir" \ distdir="$$new_distdir" \ am__remove_distdir=: \ am__skip_length_check=: \ am__skip_mode_fix=: \ distdir) \ || exit 1; \ fi; \ done check-am: all-am check: $(BUILT_SOURCES) $(MAKE) $(AM_MAKEFLAGS) check-recursive all-am: Makefile $(LIBRARIES) $(LTLIBRARIES) $(DATA) $(HEADERS) installdirs: installdirs-recursive installdirs-am: for dir in "$(DESTDIR)$(pkgdatadir)"; do \ test -z "$$dir" || $(MKDIR_P) "$$dir"; \ done install: $(BUILT_SOURCES) $(MAKE) $(AM_MAKEFLAGS) install-recursive install-exec: $(BUILT_SOURCES) $(MAKE) $(AM_MAKEFLAGS) install-exec-recursive install-data: install-data-recursive uninstall: uninstall-recursive install-am: all-am @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am installcheck: installcheck-recursive install-strip: if test -z '$(STRIP)'; then \ $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ install; \ else \ $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \ install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \ "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \ fi mostlyclean-generic: -$(am__rm_f) $(MOSTLYCLEANFILES) clean-generic: -$(am__rm_f) $(CLEANFILES) distclean-generic: -$(am__rm_f) $(CONFIG_CLEAN_FILES) -test . = "$(srcdir)" || $(am__rm_f) $(CONFIG_CLEAN_VPATH_FILES) -$(am__rm_f) $(DISTCLEANFILES) -$(am__rm_f) glthread/$(DEPDIR)/$(am__dirstamp) -$(am__rm_f) glthread/$(am__dirstamp) maintainer-clean-generic: @echo "This command is intended for maintainers to use" @echo "it deletes files that may require special tools to rebuild." -$(am__rm_f) $(BUILT_SOURCES) -$(am__rm_f) $(MAINTAINERCLEANFILES) clean: clean-recursive clean-am: clean-generic clean-libtool clean-noinstLIBRARIES \ clean-noinstLTLIBRARIES mostlyclean-am distclean: distclean-recursive -rm -f ./$(DEPDIR)/libgnu_la-asyncsafe-spin.Plo -rm -f ./$(DEPDIR)/libgnu_la-basename-lgpl.Plo -rm -f ./$(DEPDIR)/libgnu_la-clean-temp-simple.Plo -rm -f ./$(DEPDIR)/libgnu_la-cloexec.Plo -rm -f ./$(DEPDIR)/libgnu_la-close.Plo -rm -f ./$(DEPDIR)/libgnu_la-dup2.Plo -rm -f ./$(DEPDIR)/libgnu_la-error.Plo -rm -f ./$(DEPDIR)/libgnu_la-fatal-signal.Plo -rm -f ./$(DEPDIR)/libgnu_la-fcntl.Plo -rm -f ./$(DEPDIR)/libgnu_la-fd-hook.Plo -rm -f ./$(DEPDIR)/libgnu_la-fstat.Plo -rm -f ./$(DEPDIR)/libgnu_la-getdtablesize.Plo -rm -f ./$(DEPDIR)/libgnu_la-getpagesize.Plo -rm -f ./$(DEPDIR)/libgnu_la-getprogname.Plo -rm -f ./$(DEPDIR)/libgnu_la-gl_linkedhash_list.Plo -rm -f ./$(DEPDIR)/libgnu_la-gl_list.Plo -rm -f ./$(DEPDIR)/libgnu_la-hasmntopt.Plo -rm -f ./$(DEPDIR)/libgnu_la-malloca.Plo -rm -f ./$(DEPDIR)/libgnu_la-msvc-inval.Plo -rm -f ./$(DEPDIR)/libgnu_la-msvc-nothrow.Plo -rm -f ./$(DEPDIR)/libgnu_la-open.Plo -rm -f ./$(DEPDIR)/libgnu_la-pthread-once.Plo -rm -f ./$(DEPDIR)/libgnu_la-raise.Plo -rm -f ./$(DEPDIR)/libgnu_la-rmdir.Plo -rm -f ./$(DEPDIR)/libgnu_la-sig-handler.Plo -rm -f ./$(DEPDIR)/libgnu_la-sigaction.Plo -rm -f ./$(DEPDIR)/libgnu_la-sigprocmask.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat-time.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat-w32.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat.Plo -rm -f ./$(DEPDIR)/libgnu_la-stdio-read.Plo -rm -f ./$(DEPDIR)/libgnu_la-stdio-write.Plo -rm -f ./$(DEPDIR)/libgnu_la-strerror-override.Plo -rm -f ./$(DEPDIR)/libgnu_la-strerror.Plo -rm -f ./$(DEPDIR)/libgnu_la-unistd.Plo -rm -f ./$(DEPDIR)/libgnu_la-vma-iter.Plo -rm -f ./$(DEPDIR)/libgnu_la-vma-prot.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-mutex.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-once.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-recmutex.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-rwlock.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-spin.Plo -rm -f ./$(DEPDIR)/libgnu_la-xsize.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-lock.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-once.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-threadlib.Plo -rm -f Makefile distclean-am: clean-am distclean-compile distclean-generic \ distclean-local distclean-tags dvi: dvi-recursive dvi-am: html: html-recursive html-am: info: info-recursive info-am: install-data-am: install-pkgdataDATA install-dvi: install-dvi-recursive install-dvi-am: install-exec-am: install-html: install-html-recursive install-html-am: install-info: install-info-recursive install-info-am: install-man: install-pdf: install-pdf-recursive install-pdf-am: install-ps: install-ps-recursive install-ps-am: installcheck-am: maintainer-clean: maintainer-clean-recursive -rm -f ./$(DEPDIR)/libgnu_la-asyncsafe-spin.Plo -rm -f ./$(DEPDIR)/libgnu_la-basename-lgpl.Plo -rm -f ./$(DEPDIR)/libgnu_la-clean-temp-simple.Plo -rm -f ./$(DEPDIR)/libgnu_la-cloexec.Plo -rm -f ./$(DEPDIR)/libgnu_la-close.Plo -rm -f ./$(DEPDIR)/libgnu_la-dup2.Plo -rm -f ./$(DEPDIR)/libgnu_la-error.Plo -rm -f ./$(DEPDIR)/libgnu_la-fatal-signal.Plo -rm -f ./$(DEPDIR)/libgnu_la-fcntl.Plo -rm -f ./$(DEPDIR)/libgnu_la-fd-hook.Plo -rm -f ./$(DEPDIR)/libgnu_la-fstat.Plo -rm -f ./$(DEPDIR)/libgnu_la-getdtablesize.Plo -rm -f ./$(DEPDIR)/libgnu_la-getpagesize.Plo -rm -f ./$(DEPDIR)/libgnu_la-getprogname.Plo -rm -f ./$(DEPDIR)/libgnu_la-gl_linkedhash_list.Plo -rm -f ./$(DEPDIR)/libgnu_la-gl_list.Plo -rm -f ./$(DEPDIR)/libgnu_la-hasmntopt.Plo -rm -f ./$(DEPDIR)/libgnu_la-malloca.Plo -rm -f ./$(DEPDIR)/libgnu_la-msvc-inval.Plo -rm -f ./$(DEPDIR)/libgnu_la-msvc-nothrow.Plo -rm -f ./$(DEPDIR)/libgnu_la-open.Plo -rm -f ./$(DEPDIR)/libgnu_la-pthread-once.Plo -rm -f ./$(DEPDIR)/libgnu_la-raise.Plo -rm -f ./$(DEPDIR)/libgnu_la-rmdir.Plo -rm -f ./$(DEPDIR)/libgnu_la-sig-handler.Plo -rm -f ./$(DEPDIR)/libgnu_la-sigaction.Plo -rm -f ./$(DEPDIR)/libgnu_la-sigprocmask.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat-time.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat-w32.Plo -rm -f ./$(DEPDIR)/libgnu_la-stat.Plo -rm -f ./$(DEPDIR)/libgnu_la-stdio-read.Plo -rm -f ./$(DEPDIR)/libgnu_la-stdio-write.Plo -rm -f ./$(DEPDIR)/libgnu_la-strerror-override.Plo -rm -f ./$(DEPDIR)/libgnu_la-strerror.Plo -rm -f ./$(DEPDIR)/libgnu_la-unistd.Plo -rm -f ./$(DEPDIR)/libgnu_la-vma-iter.Plo -rm -f ./$(DEPDIR)/libgnu_la-vma-prot.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-mutex.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-once.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-recmutex.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-rwlock.Plo -rm -f ./$(DEPDIR)/libgnu_la-windows-spin.Plo -rm -f ./$(DEPDIR)/libgnu_la-xsize.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-lock.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-once.Plo -rm -f glthread/$(DEPDIR)/libgnu_la-threadlib.Plo -rm -f Makefile maintainer-clean-am: distclean-am maintainer-clean-generic \ maintainer-clean-local mostlyclean: mostlyclean-recursive mostlyclean-am: mostlyclean-compile mostlyclean-generic \ mostlyclean-libtool mostlyclean-local pdf: pdf-recursive pdf-am: ps: ps-recursive ps-am: uninstall-am: uninstall-pkgdataDATA .MAKE: $(am__recursive_targets) all check install install-am \ install-exec install-strip .PHONY: $(am__recursive_targets) CTAGS GTAGS TAGS all all-am \ am--depfiles check check-am clean clean-generic clean-libtool \ clean-noinstLIBRARIES clean-noinstLTLIBRARIES cscopelist-am \ ctags ctags-am distclean distclean-compile distclean-generic \ distclean-libtool distclean-local distclean-tags distdir dvi \ dvi-am html html-am info info-am install install-am \ install-data install-data-am install-dvi install-dvi-am \ install-exec install-exec-am install-html install-html-am \ install-info install-info-am install-man install-pdf \ install-pdf-am install-pkgdataDATA install-ps install-ps-am \ install-strip installcheck installcheck-am installdirs \ installdirs-am maintainer-clean maintainer-clean-generic \ maintainer-clean-local mostlyclean mostlyclean-compile \ mostlyclean-generic mostlyclean-libtool mostlyclean-local pdf \ pdf-am ps ps-am tags tags-am uninstall uninstall-am \ uninstall-pkgdataDATA .PRECIOUS: Makefile # We need the following in order to create when the system # doesn't have one that works with the given compiler. @GL_GENERATE_ALLOCA_H_TRUE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@alloca.h: alloca.in.h $(top_builddir)/config.status @GL_GENERATE_ALLOCA_H_TRUE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_ALLOCA_H_TRUE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@ -e 's|@''HAVE_ALLOCA_H''@|$(HAVE_ALLOCA_H)|g' \ @GL_GENERATE_ALLOCA_H_TRUE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@ $(srcdir)/alloca.in.h > $@-t @GL_GENERATE_ALLOCA_H_TRUE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_ALLOCA_H_FALSE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@alloca.h: $(top_builddir)/config.status @GL_GENERATE_ALLOCA_H_FALSE@@gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04_TRUE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@assert.h: assert.in.h verify.h $(top_builddir)/config.status @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ $(gl_V_at){ $(SED_HEADER_STDOUT) \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|@''NEXT_ASSERT_H''@|$(NEXT_ASSERT_H)|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ < $(srcdir)/assert.in.h && \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ sed -e '/@assert.h omit start@/,/@assert.h omit end@/d' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|_gl_verify|_gl_static_assert|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|_GL_VERIFY|_GL_STATIC_ASSERT|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ -e 's|_GL\(_STATIC_ASSERT_H\)|_GL\1|g' \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ < $(srcdir)/verify.h; \ @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ } > $@-t @GL_GENERATE_ASSERT_H_TRUE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_ASSERT_H_FALSE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@assert.h: $(top_builddir)/config.status @GL_GENERATE_ASSERT_H_FALSE@@gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f_TRUE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that is POSIX compliant. @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@errno.h: errno.in.h $(top_builddir)/config.status @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''NEXT_ERRNO_H''@|$(NEXT_ERRNO_H)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''EMULTIHOP_HIDDEN''@|$(EMULTIHOP_HIDDEN)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''EMULTIHOP_VALUE''@|$(EMULTIHOP_VALUE)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''ENOLINK_HIDDEN''@|$(ENOLINK_HIDDEN)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''ENOLINK_VALUE''@|$(ENOLINK_VALUE)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''EOVERFLOW_HIDDEN''@|$(EOVERFLOW_HIDDEN)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ -e 's|@''EOVERFLOW_VALUE''@|$(EOVERFLOW_VALUE)|g' \ @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ $(srcdir)/errno.in.h > $@-t @GL_GENERATE_ERRNO_H_TRUE@@gl_GNULIB_ENABLED_errno_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_ERRNO_H_FALSE@@gl_GNULIB_ENABLED_errno_TRUE@errno.h: $(top_builddir)/config.status @GL_GENERATE_ERRNO_H_FALSE@@gl_GNULIB_ENABLED_errno_TRUE@ rm -f $@ # We need the following in order to override . @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@error.h: error.in.h $(top_builddir)/config.status $(CXXDEFS_H) @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''HAVE_ERROR_H''@|$(HAVE_ERROR_H)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''NEXT_ERROR_H''@|$(NEXT_ERROR_H)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''HAVE_ERROR''@|$(HAVE_ERROR)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''HAVE_ERROR_AT_LINE''@|$(HAVE_ERROR_AT_LINE)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''REPLACE_ERROR''@|$(REPLACE_ERROR)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e 's|@''REPLACE_ERROR_AT_LINE''@|$(REPLACE_ERROR_AT_LINE)|g' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ $(srcdir)/error.in.h > $@-t @gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@fcntl.h: fcntl.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''NEXT_FCNTL_H''@|$(NEXT_FCNTL_H)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_CREAT''@/$(GL_GNULIB_CREAT)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_FCNTL''@/$(GL_GNULIB_FCNTL)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_NONBLOCKING''@/$(GL_GNULIB_NONBLOCKING)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_OPEN''@/$(GL_GNULIB_OPEN)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_OPENAT''@/$(GL_GNULIB_OPENAT)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_MDA_CREAT''@/$(GL_GNULIB_MDA_CREAT)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's/@''GNULIB_MDA_OPEN''@/$(GL_GNULIB_MDA_OPEN)/g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''HAVE_FCNTL''@|$(HAVE_FCNTL)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''HAVE_OPENAT''@|$(HAVE_OPENAT)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''REPLACE_CREAT''@|$(REPLACE_CREAT)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''REPLACE_FCNTL''@|$(REPLACE_FCNTL)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''REPLACE_OPEN''@|$(REPLACE_OPEN)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e 's|@''REPLACE_OPENAT''@|$(REPLACE_OPENAT)|g' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ $(srcdir)/fcntl.in.h > $@-t @gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have one that is compatible with GNU. @GL_GENERATE_LIMITS_H_TRUE@limits.h: limits.in.h $(top_builddir)/config.status @GL_GENERATE_LIMITS_H_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_LIMITS_H_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @GL_GENERATE_LIMITS_H_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_LIMITS_H_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_LIMITS_H_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_LIMITS_H_TRUE@ -e 's|@''NEXT_LIMITS_H''@|$(NEXT_LIMITS_H)|g' \ @GL_GENERATE_LIMITS_H_TRUE@ $(srcdir)/limits.in.h > $@-t @GL_GENERATE_LIMITS_H_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_LIMITS_H_FALSE@limits.h: $(top_builddir)/config.status @GL_GENERATE_LIMITS_H_FALSE@ rm -f $@ # We need the following in order to create when desired. @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@mntent.h: mntent.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ $(AM_V_GEN)$(MKDIR_P) '.' @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ $(AM_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''NEXT_MNTENT_H''@|$(NEXT_MNTENT_H)|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's/@''GNULIB_HASMNTOPT''@/$(GL_GNULIB_HASMNTOPT)/g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''HAVE_HASMNTOPT''@|$(HAVE_HASMNTOPT)|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''HAVE_SETMNTENT''@|$(HAVE_SETMNTENT)|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e 's|@''REPLACE_HASMNTOPT''@|$(REPLACE_HASMNTOPT)|g' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ $(srcdir)/mntent.in.h > $@-t @GL_GENERATE_MNTENT_H_TRUE@@gl_GNULIB_ENABLED_mntent_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_MNTENT_H_FALSE@@gl_GNULIB_ENABLED_mntent_TRUE@mntent.h: $(top_builddir)/config.status @GL_GENERATE_MNTENT_H_FALSE@@gl_GNULIB_ENABLED_mntent_TRUE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@pthread.h: pthread.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(_NORETURN_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_H''@|$(HAVE_PTHREAD_H)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''NEXT_PTHREAD_H''@|$(NEXT_PTHREAD_H)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_THREAD''@/$(GL_GNULIB_PTHREAD_THREAD)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_ONCE''@/$(GL_GNULIB_PTHREAD_ONCE)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_MUTEX''@/$(GL_GNULIB_PTHREAD_MUTEX)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_RWLOCK''@/$(GL_GNULIB_PTHREAD_RWLOCK)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_COND''@/$(GL_GNULIB_PTHREAD_COND)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_TSS''@/$(GL_GNULIB_PTHREAD_TSS)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_SPIN''@/$(GL_GNULIB_PTHREAD_SPIN)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's/@''GNULIB_PTHREAD_MUTEX_TIMEDLOCK''@/$(GL_GNULIB_PTHREAD_MUTEX_TIMEDLOCK)/g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_T''@|$(HAVE_PTHREAD_T)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPINLOCK_T''@|$(HAVE_PTHREAD_SPINLOCK_T)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_CREATE_DETACHED''@|$(HAVE_PTHREAD_CREATE_DETACHED)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_RECURSIVE''@|$(HAVE_PTHREAD_MUTEX_RECURSIVE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_ROBUST''@|$(HAVE_PTHREAD_MUTEX_ROBUST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_PROCESS_SHARED''@|$(HAVE_PTHREAD_PROCESS_SHARED)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_CREATE''@|$(HAVE_PTHREAD_CREATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_ATTR_INIT''@|$(HAVE_PTHREAD_ATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_ATTR_GETDETACHSTATE''@|$(HAVE_PTHREAD_ATTR_GETDETACHSTATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_ATTR_SETDETACHSTATE''@|$(HAVE_PTHREAD_ATTR_SETDETACHSTATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_ATTR_DESTROY''@|$(HAVE_PTHREAD_ATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SELF''@|$(HAVE_PTHREAD_SELF)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_EQUAL''@|$(HAVE_PTHREAD_EQUAL)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_DETACH''@|$(HAVE_PTHREAD_DETACH)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_JOIN''@|$(HAVE_PTHREAD_JOIN)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_EXIT''@|$(HAVE_PTHREAD_EXIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ < $(srcdir)/pthread.in.h > $@-t1 @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_ONCE''@|$(HAVE_PTHREAD_ONCE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_INIT''@|$(HAVE_PTHREAD_MUTEX_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_INIT''@|$(HAVE_PTHREAD_MUTEXATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_GETTYPE''@|$(HAVE_PTHREAD_MUTEXATTR_GETTYPE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_SETTYPE''@|$(HAVE_PTHREAD_MUTEXATTR_SETTYPE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_GETROBUST''@|$(HAVE_PTHREAD_MUTEXATTR_GETROBUST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_SETROBUST''@|$(HAVE_PTHREAD_MUTEXATTR_SETROBUST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEXATTR_DESTROY''@|$(HAVE_PTHREAD_MUTEXATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_LOCK''@|$(HAVE_PTHREAD_MUTEX_LOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_TRYLOCK''@|$(HAVE_PTHREAD_MUTEX_TRYLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_TIMEDLOCK''@|$(HAVE_PTHREAD_MUTEX_TIMEDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_UNLOCK''@|$(HAVE_PTHREAD_MUTEX_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_MUTEX_DESTROY''@|$(HAVE_PTHREAD_MUTEX_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_INIT''@|$(HAVE_PTHREAD_RWLOCK_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCKATTR_INIT''@|$(HAVE_PTHREAD_RWLOCKATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCKATTR_DESTROY''@|$(HAVE_PTHREAD_RWLOCKATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_RDLOCK''@|$(HAVE_PTHREAD_RWLOCK_RDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_WRLOCK''@|$(HAVE_PTHREAD_RWLOCK_WRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_TRYRDLOCK''@|$(HAVE_PTHREAD_RWLOCK_TRYRDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_TRYWRLOCK''@|$(HAVE_PTHREAD_RWLOCK_TRYWRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK''@|$(HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK''@|$(HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_UNLOCK''@|$(HAVE_PTHREAD_RWLOCK_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_RWLOCK_DESTROY''@|$(HAVE_PTHREAD_RWLOCK_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_INIT''@|$(HAVE_PTHREAD_COND_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_CONDATTR_INIT''@|$(HAVE_PTHREAD_CONDATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_CONDATTR_DESTROY''@|$(HAVE_PTHREAD_CONDATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_WAIT''@|$(HAVE_PTHREAD_COND_WAIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_TIMEDWAIT''@|$(HAVE_PTHREAD_COND_TIMEDWAIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_SIGNAL''@|$(HAVE_PTHREAD_COND_SIGNAL)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_BROADCAST''@|$(HAVE_PTHREAD_COND_BROADCAST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_COND_DESTROY''@|$(HAVE_PTHREAD_COND_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_KEY_CREATE''@|$(HAVE_PTHREAD_KEY_CREATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SETSPECIFIC''@|$(HAVE_PTHREAD_SETSPECIFIC)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_GETSPECIFIC''@|$(HAVE_PTHREAD_GETSPECIFIC)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_KEY_DELETE''@|$(HAVE_PTHREAD_KEY_DELETE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPIN_INIT''@|$(HAVE_PTHREAD_SPIN_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPIN_LOCK''@|$(HAVE_PTHREAD_SPIN_LOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPIN_TRYLOCK''@|$(HAVE_PTHREAD_SPIN_TRYLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPIN_UNLOCK''@|$(HAVE_PTHREAD_SPIN_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''HAVE_PTHREAD_SPIN_DESTROY''@|$(HAVE_PTHREAD_SPIN_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ < $@-t1 > $@-t2 @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_CREATE''@|$(REPLACE_PTHREAD_CREATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_ATTR_INIT''@|$(REPLACE_PTHREAD_ATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_ATTR_GETDETACHSTATE''@|$(REPLACE_PTHREAD_ATTR_GETDETACHSTATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_ATTR_SETDETACHSTATE''@|$(REPLACE_PTHREAD_ATTR_SETDETACHSTATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_ATTR_DESTROY''@|$(REPLACE_PTHREAD_ATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SELF''@|$(REPLACE_PTHREAD_SELF)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_EQUAL''@|$(REPLACE_PTHREAD_EQUAL)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_DETACH''@|$(REPLACE_PTHREAD_DETACH)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_JOIN''@|$(REPLACE_PTHREAD_JOIN)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_EXIT''@|$(REPLACE_PTHREAD_EXIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_ONCE''@|$(REPLACE_PTHREAD_ONCE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_INIT''@|$(REPLACE_PTHREAD_MUTEX_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_INIT''@|$(REPLACE_PTHREAD_MUTEXATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_GETTYPE''@|$(REPLACE_PTHREAD_MUTEXATTR_GETTYPE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_SETTYPE''@|$(REPLACE_PTHREAD_MUTEXATTR_SETTYPE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_GETROBUST''@|$(REPLACE_PTHREAD_MUTEXATTR_GETROBUST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_SETROBUST''@|$(REPLACE_PTHREAD_MUTEXATTR_SETROBUST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEXATTR_DESTROY''@|$(REPLACE_PTHREAD_MUTEXATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_LOCK''@|$(REPLACE_PTHREAD_MUTEX_LOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_TRYLOCK''@|$(REPLACE_PTHREAD_MUTEX_TRYLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_TIMEDLOCK''@|$(REPLACE_PTHREAD_MUTEX_TIMEDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_UNLOCK''@|$(REPLACE_PTHREAD_MUTEX_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_MUTEX_DESTROY''@|$(REPLACE_PTHREAD_MUTEX_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_INIT''@|$(REPLACE_PTHREAD_RWLOCK_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCKATTR_INIT''@|$(REPLACE_PTHREAD_RWLOCKATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCKATTR_DESTROY''@|$(REPLACE_PTHREAD_RWLOCKATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_RDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_RDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_WRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_WRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_TRYRDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TRYRDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_TRYWRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TRYWRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK''@|$(REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_UNLOCK''@|$(REPLACE_PTHREAD_RWLOCK_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_RWLOCK_DESTROY''@|$(REPLACE_PTHREAD_RWLOCK_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ < $@-t2 > $@-t3 @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_INIT''@|$(REPLACE_PTHREAD_COND_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_CONDATTR_INIT''@|$(REPLACE_PTHREAD_CONDATTR_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_CONDATTR_DESTROY''@|$(REPLACE_PTHREAD_CONDATTR_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_WAIT''@|$(REPLACE_PTHREAD_COND_WAIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_TIMEDWAIT''@|$(REPLACE_PTHREAD_COND_TIMEDWAIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_SIGNAL''@|$(REPLACE_PTHREAD_COND_SIGNAL)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_BROADCAST''@|$(REPLACE_PTHREAD_COND_BROADCAST)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_COND_DESTROY''@|$(REPLACE_PTHREAD_COND_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_KEY_CREATE''@|$(REPLACE_PTHREAD_KEY_CREATE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SETSPECIFIC''@|$(REPLACE_PTHREAD_SETSPECIFIC)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_GETSPECIFIC''@|$(REPLACE_PTHREAD_GETSPECIFIC)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_KEY_DELETE''@|$(REPLACE_PTHREAD_KEY_DELETE)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SPIN_INIT''@|$(REPLACE_PTHREAD_SPIN_INIT)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SPIN_LOCK''@|$(REPLACE_PTHREAD_SPIN_LOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SPIN_TRYLOCK''@|$(REPLACE_PTHREAD_SPIN_TRYLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SPIN_UNLOCK''@|$(REPLACE_PTHREAD_SPIN_UNLOCK)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e 's|@''REPLACE_PTHREAD_SPIN_DESTROY''@|$(REPLACE_PTHREAD_SPIN_DESTROY)|g' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ < $@-t3 > $@-t4 @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(AM_V_at)rm -f $@-t1 $@-t2 $@-t3 @gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c_TRUE@ $(AM_V_at)mv $@-t4 $@ # We need the following in order to create a replacement for when # the system doesn't have one. @gl_GNULIB_ENABLED_sched_TRUE@sched.h: sched.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_sched_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''HAVE_SCHED_H''@|$(HAVE_SCHED_H)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''HAVE_SYS_CDEFS_H''@|$(HAVE_SYS_CDEFS_H)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''NEXT_SCHED_H''@|$(NEXT_SCHED_H)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''HAVE_STRUCT_SCHED_PARAM''@|$(HAVE_STRUCT_SCHED_PARAM)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's/@''GNULIB_SCHED_YIELD''@/$(GL_GNULIB_SCHED_YIELD)/g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''HAVE_SCHED_YIELD''@|$(HAVE_SCHED_YIELD)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e 's|@''REPLACE_SCHED_YIELD''@|$(REPLACE_SCHED_YIELD)|g' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_sched_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_sched_TRUE@ $(srcdir)/sched.in.h > $@-t @gl_GNULIB_ENABLED_sched_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have a complete one. @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@signal.h: signal.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''NEXT_SIGNAL_H''@|$(NEXT_SIGNAL_H)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_PTHREAD_SIGMASK''@/$(GL_GNULIB_PTHREAD_SIGMASK)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_RAISE''@/$(GL_GNULIB_RAISE)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_SIG2STR''@/$(GL_GNULIB_SIG2STR)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_SIGNAL_H_SIGPIPE''@/$(GL_GNULIB_SIGNAL_H_SIGPIPE)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_SIGPROCMASK''@/$(GL_GNULIB_SIGPROCMASK)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's/@''GNULIB_SIGACTION''@/$(GL_GNULIB_SIGACTION)/g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_POSIX_SIGNALBLOCKING''@|$(HAVE_POSIX_SIGNALBLOCKING)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_PTHREAD_SIGMASK''@|$(HAVE_PTHREAD_SIGMASK)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_RAISE''@|$(HAVE_RAISE)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_SIG2STR''@|$(HAVE_SIG2STR)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_SIGSET_T''@|$(HAVE_SIGSET_T)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_SIGINFO_T''@|$(HAVE_SIGINFO_T)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_SIGACTION''@|$(HAVE_SIGACTION)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_STR2SIG''@|$(HAVE_STR2SIG)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_STRUCT_SIGACTION_SA_SIGACTION''@|$(HAVE_STRUCT_SIGACTION_SA_SIGACTION)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_TYPE_VOLATILE_SIG_ATOMIC_T''@|$(HAVE_TYPE_VOLATILE_SIG_ATOMIC_T)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''HAVE_SIGHANDLER_T''@|$(HAVE_SIGHANDLER_T)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''REPLACE_PTHREAD_SIGMASK''@|$(REPLACE_PTHREAD_SIGMASK)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e 's|@''REPLACE_RAISE''@|$(REPLACE_RAISE)|g' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ $(srcdir)/signal.in.h > $@-t @gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @GL_GENERATE_STDCKDINT_H_TRUE@@gl_GNULIB_ENABLED_stdckdint_TRUE@stdckdint.h: stdckdint.in.h $(top_builddir)/config.status @GL_GENERATE_STDCKDINT_H_TRUE@@gl_GNULIB_ENABLED_stdckdint_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_STDCKDINT_H_TRUE@@gl_GNULIB_ENABLED_stdckdint_TRUE@ $(srcdir)/stdckdint.in.h > $@-t @GL_GENERATE_STDCKDINT_H_TRUE@@gl_GNULIB_ENABLED_stdckdint_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_STDCKDINT_H_FALSE@@gl_GNULIB_ENABLED_stdckdint_TRUE@stdckdint.h: $(top_builddir)/config.status @GL_GENERATE_STDCKDINT_H_FALSE@@gl_GNULIB_ENABLED_stdckdint_TRUE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@stddef.h: stddef.in.h $(top_builddir)/config.status @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''NEXT_STDDEF_H''@|$(NEXT_STDDEF_H)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''NULLPTR_T_NEEDS_STDDEF''@|$(NULLPTR_T_NEEDS_STDDEF)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''STDDEF_NOT_IDEMPOTENT''@|$(STDDEF_NOT_IDEMPOTENT)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''REPLACE_NULL''@|$(REPLACE_NULL)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ -e 's|@''HAVE_MAX_ALIGN_T''@|$(HAVE_MAX_ALIGN_T)|g' \ @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ $(srcdir)/stddef.in.h > $@-t @GL_GENERATE_STDDEF_H_TRUE@@gl_GNULIB_ENABLED_stddef_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_STDDEF_H_FALSE@@gl_GNULIB_ENABLED_stddef_TRUE@stddef.h: $(top_builddir)/config.status @GL_GENERATE_STDDEF_H_FALSE@@gl_GNULIB_ENABLED_stddef_TRUE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @GL_GENERATE_STDINT_H_TRUE@stdint.h: stdint.in.h $(top_builddir)/config.status @GL_GENERATE_STDINT_H_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_STDINT_H_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_STDINT_H''@/$(HAVE_STDINT_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's|@''NEXT_STDINT_H''@|$(NEXT_STDINT_H)|g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_C99_STDINT_H''@/$(HAVE_C99_STDINT_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SYS_TYPES_H''@/$(HAVE_SYS_TYPES_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_INTTYPES_H''@/$(HAVE_INTTYPES_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SYS_INTTYPES_H''@/$(HAVE_SYS_INTTYPES_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SYS_BITYPES_H''@/$(HAVE_SYS_BITYPES_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_WCHAR_H''@/$(HAVE_WCHAR_H)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''APPLE_UNIVERSAL_BUILD''@/$(APPLE_UNIVERSAL_BUILD)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''BITSIZEOF_PTRDIFF_T''@/$(BITSIZEOF_PTRDIFF_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''PTRDIFF_T_SUFFIX''@/$(PTRDIFF_T_SUFFIX)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''BITSIZEOF_SIG_ATOMIC_T''@/$(BITSIZEOF_SIG_ATOMIC_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SIGNED_SIG_ATOMIC_T''@/$(HAVE_SIGNED_SIG_ATOMIC_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''SIG_ATOMIC_T_SUFFIX''@/$(SIG_ATOMIC_T_SUFFIX)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''BITSIZEOF_SIZE_T''@/$(BITSIZEOF_SIZE_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''SIZE_T_SUFFIX''@/$(SIZE_T_SUFFIX)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''BITSIZEOF_WCHAR_T''@/$(BITSIZEOF_WCHAR_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SIGNED_WCHAR_T''@/$(HAVE_SIGNED_WCHAR_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''WCHAR_T_SUFFIX''@/$(WCHAR_T_SUFFIX)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''BITSIZEOF_WINT_T''@/$(BITSIZEOF_WINT_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''HAVE_SIGNED_WINT_T''@/$(HAVE_SIGNED_WINT_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''WINT_T_SUFFIX''@/$(WINT_T_SUFFIX)/g' \ @GL_GENERATE_STDINT_H_TRUE@ -e 's/@''GNULIBHEADERS_OVERRIDE_WINT_T''@/$(GNULIBHEADERS_OVERRIDE_WINT_T)/g' \ @GL_GENERATE_STDINT_H_TRUE@ $(srcdir)/stdint.in.h > $@-t @GL_GENERATE_STDINT_H_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_STDINT_H_FALSE@stdint.h: $(top_builddir)/config.status @GL_GENERATE_STDINT_H_FALSE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_stdio_TRUE@stdio.h: stdio.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_stdio_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''NEXT_STDIO_H''@|$(NEXT_STDIO_H)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_DPRINTF''@/$(GL_GNULIB_DPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_DZPRINTF''@/$(GL_GNULIB_DZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FCLOSE''@/$(GL_GNULIB_FCLOSE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FDOPEN''@/$(GL_GNULIB_FDOPEN)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FFLUSH''@/$(GL_GNULIB_FFLUSH)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FGETC''@/$(GL_GNULIB_FGETC)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FGETS''@/$(GL_GNULIB_FGETS)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FOPEN''@/$(GL_GNULIB_FOPEN)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FOPEN_GNU''@/$(GL_GNULIB_FOPEN_GNU)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FPRINTF''@/$(GL_GNULIB_FPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FPRINTF_POSIX''@/$(GL_GNULIB_FPRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FPURGE''@/$(GL_GNULIB_FPURGE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FPUTC''@/$(GL_GNULIB_FPUTC)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FPUTS''@/$(GL_GNULIB_FPUTS)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FREAD''@/$(GL_GNULIB_FREAD)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FREOPEN''@/$(GL_GNULIB_FREOPEN)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FSCANF''@/$(GL_GNULIB_FSCANF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FSEEK''@/$(GL_GNULIB_FSEEK)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FSEEKO''@/$(GL_GNULIB_FSEEKO)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FTELL''@/$(GL_GNULIB_FTELL)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FTELLO''@/$(GL_GNULIB_FTELLO)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FWRITE''@/$(GL_GNULIB_FWRITE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_FZPRINTF''@/$(GL_GNULIB_FZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_GETC''@/$(GL_GNULIB_GETC)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_GETCHAR''@/$(GL_GNULIB_GETCHAR)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_GETDELIM''@/$(GL_GNULIB_GETDELIM)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_GETLINE''@/$(GL_GNULIB_GETLINE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_OBSTACK_PRINTF''@/$(GL_GNULIB_OBSTACK_PRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_OBSTACK_PRINTF_POSIX''@/$(GL_GNULIB_OBSTACK_PRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_OBSTACK_ZPRINTF''@/$(GL_GNULIB_OBSTACK_ZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PCLOSE''@/$(GL_GNULIB_PCLOSE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PERROR''@/$(GL_GNULIB_PERROR)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_POPEN''@/$(GL_GNULIB_POPEN)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PRINTF''@/$(GL_GNULIB_PRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PRINTF_POSIX''@/$(GL_GNULIB_PRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PUTC''@/$(GL_GNULIB_PUTC)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PUTCHAR''@/$(GL_GNULIB_PUTCHAR)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_PUTS''@/$(GL_GNULIB_PUTS)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_REMOVE''@/$(GL_GNULIB_REMOVE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_RENAME''@/$(GL_GNULIB_RENAME)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_RENAMEAT''@/$(GL_GNULIB_RENAMEAT)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_SCANF''@/$(GL_GNULIB_SCANF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_SNPRINTF''@/$(GL_GNULIB_SNPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_SNZPRINTF''@/$(GL_GNULIB_SNZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_SPRINTF_POSIX''@/$(GL_GNULIB_SPRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_STDIO_H_NONBLOCKING''@/$(GL_GNULIB_STDIO_H_NONBLOCKING)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_STDIO_H_SIGPIPE''@/$(GL_GNULIB_STDIO_H_SIGPIPE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_SZPRINTF''@/$(GL_GNULIB_SZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_TMPFILE''@/$(GL_GNULIB_TMPFILE)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VASPRINTF''@/$(GL_GNULIB_VASPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VASZPRINTF''@/$(GL_GNULIB_VASZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VDPRINTF''@/$(GL_GNULIB_VDPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VDZPRINTF''@/$(GL_GNULIB_VDZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VFPRINTF''@/$(GL_GNULIB_VFPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VFPRINTF_POSIX''@/$(GL_GNULIB_VFPRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VFZPRINTF''@/$(GL_GNULIB_VFZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VFSCANF''@/$(GL_GNULIB_VFSCANF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VSCANF''@/$(GL_GNULIB_VSCANF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VPRINTF''@/$(GL_GNULIB_VPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VPRINTF_POSIX''@/$(GL_GNULIB_VPRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VSNPRINTF''@/$(GL_GNULIB_VSNPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VSNZPRINTF''@/$(GL_GNULIB_VSNZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VSPRINTF_POSIX''@/$(GL_GNULIB_VSPRINTF_POSIX)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VSZPRINTF''@/$(GL_GNULIB_VSZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_VZPRINTF''@/$(GL_GNULIB_VZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_ZPRINTF''@/$(GL_GNULIB_ZPRINTF)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_FCLOSEALL''@/$(GL_GNULIB_MDA_FCLOSEALL)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_FDOPEN''@/$(GL_GNULIB_MDA_FDOPEN)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_FILENO''@/$(GL_GNULIB_MDA_FILENO)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_GETW''@/$(GL_GNULIB_MDA_GETW)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_PUTW''@/$(GL_GNULIB_MDA_PUTW)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's/@''GNULIB_MDA_TEMPNAM''@/$(GL_GNULIB_MDA_TEMPNAM)/g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ < $(srcdir)/stdio.in.h > $@-t1 @gl_GNULIB_ENABLED_stdio_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_FCLOSEALL''@|$(HAVE_DECL_FCLOSEALL)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_FPURGE''@|$(HAVE_DECL_FPURGE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_FSEEKO''@|$(HAVE_DECL_FSEEKO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_FTELLO''@|$(HAVE_DECL_FTELLO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_GETDELIM''@|$(HAVE_DECL_GETDELIM)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_GETLINE''@|$(HAVE_DECL_GETLINE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_GETW''@|$(HAVE_DECL_GETW)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_OBSTACK_PRINTF''@|$(HAVE_DECL_OBSTACK_PRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_PUTW''@|$(HAVE_DECL_PUTW)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_SNPRINTF''@|$(HAVE_DECL_SNPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DECL_VSNPRINTF''@|$(HAVE_DECL_VSNPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_DPRINTF''@|$(HAVE_DPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_FSEEKO''@|$(HAVE_FSEEKO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_FTELLO''@|$(HAVE_FTELLO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_PCLOSE''@|$(HAVE_PCLOSE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_POPEN''@|$(HAVE_POPEN)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_RENAMEAT''@|$(HAVE_RENAMEAT)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_VASPRINTF''@|$(HAVE_VASPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''HAVE_VDPRINTF''@|$(HAVE_VDPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ < $@-t1 > $@-t2 @gl_GNULIB_ENABLED_stdio_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_DPRINTF''@|$(REPLACE_DPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FCLOSE''@|$(REPLACE_FCLOSE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FDOPEN''@|$(REPLACE_FDOPEN)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FFLUSH''@|$(REPLACE_FFLUSH)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FOPEN''@|$(REPLACE_FOPEN)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FOPEN_FOR_FOPEN_GNU''@|$(REPLACE_FOPEN_FOR_FOPEN_GNU)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FPRINTF''@|$(REPLACE_FPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FPURGE''@|$(REPLACE_FPURGE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FREOPEN''@|$(REPLACE_FREOPEN)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FSEEK''@|$(REPLACE_FSEEK)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FSEEKO''@|$(REPLACE_FSEEKO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FTELL''@|$(REPLACE_FTELL)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_FTELLO''@|$(REPLACE_FTELLO)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_GETDELIM''@|$(REPLACE_GETDELIM)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_GETLINE''@|$(REPLACE_GETLINE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_OBSTACK_PRINTF''@|$(REPLACE_OBSTACK_PRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_PERROR''@|$(REPLACE_PERROR)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_POPEN''@|$(REPLACE_POPEN)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_PRINTF''@|$(REPLACE_PRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_REMOVE''@|$(REPLACE_REMOVE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_RENAME''@|$(REPLACE_RENAME)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_RENAMEAT''@|$(REPLACE_RENAMEAT)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_SNPRINTF''@|$(REPLACE_SNPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_SPRINTF''@|$(REPLACE_SPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_STDIO_READ_FUNCS''@|$(REPLACE_STDIO_READ_FUNCS)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_STDIO_WRITE_FUNCS''@|$(REPLACE_STDIO_WRITE_FUNCS)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_TMPFILE''@|$(REPLACE_TMPFILE)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VASPRINTF''@|$(REPLACE_VASPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VDPRINTF''@|$(REPLACE_VDPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VFPRINTF''@|$(REPLACE_VFPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VPRINTF''@|$(REPLACE_VPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VSNPRINTF''@|$(REPLACE_VSNPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''REPLACE_VSPRINTF''@|$(REPLACE_VSPRINTF)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e 's|@''ASM_SYMBOL_PREFIX''@|$(ASM_SYMBOL_PREFIX)|g' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_stdio_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_stdio_TRUE@ < $@-t2 > $@-t3 @gl_GNULIB_ENABLED_stdio_TRUE@ $(AM_V_at)rm -f $@-t1 $@-t2 @gl_GNULIB_ENABLED_stdio_TRUE@ $(AM_V_at)mv $@-t3 $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_stdlib_TRUE@stdlib.h: stdlib.in.h $(top_builddir)/config.status $(CXXDEFS_H) \ @gl_GNULIB_ENABLED_stdlib_TRUE@ $(_NORETURN_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_stdlib_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''NEXT_STDLIB_H''@|$(NEXT_STDLIB_H)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB__EXIT''@/$(GL_GNULIB__EXIT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_ABORT_DEBUG''@/$(GL_GNULIB_ABORT_DEBUG)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_ALIGNED_ALLOC''@/$(GL_GNULIB_ALIGNED_ALLOC)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_ATOLL''@/$(GL_GNULIB_ATOLL)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_CALLOC_GNU''@/$(GL_GNULIB_CALLOC_GNU)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_CALLOC_POSIX''@/$(GL_GNULIB_CALLOC_POSIX)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_CANONICALIZE_FILE_NAME''@/$(GL_GNULIB_CANONICALIZE_FILE_NAME)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_FREE_POSIX''@/$(GL_GNULIB_FREE_POSIX)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_GETLOADAVG''@/$(GL_GNULIB_GETLOADAVG)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_GETPROGNAME''@/$(GL_GNULIB_GETPROGNAME)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_GETSUBOPT''@/$(GL_GNULIB_GETSUBOPT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_GRANTPT''@/$(GL_GNULIB_GRANTPT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MALLOC_GNU''@/$(GL_GNULIB_MALLOC_GNU)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MALLOC_POSIX''@/$(GL_GNULIB_MALLOC_POSIX)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MBSTOWCS''@/$(GL_GNULIB_MBSTOWCS)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MBTOWC''@/$(GL_GNULIB_MBTOWC)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MKDTEMP''@/$(GL_GNULIB_MKDTEMP)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MKOSTEMP''@/$(GL_GNULIB_MKOSTEMP)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MKOSTEMPS''@/$(GL_GNULIB_MKOSTEMPS)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MKSTEMP''@/$(GL_GNULIB_MKSTEMP)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MKSTEMPS''@/$(GL_GNULIB_MKSTEMPS)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_POSIX_MEMALIGN''@/$(GL_GNULIB_POSIX_MEMALIGN)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_POSIX_OPENPT''@/$(GL_GNULIB_POSIX_OPENPT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_PTSNAME''@/$(GL_GNULIB_PTSNAME)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_PTSNAME_R''@/$(GL_GNULIB_PTSNAME_R)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_PUTENV''@/$(GL_GNULIB_PUTENV)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_QSORT_R''@/$(GL_GNULIB_QSORT_R)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_RAND''@/$(GL_GNULIB_RAND)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_RANDOM''@/$(GL_GNULIB_RANDOM)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_RANDOM_R''@/$(GL_GNULIB_RANDOM_R)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_REALLOC_GNU''@/$(GL_GNULIB_REALLOC_GNU)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_REALLOC_POSIX''@/$(GL_GNULIB_REALLOC_POSIX)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_REALLOCARRAY''@/$(GL_GNULIB_REALLOCARRAY)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_REALPATH''@/$(GL_GNULIB_REALPATH)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_RPMATCH''@/$(GL_GNULIB_RPMATCH)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_SECURE_GETENV''@/$(GL_GNULIB_SECURE_GETENV)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_SETENV''@/$(GL_GNULIB_SETENV)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STACK_TRACE''@/$(GL_GNULIB_STACK_TRACE)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOD''@/$(GL_GNULIB_STRTOD)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOF''@/$(GL_GNULIB_STRTOF)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOL''@/$(GL_GNULIB_STRTOL)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOLD''@/$(GL_GNULIB_STRTOLD)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOLL''@/$(GL_GNULIB_STRTOLL)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOUL''@/$(GL_GNULIB_STRTOUL)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_STRTOULL''@/$(GL_GNULIB_STRTOULL)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_SYSTEM_POSIX''@/$(GL_GNULIB_SYSTEM_POSIX)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_UNLOCKPT''@/$(GL_GNULIB_UNLOCKPT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_UNSETENV''@/$(GL_GNULIB_UNSETENV)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_WCTOMB''@/$(GL_GNULIB_WCTOMB)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MDA_ECVT''@/$(GL_GNULIB_MDA_ECVT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MDA_FCVT''@/$(GL_GNULIB_MDA_FCVT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MDA_GCVT''@/$(GL_GNULIB_MDA_GCVT)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MDA_MKTEMP''@/$(GL_GNULIB_MDA_MKTEMP)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's/@''GNULIB_MDA_PUTENV''@/$(GL_GNULIB_MDA_PUTENV)/g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ < $(srcdir)/stdlib.in.h > $@-t1 @gl_GNULIB_ENABLED_stdlib_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE__EXIT''@|$(HAVE__EXIT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_ALIGNED_ALLOC''@|$(HAVE_ALIGNED_ALLOC)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_ATOLL''@|$(HAVE_ATOLL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_CANONICALIZE_FILE_NAME''@|$(HAVE_CANONICALIZE_FILE_NAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_ECVT''@|$(HAVE_DECL_ECVT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_FCVT''@|$(HAVE_DECL_FCVT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_GCVT''@|$(HAVE_DECL_GCVT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_GETLOADAVG''@|$(HAVE_DECL_GETLOADAVG)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_PROGRAM_INVOCATION_NAME''@|$(HAVE_DECL_PROGRAM_INVOCATION_NAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_GETPROGNAME''@|$(HAVE_GETPROGNAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_GETSUBOPT''@|$(HAVE_GETSUBOPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_GRANTPT''@|$(HAVE_GRANTPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_INITSTATE''@|$(HAVE_INITSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_INITSTATE''@|$(HAVE_DECL_INITSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MBTOWC''@|$(HAVE_MBTOWC)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MKDTEMP''@|$(HAVE_MKDTEMP)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MKOSTEMP''@|$(HAVE_MKOSTEMP)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MKOSTEMPS''@|$(HAVE_MKOSTEMPS)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MKSTEMP''@|$(HAVE_MKSTEMP)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_MKSTEMPS''@|$(HAVE_MKSTEMPS)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_POSIX_MEMALIGN''@|$(HAVE_POSIX_MEMALIGN)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_POSIX_OPENPT''@|$(HAVE_POSIX_OPENPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_PTSNAME''@|$(HAVE_PTSNAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_PTSNAME_R''@|$(HAVE_PTSNAME_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_QSORT_R''@|$(HAVE_QSORT_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_RANDOM''@|$(HAVE_RANDOM)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_RANDOM_H''@|$(HAVE_RANDOM_H)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_RANDOM_R''@|$(HAVE_RANDOM_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_REALLOCARRAY''@|$(HAVE_REALLOCARRAY)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_REALPATH''@|$(HAVE_REALPATH)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_RPMATCH''@|$(HAVE_RPMATCH)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_SECURE_GETENV''@|$(HAVE_SECURE_GETENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_SETENV''@|$(HAVE_DECL_SETENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_SETSTATE''@|$(HAVE_SETSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_SETSTATE''@|$(HAVE_DECL_SETSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOD''@|$(HAVE_STRTOD)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOF''@|$(HAVE_STRTOF)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOL''@|$(HAVE_STRTOL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOLD''@|$(HAVE_STRTOLD)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOLL''@|$(HAVE_STRTOLL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOUL''@|$(HAVE_STRTOUL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRTOULL''@|$(HAVE_STRTOULL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_STRUCT_RANDOM_DATA''@|$(HAVE_STRUCT_RANDOM_DATA)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_SYS_LOADAVG_H''@|$(HAVE_SYS_LOADAVG_H)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_UNLOCKPT''@|$(HAVE_UNLOCKPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''HAVE_DECL_UNSETENV''@|$(HAVE_DECL_UNSETENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ < $@-t1 > $@-t2 @gl_GNULIB_ENABLED_stdlib_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE__EXIT''@|$(REPLACE__EXIT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_ABORT''@|$(REPLACE_ABORT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_ALIGNED_ALLOC''@|$(REPLACE_ALIGNED_ALLOC)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_CALLOC_FOR_CALLOC_GNU''@|$(REPLACE_CALLOC_FOR_CALLOC_GNU)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_CALLOC_FOR_CALLOC_POSIX''@|$(REPLACE_CALLOC_FOR_CALLOC_POSIX)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_CANONICALIZE_FILE_NAME''@|$(REPLACE_CANONICALIZE_FILE_NAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_FREE''@|$(REPLACE_FREE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_GETLOADAVG''@|$(REPLACE_GETLOADAVG)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_GETPROGNAME''@|$(REPLACE_GETPROGNAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_GETSUBOPT''@|$(REPLACE_GETSUBOPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_INITSTATE''@|$(REPLACE_INITSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MALLOC_FOR_MALLOC_GNU''@|$(REPLACE_MALLOC_FOR_MALLOC_GNU)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MALLOC_FOR_MALLOC_POSIX''@|$(REPLACE_MALLOC_FOR_MALLOC_POSIX)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MB_CUR_MAX''@|$(REPLACE_MB_CUR_MAX)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MBSTOWCS''@|$(REPLACE_MBSTOWCS)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MBTOWC''@|$(REPLACE_MBTOWC)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MKOSTEMP''@|$(REPLACE_MKOSTEMP)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MKOSTEMPS''@|$(REPLACE_MKOSTEMPS)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_MKSTEMP''@|$(REPLACE_MKSTEMP)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_POSIX_MEMALIGN''@|$(REPLACE_POSIX_MEMALIGN)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_POSIX_OPENPT''@|$(REPLACE_POSIX_OPENPT)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_PTSNAME''@|$(REPLACE_PTSNAME)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_PTSNAME_R''@|$(REPLACE_PTSNAME_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_PUTENV''@|$(REPLACE_PUTENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_QSORT_R''@|$(REPLACE_QSORT_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_RAND''@|$(REPLACE_RAND)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_RANDOM''@|$(REPLACE_RANDOM)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_RANDOM_R''@|$(REPLACE_RANDOM_R)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_REALLOC_FOR_REALLOC_GNU''@|$(REPLACE_REALLOC_FOR_REALLOC_GNU)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_REALLOC_FOR_REALLOC_POSIX''@|$(REPLACE_REALLOC_FOR_REALLOC_POSIX)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_REALLOCARRAY''@|$(REPLACE_REALLOCARRAY)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_REALPATH''@|$(REPLACE_REALPATH)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_SETENV''@|$(REPLACE_SETENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_SETSTATE''@|$(REPLACE_SETSTATE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOD''@|$(REPLACE_STRTOD)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOF''@|$(REPLACE_STRTOF)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOL''@|$(REPLACE_STRTOL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOLD''@|$(REPLACE_STRTOLD)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOLL''@|$(REPLACE_STRTOLL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOUL''@|$(REPLACE_STRTOUL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_STRTOULL''@|$(REPLACE_STRTOULL)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_UNSETENV''@|$(REPLACE_UNSETENV)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''REPLACE_WCTOMB''@|$(REPLACE_WCTOMB)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e 's|@''CAN_PRINT_STACK_TRACE''@|$(CAN_PRINT_STACK_TRACE)|g' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_stdlib_TRUE@ < $@-t2 > $@-t3 @gl_GNULIB_ENABLED_stdlib_TRUE@ $(AM_V_at)rm -f $@-t1 $@-t2 @gl_GNULIB_ENABLED_stdlib_TRUE@ $(AM_V_at)mv $@-t3 $@ # We need the following in order to create when the system # doesn't have one that works. @GL_GENERATE_STDNORETURN_H_TRUE@stdnoreturn.h: stdnoreturn.in.h $(top_builddir)/config.status $(_NORETURN_H) @GL_GENERATE_STDNORETURN_H_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @GL_GENERATE_STDNORETURN_H_TRUE@ -e '/definition of _Noreturn/r $(_NORETURN_H)' \ @GL_GENERATE_STDNORETURN_H_TRUE@ $(srcdir)/stdnoreturn.in.h > $@-t @GL_GENERATE_STDNORETURN_H_TRUE@ $(AM_V_at)mv $@-t $@ @GL_GENERATE_STDNORETURN_H_FALSE@stdnoreturn.h: $(top_builddir)/config.status @GL_GENERATE_STDNORETURN_H_FALSE@ rm -f $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_string_TRUE@string.h: string.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_string_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''NEXT_STRING_H''@|$(NEXT_STRING_H)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_EXPLICIT_BZERO''@/$(GL_GNULIB_EXPLICIT_BZERO)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_FFSL''@/$(GL_GNULIB_FFSL)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_FFSLL''@/$(GL_GNULIB_FFSLL)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSLEN''@/$(GL_GNULIB_MBSLEN)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSNLEN''@/$(GL_GNULIB_MBSNLEN)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSCHR''@/$(GL_GNULIB_MBSCHR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSRCHR''@/$(GL_GNULIB_MBSRCHR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSSTR''@/$(GL_GNULIB_MBSSTR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSCASECMP''@/$(GL_GNULIB_MBSCASECMP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSNCASECMP''@/$(GL_GNULIB_MBSNCASECMP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSPCASECMP''@/$(GL_GNULIB_MBSPCASECMP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSCASESTR''@/$(GL_GNULIB_MBSCASESTR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSCSPN''@/$(GL_GNULIB_MBSCSPN)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSPBRK''@/$(GL_GNULIB_MBSPBRK)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSSPN''@/$(GL_GNULIB_MBSSPN)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSSEP''@/$(GL_GNULIB_MBSSEP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MBSTOK_R''@/$(GL_GNULIB_MBSTOK_R)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MEMCHR''@/$(GL_GNULIB_MEMCHR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MEMMEM''@/$(GL_GNULIB_MEMMEM)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MEMPCPY''@/$(GL_GNULIB_MEMPCPY)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MEMRCHR''@/$(GL_GNULIB_MEMRCHR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MEMSET_EXPLICIT''@/$(GL_GNULIB_MEMSET_EXPLICIT)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_RAWMEMCHR''@/$(GL_GNULIB_RAWMEMCHR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STPCPY''@/$(GL_GNULIB_STPCPY)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STPNCPY''@/$(GL_GNULIB_STPNCPY)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRCHRNUL''@/$(GL_GNULIB_STRCHRNUL)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRDUP''@/$(GL_GNULIB_STRDUP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRNCAT''@/$(GL_GNULIB_STRNCAT)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRNDUP''@/$(GL_GNULIB_STRNDUP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRNLEN''@/$(GL_GNULIB_STRNLEN)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRPBRK''@/$(GL_GNULIB_STRPBRK)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRSEP''@/$(GL_GNULIB_STRSEP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRSTR''@/$(GL_GNULIB_STRSTR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRCASESTR''@/$(GL_GNULIB_STRCASESTR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRTOK_R''@/$(GL_GNULIB_STRTOK_R)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRERROR''@/$(GL_GNULIB_STRERROR)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRERROR_R''@/$(GL_GNULIB_STRERROR_R)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRERRORNAME_NP''@/$(GL_GNULIB_STRERRORNAME_NP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_SIGABBREV_NP''@/$(GL_GNULIB_SIGABBREV_NP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_SIGDESCR_NP''@/$(GL_GNULIB_SIGDESCR_NP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRSIGNAL''@/$(GL_GNULIB_STRSIGNAL)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_STRVERSCMP''@/$(GL_GNULIB_STRVERSCMP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MDA_MEMCCPY''@/$(GL_GNULIB_MDA_MEMCCPY)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_MDA_STRDUP''@/$(GL_GNULIB_MDA_STRDUP)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's/@''GNULIB_FREE_POSIX''@/$(GL_GNULIB_FREE_POSIX)/g' \ @gl_GNULIB_ENABLED_string_TRUE@ < $(srcdir)/string.in.h > $@-t1 @gl_GNULIB_ENABLED_string_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_EXPLICIT_BZERO''@|$(HAVE_EXPLICIT_BZERO)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_FFSL''@|$(HAVE_FFSL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_FFSLL''@|$(HAVE_FFSLL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_MBSLEN''@|$(HAVE_MBSLEN)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_MEMMEM''@|$(HAVE_DECL_MEMMEM)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_MEMPCPY''@|$(HAVE_MEMPCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_MEMRCHR''@|$(HAVE_DECL_MEMRCHR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_MEMSET_EXPLICIT''@|$(HAVE_MEMSET_EXPLICIT)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_RAWMEMCHR''@|$(HAVE_RAWMEMCHR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STPCPY''@|$(HAVE_STPCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STPNCPY''@|$(HAVE_STPNCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRCHRNUL''@|$(HAVE_STRCHRNUL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRDUP''@|$(HAVE_DECL_STRDUP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRNDUP''@|$(HAVE_DECL_STRNDUP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRNLEN''@|$(HAVE_DECL_STRNLEN)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRPBRK''@|$(HAVE_STRPBRK)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRSEP''@|$(HAVE_STRSEP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRCASESTR''@|$(HAVE_STRCASESTR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRTOK_R''@|$(HAVE_DECL_STRTOK_R)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRERROR_R''@|$(HAVE_DECL_STRERROR_R)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRERRORNAME_NP''@|$(HAVE_STRERRORNAME_NP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_SIGABBREV_NP''@|$(HAVE_SIGABBREV_NP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_SIGDESCR_NP''@|$(HAVE_SIGDESCR_NP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_DECL_STRSIGNAL''@|$(HAVE_DECL_STRSIGNAL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''HAVE_STRVERSCMP''@|$(HAVE_STRVERSCMP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_FFSLL''@|$(REPLACE_FFSLL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_MEMCHR''@|$(REPLACE_MEMCHR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_MEMMEM''@|$(REPLACE_MEMMEM)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_MEMPCPY''@|$(REPLACE_MEMPCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_MEMSET_EXPLICIT''@|$(REPLACE_MEMSET_EXPLICIT)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_FREE''@|$(REPLACE_FREE)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STPCPY''@|$(REPLACE_STPCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STPNCPY''@|$(REPLACE_STPNCPY)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRCHRNUL''@|$(REPLACE_STRCHRNUL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRDUP''@|$(REPLACE_STRDUP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRNCAT''@|$(REPLACE_STRNCAT)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRNDUP''@|$(REPLACE_STRNDUP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRNLEN''@|$(REPLACE_STRNLEN)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRSTR''@|$(REPLACE_STRSTR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRCASESTR''@|$(REPLACE_STRCASESTR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRTOK_R''@|$(REPLACE_STRTOK_R)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRERROR''@|$(REPLACE_STRERROR)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRERROR_R''@|$(REPLACE_STRERROR_R)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRERRORNAME_NP''@|$(REPLACE_STRERRORNAME_NP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRSIGNAL''@|$(REPLACE_STRSIGNAL)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''REPLACE_STRVERSCMP''@|$(REPLACE_STRVERSCMP)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e 's|@''UNDEFINE_STRTOK_R''@|$(UNDEFINE_STRTOK_R)|g' \ @gl_GNULIB_ENABLED_string_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_string_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_string_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_string_TRUE@ < $@-t1 > $@-t2 @gl_GNULIB_ENABLED_string_TRUE@ $(AM_V_at)rm -f $@-t1 @gl_GNULIB_ENABLED_string_TRUE@ $(AM_V_at)mv $@-t2 $@ # We need the following in order to create when the system # has one that is incomplete. @gl_GNULIB_ENABLED_sys_stat_TRUE@sys/stat.h: sys_stat.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_sys_stat_TRUE@ $(AM_V_GEN)$(MKDIR_P) 'sys' @gl_GNULIB_ENABLED_sys_stat_TRUE@ $(AM_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''NEXT_SYS_STAT_H''@|$(NEXT_SYS_STAT_H)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''WINDOWS_64_BIT_ST_SIZE''@|$(WINDOWS_64_BIT_ST_SIZE)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''WINDOWS_STAT_TIMESPEC''@|$(WINDOWS_STAT_TIMESPEC)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_CHMOD''@/$(GL_GNULIB_CHMOD)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_FCHMODAT''@/$(GL_GNULIB_FCHMODAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_FSTAT''@/$(GL_GNULIB_FSTAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_FSTATAT''@/$(GL_GNULIB_FSTATAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_FUTIMENS''@/$(GL_GNULIB_FUTIMENS)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_GETUMASK''@/$(GL_GNULIB_GETUMASK)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_LCHMOD''@/$(GL_GNULIB_LCHMOD)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_LSTAT''@/$(GL_GNULIB_LSTAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKDIR''@/$(GL_GNULIB_MKDIR)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKDIRAT''@/$(GL_GNULIB_MKDIRAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKFIFO''@/$(GL_GNULIB_MKFIFO)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKFIFOAT''@/$(GL_GNULIB_MKFIFOAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKNOD''@/$(GL_GNULIB_MKNOD)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MKNODAT''@/$(GL_GNULIB_MKNODAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_STAT''@/$(GL_GNULIB_STAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_UTIMENSAT''@/$(GL_GNULIB_UTIMENSAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_OVERRIDES_STRUCT_STAT''@/$(GL_GNULIB_OVERRIDES_STRUCT_STAT)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MDA_CHMOD''@/$(GL_GNULIB_MDA_CHMOD)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MDA_MKDIR''@/$(GL_GNULIB_MDA_MKDIR)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's/@''GNULIB_MDA_UMASK''@/$(GL_GNULIB_MDA_UMASK)/g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_FCHMODAT''@|$(HAVE_FCHMODAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_FSTATAT''@|$(HAVE_FSTATAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_FUTIMENS''@|$(HAVE_FUTIMENS)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_GETUMASK''@|$(HAVE_GETUMASK)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_LCHMOD''@|$(HAVE_LCHMOD)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_LSTAT''@|$(HAVE_LSTAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_MKDIRAT''@|$(HAVE_MKDIRAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_MKFIFO''@|$(HAVE_MKFIFO)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_MKFIFOAT''@|$(HAVE_MKFIFOAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_MKNOD''@|$(HAVE_MKNOD)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_MKNODAT''@|$(HAVE_MKNODAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''HAVE_UTIMENSAT''@|$(HAVE_UTIMENSAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_CHMOD''@|$(REPLACE_CHMOD)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_FCHMODAT''@|$(REPLACE_FCHMODAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_FSTAT''@|$(REPLACE_FSTAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_FSTATAT''@|$(REPLACE_FSTATAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_FUTIMENS''@|$(REPLACE_FUTIMENS)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_LSTAT''@|$(REPLACE_LSTAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_MKDIR''@|$(REPLACE_MKDIR)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_MKFIFO''@|$(REPLACE_MKFIFO)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_MKFIFOAT''@|$(REPLACE_MKFIFOAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_MKNOD''@|$(REPLACE_MKNOD)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_MKNODAT''@|$(REPLACE_MKNODAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_STAT''@|$(REPLACE_STAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e 's|@''REPLACE_UTIMENSAT''@|$(REPLACE_UTIMENSAT)|g' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_sys_stat_TRUE@ $(srcdir)/sys_stat.in.h > $@-t @gl_GNULIB_ENABLED_sys_stat_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. sys/types.h: sys_types.in.h $(top_builddir)/config.status $(AM_V_GEN)$(MKDIR_P) 'sys' $(AM_V_at)$(SED_HEADER_STDOUT) \ -e 's|@''GUARD_PREFIX''@|GL|g' \ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ -e 's|@''NEXT_SYS_TYPES_H''@|$(NEXT_SYS_TYPES_H)|g' \ -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \ -e 's|@''HAVE_OFF64_T''@|$(HAVE_OFF64_T)|g' \ -e 's|@''WINDOWS_STAT_INODES''@|$(WINDOWS_STAT_INODES)|g' \ $(srcdir)/sys_types.in.h > $@-t $(AM_V_at)mv $@-t $@ # We need the following in order to create when the system # doesn't have one that works with the given compiler. @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@time.h: time.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''NEXT_TIME_H''@|$(NEXT_TIME_H)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_CTIME''@/$(GL_GNULIB_CTIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_LOCALTIME''@/$(GL_GNULIB_LOCALTIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_MKTIME''@/$(GL_GNULIB_MKTIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_NANOSLEEP''@/$(GL_GNULIB_NANOSLEEP)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_STRFTIME''@/$(GL_GNULIB_STRFTIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_STRPTIME''@/$(GL_GNULIB_STRPTIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIME''@/$(GL_GNULIB_TIME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIMEGM''@/$(GL_GNULIB_TIMEGM)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIMESPEC_GET''@/$(GL_GNULIB_TIMESPEC_GET)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIMESPEC_GETRES''@/$(GL_GNULIB_TIMESPEC_GETRES)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIME_R''@/$(GL_GNULIB_TIME_R)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TIME_RZ''@/$(GL_GNULIB_TIME_RZ)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TZNAME''@/$(GL_GNULIB_TZNAME)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_TZSET''@/$(GL_GNULIB_TZSET)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's/@''GNULIB_MDA_TZSET''@/$(GL_GNULIB_MDA_TZSET)/g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_DECL_LOCALTIME_R''@|$(HAVE_DECL_LOCALTIME_R)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_NANOSLEEP''@|$(HAVE_NANOSLEEP)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_STRPTIME''@|$(HAVE_STRPTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_TIMEGM''@|$(HAVE_TIMEGM)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_TIMESPEC_GET''@|$(HAVE_TIMESPEC_GET)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_TIMESPEC_GETRES''@|$(HAVE_TIMESPEC_GETRES)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''HAVE_TIMEZONE_T''@|$(HAVE_TIMEZONE_T)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_CTIME''@|$(REPLACE_CTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_GMTIME''@|$(REPLACE_GMTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_LOCALTIME''@|$(REPLACE_LOCALTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_LOCALTIME_R''@|$(REPLACE_LOCALTIME_R)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_MKTIME''@|$(REPLACE_MKTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_NANOSLEEP''@|$(REPLACE_NANOSLEEP)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_STRFTIME''@|$(REPLACE_STRFTIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_TIME''@|$(REPLACE_TIME)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_TIMEGM''@|$(REPLACE_TIMEGM)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_TIMESPEC_GET''@|$(REPLACE_TIMESPEC_GET)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_TIMESPEC_GETRES''@|$(REPLACE_TIMESPEC_GETRES)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''REPLACE_TZSET''@|$(REPLACE_TZSET)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''PTHREAD_H_DEFINES_STRUCT_TIMESPEC''@|$(PTHREAD_H_DEFINES_STRUCT_TIMESPEC)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''SYS_TIME_H_DEFINES_STRUCT_TIMESPEC''@|$(SYS_TIME_H_DEFINES_STRUCT_TIMESPEC)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''TIME_H_DEFINES_STRUCT_TIMESPEC''@|$(TIME_H_DEFINES_STRUCT_TIMESPEC)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''UNISTD_H_DEFINES_STRUCT_TIMESPEC''@|$(UNISTD_H_DEFINES_STRUCT_TIMESPEC)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e 's|@''TIME_H_DEFINES_TIME_UTC''@|$(TIME_H_DEFINES_TIME_UTC)|g' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ $(srcdir)/time.in.h > $@-t @gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd_TRUE@ $(AM_V_at)mv $@-t $@ # We need the following in order to create an empty placeholder for # when the system doesn't have one. @gl_GNULIB_ENABLED_unistd_TRUE@unistd.h: unistd.in.h $(top_builddir)/config.status $(CXXDEFS_H) $(ARG_NONNULL_H) $(WARN_ON_USE_H) @gl_GNULIB_ENABLED_unistd_TRUE@ $(gl_V_at)$(SED_HEADER_STDOUT) \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''GUARD_PREFIX''@|GL|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_UNISTD_H''@|$(HAVE_UNISTD_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''INCLUDE_NEXT''@|$(INCLUDE_NEXT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''PRAGMA_SYSTEM_HEADER''@|@PRAGMA_SYSTEM_HEADER@|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''PRAGMA_COLUMNS''@|@PRAGMA_COLUMNS@|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''NEXT_UNISTD_H''@|$(NEXT_UNISTD_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''WINDOWS_64_BIT_OFF_T''@|$(WINDOWS_64_BIT_OFF_T)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_ACCESS''@/$(GL_GNULIB_ACCESS)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_CHDIR''@/$(GL_GNULIB_CHDIR)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_CHOWN''@/$(GL_GNULIB_CHOWN)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_CLOSE''@/$(GL_GNULIB_CLOSE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_COPY_FILE_RANGE''@/$(GL_GNULIB_COPY_FILE_RANGE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_DUP''@/$(GL_GNULIB_DUP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_DUP2''@/$(GL_GNULIB_DUP2)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_DUP3''@/$(GL_GNULIB_DUP3)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_ENVIRON''@/$(GL_GNULIB_ENVIRON)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EUIDACCESS''@/$(GL_GNULIB_EUIDACCESS)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECL''@/$(GL_GNULIB_EXECL)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECLE''@/$(GL_GNULIB_EXECLE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECLP''@/$(GL_GNULIB_EXECLP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECV''@/$(GL_GNULIB_EXECV)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECVE''@/$(GL_GNULIB_EXECVE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECVP''@/$(GL_GNULIB_EXECVP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_EXECVPE''@/$(GL_GNULIB_EXECVPE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FACCESSAT''@/$(GL_GNULIB_FACCESSAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FCHDIR''@/$(GL_GNULIB_FCHDIR)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FCHOWNAT''@/$(GL_GNULIB_FCHOWNAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FDATASYNC''@/$(GL_GNULIB_FDATASYNC)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FSYNC''@/$(GL_GNULIB_FSYNC)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_FTRUNCATE''@/$(GL_GNULIB_FTRUNCATE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ < $(srcdir)/unistd.in.h > $@-t1 @gl_GNULIB_ENABLED_unistd_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETCWD''@/$(GL_GNULIB_GETCWD)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETDOMAINNAME''@/$(GL_GNULIB_GETDOMAINNAME)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETDTABLESIZE''@/$(GL_GNULIB_GETDTABLESIZE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETENTROPY''@/$(GL_GNULIB_GETENTROPY)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETGROUPS''@/$(GL_GNULIB_GETGROUPS)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETHOSTNAME''@/$(GL_GNULIB_GETHOSTNAME)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETLOGIN''@/$(GL_GNULIB_GETLOGIN)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETLOGIN_R''@/$(GL_GNULIB_GETLOGIN_R)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETOPT_POSIX''@/$(GL_GNULIB_GETOPT_POSIX)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETPAGESIZE''@/$(GL_GNULIB_GETPAGESIZE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETPASS''@/$(GL_GNULIB_GETPASS)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETPASS_GNU''@/$(GL_GNULIB_GETPASS_GNU)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GETUSERSHELL''@/$(GL_GNULIB_GETUSERSHELL)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_GROUP_MEMBER''@/$(GL_GNULIB_GROUP_MEMBER)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_ISATTY''@/$(GL_GNULIB_ISATTY)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_LCHOWN''@/$(GL_GNULIB_LCHOWN)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_LINK''@/$(GL_GNULIB_LINK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_LINKAT''@/$(GL_GNULIB_LINKAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_LSEEK''@/$(GL_GNULIB_LSEEK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_PIPE''@/$(GL_GNULIB_PIPE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_PIPE2''@/$(GL_GNULIB_PIPE2)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_PREAD''@/$(GL_GNULIB_PREAD)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_PWRITE''@/$(GL_GNULIB_PWRITE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_READ''@/$(GL_GNULIB_READ)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_READLINK''@/$(GL_GNULIB_READLINK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_READLINKAT''@/$(GL_GNULIB_READLINKAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_RMDIR''@/$(GL_GNULIB_RMDIR)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_SETHOSTNAME''@/$(GL_GNULIB_SETHOSTNAME)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_SLEEP''@/$(GL_GNULIB_SLEEP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_SYMLINK''@/$(GL_GNULIB_SYMLINK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_SYMLINKAT''@/$(GL_GNULIB_SYMLINKAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_TRUNCATE''@/$(GL_GNULIB_TRUNCATE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_TTYNAME_R''@/$(GL_GNULIB_TTYNAME_R)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_UNISTD_H_GETOPT''@/0$(GL_GNULIB_UNISTD_H_GETOPT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_UNISTD_H_NONBLOCKING''@/$(GL_GNULIB_UNISTD_H_NONBLOCKING)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_UNISTD_H_SIGPIPE''@/$(GL_GNULIB_UNISTD_H_SIGPIPE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_UNLINK''@/$(GL_GNULIB_UNLINK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_UNLINKAT''@/$(GL_GNULIB_UNLINKAT)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_USLEEP''@/$(GL_GNULIB_USLEEP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_WRITE''@/$(GL_GNULIB_WRITE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_ACCESS''@/$(GL_GNULIB_MDA_ACCESS)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_CHDIR''@/$(GL_GNULIB_MDA_CHDIR)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_CLOSE''@/$(GL_GNULIB_MDA_CLOSE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_DUP''@/$(GL_GNULIB_MDA_DUP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_DUP2''@/$(GL_GNULIB_MDA_DUP2)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECL''@/$(GL_GNULIB_MDA_EXECL)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECLE''@/$(GL_GNULIB_MDA_EXECLE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECLP''@/$(GL_GNULIB_MDA_EXECLP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECV''@/$(GL_GNULIB_MDA_EXECV)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECVE''@/$(GL_GNULIB_MDA_EXECVE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECVP''@/$(GL_GNULIB_MDA_EXECVP)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_EXECVPE''@/$(GL_GNULIB_MDA_EXECVPE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_GETCWD''@/$(GL_GNULIB_MDA_GETCWD)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_GETPID''@/$(GL_GNULIB_MDA_GETPID)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_ISATTY''@/$(GL_GNULIB_MDA_ISATTY)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_LSEEK''@/$(GL_GNULIB_MDA_LSEEK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_READ''@/$(GL_GNULIB_MDA_READ)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_RMDIR''@/$(GL_GNULIB_MDA_RMDIR)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_SWAB''@/$(GL_GNULIB_MDA_SWAB)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_UNLINK''@/$(GL_GNULIB_MDA_UNLINK)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's/@''GNULIB_MDA_WRITE''@/$(GL_GNULIB_MDA_WRITE)/g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ < $@-t1 > $@-t2 @gl_GNULIB_ENABLED_unistd_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_CHOWN''@|$(HAVE_CHOWN)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_COPY_FILE_RANGE''@|$(HAVE_COPY_FILE_RANGE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DUP3''@|$(HAVE_DUP3)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_EUIDACCESS''@|$(HAVE_EUIDACCESS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_EXECVPE''@|$(HAVE_EXECVPE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FACCESSAT''@|$(HAVE_FACCESSAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FCHDIR''@|$(HAVE_FCHDIR)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FCHOWNAT''@|$(HAVE_FCHOWNAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FDATASYNC''@|$(HAVE_FDATASYNC)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FSYNC''@|$(HAVE_FSYNC)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_FTRUNCATE''@|$(HAVE_FTRUNCATE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETDTABLESIZE''@|$(HAVE_GETDTABLESIZE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETENTROPY''@|$(HAVE_GETENTROPY)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETGROUPS''@|$(HAVE_GETGROUPS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETHOSTNAME''@|$(HAVE_GETHOSTNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETPAGESIZE''@|$(HAVE_GETPAGESIZE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GETPASS''@|$(HAVE_GETPASS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_GROUP_MEMBER''@|$(HAVE_GROUP_MEMBER)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_LCHOWN''@|$(HAVE_LCHOWN)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_LINK''@|$(HAVE_LINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_LINKAT''@|$(HAVE_LINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_PIPE''@|$(HAVE_PIPE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_PIPE2''@|$(HAVE_PIPE2)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_PREAD''@|$(HAVE_PREAD)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_PWRITE''@|$(HAVE_PWRITE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_READLINK''@|$(HAVE_READLINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_READLINKAT''@|$(HAVE_READLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_SETHOSTNAME''@|$(HAVE_SETHOSTNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_SLEEP''@|$(HAVE_SLEEP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_SYMLINK''@|$(HAVE_SYMLINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_SYMLINKAT''@|$(HAVE_SYMLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_UNLINKAT''@|$(HAVE_UNLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_USLEEP''@|$(HAVE_USLEEP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_ENVIRON''@|$(HAVE_DECL_ENVIRON)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_EXECVPE''@|$(HAVE_DECL_EXECVPE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_FCHDIR''@|$(HAVE_DECL_FCHDIR)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_FDATASYNC''@|$(HAVE_DECL_FDATASYNC)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_GETDOMAINNAME''@|$(HAVE_DECL_GETDOMAINNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_GETLOGIN''@|$(HAVE_DECL_GETLOGIN)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_GETLOGIN_R''@|$(HAVE_DECL_GETLOGIN_R)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_GETPAGESIZE''@|$(HAVE_DECL_GETPAGESIZE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_GETUSERSHELL''@|$(HAVE_DECL_GETUSERSHELL)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_SETHOSTNAME''@|$(HAVE_DECL_SETHOSTNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_TRUNCATE''@|$(HAVE_DECL_TRUNCATE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_DECL_TTYNAME_R''@|$(HAVE_DECL_TTYNAME_R)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_OS_H''@|$(HAVE_OS_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''HAVE_SYS_PARAM_H''@|$(HAVE_SYS_PARAM_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ < $@-t2 > $@-t3 @gl_GNULIB_ENABLED_unistd_TRUE@ $(AM_V_at)sed \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_ACCESS''@|$(REPLACE_ACCESS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_CHOWN''@|$(REPLACE_CHOWN)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_CLOSE''@|$(REPLACE_CLOSE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_COPY_FILE_RANGE''@|$(REPLACE_COPY_FILE_RANGE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_DUP''@|$(REPLACE_DUP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_DUP2''@|$(REPLACE_DUP2)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_DUP3''@|$(REPLACE_DUP3)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECL''@|$(REPLACE_EXECL)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECLE''@|$(REPLACE_EXECLE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECLP''@|$(REPLACE_EXECLP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECV''@|$(REPLACE_EXECV)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECVE''@|$(REPLACE_EXECVE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECVP''@|$(REPLACE_EXECVP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_EXECVPE''@|$(REPLACE_EXECVPE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_FACCESSAT''@|$(REPLACE_FACCESSAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_FCHDIR''@|$(REPLACE_FCHDIR)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_FCHOWNAT''@|$(REPLACE_FCHOWNAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_FDATASYNC''@|$(REPLACE_FDATASYNC)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_FTRUNCATE''@|$(REPLACE_FTRUNCATE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETCWD''@|$(REPLACE_GETCWD)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETDOMAINNAME''@|$(REPLACE_GETDOMAINNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETDTABLESIZE''@|$(REPLACE_GETDTABLESIZE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETENTROPY''@|$(REPLACE_GETENTROPY)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETLOGIN_R''@|$(REPLACE_GETLOGIN_R)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETGROUPS''@|$(REPLACE_GETGROUPS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETPAGESIZE''@|$(REPLACE_GETPAGESIZE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETPASS''@|$(REPLACE_GETPASS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETPASS_FOR_GETPASS_GNU''@|$(REPLACE_GETPASS_FOR_GETPASS_GNU)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_GETUSERSHELL''@|$(REPLACE_GETUSERSHELL)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_ISATTY''@|$(REPLACE_ISATTY)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_LCHOWN''@|$(REPLACE_LCHOWN)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_LINK''@|$(REPLACE_LINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_LINKAT''@|$(REPLACE_LINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_LSEEK''@|$(REPLACE_LSEEK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_PIPE2''@|$(REPLACE_PIPE2)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_PREAD''@|$(REPLACE_PREAD)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_PWRITE''@|$(REPLACE_PWRITE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_READ''@|$(REPLACE_READ)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_READLINK''@|$(REPLACE_READLINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_READLINKAT''@|$(REPLACE_READLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_RMDIR''@|$(REPLACE_RMDIR)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_SETHOSTNAME''@|$(REPLACE_SETHOSTNAME)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_SLEEP''@|$(REPLACE_SLEEP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_SYMLINK''@|$(REPLACE_SYMLINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_SYMLINKAT''@|$(REPLACE_SYMLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_TRUNCATE''@|$(REPLACE_TRUNCATE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_TTYNAME_R''@|$(REPLACE_TTYNAME_R)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_UNLINK''@|$(REPLACE_UNLINK)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_UNLINKAT''@|$(REPLACE_UNLINKAT)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_USLEEP''@|$(REPLACE_USLEEP)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''REPLACE_WRITE''@|$(REPLACE_WRITE)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''UNISTD_H_HAVE_SYS_RANDOM_H''@|$(UNISTD_H_HAVE_SYS_RANDOM_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H''@|$(UNISTD_H_HAVE_WINSOCK2_H)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e 's|@''UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS''@|$(UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS)|g' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e '/definitions of _GL_FUNCDECL_RPL/r $(CXXDEFS_H)' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e '/definition of _GL_ARG_NONNULL/r $(ARG_NONNULL_H)' \ @gl_GNULIB_ENABLED_unistd_TRUE@ -e '/definition of _GL_WARN_ON_USE/r $(WARN_ON_USE_H)' \ @gl_GNULIB_ENABLED_unistd_TRUE@ < $@-t3 > $@-t4 @gl_GNULIB_ENABLED_unistd_TRUE@ $(AM_V_at)rm -f $@-t1 $@-t2 $@-t3 @gl_GNULIB_ENABLED_unistd_TRUE@ $(AM_V_at)mv $@-t4 $@ mostlyclean-local: mostlyclean-generic @for dir in '' $(MOSTLYCLEANDIRS); do \ if test -n "$$dir" && test -d $$dir; then \ echo "rmdir $$dir"; rmdir $$dir; \ fi; \ done; \ : distclean-local: distclean-gnulib-libobjs distclean-gnulib-libobjs: -rm -f @gl_LIBOBJDEPS@ maintainer-clean-local: distclean-gnulib-libobjs # Tell versions [3.59,3.63) of GNU make to not export all variables. # Otherwise a system limit (for SysV at least) may be exceeded. .NOEXPORT: # Tell GNU make to disable its built-in pattern rules. %:: %,v %:: RCS/%,v %:: RCS/% %:: s.% %:: SCCS/s.% libffcall-2.5/gnulib-lib/stdio.in.h0000664000000000000000000023656114664171733014144 00000000000000/* A GNU-like . Copyright (C) 2004, 2007-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined __need_FILE || defined __need___FILE || defined _GL_ALREADY_INCLUDING_STDIO_H /* Special invocation convention: - Inside glibc header files. - On OSF/1 5.1 we have a sequence of nested includes -> -> -> -> -> -> -> . In this situation, the functions are not yet declared, therefore we cannot provide the C++ aliases. */ #@INCLUDE_NEXT@ @NEXT_STDIO_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_STDIO_H /* Suppress macOS deprecation warnings for sprintf and vsprintf. */ #if (defined __APPLE__ && defined __MACH__) && !defined _POSIX_C_SOURCE # ifdef __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ # include # endif # if (defined MAC_OS_X_VERSION_MIN_REQUIRED \ && 130000 <= MAC_OS_X_VERSION_MIN_REQUIRED) # define _POSIX_C_SOURCE 200809L # define _GL_DEFINED__POSIX_C_SOURCE # endif #endif #define _GL_ALREADY_INCLUDING_STDIO_H /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_STDIO_H@ #undef _GL_ALREADY_INCLUDING_STDIO_H #ifdef _GL_DEFINED__POSIX_C_SOURCE # undef _GL_DEFINED__POSIX_C_SOURCE # undef _POSIX_C_SOURCE #endif #ifndef _@GUARD_PREFIX@_STDIO_H #define _@GUARD_PREFIX@_STDIO_H /* This file uses _GL_ATTRIBUTE_DEALLOC, _GL_ATTRIBUTE_FORMAT, _GL_ATTRIBUTE_MALLOC, _GL_ATTRIBUTE_NODISCARD, _GL_ATTRIBUTE_NOTHROW, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Get va_list. Needed on many systems, including glibc 2.8. */ #include #include /* Get off_t and ssize_t. Needed on many systems, including glibc 2.8 and eglibc 2.11.2. May also define off_t to a 64-bit type on native Windows. Also defines off64_t on macOS, NetBSD, OpenBSD, MSVC, Cygwin, Haiku. */ #include /* Solaris 10 and NetBSD 7.0 declare renameat in , not in . */ /* But in any case avoid namespace pollution on glibc systems. */ #if (@GNULIB_RENAMEAT@ || defined GNULIB_POSIXCHECK) && (defined __sun || defined __NetBSD__) \ && ! defined __GLIBC__ # include #endif /* Android 4.3 declares renameat in , not in . */ /* But in any case avoid namespace pollution on glibc systems. */ #if (@GNULIB_RENAMEAT@ || defined GNULIB_POSIXCHECK) && defined __ANDROID__ \ && ! defined __GLIBC__ # include #endif /* MSVC declares 'perror' in , not in . We must include it before we #define perror rpl_perror. */ /* But in any case avoid namespace pollution on glibc systems. */ #if (@GNULIB_PERROR@ || defined GNULIB_POSIXCHECK) \ && (defined _WIN32 && ! defined __CYGWIN__) \ && ! defined __GLIBC__ # include #endif /* MSVC declares 'remove' in , not in . We must include it before we #define remove rpl_remove. */ /* MSVC declares 'rename' in , not in . We must include it before we #define rename rpl_rename. */ /* But in any case avoid namespace pollution on glibc systems. */ #if (@GNULIB_REMOVE@ || @GNULIB_RENAME@ || defined GNULIB_POSIXCHECK) \ && (defined _WIN32 && ! defined __CYGWIN__) \ && ! defined __GLIBC__ # include #endif /* _GL_ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. */ #ifndef _GL_ATTRIBUTE_DEALLOC # if __GNUC__ >= 11 && !defined __clang__ # define _GL_ATTRIBUTE_DEALLOC(f, i) __attribute__ ((__malloc__ (f, i))) # else # define _GL_ATTRIBUTE_DEALLOC(f, i) # endif #endif /* The __attribute__ feature is available in gcc versions 2.5 and later. The __-protected variants of the attributes 'format' and 'printf' are accepted by gcc versions 2.6.4 (effectively 2.7) and later. We enable _GL_ATTRIBUTE_FORMAT only if these are supported too, because gnulib and libintl do '#define printf __printf__' when they override the 'printf' function. */ #ifndef _GL_ATTRIBUTE_FORMAT # if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 7) || defined __clang__ # define _GL_ATTRIBUTE_FORMAT(spec) __attribute__ ((__format__ spec)) # else # define _GL_ATTRIBUTE_FORMAT(spec) /* empty */ # endif #endif /* _GL_ATTRIBUTE_MALLOC declares that the function returns a pointer to freshly allocated memory. */ #ifndef _GL_ATTRIBUTE_MALLOC # if __GNUC__ >= 3 || defined __clang__ # define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) # else # define _GL_ATTRIBUTE_MALLOC # endif #endif /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 2) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 3) || defined __clang__ # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* An __attribute__ __format__ specifier for a function that takes a format string and arguments, where the format string directives are the ones standardized by ISO C99 and POSIX. _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD */ /* __gnu_printf__ is supported in GCC >= 4.4. */ #if (__GNUC__ + (__GNUC_MINOR__ >= 4) > 4) && !defined __clang__ # define _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD __gnu_printf__ #else # define _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD __printf__ #endif /* An __attribute__ __format__ specifier for a function that takes a format string and arguments, where the format string directives are the ones of the system printf(), rather than the ones standardized by ISO C99 and POSIX. _GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM */ /* On mingw, Gnulib sets __USE_MINGW_ANSI_STDIO in order to get closer to the standards. The macro GNULIB_PRINTF_ATTRIBUTE_FLAVOR_GNU indicates whether this change is effective. On older mingw, it is not. */ #if GNULIB_PRINTF_ATTRIBUTE_FLAVOR_GNU # define _GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD #else # define _GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM __printf__ #endif /* _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD indicates to GCC that the function takes a format string and arguments, where the format string directives are the ones standardized by ISO C99 and POSIX. */ #define _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD(formatstring_parameter, first_argument) \ _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_STANDARD, formatstring_parameter, first_argument)) /* _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM is like _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD, except that it indicates to GCC that the supported format string directives are the ones of the system printf(), rather than the ones standardized by ISO C99 and POSIX. */ #define _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM(formatstring_parameter, first_argument) \ _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM, formatstring_parameter, first_argument)) /* _GL_ATTRIBUTE_FORMAT_SCANF indicates to GCC that the function takes a format string and arguments, where the format string directives are the ones standardized by ISO C99 and POSIX. */ #if __GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) # define _GL_ATTRIBUTE_FORMAT_SCANF(formatstring_parameter, first_argument) \ _GL_ATTRIBUTE_FORMAT ((__gnu_scanf__, formatstring_parameter, first_argument)) #else # define _GL_ATTRIBUTE_FORMAT_SCANF(formatstring_parameter, first_argument) \ _GL_ATTRIBUTE_FORMAT ((__scanf__, formatstring_parameter, first_argument)) #endif /* _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM is like _GL_ATTRIBUTE_FORMAT_SCANF, except that it indicates to GCC that the supported format string directives are the ones of the system scanf(), rather than the ones standardized by ISO C99 and POSIX. */ #define _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM(formatstring_parameter, first_argument) \ _GL_ATTRIBUTE_FORMAT ((__scanf__, formatstring_parameter, first_argument)) /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Macros for stringification. */ #define _GL_STDIO_STRINGIZE(token) #token #define _GL_STDIO_MACROEXPAND_AND_STRINGIZE(token) _GL_STDIO_STRINGIZE(token) /* When also using extern inline, suppress the use of static inline in standard headers of problematic Apple configurations, as Libc at least through Libc-825.26 (2013-04-09) mishandles it; see, e.g., . Perhaps Apple will fix this some day. */ #if (defined _GL_EXTERN_INLINE_IN_USE && defined __APPLE__ \ && defined __GNUC__ && defined __STDC__) # undef putc_unlocked #endif /* Maximum number of characters produced by printing a NaN value. */ #ifndef _PRINTF_NAN_LEN_MAX # if defined __FreeBSD__ || defined __DragonFly__ \ || defined __NetBSD__ \ || (defined __APPLE__ && defined __MACH__) /* On BSD systems, a NaN value prints as just "nan", without a sign. */ # define _PRINTF_NAN_LEN_MAX 3 # elif (__GLIBC__ >= 2) || MUSL_LIBC || defined __OpenBSD__ || defined __sun || defined __CYGWIN__ /* glibc, musl libc, OpenBSD, Solaris libc, and Cygwin produce "[-]nan". */ # define _PRINTF_NAN_LEN_MAX 4 # elif defined _AIX /* AIX produces "[-]NaNQ". */ # define _PRINTF_NAN_LEN_MAX 5 # elif defined _WIN32 && !defined __CYGWIN__ /* On native Windows, the output can be: - with MSVC ucrt: "[-]nan" or "[-]nan(ind)" or "[-]nan(snan)", - with mingw: "[-]1.#IND" or "[-]1.#QNAN". */ # define _PRINTF_NAN_LEN_MAX 10 # elif defined __sgi /* On IRIX, the output typically is "[-]nan0xNNNNNNNN" with 8 hexadecimal digits. */ # define _PRINTF_NAN_LEN_MAX 14 # else /* We don't know, but 32 should be a safe maximum. */ # define _PRINTF_NAN_LEN_MAX 32 # endif #endif #if @GNULIB_DZPRINTF@ /* Prints formatted output to file descriptor FD. Returns the number of bytes written to the file descriptor. Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure codes are ENOMEM and the possible failure codes from write(), excluding EINTR. */ _GL_FUNCDECL_SYS (dzprintf, off64_t, (int fd, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_SYS (dzprintf, off64_t, (int fd, const char *restrict format, ...)); #endif #if @GNULIB_DPRINTF@ /* Prints formatted output to file descriptor FD. Returns the number of bytes written to the file descriptor. Upon failure, returns a negative value. */ # if @REPLACE_DPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define dprintf rpl_dprintf # endif _GL_FUNCDECL_RPL (dprintf, int, (int fd, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (dprintf, int, (int fd, const char *restrict format, ...)); # else # if !@HAVE_DPRINTF@ _GL_FUNCDECL_SYS (dprintf, int, (int fd, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (dprintf, int, (int fd, const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (dprintf); # endif #elif defined GNULIB_POSIXCHECK # undef dprintf # if HAVE_RAW_DECL_DPRINTF _GL_WARN_ON_USE (dprintf, "dprintf is unportable - " "use gnulib module dprintf for portability"); # endif #endif #if @GNULIB_FCLOSE@ /* Close STREAM and its underlying file descriptor. */ # if @REPLACE_FCLOSE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define fclose rpl_fclose # endif _GL_FUNCDECL_RPL (fclose, int, (FILE *stream), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (fclose, int, (FILE *stream)); # else _GL_CXXALIAS_SYS (fclose, int, (FILE *stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fclose); # endif #elif defined GNULIB_POSIXCHECK # undef fclose /* Assume fclose is always declared. */ _GL_WARN_ON_USE (fclose, "fclose is not always POSIX compliant - " "use gnulib module fclose for portable POSIX compliance"); #endif #if @GNULIB_MDA_FCLOSEALL@ /* On native Windows, map 'fcloseall' to '_fcloseall', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::fcloseall on all platforms that have it. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fcloseall # define fcloseall _fcloseall # endif _GL_CXXALIAS_MDA (fcloseall, int, (void)); # else # if @HAVE_DECL_FCLOSEALL@ # if defined __FreeBSD__ || defined __DragonFly__ _GL_CXXALIAS_SYS (fcloseall, void, (void)); # else _GL_CXXALIAS_SYS (fcloseall, int, (void)); # endif # endif # endif # if (defined _WIN32 && !defined __CYGWIN__) || @HAVE_DECL_FCLOSEALL@ _GL_CXXALIASWARN (fcloseall); # endif #endif #if @GNULIB_FDOPEN@ # if @REPLACE_FDOPEN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fdopen # define fdopen rpl_fdopen # endif _GL_FUNCDECL_RPL (fdopen, FILE *, (int fd, const char *mode), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fdopen, FILE *, (int fd, const char *mode)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fdopen # define fdopen _fdopen # endif _GL_CXXALIAS_MDA (fdopen, FILE *, (int fd, const char *mode)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate fdopen with fclose or rpl_fclose. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (fdopen, FILE *, (int fd, const char *mode), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (fdopen, FILE *, (int fd, const char *mode), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (fdopen, FILE *, (int fd, const char *mode)); # endif _GL_CXXALIASWARN (fdopen); #else # if @GNULIB_FCLOSE@ && (__GNUC__ >= 11 && !defined __clang__) && !defined fdopen /* For -Wmismatched-dealloc: Associate fdopen with fclose or rpl_fclose. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (fdopen, FILE *, (int fd, const char *mode), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (fdopen, FILE *, (int fd, const char *mode), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC); # endif # endif # if defined GNULIB_POSIXCHECK # undef fdopen /* Assume fdopen is always declared. */ _GL_WARN_ON_USE (fdopen, "fdopen on native Windows platforms is not POSIX compliant - " "use gnulib module fdopen for portability"); # elif @GNULIB_MDA_FDOPEN@ /* On native Windows, map 'fdopen' to '_fdopen', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::fdopen always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fdopen # define fdopen _fdopen # endif _GL_CXXALIAS_MDA (fdopen, FILE *, (int fd, const char *mode)); # else _GL_CXXALIAS_SYS (fdopen, FILE *, (int fd, const char *mode)); # endif _GL_CXXALIASWARN (fdopen); # endif #endif #if @GNULIB_FFLUSH@ /* Flush all pending data on STREAM according to POSIX rules. Both output and seekable input streams are supported. Note! LOSS OF DATA can occur if fflush is applied on an input stream that is _not_seekable_ or on an update stream that is _not_seekable_ and in which the most recent operation was input. Seekability can be tested with lseek(fileno(fp),0,SEEK_CUR). */ # if @REPLACE_FFLUSH@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define fflush rpl_fflush # endif _GL_FUNCDECL_RPL (fflush, int, (FILE *gl_stream)); _GL_CXXALIAS_RPL (fflush, int, (FILE *gl_stream)); # else _GL_CXXALIAS_SYS (fflush, int, (FILE *gl_stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fflush); # endif #elif defined GNULIB_POSIXCHECK # undef fflush /* Assume fflush is always declared. */ _GL_WARN_ON_USE (fflush, "fflush is not always POSIX compliant - " "use gnulib module fflush for portable POSIX compliance"); #endif #if @GNULIB_FGETC@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fgetc # define fgetc rpl_fgetc # endif _GL_FUNCDECL_RPL (fgetc, int, (FILE *stream), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (fgetc, int, (FILE *stream)); # else _GL_CXXALIAS_SYS (fgetc, int, (FILE *stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fgetc); # endif #endif #if @GNULIB_FGETS@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fgets # define fgets rpl_fgets # endif _GL_FUNCDECL_RPL (fgets, char *, (char *restrict s, int n, FILE *restrict stream), _GL_ARG_NONNULL ((1, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fgets, char *, (char *restrict s, int n, FILE *restrict stream)); # else _GL_CXXALIAS_SYS (fgets, char *, (char *restrict s, int n, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fgets); # endif #endif #if @GNULIB_MDA_FILENO@ /* On native Windows, map 'fileno' to '_fileno', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::fileno always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fileno # define fileno _fileno # endif _GL_CXXALIAS_MDA (fileno, int, (FILE *restrict stream)); # else _GL_CXXALIAS_SYS (fileno, int, (FILE *restrict stream)); # endif _GL_CXXALIASWARN (fileno); #endif #if @GNULIB_FOPEN@ # if (@GNULIB_FOPEN@ && @REPLACE_FOPEN@) \ || (@GNULIB_FOPEN_GNU@ && @REPLACE_FOPEN_FOR_FOPEN_GNU@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fopen # define fopen rpl_fopen # endif _GL_FUNCDECL_RPL (fopen, FILE *, (const char *restrict filename, const char *restrict mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fopen, FILE *, (const char *restrict filename, const char *restrict mode)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate fopen with fclose or rpl_fclose. */ _GL_FUNCDECL_SYS (fopen, FILE *, (const char *restrict filename, const char *restrict mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (fopen, FILE *, (const char *restrict filename, const char *restrict mode)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fopen); # endif #else # if @GNULIB_FCLOSE@ && (__GNUC__ >= 11 && !defined __clang__) && !defined fopen /* For -Wmismatched-dealloc: Associate fopen with fclose or rpl_fclose. */ _GL_FUNCDECL_SYS (fopen, FILE *, (const char *restrict filename, const char *restrict mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (fclose, 1)); # endif # if defined GNULIB_POSIXCHECK # undef fopen /* Assume fopen is always declared. */ _GL_WARN_ON_USE (fopen, "fopen on native Windows platforms is not POSIX compliant - " "use gnulib module fopen for portability"); # endif #endif #if @GNULIB_FZPRINTF@ /* Prints formatted output to stream FP. Returns the number of bytes written to the stream. Upon failure, returns -1 with the stream's error indicator set. Failure cause EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure causes are ENOMEM and the possible failure causes from fwrite(). */ _GL_FUNCDECL_SYS (fzprintf, off64_t, (FILE *restrict fp, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (fzprintf, off64_t, (FILE *restrict fp, const char *restrict format, ...)); #endif #if @GNULIB_FPRINTF_POSIX@ || @GNULIB_FPRINTF@ /* Prints formatted output to stream FP. Returns the number of bytes written to the stream. Upon failure, returns a negative value with the stream's error indicator set. */ # if (@GNULIB_FPRINTF_POSIX@ && @REPLACE_FPRINTF@) \ || (@GNULIB_FPRINTF@ && @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@)) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define fprintf rpl_fprintf # endif # define GNULIB_overrides_fprintf 1 # if @GNULIB_FPRINTF_POSIX@ || @GNULIB_VFPRINTF_POSIX@ _GL_FUNCDECL_RPL (fprintf, int, (FILE *restrict fp, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); # else _GL_FUNCDECL_RPL (fprintf, int, (FILE *restrict fp, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM (2, 3) _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_RPL (fprintf, int, (FILE *restrict fp, const char *restrict format, ...)); # else _GL_CXXALIAS_SYS (fprintf, int, (FILE *restrict fp, const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fprintf); # endif #endif #if !@GNULIB_FPRINTF_POSIX@ && defined GNULIB_POSIXCHECK # if !GNULIB_overrides_fprintf # undef fprintf # endif /* Assume fprintf is always declared. */ _GL_WARN_ON_USE (fprintf, "fprintf is not always POSIX compliant - " "use gnulib module fprintf-posix for portable " "POSIX compliance"); #endif #if @GNULIB_FPURGE@ /* Discard all pending buffered I/O data on STREAM. STREAM must not be wide-character oriented. When discarding pending output, the file position is set back to where it was before the write calls. When discarding pending input, the file position is advanced to match the end of the previously read input. Return 0 if successful. Upon error, return -1 and set errno. */ # if @REPLACE_FPURGE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define fpurge rpl_fpurge # endif _GL_FUNCDECL_RPL (fpurge, int, (FILE *gl_stream), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (fpurge, int, (FILE *gl_stream)); # else # if !@HAVE_DECL_FPURGE@ _GL_FUNCDECL_SYS (fpurge, int, (FILE *gl_stream), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (fpurge, int, (FILE *gl_stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fpurge); # endif #elif defined GNULIB_POSIXCHECK # undef fpurge # if HAVE_RAW_DECL_FPURGE _GL_WARN_ON_USE (fpurge, "fpurge is not always present - " "use gnulib module fpurge for portability"); # endif #endif #if @GNULIB_FPUTC@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fputc # define fputc rpl_fputc # endif _GL_FUNCDECL_RPL (fputc, int, (int c, FILE *stream), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (fputc, int, (int c, FILE *stream)); # else _GL_CXXALIAS_SYS (fputc, int, (int c, FILE *stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fputc); # endif #endif #if @GNULIB_FPUTS@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fputs # define fputs rpl_fputs # endif _GL_FUNCDECL_RPL (fputs, int, (const char *restrict string, FILE *restrict stream), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (fputs, int, (const char *restrict string, FILE *restrict stream)); # else _GL_CXXALIAS_SYS (fputs, int, (const char *restrict string, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fputs); # endif #endif #if @GNULIB_FREAD@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fread # define fread rpl_fread # endif _GL_FUNCDECL_RPL (fread, size_t, (void *restrict ptr, size_t s, size_t n, FILE *restrict stream), _GL_ARG_NONNULL ((4)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fread, size_t, (void *restrict ptr, size_t s, size_t n, FILE *restrict stream)); # else _GL_CXXALIAS_SYS (fread, size_t, (void *restrict ptr, size_t s, size_t n, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fread); # endif #endif #if @GNULIB_FREOPEN@ # if @REPLACE_FREOPEN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef freopen # define freopen rpl_freopen # endif _GL_FUNCDECL_RPL (freopen, FILE *, (const char *restrict filename, const char *restrict mode, FILE *restrict stream), _GL_ARG_NONNULL ((2, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (freopen, FILE *, (const char *restrict filename, const char *restrict mode, FILE *restrict stream)); # else _GL_CXXALIAS_SYS (freopen, FILE *, (const char *restrict filename, const char *restrict mode, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (freopen); # endif #elif defined GNULIB_POSIXCHECK # undef freopen /* Assume freopen is always declared. */ _GL_WARN_ON_USE (freopen, "freopen on native Windows platforms is not POSIX compliant - " "use gnulib module freopen for portability"); #endif #if @GNULIB_FSCANF@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fscanf # define fscanf rpl_fscanf # endif _GL_FUNCDECL_RPL (fscanf, int, (FILE *restrict stream, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM (2, 3) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fscanf, int, (FILE *restrict stream, const char *restrict format, ...)); # else _GL_CXXALIAS_SYS (fscanf, int, (FILE *restrict stream, const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fscanf); # endif #endif /* Set up the following warnings, based on which modules are in use. GNU Coding Standards discourage the use of fseek, since it imposes an arbitrary limitation on some 32-bit hosts. Remember that the fseek module depends on the fseeko module, so we only have three cases to consider: 1. The developer is not using either module. Issue a warning under GNULIB_POSIXCHECK for both functions, to remind them that both functions have bugs on some systems. _GL_NO_LARGE_FILES has no impact on this warning. 2. The developer is using both modules. They may be unaware of the arbitrary limitations of fseek, so issue a warning under GNULIB_POSIXCHECK. On the other hand, they may be using both modules intentionally, so the developer can define _GL_NO_LARGE_FILES in the compilation units where the use of fseek is safe, to silence the warning. 3. The developer is using the fseeko module, but not fseek. Gnulib guarantees that fseek will still work around platform bugs in that case, but we presume that the developer is aware of the pitfalls of fseek and was trying to avoid it, so issue a warning even when GNULIB_POSIXCHECK is undefined. Again, _GL_NO_LARGE_FILES can be defined to silence the warning in particular compilation units. In C++ compilations with GNULIB_NAMESPACE, in order to avoid that fseek gets defined as a macro, it is recommended that the developer uses the fseek module, even if he is not calling the fseek function. Most gnulib clients that perform stream operations should fall into category 3. */ #if @GNULIB_FSEEK@ # if defined GNULIB_POSIXCHECK && !defined _GL_NO_LARGE_FILES # define _GL_FSEEK_WARN /* Category 2, above. */ # undef fseek # endif # if @REPLACE_FSEEK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fseek # define fseek rpl_fseek # endif _GL_FUNCDECL_RPL (fseek, int, (FILE *fp, long offset, int whence), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (fseek, int, (FILE *fp, long offset, int whence)); # else _GL_CXXALIAS_SYS (fseek, int, (FILE *fp, long offset, int whence)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fseek); # endif #endif #if @GNULIB_FSEEKO@ # if !@GNULIB_FSEEK@ && !defined _GL_NO_LARGE_FILES # define _GL_FSEEK_WARN /* Category 3, above. */ # undef fseek # endif # if @REPLACE_FSEEKO@ /* Provide an fseeko function that is aware of a preceding fflush(), and which detects pipes. */ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fseeko # define fseeko rpl_fseeko # endif _GL_FUNCDECL_RPL (fseeko, int, (FILE *fp, off_t offset, int whence), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (fseeko, int, (FILE *fp, off_t offset, int whence)); # else # if ! @HAVE_DECL_FSEEKO@ _GL_FUNCDECL_SYS (fseeko, int, (FILE *fp, off_t offset, int whence), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (fseeko, int, (FILE *fp, off_t offset, int whence)); # endif _GL_CXXALIASWARN (fseeko); #elif defined GNULIB_POSIXCHECK # define _GL_FSEEK_WARN /* Category 1, above. */ # undef fseek # undef fseeko # if HAVE_RAW_DECL_FSEEKO _GL_WARN_ON_USE (fseeko, "fseeko is unportable - " "use gnulib module fseeko for portability"); # endif #endif #ifdef _GL_FSEEK_WARN # undef _GL_FSEEK_WARN /* Here, either fseek is undefined (but C89 guarantees that it is declared), or it is defined as rpl_fseek (declared above). */ _GL_WARN_ON_USE (fseek, "fseek cannot handle files larger than 4 GB " "on 32-bit platforms - " "use fseeko function for handling of large files"); #endif /* ftell, ftello. See the comments on fseek/fseeko. */ #if @GNULIB_FTELL@ # if defined GNULIB_POSIXCHECK && !defined _GL_NO_LARGE_FILES # define _GL_FTELL_WARN /* Category 2, above. */ # undef ftell # endif # if @REPLACE_FTELL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ftell # define ftell rpl_ftell # endif _GL_FUNCDECL_RPL (ftell, long, (FILE *fp), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (ftell, long, (FILE *fp)); # else _GL_CXXALIAS_SYS (ftell, long, (FILE *fp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (ftell); # endif #endif #if @GNULIB_FTELLO@ # if !@GNULIB_FTELL@ && !defined _GL_NO_LARGE_FILES # define _GL_FTELL_WARN /* Category 3, above. */ # undef ftell # endif # if @REPLACE_FTELLO@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ftello # define ftello rpl_ftello # endif _GL_FUNCDECL_RPL (ftello, off_t, (FILE *fp), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (ftello, off_t, (FILE *fp)); # else # if ! @HAVE_DECL_FTELLO@ _GL_FUNCDECL_SYS (ftello, off_t, (FILE *fp), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (ftello, off_t, (FILE *fp)); # endif _GL_CXXALIASWARN (ftello); #elif defined GNULIB_POSIXCHECK # define _GL_FTELL_WARN /* Category 1, above. */ # undef ftell # undef ftello # if HAVE_RAW_DECL_FTELLO _GL_WARN_ON_USE (ftello, "ftello is unportable - " "use gnulib module ftello for portability"); # endif #endif #ifdef _GL_FTELL_WARN # undef _GL_FTELL_WARN /* Here, either ftell is undefined (but C89 guarantees that it is declared), or it is defined as rpl_ftell (declared above). */ _GL_WARN_ON_USE (ftell, "ftell cannot handle files larger than 4 GB " "on 32-bit platforms - " "use ftello function for handling of large files"); #endif #if @GNULIB_FWRITE@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fwrite # define fwrite rpl_fwrite # endif _GL_FUNCDECL_RPL (fwrite, size_t, (const void *restrict ptr, size_t s, size_t n, FILE *restrict stream), _GL_ARG_NONNULL ((1, 4))); _GL_CXXALIAS_RPL (fwrite, size_t, (const void *restrict ptr, size_t s, size_t n, FILE *restrict stream)); # else _GL_CXXALIAS_SYS (fwrite, size_t, (const void *restrict ptr, size_t s, size_t n, FILE *restrict stream)); /* Work around bug 11959 when fortifying glibc 2.4 through 2.15 , which sometimes causes an unwanted diagnostic for fwrite calls. This affects only function declaration attributes under certain versions of gcc and clang, and is not needed for C++. */ # if (0 < __USE_FORTIFY_LEVEL \ && __GLIBC__ == 2 && 4 <= __GLIBC_MINOR__ && __GLIBC_MINOR__ <= 15 \ && (3 < __GNUC__ + (4 <= __GNUC_MINOR__) || defined __clang__) \ && !defined __cplusplus) # undef fwrite # undef fwrite_unlocked _GL_EXTERN_C size_t __REDIRECT (rpl_fwrite, (const void *__restrict, size_t, size_t, FILE *__restrict), fwrite); _GL_EXTERN_C size_t __REDIRECT (rpl_fwrite_unlocked, (const void *__restrict, size_t, size_t, FILE *__restrict), fwrite_unlocked); # define fwrite rpl_fwrite # define fwrite_unlocked rpl_fwrite_unlocked # endif # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fwrite); # endif #endif #if @GNULIB_GETC@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getc # define getc rpl_fgetc # endif _GL_FUNCDECL_RPL (fgetc, int, (FILE *stream), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL_1 (getc, rpl_fgetc, int, (FILE *stream)); # else _GL_CXXALIAS_SYS (getc, int, (FILE *stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getc); # endif #endif #if @GNULIB_GETCHAR@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getchar # define getchar rpl_getchar # endif _GL_FUNCDECL_RPL (getchar, int, (void)); _GL_CXXALIAS_RPL (getchar, int, (void)); # else _GL_CXXALIAS_SYS (getchar, int, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getchar); # endif #endif #if @GNULIB_GETDELIM@ /* Read input, up to (and including) the next occurrence of DELIMITER, from STREAM, store it in *LINEPTR (and NUL-terminate it). *LINEPTR is a pointer returned from malloc (or NULL), pointing to *LINESIZE bytes of space. It is realloc'd as necessary. Return the number of bytes read and stored at *LINEPTR (not including the NUL terminator), or -1 on error or EOF. */ # if @REPLACE_GETDELIM@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getdelim # define getdelim rpl_getdelim # endif _GL_FUNCDECL_RPL (getdelim, ssize_t, (char **restrict lineptr, size_t *restrict linesize, int delimiter, FILE *restrict stream), _GL_ARG_NONNULL ((1, 2, 4)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getdelim, ssize_t, (char **restrict lineptr, size_t *restrict linesize, int delimiter, FILE *restrict stream)); # else # if !@HAVE_DECL_GETDELIM@ _GL_FUNCDECL_SYS (getdelim, ssize_t, (char **restrict lineptr, size_t *restrict linesize, int delimiter, FILE *restrict stream), _GL_ARG_NONNULL ((1, 2, 4)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getdelim, ssize_t, (char **restrict lineptr, size_t *restrict linesize, int delimiter, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getdelim); # endif #elif defined GNULIB_POSIXCHECK # undef getdelim # if HAVE_RAW_DECL_GETDELIM _GL_WARN_ON_USE (getdelim, "getdelim is unportable - " "use gnulib module getdelim for portability"); # endif #endif #if @GNULIB_GETLINE@ /* Read a line, up to (and including) the next newline, from STREAM, store it in *LINEPTR (and NUL-terminate it). *LINEPTR is a pointer returned from malloc (or NULL), pointing to *LINESIZE bytes of space. It is realloc'd as necessary. Return the number of bytes read and stored at *LINEPTR (not including the NUL terminator), or -1 on error or EOF. */ # if @REPLACE_GETLINE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getline # define getline rpl_getline # endif _GL_FUNCDECL_RPL (getline, ssize_t, (char **restrict lineptr, size_t *restrict linesize, FILE *restrict stream), _GL_ARG_NONNULL ((1, 2, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getline, ssize_t, (char **restrict lineptr, size_t *restrict linesize, FILE *restrict stream)); # else # if !@HAVE_DECL_GETLINE@ _GL_FUNCDECL_SYS (getline, ssize_t, (char **restrict lineptr, size_t *restrict linesize, FILE *restrict stream), _GL_ARG_NONNULL ((1, 2, 3)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getline, ssize_t, (char **restrict lineptr, size_t *restrict linesize, FILE *restrict stream)); # endif # if __GLIBC__ >= 2 && @HAVE_DECL_GETLINE@ _GL_CXXALIASWARN (getline); # endif #elif defined GNULIB_POSIXCHECK # undef getline # if HAVE_RAW_DECL_GETLINE _GL_WARN_ON_USE (getline, "getline is unportable - " "use gnulib module getline for portability"); # endif #endif /* It is very rare that the developer ever has full control of stdin, so any use of gets warrants an unconditional warning; besides, C11 removed it. */ #undef gets #if HAVE_RAW_DECL_GETS && !defined __cplusplus _GL_WARN_ON_USE (gets, "gets is a security hole - use fgets instead"); #endif #if @GNULIB_MDA_GETW@ /* On native Windows, map 'getw' to '_getw', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::getw always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getw # define getw _getw # endif _GL_CXXALIAS_MDA (getw, int, (FILE *restrict stream)); # else # if @HAVE_DECL_GETW@ # if defined __APPLE__ && defined __MACH__ /* The presence of the declaration depends on _POSIX_C_SOURCE. */ _GL_FUNCDECL_SYS (getw, int, (FILE *restrict stream)); # endif _GL_CXXALIAS_SYS (getw, int, (FILE *restrict stream)); # endif # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getw); # endif #endif #if @GNULIB_OBSTACK_ZPRINTF@ struct obstack; /* Grows an obstack with formatted output. Returns the number of bytes added to OBS. No trailing nul byte is added, and the object should be closed with obstack_finish before use. Upon memory allocation error, calls obstack_alloc_failed_handler. Upon other error, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is through obstack_alloc_failed_handler. */ _GL_FUNCDECL_SYS (obstack_zprintf, ptrdiff_t, (struct obstack *obs, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (obstack_zprintf, ptrdiff_t, (struct obstack *obs, const char *format, ...)); _GL_FUNCDECL_SYS (obstack_vzprintf, ptrdiff_t, (struct obstack *obs, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (obstack_vzprintf, ptrdiff_t, (struct obstack *obs, const char *format, va_list args)); #endif #if @GNULIB_OBSTACK_PRINTF@ || @GNULIB_OBSTACK_PRINTF_POSIX@ struct obstack; /* Grows an obstack with formatted output. Returns the number of bytes added to OBS. No trailing nul byte is added, and the object should be closed with obstack_finish before use. Upon memory allocation error, calls obstack_alloc_failed_handler. Upon other error, returns -1. */ # if @REPLACE_OBSTACK_PRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define obstack_printf rpl_obstack_printf # endif _GL_FUNCDECL_RPL (obstack_printf, int, (struct obstack *obs, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (obstack_printf, int, (struct obstack *obs, const char *format, ...)); # else # if !@HAVE_DECL_OBSTACK_PRINTF@ _GL_FUNCDECL_SYS (obstack_printf, int, (struct obstack *obs, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (obstack_printf, int, (struct obstack *obs, const char *format, ...)); # endif _GL_CXXALIASWARN (obstack_printf); # if @REPLACE_OBSTACK_PRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define obstack_vprintf rpl_obstack_vprintf # endif _GL_FUNCDECL_RPL (obstack_vprintf, int, (struct obstack *obs, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (obstack_vprintf, int, (struct obstack *obs, const char *format, va_list args)); # else # if !@HAVE_DECL_OBSTACK_PRINTF@ _GL_FUNCDECL_SYS (obstack_vprintf, int, (struct obstack *obs, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (obstack_vprintf, int, (struct obstack *obs, const char *format, va_list args)); # endif _GL_CXXALIASWARN (obstack_vprintf); #endif #if @GNULIB_PCLOSE@ # if !@HAVE_PCLOSE@ _GL_FUNCDECL_SYS (pclose, int, (FILE *stream), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pclose, int, (FILE *stream)); _GL_CXXALIASWARN (pclose); #elif defined GNULIB_POSIXCHECK # undef pclose # if HAVE_RAW_DECL_PCLOSE _GL_WARN_ON_USE (pclose, "pclose is unportable - " "use gnulib module pclose for more portability"); # endif #endif #if @GNULIB_PERROR@ /* Print a message to standard error, describing the value of ERRNO, (if STRING is not NULL and not empty) prefixed with STRING and ": ", and terminated with a newline. */ # if @REPLACE_PERROR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define perror rpl_perror # endif _GL_FUNCDECL_RPL (perror, void, (const char *string)); _GL_CXXALIAS_RPL (perror, void, (const char *string)); # else _GL_CXXALIAS_SYS (perror, void, (const char *string)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (perror); # endif #elif defined GNULIB_POSIXCHECK # undef perror /* Assume perror is always declared. */ _GL_WARN_ON_USE (perror, "perror is not always POSIX compliant - " "use gnulib module perror for portability"); #endif #if @GNULIB_POPEN@ # if @REPLACE_POPEN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef popen # define popen rpl_popen # endif _GL_FUNCDECL_RPL (popen, FILE *, (const char *cmd, const char *mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (pclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (popen, FILE *, (const char *cmd, const char *mode)); # else # if !@HAVE_POPEN@ || (__GNUC__ >= 11 && !defined __clang__) _GL_FUNCDECL_SYS (popen, FILE *, (const char *cmd, const char *mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (pclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (popen, FILE *, (const char *cmd, const char *mode)); # endif _GL_CXXALIASWARN (popen); #else # if @GNULIB_PCLOSE@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined popen /* For -Wmismatched-dealloc: Associate popen with pclose or rpl_pclose. */ _GL_FUNCDECL_SYS (popen, FILE *, (const char *cmd, const char *mode), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_DEALLOC (pclose, 1) _GL_ATTRIBUTE_MALLOC); # endif # if defined GNULIB_POSIXCHECK # undef popen # if HAVE_RAW_DECL_POPEN _GL_WARN_ON_USE (popen, "popen is buggy on some platforms - " "use gnulib module popen or pipe for more portability"); # endif # endif #endif #if @GNULIB_ZPRINTF@ /* Prints formatted output to standard output. Returns the number of bytes written to standard output. Upon failure, returns -1 with stdout's error indicator set. Failure cause EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure causes are ENOMEM and the possible failure causes from fwrite(). */ _GL_FUNCDECL_SYS (zprintf, off64_t, (const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (1, 2) _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_SYS (zprintf, off64_t, (const char *restrict format, ...)); #endif #if @GNULIB_PRINTF_POSIX@ || @GNULIB_PRINTF@ /* Prints formatted output to standard output. Returns the number of bytes written to standard output. Upon failure, returns a negative value with stdout's error indicator set. */ # if (@GNULIB_PRINTF_POSIX@ && @REPLACE_PRINTF@) \ || (@GNULIB_PRINTF@ && @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@)) # if defined __GNUC__ || defined __clang__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) /* Don't break __attribute__((format(printf,M,N))). */ # define printf __printf__ # endif # if @GNULIB_PRINTF_POSIX@ || @GNULIB_VFPRINTF_POSIX@ _GL_FUNCDECL_RPL_1 (__printf__, int, (const char *restrict format, ...) __asm__ (@ASM_SYMBOL_PREFIX@ _GL_STDIO_MACROEXPAND_AND_STRINGIZE(rpl_printf)), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (1, 2) _GL_ARG_NONNULL ((1))); # else _GL_FUNCDECL_RPL_1 (__printf__, int, (const char *restrict format, ...) __asm__ (@ASM_SYMBOL_PREFIX@ _GL_STDIO_MACROEXPAND_AND_STRINGIZE(rpl_printf)), _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM (1, 2) _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_RPL_1 (printf, __printf__, int, (const char *format, ...)); # else # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define printf rpl_printf # endif _GL_FUNCDECL_RPL (printf, int, (const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (1, 2) _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (printf, int, (const char *restrict format, ...)); # endif # define GNULIB_overrides_printf 1 # else _GL_CXXALIAS_SYS (printf, int, (const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (printf); # endif #endif #if !@GNULIB_PRINTF_POSIX@ && defined GNULIB_POSIXCHECK # if !GNULIB_overrides_printf # undef printf # endif /* Assume printf is always declared. */ _GL_WARN_ON_USE (printf, "printf is not always POSIX compliant - " "use gnulib module printf-posix for portable " "POSIX compliance"); #endif #if @GNULIB_PUTC@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putc # define putc rpl_fputc # endif _GL_FUNCDECL_RPL (fputc, int, (int c, FILE *stream), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL_1 (putc, rpl_fputc, int, (int c, FILE *stream)); # else _GL_CXXALIAS_SYS (putc, int, (int c, FILE *stream)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (putc); # endif #endif #if @GNULIB_PUTCHAR@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putchar # define putchar rpl_putchar # endif _GL_FUNCDECL_RPL (putchar, int, (int c)); _GL_CXXALIAS_RPL (putchar, int, (int c)); # else _GL_CXXALIAS_SYS (putchar, int, (int c)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (putchar); # endif #endif #if @GNULIB_PUTS@ # if @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef puts # define puts rpl_puts # endif _GL_FUNCDECL_RPL (puts, int, (const char *string), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (puts, int, (const char *string)); # else _GL_CXXALIAS_SYS (puts, int, (const char *string)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (puts); # endif #endif #if @GNULIB_MDA_PUTW@ /* On native Windows, map 'putw' to '_putw', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::putw always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putw # define putw _putw # endif _GL_CXXALIAS_MDA (putw, int, (int w, FILE *restrict stream)); # else # if @HAVE_DECL_PUTW@ # if defined __APPLE__ && defined __MACH__ /* The presence of the declaration depends on _POSIX_C_SOURCE. */ _GL_FUNCDECL_SYS (putw, int, (int w, FILE *restrict stream)); # endif _GL_CXXALIAS_SYS (putw, int, (int w, FILE *restrict stream)); # endif # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (putw); # endif #endif #if @GNULIB_REMOVE@ # if @REPLACE_REMOVE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef remove # define remove rpl_remove # endif _GL_FUNCDECL_RPL (remove, int, (const char *name), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (remove, int, (const char *name)); # else _GL_CXXALIAS_SYS (remove, int, (const char *name)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (remove); # endif #elif defined GNULIB_POSIXCHECK # undef remove /* Assume remove is always declared. */ _GL_WARN_ON_USE (remove, "remove cannot handle directories on some platforms - " "use gnulib module remove for more portability"); #endif #if @GNULIB_RENAME@ # if @REPLACE_RENAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef rename # define rename rpl_rename # endif _GL_FUNCDECL_RPL (rename, int, (const char *old_filename, const char *new_filename), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (rename, int, (const char *old_filename, const char *new_filename)); # else _GL_CXXALIAS_SYS (rename, int, (const char *old_filename, const char *new_filename)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (rename); # endif #elif defined GNULIB_POSIXCHECK # undef rename /* Assume rename is always declared. */ _GL_WARN_ON_USE (rename, "rename is buggy on some platforms - " "use gnulib module rename for more portability"); #endif #if @GNULIB_RENAMEAT@ # if @REPLACE_RENAMEAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef renameat # define renameat rpl_renameat # endif _GL_FUNCDECL_RPL (renameat, int, (int fd1, char const *file1, int fd2, char const *file2), _GL_ARG_NONNULL ((2, 4))); _GL_CXXALIAS_RPL (renameat, int, (int fd1, char const *file1, int fd2, char const *file2)); # else # if !@HAVE_RENAMEAT@ _GL_FUNCDECL_SYS (renameat, int, (int fd1, char const *file1, int fd2, char const *file2), _GL_ARG_NONNULL ((2, 4))); # endif _GL_CXXALIAS_SYS (renameat, int, (int fd1, char const *file1, int fd2, char const *file2)); # endif _GL_CXXALIASWARN (renameat); #elif defined GNULIB_POSIXCHECK # undef renameat # if HAVE_RAW_DECL_RENAMEAT _GL_WARN_ON_USE (renameat, "renameat is not portable - " "use gnulib module renameat for portability"); # endif #endif #if @GNULIB_SCANF@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if defined __GNUC__ || defined __clang__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef scanf /* Don't break __attribute__((format(scanf,M,N))). */ # define scanf __scanf__ # endif _GL_FUNCDECL_RPL_1 (__scanf__, int, (const char *restrict format, ...) __asm__ (@ASM_SYMBOL_PREFIX@ _GL_STDIO_MACROEXPAND_AND_STRINGIZE(rpl_scanf)), _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM (1, 2) _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL_1 (scanf, __scanf__, int, (const char *restrict format, ...)); # else # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef scanf # define scanf rpl_scanf # endif _GL_FUNCDECL_RPL (scanf, int, (const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM (1, 2) _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (scanf, int, (const char *restrict format, ...)); # endif # else _GL_CXXALIAS_SYS (scanf, int, (const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (scanf); # endif #endif #if @GNULIB_SNZPRINTF@ /* Prints formatted output to string STR. Similar to sprintf, but the additional parameter SIZE limits how much is written into STR. STR may be NULL, in which case nothing will be written. Returns the string length of the formatted string (which may be larger than SIZE). Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is ENOMEM. */ _GL_FUNCDECL_SYS (snzprintf, ptrdiff_t, (char *restrict str, size_t size, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 4) _GL_ARG_NONNULL ((3))); _GL_CXXALIAS_SYS (snzprintf, ptrdiff_t, (char *restrict str, size_t size, const char *restrict format, ...)); #endif #if @GNULIB_SNPRINTF@ /* Prints formatted output to string STR. Similar to sprintf, but the additional parameter SIZE limits how much is written into STR. STR may be NULL, in which case nothing will be written. Returns the string length of the formatted string (which may be larger than SIZE). Upon failure, returns a negative value. */ # if @REPLACE_SNPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define snprintf rpl_snprintf # endif # define GNULIB_overrides_snprintf 1 _GL_FUNCDECL_RPL (snprintf, int, (char *restrict str, size_t size, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 4) _GL_ARG_NONNULL ((3))); _GL_CXXALIAS_RPL (snprintf, int, (char *restrict str, size_t size, const char *restrict format, ...)); # else # if !@HAVE_DECL_SNPRINTF@ _GL_FUNCDECL_SYS (snprintf, int, (char *restrict str, size_t size, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 4) _GL_ARG_NONNULL ((3))); # endif _GL_CXXALIAS_SYS (snprintf, int, (char *restrict str, size_t size, const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (snprintf); # endif #elif defined GNULIB_POSIXCHECK # undef snprintf # if HAVE_RAW_DECL_SNPRINTF _GL_WARN_ON_USE (snprintf, "snprintf is unportable - " "use gnulib module snprintf for portability"); # endif #endif #if @GNULIB_SZPRINTF@ /* Prints formatted output to string STR. Returns the string length of the formatted string. Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is ENOMEM. */ _GL_FUNCDECL_SYS (szprintf, ptrdiff_t, (char *restrict str, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (szprintf, ptrdiff_t, (char *restrict str, const char *restrict format, ...)); #endif /* Some people would argue that all sprintf uses should be warned about (for example, OpenBSD issues a link warning for it), since it can cause security holes due to buffer overruns. However, we believe that sprintf can be used safely, and is more efficient than snprintf in those safe cases; and as proof of our belief, we use sprintf in several gnulib modules. So this header intentionally avoids adding a warning to sprintf except when GNULIB_POSIXCHECK is defined. */ #if @GNULIB_SPRINTF_POSIX@ /* Prints formatted output to string STR. Returns the string length of the formatted string. Upon failure, returns a negative value. */ # if @REPLACE_SPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define sprintf rpl_sprintf # endif # define GNULIB_overrides_sprintf 1 _GL_FUNCDECL_RPL (sprintf, int, (char *restrict str, const char *restrict format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (sprintf, int, (char *restrict str, const char *restrict format, ...)); # else _GL_CXXALIAS_SYS (sprintf, int, (char *restrict str, const char *restrict format, ...)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (sprintf); # endif #elif defined GNULIB_POSIXCHECK # undef sprintf /* Assume sprintf is always declared. */ _GL_WARN_ON_USE (sprintf, "sprintf is not always POSIX compliant - " "use gnulib module sprintf-posix for portable " "POSIX compliance"); #endif #if @GNULIB_MDA_TEMPNAM@ /* On native Windows, map 'tempnam' to '_tempnam', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::tempnam always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef tempnam # define tempnam _tempnam # endif _GL_CXXALIAS_MDA (tempnam, char *, (const char *dir, const char *prefix)); # else _GL_CXXALIAS_SYS (tempnam, char *, (const char *dir, const char *prefix)); # endif _GL_CXXALIASWARN (tempnam); #endif #if @GNULIB_TMPFILE@ # if @REPLACE_TMPFILE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define tmpfile rpl_tmpfile # endif _GL_FUNCDECL_RPL (tmpfile, FILE *, (void), _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (tmpfile, FILE *, (void)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate tmpfile with fclose or rpl_fclose. */ _GL_FUNCDECL_SYS (tmpfile, FILE *, (void), _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (tmpfile, FILE *, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (tmpfile); # endif #else # if @GNULIB_FCLOSE@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined tmpfile /* For -Wmismatched-dealloc: Associate tmpfile with fclose or rpl_fclose. */ _GL_FUNCDECL_SYS (tmpfile, FILE *, (void), _GL_ATTRIBUTE_DEALLOC (fclose, 1) _GL_ATTRIBUTE_MALLOC); # endif # if defined GNULIB_POSIXCHECK # undef tmpfile # if HAVE_RAW_DECL_TMPFILE _GL_WARN_ON_USE (tmpfile, "tmpfile is not usable on mingw - " "use gnulib module tmpfile for portability"); # endif # endif #endif #if @GNULIB_VASZPRINTF@ /* Prints formatted output to a string dynamically allocated with malloc(). If the memory allocation succeeds, it stores the address of the string in *RESULT and returns the number of resulting bytes, excluding the trailing NUL. Upon memory allocation error, or some other error, it returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is ENOMEM. */ _GL_FUNCDECL_SYS (aszprintf, ptrdiff_t, (char **result, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_SYS (aszprintf, ptrdiff_t, (char **result, const char *format, ...)); _GL_FUNCDECL_SYS (vaszprintf, ptrdiff_t, (char **result, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_SYS (vaszprintf, ptrdiff_t, (char **result, const char *format, va_list args)); #endif #if @GNULIB_VASPRINTF@ /* Write formatted output to a string dynamically allocated with malloc(). If the memory allocation succeeds, store the address of the string in *RESULT and return the number of resulting bytes, excluding the trailing NUL. Upon memory allocation error, or some other error, return -1. */ # if @REPLACE_VASPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define asprintf rpl_asprintf # endif # define GNULIB_overrides_asprintf _GL_FUNCDECL_RPL (asprintf, int, (char **result, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (asprintf, int, (char **result, const char *format, ...)); # else # if !@HAVE_VASPRINTF@ _GL_FUNCDECL_SYS (asprintf, int, (char **result, const char *format, ...), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 3) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (asprintf, int, (char **result, const char *format, ...)); # endif _GL_CXXALIASWARN (asprintf); # if @REPLACE_VASPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vasprintf rpl_vasprintf # endif # define GNULIB_overrides_vasprintf 1 _GL_FUNCDECL_RPL (vasprintf, int, (char **result, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (vasprintf, int, (char **result, const char *format, va_list args)); # else # if !@HAVE_VASPRINTF@ _GL_FUNCDECL_SYS (vasprintf, int, (char **result, const char *format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (vasprintf, int, (char **result, const char *format, va_list args)); # endif _GL_CXXALIASWARN (vasprintf); #endif #if @GNULIB_VDZPRINTF@ /* Prints formatted output to file descriptor FD. Returns the number of bytes written to the file descriptor. Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure codes are ENOMEM and the possible failure codes from write(), excluding EINTR. */ _GL_FUNCDECL_SYS (vdzprintf, off64_t, (int fd, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_SYS (vdzprintf, off64_t, (int fd, const char *restrict format, va_list args)); #endif #if @GNULIB_VDPRINTF@ /* Prints formatted output to file descriptor FD. Returns the number of bytes written to the file descriptor. Upon failure, returns a negative value. */ # if @REPLACE_VDPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vdprintf rpl_vdprintf # endif _GL_FUNCDECL_RPL (vdprintf, int, (int fd, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (vdprintf, int, (int fd, const char *restrict format, va_list args)); # else # if !@HAVE_VDPRINTF@ _GL_FUNCDECL_SYS (vdprintf, int, (int fd, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((2))); # endif /* Need to cast, because on Solaris, the third parameter will likely be __va_list args. */ _GL_CXXALIAS_SYS_CAST (vdprintf, int, (int fd, const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vdprintf); # endif #elif defined GNULIB_POSIXCHECK # undef vdprintf # if HAVE_RAW_DECL_VDPRINTF _GL_WARN_ON_USE (vdprintf, "vdprintf is unportable - " "use gnulib module vdprintf for portability"); # endif #endif #if @GNULIB_VFZPRINTF@ /* Prints formatted output to stream FP. Returns the number of bytes written to the stream. Upon failure, returns -1 with the stream's error indicator set. Failure cause EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure causes are ENOMEM and the possible failure causes from fwrite(). */ _GL_FUNCDECL_SYS (vfzprintf, off64_t, (FILE *restrict fp, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (vfzprintf, off64_t, (FILE *restrict fp, const char *restrict format, va_list args)); #endif #if @GNULIB_VFPRINTF_POSIX@ || @GNULIB_VFPRINTF@ /* Prints formatted output to stream FP. Returns the number of bytes written to the stream. Upon failure, returns a negative value with the stream's error indicator set. */ # if (@GNULIB_VFPRINTF_POSIX@ && @REPLACE_VFPRINTF@) \ || (@GNULIB_VFPRINTF@ && @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@)) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vfprintf rpl_vfprintf # endif # define GNULIB_overrides_vfprintf 1 # if @GNULIB_VFPRINTF_POSIX@ _GL_FUNCDECL_RPL (vfprintf, int, (FILE *restrict fp, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); # else _GL_FUNCDECL_RPL (vfprintf, int, (FILE *restrict fp, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM (2, 0) _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_RPL (vfprintf, int, (FILE *restrict fp, const char *restrict format, va_list args)); # else /* Need to cast, because on Solaris, the third parameter is __va_list args and GCC's fixincludes did not change this to __gnuc_va_list. */ _GL_CXXALIAS_SYS_CAST (vfprintf, int, (FILE *restrict fp, const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vfprintf); # endif #endif #if !@GNULIB_VFPRINTF_POSIX@ && defined GNULIB_POSIXCHECK # if !GNULIB_overrides_vfprintf # undef vfprintf # endif /* Assume vfprintf is always declared. */ _GL_WARN_ON_USE (vfprintf, "vfprintf is not always POSIX compliant - " "use gnulib module vfprintf-posix for portable " "POSIX compliance"); #endif #if @GNULIB_VFSCANF@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef vfscanf # define vfscanf rpl_vfscanf # endif _GL_FUNCDECL_RPL (vfscanf, int, (FILE *restrict stream, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM (2, 0) _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (vfscanf, int, (FILE *restrict stream, const char *restrict format, va_list args)); # else _GL_CXXALIAS_SYS (vfscanf, int, (FILE *restrict stream, const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vfscanf); # endif #endif #if @GNULIB_VZPRINTF@ /* Prints formatted output to standard output. Returns the number of bytes written to standard output. Upon failure, returns -1 with stdout's error indicator set. Failure cause EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure causes are ENOMEM and the possible failure causes from fwrite(). */ _GL_FUNCDECL_SYS (vzprintf, off64_t, (const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (1, 0) _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_SYS (vzprintf, off64_t, (const char *restrict format, va_list args)); #endif #if @GNULIB_VPRINTF_POSIX@ || @GNULIB_VPRINTF@ /* Prints formatted output to standard output. Returns the number of bytes written to standard output. Upon failure, returns a negative value with stdout's error indicator set. */ # if (@GNULIB_VPRINTF_POSIX@ && @REPLACE_VPRINTF@) \ || (@GNULIB_VPRINTF@ && @REPLACE_STDIO_WRITE_FUNCS@ && (@GNULIB_STDIO_H_NONBLOCKING@ || @GNULIB_STDIO_H_SIGPIPE@)) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vprintf rpl_vprintf # endif # define GNULIB_overrides_vprintf 1 # if @GNULIB_VPRINTF_POSIX@ || @GNULIB_VFPRINTF_POSIX@ _GL_FUNCDECL_RPL (vprintf, int, (const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (1, 0) _GL_ARG_NONNULL ((1))); # else _GL_FUNCDECL_RPL (vprintf, int, (const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_SYSTEM (1, 0) _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_RPL (vprintf, int, (const char *restrict format, va_list args)); # else /* Need to cast, because on Solaris, the second parameter is __va_list args and GCC's fixincludes did not change this to __gnuc_va_list. */ _GL_CXXALIAS_SYS_CAST (vprintf, int, (const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vprintf); # endif #endif #if !@GNULIB_VPRINTF_POSIX@ && defined GNULIB_POSIXCHECK # if !GNULIB_overrides_vprintf # undef vprintf # endif /* Assume vprintf is always declared. */ _GL_WARN_ON_USE (vprintf, "vprintf is not always POSIX compliant - " "use gnulib module vprintf-posix for portable " "POSIX compliance"); #endif #if @GNULIB_VSCANF@ # if @REPLACE_STDIO_READ_FUNCS@ && @GNULIB_STDIO_H_NONBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef vscanf # define vscanf rpl_vscanf # endif _GL_FUNCDECL_RPL (vscanf, int, (const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_SCANF_SYSTEM (1, 0) _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (vscanf, int, (const char *restrict format, va_list args)); # else _GL_CXXALIAS_SYS (vscanf, int, (const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vscanf); # endif #endif #if @GNULIB_VSNZPRINTF@ /* Prints formatted output to string STR. Similar to sprintf, but the additional parameter SIZE limits how much is written into STR. STR may be NULL, in which case nothing will be written. Returns the string length of the formatted string (which may be larger than SIZE). Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is ENOMEM. */ _GL_FUNCDECL_SYS (vsnzprintf, ptrdiff_t, (char *restrict str, size_t size, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 0) _GL_ARG_NONNULL ((3))); _GL_CXXALIAS_SYS (vsnzprintf, ptrdiff_t, (char *restrict str, size_t size, const char *restrict format, va_list args)); #endif #if @GNULIB_VSNPRINTF@ /* Prints formatted output to string STR. Similar to vsprintf, but the additional parameter SIZE limits how much is written into STR. STR may be NULL, in which case nothing will be written. Returns the string length of the formatted string (which may be larger than SIZE). Upon failure, returns a negative value. */ # if @REPLACE_VSNPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vsnprintf rpl_vsnprintf # endif # define GNULIB_overrides_vsnprintf 1 _GL_FUNCDECL_RPL (vsnprintf, int, (char *restrict str, size_t size, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 0) _GL_ARG_NONNULL ((3))); _GL_CXXALIAS_RPL (vsnprintf, int, (char *restrict str, size_t size, const char *restrict format, va_list args)); # else # if !@HAVE_DECL_VSNPRINTF@ _GL_FUNCDECL_SYS (vsnprintf, int, (char *restrict str, size_t size, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 0) _GL_ARG_NONNULL ((3))); # endif _GL_CXXALIAS_SYS (vsnprintf, int, (char *restrict str, size_t size, const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vsnprintf); # endif #elif defined GNULIB_POSIXCHECK # undef vsnprintf # if HAVE_RAW_DECL_VSNPRINTF _GL_WARN_ON_USE (vsnprintf, "vsnprintf is unportable - " "use gnulib module vsnprintf for portability"); # endif #endif #if @GNULIB_VSZPRINTF@ /* Prints formatted output to string STR. Returns the string length of the formatted string. Upon failure, returns -1 with errno set. Failure code EOVERFLOW can only occur when a width > INT_MAX is used. Therefore, if the format string is valid and does not use %ls/%lc directives nor widths, the only possible failure code is ENOMEM. */ _GL_FUNCDECL_SYS (vszprintf, ptrdiff_t, (char *restrict str, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (vszprintf, ptrdiff_t, (char *restrict str, const char *restrict format, va_list args)); #endif #if @GNULIB_VSPRINTF_POSIX@ /* Prints formatted output to string STR. Returns the string length of the formatted string. Upon failure, returns a negative value. */ # if @REPLACE_VSPRINTF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define vsprintf rpl_vsprintf # endif # define GNULIB_overrides_vsprintf 1 _GL_FUNCDECL_RPL (vsprintf, int, (char *restrict str, const char *restrict format, va_list args), _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (2, 0) _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (vsprintf, int, (char *restrict str, const char *restrict format, va_list args)); # else /* Need to cast, because on Solaris, the third parameter is __va_list args and GCC's fixincludes did not change this to __gnuc_va_list. */ _GL_CXXALIAS_SYS_CAST (vsprintf, int, (char *restrict str, const char *restrict format, va_list args)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (vsprintf); # endif #elif defined GNULIB_POSIXCHECK # undef vsprintf /* Assume vsprintf is always declared. */ _GL_WARN_ON_USE (vsprintf, "vsprintf is not always POSIX compliant - " "use gnulib module vsprintf-posix for portable " "POSIX compliance"); #endif #endif /* _@GUARD_PREFIX@_STDIO_H */ #endif /* _@GUARD_PREFIX@_STDIO_H */ #endif libffcall-2.5/gnulib-lib/rmdir.c0000664000000000000000000000316614631432055013505 00000000000000/* Work around rmdir bugs. Copyright (C) 1988, 1990, 1999, 2003-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #include #include #include #include "filename.h" #undef rmdir #if defined _WIN32 && !defined __CYGWIN__ # define rmdir _rmdir #endif /* Remove directory DIR. Return 0 if successful, -1 if not. */ int rpl_rmdir (char const *dir) { /* Work around cygwin 1.5.x bug where rmdir("dir/./") succeeds. */ size_t len = strlen (dir); int result; while (len && ISSLASH (dir[len - 1])) len--; if (len && dir[len - 1] == '.' && (1 == len || ISSLASH (dir[len - 2]))) { errno = EINVAL; return -1; } result = rmdir (dir); /* Work around mingw bug, where rmdir("file/") fails with EINVAL instead of ENOTDIR. We've already filtered out trailing ., the only reason allowed by POSIX for EINVAL. */ if (result == -1 && errno == EINVAL) errno = ENOTDIR; return result; } libffcall-2.5/gnulib-lib/windows-recmutex.c0000664000000000000000000000654214631432055015715 00000000000000/* Plain recursive mutexes (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #include /* Specification. */ #include "windows-recmutex.h" #include void glwthread_recmutex_init (glwthread_recmutex_t *mutex) { mutex->owner = 0; mutex->depth = 0; InitializeCriticalSection (&mutex->lock); mutex->guard.done = 1; } int glwthread_recmutex_lock (glwthread_recmutex_t *mutex) { if (!mutex->guard.done) { if (InterlockedIncrement (&mutex->guard.started) == 0) /* This thread is the first one to need this mutex. Initialize it. */ glwthread_recmutex_init (mutex); else { /* Don't let mutex->guard.started grow and wrap around. */ InterlockedDecrement (&mutex->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this mutex. */ while (!mutex->guard.done) Sleep (0); } } { DWORD self = GetCurrentThreadId (); if (mutex->owner != self) { EnterCriticalSection (&mutex->lock); mutex->owner = self; } if (++(mutex->depth) == 0) /* wraparound? */ { mutex->depth--; return EAGAIN; } } return 0; } int glwthread_recmutex_trylock (glwthread_recmutex_t *mutex) { if (!mutex->guard.done) { if (InterlockedIncrement (&mutex->guard.started) == 0) /* This thread is the first one to need this mutex. Initialize it. */ glwthread_recmutex_init (mutex); else { /* Don't let mutex->guard.started grow and wrap around. */ InterlockedDecrement (&mutex->guard.started); /* Let another thread finish initializing this mutex, and let it also lock this mutex. */ return EBUSY; } } { DWORD self = GetCurrentThreadId (); if (mutex->owner != self) { if (!TryEnterCriticalSection (&mutex->lock)) return EBUSY; mutex->owner = self; } if (++(mutex->depth) == 0) /* wraparound? */ { mutex->depth--; return EAGAIN; } } return 0; } int glwthread_recmutex_unlock (glwthread_recmutex_t *mutex) { if (mutex->owner != GetCurrentThreadId ()) return EPERM; if (mutex->depth == 0) return EINVAL; if (--(mutex->depth) == 0) { mutex->owner = 0; LeaveCriticalSection (&mutex->lock); } return 0; } int glwthread_recmutex_destroy (glwthread_recmutex_t *mutex) { if (mutex->owner != 0) return EBUSY; DeleteCriticalSection (&mutex->lock); mutex->guard.done = 0; return 0; } libffcall-2.5/gnulib-lib/sigaction.c0000664000000000000000000001613614631432055014351 00000000000000/* POSIX compatible signal blocking. Copyright (C) 2008-2024 Free Software Foundation, Inc. Written by Eric Blake , 2008. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #include #include #include /* This implementation of sigaction is tailored to native Windows behavior: signal() has SysV semantics (ie. the handler is uninstalled before it is invoked). This is an inherent data race if an asynchronous signal is sent twice in a row before we can reinstall our handler, but there's nothing we can do about it. Meanwhile, sigprocmask() is not present, and while we can use the gnulib replacement to provide critical sections, it too suffers from potential data races in the face of an ill-timed asynchronous signal. And we compound the situation by reading static storage in a signal handler, which POSIX warns is not generically async-signal-safe. Oh well. Additionally: - We don't implement SA_NOCLDSTOP or SA_NOCLDWAIT, because SIGCHLD is not defined. - We don't implement SA_ONSTACK, because sigaltstack() is not present. - We ignore SA_RESTART, because blocking native Windows API calls are not interrupted anyway when an asynchronous signal occurs, and the MSVCRT runtime never sets errno to EINTR. - We don't implement SA_SIGINFO because it is impossible to do so portably. POSIX states that an application should not mix signal() and sigaction(). We support the use of signal() within the gnulib sigprocmask() substitute, but all other application code linked with this module should stick with only sigaction(). */ /* Check some of our assumptions. */ #if defined SIGCHLD || defined HAVE_SIGALTSTACK || defined HAVE_SIGINTERRUPT # error "Revisit the assumptions made in the sigaction module" #endif /* Out-of-range substitutes make a good fallback for uncatchable signals. */ #ifndef SIGKILL # define SIGKILL (-1) #endif #ifndef SIGSTOP # define SIGSTOP (-1) #endif /* On native Windows, as of 2008, the signal SIGABRT_COMPAT is an alias for the signal SIGABRT. Only one signal handler is stored for both SIGABRT and SIGABRT_COMPAT. SIGABRT_COMPAT is not a signal of its own. */ #if defined _WIN32 && ! defined __CYGWIN__ # undef SIGABRT_COMPAT # define SIGABRT_COMPAT 6 #endif /* A signal handler. */ typedef void (*handler_t) (int signal); /* Set of current actions. If sa_handler for an entry is NULL, then that signal is not currently handled by the sigaction handler. */ static struct sigaction volatile action_array[NSIG] /* = 0 */; /* Signal handler that is installed for signals. */ static void sigaction_handler (int sig) { handler_t handler; sigset_t mask; sigset_t oldmask; int saved_errno = errno; if (sig < 0 || NSIG <= sig || !action_array[sig].sa_handler) { /* Unexpected situation; be careful to avoid recursive abort. */ if (sig == SIGABRT) signal (SIGABRT, SIG_DFL); abort (); } /* Reinstall the signal handler when required; otherwise update the bookkeeping so that the user's handler may call sigaction and get accurate results. We know the signal isn't currently blocked, or we wouldn't be in its handler, therefore we know that we are not interrupting a sigaction() call. There is a race where any asynchronous instance of the same signal occurring before we reinstall the handler will trigger the default handler; oh well. */ handler = action_array[sig].sa_handler; if ((action_array[sig].sa_flags & SA_RESETHAND) == 0) signal (sig, sigaction_handler); else action_array[sig].sa_handler = NULL; /* Block appropriate signals. */ mask = action_array[sig].sa_mask; if ((action_array[sig].sa_flags & SA_NODEFER) == 0) sigaddset (&mask, sig); sigprocmask (SIG_BLOCK, &mask, &oldmask); /* Invoke the user's handler, then restore prior mask. */ errno = saved_errno; handler (sig); saved_errno = errno; sigprocmask (SIG_SETMASK, &oldmask, NULL); errno = saved_errno; } /* Change and/or query the action that will be taken on delivery of signal SIG. If not NULL, ACT describes the new behavior. If not NULL, OACT is set to the prior behavior. Return 0 on success, or set errno and return -1 on failure. */ int sigaction (int sig, const struct sigaction *restrict act, struct sigaction *restrict oact) { sigset_t mask; sigset_t oldmask; int saved_errno; if (sig < 0 || NSIG <= sig || sig == SIGKILL || sig == SIGSTOP || (act && act->sa_handler == SIG_ERR)) { errno = EINVAL; return -1; } #ifdef SIGABRT_COMPAT if (sig == SIGABRT_COMPAT) sig = SIGABRT; #endif /* POSIX requires sigaction() to be async-signal-safe. In other words, if an asynchronous signal can occur while we are anywhere inside this function, the user's handler could then call sigaction() recursively and expect consistent results. We meet this rule by using sigprocmask to block all signals before modifying any data structure that could be read from a signal handler; this works since we know that the gnulib sigprocmask replacement does not try to use sigaction() from its handler. */ if (!act && !oact) return 0; sigfillset (&mask); sigprocmask (SIG_BLOCK, &mask, &oldmask); if (oact) { if (action_array[sig].sa_handler) *oact = action_array[sig]; else { /* Safe to change the handler at will here, since all signals are currently blocked. */ oact->sa_handler = signal (sig, SIG_DFL); if (oact->sa_handler == SIG_ERR) goto failure; signal (sig, oact->sa_handler); oact->sa_flags = SA_RESETHAND | SA_NODEFER; sigemptyset (&oact->sa_mask); } } if (act) { /* Safe to install the handler before updating action_array, since all signals are currently blocked. */ if (act->sa_handler == SIG_DFL || act->sa_handler == SIG_IGN) { if (signal (sig, act->sa_handler) == SIG_ERR) goto failure; action_array[sig].sa_handler = NULL; } else { if (signal (sig, sigaction_handler) == SIG_ERR) goto failure; action_array[sig] = *act; } } sigprocmask (SIG_SETMASK, &oldmask, NULL); return 0; failure: saved_errno = errno; sigprocmask (SIG_SETMASK, &oldmask, NULL); errno = saved_errno; return -1; } libffcall-2.5/gnulib-lib/stdint.in.h0000664000000000000000000005576414631432055014322 00000000000000/* Copyright (C) 2001-2002, 2004-2024 Free Software Foundation, Inc. Written by Paul Eggert, Bruno Haible, Sam Steingold, Peter Burwood. This file is part of gnulib. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* * ISO C 99 for platforms that lack it. * */ #ifndef _@GUARD_PREFIX@_STDINT_H #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* When including a system file that in turn includes , use the system , not our substitute. This avoids problems with (for example) VMS, whose includes . */ #define _GL_JUST_INCLUDE_SYSTEM_INTTYPES_H /* On Android (Bionic libc), includes this file before having defined 'time_t'. Therefore in this case avoid including other system header files; just include the system's . Ideally we should test __BIONIC__ here, but it is only defined after has been included; hence test __ANDROID__ instead. */ #if defined __ANDROID__ && defined _GL_INCLUDING_SYS_TYPES_H # @INCLUDE_NEXT@ @NEXT_STDINT_H@ #else /* Get those types that are already defined in other system include files, so that we can "#define int8_t signed char" below without worrying about a later system include file containing a "typedef signed char int8_t;" that will get messed up by our macro. Our macros should all be consistent with the system versions, except for the "fast" types and macros, which we recommend against using in public interfaces due to compiler differences. */ #if @HAVE_STDINT_H@ # if defined __sgi && ! defined __c99 /* Bypass IRIX's if in C89 mode, since it merely annoys users with "This header file is to be used only for c99 mode compilations" diagnostics. */ # define __STDINT_H__ # endif /* Some pre-C++11 implementations need this. */ # ifdef __cplusplus # ifndef __STDC_CONSTANT_MACROS # define __STDC_CONSTANT_MACROS 1 # endif # ifndef __STDC_LIMIT_MACROS # define __STDC_LIMIT_MACROS 1 # endif # endif /* Other systems may have an incomplete or buggy . Include it before , since any "#include " in would reinclude us, skipping our contents because _@GUARD_PREFIX@_STDINT_H is defined. The include_next requires a split double-inclusion guard. */ # @INCLUDE_NEXT@ @NEXT_STDINT_H@ #endif #if ! defined _@GUARD_PREFIX@_STDINT_H && ! defined _GL_JUST_INCLUDE_SYSTEM_STDINT_H #define _@GUARD_PREFIX@_STDINT_H /* Get SCHAR_MIN, SCHAR_MAX, UCHAR_MAX, INT_MIN, INT_MAX, LONG_MIN, LONG_MAX, ULONG_MAX, CHAR_BIT, _GL_INTEGER_WIDTH. */ #include /* Override WINT_MIN and WINT_MAX if gnulib's or overrides wint_t. */ #if @GNULIBHEADERS_OVERRIDE_WINT_T@ # undef WINT_MIN # undef WINT_MAX # define WINT_MIN 0x0U # define WINT_MAX 0xffffffffU #endif #if ! @HAVE_C99_STDINT_H@ /* defines some of the stdint.h types as well, on glibc, IRIX 6.5, and OpenBSD 3.8 (via ). AIX 5.2 isn't needed and causes troubles. Mac OS X 10.4.6 includes (which is us), but relies on the system definitions, so include after @NEXT_STDINT_H@. */ # if @HAVE_SYS_TYPES_H@ && ! defined _AIX # include # endif # if @HAVE_INTTYPES_H@ /* In OpenBSD 3.8, includes , which defines int{8,16,32,64}_t, uint{8,16,32,64}_t and __BIT_TYPES_DEFINED__. also defines intptr_t and uintptr_t. */ # include # elif @HAVE_SYS_INTTYPES_H@ /* Solaris 7 has the types except the *_fast*_t types, and the macros except for *_FAST*_*, INTPTR_MIN, PTRDIFF_MIN, PTRDIFF_MAX. */ # include # endif # if @HAVE_SYS_BITYPES_H@ && ! defined __BIT_TYPES_DEFINED__ /* Linux libc4 >= 4.6.7 and libc5 have a that defines int{8,16,32,64}_t and __BIT_TYPES_DEFINED__. In libc5 >= 5.2.2 it is included by . */ # include # endif # undef _GL_JUST_INCLUDE_SYSTEM_INTTYPES_H /* Minimum and maximum values for an integer type under the usual assumption. Return an unspecified value if BITS == 0, adding a check to pacify picky compilers. */ /* These are separate macros, because if you try to merge these macros into a single one, HP-UX cc rejects the resulting expression in constant expressions. */ # define _STDINT_UNSIGNED_MIN(bits, zero) \ (zero) # define _STDINT_SIGNED_MIN(bits, zero) \ (~ _STDINT_MAX (1, bits, zero)) # define _STDINT_MAX(signed, bits, zero) \ (((((zero) + 1) << ((bits) ? (bits) - 1 - (signed) : 0)) - 1) * 2 + 1) #if !GNULIB_defined_stdint_types /* 7.18.1.1. Exact-width integer types */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. */ # undef int8_t # undef uint8_t typedef signed char gl_int8_t; typedef unsigned char gl_uint8_t; # define int8_t gl_int8_t # define uint8_t gl_uint8_t # undef int16_t # undef uint16_t typedef short int gl_int16_t; typedef unsigned short int gl_uint16_t; # define int16_t gl_int16_t # define uint16_t gl_uint16_t # undef int32_t # undef uint32_t typedef int gl_int32_t; typedef unsigned int gl_uint32_t; # define int32_t gl_int32_t # define uint32_t gl_uint32_t /* If the system defines INT64_MAX, assume int64_t works. That way, if the underlying platform defines int64_t to be a 64-bit long long int, the code below won't mistakenly define it to be a 64-bit long int, which would mess up C++ name mangling. We must use #ifdef rather than #if, to avoid an error with HP-UX 10.20 cc. */ # ifdef INT64_MAX # define GL_INT64_T # else /* Do not undefine int64_t if gnulib is not being used with 64-bit types, since otherwise it breaks platforms like Tandem/NSK. */ # if LONG_MAX >> 31 >> 31 == 1 # undef int64_t typedef long int gl_int64_t; # define int64_t gl_int64_t # define GL_INT64_T # elif defined _MSC_VER # undef int64_t typedef __int64 gl_int64_t; # define int64_t gl_int64_t # define GL_INT64_T # else /* Verify that 'long long' has exactly 64 bits. */ typedef _gl_verify_int64_bits[ _STDINT_MAX (1, sizeof (long long) * CHAR_BIT, 0ll) >> 31 >> 31 == 1 ? 1 : -1]; # undef int64_t typedef long long int gl_int64_t; # define int64_t gl_int64_t # define GL_INT64_T # endif # endif # ifdef UINT64_MAX # define GL_UINT64_T # else # if ULONG_MAX >> 31 >> 31 >> 1 == 1 # undef uint64_t typedef unsigned long int gl_uint64_t; # define uint64_t gl_uint64_t # define GL_UINT64_T # elif defined _MSC_VER # undef uint64_t typedef unsigned __int64 gl_uint64_t; # define uint64_t gl_uint64_t # define GL_UINT64_T # else /* Verify that 'unsigned long long' has exactly 64 bits. */ typedef _gl_verify_uint64_bits[ _STDINT_MAX (0, sizeof (unsigned long long) * CHAR_BIT, 0ull) >> 31 >> 31 >> 1 == 1 ? 1 : -1]; # undef uint64_t typedef unsigned long long int gl_uint64_t; # define uint64_t gl_uint64_t # define GL_UINT64_T # endif # endif /* Avoid collision with Solaris 2.5.1 etc. */ # define _UINT8_T # define _UINT32_T # define _UINT64_T /* 7.18.1.2. Minimum-width integer types */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. Therefore the leastN_t types are the same as the corresponding N_t types. */ # undef int_least8_t # undef uint_least8_t # undef int_least16_t # undef uint_least16_t # undef int_least32_t # undef uint_least32_t # undef int_least64_t # undef uint_least64_t # define int_least8_t int8_t # define uint_least8_t uint8_t # define int_least16_t int16_t # define uint_least16_t uint16_t # define int_least32_t int32_t # define uint_least32_t uint32_t # ifdef GL_INT64_T # define int_least64_t int64_t # endif # ifdef GL_UINT64_T # define uint_least64_t uint64_t # endif /* 7.18.1.3. Fastest minimum-width integer types */ /* Note: Other substitutes may define these types differently. It is not recommended to use these types in public header files. */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. Therefore the fastN_t types are taken from the same list of types. The following code normally uses types consistent with glibc, as that lessens the chance of incompatibility with older GNU hosts. */ # undef int_fast8_t # undef uint_fast8_t # undef int_fast16_t # undef uint_fast16_t # undef int_fast32_t # undef uint_fast32_t # undef int_fast64_t # undef uint_fast64_t typedef signed char gl_int_fast8_t; typedef unsigned char gl_uint_fast8_t; # ifdef __sun /* Define types compatible with SunOS 5.10, so that code compiled under earlier SunOS versions works with code compiled under SunOS 5.10. */ typedef int gl_int_fast32_t; typedef unsigned int gl_uint_fast32_t; # else typedef long int gl_int_fast32_t; typedef unsigned long int gl_uint_fast32_t; # endif typedef gl_int_fast32_t gl_int_fast16_t; typedef gl_uint_fast32_t gl_uint_fast16_t; # define int_fast8_t gl_int_fast8_t # define uint_fast8_t gl_uint_fast8_t # define int_fast16_t gl_int_fast16_t # define uint_fast16_t gl_uint_fast16_t # define int_fast32_t gl_int_fast32_t # define uint_fast32_t gl_uint_fast32_t # ifdef GL_INT64_T # define int_fast64_t int64_t # endif # ifdef GL_UINT64_T # define uint_fast64_t uint64_t # endif /* 7.18.1.4. Integer types capable of holding object pointers */ /* kLIBC's defines _INTPTR_T_DECLARED and needs its own definitions of intptr_t and uintptr_t (which use int and unsigned) to avoid clashes with declarations of system functions like sbrk. Similarly, MinGW WSL-5.4.1 needs its own intptr_t and uintptr_t to avoid conflicting declarations of system functions like _findclose in . */ # if !((defined __KLIBC__ && defined _INTPTR_T_DECLARED) \ || (defined __INTPTR_WIDTH__ \ && __INTPTR_WIDTH__ != (defined _WIN64 ? LLONG_WIDTH : LONG_WIDTH)) \ || defined __MINGW32__) # undef intptr_t # undef uintptr_t # ifdef _WIN64 typedef long long int gl_intptr_t; typedef unsigned long long int gl_uintptr_t; # else typedef long int gl_intptr_t; typedef unsigned long int gl_uintptr_t; # endif # define intptr_t gl_intptr_t # define uintptr_t gl_uintptr_t # endif /* 7.18.1.5. Greatest-width integer types */ /* Note: These types are compiler dependent. It may be unwise to use them in public header files. */ /* If the system defines INTMAX_MAX, assume that intmax_t works, and similarly for UINTMAX_MAX and uintmax_t. This avoids problems with assuming one type where another is used by the system. */ # ifndef INTMAX_MAX # undef INTMAX_C # undef intmax_t # if LONG_MAX >> 30 == 1 typedef long long int gl_intmax_t; # define intmax_t gl_intmax_t # elif defined GL_INT64_T # define intmax_t int64_t # else typedef long int gl_intmax_t; # define intmax_t gl_intmax_t # endif # endif # ifndef UINTMAX_MAX # undef UINTMAX_C # undef uintmax_t # if ULONG_MAX >> 31 == 1 typedef unsigned long long int gl_uintmax_t; # define uintmax_t gl_uintmax_t # elif defined GL_UINT64_T # define uintmax_t uint64_t # else typedef unsigned long int gl_uintmax_t; # define uintmax_t gl_uintmax_t # endif # endif /* Verify that intmax_t and uintmax_t have the same size. Too much code breaks if this is not the case. If this check fails, the reason is likely to be found in the autoconf macros. */ typedef int _verify_intmax_size[sizeof (intmax_t) == sizeof (uintmax_t) ? 1 : -1]; # define GNULIB_defined_stdint_types 1 # endif /* !GNULIB_defined_stdint_types */ /* 7.18.2. Limits of specified-width integer types */ /* 7.18.2.1. Limits of exact-width integer types */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. */ # undef INT8_MIN # undef INT8_MAX # undef UINT8_MAX # define INT8_MIN (~ INT8_MAX) # define INT8_MAX 127 # define UINT8_MAX 255 # undef INT16_MIN # undef INT16_MAX # undef UINT16_MAX # define INT16_MIN (~ INT16_MAX) # define INT16_MAX 32767 # define UINT16_MAX 65535 # undef INT32_MIN # undef INT32_MAX # undef UINT32_MAX # define INT32_MIN (~ INT32_MAX) # define INT32_MAX 2147483647 # define UINT32_MAX 4294967295U # if defined GL_INT64_T && ! defined INT64_MAX /* Prefer (- INTMAX_C (1) << 63) over (~ INT64_MAX) because SunPRO C 5.0 evaluates the latter incorrectly in preprocessor expressions. */ # define INT64_MIN (- INTMAX_C (1) << 63) # define INT64_MAX INTMAX_C (9223372036854775807) # endif # if defined GL_UINT64_T && ! defined UINT64_MAX # define UINT64_MAX UINTMAX_C (18446744073709551615) # endif /* 7.18.2.2. Limits of minimum-width integer types */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. Therefore the leastN_t types are the same as the corresponding N_t types. */ # undef INT_LEAST8_MIN # undef INT_LEAST8_MAX # undef UINT_LEAST8_MAX # define INT_LEAST8_MIN INT8_MIN # define INT_LEAST8_MAX INT8_MAX # define UINT_LEAST8_MAX UINT8_MAX # undef INT_LEAST16_MIN # undef INT_LEAST16_MAX # undef UINT_LEAST16_MAX # define INT_LEAST16_MIN INT16_MIN # define INT_LEAST16_MAX INT16_MAX # define UINT_LEAST16_MAX UINT16_MAX # undef INT_LEAST32_MIN # undef INT_LEAST32_MAX # undef UINT_LEAST32_MAX # define INT_LEAST32_MIN INT32_MIN # define INT_LEAST32_MAX INT32_MAX # define UINT_LEAST32_MAX UINT32_MAX # undef INT_LEAST64_MIN # undef INT_LEAST64_MAX # ifdef GL_INT64_T # define INT_LEAST64_MIN INT64_MIN # define INT_LEAST64_MAX INT64_MAX # endif # undef UINT_LEAST64_MAX # ifdef GL_UINT64_T # define UINT_LEAST64_MAX UINT64_MAX # endif /* 7.18.2.3. Limits of fastest minimum-width integer types */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits. Therefore the fastN_t types are taken from the same list of types. */ # undef INT_FAST8_MIN # undef INT_FAST8_MAX # undef UINT_FAST8_MAX # define INT_FAST8_MIN SCHAR_MIN # define INT_FAST8_MAX SCHAR_MAX # define UINT_FAST8_MAX UCHAR_MAX # undef INT_FAST16_MIN # undef INT_FAST16_MAX # undef UINT_FAST16_MAX # define INT_FAST16_MIN INT_FAST32_MIN # define INT_FAST16_MAX INT_FAST32_MAX # define UINT_FAST16_MAX UINT_FAST32_MAX # undef INT_FAST32_MIN # undef INT_FAST32_MAX # undef UINT_FAST32_MAX # ifdef __sun # define INT_FAST32_MIN INT_MIN # define INT_FAST32_MAX INT_MAX # define UINT_FAST32_MAX UINT_MAX # else # define INT_FAST32_MIN LONG_MIN # define INT_FAST32_MAX LONG_MAX # define UINT_FAST32_MAX ULONG_MAX # endif # undef INT_FAST64_MIN # undef INT_FAST64_MAX # ifdef GL_INT64_T # define INT_FAST64_MIN INT64_MIN # define INT_FAST64_MAX INT64_MAX # endif # undef UINT_FAST64_MAX # ifdef GL_UINT64_T # define UINT_FAST64_MAX UINT64_MAX # endif /* 7.18.2.4. Limits of integer types capable of holding object pointers */ # undef INTPTR_MIN # undef INTPTR_MAX # undef UINTPTR_MAX # ifdef _WIN64 # define INTPTR_MIN LLONG_MIN # define INTPTR_MAX LLONG_MAX # define UINTPTR_MAX ULLONG_MAX # else # define INTPTR_MIN LONG_MIN # define INTPTR_MAX LONG_MAX # define UINTPTR_MAX ULONG_MAX # endif /* 7.18.2.5. Limits of greatest-width integer types */ # ifndef INTMAX_MAX # undef INTMAX_MIN # ifdef INT64_MAX # define INTMAX_MIN INT64_MIN # define INTMAX_MAX INT64_MAX # else # define INTMAX_MIN INT32_MIN # define INTMAX_MAX INT32_MAX # endif # endif # ifndef UINTMAX_MAX # ifdef UINT64_MAX # define UINTMAX_MAX UINT64_MAX # else # define UINTMAX_MAX UINT32_MAX # endif # endif /* 7.18.3. Limits of other integer types */ /* ptrdiff_t limits */ # undef PTRDIFF_MIN # undef PTRDIFF_MAX # if @APPLE_UNIVERSAL_BUILD@ # ifdef _LP64 # define PTRDIFF_MIN _STDINT_SIGNED_MIN (64, 0l) # define PTRDIFF_MAX _STDINT_MAX (1, 64, 0l) # else # define PTRDIFF_MIN _STDINT_SIGNED_MIN (32, 0) # define PTRDIFF_MAX _STDINT_MAX (1, 32, 0) # endif # else # define PTRDIFF_MIN \ _STDINT_SIGNED_MIN (@BITSIZEOF_PTRDIFF_T@, 0@PTRDIFF_T_SUFFIX@) # define PTRDIFF_MAX \ _STDINT_MAX (1, @BITSIZEOF_PTRDIFF_T@, 0@PTRDIFF_T_SUFFIX@) # endif /* sig_atomic_t limits */ # undef SIG_ATOMIC_MIN # undef SIG_ATOMIC_MAX # if @HAVE_SIGNED_SIG_ATOMIC_T@ # define SIG_ATOMIC_MIN \ _STDINT_SIGNED_MIN (@BITSIZEOF_SIG_ATOMIC_T@, 0@SIG_ATOMIC_T_SUFFIX@) # else # define SIG_ATOMIC_MIN \ _STDINT_UNSIGNED_MIN (@BITSIZEOF_SIG_ATOMIC_T@, 0@SIG_ATOMIC_T_SUFFIX@) # endif # define SIG_ATOMIC_MAX \ _STDINT_MAX (@HAVE_SIGNED_SIG_ATOMIC_T@, @BITSIZEOF_SIG_ATOMIC_T@, \ 0@SIG_ATOMIC_T_SUFFIX@) /* size_t limit */ # undef SIZE_MAX # if @APPLE_UNIVERSAL_BUILD@ # ifdef _LP64 # define SIZE_MAX _STDINT_MAX (0, 64, 0ul) # else # define SIZE_MAX _STDINT_MAX (0, 32, 0ul) # endif # else # define SIZE_MAX _STDINT_MAX (0, @BITSIZEOF_SIZE_T@, 0@SIZE_T_SUFFIX@) # endif /* wchar_t limits */ /* Get WCHAR_MIN, WCHAR_MAX. This include is not on the top, above, because on OSF/1 4.0 we have a sequence of nested includes -> -> -> , and the latter includes and assumes its types are already defined. */ # if @HAVE_WCHAR_H@ && ! (defined WCHAR_MIN && defined WCHAR_MAX) # define _GL_JUST_INCLUDE_SYSTEM_WCHAR_H # include # undef _GL_JUST_INCLUDE_SYSTEM_WCHAR_H # endif # undef WCHAR_MIN # undef WCHAR_MAX # if @HAVE_SIGNED_WCHAR_T@ # define WCHAR_MIN \ _STDINT_SIGNED_MIN (@BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@) # else # define WCHAR_MIN \ _STDINT_UNSIGNED_MIN (@BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@) # endif # define WCHAR_MAX \ _STDINT_MAX (@HAVE_SIGNED_WCHAR_T@, @BITSIZEOF_WCHAR_T@, 0@WCHAR_T_SUFFIX@) /* wint_t limits */ /* If gnulib's or overrides wint_t, @WINT_T_SUFFIX@ is not accurate, therefore use the definitions from above. */ # if !@GNULIBHEADERS_OVERRIDE_WINT_T@ # undef WINT_MIN # undef WINT_MAX # if @HAVE_SIGNED_WINT_T@ # define WINT_MIN \ _STDINT_SIGNED_MIN (@BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@) # else # define WINT_MIN \ _STDINT_UNSIGNED_MIN (@BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@) # endif # define WINT_MAX \ _STDINT_MAX (@HAVE_SIGNED_WINT_T@, @BITSIZEOF_WINT_T@, 0@WINT_T_SUFFIX@) # endif /* 7.18.4. Macros for integer constants */ /* 7.18.4.1. Macros for minimum-width integer constants */ /* According to ISO C 99 Technical Corrigendum 1 */ /* Here we assume a standard architecture where the hardware integer types have 8, 16, 32, optionally 64 bits, and int is 32 bits. */ # undef INT8_C # undef UINT8_C # define INT8_C(x) x # define UINT8_C(x) x # undef INT16_C # undef UINT16_C # define INT16_C(x) x # define UINT16_C(x) x # undef INT32_C # undef UINT32_C # define INT32_C(x) x # define UINT32_C(x) x ## U # undef INT64_C # undef UINT64_C # if LONG_MAX >> 31 >> 31 == 1 # define INT64_C(x) x##L # elif defined _MSC_VER # define INT64_C(x) x##i64 # else # define INT64_C(x) x##LL # endif # if ULONG_MAX >> 31 >> 31 >> 1 == 1 # define UINT64_C(x) x##UL # elif defined _MSC_VER # define UINT64_C(x) x##ui64 # else # define UINT64_C(x) x##ULL # endif /* 7.18.4.2. Macros for greatest-width integer constants */ # ifndef INTMAX_C # if LONG_MAX >> 30 == 1 # define INTMAX_C(x) x##LL # elif defined GL_INT64_T # define INTMAX_C(x) INT64_C(x) # else # define INTMAX_C(x) x##L # endif # endif # ifndef UINTMAX_C # if ULONG_MAX >> 31 == 1 # define UINTMAX_C(x) x##ULL # elif defined GL_UINT64_T # define UINTMAX_C(x) UINT64_C(x) # else # define UINTMAX_C(x) x##UL # endif # endif #endif /* !@HAVE_C99_STDINT_H@ */ /* Macros specified by ISO/IEC TS 18661-1:2014. */ #if (!defined UINTMAX_WIDTH \ && (defined _GNU_SOURCE || defined __STDC_WANT_IEC_60559_BFP_EXT__)) # ifdef INT8_MAX # define INT8_WIDTH _GL_INTEGER_WIDTH (INT8_MIN, INT8_MAX) # endif # ifdef UINT8_MAX # define UINT8_WIDTH _GL_INTEGER_WIDTH (0, UINT8_MAX) # endif # ifdef INT16_MAX # define INT16_WIDTH _GL_INTEGER_WIDTH (INT16_MIN, INT16_MAX) # endif # ifdef UINT16_MAX # define UINT16_WIDTH _GL_INTEGER_WIDTH (0, UINT16_MAX) # endif # ifdef INT32_MAX # define INT32_WIDTH _GL_INTEGER_WIDTH (INT32_MIN, INT32_MAX) # endif # ifdef UINT32_MAX # define UINT32_WIDTH _GL_INTEGER_WIDTH (0, UINT32_MAX) # endif # ifdef INT64_MAX # define INT64_WIDTH _GL_INTEGER_WIDTH (INT64_MIN, INT64_MAX) # endif # ifdef UINT64_MAX # define UINT64_WIDTH _GL_INTEGER_WIDTH (0, UINT64_MAX) # endif # define INT_LEAST8_WIDTH _GL_INTEGER_WIDTH (INT_LEAST8_MIN, INT_LEAST8_MAX) # define UINT_LEAST8_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST8_MAX) # define INT_LEAST16_WIDTH _GL_INTEGER_WIDTH (INT_LEAST16_MIN, INT_LEAST16_MAX) # define UINT_LEAST16_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST16_MAX) # define INT_LEAST32_WIDTH _GL_INTEGER_WIDTH (INT_LEAST32_MIN, INT_LEAST32_MAX) # define UINT_LEAST32_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST32_MAX) # define INT_LEAST64_WIDTH _GL_INTEGER_WIDTH (INT_LEAST64_MIN, INT_LEAST64_MAX) # define UINT_LEAST64_WIDTH _GL_INTEGER_WIDTH (0, UINT_LEAST64_MAX) # define INT_FAST8_WIDTH _GL_INTEGER_WIDTH (INT_FAST8_MIN, INT_FAST8_MAX) # define UINT_FAST8_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST8_MAX) # define INT_FAST16_WIDTH _GL_INTEGER_WIDTH (INT_FAST16_MIN, INT_FAST16_MAX) # define UINT_FAST16_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST16_MAX) # define INT_FAST32_WIDTH _GL_INTEGER_WIDTH (INT_FAST32_MIN, INT_FAST32_MAX) # define UINT_FAST32_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST32_MAX) # define INT_FAST64_WIDTH _GL_INTEGER_WIDTH (INT_FAST64_MIN, INT_FAST64_MAX) # define UINT_FAST64_WIDTH _GL_INTEGER_WIDTH (0, UINT_FAST64_MAX) # define INTPTR_WIDTH _GL_INTEGER_WIDTH (INTPTR_MIN, INTPTR_MAX) # define UINTPTR_WIDTH _GL_INTEGER_WIDTH (0, UINTPTR_MAX) # define INTMAX_WIDTH _GL_INTEGER_WIDTH (INTMAX_MIN, INTMAX_MAX) # define UINTMAX_WIDTH _GL_INTEGER_WIDTH (0, UINTMAX_MAX) # define PTRDIFF_WIDTH _GL_INTEGER_WIDTH (PTRDIFF_MIN, PTRDIFF_MAX) # define SIZE_WIDTH _GL_INTEGER_WIDTH (0, SIZE_MAX) # define WCHAR_WIDTH _GL_INTEGER_WIDTH (WCHAR_MIN, WCHAR_MAX) # ifdef WINT_MAX # define WINT_WIDTH _GL_INTEGER_WIDTH (WINT_MIN, WINT_MAX) # endif # ifdef SIG_ATOMIC_MAX # define SIG_ATOMIC_WIDTH _GL_INTEGER_WIDTH (SIG_ATOMIC_MIN, SIG_ATOMIC_MAX) # endif #endif /* !WINT_WIDTH && (_GNU_SOURCE || __STDC_WANT_IEC_60559_BFP_EXT__) */ #endif /* _@GUARD_PREFIX@_STDINT_H */ #endif /* !(defined __ANDROID__ && ...) */ #endif /* !defined _@GUARD_PREFIX@_STDINT_H && !defined _GL_JUST_INCLUDE_SYSTEM_STDINT_H */ libffcall-2.5/gnulib-lib/windows-spin.c0000664000000000000000000000405014631432055015022 00000000000000/* Spin locks (native Windows implementation). Copyright (C) 2019-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2019. */ #include /* Specification. */ #include "windows-spin.h" #include void glwthread_spin_init (glwthread_spinlock_t *lock) { lock->word = 0; MemoryBarrier (); } int glwthread_spin_lock (glwthread_spinlock_t *lock) { /* Wait until lock->word becomes 0, then replace it with 1. */ /* InterlockedCompareExchange */ while (InterlockedCompareExchange (&lock->word, 1, 0)) ; return 0; } int glwthread_spin_trylock (glwthread_spinlock_t *lock) { /* If lock->word is 0, then replace it with 1. */ /* InterlockedCompareExchange */ if (InterlockedCompareExchange (&lock->word, 1, 0)) return EBUSY; return 0; } int glwthread_spin_unlock (glwthread_spinlock_t *lock) { /* If lock->word is 1, then replace it with 0. */ /* InterlockedCompareExchange */ if (!InterlockedCompareExchange (&lock->word, 0, 1)) return EINVAL; return 0; } int glwthread_spin_destroy (glwthread_spinlock_t *lock) { return 0; } libffcall-2.5/gnulib-lib/fatal-signal.c0000664000000000000000000002370514657156076014751 00000000000000/* Emergency actions in case of a fatal signal. Copyright (C) 2003-2004, 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2003. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "fatal-signal.h" #include #include #include #include "glthread/lock.h" #include "glthread/once.h" #include "thread-optim.h" #include "sig-handler.h" #define SIZEOF(a) (sizeof(a) / sizeof(a[0])) /* ========================================================================= */ /* The list of fatal signals. These are those signals whose default action is to terminate the process without a core dump, except SIGKILL - because it cannot be caught, SIGALRM SIGUSR1 SIGUSR2 SIGPOLL SIGIO SIGLOST - because applications often use them for their own purpose, SIGPROF SIGVTALRM - because they are used for profiling, SIGSTKFLT - because it is more similar to SIGFPE, SIGSEGV, SIGBUS, SIGSYS - because it is more similar to SIGABRT, SIGSEGV, SIGPWR - because it of too special use, SIGRTMIN...SIGRTMAX - because they are reserved for application use. plus SIGXCPU, SIGXFSZ - because they are quite similar to SIGTERM. */ static int fatal_signals[] = { /* ISO C 99 signals. */ #ifdef SIGINT SIGINT, #endif #ifdef SIGTERM SIGTERM, #endif /* POSIX:2001 signals. */ #ifdef SIGHUP SIGHUP, #endif #ifdef SIGPIPE SIGPIPE, #endif /* BSD signals. */ #ifdef SIGXCPU SIGXCPU, #endif #ifdef SIGXFSZ SIGXFSZ, #endif /* Native Windows signals. */ #ifdef SIGBREAK SIGBREAK, #endif 0 }; #define num_fatal_signals (SIZEOF (fatal_signals) - 1) /* Eliminate signals whose signal handler is SIG_IGN. */ static void init_fatal_signals (void) { /* This function is multithread-safe even without synchronization, because if two threads execute it simultaneously, the fatal_signals[] array will not change any more after the first of the threads has completed this function. */ static bool fatal_signals_initialized = false; if (!fatal_signals_initialized) { size_t i; for (i = 0; i < num_fatal_signals; i++) { struct sigaction action; if (sigaction (fatal_signals[i], NULL, &action) >= 0 && get_handler (&action) == SIG_IGN) fatal_signals[i] = -1; } fatal_signals_initialized = true; } } /* ========================================================================= */ typedef _GL_ASYNC_SAFE void (*action_t) (int sig); /* Type of an entry in the actions array. The 'action' field is accessed from within the fatal_signal_handler(), therefore we mark it as 'volatile'. */ typedef struct { volatile action_t action; } actions_entry_t; /* The registered cleanup actions. */ static actions_entry_t static_actions[32]; static actions_entry_t * volatile actions = static_actions; static sig_atomic_t volatile actions_count = 0; static size_t actions_allocated = SIZEOF (static_actions); /* The saved signal handlers. Size 32 would not be sufficient: On HP-UX, SIGXCPU = 33, SIGXFSZ = 34. */ static struct sigaction saved_sigactions[64]; /* Uninstall the handlers. */ static _GL_ASYNC_SAFE void uninstall_handlers (void) { size_t i; for (i = 0; i < num_fatal_signals; i++) if (fatal_signals[i] >= 0) { int sig = fatal_signals[i]; if (saved_sigactions[sig].sa_handler == SIG_IGN) saved_sigactions[sig].sa_handler = SIG_DFL; sigaction (sig, &saved_sigactions[sig], NULL); } } /* The signal handler. It gets called asynchronously. */ static _GL_ASYNC_SAFE void fatal_signal_handler (int sig) { for (;;) { /* Get the last registered cleanup action, in a reentrant way. */ action_t action; size_t n = actions_count; if (n == 0) break; n--; actions_count = n; action = actions[n].action; /* Execute the action. */ action (sig); } /* Now execute the signal's default action. If the signal being delivered was blocked, the re-raised signal would be delivered when this handler returns. But the way we install this handler, no signal is blocked, and the re-raised signal is delivered already during raise(). */ uninstall_handlers (); raise (sig); } /* Install the handlers. */ static void install_handlers (void) { size_t i; struct sigaction action; action.sa_handler = &fatal_signal_handler; /* If we get a fatal signal while executing fatal_signal_handler, enter fatal_signal_handler recursively, since it is reentrant. Hence no SA_RESETHAND. */ action.sa_flags = SA_NODEFER; sigemptyset (&action.sa_mask); for (i = 0; i < num_fatal_signals; i++) if (fatal_signals[i] >= 0) { int sig = fatal_signals[i]; if (!(sig < sizeof (saved_sigactions) / sizeof (saved_sigactions[0]))) abort (); sigaction (sig, &action, &saved_sigactions[sig]); } } /* Lock that makes at_fatal_signal multi-thread safe. */ gl_lock_define_initialized (static, at_fatal_signal_lock) /* Register a cleanup function to be executed when a catchable fatal signal occurs. */ int at_fatal_signal (action_t action) { bool mt = gl_multithreaded (); if (mt) gl_lock_lock (at_fatal_signal_lock); static bool cleanup_initialized = false; if (!cleanup_initialized) { init_fatal_signals (); install_handlers (); cleanup_initialized = true; } int ret = 0; if (actions_count == actions_allocated) { /* Extend the actions array. Note that we cannot use xrealloc(), because then the cleanup() function could access an already deallocated array. */ actions_entry_t *old_actions = actions; size_t old_actions_allocated = actions_allocated; size_t new_actions_allocated = 2 * actions_allocated; actions_entry_t *new_actions = (actions_entry_t *) malloc (new_actions_allocated * sizeof (actions_entry_t)); if (new_actions == NULL) { ret = -1; goto done; } size_t k; /* Don't use memcpy() here, because memcpy takes non-volatile arguments and is therefore not guaranteed to complete all memory stores before the next statement. */ for (k = 0; k < old_actions_allocated; k++) new_actions[k] = old_actions[k]; actions = new_actions; actions_allocated = new_actions_allocated; /* Now we can free the old actions array. */ /* No, we can't do that. If fatal_signal_handler is running in a different thread and has already fetched the actions pointer (getting old_actions) but not yet accessed its n-th element, that thread may crash when accessing an element of the already freed old_actions array. */ #if 0 if (old_actions != static_actions) free (old_actions); #endif } /* The two uses of 'volatile' in the types above (and ISO C 99 section 5.1.2.3.(5)) ensure that we increment the actions_count only after the new action has been written to the memory location actions[actions_count]. */ actions[actions_count].action = action; actions_count++; done: if (mt) gl_lock_unlock (at_fatal_signal_lock); return ret; } /* ========================================================================= */ static sigset_t fatal_signal_set; static void do_init_fatal_signal_set (void) { size_t i; init_fatal_signals (); sigemptyset (&fatal_signal_set); for (i = 0; i < num_fatal_signals; i++) if (fatal_signals[i] >= 0) sigaddset (&fatal_signal_set, fatal_signals[i]); } /* Ensure that do_init_fatal_signal_set is called once only. */ gl_once_define(static, fatal_signal_set_once) static void init_fatal_signal_set (void) { gl_once (fatal_signal_set_once, do_init_fatal_signal_set); } /* Lock and counter that allow block_fatal_signals/unblock_fatal_signals pairs to occur in different threads and even overlap in time. */ gl_lock_define_initialized (static, fatal_signals_block_lock) static unsigned int fatal_signals_block_counter = 0; /* Temporarily delay the catchable fatal signals. */ void block_fatal_signals (void) { bool mt = gl_multithreaded (); if (mt) gl_lock_lock (fatal_signals_block_lock); if (fatal_signals_block_counter++ == 0) { init_fatal_signal_set (); sigprocmask (SIG_BLOCK, &fatal_signal_set, NULL); } if (mt) gl_lock_unlock (fatal_signals_block_lock); } /* Stop delaying the catchable fatal signals. */ void unblock_fatal_signals (void) { bool mt = gl_multithreaded (); if (mt) gl_lock_lock (fatal_signals_block_lock); if (fatal_signals_block_counter == 0) /* There are more calls to unblock_fatal_signals() than to block_fatal_signals(). */ abort (); if (--fatal_signals_block_counter == 0) { init_fatal_signal_set (); sigprocmask (SIG_UNBLOCK, &fatal_signal_set, NULL); } if (mt) gl_lock_unlock (fatal_signals_block_lock); } unsigned int get_fatal_signals (int signals[64]) { init_fatal_signal_set (); { int *p = signals; size_t i; for (i = 0; i < num_fatal_signals; i++) if (fatal_signals[i] >= 0) *p++ = fatal_signals[i]; return p - signals; } } const sigset_t * get_fatal_signal_set (void) { init_fatal_signal_set (); return &fatal_signal_set; } libffcall-2.5/gnulib-lib/getpagesize.c0000664000000000000000000000226714663230755014710 00000000000000/* getpagesize emulation for systems where it cannot be done in a C macro. Copyright (C) 2007, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible and Martin Lambers. */ #include /* Specification. */ #include /* This implementation is only for native Windows systems. */ #if defined _WIN32 && ! defined __CYGWIN__ # define WIN32_LEAN_AND_MEAN # include int getpagesize (void) { SYSTEM_INFO system_info; GetSystemInfo (&system_info); return system_info.dwPageSize; } #endif libffcall-2.5/gnulib-lib/fstat.c0000664000000000000000000000515314631432055013507 00000000000000/* fstat() replacement. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* If the user's config.h happens to include , let it include only the system's here, so that orig_fstat doesn't recurse to rpl_fstat. */ #define __need_system_sys_stat_h #include /* Get the original definition of fstat. It might be defined as a macro. */ #include #include #undef __need_system_sys_stat_h #if defined _WIN32 && ! defined __CYGWIN__ # define WINDOWS_NATIVE #endif #if !defined WINDOWS_NATIVE static int orig_fstat (int fd, struct stat *buf) { return fstat (fd, buf); } #endif /* Specification. */ #ifdef __osf__ /* Write "sys/stat.h" here, not , otherwise OSF/1 5.1 DTK cc eliminates this include because of the preliminary #include above. */ # include "sys/stat.h" #else # include #endif #include "stat-time.h" #include #include #ifdef WINDOWS_NATIVE # define WIN32_LEAN_AND_MEAN # include # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif # include "stat-w32.h" #endif int rpl_fstat (int fd, struct stat *buf) { #if REPLACE_FCHDIR && REPLACE_OPEN_DIRECTORY /* Handle the case when rpl_open() used a dummy file descriptor to work around an open() that can't normally visit directories. */ const char *name = _gl_directory_name (fd); if (name != NULL) return stat (name, buf); #endif #ifdef WINDOWS_NATIVE /* Fill the fields ourselves, because the original fstat function returns values for st_atime, st_mtime, st_ctime that depend on the current time zone. See */ HANDLE h = (HANDLE) _get_osfhandle (fd); if (h == INVALID_HANDLE_VALUE) { errno = EBADF; return -1; } return _gl_fstat_by_handle (h, NULL, buf); #else return stat_time_normalize (orig_fstat (fd, buf), buf); #endif } libffcall-2.5/gnulib-lib/gl_list.c0000664000000000000000000000151714631432055014023 00000000000000/* Abstract sequential list data type. Copyright (C) 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #define GL_LIST_INLINE _GL_EXTERN_INLINE #include "gl_list.h" libffcall-2.5/gnulib-lib/stat.c0000664000000000000000000003271414631432055013344 00000000000000/* Work around platform bugs in stat. Copyright (C) 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Eric Blake and Bruno Haible. */ /* If the user's config.h happens to include , let it include only the system's here, so that orig_stat doesn't recurse to rpl_stat. */ #define __need_system_sys_stat_h #include /* Get the original definition of stat. It might be defined as a macro. */ #include #include #undef __need_system_sys_stat_h #if defined _WIN32 && ! defined __CYGWIN__ # define WINDOWS_NATIVE #endif #if !defined WINDOWS_NATIVE static int orig_stat (const char *filename, struct stat *buf) { return stat (filename, buf); } #endif /* Specification. */ #ifdef __osf__ /* Write "sys/stat.h" here, not , otherwise OSF/1 5.1 DTK cc eliminates this include because of the preliminary #include above. */ # include "sys/stat.h" #else # include #endif #include "stat-time.h" #include #include #include #include "filename.h" #include "malloca.h" #ifdef WINDOWS_NATIVE # define WIN32_LEAN_AND_MEAN # include # include "stat-w32.h" /* Don't assume that UNICODE is not defined. */ # undef WIN32_FIND_DATA # define WIN32_FIND_DATA WIN32_FIND_DATAA # undef CreateFile # define CreateFile CreateFileA # undef FindFirstFile # define FindFirstFile FindFirstFileA #endif #ifdef WINDOWS_NATIVE /* Return TRUE if the given file name denotes an UNC root. */ static BOOL is_unc_root (const char *rname) { /* Test whether it has the syntax '\\server\share'. */ if (ISSLASH (rname[0]) && ISSLASH (rname[1])) { /* It starts with two slashes. Find the next slash. */ const char *p = rname + 2; const char *q = p; while (*q != '\0' && !ISSLASH (*q)) q++; if (q > p && *q != '\0') { /* Found the next slash at q. */ q++; const char *r = q; while (*r != '\0' && !ISSLASH (*r)) r++; if (r > q && *r == '\0') return TRUE; } } return FALSE; } #endif /* Store information about NAME into ST. Work around bugs with trailing slashes. Mingw has other bugs (such as st_ino always being 0 on success) which this wrapper does not work around. But at least this implementation provides the ability to emulate fchdir correctly. */ int rpl_stat (char const *name, struct stat *buf) { #ifdef WINDOWS_NATIVE /* Fill the fields ourselves, because the original stat function returns values for st_atime, st_mtime, st_ctime that depend on the current time zone. See */ /* XXX Should we convert to wchar_t* and prepend '\\?\', in order to work around length limitations ? */ /* POSIX specifies: "More than two leading characters shall be treated as a single character." */ if (ISSLASH (name[0]) && ISSLASH (name[1]) && ISSLASH (name[2])) { name += 2; while (ISSLASH (name[1])) name++; } size_t len = strlen (name); size_t drive_prefix_len = (HAS_DEVICE (name) ? 2 : 0); /* Remove trailing slashes (except the very first one, at position drive_prefix_len), but remember their presence. */ size_t rlen; bool check_dir = false; rlen = len; while (rlen > drive_prefix_len && ISSLASH (name[rlen-1])) { check_dir = true; if (rlen == drive_prefix_len + 1) break; rlen--; } /* Handle '' and 'C:'. */ if (!check_dir && rlen == drive_prefix_len) { errno = ENOENT; return -1; } /* Handle '\\'. */ if (rlen == 1 && ISSLASH (name[0]) && len >= 2) { errno = ENOENT; return -1; } const char *rname; char *malloca_rname; if (rlen == len) { rname = name; malloca_rname = NULL; } else { malloca_rname = malloca (rlen + 1); if (malloca_rname == NULL) { errno = ENOMEM; return -1; } memcpy (malloca_rname, name, rlen); malloca_rname[rlen] = '\0'; rname = malloca_rname; } /* There are two ways to get at the requested information: - by scanning the parent directory and examining the relevant directory entry, - by opening the file directly. The first approach fails for root directories (e.g. 'C:\') and UNC root directories (e.g. '\\server\share'). The second approach fails for some system files (e.g. 'C:\pagefile.sys' and 'C:\hiberfil.sys'): ERROR_SHARING_VIOLATION. The second approach gives more information (in particular, correct st_dev, st_ino, st_nlink fields). So we use the second approach and, as a fallback except for root and UNC root directories, also the first approach. */ { int ret; { /* Approach based on the file. */ /* Open a handle to the file. CreateFile */ HANDLE h = CreateFile (rname, FILE_READ_ATTRIBUTES, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_EXISTING, /* FILE_FLAG_POSIX_SEMANTICS (treat file names that differ only in case as different) makes sense only when applied to *all* filesystem operations. */ FILE_FLAG_BACKUP_SEMANTICS /* | FILE_FLAG_POSIX_SEMANTICS */, NULL); if (h != INVALID_HANDLE_VALUE) { ret = _gl_fstat_by_handle (h, rname, buf); CloseHandle (h); goto done; } } /* Test for root and UNC root directories. */ if ((rlen == drive_prefix_len + 1 && ISSLASH (rname[drive_prefix_len])) || is_unc_root (rname)) goto failed; /* Fallback. */ { /* Approach based on the directory entry. */ if (strchr (rname, '?') != NULL || strchr (rname, '*') != NULL) { /* Other Windows API functions would fail with error ERROR_INVALID_NAME. */ if (malloca_rname != NULL) freea (malloca_rname); errno = ENOENT; return -1; } /* Get the details about the directory entry. This can be done through FindFirstFile or through FindFirstFileEx with argument FindExInfoBasic */ WIN32_FIND_DATA info; HANDLE h = FindFirstFile (rname, &info); if (h == INVALID_HANDLE_VALUE) goto failed; /* Test for error conditions before starting to fill *buf. */ if (sizeof (buf->st_size) <= 4 && info.nFileSizeHigh > 0) { FindClose (h); if (malloca_rname != NULL) freea (malloca_rname); errno = EOVERFLOW; return -1; } # if _GL_WINDOWS_STAT_INODES buf->st_dev = 0; # if _GL_WINDOWS_STAT_INODES == 2 buf->st_ino._gl_ino[0] = buf->st_ino._gl_ino[1] = 0; # else /* _GL_WINDOWS_STAT_INODES == 1 */ buf->st_ino = 0; # endif # else /* st_ino is not wide enough for identifying a file on a device. Without st_ino, st_dev is pointless. */ buf->st_dev = 0; buf->st_ino = 0; # endif /* st_mode. */ unsigned int mode = /* XXX How to handle FILE_ATTRIBUTE_REPARSE_POINT ? */ ((info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? _S_IFDIR | S_IEXEC_UGO : _S_IFREG) | S_IREAD_UGO | ((info.dwFileAttributes & FILE_ATTRIBUTE_READONLY) ? 0 : S_IWRITE_UGO); if (!(info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)) { /* Determine whether the file is executable by looking at the file name suffix. */ if (info.nFileSizeHigh > 0 || info.nFileSizeLow > 0) { const char *last_dot = NULL; const char *p; for (p = info.cFileName; *p != '\0'; p++) if (*p == '.') last_dot = p; if (last_dot != NULL) { const char *suffix = last_dot + 1; if (_stricmp (suffix, "exe") == 0 || _stricmp (suffix, "bat") == 0 || _stricmp (suffix, "cmd") == 0 || _stricmp (suffix, "com") == 0) mode |= S_IEXEC_UGO; } } } buf->st_mode = mode; /* st_nlink. Ignore hard links here. */ buf->st_nlink = 1; /* There's no easy way to map the Windows SID concept to an integer. */ buf->st_uid = 0; buf->st_gid = 0; /* st_rdev is irrelevant for normal files and directories. */ buf->st_rdev = 0; /* st_size. */ if (sizeof (buf->st_size) <= 4) /* Range check already done above. */ buf->st_size = info.nFileSizeLow; else buf->st_size = ((long long) info.nFileSizeHigh << 32) | (long long) info.nFileSizeLow; /* st_atime, st_mtime, st_ctime. */ # if _GL_WINDOWS_STAT_TIMESPEC buf->st_atim = _gl_convert_FILETIME_to_timespec (&info.ftLastAccessTime); buf->st_mtim = _gl_convert_FILETIME_to_timespec (&info.ftLastWriteTime); buf->st_ctim = _gl_convert_FILETIME_to_timespec (&info.ftCreationTime); # else buf->st_atime = _gl_convert_FILETIME_to_POSIX (&info.ftLastAccessTime); buf->st_mtime = _gl_convert_FILETIME_to_POSIX (&info.ftLastWriteTime); buf->st_ctime = _gl_convert_FILETIME_to_POSIX (&info.ftCreationTime); # endif FindClose (h); ret = 0; } done: if (ret >= 0 && check_dir && !S_ISDIR (buf->st_mode)) { errno = ENOTDIR; ret = -1; } if (malloca_rname != NULL) { int saved_errno = errno; freea (malloca_rname); errno = saved_errno; } return ret; } failed: { DWORD error = GetLastError (); #if 0 fprintf (stderr, "rpl_stat error 0x%x\n", (unsigned int) error); #endif if (malloca_rname != NULL) freea (malloca_rname); switch (error) { /* Some of these errors probably cannot happen with the specific flags that we pass to CreateFile. But who knows... */ case ERROR_FILE_NOT_FOUND: /* The last component of rname does not exist. */ case ERROR_PATH_NOT_FOUND: /* Some directory component in rname does not exist. */ case ERROR_BAD_PATHNAME: /* rname is such as '\\server'. */ case ERROR_BAD_NET_NAME: /* rname is such as '\\server\nonexistentshare'. */ case ERROR_INVALID_NAME: /* rname contains wildcards, misplaced colon, etc. */ case ERROR_DIRECTORY: errno = ENOENT; break; case ERROR_ACCESS_DENIED: /* rname is such as 'C:\System Volume Information\foo'. */ case ERROR_SHARING_VIOLATION: /* rname is such as 'C:\pagefile.sys' (second approach only). */ /* XXX map to EACCES or EPERM? */ errno = EACCES; break; case ERROR_OUTOFMEMORY: errno = ENOMEM; break; case ERROR_WRITE_PROTECT: errno = EROFS; break; case ERROR_WRITE_FAULT: case ERROR_READ_FAULT: case ERROR_GEN_FAILURE: errno = EIO; break; case ERROR_BUFFER_OVERFLOW: case ERROR_FILENAME_EXCED_RANGE: errno = ENAMETOOLONG; break; case ERROR_DELETE_PENDING: /* XXX map to EACCES or EPERM? */ errno = EPERM; break; default: errno = EINVAL; break; } return -1; } #else int result = orig_stat (name, buf); if (result == 0) { # if REPLACE_FUNC_STAT_FILE /* Solaris 9 mistakenly succeeds when given a non-directory with a trailing slash. */ if (!S_ISDIR (buf->st_mode)) { size_t len = strlen (name); if (ISSLASH (name[len - 1])) { errno = ENOTDIR; return -1; } } # endif /* REPLACE_FUNC_STAT_FILE */ result = stat_time_normalize (result, buf); } return result; #endif } libffcall-2.5/gnulib-lib/sys_types.in.h0000664000000000000000000000706514631432055015046 00000000000000/* Provide a more complete sys/types.h. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* This file uses #include_next of a system file that defines time_t. For the 'year2038' module to work right, needs to have been included before. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #if defined _WIN32 && !defined __CYGWIN__ \ && (defined __need_off_t || defined __need___off64_t \ || defined __need_ssize_t || defined __need_time_t) /* Special invocation convention inside mingw header files. */ #@INCLUDE_NEXT@ @NEXT_SYS_TYPES_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_SYS_TYPES_H /* The include_next requires a split double-inclusion guard. */ # define _GL_INCLUDING_SYS_TYPES_H #@INCLUDE_NEXT@ @NEXT_SYS_TYPES_H@ # undef _GL_INCLUDING_SYS_TYPES_H #ifndef _@GUARD_PREFIX@_SYS_TYPES_H #define _@GUARD_PREFIX@_SYS_TYPES_H /* Override off_t if Large File Support is requested on native Windows. */ #if @WINDOWS_64_BIT_OFF_T@ /* Same as int64_t in . */ # if defined _MSC_VER # define off_t __int64 # else # define off_t long long int # endif /* Indicator, for gnulib internal purposes. */ # define _GL_WINDOWS_64_BIT_OFF_T 1 #endif /* Define the off64_t type. */ #if !@HAVE_OFF64_T@ # if !GNULIB_defined_off64_t /* Define off64_t to int64_t always. */ typedef long long off64_t; # define GNULIB_defined_off64_t 1 # endif #endif /* Override dev_t and ino_t if distinguishable inodes support is requested on native Windows. */ #if @WINDOWS_STAT_INODES@ # if @WINDOWS_STAT_INODES@ == 2 /* Experimental, not useful in Windows 10. */ /* Define dev_t to a 64-bit type. */ # if !defined GNULIB_defined_dev_t typedef unsigned long long int rpl_dev_t; # undef dev_t # define dev_t rpl_dev_t # define GNULIB_defined_dev_t 1 # endif /* Define ino_t to a 128-bit type. */ # if !defined GNULIB_defined_ino_t /* MSVC does not have a 128-bit integer type. GCC has a 128-bit integer type __int128, but only on 64-bit targets. */ typedef struct { unsigned long long int _gl_ino[2]; } rpl_ino_t; # undef ino_t # define ino_t rpl_ino_t # define GNULIB_defined_ino_t 1 # endif # else /* @WINDOWS_STAT_INODES@ == 1 */ /* Define ino_t to a 64-bit type. */ # if !defined GNULIB_defined_ino_t typedef unsigned long long int rpl_ino_t; # undef ino_t # define ino_t rpl_ino_t # define GNULIB_defined_ino_t 1 # endif # endif /* Indicator, for gnulib internal purposes. */ # define _GL_WINDOWS_STAT_INODES @WINDOWS_STAT_INODES@ #endif /* MSVC 9 defines size_t in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if (defined _WIN32 && ! defined __CYGWIN__) && ! defined __GLIBC__ # include #endif #endif /* _@GUARD_PREFIX@_SYS_TYPES_H */ #endif /* _@GUARD_PREFIX@_SYS_TYPES_H */ #endif /* __need_XXX */ libffcall-2.5/gnulib-lib/gl_anyhash_primes.h0000664000000000000000000001136614631432055016072 00000000000000/* Table of primes, for use by hash tables. Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Array of primes, approximately in steps of factor 1.2. This table was computed by executing the Common Lisp expression (dotimes (i 244) (format t "nextprime(~D)~%" (ceiling (expt 1.2d0 i)))) and feeding the result to PARI/gp. */ static const size_t primes[] = { 11, 13, 17, 19, 23, 29, 37, 41, 47, 59, 67, 83, 97, 127, 139, 167, 199, 239, 293, 347, 419, 499, 593, 709, 853, 1021, 1229, 1471, 1777, 2129, 2543, 3049, 3659, 4391, 5273, 6323, 7589, 9103, 10937, 13109, 15727, 18899, 22651, 27179, 32609, 39133, 46957, 56359, 67619, 81157, 97369, 116849, 140221, 168253, 201907, 242309, 290761, 348889, 418667, 502409, 602887, 723467, 868151, 1041779, 1250141, 1500181, 1800191, 2160233, 2592277, 3110741, 3732887, 4479463, 5375371, 6450413, 7740517, 9288589, 11146307, 13375573, 16050689, 19260817, 23112977, 27735583, 33282701, 39939233, 47927081, 57512503, 69014987, 82818011, 99381577, 119257891, 143109469, 171731387, 206077643, 247293161, 296751781, 356102141, 427322587, 512787097, 615344489, 738413383, 886096061, 1063315271, 1275978331, 1531174013, 1837408799, 2204890543UL, 2645868653UL, 3175042391UL, 3810050851UL, #if SIZE_MAX > 4294967295UL 4572061027UL, 5486473229UL, 6583767889UL, 7900521449UL, 9480625733UL, 11376750877UL, 13652101063UL, 16382521261UL, 19659025513UL, 23590830631UL, 28308996763UL, 33970796089UL, 40764955463UL, 48917946377UL, 58701535657UL, 70441842749UL, 84530211301UL, 101436253561UL, 121723504277UL, 146068205131UL, 175281846149UL, 210338215379UL, 252405858521UL, 302887030151UL, 363464436191UL, 436157323417UL, 523388788231UL, 628066545713UL, 753679854847UL, 904415825857UL, 1085298991109UL, 1302358789181UL, 1562830547009UL, 1875396656429UL, 2250475987709UL, 2700571185239UL, 3240685422287UL, 3888822506759UL, 4666587008147UL, 5599904409713UL, 6719885291641UL, 8063862349969UL, 9676634819959UL, 11611961783951UL, 13934354140769UL, 16721224968907UL, 20065469962669UL, 24078563955191UL, 28894276746229UL, 34673132095507UL, 41607758514593UL, 49929310217531UL, 59915172260971UL, 71898206713183UL, 86277848055823UL, 103533417666967UL, 124240101200359UL, 149088121440451UL, 178905745728529UL, 214686894874223UL, 257624273849081UL, 309149128618903UL, 370978954342639UL, 445174745211143UL, 534209694253381UL, 641051633104063UL, 769261959724877UL, 923114351670013UL, 1107737222003791UL, 1329284666404567UL, 1595141599685509UL, 1914169919622551UL, 2297003903547091UL, 2756404684256459UL, 3307685621107757UL, 3969222745329323UL, 4763067294395177UL, 5715680753274209UL, 6858816903929113UL, 8230580284714831UL, 9876696341657791UL, 11852035609989371UL, 14222442731987227UL, 17066931278384657UL, 20480317534061597UL, 24576381040873903UL, 29491657249048679UL, 35389988698858471UL, 42467986438630267UL, 50961583726356109UL, 61153900471627387UL, 73384680565952851UL, 88061616679143347UL, 105673940014972061UL, 126808728017966413UL, 152170473621559703UL, 182604568345871671UL, 219125482015045997UL, 262950578418055169UL, 315540694101666193UL, 378648832921999397UL, 454378599506399233UL, 545254319407679131UL, 654305183289214771UL, 785166219947057701UL, 942199463936469157UL, 1130639356723763129UL, 1356767228068515623UL, 1628120673682218619UL, 1953744808418662409UL, 2344493770102394881UL, 2813392524122873857UL, 3376071028947448339UL, 4051285234736937517UL, 4861542281684325481UL, 5833850738021191727UL, 7000620885625427969UL, 8400745062750513217UL, 10080894075300616261UL, 12097072890360739951UL, 14516487468432885797UL, 17419784962119465179UL, #endif SIZE_MAX /* sentinel, to ensure the search terminates */ }; /* Returns a suitable prime >= ESTIMATE. */ static size_t next_prime (size_t estimate) { size_t i; for (i = 0; i < sizeof (primes) / sizeof (primes[0]); i++) if (primes[i] >= estimate) return primes[i]; return SIZE_MAX; /* not a prime, but better than nothing */ } libffcall-2.5/gnulib-lib/arg-nonnull.h0000664000000000000000000000235314631432055014626 00000000000000/* A C macro for declaring that specific arguments must not be NULL. Copyright (C) 2009-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* _GL_ARG_NONNULL((n,...,m)) tells the compiler and static analyzer tools that the values passed as arguments n, ..., m must be non-NULL pointers. n = 1 stands for the first argument, n = 2 for the second argument etc. */ #ifndef _GL_ARG_NONNULL # if __GNUC__ > 3 || (__GNUC__ == 3 && __GNUC_MINOR__ >= 3) || defined __clang__ # define _GL_ARG_NONNULL(params) __attribute__ ((__nonnull__ params)) # else # define _GL_ARG_NONNULL(params) # endif #endif libffcall-2.5/gnulib-lib/xalloc-oversized.h0000664000000000000000000000512514664171733015675 00000000000000/* xalloc-oversized.h -- memory allocation size checking Copyright (C) 1990-2000, 2003-2004, 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef XALLOC_OVERSIZED_H_ #define XALLOC_OVERSIZED_H_ #include #include /* True if N * S does not fit into both ptrdiff_t and size_t. N and S should be nonnegative and free of side effects. This expands to a constant expression if N and S are both constants. By gnulib convention, SIZE_MAX represents overflow in size_t calculations, so the conservative size_t-based dividend to use here is SIZE_MAX - 1. */ #define __xalloc_oversized(n, s) \ ((s) != 0 \ && (PTRDIFF_MAX < SIZE_MAX ? PTRDIFF_MAX : SIZE_MAX - 1) / (s) < (n)) /* Return 1 if and only if an array of N objects, each of size S, cannot exist reliably because its total size in bytes would exceed MIN (PTRDIFF_MAX, SIZE_MAX - 1). N and S should be nonnegative and free of side effects. Warning: (xalloc_oversized (N, S) ? NULL : malloc (N * S)) can misbehave if N and S are both narrower than ptrdiff_t and size_t, and can be rewritten as (xalloc_oversized (N, S) ? NULL : malloc (N * (size_t) S)). This is a macro, not a function, so that it works even if an argument exceeds MAX (PTRDIFF_MAX, SIZE_MAX). */ #if 7 <= __GNUC__ && !defined __clang__ && PTRDIFF_MAX < SIZE_MAX # define xalloc_oversized(n, s) \ __builtin_mul_overflow_p (n, s, (ptrdiff_t) 1) #elif 5 <= __GNUC__ && !defined __clang__ && !defined __ICC \ && PTRDIFF_MAX < SIZE_MAX # define xalloc_oversized(n, s) \ (__builtin_constant_p (n) && __builtin_constant_p (s) \ ? __xalloc_oversized (n, s) \ : __extension__ \ ({ ptrdiff_t __xalloc_count; \ __builtin_mul_overflow (n, s, &__xalloc_count); })) /* Other compilers use integer division; this may be slower but is more portable. */ #else # define xalloc_oversized(n, s) __xalloc_oversized (n, s) #endif #endif /* !XALLOC_OVERSIZED_H_ */ libffcall-2.5/gnulib-lib/windows-mutex.h0000664000000000000000000000322414657156076015240 00000000000000/* Plain mutexes (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #ifndef _WINDOWS_MUTEX_H #define _WINDOWS_MUTEX_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include #include "windows-initguard.h" typedef struct { glwthread_initguard_t guard; /* protects the initialization */ DWORD owner; CRITICAL_SECTION lock; } glwthread_mutex_t; #define GLWTHREAD_MUTEX_INIT { GLWTHREAD_INITGUARD_INIT } #ifdef __cplusplus extern "C" { #endif extern void glwthread_mutex_init (glwthread_mutex_t *mutex); extern int glwthread_mutex_lock (glwthread_mutex_t *mutex); extern int glwthread_mutex_trylock (glwthread_mutex_t *mutex); extern int glwthread_mutex_unlock (glwthread_mutex_t *mutex); extern int glwthread_mutex_destroy (glwthread_mutex_t *mutex); #ifdef __cplusplus } #endif #endif /* _WINDOWS_MUTEX_H */ libffcall-2.5/gnulib-lib/asyncsafe-spin.h0000664000000000000000000000507614631432055015322 00000000000000/* Spin locks for communication between threads and signal handlers. Copyright (C) 2020-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2020. */ #ifndef _ASYNCSAFE_SPIN_H #define _ASYNCSAFE_SPIN_H /* Usual spin locks are not allowed for communication between threads and signal handlers, because the pthread_spin_* functions are not async-safe; see section 2.4.3 Signal Actions. This module provides spin locks with a similar API. It can be used like this, both in regular multithreaded code and in signal handlers: sigset_t saved_mask; asyncsafe_spin_lock (&lock, &mask, &saved_mask); do_something_contentious (); asyncsafe_spin_unlock (&lock, &saved_mask); The mask you specify here is the set of signals whose handlers might want to take the same lock. asyncsafe_spin_lock/unlock use pthread_sigmask, to ensure that while a thread is executing such code, no signal handler will start such code for the same lock *in the same thread* (because if this happened, the signal handler would hang!). */ #include #if defined _WIN32 && ! defined __CYGWIN__ # include "windows-spin.h" typedef glwthread_spinlock_t asyncsafe_spinlock_t; # define ASYNCSAFE_SPIN_INIT GLWTHREAD_SPIN_INIT #else typedef unsigned int asyncsafe_spinlock_t; # define ASYNCSAFE_SPIN_INIT 0 #endif #ifdef __cplusplus extern "C" { #endif extern void asyncsafe_spin_init (asyncsafe_spinlock_t *lock); extern void asyncsafe_spin_lock (asyncsafe_spinlock_t *lock, const sigset_t *mask, sigset_t *saved_mask); extern void asyncsafe_spin_unlock (asyncsafe_spinlock_t *lock, const sigset_t *saved_mask); extern void asyncsafe_spin_destroy (asyncsafe_spinlock_t *lock); #ifdef __cplusplus } #endif #endif /* _ASYNCSAFE_SPIN_H */ libffcall-2.5/gnulib-lib/windows-mutex.c0000664000000000000000000000670514657156076015242 00000000000000/* Plain mutexes (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #include /* Specification. */ #include "windows-mutex.h" #include #include void glwthread_mutex_init (glwthread_mutex_t *mutex) { mutex->owner = 0; InitializeCriticalSection (&mutex->lock); mutex->guard.done = 1; } int glwthread_mutex_lock (glwthread_mutex_t *mutex) { if (!mutex->guard.done) { if (InterlockedIncrement (&mutex->guard.started) == 0) /* This thread is the first one to need this mutex. Initialize it. */ glwthread_mutex_init (mutex); else { /* Don't let mutex->guard.started grow and wrap around. */ InterlockedDecrement (&mutex->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this mutex. */ while (!mutex->guard.done) Sleep (0); } } /* If this thread already owns the mutex, POSIX pthread_mutex_lock() is required to deadlock here. But let's not do that on purpose. */ EnterCriticalSection (&mutex->lock); { DWORD self = GetCurrentThreadId (); mutex->owner = self; } return 0; } int glwthread_mutex_trylock (glwthread_mutex_t *mutex) { if (!mutex->guard.done) { if (InterlockedIncrement (&mutex->guard.started) == 0) /* This thread is the first one to need this mutex. Initialize it. */ glwthread_mutex_init (mutex); else { /* Don't let mutex->guard.started grow and wrap around. */ InterlockedDecrement (&mutex->guard.started); /* Let another thread finish initializing this mutex, and let it also lock this mutex. */ return EBUSY; } } if (!TryEnterCriticalSection (&mutex->lock)) return EBUSY; { DWORD self = GetCurrentThreadId (); /* TryEnterCriticalSection succeeded. This means that the mutex was either previously unlocked (and thus mutex->owner == 0) or previously locked by this thread (and thus mutex->owner == self). Since the mutex is meant to be plain, we need to fail in the latter case. */ if (mutex->owner == self) { LeaveCriticalSection (&mutex->lock); return EBUSY; } if (mutex->owner != 0) abort (); mutex->owner = self; } return 0; } int glwthread_mutex_unlock (glwthread_mutex_t *mutex) { if (!mutex->guard.done) return EINVAL; mutex->owner = 0; LeaveCriticalSection (&mutex->lock); return 0; } int glwthread_mutex_destroy (glwthread_mutex_t *mutex) { if (!mutex->guard.done) return EINVAL; DeleteCriticalSection (&mutex->lock); mutex->guard.done = 0; return 0; } libffcall-2.5/gnulib-lib/pthread.in.h0000664000000000000000000022023214657156076014442 00000000000000/* Implement the most essential subset of POSIX pthread.h. Copyright (C) 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Paul Eggert, Glen Lenker, and Bruno Haible. */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined _GL_ALREADY_INCLUDING_PTHREAD_H /* Special invocation convention: On Android, we have a sequence of nested includes -> -> -> -> -> . In this situation, PTHREAD_COND_INITIALIZER is not yet defined, therefore we should not attempt to define PTHREAD_MUTEX_NORMAL etc. */ #@INCLUDE_NEXT@ @NEXT_PTHREAD_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_PTHREAD_H_ #if @HAVE_PTHREAD_H@ # define _GL_ALREADY_INCLUDING_PTHREAD_H /* The include_next requires a split double-inclusion guard. */ # @INCLUDE_NEXT@ @NEXT_PTHREAD_H@ # undef _GL_ALREADY_INCLUDING_PTHREAD_H #endif #ifndef _@GUARD_PREFIX@_PTHREAD_H_ #define _@GUARD_PREFIX@_PTHREAD_H_ /* This file uses _Noreturn, _GL_ATTRIBUTE_PURE, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #define __need_system_stdlib_h #include #undef __need_system_stdlib_h /* The pthreads-win32 defines a couple of broken macros. */ #undef asctime_r #undef ctime_r #undef gmtime_r #undef localtime_r #undef rand_r #undef strtok_r #include #include #include #include /* The __attribute__ feature is available in gcc versions 2.5 and later. The attribute __pure__ was added in gcc 2.96. */ #ifndef _GL_ATTRIBUTE_PURE # if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96) || defined __clang__ # define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__)) # else # define _GL_ATTRIBUTE_PURE /* empty */ # endif #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _Noreturn is copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* =========== Thread types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_THREAD@ # include "windows-thread.h" # if @HAVE_PTHREAD_T@ # define pthread_t rpl_pthread_t # define pthread_attr_t rpl_pthread_attr_t # endif # if !GNULIB_defined_pthread_thread_types typedef glwthread_thread_t pthread_t; typedef unsigned int pthread_attr_t; # define GNULIB_defined_pthread_thread_types 1 # endif # else # if @HAVE_PTHREAD_T@ # define pthread_t rpl_pthread_t # define pthread_attr_t rpl_pthread_attr_t # endif # if !GNULIB_defined_pthread_thread_types typedef int pthread_t; typedef unsigned int pthread_attr_t; # define GNULIB_defined_pthread_thread_types 1 # endif # endif # undef PTHREAD_CREATE_JOINABLE # undef PTHREAD_CREATE_DETACHED # define PTHREAD_CREATE_JOINABLE 0 # define PTHREAD_CREATE_DETACHED 1 #else # if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_pthread_thread_types typedef int pthread_t; typedef unsigned int pthread_attr_t; # define GNULIB_defined_pthread_thread_types 1 # endif # endif # if !@HAVE_PTHREAD_CREATE_DETACHED@ # define PTHREAD_CREATE_JOINABLE 0 # define PTHREAD_CREATE_DETACHED 1 # endif #endif /* =========== Once-only control (initialization) types and macros ========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_ONCE@ # include "windows-once.h" # if @HAVE_PTHREAD_T@ # define pthread_once_t rpl_pthread_once_t # endif # if !GNULIB_defined_pthread_once_types typedef glwthread_once_t pthread_once_t; # define GNULIB_defined_pthread_once_types 1 # endif # undef PTHREAD_ONCE_INIT # define PTHREAD_ONCE_INIT GLWTHREAD_ONCE_INIT # else # if @HAVE_PTHREAD_T@ # define pthread_once_t rpl_pthread_once_t # endif # if !GNULIB_defined_pthread_once_types typedef int pthread_once_t; # define GNULIB_defined_pthread_once_types 1 # endif # undef PTHREAD_ONCE_INIT # define PTHREAD_ONCE_INIT { 0 } # endif #else # if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_pthread_once_types typedef int pthread_once_t; # define GNULIB_defined_pthread_once_types 1 # endif # undef PTHREAD_ONCE_INIT # define PTHREAD_ONCE_INIT { 0 } # endif #endif /* =========== Mutex types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_MUTEX@ # include "windows-timedmutex.h" # include "windows-timedrecmutex.h" # if @HAVE_PTHREAD_T@ # define pthread_mutex_t rpl_pthread_mutex_t # define pthread_mutexattr_t rpl_pthread_mutexattr_t # endif # if !GNULIB_defined_pthread_mutex_types typedef struct { int type; union { glwthread_timedmutex_t u_timedmutex; glwthread_timedrecmutex_t u_timedrecmutex; } u; } pthread_mutex_t; typedef unsigned int pthread_mutexattr_t; # define GNULIB_defined_pthread_mutex_types 1 # endif # undef PTHREAD_MUTEX_INITIALIZER # define PTHREAD_MUTEX_INITIALIZER { 1, { GLWTHREAD_TIMEDMUTEX_INIT } } # else # if @HAVE_PTHREAD_T@ # define pthread_mutex_t rpl_pthread_mutex_t # define pthread_mutexattr_t rpl_pthread_mutexattr_t # endif # if !GNULIB_defined_pthread_mutex_types typedef int pthread_mutex_t; typedef unsigned int pthread_mutexattr_t; # define GNULIB_defined_pthread_mutex_types 1 # endif # undef PTHREAD_MUTEX_INITIALIZER # define PTHREAD_MUTEX_INITIALIZER { 0 } # endif # undef PTHREAD_MUTEX_DEFAULT # undef PTHREAD_MUTEX_NORMAL # undef PTHREAD_MUTEX_ERRORCHECK # undef PTHREAD_MUTEX_RECURSIVE # define PTHREAD_MUTEX_DEFAULT PTHREAD_MUTEX_NORMAL # define PTHREAD_MUTEX_NORMAL 0 # define PTHREAD_MUTEX_ERRORCHECK 1 # define PTHREAD_MUTEX_RECURSIVE 2 # undef PTHREAD_MUTEX_STALLED # undef PTHREAD_MUTEX_ROBUST # define PTHREAD_MUTEX_STALLED 0 # define PTHREAD_MUTEX_ROBUST 1 #else # if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_pthread_mutex_types typedef int pthread_mutex_t; typedef unsigned int pthread_mutexattr_t; # define GNULIB_defined_pthread_mutex_types 1 # endif # undef PTHREAD_MUTEX_INITIALIZER # define PTHREAD_MUTEX_INITIALIZER { 0 } # endif # if !@HAVE_PTHREAD_MUTEX_RECURSIVE@ # define PTHREAD_MUTEX_DEFAULT PTHREAD_MUTEX_NORMAL # define PTHREAD_MUTEX_NORMAL 0 # define PTHREAD_MUTEX_ERRORCHECK 1 # define PTHREAD_MUTEX_RECURSIVE 2 # endif # if !@HAVE_PTHREAD_MUTEX_ROBUST@ # define PTHREAD_MUTEX_STALLED 0 # define PTHREAD_MUTEX_ROBUST 1 # endif #endif /* =========== Read-write lock types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_RWLOCK@ # include "windows-timedrwlock.h" # if @HAVE_PTHREAD_T@ # define pthread_rwlock_t rpl_pthread_rwlock_t # define pthread_rwlockattr_t rpl_pthread_rwlockattr_t # endif # if !GNULIB_defined_pthread_rwlock_types typedef glwthread_timedrwlock_t pthread_rwlock_t; typedef unsigned int pthread_rwlockattr_t; # define GNULIB_defined_pthread_rwlock_types 1 # endif # undef PTHREAD_RWLOCK_INITIALIZER # define PTHREAD_RWLOCK_INITIALIZER GLWTHREAD_TIMEDRWLOCK_INIT # else # if @HAVE_PTHREAD_T@ # define pthread_rwlock_t rpl_pthread_rwlock_t # define pthread_rwlockattr_t rpl_pthread_rwlockattr_t # endif # if !GNULIB_defined_pthread_rwlock_types typedef int pthread_rwlock_t; typedef unsigned int pthread_rwlockattr_t; # define GNULIB_defined_pthread_rwlock_types 1 # endif # undef PTHREAD_RWLOCK_INITIALIZER # define PTHREAD_RWLOCK_INITIALIZER { 0 } # endif #elif @GNULIB_PTHREAD_RWLOCK@ && @REPLACE_PTHREAD_RWLOCK_DESTROY@ /* i.e. PTHREAD_RWLOCK_UNIMPLEMENTED */ # if @HAVE_PTHREAD_T@ # define pthread_rwlock_t rpl_pthread_rwlock_t # define pthread_rwlockattr_t rpl_pthread_rwlockattr_t # endif # if !GNULIB_defined_pthread_rwlock_types typedef struct { pthread_mutex_t lock; /* protects the remaining fields */ pthread_cond_t waiting_readers; /* waiting readers */ pthread_cond_t waiting_writers; /* waiting writers */ unsigned int waiting_writers_count; /* number of waiting writers */ int runcount; /* number of readers running, or -1 when a writer runs */ } pthread_rwlock_t; typedef unsigned int pthread_rwlockattr_t; # define GNULIB_defined_pthread_rwlock_types 1 # endif # undef PTHREAD_RWLOCK_INITIALIZER # define PTHREAD_RWLOCK_INITIALIZER \ { PTHREAD_MUTEX_INITIALIZER, PTHREAD_COND_INITIALIZER, PTHREAD_COND_INITIALIZER, 0, 0 } #elif @GNULIB_PTHREAD_RWLOCK@ && @REPLACE_PTHREAD_RWLOCK_INIT@ /* i.e. PTHREAD_RWLOCK_BAD_WAITQUEUE */ /* Use rwlocks of kind PREFER_WRITER or PREFER_WRITER_NONRECURSIVE instead of the DEFAULT. */ # undef PTHREAD_RWLOCK_INITIALIZER # define PTHREAD_RWLOCK_INITIALIZER PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP #else # if @HAVE_PTHREAD_T@ # if !defined PTHREAD_RWLOCK_INITIALIZER && defined PTHREAD_RWLOCK_INITIALIZER_NP /* z/OS */ # define PTHREAD_RWLOCK_INITIALIZER PTHREAD_RWLOCK_INITIALIZER_NP # endif # else # if !GNULIB_defined_pthread_rwlock_types typedef int pthread_rwlock_t; typedef unsigned int pthread_rwlockattr_t; # define GNULIB_defined_pthread_rwlock_types 1 # endif # undef PTHREAD_RWLOCK_INITIALIZER # define PTHREAD_RWLOCK_INITIALIZER { 0 } # endif #endif /* =========== Condition variable types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_COND@ # include "windows-cond.h" # if @HAVE_PTHREAD_T@ # define pthread_cond_t rpl_pthread_cond_t # define pthread_condattr_t rpl_pthread_condattr_t # endif # if !GNULIB_defined_pthread_cond_types typedef glwthread_cond_t pthread_cond_t; typedef unsigned int pthread_condattr_t; # define GNULIB_defined_pthread_cond_types 1 # endif # undef PTHREAD_COND_INITIALIZER # define PTHREAD_COND_INITIALIZER GLWTHREAD_COND_INIT # else # if @HAVE_PTHREAD_T@ # define pthread_cond_t rpl_pthread_cond_t # define pthread_condattr_t rpl_pthread_condattr_t # endif # if !GNULIB_defined_pthread_cond_types typedef int pthread_cond_t; typedef unsigned int pthread_condattr_t; # define GNULIB_defined_pthread_cond_types 1 # endif # undef PTHREAD_COND_INITIALIZER # define PTHREAD_COND_INITIALIZER { 0 } # endif #else # if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_pthread_cond_types typedef int pthread_cond_t; typedef unsigned int pthread_condattr_t; # define GNULIB_defined_pthread_cond_types 1 # endif # undef PTHREAD_COND_INITIALIZER # define PTHREAD_COND_INITIALIZER { 0 } # endif #endif /* =========== Thread-specific storage types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_TSS@ # include "windows-tls.h" # if @HAVE_PTHREAD_T@ # define pthread_key_t rpl_pthread_key_t # endif # if !GNULIB_defined_pthread_tss_types typedef glwthread_tls_key_t pthread_key_t; # define GNULIB_defined_pthread_tss_types 1 # endif # undef PTHREAD_DESTRUCTOR_ITERATIONS # define PTHREAD_DESTRUCTOR_ITERATIONS GLWTHREAD_DESTRUCTOR_ITERATIONS # else # if @HAVE_PTHREAD_T@ # define pthread_key_t rpl_pthread_key_t # endif # if !GNULIB_defined_pthread_tss_types typedef void ** pthread_key_t; # define GNULIB_defined_pthread_tss_types 1 # endif # undef PTHREAD_DESTRUCTOR_ITERATIONS # define PTHREAD_DESTRUCTOR_ITERATIONS 0 # endif #else # if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_pthread_tss_types typedef void ** pthread_key_t; # define GNULIB_defined_pthread_tss_types 1 # endif # undef PTHREAD_DESTRUCTOR_ITERATIONS # define PTHREAD_DESTRUCTOR_ITERATIONS 0 # endif #endif /* =========== Spinlock types and macros =========== */ #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # if @GNULIB_PTHREAD_SPIN@ # include "windows-spin.h" # if @HAVE_PTHREAD_T@ # define pthread_spinlock_t rpl_pthread_spinlock_t # endif # if !GNULIB_defined_pthread_spin_types typedef glwthread_spinlock_t pthread_spinlock_t; # define GNULIB_defined_pthread_spin_types 1 # endif # else # if @HAVE_PTHREAD_T@ # define pthread_spinlock_t rpl_pthread_spinlock_t # endif # if !GNULIB_defined_pthread_spin_types typedef pthread_mutex_t pthread_spinlock_t; # define GNULIB_defined_pthread_spin_types 1 # endif # endif # undef PTHREAD_PROCESS_PRIVATE # undef PTHREAD_PROCESS_SHARED # define PTHREAD_PROCESS_PRIVATE 0 # define PTHREAD_PROCESS_SHARED 1 #else # if @HAVE_PTHREAD_SPINLOCK_T@ /* exists and defines pthread_spinlock_t. */ # if !@HAVE_PTHREAD_SPIN_INIT@ || @REPLACE_PTHREAD_SPIN_INIT@ /* If the 'pthread-spin' module is in use, it defines all the pthread_spin* functions. Prepare for it by overriding pthread_spinlock_t if that might be needed. */ # if !(((__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 7) \ || __clang_major__ > 3 || (__clang_major__ == 3 && __clang_minor__ >= 1)) \ || (((__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 1)) \ && !defined __ANDROID__) \ || __clang_major__ >= 3)) \ && !defined __ibmxl__) /* We can't use GCC built-ins. Approximate spinlocks with mutexes. */ # if !GNULIB_defined_pthread_spin_types # define pthread_spinlock_t pthread_mutex_t # define GNULIB_defined_pthread_spin_types 1 # endif # endif # endif # else /* Approximate spinlocks with mutexes. */ # if !GNULIB_defined_pthread_spin_types typedef pthread_mutex_t pthread_spinlock_t; # define GNULIB_defined_pthread_spin_types 1 # endif # endif # if !@HAVE_PTHREAD_PROCESS_SHARED@ # define PTHREAD_PROCESS_PRIVATE 0 # define PTHREAD_PROCESS_SHARED 1 # endif #endif /* =========== Other types and macros =========== */ #if !@HAVE_PTHREAD_T@ # if !GNULIB_defined_other_pthread_types typedef int pthread_barrier_t; typedef unsigned int pthread_barrierattr_t; # define GNULIB_defined_other_pthread_types 1 # endif #endif #if !defined PTHREAD_CANCELED # define PTHREAD_BARRIER_SERIAL_THREAD (-1) # define PTHREAD_CANCEL_DEFERRED 0 # define PTHREAD_CANCEL_ASYNCHRONOUS 1 # define PTHREAD_CANCEL_ENABLE 0 # define PTHREAD_CANCEL_DISABLE 1 # define PTHREAD_CANCELED ((void *) -1) # define PTHREAD_INHERIT_SCHED 0 # define PTHREAD_EXPLICIT_SCHED 1 # define PTHREAD_PRIO_NONE 0 # define PTHREAD_PRIO_INHERIT 1 # define PTHREAD_PRIO_PROTECT 2 # define PTHREAD_SCOPE_SYSTEM 0 # define PTHREAD_SCOPE_PROCESS 1 #endif /* =========== Thread functions =========== */ #if @GNULIB_PTHREAD_THREAD@ /* The 'restrict' qualifier on ARG is nonsense, but POSIX specifies it this way. Sigh. */ # if @REPLACE_PTHREAD_CREATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_create # define pthread_create rpl_pthread_create # endif _GL_FUNCDECL_RPL (pthread_create, int, (pthread_t *restrict threadp, const pthread_attr_t *restrict attr, void * (*mainfunc) (void *), void *restrict arg), _GL_ARG_NONNULL ((1, 3))); _GL_CXXALIAS_RPL (pthread_create, int, (pthread_t *restrict threadp, const pthread_attr_t *restrict attr, void * (*mainfunc) (void *), void *restrict arg)); # else # if !@HAVE_PTHREAD_CREATE@ _GL_FUNCDECL_SYS (pthread_create, int, (pthread_t *restrict threadp, const pthread_attr_t *restrict attr, void * (*mainfunc) (void *), void *restrict arg), _GL_ARG_NONNULL ((1, 3))); # endif _GL_CXXALIAS_SYS_CAST (pthread_create, int, (pthread_t *restrict threadp, const pthread_attr_t *restrict attr, void * (*mainfunc) (void *), void *restrict arg)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_create); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_create # if HAVE_RAW_DECL_PTHREAD_CREATE _GL_WARN_ON_USE (pthread_create, "pthread_create is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_ATTR_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_attr_init # define pthread_attr_init rpl_pthread_attr_init # endif _GL_FUNCDECL_RPL (pthread_attr_init, int, (pthread_attr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_attr_init, int, (pthread_attr_t *attr)); # else # if !@HAVE_PTHREAD_ATTR_INIT@ _GL_FUNCDECL_SYS (pthread_attr_init, int, (pthread_attr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_attr_init, int, (pthread_attr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_attr_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_attr_init # if HAVE_RAW_DECL_PTHREAD_ATTR_INIT _GL_WARN_ON_USE (pthread_attr_init, "pthread_attr_init is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_ATTR_GETDETACHSTATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_attr_getdetachstate # define pthread_attr_getdetachstate rpl_pthread_attr_getdetachstate # endif _GL_FUNCDECL_RPL (pthread_attr_getdetachstate, int, (const pthread_attr_t *attr, int *detachstatep), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_attr_getdetachstate, int, (const pthread_attr_t *attr, int *detachstatep)); # else # if !@HAVE_PTHREAD_ATTR_GETDETACHSTATE@ _GL_FUNCDECL_SYS (pthread_attr_getdetachstate, int, (const pthread_attr_t *attr, int *detachstatep), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (pthread_attr_getdetachstate, int, (const pthread_attr_t *attr, int *detachstatep)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_attr_getdetachstate); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_attr_getdetachstate # if HAVE_RAW_DECL_PTHREAD_ATTR_GETDETACHSTATE _GL_WARN_ON_USE (pthread_attr_getdetachstate, "pthread_attr_getdetachstate is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_ATTR_SETDETACHSTATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_attr_setdetachstate # define pthread_attr_setdetachstate rpl_pthread_attr_setdetachstate # endif _GL_FUNCDECL_RPL (pthread_attr_setdetachstate, int, (pthread_attr_t *attr, int detachstate), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_attr_setdetachstate, int, (pthread_attr_t *attr, int detachstate)); # else # if !@HAVE_PTHREAD_ATTR_SETDETACHSTATE@ _GL_FUNCDECL_SYS (pthread_attr_setdetachstate, int, (pthread_attr_t *attr, int detachstate), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_attr_setdetachstate, int, (pthread_attr_t *attr, int detachstate)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_attr_setdetachstate); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_attr_setdetachstate # if HAVE_RAW_DECL_PTHREAD_ATTR_SETDETACHSTATE _GL_WARN_ON_USE (pthread_attr_setdetachstate, "pthread_attr_setdetachstate is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_ATTR_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_attr_destroy # define pthread_attr_destroy rpl_pthread_attr_destroy # endif _GL_FUNCDECL_RPL (pthread_attr_destroy, int, (pthread_attr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_attr_destroy, int, (pthread_attr_t *attr)); # else # if !@HAVE_PTHREAD_ATTR_DESTROY@ _GL_FUNCDECL_SYS (pthread_attr_destroy, int, (pthread_attr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_attr_destroy, int, (pthread_attr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_attr_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_attr_destroy # if HAVE_RAW_DECL_PTHREAD_ATTR_DESTROY _GL_WARN_ON_USE (pthread_attr_destroy, "pthread_attr_destroy is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_SELF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_self # define pthread_self rpl_pthread_self # endif _GL_FUNCDECL_RPL (pthread_self, pthread_t, (void), _GL_ATTRIBUTE_PURE); _GL_CXXALIAS_RPL (pthread_self, pthread_t, (void)); # else # if !@HAVE_PTHREAD_SELF@ _GL_FUNCDECL_SYS (pthread_self, pthread_t, (void), _GL_ATTRIBUTE_PURE); # endif _GL_CXXALIAS_SYS (pthread_self, pthread_t, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_self); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_self # if HAVE_RAW_DECL_PTHREAD_SELF _GL_WARN_ON_USE (pthread_self, "pthread_self is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_EQUAL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_equal # define pthread_equal rpl_pthread_equal # endif _GL_FUNCDECL_RPL (pthread_equal, int, (pthread_t thread1, pthread_t thread2)); _GL_CXXALIAS_RPL (pthread_equal, int, (pthread_t thread1, pthread_t thread2)); # else # if !@HAVE_PTHREAD_EQUAL@ _GL_FUNCDECL_SYS (pthread_equal, int, (pthread_t thread1, pthread_t thread2)); # endif _GL_CXXALIAS_SYS (pthread_equal, int, (pthread_t thread1, pthread_t thread2)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_equal); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_equal # if HAVE_RAW_DECL_PTHREAD_EQUAL _GL_WARN_ON_USE (pthread_equal, "pthread_equal is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_DETACH@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_detach # define pthread_detach rpl_pthread_detach # endif _GL_FUNCDECL_RPL (pthread_detach, int, (pthread_t thread)); _GL_CXXALIAS_RPL (pthread_detach, int, (pthread_t thread)); # else # if !@HAVE_PTHREAD_DETACH@ _GL_FUNCDECL_SYS (pthread_detach, int, (pthread_t thread)); # endif _GL_CXXALIAS_SYS (pthread_detach, int, (pthread_t thread)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_detach); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_detach # if HAVE_RAW_DECL_PTHREAD_DETACH _GL_WARN_ON_USE (pthread_detach, "pthread_detach is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_JOIN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_join # define pthread_join rpl_pthread_join # endif _GL_FUNCDECL_RPL (pthread_join, int, (pthread_t thread, void **valuep)); _GL_CXXALIAS_RPL (pthread_join, int, (pthread_t thread, void **valuep)); # else # if !@HAVE_PTHREAD_JOIN@ _GL_FUNCDECL_SYS (pthread_join, int, (pthread_t thread, void **valuep)); # endif _GL_CXXALIAS_SYS (pthread_join, int, (pthread_t thread, void **valuep)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_join); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_join # if HAVE_RAW_DECL_PTHREAD_JOIN _GL_WARN_ON_USE (pthread_join, "pthread_join is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif #if @GNULIB_PTHREAD_THREAD@ # if @REPLACE_PTHREAD_EXIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_exit # define pthread_exit rpl_pthread_exit # endif _GL_FUNCDECL_RPL (pthread_exit, _Noreturn void, (void *value)); _GL_CXXALIAS_RPL (pthread_exit, void, (void *value)); # else # if !@HAVE_PTHREAD_EXIT@ _GL_FUNCDECL_SYS (pthread_exit, _Noreturn void, (void *value)); # endif /* Need to cast because of AIX with xlclang++. */ _GL_CXXALIAS_SYS_CAST (pthread_exit, void, (void *value)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_exit); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_exit # if HAVE_RAW_DECL_PTHREAD_EXIT _GL_WARN_ON_USE (pthread_exit, "pthread_exit is not portable - " "use gnulib module pthread-thread for portability"); # endif #endif /* =========== Once-only control (initialization) functions =========== */ #if @GNULIB_PTHREAD_ONCE@ # if @REPLACE_PTHREAD_ONCE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_once # define pthread_once rpl_pthread_once # endif _GL_FUNCDECL_RPL (pthread_once, int, (pthread_once_t *once_control, void (*initfunction) (void)), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_once, int, (pthread_once_t *once_control, void (*initfunction) (void))); # else # if !@HAVE_PTHREAD_ONCE@ _GL_FUNCDECL_SYS (pthread_once, int, (pthread_once_t *once_control, void (*initfunction) (void)), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS_CAST (pthread_once, int, (pthread_once_t *once_control, void (*initfunction) (void))); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_once); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_once # if HAVE_RAW_DECL_PTHREAD_ONCE _GL_WARN_ON_USE (pthread_once, "pthread_once is not portable - " "use gnulib module pthread-once for portability"); # endif #endif /* =========== Mutex functions =========== */ #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEX_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_init # define pthread_mutex_init rpl_pthread_mutex_init # endif _GL_FUNCDECL_RPL (pthread_mutex_init, int, (pthread_mutex_t *restrict mutex, const pthread_mutexattr_t *restrict attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutex_init, int, (pthread_mutex_t *restrict mutex, const pthread_mutexattr_t *restrict attr)); # else # if !@HAVE_PTHREAD_MUTEX_INIT@ _GL_FUNCDECL_SYS (pthread_mutex_init, int, (pthread_mutex_t *restrict mutex, const pthread_mutexattr_t *restrict attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutex_init, int, (pthread_mutex_t *restrict mutex, const pthread_mutexattr_t *restrict attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_init # if HAVE_RAW_DECL_PTHREAD_MUTEX_INIT _GL_WARN_ON_USE (pthread_mutex_init, "pthread_mutex_init is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_init # define pthread_mutexattr_init rpl_pthread_mutexattr_init # endif _GL_FUNCDECL_RPL (pthread_mutexattr_init, int, (pthread_mutexattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutexattr_init, int, (pthread_mutexattr_t *attr)); # else # if !@HAVE_PTHREAD_MUTEXATTR_INIT@ _GL_FUNCDECL_SYS (pthread_mutexattr_init, int, (pthread_mutexattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutexattr_init, int, (pthread_mutexattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_init # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_INIT _GL_WARN_ON_USE (pthread_mutexattr_init, "pthread_mutexattr_init is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_GETTYPE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_gettype # define pthread_mutexattr_gettype rpl_pthread_mutexattr_gettype # endif _GL_FUNCDECL_RPL (pthread_mutexattr_gettype, int, (const pthread_mutexattr_t *restrict attr, int *restrict typep), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_mutexattr_gettype, int, (const pthread_mutexattr_t *restrict attr, int *restrict typep)); # else # if !@HAVE_PTHREAD_MUTEXATTR_GETTYPE@ _GL_FUNCDECL_SYS (pthread_mutexattr_gettype, int, (const pthread_mutexattr_t *restrict attr, int *restrict typep), _GL_ARG_NONNULL ((1, 2))); # endif /* Need to cast, because on FreeBSD the first parameter is pthread_mutexattr_t *attr. */ _GL_CXXALIAS_SYS_CAST (pthread_mutexattr_gettype, int, (const pthread_mutexattr_t *restrict attr, int *restrict typep)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_gettype); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_gettype # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_GETTYPE _GL_WARN_ON_USE (pthread_mutexattr_gettype, "pthread_mutexattr_gettype is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_SETTYPE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_settype # define pthread_mutexattr_settype rpl_pthread_mutexattr_settype # endif _GL_FUNCDECL_RPL (pthread_mutexattr_settype, int, (pthread_mutexattr_t *attr, int type), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutexattr_settype, int, (pthread_mutexattr_t *attr, int type)); # else # if !@HAVE_PTHREAD_MUTEXATTR_SETTYPE@ _GL_FUNCDECL_SYS (pthread_mutexattr_settype, int, (pthread_mutexattr_t *attr, int type), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutexattr_settype, int, (pthread_mutexattr_t *attr, int type)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_settype); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_settype # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_SETTYPE _GL_WARN_ON_USE (pthread_mutexattr_settype, "pthread_mutexattr_settype is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_GETROBUST@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_getrobust # define pthread_mutexattr_getrobust rpl_pthread_mutexattr_getrobust # endif _GL_FUNCDECL_RPL (pthread_mutexattr_getrobust, int, (const pthread_mutexattr_t *restrict attr, int *restrict robustp), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_mutexattr_getrobust, int, (const pthread_mutexattr_t *restrict attr, int *restrict robustp)); # else # if !@HAVE_PTHREAD_MUTEXATTR_GETROBUST@ _GL_FUNCDECL_SYS (pthread_mutexattr_getrobust, int, (const pthread_mutexattr_t *restrict attr, int *restrict robustp), _GL_ARG_NONNULL ((1, 2))); # endif /* Need to cast, because on FreeBSD the first parameter is pthread_mutexattr_t *attr. */ _GL_CXXALIAS_SYS_CAST (pthread_mutexattr_getrobust, int, (const pthread_mutexattr_t *restrict attr, int *restrict robustp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_getrobust); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_getrobust # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_GETROBUST _GL_WARN_ON_USE (pthread_mutexattr_getrobust, "pthread_mutexattr_getrobust is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_SETROBUST@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_setrobust # define pthread_mutexattr_setrobust rpl_pthread_mutexattr_setrobust # endif _GL_FUNCDECL_RPL (pthread_mutexattr_setrobust, int, (pthread_mutexattr_t *attr, int robust), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutexattr_setrobust, int, (pthread_mutexattr_t *attr, int robust)); # else # if !@HAVE_PTHREAD_MUTEXATTR_SETROBUST@ _GL_FUNCDECL_SYS (pthread_mutexattr_setrobust, int, (pthread_mutexattr_t *attr, int robust), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutexattr_setrobust, int, (pthread_mutexattr_t *attr, int robust)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_setrobust); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_setrobust # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_SETROBUST _GL_WARN_ON_USE (pthread_mutexattr_setrobust, "pthread_mutexattr_setrobust is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEXATTR_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutexattr_destroy # define pthread_mutexattr_destroy rpl_pthread_mutexattr_destroy # endif _GL_FUNCDECL_RPL (pthread_mutexattr_destroy, int, (pthread_mutexattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutexattr_destroy, int, (pthread_mutexattr_t *attr)); # else # if !@HAVE_PTHREAD_MUTEXATTR_DESTROY@ _GL_FUNCDECL_SYS (pthread_mutexattr_destroy, int, (pthread_mutexattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutexattr_destroy, int, (pthread_mutexattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutexattr_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutexattr_destroy # if HAVE_RAW_DECL_PTHREAD_MUTEXATTR_DESTROY _GL_WARN_ON_USE (pthread_mutexattr_destroy, "pthread_mutexattr_destroy is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEX_LOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_lock # define pthread_mutex_lock rpl_pthread_mutex_lock # endif _GL_FUNCDECL_RPL (pthread_mutex_lock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutex_lock, int, (pthread_mutex_t *mutex)); # else # if !@HAVE_PTHREAD_MUTEX_LOCK@ _GL_FUNCDECL_SYS (pthread_mutex_lock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutex_lock, int, (pthread_mutex_t *mutex)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_lock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_lock # if HAVE_RAW_DECL_PTHREAD_MUTEX_LOCK _GL_WARN_ON_USE (pthread_mutex_lock, "pthread_mutex_lock is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEX_TRYLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_trylock # define pthread_mutex_trylock rpl_pthread_mutex_trylock # endif _GL_FUNCDECL_RPL (pthread_mutex_trylock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutex_trylock, int, (pthread_mutex_t *mutex)); # else # if !@HAVE_PTHREAD_MUTEX_TRYLOCK@ _GL_FUNCDECL_SYS (pthread_mutex_trylock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutex_trylock, int, (pthread_mutex_t *mutex)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_trylock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_trylock # if HAVE_RAW_DECL_PTHREAD_MUTEX_TRYLOCK _GL_WARN_ON_USE (pthread_mutex_trylock, "pthread_mutex_trylock is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX_TIMEDLOCK@ # if @REPLACE_PTHREAD_MUTEX_TIMEDLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_timedlock # define pthread_mutex_timedlock rpl_pthread_mutex_timedlock # endif _GL_FUNCDECL_RPL (pthread_mutex_timedlock, int, (pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_mutex_timedlock, int, (pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime)); # else # if !@HAVE_PTHREAD_MUTEX_TIMEDLOCK@ _GL_FUNCDECL_SYS (pthread_mutex_timedlock, int, (pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (pthread_mutex_timedlock, int, (pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_timedlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_timedlock # if HAVE_RAW_DECL_PTHREAD_MUTEX_TIMEDLOCK _GL_WARN_ON_USE (pthread_mutex_timedlock, "pthread_mutex_timedlock is not portable - " "use gnulib module pthread_mutex_timedlock for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEX_UNLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_unlock # define pthread_mutex_unlock rpl_pthread_mutex_unlock # endif _GL_FUNCDECL_RPL (pthread_mutex_unlock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutex_unlock, int, (pthread_mutex_t *mutex)); # else # if !@HAVE_PTHREAD_MUTEX_UNLOCK@ _GL_FUNCDECL_SYS (pthread_mutex_unlock, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutex_unlock, int, (pthread_mutex_t *mutex)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_unlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_unlock # if HAVE_RAW_DECL_PTHREAD_MUTEX_UNLOCK _GL_WARN_ON_USE (pthread_mutex_unlock, "pthread_mutex_unlock is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif #if @GNULIB_PTHREAD_MUTEX@ # if @REPLACE_PTHREAD_MUTEX_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_mutex_destroy # define pthread_mutex_destroy rpl_pthread_mutex_destroy # endif _GL_FUNCDECL_RPL (pthread_mutex_destroy, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_mutex_destroy, int, (pthread_mutex_t *mutex)); # else # if !@HAVE_PTHREAD_MUTEX_DESTROY@ _GL_FUNCDECL_SYS (pthread_mutex_destroy, int, (pthread_mutex_t *mutex), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_mutex_destroy, int, (pthread_mutex_t *mutex)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_mutex_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_mutex_destroy # if HAVE_RAW_DECL_PTHREAD_MUTEX_DESTROY _GL_WARN_ON_USE (pthread_mutex_destroy, "pthread_mutex_destroy is not portable - " "use gnulib module pthread-mutex for portability"); # endif #endif /* =========== Read-write lock functions =========== */ #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_init # define pthread_rwlock_init rpl_pthread_rwlock_init # endif _GL_FUNCDECL_RPL (pthread_rwlock_init, int, (pthread_rwlock_t *restrict lock, const pthread_rwlockattr_t *restrict attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_init, int, (pthread_rwlock_t *restrict lock, const pthread_rwlockattr_t *restrict attr)); # else # if !@HAVE_PTHREAD_RWLOCK_INIT@ _GL_FUNCDECL_SYS (pthread_rwlock_init, int, (pthread_rwlock_t *restrict lock, const pthread_rwlockattr_t *restrict attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_init, int, (pthread_rwlock_t *restrict lock, const pthread_rwlockattr_t *restrict attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_init # if HAVE_RAW_DECL_PTHREAD_RWLOCK_INIT _GL_WARN_ON_USE (pthread_rwlock_init, "pthread_rwlock_init is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCKATTR_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlockattr_init # define pthread_rwlockattr_init rpl_pthread_rwlockattr_init # endif _GL_FUNCDECL_RPL (pthread_rwlockattr_init, int, (pthread_rwlockattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlockattr_init, int, (pthread_rwlockattr_t *attr)); # else # if !@HAVE_PTHREAD_RWLOCKATTR_INIT@ _GL_FUNCDECL_SYS (pthread_rwlockattr_init, int, (pthread_rwlockattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlockattr_init, int, (pthread_rwlockattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlockattr_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlockattr_init # if HAVE_RAW_DECL_PTHREAD_RWLOCKATTR_INIT _GL_WARN_ON_USE (pthread_rwlockattr_init, "pthread_rwlockattr_init is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCKATTR_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlockattr_destroy # define pthread_rwlockattr_destroy rpl_pthread_rwlockattr_destroy # endif _GL_FUNCDECL_RPL (pthread_rwlockattr_destroy, int, (pthread_rwlockattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlockattr_destroy, int, (pthread_rwlockattr_t *attr)); # else # if !@HAVE_PTHREAD_RWLOCKATTR_DESTROY@ _GL_FUNCDECL_SYS (pthread_rwlockattr_destroy, int, (pthread_rwlockattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlockattr_destroy, int, (pthread_rwlockattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlockattr_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlockattr_destroy # if HAVE_RAW_DECL_PTHREAD_RWLOCKATTR_DESTROY _GL_WARN_ON_USE (pthread_rwlockattr_destroy, "pthread_rwlockattr_destroy is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_RDLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_rdlock # define pthread_rwlock_rdlock rpl_pthread_rwlock_rdlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_rdlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_rdlock, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_RDLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_rdlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_rdlock, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_rdlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_rdlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_RDLOCK _GL_WARN_ON_USE (pthread_rwlock_rdlock, "pthread_rwlock_rdlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_WRLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_wrlock # define pthread_rwlock_wrlock rpl_pthread_rwlock_wrlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_wrlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_wrlock, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_WRLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_wrlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_wrlock, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_wrlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_wrlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_WRLOCK _GL_WARN_ON_USE (pthread_rwlock_wrlock, "pthread_rwlock_wrlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_TRYRDLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_tryrdlock # define pthread_rwlock_tryrdlock rpl_pthread_rwlock_tryrdlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_tryrdlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_tryrdlock, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_TRYRDLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_tryrdlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_tryrdlock, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_tryrdlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_tryrdlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_TRYRDLOCK _GL_WARN_ON_USE (pthread_rwlock_tryrdlock, "pthread_rwlock_tryrdlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_TRYWRLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_trywrlock # define pthread_rwlock_trywrlock rpl_pthread_rwlock_trywrlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_trywrlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_trywrlock, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_TRYWRLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_trywrlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_trywrlock, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_trywrlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_trywrlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_TRYWRLOCK _GL_WARN_ON_USE (pthread_rwlock_trywrlock, "pthread_rwlock_trywrlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_timedrdlock # define pthread_rwlock_timedrdlock rpl_pthread_rwlock_timedrdlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_timedrdlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_rwlock_timedrdlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime)); # else # if !@HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_timedrdlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_timedrdlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_timedrdlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_timedrdlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_TIMEDRDLOCK _GL_WARN_ON_USE (pthread_rwlock_timedrdlock, "pthread_rwlock_timedrdlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_timedwrlock # define pthread_rwlock_timedwrlock rpl_pthread_rwlock_timedwrlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_timedwrlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_rwlock_timedwrlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime)); # else # if !@HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_timedwrlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_timedwrlock, int, (pthread_rwlock_t *restrict lock, const struct timespec *restrict abstime)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_timedwrlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_timedwrlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_TIMEDWRLOCK _GL_WARN_ON_USE (pthread_rwlock_timedwrlock, "pthread_rwlock_timedwrlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_UNLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_unlock # define pthread_rwlock_unlock rpl_pthread_rwlock_unlock # endif _GL_FUNCDECL_RPL (pthread_rwlock_unlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_unlock, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_UNLOCK@ _GL_FUNCDECL_SYS (pthread_rwlock_unlock, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_unlock, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_unlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_unlock # if HAVE_RAW_DECL_PTHREAD_RWLOCK_UNLOCK _GL_WARN_ON_USE (pthread_rwlock_unlock, "pthread_rwlock_unlock is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif #if @GNULIB_PTHREAD_RWLOCK@ # if @REPLACE_PTHREAD_RWLOCK_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_rwlock_destroy # define pthread_rwlock_destroy rpl_pthread_rwlock_destroy # endif _GL_FUNCDECL_RPL (pthread_rwlock_destroy, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_rwlock_destroy, int, (pthread_rwlock_t *lock)); # else # if !@HAVE_PTHREAD_RWLOCK_DESTROY@ _GL_FUNCDECL_SYS (pthread_rwlock_destroy, int, (pthread_rwlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_rwlock_destroy, int, (pthread_rwlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_rwlock_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_rwlock_destroy # if HAVE_RAW_DECL_PTHREAD_RWLOCK_DESTROY _GL_WARN_ON_USE (pthread_rwlock_destroy, "pthread_rwlock_destroy is not portable - " "use gnulib module pthread-rwlock for portability"); # endif #endif /* =========== Condition variable functions =========== */ #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_init # define pthread_cond_init rpl_pthread_cond_init # endif _GL_FUNCDECL_RPL (pthread_cond_init, int, (pthread_cond_t *restrict cond, const pthread_condattr_t *restrict attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_cond_init, int, (pthread_cond_t *restrict cond, const pthread_condattr_t *restrict attr)); # else # if !@HAVE_PTHREAD_COND_INIT@ _GL_FUNCDECL_SYS (pthread_cond_init, int, (pthread_cond_t *restrict cond, const pthread_condattr_t *restrict attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_cond_init, int, (pthread_cond_t *restrict cond, const pthread_condattr_t *restrict attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_init # if HAVE_RAW_DECL_PTHREAD_COND_INIT _GL_WARN_ON_USE (pthread_cond_init, "pthread_cond_init is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_CONDATTR_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_condattr_init # define pthread_condattr_init rpl_pthread_condattr_init # endif _GL_FUNCDECL_RPL (pthread_condattr_init, int, (pthread_condattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_condattr_init, int, (pthread_condattr_t *attr)); # else # if !@HAVE_PTHREAD_CONDATTR_INIT@ _GL_FUNCDECL_SYS (pthread_condattr_init, int, (pthread_condattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_condattr_init, int, (pthread_condattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_condattr_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_condattr_init # if HAVE_RAW_DECL_PTHREAD_CONDATTR_INIT _GL_WARN_ON_USE (pthread_condattr_init, "pthread_condattr_init is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_CONDATTR_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_condattr_destroy # define pthread_condattr_destroy rpl_pthread_condattr_destroy # endif _GL_FUNCDECL_RPL (pthread_condattr_destroy, int, (pthread_condattr_t *attr), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_condattr_destroy, int, (pthread_condattr_t *attr)); # else # if !@HAVE_PTHREAD_CONDATTR_DESTROY@ _GL_FUNCDECL_SYS (pthread_condattr_destroy, int, (pthread_condattr_t *attr), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_condattr_destroy, int, (pthread_condattr_t *attr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_condattr_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_condattr_destroy # if HAVE_RAW_DECL_PTHREAD_CONDATTR_DESTROY _GL_WARN_ON_USE (pthread_condattr_destroy, "pthread_condattr_destroy is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_WAIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_wait # define pthread_cond_wait rpl_pthread_cond_wait # endif _GL_FUNCDECL_RPL (pthread_cond_wait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (pthread_cond_wait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex)); # else # if !@HAVE_PTHREAD_COND_WAIT@ _GL_FUNCDECL_SYS (pthread_cond_wait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (pthread_cond_wait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_wait); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_wait # if HAVE_RAW_DECL_PTHREAD_COND_WAIT _GL_WARN_ON_USE (pthread_cond_wait, "pthread_cond_wait is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_TIMEDWAIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_timedwait # define pthread_cond_timedwait rpl_pthread_cond_timedwait # endif _GL_FUNCDECL_RPL (pthread_cond_timedwait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2, 3))); _GL_CXXALIAS_RPL (pthread_cond_timedwait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime)); # else # if !@HAVE_PTHREAD_COND_TIMEDWAIT@ _GL_FUNCDECL_SYS (pthread_cond_timedwait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime), _GL_ARG_NONNULL ((1, 2, 3))); # endif _GL_CXXALIAS_SYS (pthread_cond_timedwait, int, (pthread_cond_t *restrict cond, pthread_mutex_t *restrict mutex, const struct timespec *restrict abstime)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_timedwait); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_timedwait # if HAVE_RAW_DECL_PTHREAD_COND_TIMEDWAIT _GL_WARN_ON_USE (pthread_cond_timedwait, "pthread_cond_timedwait is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_SIGNAL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_signal # define pthread_cond_signal rpl_pthread_cond_signal # endif _GL_FUNCDECL_RPL (pthread_cond_signal, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_cond_signal, int, (pthread_cond_t *cond)); # else # if !@HAVE_PTHREAD_COND_SIGNAL@ _GL_FUNCDECL_SYS (pthread_cond_signal, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_cond_signal, int, (pthread_cond_t *cond)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_signal); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_signal # if HAVE_RAW_DECL_PTHREAD_COND_SIGNAL _GL_WARN_ON_USE (pthread_cond_signal, "pthread_cond_signal is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_BROADCAST@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_broadcast # define pthread_cond_broadcast rpl_pthread_cond_broadcast # endif _GL_FUNCDECL_RPL (pthread_cond_broadcast, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_cond_broadcast, int, (pthread_cond_t *cond)); # else # if !@HAVE_PTHREAD_COND_BROADCAST@ _GL_FUNCDECL_SYS (pthread_cond_broadcast, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_cond_broadcast, int, (pthread_cond_t *cond)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_broadcast); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_broadcast # if HAVE_RAW_DECL_PTHREAD_COND_BROADCAST _GL_WARN_ON_USE (pthread_cond_broadcast, "pthread_cond_broadcast is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif #if @GNULIB_PTHREAD_COND@ # if @REPLACE_PTHREAD_COND_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_cond_destroy # define pthread_cond_destroy rpl_pthread_cond_destroy # endif _GL_FUNCDECL_RPL (pthread_cond_destroy, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_cond_destroy, int, (pthread_cond_t *cond)); # else # if !@HAVE_PTHREAD_COND_DESTROY@ _GL_FUNCDECL_SYS (pthread_cond_destroy, int, (pthread_cond_t *cond), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_cond_destroy, int, (pthread_cond_t *cond)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_cond_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_cond_destroy # if HAVE_RAW_DECL_PTHREAD_COND_DESTROY _GL_WARN_ON_USE (pthread_cond_destroy, "pthread_cond_destroy is not portable - " "use gnulib module pthread-cond for portability"); # endif #endif /* =========== Thread-specific storage functions =========== */ #if @GNULIB_PTHREAD_TSS@ # if @REPLACE_PTHREAD_KEY_CREATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_key_create # define pthread_key_create rpl_pthread_key_create # endif _GL_FUNCDECL_RPL (pthread_key_create, int, (pthread_key_t *keyp, void (*destructor) (void *)), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_key_create, int, (pthread_key_t *keyp, void (*destructor) (void *))); # else # if !@HAVE_PTHREAD_KEY_CREATE@ _GL_FUNCDECL_SYS (pthread_key_create, int, (pthread_key_t *keyp, void (*destructor) (void *)), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS_CAST (pthread_key_create, int, (pthread_key_t *keyp, void (*destructor) (void *))); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_key_create); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_key_create # if HAVE_RAW_DECL_PTHREAD_KEY_CREATE _GL_WARN_ON_USE (pthread_key_create, "pthread_key_create is not portable - " "use gnulib module pthread-tss for portability"); # endif #endif #if @GNULIB_PTHREAD_TSS@ # if @REPLACE_PTHREAD_SETSPECIFIC@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_setspecific # define pthread_setspecific rpl_pthread_setspecific # endif _GL_FUNCDECL_RPL (pthread_setspecific, int, (pthread_key_t key, const void *value)); _GL_CXXALIAS_RPL (pthread_setspecific, int, (pthread_key_t key, const void *value)); # else # if !@HAVE_PTHREAD_SETSPECIFIC@ _GL_FUNCDECL_SYS (pthread_setspecific, int, (pthread_key_t key, const void *value)); # endif _GL_CXXALIAS_SYS (pthread_setspecific, int, (pthread_key_t key, const void *value)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_setspecific); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_setspecific # if HAVE_RAW_DECL_PTHREAD_SETSPECIFIC _GL_WARN_ON_USE (pthread_setspecific, "pthread_setspecific is not portable - " "use gnulib module pthread-tss for portability"); # endif #endif #if @GNULIB_PTHREAD_TSS@ # if @REPLACE_PTHREAD_GETSPECIFIC@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_getspecific # define pthread_getspecific rpl_pthread_getspecific # endif _GL_FUNCDECL_RPL (pthread_getspecific, void *, (pthread_key_t key)); _GL_CXXALIAS_RPL (pthread_getspecific, void *, (pthread_key_t key)); # else # if !@HAVE_PTHREAD_GETSPECIFIC@ _GL_FUNCDECL_SYS (pthread_getspecific, void *, (pthread_key_t key)); # endif _GL_CXXALIAS_SYS (pthread_getspecific, void *, (pthread_key_t key)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_getspecific); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_getspecific # if HAVE_RAW_DECL_PTHREAD_GETSPECIFIC _GL_WARN_ON_USE (pthread_getspecific, "pthread_getspecific is not portable - " "use gnulib module pthread-tss for portability"); # endif #endif #if @GNULIB_PTHREAD_TSS@ # if @REPLACE_PTHREAD_KEY_DELETE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_key_delete # define pthread_key_delete rpl_pthread_key_delete # endif _GL_FUNCDECL_RPL (pthread_key_delete, int, (pthread_key_t key)); _GL_CXXALIAS_RPL (pthread_key_delete, int, (pthread_key_t key)); # else # if !@HAVE_PTHREAD_KEY_DELETE@ _GL_FUNCDECL_SYS (pthread_key_delete, int, (pthread_key_t key)); # endif _GL_CXXALIAS_SYS (pthread_key_delete, int, (pthread_key_t key)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_key_delete); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_key_delete # if HAVE_RAW_DECL_PTHREAD_KEY_DELETE _GL_WARN_ON_USE (pthread_key_delete, "pthread_key_delete is not portable - " "use gnulib module pthread-tss for portability"); # endif #endif /* =========== Spinlock functions =========== */ #if @GNULIB_PTHREAD_SPIN@ # if @REPLACE_PTHREAD_SPIN_INIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_spin_init # define pthread_spin_init rpl_pthread_spin_init # endif _GL_FUNCDECL_RPL (pthread_spin_init, int, (pthread_spinlock_t *lock, int shared_across_processes), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_spin_init, int, (pthread_spinlock_t *lock, int shared_across_processes)); # else # if !@HAVE_PTHREAD_SPIN_INIT@ _GL_FUNCDECL_SYS (pthread_spin_init, int, (pthread_spinlock_t *lock, int shared_across_processes), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_spin_init, int, (pthread_spinlock_t *lock, int shared_across_processes)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_spin_init); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_spin_init # if HAVE_RAW_DECL_PTHREAD_SPIN_INIT _GL_WARN_ON_USE (pthread_spin_init, "pthread_spin_init is not portable - " "use gnulib module pthread-spin for portability"); # endif #endif #if @GNULIB_PTHREAD_SPIN@ # if @REPLACE_PTHREAD_SPIN_LOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_spin_lock # define pthread_spin_lock rpl_pthread_spin_lock # endif _GL_FUNCDECL_RPL (pthread_spin_lock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_spin_lock, int, (pthread_spinlock_t *lock)); # else # if !@HAVE_PTHREAD_SPIN_LOCK@ _GL_FUNCDECL_SYS (pthread_spin_lock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_spin_lock, int, (pthread_spinlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_spin_lock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_spin_lock # if HAVE_RAW_DECL_PTHREAD_SPIN_LOCK _GL_WARN_ON_USE (pthread_spin_lock, "pthread_spin_lock is not portable - " "use gnulib module pthread-spin for portability"); # endif #endif #if @GNULIB_PTHREAD_SPIN@ # if @REPLACE_PTHREAD_SPIN_TRYLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_spin_trylock # define pthread_spin_trylock rpl_pthread_spin_trylock # endif _GL_FUNCDECL_RPL (pthread_spin_trylock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_spin_trylock, int, (pthread_spinlock_t *lock)); # else # if !@HAVE_PTHREAD_SPIN_TRYLOCK@ _GL_FUNCDECL_SYS (pthread_spin_trylock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_spin_trylock, int, (pthread_spinlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_spin_trylock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_spin_trylock # if HAVE_RAW_DECL_PTHREAD_SPIN_TRYLOCK _GL_WARN_ON_USE (pthread_spin_trylock, "pthread_spin_trylock is not portable - " "use gnulib module pthread-spin for portability"); # endif #endif #if @GNULIB_PTHREAD_SPIN@ # if @REPLACE_PTHREAD_SPIN_UNLOCK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_spin_unlock # define pthread_spin_unlock rpl_pthread_spin_unlock # endif _GL_FUNCDECL_RPL (pthread_spin_unlock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_spin_unlock, int, (pthread_spinlock_t *lock)); # else # if !@HAVE_PTHREAD_SPIN_UNLOCK@ _GL_FUNCDECL_SYS (pthread_spin_unlock, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_spin_unlock, int, (pthread_spinlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_spin_unlock); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_spin_unlock # if HAVE_RAW_DECL_PTHREAD_SPIN_UNLOCK _GL_WARN_ON_USE (pthread_spin_unlock, "pthread_spin_unlock is not portable - " "use gnulib module pthread-spin for portability"); # endif #endif #if @GNULIB_PTHREAD_SPIN@ # if @REPLACE_PTHREAD_SPIN_DESTROY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_spin_destroy # define pthread_spin_destroy rpl_pthread_spin_destroy # endif _GL_FUNCDECL_RPL (pthread_spin_destroy, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (pthread_spin_destroy, int, (pthread_spinlock_t *lock)); # else # if !@HAVE_PTHREAD_SPIN_DESTROY@ _GL_FUNCDECL_SYS (pthread_spin_destroy, int, (pthread_spinlock_t *lock), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (pthread_spin_destroy, int, (pthread_spinlock_t *lock)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_spin_destroy); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_spin_destroy # if HAVE_RAW_DECL_PTHREAD_SPIN_DESTROY _GL_WARN_ON_USE (pthread_spin_destroy, "pthread_spin_destroy is not portable - " "use gnulib module pthread-spin for portability"); # endif #endif #if defined __cplusplus && defined GNULIB_NAMESPACE && !@HAVE_PTHREAD_H@ && defined __MINGW32__ /* Provide the symbols required by mingw's . */ using GNULIB_NAMESPACE::pthread_create; using GNULIB_NAMESPACE::pthread_self; using GNULIB_NAMESPACE::pthread_equal; using GNULIB_NAMESPACE::pthread_detach; using GNULIB_NAMESPACE::pthread_join; using GNULIB_NAMESPACE::pthread_once; using GNULIB_NAMESPACE::pthread_mutex_init; using GNULIB_NAMESPACE::pthread_mutexattr_init; using GNULIB_NAMESPACE::pthread_mutexattr_settype; using GNULIB_NAMESPACE::pthread_mutexattr_destroy; using GNULIB_NAMESPACE::pthread_mutex_lock; using GNULIB_NAMESPACE::pthread_mutex_trylock; using GNULIB_NAMESPACE::pthread_mutex_timedlock; using GNULIB_NAMESPACE::pthread_mutex_unlock; using GNULIB_NAMESPACE::pthread_mutex_destroy; using GNULIB_NAMESPACE::pthread_cond_wait; using GNULIB_NAMESPACE::pthread_cond_timedwait; using GNULIB_NAMESPACE::pthread_cond_signal; using GNULIB_NAMESPACE::pthread_cond_broadcast; using GNULIB_NAMESPACE::pthread_cond_destroy; using GNULIB_NAMESPACE::pthread_key_create; using GNULIB_NAMESPACE::pthread_setspecific; using GNULIB_NAMESPACE::pthread_getspecific; using GNULIB_NAMESPACE::pthread_key_delete; #endif #endif /* _@GUARD_PREFIX@_PTHREAD_H_ */ #endif /* _@GUARD_PREFIX@_PTHREAD_H_ */ #endif libffcall-2.5/gnulib-lib/limits.in.h0000664000000000000000000001163014631432055014276 00000000000000/* A GNU-like . Copyright 2016-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined _GL_ALREADY_INCLUDING_LIMITS_H /* Special invocation convention: On Haiku/x86_64, we have a sequence of nested includes -> -> . In this situation, LONG_MAX and INT_MAX are not yet defined, therefore we should not attempt to define LONG_BIT. */ #@INCLUDE_NEXT@ @NEXT_LIMITS_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_LIMITS_H # define _GL_ALREADY_INCLUDING_LIMITS_H /* The include_next requires a split double-inclusion guard. */ # @INCLUDE_NEXT@ @NEXT_LIMITS_H@ # undef _GL_ALREADY_INCLUDING_LIMITS_H #ifndef _@GUARD_PREFIX@_LIMITS_H #define _@GUARD_PREFIX@_LIMITS_H #ifndef LLONG_MIN # if defined LONG_LONG_MIN /* HP-UX 11.31 */ # define LLONG_MIN LONG_LONG_MIN # elif defined LONGLONG_MIN /* IRIX 6.5 */ # define LLONG_MIN LONGLONG_MIN # elif defined __GNUC__ # define LLONG_MIN (- __LONG_LONG_MAX__ - 1LL) # endif #endif #ifndef LLONG_MAX # if defined LONG_LONG_MAX /* HP-UX 11.31 */ # define LLONG_MAX LONG_LONG_MAX # elif defined LONGLONG_MAX /* IRIX 6.5 */ # define LLONG_MAX LONGLONG_MAX # elif defined __GNUC__ # define LLONG_MAX __LONG_LONG_MAX__ # endif #endif #ifndef ULLONG_MAX # if defined ULONG_LONG_MAX /* HP-UX 11.31 */ # define ULLONG_MAX ULONG_LONG_MAX # elif defined ULONGLONG_MAX /* IRIX 6.5 */ # define ULLONG_MAX ULONGLONG_MAX # elif defined __GNUC__ # define ULLONG_MAX (__LONG_LONG_MAX__ * 2ULL + 1ULL) # endif #endif /* The number of usable bits in an unsigned or signed integer type with minimum value MIN and maximum value MAX, as an int expression suitable in #if. Cover all known practical hosts. This implementation exploits the fact that MAX is 1 less than a power of 2, and merely counts the number of 1 bits in MAX; "COBn" means "count the number of 1 bits in the low-order n bits"). */ #define _GL_INTEGER_WIDTH(min, max) (((min) < 0) + _GL_COB128 (max)) #define _GL_COB128(n) (_GL_COB64 ((n) >> 31 >> 31 >> 2) + _GL_COB64 (n)) #define _GL_COB64(n) (_GL_COB32 ((n) >> 31 >> 1) + _GL_COB32 (n)) #define _GL_COB32(n) (_GL_COB16 ((n) >> 16) + _GL_COB16 (n)) #define _GL_COB16(n) (_GL_COB8 ((n) >> 8) + _GL_COB8 (n)) #define _GL_COB8(n) (_GL_COB4 ((n) >> 4) + _GL_COB4 (n)) #define _GL_COB4(n) (!!((n) & 8) + !!((n) & 4) + !!((n) & 2) + !!((n) & 1)) #ifndef WORD_BIT /* Assume 'int' is 32 bits wide. */ # define WORD_BIT 32 #endif #ifndef LONG_BIT /* Assume 'long' is 32 or 64 bits wide. */ # if LONG_MAX == INT_MAX # define LONG_BIT 32 # else # define LONG_BIT 64 # endif #endif /* Assume no multibyte character is longer than 16 bytes. */ #ifndef MB_LEN_MAX # define MB_LEN_MAX 16 #endif /* Macros specified by C23 and by ISO/IEC TS 18661-1:2014. */ #if (! defined ULLONG_WIDTH \ && (defined _GNU_SOURCE || defined __STDC_WANT_IEC_60559_BFP_EXT__ \ || (defined __STDC_VERSION__ && 201710 < __STDC_VERSION__))) # define CHAR_WIDTH _GL_INTEGER_WIDTH (CHAR_MIN, CHAR_MAX) # define SCHAR_WIDTH _GL_INTEGER_WIDTH (SCHAR_MIN, SCHAR_MAX) # define UCHAR_WIDTH _GL_INTEGER_WIDTH (0, UCHAR_MAX) # define SHRT_WIDTH _GL_INTEGER_WIDTH (SHRT_MIN, SHRT_MAX) # define USHRT_WIDTH _GL_INTEGER_WIDTH (0, USHRT_MAX) # define INT_WIDTH _GL_INTEGER_WIDTH (INT_MIN, INT_MAX) # define UINT_WIDTH _GL_INTEGER_WIDTH (0, UINT_MAX) # define LONG_WIDTH _GL_INTEGER_WIDTH (LONG_MIN, LONG_MAX) # define ULONG_WIDTH _GL_INTEGER_WIDTH (0, ULONG_MAX) # define LLONG_WIDTH _GL_INTEGER_WIDTH (LLONG_MIN, LLONG_MAX) # define ULLONG_WIDTH _GL_INTEGER_WIDTH (0, ULLONG_MAX) #endif /* Macros specified by C23. */ #if (defined _GNU_SOURCE \ || (defined __STDC_VERSION__ && 201710 < __STDC_VERSION__)) # if ! defined BOOL_WIDTH # define BOOL_WIDTH 1 # define BOOL_MAX 1 # elif ! defined BOOL_MAX # define BOOL_MAX 1 # endif #endif /* Macro specified by POSIX. */ /* The maximum ssize_t value. Although it might not be of ssize_t type as it should be, it's too much trouble to fix this minor detail. */ #ifndef SSIZE_MAX # ifdef _WIN64 # define SSIZE_MAX LLONG_MAX # else # define SSIZE_MAX LONG_MAX # endif #endif #endif /* _@GUARD_PREFIX@_LIMITS_H */ #endif /* _@GUARD_PREFIX@_LIMITS_H */ #endif libffcall-2.5/gnulib-lib/pthread-once.c0000664000000000000000000001267614631432055014747 00000000000000/* POSIX once-only control. Copyright (C) 2019-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2019. */ #include /* Specification. */ #include #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS # include "windows-once.h" #endif #if (defined _WIN32 && ! defined __CYGWIN__) && USE_WINDOWS_THREADS /* Use Windows threads. */ int pthread_once (pthread_once_t *once_control, void (*initfunction) (void)) { glwthread_once (once_control, initfunction); return 0; } #elif HAVE_PTHREAD_H /* Provide workarounds for POSIX threads. */ # if defined __CYGWIN__ # include int pthread_once (pthread_once_t *once_control, void (*initfunction) (void)) { /* In this implementation, we reuse the type typedef struct { pthread_mutex_t mutex; int state; } pthread_once_t; #define PTHREAD_ONCE_INIT { PTHREAD_MUTEX_INITIALIZER, 0 } while assigning the following meaning to the state: state = ( << 16) + <1 if done> In other words: state = { unsigned int num_threads : 16; unsigned int done : 16; } */ struct actual_state { _Atomic unsigned short num_threads; /* done == 0: initial state done == 1: initfunction executed, lock still active done == 2: initfunction executed, lock no longer usable */ _Atomic unsigned short done; }; struct actual_state *state_p = (struct actual_state *) &once_control->state; /* This test is not necessary. It's only an optimization, to establish a fast path for the common case that the 'done' word is already > 0. */ if (state_p->done == 0) { /* Increment num_threads (atomically), to indicate that this thread will possibly take the lock. */ state_p->num_threads += 1; /* Test the 'done' word. */ if (state_p->done == 0) { /* The 'done' word is still zero. Now take the lock. */ pthread_mutex_lock (&once_control->mutex); /* Test the 'done' word again. */ if (state_p->done == 0) { /* Execute the initfunction. */ (*initfunction) (); /* Set the 'done' word to 1 (atomically). */ state_p->done = 1; } /* Now the 'done' word is 1. Release the lock. */ pthread_mutex_unlock (&once_control->mutex); } /* Here, done is > 0. */ /* Decrement num_threads (atomically). */ if ((state_p->num_threads -= 1) == 0) { /* num_threads is now zero, and done is > 0. No other thread will need to use the lock. We can therefore destroy the lock, to free resources. */ if (__sync_bool_compare_and_swap (&state_p->done, 1, 2)) pthread_mutex_destroy (&once_control->mutex); } } /* Proof of correctness: * num_threads is incremented and then decremented by some threads. Therefore, num_threads always stays >= 0, and is == 0 at the end. * The 'done' word, once > 0, stays > 0 (since it is never assigned 0). * The 'done' word is changed from == 0 to > 0 only while the lock is taken. Therefore, only the first thread that succeeds in taking the lock executes the initfunction and sets the 'done' word to a value > 0; the other threads that take the lock do no side effects between taking and releasing the lock. * The 'done' word does not change any more once it is 2. Therefore, it can be changed from 1 to 2 only once. * pthread_mutex_destroy gets invoked right after 'done' has been changed from 1 to 2. Therefore, pthread_mutex_destroy gets invoked only once. * After a moment where num_threads was 0 and done was > 0, no thread can reach the pthread_mutex_lock invocation. Proof: - At such a moment, no thread is in the code range between state_p->num_threads += 1 and state_p->num_threads -= 1 - After such a moment, some thread can increment num_threads, but from there they cannot reach the pthread_mutex_lock invocation, because the if (state_p->done == 0) test prevents that. * From this it follows that: - pthread_mutex_destroy cannot be executed while the lock is taken (because pthread_mutex_destroy is only executed after a moment where num_threads was 0 and done was > 0). - Once pthread_mutex_destroy has been executed, the lock is not used any more. */ return 0; } # endif #else /* Provide a dummy implementation for single-threaded applications. */ int pthread_once (pthread_once_t *once_control, void (*initfunction) (void)) { if (*once_control == 0) { *once_control = ~ 0; initfunction (); } return 0; } #endif libffcall-2.5/gnulib-lib/intprops-internal.h0000664000000000000000000004325714664171733016103 00000000000000/* intprops-internal.h -- properties of integer types not visible to users Copyright (C) 2001-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_INTPROPS_INTERNAL_H #define _GL_INTPROPS_INTERNAL_H #include /* Pacify GCC 13.2 in some calls to _GL_EXPR_SIGNED. */ #if 4 < __GNUC__ + (3 <= __GNUC_MINOR__) && !defined __clang__ # pragma GCC diagnostic ignored "-Wtype-limits" #endif /* Return a value with the common real type of E and V and the value of V. Do not evaluate E. */ #define _GL_INT_CONVERT(e, v) ((1 ? 0 : (e)) + (v)) /* Act like _GL_INT_CONVERT (E, -V) but work around a bug in IRIX 6.5 cc; see . */ #define _GL_INT_NEGATE_CONVERT(e, v) ((1 ? 0 : (e)) - (v)) /* The extra casts in the following macros work around compiler bugs, e.g., in Cray C 5.0.3.0. */ /* True if the real type T is signed. */ #define _GL_TYPE_SIGNED(t) (! ((t) 0 < (t) -1)) /* Return 1 if the real expression E, after promotion, has a signed or floating type. Do not evaluate E. */ #define _GL_EXPR_SIGNED(e) (_GL_INT_NEGATE_CONVERT (e, 1) < 0) /* Minimum and maximum values for integer types and expressions. */ /* The width in bits of the integer type or expression T. Do not evaluate T. T must not be a bit-field expression. Padding bits are not supported; this is checked at compile-time below. */ #define _GL_TYPE_WIDTH(t) (sizeof (t) * CHAR_BIT) /* The maximum and minimum values for the type of the expression E, after integer promotion. E is not evaluated. */ #define _GL_INT_MINIMUM(e) \ (_GL_EXPR_SIGNED (e) \ ? ~ _GL_SIGNED_INT_MAXIMUM (e) \ : _GL_INT_CONVERT (e, 0)) #define _GL_INT_MAXIMUM(e) \ (_GL_EXPR_SIGNED (e) \ ? _GL_SIGNED_INT_MAXIMUM (e) \ : _GL_INT_NEGATE_CONVERT (e, 1)) #define _GL_SIGNED_INT_MAXIMUM(e) \ (((_GL_INT_CONVERT (e, 1) << (_GL_TYPE_WIDTH (+ (e)) - 2)) - 1) * 2 + 1) /* Work around OpenVMS incompatibility with C99. */ #if !defined LLONG_MAX && defined __INT64_MAX # define LLONG_MAX __INT64_MAX # define LLONG_MIN __INT64_MIN #endif /* This include file assumes that signed types are two's complement without padding bits; the above macros have undefined behavior otherwise. If this is a problem for you, please let us know how to fix it for your host. This assumption is tested by the intprops-tests module. */ /* Does the __typeof__ keyword work? This could be done by 'configure', but for now it's easier to do it by hand. */ #if (2 <= __GNUC__ \ || (4 <= __clang_major__) \ || (1210 <= __IBMC__ && defined __IBM__TYPEOF__) \ || (0x5110 <= __SUNPRO_C && !__STDC__)) # define _GL_HAVE___TYPEOF__ 1 #else # define _GL_HAVE___TYPEOF__ 0 #endif /* Return 1 if the integer type or expression T might be signed. Return 0 if it is definitely unsigned. T must not be a bit-field expression. This macro does not evaluate its argument, and expands to an integer constant expression. */ #if _GL_HAVE___TYPEOF__ # define _GL_SIGNED_TYPE_OR_EXPR(t) _GL_TYPE_SIGNED (__typeof__ (t)) #else # define _GL_SIGNED_TYPE_OR_EXPR(t) 1 #endif /* Return 1 if - A would overflow in [MIN,MAX] arithmetic. A should not have side effects, and A's type should be an integer with minimum value MIN and maximum MAX. */ #define _GL_INT_NEGATE_RANGE_OVERFLOW(a, min, max) \ ((min) < 0 ? (a) < - (max) : 0 < (a)) /* True if __builtin_add_overflow (A, B, P) and __builtin_sub_overflow (A, B, P) work when P is non-null. */ #ifdef __EDG__ /* EDG-based compilers like nvc 22.1 cannot add 64-bit signed to unsigned . */ # define _GL_HAS_BUILTIN_ADD_OVERFLOW 0 #elif defined __has_builtin # define _GL_HAS_BUILTIN_ADD_OVERFLOW __has_builtin (__builtin_add_overflow) /* __builtin_{add,sub}_overflow exists but is not reliable in GCC 5.x and 6.x, see . */ #elif 7 <= __GNUC__ # define _GL_HAS_BUILTIN_ADD_OVERFLOW 1 #else # define _GL_HAS_BUILTIN_ADD_OVERFLOW 0 #endif /* True if __builtin_mul_overflow (A, B, P) works when P is non-null. */ #if defined __clang_major__ && __clang_major__ < 14 /* Work around Clang bug . */ # define _GL_HAS_BUILTIN_MUL_OVERFLOW 0 #else # define _GL_HAS_BUILTIN_MUL_OVERFLOW _GL_HAS_BUILTIN_ADD_OVERFLOW #endif /* True if __builtin_add_overflow_p (A, B, C) works, and similarly for __builtin_sub_overflow_p and __builtin_mul_overflow_p. */ #ifdef __EDG__ /* In EDG-based compilers like ICC 2021.3 and earlier, __builtin_add_overflow_p etc. are not treated as integral constant expressions even when all arguments are. */ # define _GL_HAS_BUILTIN_OVERFLOW_P 0 #elif defined __has_builtin # define _GL_HAS_BUILTIN_OVERFLOW_P __has_builtin (__builtin_mul_overflow_p) #else # define _GL_HAS_BUILTIN_OVERFLOW_P (7 <= __GNUC__) #endif #if (!defined _GL_STDCKDINT_H && 202311 <= __STDC_VERSION__ \ && ! (_GL_HAS_BUILTIN_ADD_OVERFLOW && _GL_HAS_BUILTIN_MUL_OVERFLOW)) # include #endif /* Store the low-order bits of A + B, A - B, A * B, respectively, into *R. Return 1 if the result overflows. Arguments should not have side effects and A, B and *R can be of any integer type other than char, bool, a bit-precise integer type, or an enumeration type. */ #if _GL_HAS_BUILTIN_ADD_OVERFLOW # define _GL_INT_ADD_WRAPV(a, b, r) __builtin_add_overflow (a, b, r) # define _GL_INT_SUBTRACT_WRAPV(a, b, r) __builtin_sub_overflow (a, b, r) #elif defined ckd_add && defined ckd_sub && !defined _GL_STDCKDINT_H # define _GL_INT_ADD_WRAPV(a, b, r) ckd_add (r, + (a), + (b)) # define _GL_INT_SUBTRACT_WRAPV(a, b, r) ckd_sub (r, + (a), + (b)) #else # define _GL_INT_ADD_WRAPV(a, b, r) \ _GL_INT_OP_WRAPV (a, b, r, +, _GL_INT_ADD_RANGE_OVERFLOW) # define _GL_INT_SUBTRACT_WRAPV(a, b, r) \ _GL_INT_OP_WRAPV (a, b, r, -, _GL_INT_SUBTRACT_RANGE_OVERFLOW) #endif #if _GL_HAS_BUILTIN_MUL_OVERFLOW # if ((9 < __GNUC__ + (3 <= __GNUC_MINOR__) \ || (__GNUC__ == 8 && 4 <= __GNUC_MINOR__)) \ && !defined __clang__ && !defined __EDG__) # define _GL_INT_MULTIPLY_WRAPV(a, b, r) __builtin_mul_overflow (a, b, r) # else /* Work around GCC bug 91450. */ # define _GL_INT_MULTIPLY_WRAPV(a, b, r) \ ((!_GL_SIGNED_TYPE_OR_EXPR (*(r)) && _GL_EXPR_SIGNED (a) && _GL_EXPR_SIGNED (b) \ && _GL_INT_MULTIPLY_RANGE_OVERFLOW (a, b, \ (__typeof__ (*(r))) 0, \ (__typeof__ (*(r))) -1)) \ ? ((void) __builtin_mul_overflow (a, b, r), 1) \ : __builtin_mul_overflow (a, b, r)) # endif #elif defined ckd_mul && !defined _GL_STDCKDINT_H # define _GL_INT_MULTIPLY_WRAPV(a, b, r) ckd_mul (r, + (a), + (b)) #else # define _GL_INT_MULTIPLY_WRAPV(a, b, r) \ _GL_INT_OP_WRAPV (a, b, r, *, _GL_INT_MULTIPLY_RANGE_OVERFLOW) #endif /* Nonzero if this compiler has GCC bug 68193 or Clang bug 25390. See: https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68193 https://llvm.org/bugs/show_bug.cgi?id=25390 For now, assume GCC < 14 and all Clang versions generate bogus warnings for _Generic. This matters only for compilers that lack relevant builtins. */ #if (__GNUC__ && __GNUC__ < 14) || defined __clang__ # define _GL__GENERIC_BOGUS 1 #else # define _GL__GENERIC_BOGUS 0 #endif /* Store the low-order bits of A B into *R, where OP specifies the operation and OVERFLOW the overflow predicate. Return 1 if the result overflows. Arguments should not have side effects, and A, B and *R can be of any integer type other than char, bool, a bit-precise integer type, or an enumeration type. */ #if 201112 <= __STDC_VERSION__ && !_GL__GENERIC_BOGUS # define _GL_INT_OP_WRAPV(a, b, r, op, overflow) \ (_Generic \ (*(r), \ signed char: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ signed char, SCHAR_MIN, SCHAR_MAX), \ unsigned char: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ unsigned char, 0, UCHAR_MAX), \ short int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ short int, SHRT_MIN, SHRT_MAX), \ unsigned short int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ unsigned short int, 0, USHRT_MAX), \ int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ int, INT_MIN, INT_MAX), \ unsigned int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ unsigned int, 0, UINT_MAX), \ long int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ long int, LONG_MIN, LONG_MAX), \ unsigned long int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ unsigned long int, 0, ULONG_MAX), \ long long int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long long int, \ long long int, LLONG_MIN, LLONG_MAX), \ unsigned long long int: \ _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long long int, \ unsigned long long int, 0, ULLONG_MAX))) #else /* Store the low-order bits of A B into *R, where OP specifies the operation and OVERFLOW the overflow predicate. If *R is signed, its type is ST with bounds SMIN..SMAX; otherwise its type is UT with bounds U..UMAX. ST and UT are narrower than int. Return 1 if the result overflows. Arguments should not have side effects, and A, B and *R can be of any integer type other than char, bool, a bit-precise integer type, or an enumeration type. */ # if _GL_HAVE___TYPEOF__ # define _GL_INT_OP_WRAPV_SMALLISH(a,b,r,op,overflow,st,smin,smax,ut,umax) \ (_GL_TYPE_SIGNED (__typeof__ (*(r))) \ ? _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, st, smin, smax) \ : _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, ut, 0, umax)) # else # define _GL_INT_OP_WRAPV_SMALLISH(a,b,r,op,overflow,st,smin,smax,ut,umax) \ (overflow (a, b, smin, smax) \ ? (overflow (a, b, 0, umax) \ ? (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a,b,op,unsigned,st), 1) \ : (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a,b,op,unsigned,st)) < 0) \ : (overflow (a, b, 0, umax) \ ? (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a,b,op,unsigned,st)) >= 0 \ : (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a,b,op,unsigned,st), 0))) # endif # define _GL_INT_OP_WRAPV(a, b, r, op, overflow) \ (sizeof *(r) == sizeof (signed char) \ ? _GL_INT_OP_WRAPV_SMALLISH (a, b, r, op, overflow, \ signed char, SCHAR_MIN, SCHAR_MAX, \ unsigned char, UCHAR_MAX) \ : sizeof *(r) == sizeof (short int) \ ? _GL_INT_OP_WRAPV_SMALLISH (a, b, r, op, overflow, \ short int, SHRT_MIN, SHRT_MAX, \ unsigned short int, USHRT_MAX) \ : sizeof *(r) == sizeof (int) \ ? (_GL_EXPR_SIGNED (*(r)) \ ? _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ int, INT_MIN, INT_MAX) \ : _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned int, \ unsigned int, 0, UINT_MAX)) \ : _GL_INT_OP_WRAPV_LONGISH(a, b, r, op, overflow)) # ifdef LLONG_MAX # define _GL_INT_OP_WRAPV_LONGISH(a, b, r, op, overflow) \ (sizeof *(r) == sizeof (long int) \ ? (_GL_EXPR_SIGNED (*(r)) \ ? _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ long int, LONG_MIN, LONG_MAX) \ : _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ unsigned long int, 0, ULONG_MAX)) \ : (_GL_EXPR_SIGNED (*(r)) \ ? _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long long int, \ long long int, LLONG_MIN, LLONG_MAX) \ : _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long long int, \ unsigned long long int, 0, ULLONG_MAX))) # else # define _GL_INT_OP_WRAPV_LONGISH(a, b, r, op, overflow) \ (_GL_EXPR_SIGNED (*(r)) \ ? _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ long int, LONG_MIN, LONG_MAX) \ : _GL_INT_OP_CALC (a, b, r, op, overflow, unsigned long int, \ unsigned long int, 0, ULONG_MAX)) # endif #endif /* Store the low-order bits of A B into *R, where the operation is given by OP. Use the unsigned type UT for calculation to avoid overflow problems. *R's type is T, with extrema TMIN and TMAX. T can be any signed integer type other than char, bool, a bit-precise integer type, or an enumeration type. Return 1 if the result overflows. */ #define _GL_INT_OP_CALC(a, b, r, op, overflow, ut, t, tmin, tmax) \ (overflow (a, b, tmin, tmax) \ ? (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a, b, op, ut, t), 1) \ : (*(r) = _GL_INT_OP_WRAPV_VIA_UNSIGNED (a, b, op, ut, t), 0)) /* Return 1 if the integer expressions A - B and -A would overflow, respectively. Arguments should not have side effects, and can be any signed integer type other than char, bool, a bit-precise integer type, or an enumeration type. These macros are tuned for their last input argument being a constant. */ #if _GL_HAS_BUILTIN_OVERFLOW_P # define _GL_INT_NEGATE_OVERFLOW(a) \ __builtin_sub_overflow_p (0, a, (__typeof__ (- (a))) 0) #else # define _GL_INT_NEGATE_OVERFLOW(a) \ _GL_INT_NEGATE_RANGE_OVERFLOW (a, _GL_INT_MINIMUM (a), _GL_INT_MAXIMUM (a)) #endif /* Return the low-order bits of A B, where the operation is given by OP. Use the unsigned type UT for calculation to avoid undefined behavior on signed integer overflow, and convert the result to type T. UT is at least as wide as T and is no narrower than unsigned int, T is two's complement, and there is no padding or trap representations. Assume that converting UT to T yields the low-order bits, as is done in all known two's-complement C compilers. E.g., see: https://gcc.gnu.org/onlinedocs/gcc/Integers-implementation.html According to the C standard, converting UT to T yields an implementation-defined result or signal for values outside T's range. However, code that works around this theoretical problem runs afoul of a compiler bug in Oracle Studio 12.3 x86. See: https://lists.gnu.org/r/bug-gnulib/2017-04/msg00049.html As the compiler bug is real, don't try to work around the theoretical problem. */ #define _GL_INT_OP_WRAPV_VIA_UNSIGNED(a, b, op, ut, t) \ ((t) ((ut) (a) op (ut) (b))) /* Return true if the numeric values A + B, A - B, A * B fall outside the range TMIN..TMAX. Arguments should not have side effects and can be any integer type other than char, bool, a bit-precise integer type, or an enumeration type. TMIN should be signed and nonpositive. TMAX should be positive, and should be signed unless TMIN is zero. */ #define _GL_INT_ADD_RANGE_OVERFLOW(a, b, tmin, tmax) \ ((b) < 0 \ ? (((tmin) \ ? ((_GL_EXPR_SIGNED (_GL_INT_CONVERT (a, (tmin) - (b))) || (b) < (tmin)) \ && (a) < (tmin) - (b)) \ : (a) <= -1 - (b)) \ || ((_GL_EXPR_SIGNED (a) ? 0 <= (a) : (tmax) < (a)) && (tmax) < (a) + (b))) \ : (a) < 0 \ ? (((tmin) \ ? ((_GL_EXPR_SIGNED (_GL_INT_CONVERT (b, (tmin) - (a))) || (a) < (tmin)) \ && (b) < (tmin) - (a)) \ : (b) <= -1 - (a)) \ || ((_GL_EXPR_SIGNED (_GL_INT_CONVERT (a, b)) || (tmax) < (b)) \ && (tmax) < (a) + (b))) \ : (tmax) < (b) || (tmax) - (b) < (a)) #define _GL_INT_SUBTRACT_RANGE_OVERFLOW(a, b, tmin, tmax) \ (((a) < 0) == ((b) < 0) \ ? ((a) < (b) \ ? !(tmin) || -1 - (tmin) < (b) - (a) - 1 \ : (tmax) < (a) - (b)) \ : (a) < 0 \ ? ((!_GL_EXPR_SIGNED (_GL_INT_CONVERT ((a) - (tmin), b)) && (a) - (tmin) < 0) \ || (a) - (tmin) < (b)) \ : ((! (_GL_EXPR_SIGNED (_GL_INT_CONVERT (tmax, b)) \ && _GL_EXPR_SIGNED (_GL_INT_CONVERT ((tmax) + (b), a))) \ && (tmax) <= -1 - (b)) \ || (tmax) + (b) < (a))) #define _GL_INT_MULTIPLY_RANGE_OVERFLOW(a, b, tmin, tmax) \ ((b) < 0 \ ? ((a) < 0 \ ? (_GL_EXPR_SIGNED (_GL_INT_CONVERT (tmax, b)) \ ? (a) < (tmax) / (b) \ : ((_GL_INT_NEGATE_OVERFLOW (b) \ ? _GL_INT_CONVERT (b, tmax) >> (_GL_TYPE_WIDTH (+ (b)) - 1) \ : (tmax) / -(b)) \ <= -1 - (a))) \ : _GL_INT_NEGATE_OVERFLOW (_GL_INT_CONVERT (b, tmin)) && (b) == -1 \ ? (_GL_EXPR_SIGNED (a) \ ? 0 < (a) + (tmin) \ : 0 < (a) && -1 - (tmin) < (a) - 1) \ : (tmin) / (b) < (a)) \ : (b) == 0 \ ? 0 \ : ((a) < 0 \ ? (_GL_INT_NEGATE_OVERFLOW (_GL_INT_CONVERT (a, tmin)) && (a) == -1 \ ? (_GL_EXPR_SIGNED (b) ? 0 < (b) + (tmin) : -1 - (tmin) < (b) - 1) \ : (tmin) / (a) < (b)) \ : (tmax) / (b) < (a))) #endif /* _GL_INTPROPS_INTERNAL_H */ libffcall-2.5/gnulib-lib/glthread/0000775000000000000000000000000014665334232014075 500000000000000libffcall-2.5/gnulib-lib/glthread/threadlib.c0000664000000000000000000000512014631432055016110 00000000000000/* Multithreading primitives. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. */ #include /* ========================================================================= */ #if USE_POSIX_THREADS || USE_ISOC_AND_POSIX_THREADS /* Use the POSIX threads library. */ # include # include # include # if PTHREAD_IN_USE_DETECTION_HARD # if defined __FreeBSD__ || defined __DragonFly__ /* FreeBSD */ /* Test using pthread_key_create. */ int glthread_in_use (void) { static int tested; static int result; /* 1: linked with -lpthread, 0: only with libc */ if (!tested) { pthread_key_t key; int err = pthread_key_create (&key, NULL); if (err == ENOSYS) result = 0; else { result = 1; if (err == 0) pthread_key_delete (key); } tested = 1; } return result; } # else /* Solaris, HP-UX */ /* Test using pthread_create. */ /* The function to be executed by a dummy thread. */ static void * dummy_thread_func (void *arg) { return arg; } int glthread_in_use (void) { static int tested; static int result; /* 1: linked with -lpthread, 0: only with libc */ if (!tested) { pthread_t thread; if (pthread_create (&thread, NULL, dummy_thread_func, NULL) != 0) /* Thread creation failed. */ result = 0; else { /* Thread creation works. */ void *retval; if (pthread_join (thread, &retval) != 0) abort (); result = 1; } tested = 1; } return result; } # endif # endif #endif /* ========================================================================= */ /* This declaration is solely to ensure that after preprocessing this file is never empty. */ typedef int dummy; libffcall-2.5/gnulib-lib/glthread/once.h0000664000000000000000000002154114660212547015114 00000000000000/* Once-only initialization in multithreaded situations. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-posix.h, gthr-posix95.h, gthr-win32.h. */ /* This file contains once-only initialization primitives for use with a given thread library. It does not contain primitives for creating threads or for other synchronization primitives. Once-only execution: Type: gl_once_t Initializer: gl_once_define(extern, name) Execution: gl_once (name, initfunction); Equivalent functions with control of error handling: Execution: err = glthread_once (&name, initfunction); */ #ifndef _ONCE_H #define _ONCE_H /* This file uses HAVE_THREADS_H. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #include #if !defined c11_threads_in_use # if HAVE_THREADS_H && USE_POSIX_THREADS_FROM_LIBC # define c11_threads_in_use() 1 # elif HAVE_THREADS_H && USE_POSIX_THREADS_WEAK # include # pragma weak thrd_exit # define c11_threads_in_use() (thrd_exit != NULL) # else # define c11_threads_in_use() 0 # endif #endif /* ========================================================================= */ #if USE_ISOC_THREADS || USE_ISOC_AND_POSIX_THREADS /* Use the ISO C threads library. */ # include # ifdef __cplusplus extern "C" { # endif /* -------------------------- gl_once_t datatype -------------------------- */ typedef once_flag gl_once_t; # define gl_once_define(STORAGECLASS, NAME) \ STORAGECLASS once_flag NAME = ONCE_FLAG_INIT; # define glthread_once(ONCE_CONTROL, INITFUNCTION) \ (call_once (ONCE_CONTROL, INITFUNCTION), 0) # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if USE_POSIX_THREADS /* Use the POSIX threads library. */ # include # ifdef __cplusplus extern "C" { # endif # if PTHREAD_IN_USE_DETECTION_HARD /* The pthread_in_use() detection needs to be done at runtime. */ # define pthread_in_use() \ glthread_in_use () extern int glthread_in_use (void); # endif # if USE_POSIX_THREADS_WEAK /* Use weak references to the POSIX threads library. */ /* Weak references avoid dragging in external libraries if the other parts of the program don't use them. Here we use them, because we don't want every program that uses libintl to depend on libpthread. This assumes that libpthread would not be loaded after libintl; i.e. if libintl is loaded first, by an executable that does not depend on libpthread, and then a module is dynamically loaded that depends on libpthread, libintl will not be multithread-safe. */ /* The way to test at runtime whether libpthread is present is to test whether a function pointer's value, such as &pthread_mutex_init, is non-NULL. However, some versions of GCC have a bug through which, in PIC mode, &foo != NULL always evaluates to true if there is a direct call to foo(...) in the same function. To avoid this, we test the address of a function in libpthread that we don't use. */ # pragma weak pthread_mutex_init # pragma weak pthread_mutex_lock # pragma weak pthread_mutex_unlock # pragma weak pthread_mutex_destroy /* Work around clang bug */ # ifndef pthread_rwlock_init # pragma weak pthread_rwlock_init # endif # pragma weak pthread_rwlock_rdlock # pragma weak pthread_rwlock_wrlock # pragma weak pthread_rwlock_unlock # pragma weak pthread_rwlock_destroy # pragma weak pthread_once # pragma weak pthread_cond_init # pragma weak pthread_cond_wait # pragma weak pthread_cond_signal # pragma weak pthread_cond_broadcast # pragma weak pthread_cond_destroy # pragma weak pthread_mutexattr_init # pragma weak pthread_mutexattr_settype # pragma weak pthread_mutexattr_destroy /* Work around clang bug */ # ifndef pthread_rwlockattr_init # pragma weak pthread_rwlockattr_init # endif # if __GNU_LIBRARY__ > 1 # pragma weak pthread_rwlockattr_setkind_np # endif # pragma weak pthread_rwlockattr_destroy # ifndef pthread_self # pragma weak pthread_self # endif # if !PTHREAD_IN_USE_DETECTION_HARD /* Considering all platforms with USE_POSIX_THREADS_WEAK, only few symbols can be used to determine whether libpthread is in use. These are: pthread_mutexattr_gettype pthread_rwlockattr_destroy pthread_rwlockattr_init */ # pragma weak pthread_mutexattr_gettype # define pthread_in_use() \ (pthread_mutexattr_gettype != NULL || c11_threads_in_use ()) # endif # else # if !PTHREAD_IN_USE_DETECTION_HARD # define pthread_in_use() 1 # endif # endif /* -------------------------- gl_once_t datatype -------------------------- */ typedef pthread_once_t gl_once_t; # define gl_once_define(STORAGECLASS, NAME) \ STORAGECLASS pthread_once_t NAME = PTHREAD_ONCE_INIT; # if PTHREAD_IN_USE_DETECTION_HARD || USE_POSIX_THREADS_WEAK # define glthread_once(ONCE_CONTROL, INITFUNCTION) \ (pthread_in_use () \ ? pthread_once (ONCE_CONTROL, INITFUNCTION) \ : (glthread_once_singlethreaded (ONCE_CONTROL) ? (INITFUNCTION (), 0) : 0)) # else # define glthread_once(ONCE_CONTROL, INITFUNCTION) \ (pthread_in_use () \ ? glthread_once_multithreaded (ONCE_CONTROL, INITFUNCTION) \ : (glthread_once_singlethreaded (ONCE_CONTROL) ? (INITFUNCTION (), 0) : 0)) extern int glthread_once_multithreaded (pthread_once_t *once_control, void (*init_function) (void)); # endif extern int glthread_once_singlethreaded (pthread_once_t *once_control); # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if USE_WINDOWS_THREADS # define WIN32_LEAN_AND_MEAN /* avoid including junk */ # include # include "windows-once.h" # ifdef __cplusplus extern "C" { # endif /* We can use CRITICAL_SECTION directly, rather than the native Windows Event, Mutex, Semaphore types, because - we need only to synchronize inside a single process (address space), not inter-process locking, - we don't need to support trylock operations. (TryEnterCriticalSection does not work on Windows 95/98/ME. Packages that need trylock usually define their own mutex type.) */ /* There is no way to statically initialize a CRITICAL_SECTION. It needs to be done lazily, once only. For this we need spinlocks. */ /* -------------------------- gl_once_t datatype -------------------------- */ typedef glwthread_once_t gl_once_t; # define gl_once_define(STORAGECLASS, NAME) \ STORAGECLASS gl_once_t NAME = GLWTHREAD_ONCE_INIT; # define glthread_once(ONCE_CONTROL, INITFUNCTION) \ (glwthread_once (ONCE_CONTROL, INITFUNCTION), 0) # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if !(USE_ISOC_THREADS || USE_POSIX_THREADS || USE_ISOC_AND_POSIX_THREADS || USE_WINDOWS_THREADS) /* Provide dummy implementation if threads are not supported. */ /* -------------------------- gl_once_t datatype -------------------------- */ typedef int gl_once_t; # define gl_once_define(STORAGECLASS, NAME) \ STORAGECLASS gl_once_t NAME = 0; # define glthread_once(ONCE_CONTROL, INITFUNCTION) \ (*(ONCE_CONTROL) == 0 ? (*(ONCE_CONTROL) = ~ 0, INITFUNCTION (), 0) : 0) #endif /* ========================================================================= */ /* Macros with built-in error handling. */ /* -------------------------- gl_once_t datatype -------------------------- */ #define gl_once(NAME, INITFUNCTION) \ do \ { \ if (glthread_once (&NAME, INITFUNCTION)) \ abort (); \ } \ while (0) /* ========================================================================= */ #endif /* _ONCE_H */ libffcall-2.5/gnulib-lib/glthread/once.c0000664000000000000000000000454114657156076015122 00000000000000/* Once-only initialization in multithreaded situations. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-posix.h, gthr-posix95.h. */ #include #include "glthread/once.h" /* ========================================================================= */ #if USE_ISOC_THREADS || USE_ISOC_AND_POSIX_THREADS #endif /* ========================================================================= */ #if USE_POSIX_THREADS static const pthread_once_t fresh_once = PTHREAD_ONCE_INIT; int glthread_once_singlethreaded (pthread_once_t *once_control) { /* We don't know whether pthread_once_t is an integer type, a floating-point type, a pointer type, or a structure type. */ char *firstbyte = (char *)once_control; if (*firstbyte == *(const char *)&fresh_once) { /* First time use of once_control. Invert the first byte. */ *firstbyte = ~ *(const char *)&fresh_once; return 1; } else return 0; } # if !(PTHREAD_IN_USE_DETECTION_HARD || USE_POSIX_THREADS_WEAK) int glthread_once_multithreaded (pthread_once_t *once_control, void (*init_function) (void)) { int err = pthread_once (once_control, init_function); if (err == ENOSYS) { /* This happens on FreeBSD 11: The pthread_once function in libc returns ENOSYS. */ if (glthread_once_singlethreaded (once_control)) init_function (); return 0; } return err; } # endif #endif /* ========================================================================= */ #if USE_WINDOWS_THREADS #endif /* ========================================================================= */ libffcall-2.5/gnulib-lib/glthread/lock.c0000664000000000000000000004175614657156076015137 00000000000000/* Locking in multithreaded situations. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-posix.h, gthr-posix95.h. */ #include #include "glthread/lock.h" /* ========================================================================= */ #if USE_ISOC_THREADS || USE_ISOC_AND_POSIX_THREADS /* -------------------------- gl_lock_t datatype -------------------------- */ int glthread_lock_init (gl_lock_t *lock) { if (mtx_init (&lock->mutex, mtx_plain) != thrd_success) return ENOMEM; lock->init_needed = 0; return 0; } int glthread_lock_lock (gl_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_lock (&lock->mutex) != thrd_success) return EAGAIN; return 0; } int glthread_lock_unlock (gl_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_unlock (&lock->mutex) != thrd_success) return EINVAL; return 0; } int glthread_lock_destroy (gl_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); mtx_destroy (&lock->mutex); return 0; } /* ------------------------- gl_rwlock_t datatype ------------------------- */ int glthread_rwlock_init (gl_rwlock_t *lock) { if (mtx_init (&lock->lock, mtx_plain) != thrd_success || cnd_init (&lock->waiting_readers) != thrd_success || cnd_init (&lock->waiting_writers) != thrd_success) return ENOMEM; lock->waiting_writers_count = 0; lock->runcount = 0; lock->init_needed = 0; return 0; } int glthread_rwlock_rdlock (gl_rwlock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_lock (&lock->lock) != thrd_success) return EAGAIN; /* Test whether only readers are currently running, and whether the runcount field will not overflow, and whether no writer is waiting. The latter condition is because POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ while (!(lock->runcount + 1 > 0 && lock->waiting_writers_count == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_readers. */ if (cnd_wait (&lock->waiting_readers, &lock->lock) != thrd_success) { mtx_unlock (&lock->lock); return EINVAL; } } lock->runcount++; if (mtx_unlock (&lock->lock) != thrd_success) return EINVAL; return 0; } int glthread_rwlock_wrlock (gl_rwlock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_lock (&lock->lock) != thrd_success) return EAGAIN; /* Test whether no readers or writers are currently running. */ while (!(lock->runcount == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_writers. */ lock->waiting_writers_count++; if (cnd_wait (&lock->waiting_writers, &lock->lock) != thrd_success) { lock->waiting_writers_count--; mtx_unlock (&lock->lock); return EINVAL; } lock->waiting_writers_count--; } lock->runcount--; /* runcount becomes -1 */ if (mtx_unlock (&lock->lock) != thrd_success) return EINVAL; return 0; } int glthread_rwlock_unlock (gl_rwlock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_lock (&lock->lock) != thrd_success) return EAGAIN; if (lock->runcount < 0) { /* Drop a writer lock. */ if (!(lock->runcount == -1)) { mtx_unlock (&lock->lock); return EINVAL; } lock->runcount = 0; } else { /* Drop a reader lock. */ if (!(lock->runcount > 0)) { mtx_unlock (&lock->lock); return EINVAL; } lock->runcount--; } if (lock->runcount == 0) { /* POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ if (lock->waiting_writers_count > 0) { /* Wake up one of the waiting writers. */ if (cnd_signal (&lock->waiting_writers) != thrd_success) { mtx_unlock (&lock->lock); return EINVAL; } } else { /* Wake up all waiting readers. */ if (cnd_broadcast (&lock->waiting_readers) != thrd_success) { mtx_unlock (&lock->lock); return EINVAL; } } } if (mtx_unlock (&lock->lock) != thrd_success) return EINVAL; return 0; } int glthread_rwlock_destroy (gl_rwlock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); mtx_destroy (&lock->lock); cnd_destroy (&lock->waiting_readers); cnd_destroy (&lock->waiting_writers); return 0; } /* --------------------- gl_recursive_lock_t datatype --------------------- */ int glthread_recursive_lock_init (gl_recursive_lock_t *lock) { if (mtx_init (&lock->mutex, mtx_plain | mtx_recursive) != thrd_success) return ENOMEM; lock->init_needed = 0; return 0; } int glthread_recursive_lock_lock (gl_recursive_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_lock (&lock->mutex) != thrd_success) return EAGAIN; return 0; } int glthread_recursive_lock_unlock (gl_recursive_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); if (mtx_unlock (&lock->mutex) != thrd_success) return EINVAL; return 0; } int glthread_recursive_lock_destroy (gl_recursive_lock_t *lock) { if (lock->init_needed) call_once (&lock->init_once, lock->init_func); mtx_destroy (&lock->mutex); return 0; } #endif /* ========================================================================= */ #if USE_POSIX_THREADS /* -------------------------- gl_lock_t datatype -------------------------- */ /* ------------------------- gl_rwlock_t datatype ------------------------- */ # if HAVE_PTHREAD_RWLOCK && (HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER || (defined PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP && (__GNU_LIBRARY__ > 1))) # if defined PTHREAD_RWLOCK_INITIALIZER || defined PTHREAD_RWLOCK_INITIALIZER_NP # if !HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER /* glibc with bug https://sourceware.org/bugzilla/show_bug.cgi?id=13701 */ int glthread_rwlock_init_for_glibc (pthread_rwlock_t *lock) { pthread_rwlockattr_t attributes; int err; err = pthread_rwlockattr_init (&attributes); if (err != 0) return err; /* Note: PTHREAD_RWLOCK_PREFER_WRITER_NONRECURSIVE_NP is the only value that causes the writer to be preferred. PTHREAD_RWLOCK_PREFER_WRITER_NP does not do this; see http://man7.org/linux/man-pages/man3/pthread_rwlockattr_setkind_np.3.html */ err = pthread_rwlockattr_setkind_np (&attributes, PTHREAD_RWLOCK_PREFER_WRITER_NONRECURSIVE_NP); if (err == 0) err = pthread_rwlock_init(lock, &attributes); /* pthread_rwlockattr_destroy always returns 0. It cannot influence the return value. */ pthread_rwlockattr_destroy (&attributes); return err; } # endif # else int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_rwlock_init (&lock->rwlock, NULL); if (err != 0) return err; lock->initialized = 1; return 0; } int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock) { if (!lock->initialized) { int err; err = pthread_mutex_lock (&lock->guard); if (err != 0) return err; if (!lock->initialized) { err = glthread_rwlock_init_multithreaded (lock); if (err != 0) { pthread_mutex_unlock (&lock->guard); return err; } } err = pthread_mutex_unlock (&lock->guard); if (err != 0) return err; } return pthread_rwlock_rdlock (&lock->rwlock); } int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock) { if (!lock->initialized) { int err; err = pthread_mutex_lock (&lock->guard); if (err != 0) return err; if (!lock->initialized) { err = glthread_rwlock_init_multithreaded (lock); if (err != 0) { pthread_mutex_unlock (&lock->guard); return err; } } err = pthread_mutex_unlock (&lock->guard); if (err != 0) return err; } return pthread_rwlock_wrlock (&lock->rwlock); } int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock) { if (!lock->initialized) return EINVAL; return pthread_rwlock_unlock (&lock->rwlock); } int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock) { int err; if (!lock->initialized) return EINVAL; err = pthread_rwlock_destroy (&lock->rwlock); if (err != 0) return err; lock->initialized = 0; return 0; } # endif # else int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_mutex_init (&lock->lock, NULL); if (err != 0) return err; err = pthread_cond_init (&lock->waiting_readers, NULL); if (err != 0) return err; err = pthread_cond_init (&lock->waiting_writers, NULL); if (err != 0) return err; lock->waiting_writers_count = 0; lock->runcount = 0; return 0; } int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_mutex_lock (&lock->lock); if (err != 0) return err; /* Test whether only readers are currently running, and whether the runcount field will not overflow, and whether no writer is waiting. The latter condition is because POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ while (!(lock->runcount + 1 > 0 && lock->waiting_writers_count == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_readers. */ err = pthread_cond_wait (&lock->waiting_readers, &lock->lock); if (err != 0) { pthread_mutex_unlock (&lock->lock); return err; } } lock->runcount++; return pthread_mutex_unlock (&lock->lock); } int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_mutex_lock (&lock->lock); if (err != 0) return err; /* Test whether no readers or writers are currently running. */ while (!(lock->runcount == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_writers. */ lock->waiting_writers_count++; err = pthread_cond_wait (&lock->waiting_writers, &lock->lock); if (err != 0) { lock->waiting_writers_count--; pthread_mutex_unlock (&lock->lock); return err; } lock->waiting_writers_count--; } lock->runcount--; /* runcount becomes -1 */ return pthread_mutex_unlock (&lock->lock); } int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_mutex_lock (&lock->lock); if (err != 0) return err; if (lock->runcount < 0) { /* Drop a writer lock. */ if (!(lock->runcount == -1)) { pthread_mutex_unlock (&lock->lock); return EINVAL; } lock->runcount = 0; } else { /* Drop a reader lock. */ if (!(lock->runcount > 0)) { pthread_mutex_unlock (&lock->lock); return EINVAL; } lock->runcount--; } if (lock->runcount == 0) { /* POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ if (lock->waiting_writers_count > 0) { /* Wake up one of the waiting writers. */ err = pthread_cond_signal (&lock->waiting_writers); if (err != 0) { pthread_mutex_unlock (&lock->lock); return err; } } else { /* Wake up all waiting readers. */ err = pthread_cond_broadcast (&lock->waiting_readers); if (err != 0) { pthread_mutex_unlock (&lock->lock); return err; } } } return pthread_mutex_unlock (&lock->lock); } int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock) { int err; err = pthread_mutex_destroy (&lock->lock); if (err != 0) return err; err = pthread_cond_destroy (&lock->waiting_readers); if (err != 0) return err; err = pthread_cond_destroy (&lock->waiting_writers); if (err != 0) return err; return 0; } # endif /* --------------------- gl_recursive_lock_t datatype --------------------- */ # if HAVE_PTHREAD_MUTEX_RECURSIVE # if defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER || defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock) { pthread_mutexattr_t attributes; int err; err = pthread_mutexattr_init (&attributes); if (err != 0) return err; err = pthread_mutexattr_settype (&attributes, PTHREAD_MUTEX_RECURSIVE); if (err != 0) { pthread_mutexattr_destroy (&attributes); return err; } err = pthread_mutex_init (lock, &attributes); if (err != 0) { pthread_mutexattr_destroy (&attributes); return err; } err = pthread_mutexattr_destroy (&attributes); if (err != 0) return err; return 0; } # else int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock) { pthread_mutexattr_t attributes; int err; err = pthread_mutexattr_init (&attributes); if (err != 0) return err; err = pthread_mutexattr_settype (&attributes, PTHREAD_MUTEX_RECURSIVE); if (err != 0) { pthread_mutexattr_destroy (&attributes); return err; } err = pthread_mutex_init (&lock->recmutex, &attributes); if (err != 0) { pthread_mutexattr_destroy (&attributes); return err; } err = pthread_mutexattr_destroy (&attributes); if (err != 0) return err; lock->initialized = 1; return 0; } int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock) { if (!lock->initialized) { int err; err = pthread_mutex_lock (&lock->guard); if (err != 0) return err; if (!lock->initialized) { err = glthread_recursive_lock_init_multithreaded (lock); if (err != 0) { pthread_mutex_unlock (&lock->guard); return err; } } err = pthread_mutex_unlock (&lock->guard); if (err != 0) return err; } return pthread_mutex_lock (&lock->recmutex); } int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock) { if (!lock->initialized) return EINVAL; return pthread_mutex_unlock (&lock->recmutex); } int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock) { int err; if (!lock->initialized) return EINVAL; err = pthread_mutex_destroy (&lock->recmutex); if (err != 0) return err; lock->initialized = 0; return 0; } # endif # else int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock) { int err; err = pthread_mutex_init (&lock->mutex, NULL); if (err != 0) return err; lock->owner = (pthread_t) 0; lock->depth = 0; return 0; } int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock) { pthread_t self = pthread_self (); if (lock->owner != self) { int err; err = pthread_mutex_lock (&lock->mutex); if (err != 0) return err; lock->owner = self; } if (++(lock->depth) == 0) /* wraparound? */ { lock->depth--; return EAGAIN; } return 0; } int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock) { if (lock->owner != pthread_self ()) return EPERM; if (lock->depth == 0) return EINVAL; if (--(lock->depth) == 0) { lock->owner = (pthread_t) 0; return pthread_mutex_unlock (&lock->mutex); } else return 0; } int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock) { if (lock->owner != (pthread_t) 0) return EBUSY; return pthread_mutex_destroy (&lock->mutex); } # endif #endif /* ========================================================================= */ #if USE_WINDOWS_THREADS #endif /* ========================================================================= */ libffcall-2.5/gnulib-lib/glthread/lock.h0000664000000000000000000006323414657156076015137 00000000000000/* Locking in multithreaded situations. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-posix.h, gthr-posix95.h, gthr-win32.h. */ /* This file contains locking primitives for use with a given thread library. It does not contain primitives for creating threads or for other synchronization primitives. Normal (non-recursive) locks: Type: gl_lock_t Declaration: gl_lock_define(extern, name) Initializer: gl_lock_define_initialized(, name) Initialization: gl_lock_init (name); Taking the lock: gl_lock_lock (name); Releasing the lock: gl_lock_unlock (name); De-initialization: gl_lock_destroy (name); Equivalent functions with control of error handling: Initialization: err = glthread_lock_init (&name); Taking the lock: err = glthread_lock_lock (&name); Releasing the lock: err = glthread_lock_unlock (&name); De-initialization: err = glthread_lock_destroy (&name); Read-Write (non-recursive) locks: Type: gl_rwlock_t Declaration: gl_rwlock_define(extern, name) Initializer: gl_rwlock_define_initialized(, name) Initialization: gl_rwlock_init (name); Taking the lock: gl_rwlock_rdlock (name); gl_rwlock_wrlock (name); Releasing the lock: gl_rwlock_unlock (name); De-initialization: gl_rwlock_destroy (name); Equivalent functions with control of error handling: Initialization: err = glthread_rwlock_init (&name); Taking the lock: err = glthread_rwlock_rdlock (&name); err = glthread_rwlock_wrlock (&name); Releasing the lock: err = glthread_rwlock_unlock (&name); De-initialization: err = glthread_rwlock_destroy (&name); Recursive locks: Type: gl_recursive_lock_t Declaration: gl_recursive_lock_define(extern, name) Initializer: gl_recursive_lock_define_initialized(, name) Initialization: gl_recursive_lock_init (name); Taking the lock: gl_recursive_lock_lock (name); Releasing the lock: gl_recursive_lock_unlock (name); De-initialization: gl_recursive_lock_destroy (name); Equivalent functions with control of error handling: Initialization: err = glthread_recursive_lock_init (&name); Taking the lock: err = glthread_recursive_lock_lock (&name); Releasing the lock: err = glthread_recursive_lock_unlock (&name); De-initialization: err = glthread_recursive_lock_destroy (&name); */ #ifndef _LOCK_H #define _LOCK_H /* This file uses HAVE_THREADS_H, HAVE_PTHREAD_RWLOCK, HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER, PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP, HAVE_PTHREAD_MUTEX_RECURSIVE. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #include #include "glthread/once.h" /* c11_threads_in_use() is defined in glthread/once.h. */ /* ========================================================================= */ #if USE_ISOC_THREADS || USE_ISOC_AND_POSIX_THREADS /* Use the ISO C threads library. */ # include # ifdef __cplusplus extern "C" { # endif /* -------------------------- gl_lock_t datatype -------------------------- */ typedef struct { int volatile init_needed; once_flag init_once; void (*init_func) (void); mtx_t mutex; } gl_lock_t; # define gl_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_lock_t NAME; # define gl_lock_define_initialized(STORAGECLASS, NAME) \ static void _atomic_init_##NAME (void); \ STORAGECLASS gl_lock_t NAME = \ { 1, ONCE_FLAG_INIT, _atomic_init_##NAME }; \ static void _atomic_init_##NAME (void) \ { \ if (glthread_lock_init (&(NAME))) \ abort (); \ } extern int glthread_lock_init (gl_lock_t *lock); extern int glthread_lock_lock (gl_lock_t *lock); extern int glthread_lock_unlock (gl_lock_t *lock); extern int glthread_lock_destroy (gl_lock_t *lock); /* ------------------------- gl_rwlock_t datatype ------------------------- */ typedef struct { int volatile init_needed; once_flag init_once; void (*init_func) (void); mtx_t lock; /* protects the remaining fields */ cnd_t waiting_readers; /* waiting readers */ cnd_t waiting_writers; /* waiting writers */ unsigned int waiting_writers_count; /* number of waiting writers */ int runcount; /* number of readers running, or -1 when a writer runs */ } gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME; # define gl_rwlock_define_initialized(STORAGECLASS, NAME) \ static void _atomic_init_##NAME (void); \ STORAGECLASS gl_rwlock_t NAME = \ { 1, ONCE_FLAG_INIT, _atomic_init_##NAME }; \ static void _atomic_init_##NAME (void) \ { \ if (glthread_rwlock_init (&(NAME))) \ abort (); \ } extern int glthread_rwlock_init (gl_rwlock_t *lock); extern int glthread_rwlock_rdlock (gl_rwlock_t *lock); extern int glthread_rwlock_wrlock (gl_rwlock_t *lock); extern int glthread_rwlock_unlock (gl_rwlock_t *lock); extern int glthread_rwlock_destroy (gl_rwlock_t *lock); /* --------------------- gl_recursive_lock_t datatype --------------------- */ typedef struct { int volatile init_needed; once_flag init_once; void (*init_func) (void); mtx_t mutex; } gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME; # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \ static void _atomic_init_##NAME (void); \ STORAGECLASS gl_recursive_lock_t NAME = \ { 1, ONCE_FLAG_INIT, _atomic_init_##NAME }; \ static void _atomic_init_##NAME (void) \ { \ if (glthread_recursive_lock_init (&(NAME))) \ abort (); \ } extern int glthread_recursive_lock_init (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_lock (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_unlock (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_destroy (gl_recursive_lock_t *lock); # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if USE_POSIX_THREADS /* Use the POSIX threads library. */ # include # ifdef __cplusplus extern "C" { # endif /* pthread_in_use() is defined in glthread/once.h. */ /* -------------------------- gl_lock_t datatype -------------------------- */ typedef pthread_mutex_t gl_lock_t; # define gl_lock_define(STORAGECLASS, NAME) \ STORAGECLASS pthread_mutex_t NAME; # define gl_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS pthread_mutex_t NAME = gl_lock_initializer; # define gl_lock_initializer \ PTHREAD_MUTEX_INITIALIZER # define glthread_lock_init(LOCK) \ (pthread_in_use () ? pthread_mutex_init (LOCK, NULL) : 0) # define glthread_lock_lock(LOCK) \ (pthread_in_use () ? pthread_mutex_lock (LOCK) : 0) # define glthread_lock_unlock(LOCK) \ (pthread_in_use () ? pthread_mutex_unlock (LOCK) : 0) # define glthread_lock_destroy(LOCK) \ (pthread_in_use () ? pthread_mutex_destroy (LOCK) : 0) /* ------------------------- gl_rwlock_t datatype ------------------------- */ # if HAVE_PTHREAD_RWLOCK && (HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER || (defined PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP && (__GNU_LIBRARY__ > 1))) # if defined PTHREAD_RWLOCK_INITIALIZER || defined PTHREAD_RWLOCK_INITIALIZER_NP typedef pthread_rwlock_t gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) \ STORAGECLASS pthread_rwlock_t NAME; # define gl_rwlock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS pthread_rwlock_t NAME = gl_rwlock_initializer; # if HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER # if defined PTHREAD_RWLOCK_INITIALIZER # define gl_rwlock_initializer \ PTHREAD_RWLOCK_INITIALIZER # else # define gl_rwlock_initializer \ PTHREAD_RWLOCK_INITIALIZER_NP # endif # define glthread_rwlock_init(LOCK) \ (pthread_in_use () ? pthread_rwlock_init (LOCK, NULL) : 0) # else /* glibc with bug https://sourceware.org/bugzilla/show_bug.cgi?id=13701 */ # define gl_rwlock_initializer \ PTHREAD_RWLOCK_WRITER_NONRECURSIVE_INITIALIZER_NP # define glthread_rwlock_init(LOCK) \ (pthread_in_use () ? glthread_rwlock_init_for_glibc (LOCK) : 0) extern int glthread_rwlock_init_for_glibc (pthread_rwlock_t *lock); # endif # define glthread_rwlock_rdlock(LOCK) \ (pthread_in_use () ? pthread_rwlock_rdlock (LOCK) : 0) # define glthread_rwlock_wrlock(LOCK) \ (pthread_in_use () ? pthread_rwlock_wrlock (LOCK) : 0) # define glthread_rwlock_unlock(LOCK) \ (pthread_in_use () ? pthread_rwlock_unlock (LOCK) : 0) # define glthread_rwlock_destroy(LOCK) \ (pthread_in_use () ? pthread_rwlock_destroy (LOCK) : 0) # else typedef struct { int initialized; pthread_mutex_t guard; /* protects the initialization */ pthread_rwlock_t rwlock; /* read-write lock */ } gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME; # define gl_rwlock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer; # define gl_rwlock_initializer \ { 0, PTHREAD_MUTEX_INITIALIZER } # define glthread_rwlock_init(LOCK) \ (pthread_in_use () ? glthread_rwlock_init_multithreaded (LOCK) : 0) # define glthread_rwlock_rdlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_rdlock_multithreaded (LOCK) : 0) # define glthread_rwlock_wrlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_wrlock_multithreaded (LOCK) : 0) # define glthread_rwlock_unlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_unlock_multithreaded (LOCK) : 0) # define glthread_rwlock_destroy(LOCK) \ (pthread_in_use () ? glthread_rwlock_destroy_multithreaded (LOCK) : 0) extern int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock); # endif # else typedef struct { pthread_mutex_t lock; /* protects the remaining fields */ pthread_cond_t waiting_readers; /* waiting readers */ pthread_cond_t waiting_writers; /* waiting writers */ unsigned int waiting_writers_count; /* number of waiting writers */ int runcount; /* number of readers running, or -1 when a writer runs */ } gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME; # define gl_rwlock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer; # define gl_rwlock_initializer \ { PTHREAD_MUTEX_INITIALIZER, PTHREAD_COND_INITIALIZER, PTHREAD_COND_INITIALIZER, 0, 0 } # define glthread_rwlock_init(LOCK) \ (pthread_in_use () ? glthread_rwlock_init_multithreaded (LOCK) : 0) # define glthread_rwlock_rdlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_rdlock_multithreaded (LOCK) : 0) # define glthread_rwlock_wrlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_wrlock_multithreaded (LOCK) : 0) # define glthread_rwlock_unlock(LOCK) \ (pthread_in_use () ? glthread_rwlock_unlock_multithreaded (LOCK) : 0) # define glthread_rwlock_destroy(LOCK) \ (pthread_in_use () ? glthread_rwlock_destroy_multithreaded (LOCK) : 0) extern int glthread_rwlock_init_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_rdlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_wrlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_unlock_multithreaded (gl_rwlock_t *lock); extern int glthread_rwlock_destroy_multithreaded (gl_rwlock_t *lock); # endif /* --------------------- gl_recursive_lock_t datatype --------------------- */ # if HAVE_PTHREAD_MUTEX_RECURSIVE # if defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER || defined PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP typedef pthread_mutex_t gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) \ STORAGECLASS pthread_mutex_t NAME; # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS pthread_mutex_t NAME = gl_recursive_lock_initializer; # ifdef PTHREAD_RECURSIVE_MUTEX_INITIALIZER # define gl_recursive_lock_initializer \ PTHREAD_RECURSIVE_MUTEX_INITIALIZER # else # define gl_recursive_lock_initializer \ PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP # endif # define glthread_recursive_lock_init(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0) # define glthread_recursive_lock_lock(LOCK) \ (pthread_in_use () ? pthread_mutex_lock (LOCK) : 0) # define glthread_recursive_lock_unlock(LOCK) \ (pthread_in_use () ? pthread_mutex_unlock (LOCK) : 0) # define glthread_recursive_lock_destroy(LOCK) \ (pthread_in_use () ? pthread_mutex_destroy (LOCK) : 0) extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock); # else typedef struct { pthread_mutex_t recmutex; /* recursive mutex */ pthread_mutex_t guard; /* protects the initialization */ int initialized; } gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME; # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer; # define gl_recursive_lock_initializer \ { PTHREAD_MUTEX_INITIALIZER, PTHREAD_MUTEX_INITIALIZER, 0 } # define glthread_recursive_lock_init(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0) # define glthread_recursive_lock_lock(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_lock_multithreaded (LOCK) : 0) # define glthread_recursive_lock_unlock(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_unlock_multithreaded (LOCK) : 0) # define glthread_recursive_lock_destroy(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_destroy_multithreaded (LOCK) : 0) extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock); # endif # else /* Old versions of POSIX threads on Solaris did not have recursive locks. We have to implement them ourselves. */ typedef struct { pthread_mutex_t mutex; pthread_t owner; unsigned long depth; } gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME; # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer; # define gl_recursive_lock_initializer \ { PTHREAD_MUTEX_INITIALIZER, (pthread_t) 0, 0 } # define glthread_recursive_lock_init(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_init_multithreaded (LOCK) : 0) # define glthread_recursive_lock_lock(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_lock_multithreaded (LOCK) : 0) # define glthread_recursive_lock_unlock(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_unlock_multithreaded (LOCK) : 0) # define glthread_recursive_lock_destroy(LOCK) \ (pthread_in_use () ? glthread_recursive_lock_destroy_multithreaded (LOCK) : 0) extern int glthread_recursive_lock_init_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_lock_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_unlock_multithreaded (gl_recursive_lock_t *lock); extern int glthread_recursive_lock_destroy_multithreaded (gl_recursive_lock_t *lock); # endif # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if USE_WINDOWS_THREADS # define WIN32_LEAN_AND_MEAN /* avoid including junk */ # include # include "windows-mutex.h" # include "windows-rwlock.h" # include "windows-recmutex.h" # ifdef __cplusplus extern "C" { # endif /* We can use CRITICAL_SECTION directly, rather than the native Windows Event, Mutex, Semaphore types, because - we need only to synchronize inside a single process (address space), not inter-process locking, - we don't need to support trylock operations. (TryEnterCriticalSection does not work on Windows 95/98/ME. Packages that need trylock usually define their own mutex type.) */ /* There is no way to statically initialize a CRITICAL_SECTION. It needs to be done lazily, once only. For this we need spinlocks. */ /* -------------------------- gl_lock_t datatype -------------------------- */ typedef glwthread_mutex_t gl_lock_t; # define gl_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_lock_t NAME; # define gl_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_lock_t NAME = gl_lock_initializer; # define gl_lock_initializer \ GLWTHREAD_MUTEX_INIT # define glthread_lock_init(LOCK) \ (glwthread_mutex_init (LOCK), 0) # define glthread_lock_lock(LOCK) \ glwthread_mutex_lock (LOCK) # define glthread_lock_unlock(LOCK) \ glwthread_mutex_unlock (LOCK) # define glthread_lock_destroy(LOCK) \ glwthread_mutex_destroy (LOCK) /* ------------------------- gl_rwlock_t datatype ------------------------- */ typedef glwthread_rwlock_t gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME; # define gl_rwlock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_rwlock_t NAME = gl_rwlock_initializer; # define gl_rwlock_initializer \ GLWTHREAD_RWLOCK_INIT # define glthread_rwlock_init(LOCK) \ (glwthread_rwlock_init (LOCK), 0) # define glthread_rwlock_rdlock(LOCK) \ glwthread_rwlock_rdlock (LOCK) # define glthread_rwlock_wrlock(LOCK) \ glwthread_rwlock_wrlock (LOCK) # define glthread_rwlock_unlock(LOCK) \ glwthread_rwlock_unlock (LOCK) # define glthread_rwlock_destroy(LOCK) \ glwthread_rwlock_destroy (LOCK) /* --------------------- gl_recursive_lock_t datatype --------------------- */ typedef glwthread_recmutex_t gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME; # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) \ STORAGECLASS gl_recursive_lock_t NAME = gl_recursive_lock_initializer; # define gl_recursive_lock_initializer \ GLWTHREAD_RECMUTEX_INIT # define glthread_recursive_lock_init(LOCK) \ (glwthread_recmutex_init (LOCK), 0) # define glthread_recursive_lock_lock(LOCK) \ glwthread_recmutex_lock (LOCK) # define glthread_recursive_lock_unlock(LOCK) \ glwthread_recmutex_unlock (LOCK) # define glthread_recursive_lock_destroy(LOCK) \ glwthread_recmutex_destroy (LOCK) # ifdef __cplusplus } # endif #endif /* ========================================================================= */ #if !(USE_ISOC_THREADS || USE_POSIX_THREADS || USE_ISOC_AND_POSIX_THREADS || USE_WINDOWS_THREADS) /* Provide dummy implementation if threads are not supported. */ /* -------------------------- gl_lock_t datatype -------------------------- */ typedef int gl_lock_t; # define gl_lock_define(STORAGECLASS, NAME) # define gl_lock_define_initialized(STORAGECLASS, NAME) # define glthread_lock_init(NAME) 0 # define glthread_lock_lock(NAME) 0 # define glthread_lock_unlock(NAME) 0 # define glthread_lock_destroy(NAME) 0 /* ------------------------- gl_rwlock_t datatype ------------------------- */ typedef int gl_rwlock_t; # define gl_rwlock_define(STORAGECLASS, NAME) # define gl_rwlock_define_initialized(STORAGECLASS, NAME) # define glthread_rwlock_init(NAME) 0 # define glthread_rwlock_rdlock(NAME) 0 # define glthread_rwlock_wrlock(NAME) 0 # define glthread_rwlock_unlock(NAME) 0 # define glthread_rwlock_destroy(NAME) 0 /* --------------------- gl_recursive_lock_t datatype --------------------- */ typedef int gl_recursive_lock_t; # define gl_recursive_lock_define(STORAGECLASS, NAME) # define gl_recursive_lock_define_initialized(STORAGECLASS, NAME) # define glthread_recursive_lock_init(NAME) 0 # define glthread_recursive_lock_lock(NAME) 0 # define glthread_recursive_lock_unlock(NAME) 0 # define glthread_recursive_lock_destroy(NAME) 0 #endif /* ========================================================================= */ /* Macros with built-in error handling. */ /* -------------------------- gl_lock_t datatype -------------------------- */ #define gl_lock_init(NAME) \ do \ { \ if (glthread_lock_init (&NAME)) \ abort (); \ } \ while (0) #define gl_lock_lock(NAME) \ do \ { \ if (glthread_lock_lock (&NAME)) \ abort (); \ } \ while (0) #define gl_lock_unlock(NAME) \ do \ { \ if (glthread_lock_unlock (&NAME)) \ abort (); \ } \ while (0) #define gl_lock_destroy(NAME) \ do \ { \ if (glthread_lock_destroy (&NAME)) \ abort (); \ } \ while (0) /* ------------------------- gl_rwlock_t datatype ------------------------- */ #define gl_rwlock_init(NAME) \ do \ { \ if (glthread_rwlock_init (&NAME)) \ abort (); \ } \ while (0) #define gl_rwlock_rdlock(NAME) \ do \ { \ if (glthread_rwlock_rdlock (&NAME)) \ abort (); \ } \ while (0) #define gl_rwlock_wrlock(NAME) \ do \ { \ if (glthread_rwlock_wrlock (&NAME)) \ abort (); \ } \ while (0) #define gl_rwlock_unlock(NAME) \ do \ { \ if (glthread_rwlock_unlock (&NAME)) \ abort (); \ } \ while (0) #define gl_rwlock_destroy(NAME) \ do \ { \ if (glthread_rwlock_destroy (&NAME)) \ abort (); \ } \ while (0) /* --------------------- gl_recursive_lock_t datatype --------------------- */ #define gl_recursive_lock_init(NAME) \ do \ { \ if (glthread_recursive_lock_init (&NAME)) \ abort (); \ } \ while (0) #define gl_recursive_lock_lock(NAME) \ do \ { \ if (glthread_recursive_lock_lock (&NAME)) \ abort (); \ } \ while (0) #define gl_recursive_lock_unlock(NAME) \ do \ { \ if (glthread_recursive_lock_unlock (&NAME)) \ abort (); \ } \ while (0) #define gl_recursive_lock_destroy(NAME) \ do \ { \ if (glthread_recursive_lock_destroy (&NAME)) \ abort (); \ } \ while (0) /* ========================================================================= */ #endif /* _LOCK_H */ libffcall-2.5/gnulib-lib/gl_anylinked_list2.h0000664000000000000000000007660014662503431016156 00000000000000/* Sequential list data type implemented by a linked list. Copyright (C) 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Common code of gl_linked_list.c and gl_linkedhash_list.c. */ /* If the symbol SIGNAL_SAFE_LIST is defined, the code is compiled in such a way that a gl_list_t data structure may be used from within a signal handler. The operations allowed in the signal handler are: gl_list_iterator, gl_list_iterator_next, gl_list_iterator_free. The list and node fields that are therefore accessed from the signal handler are: list->root, node->next, node->value. We are careful to make modifications to these fields only in an order that maintains the consistency of the list data structure at any moment, and we use 'volatile' assignments to prevent the compiler from reordering such assignments. */ #ifdef SIGNAL_SAFE_LIST # define ASYNCSAFE(type) *(type volatile *)& #else # define ASYNCSAFE(type) #endif /* -------------------------- gl_list_t Data Type -------------------------- */ static gl_list_t gl_linked_nx_create_empty (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates) { struct gl_list_impl *list = (struct gl_list_impl *) malloc (sizeof (struct gl_list_impl)); if (list == NULL) return NULL; list->base.vtable = implementation; list->base.equals_fn = equals_fn; list->base.hashcode_fn = hashcode_fn; list->base.dispose_fn = dispose_fn; list->base.allow_duplicates = allow_duplicates; #if WITH_HASHTABLE list->table_size = 11; list->table = (gl_hash_entry_t *) calloc (list->table_size, sizeof (gl_hash_entry_t)); if (list->table == NULL) goto fail; #endif list->root.next = &list->root; list->root.prev = &list->root; list->count = 0; return list; #if WITH_HASHTABLE fail: free (list); return NULL; #endif } static gl_list_t gl_linked_nx_create (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates, size_t count, const void **contents) { struct gl_list_impl *list = (struct gl_list_impl *) malloc (sizeof (struct gl_list_impl)); gl_list_node_t tail; if (list == NULL) return NULL; list->base.vtable = implementation; list->base.equals_fn = equals_fn; list->base.hashcode_fn = hashcode_fn; list->base.dispose_fn = dispose_fn; list->base.allow_duplicates = allow_duplicates; #if WITH_HASHTABLE { size_t estimate = xsum (count, count / 2); /* 1.5 * count */ if (estimate < 10) estimate = 10; list->table_size = next_prime (estimate); if (size_overflow_p (xtimes (list->table_size, sizeof (gl_hash_entry_t)))) goto fail1; list->table = (gl_hash_entry_t *) calloc (list->table_size, sizeof (gl_hash_entry_t)); if (list->table == NULL) goto fail1; } #endif list->count = count; tail = &list->root; for (; count > 0; contents++, count--) { gl_list_node_t node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (node == NULL) goto fail2; node->value = *contents; #if WITH_HASHTABLE node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (node->value) : (size_t)(uintptr_t) node->value); /* Add node to the hash table. */ if (add_to_bucket (list, node) < 0) { free (node); goto fail2; } #endif /* Add node to the list. */ node->prev = tail; tail->next = node; tail = node; } tail->next = &list->root; list->root.prev = tail; return list; fail2: { gl_list_node_t node; for (node = tail; node != &list->root; ) { gl_list_node_t prev = node->prev; free (node); node = prev; } } #if WITH_HASHTABLE free (list->table); fail1: #endif free (list); return NULL; } static size_t _GL_ATTRIBUTE_PURE gl_linked_size (gl_list_t list) { return list->count; } static const void * _GL_ATTRIBUTE_PURE gl_linked_node_value (_GL_ATTRIBUTE_MAYBE_UNUSED gl_list_t list, gl_list_node_t node) { return node->value; } static int gl_linked_node_nx_set_value (_GL_ATTRIBUTE_MAYBE_UNUSED gl_list_t list, gl_list_node_t node, const void *elt) { #if WITH_HASHTABLE if (elt != node->value) { size_t new_hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (elt) : (size_t)(uintptr_t) elt); if (new_hashcode != node->h.hashcode) { remove_from_bucket (list, node); node->value = elt; node->h.hashcode = new_hashcode; if (add_to_bucket (list, node) < 0) { /* Out of memory. We removed node from a bucket but cannot add it to another bucket. In order to avoid inconsistencies, we must remove node entirely from the list. */ gl_list_node_t before_removed = node->prev; gl_list_node_t after_removed = node->next; ASYNCSAFE(gl_list_node_t) before_removed->next = after_removed; after_removed->prev = before_removed; list->count--; free (node); return -1; } } else node->value = elt; } #else node->value = elt; #endif return 0; } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_next_node (gl_list_t list, gl_list_node_t node) { return (node->next != &list->root ? node->next : NULL); } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_previous_node (gl_list_t list, gl_list_node_t node) { return (node->prev != &list->root ? node->prev : NULL); } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_first_node (gl_list_t list) { if (list->count > 0) return list->root.next; else return NULL; } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_last_node (gl_list_t list) { if (list->count > 0) return list->root.prev; else return NULL; } static const void * _GL_ATTRIBUTE_PURE gl_linked_get_at (gl_list_t list, size_t position) { size_t count = list->count; gl_list_node_t node; if (!(position < count)) /* Invalid argument. */ abort (); /* Here we know count > 0. */ if (position <= ((count - 1) / 2)) { node = list->root.next; for (; position > 0; position--) node = node->next; } else { position = count - 1 - position; node = list->root.prev; for (; position > 0; position--) node = node->prev; } return node->value; } static gl_list_node_t gl_linked_nx_set_at (gl_list_t list, size_t position, const void *elt) { size_t count = list->count; gl_list_node_t node; if (!(position < count)) /* Invalid argument. */ abort (); /* Here we know count > 0. */ if (position <= ((count - 1) / 2)) { node = list->root.next; for (; position > 0; position--) node = node->next; } else { position = count - 1 - position; node = list->root.prev; for (; position > 0; position--) node = node->prev; } #if WITH_HASHTABLE if (elt != node->value) { size_t new_hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (elt) : (size_t)(uintptr_t) elt); if (new_hashcode != node->h.hashcode) { remove_from_bucket (list, node); node->value = elt; node->h.hashcode = new_hashcode; if (add_to_bucket (list, node) < 0) { /* Out of memory. We removed node from a bucket but cannot add it to another bucket. In order to avoid inconsistencies, we must remove node entirely from the list. */ gl_list_node_t before_removed = node->prev; gl_list_node_t after_removed = node->next; ASYNCSAFE(gl_list_node_t) before_removed->next = after_removed; after_removed->prev = before_removed; list->count--; free (node); return NULL; } } else node->value = elt; } #else node->value = elt; #endif return node; } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_search_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt) { size_t count = list->count; if (!(start_index <= end_index && end_index <= count)) /* Invalid arguments. */ abort (); { #if WITH_HASHTABLE size_t hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (elt) : (size_t)(uintptr_t) elt); size_t bucket = hashcode % list->table_size; gl_listelement_equals_fn equals = list->base.equals_fn; if (!list->base.allow_duplicates) { /* Look for the first match in the hash bucket. */ gl_list_node_t found = NULL; gl_list_node_t node; for (node = (gl_list_node_t) list->table[bucket]; node != NULL; node = (gl_list_node_t) node->h.hash_next) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) { found = node; break; } if (start_index > 0) /* Look whether found's index is < start_index. */ for (node = list->root.next; ; node = node->next) { if (node == found) return NULL; if (--start_index == 0) break; } if (end_index < count) /* Look whether found's index is >= end_index. */ { end_index = count - end_index; for (node = list->root.prev; ; node = node->prev) { if (node == found) return NULL; if (--end_index == 0) break; } } return found; } else { /* Look whether there is more than one match in the hash bucket. */ bool multiple_matches = false; gl_list_node_t first_match = NULL; gl_list_node_t node; for (node = (gl_list_node_t) list->table[bucket]; node != NULL; node = (gl_list_node_t) node->h.hash_next) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) { if (first_match == NULL) first_match = node; else { multiple_matches = true; break; } } if (multiple_matches) { /* We need the match with the smallest index. But we don't have a fast mapping node -> index. So we have to walk the list. */ end_index -= start_index; node = list->root.next; for (; start_index > 0; start_index--) node = node->next; for (; end_index > 0; node = node->next, end_index--) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) return node; /* The matches must have all been at indices < start_index or >= end_index. */ return NULL; } else { if (start_index > 0) /* Look whether first_match's index is < start_index. */ for (node = list->root.next; node != &list->root; node = node->next) { if (node == first_match) return NULL; if (--start_index == 0) break; } if (end_index < list->count) /* Look whether first_match's index is >= end_index. */ { end_index = list->count - end_index; for (node = list->root.prev; ; node = node->prev) { if (node == first_match) return NULL; if (--end_index == 0) break; } } return first_match; } } #else gl_listelement_equals_fn equals = list->base.equals_fn; gl_list_node_t node = list->root.next; end_index -= start_index; for (; start_index > 0; start_index--) node = node->next; if (equals != NULL) { for (; end_index > 0; node = node->next, end_index--) if (equals (elt, node->value)) return node; } else { for (; end_index > 0; node = node->next, end_index--) if (elt == node->value) return node; } return NULL; #endif } } static size_t _GL_ATTRIBUTE_PURE gl_linked_indexof_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt) { size_t count = list->count; if (!(start_index <= end_index && end_index <= count)) /* Invalid arguments. */ abort (); { #if WITH_HASHTABLE /* Here the hash table doesn't help much. It only allows us to minimize the number of equals() calls, by looking up first the node and then its index. */ size_t hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (elt) : (size_t)(uintptr_t) elt); size_t bucket = hashcode % list->table_size; gl_listelement_equals_fn equals = list->base.equals_fn; gl_list_node_t node; /* First step: Look up the node. */ if (!list->base.allow_duplicates) { /* Look for the first match in the hash bucket. */ for (node = (gl_list_node_t) list->table[bucket]; node != NULL; node = (gl_list_node_t) node->h.hash_next) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) break; } else { /* Look whether there is more than one match in the hash bucket. */ bool multiple_matches = false; gl_list_node_t first_match = NULL; for (node = (gl_list_node_t) list->table[bucket]; node != NULL; node = (gl_list_node_t) node->h.hash_next) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) { if (first_match == NULL) first_match = node; else { multiple_matches = true; break; } } if (multiple_matches) { /* We need the match with the smallest index. But we don't have a fast mapping node -> index. So we have to walk the list. */ size_t index; index = start_index; node = list->root.next; for (; start_index > 0; start_index--) node = node->next; for (; index < end_index; node = node->next, index++) if (node->h.hashcode == hashcode && (equals != NULL ? equals (elt, node->value) : elt == node->value)) return index; /* The matches must have all been at indices < start_index or >= end_index. */ return (size_t)(-1); } node = first_match; } /* Second step: Look up the index of the node. */ if (node == NULL) return (size_t)(-1); else { size_t index = 0; for (; node->prev != &list->root; node = node->prev) index++; if (index >= start_index && index < end_index) return index; else return (size_t)(-1); } #else gl_listelement_equals_fn equals = list->base.equals_fn; size_t index = start_index; gl_list_node_t node = list->root.next; for (; start_index > 0; start_index--) node = node->next; if (equals != NULL) { for (; index < end_index; node = node->next, index++) if (equals (elt, node->value)) return index; } else { for (; index < end_index; node = node->next, index++) if (elt == node->value) return index; } return (size_t)(-1); #endif } } static gl_list_node_t gl_linked_nx_add_first (gl_list_t list, const void *elt) { gl_list_node_t node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (node == NULL) return NULL; ASYNCSAFE(const void *) node->value = elt; #if WITH_HASHTABLE node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (node->value) : (size_t)(uintptr_t) node->value); /* Add node to the hash table. */ if (add_to_bucket (list, node) < 0) { free (node); return NULL; } #endif /* Add node to the list. */ node->prev = &list->root; ASYNCSAFE(gl_list_node_t) node->next = list->root.next; node->next->prev = node; ASYNCSAFE(gl_list_node_t) list->root.next = node; list->count++; #if WITH_HASHTABLE hash_resize_after_add (list); #endif return node; } static gl_list_node_t gl_linked_nx_add_last (gl_list_t list, const void *elt) { gl_list_node_t node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (node == NULL) return NULL; ASYNCSAFE(const void *) node->value = elt; #if WITH_HASHTABLE node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (node->value) : (size_t)(uintptr_t) node->value); /* Add node to the hash table. */ if (add_to_bucket (list, node) < 0) { free (node); return NULL; } #endif /* Add node to the list. */ ASYNCSAFE(gl_list_node_t) node->next = &list->root; node->prev = list->root.prev; ASYNCSAFE(gl_list_node_t) node->prev->next = node; list->root.prev = node; list->count++; #if WITH_HASHTABLE hash_resize_after_add (list); #endif return node; } static gl_list_node_t gl_linked_nx_add_before (gl_list_t list, gl_list_node_t node, const void *elt) { gl_list_node_t new_node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (new_node == NULL) return NULL; ASYNCSAFE(const void *) new_node->value = elt; #if WITH_HASHTABLE new_node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (new_node->value) : (size_t)(uintptr_t) new_node->value); /* Add new_node to the hash table. */ if (add_to_bucket (list, new_node) < 0) { free (new_node); return NULL; } #endif /* Add new_node to the list. */ ASYNCSAFE(gl_list_node_t) new_node->next = node; new_node->prev = node->prev; ASYNCSAFE(gl_list_node_t) new_node->prev->next = new_node; node->prev = new_node; list->count++; #if WITH_HASHTABLE hash_resize_after_add (list); #endif return new_node; } static gl_list_node_t gl_linked_nx_add_after (gl_list_t list, gl_list_node_t node, const void *elt) { gl_list_node_t new_node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (new_node == NULL) return NULL; ASYNCSAFE(const void *) new_node->value = elt; #if WITH_HASHTABLE new_node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (new_node->value) : (size_t)(uintptr_t) new_node->value); /* Add new_node to the hash table. */ if (add_to_bucket (list, new_node) < 0) { free (new_node); return NULL; } #endif /* Add new_node to the list. */ new_node->prev = node; ASYNCSAFE(gl_list_node_t) new_node->next = node->next; new_node->next->prev = new_node; ASYNCSAFE(gl_list_node_t) node->next = new_node; list->count++; #if WITH_HASHTABLE hash_resize_after_add (list); #endif return new_node; } static gl_list_node_t gl_linked_nx_add_at (gl_list_t list, size_t position, const void *elt) { size_t count = list->count; gl_list_node_t new_node; if (!(position <= count)) /* Invalid argument. */ abort (); new_node = (struct gl_list_node_impl *) malloc (sizeof (struct gl_list_node_impl)); if (new_node == NULL) return NULL; ASYNCSAFE(const void *) new_node->value = elt; #if WITH_HASHTABLE new_node->h.hashcode = (list->base.hashcode_fn != NULL ? list->base.hashcode_fn (new_node->value) : (size_t)(uintptr_t) new_node->value); /* Add new_node to the hash table. */ if (add_to_bucket (list, new_node) < 0) { free (new_node); return NULL; } #endif /* Add new_node to the list. */ if (position <= (count / 2)) { gl_list_node_t node; node = &list->root; for (; position > 0; position--) node = node->next; new_node->prev = node; ASYNCSAFE(gl_list_node_t) new_node->next = node->next; new_node->next->prev = new_node; ASYNCSAFE(gl_list_node_t) node->next = new_node; } else { gl_list_node_t node; position = count - position; node = &list->root; for (; position > 0; position--) node = node->prev; ASYNCSAFE(gl_list_node_t) new_node->next = node; new_node->prev = node->prev; ASYNCSAFE(gl_list_node_t) new_node->prev->next = new_node; node->prev = new_node; } list->count++; #if WITH_HASHTABLE hash_resize_after_add (list); #endif return new_node; } static bool gl_linked_remove_node (gl_list_t list, gl_list_node_t node) { gl_list_node_t prev; gl_list_node_t next; #if WITH_HASHTABLE /* Remove node from the hash table. */ remove_from_bucket (list, node); #endif /* Remove node from the list. */ prev = node->prev; next = node->next; ASYNCSAFE(gl_list_node_t) prev->next = next; next->prev = prev; list->count--; if (list->base.dispose_fn != NULL) list->base.dispose_fn (node->value); free (node); return true; } static bool gl_linked_remove_at (gl_list_t list, size_t position) { size_t count = list->count; gl_list_node_t removed_node; if (!(position < count)) /* Invalid argument. */ abort (); /* Here we know count > 0. */ if (position <= ((count - 1) / 2)) { gl_list_node_t node; gl_list_node_t after_removed; node = &list->root; for (; position > 0; position--) node = node->next; removed_node = node->next; after_removed = node->next->next; ASYNCSAFE(gl_list_node_t) node->next = after_removed; after_removed->prev = node; } else { gl_list_node_t node; gl_list_node_t before_removed; position = count - 1 - position; node = &list->root; for (; position > 0; position--) node = node->prev; removed_node = node->prev; before_removed = node->prev->prev; node->prev = before_removed; ASYNCSAFE(gl_list_node_t) before_removed->next = node; } #if WITH_HASHTABLE remove_from_bucket (list, removed_node); #endif list->count--; if (list->base.dispose_fn != NULL) list->base.dispose_fn (removed_node->value); free (removed_node); return true; } static bool gl_linked_remove (gl_list_t list, const void *elt) { gl_list_node_t node = gl_linked_search_from_to (list, 0, list->count, elt); if (node != NULL) return gl_linked_remove_node (list, node); else return false; } static void gl_linked_list_free (gl_list_t list) { gl_listelement_dispose_fn dispose = list->base.dispose_fn; gl_list_node_t node; for (node = list->root.next; node != &list->root; ) { gl_list_node_t next = node->next; if (dispose != NULL) dispose (node->value); free (node); node = next; } #if WITH_HASHTABLE free (list->table); #endif free (list); } /* --------------------- gl_list_iterator_t Data Type --------------------- */ static gl_list_iterator_t _GL_ATTRIBUTE_PURE gl_linked_iterator (gl_list_t list) { gl_list_iterator_t result; result.vtable = list->base.vtable; result.list = list; result.p = list->root.next; result.q = &list->root; #if defined GCC_LINT || defined lint result.i = 0; result.j = 0; result.count = 0; #endif return result; } static gl_list_iterator_t _GL_ATTRIBUTE_PURE gl_linked_iterator_from_to (gl_list_t list, size_t start_index, size_t end_index) { gl_list_iterator_t result; size_t n1, n2, n3; if (!(start_index <= end_index && end_index <= list->count)) /* Invalid arguments. */ abort (); result.vtable = list->base.vtable; result.list = list; n1 = start_index; n2 = end_index - start_index; n3 = list->count - end_index; /* Find the maximum among n1, n2, n3, so as to reduce the number of loop iterations to n1 + n2 + n3 - max(n1,n2,n3). */ if (n1 > n2 && n1 > n3) { /* n1 is the maximum, use n2 and n3. */ gl_list_node_t node; size_t i; node = &list->root; for (i = n3; i > 0; i--) node = node->prev; result.q = node; for (i = n2; i > 0; i--) node = node->prev; result.p = node; } else if (n2 > n3) { /* n2 is the maximum, use n1 and n3. */ gl_list_node_t node; size_t i; node = list->root.next; for (i = n1; i > 0; i--) node = node->next; result.p = node; node = &list->root; for (i = n3; i > 0; i--) node = node->prev; result.q = node; } else { /* n3 is the maximum, use n1 and n2. */ gl_list_node_t node; size_t i; node = list->root.next; for (i = n1; i > 0; i--) node = node->next; result.p = node; for (i = n2; i > 0; i--) node = node->next; result.q = node; } #if defined GCC_LINT || defined lint result.i = 0; result.j = 0; result.count = 0; #endif return result; } static bool gl_linked_iterator_next (gl_list_iterator_t *iterator, const void **eltp, gl_list_node_t *nodep) { if (iterator->p != iterator->q) { gl_list_node_t node = (gl_list_node_t) iterator->p; *eltp = node->value; if (nodep != NULL) *nodep = node; iterator->p = node->next; return true; } else return false; } static void gl_linked_iterator_free (_GL_ATTRIBUTE_MAYBE_UNUSED gl_list_iterator_t *iterator) { } /* ---------------------- Sorted gl_list_t Data Type ---------------------- */ static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_sortedlist_search (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { gl_list_node_t node; for (node = list->root.next; node != &list->root; node = node->next) { int cmp = compar (node->value, elt); if (cmp > 0) break; if (cmp == 0) return node; } return NULL; } static gl_list_node_t _GL_ATTRIBUTE_PURE gl_linked_sortedlist_search_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t low, size_t high, const void *elt) { size_t count = list->count; if (!(low <= high && high <= list->count)) /* Invalid arguments. */ abort (); high -= low; if (high > 0) { /* Here we know low < count. */ size_t position = low; gl_list_node_t node; if (position <= ((count - 1) / 2)) { node = list->root.next; for (; position > 0; position--) node = node->next; } else { position = count - 1 - position; node = list->root.prev; for (; position > 0; position--) node = node->prev; } do { int cmp = compar (node->value, elt); if (cmp > 0) break; if (cmp == 0) return node; node = node->next; } while (--high > 0); } return NULL; } static size_t _GL_ATTRIBUTE_PURE gl_linked_sortedlist_indexof (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { gl_list_node_t node; size_t index; for (node = list->root.next, index = 0; node != &list->root; node = node->next, index++) { int cmp = compar (node->value, elt); if (cmp > 0) break; if (cmp == 0) return index; } return (size_t)(-1); } static size_t _GL_ATTRIBUTE_PURE gl_linked_sortedlist_indexof_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t low, size_t high, const void *elt) { size_t count = list->count; if (!(low <= high && high <= list->count)) /* Invalid arguments. */ abort (); high -= low; if (high > 0) { /* Here we know low < count. */ size_t index = low; size_t position = low; gl_list_node_t node; if (position <= ((count - 1) / 2)) { node = list->root.next; for (; position > 0; position--) node = node->next; } else { position = count - 1 - position; node = list->root.prev; for (; position > 0; position--) node = node->prev; } do { int cmp = compar (node->value, elt); if (cmp > 0) break; if (cmp == 0) return index; node = node->next; index++; } while (--high > 0); } return (size_t)(-1); } static gl_list_node_t gl_linked_sortedlist_nx_add (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { gl_list_node_t node; for (node = list->root.next; node != &list->root; node = node->next) if (compar (node->value, elt) >= 0) return gl_linked_nx_add_before (list, node, elt); return gl_linked_nx_add_last (list, elt); } static bool gl_linked_sortedlist_remove (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { gl_list_node_t node; for (node = list->root.next; node != &list->root; node = node->next) { int cmp = compar (node->value, elt); if (cmp > 0) break; if (cmp == 0) return gl_linked_remove_node (list, node); } return false; } libffcall-2.5/gnulib-lib/xsize.h0000664000000000000000000000775214641402034013537 00000000000000/* xsize.h -- Checked size_t computations. Copyright (C) 2003, 2008-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _XSIZE_H #define _XSIZE_H /* This file uses _GL_INLINE_HEADER_BEGIN, _GL_INLINE, HAVE_STDINT_H. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Get size_t. */ #include /* Get INT_MAX, SIZE_MAX. */ #include #if HAVE_STDINT_H # include #endif /* Get ATTRIBUTE_PURE. */ #include "attribute.h" _GL_INLINE_HEADER_BEGIN #ifndef XSIZE_INLINE # define XSIZE_INLINE _GL_INLINE #endif #ifdef __cplusplus extern "C" { #endif /* The size of memory objects is often computed through expressions of type size_t. Example: void* p = malloc (header_size + n * element_size). These computations can lead to overflow. When this happens, malloc() returns a piece of memory that is way too small, and the program then crashes while attempting to fill the memory. To avoid this, the functions and macros in this file check for overflow. The convention is that SIZE_MAX represents overflow. malloc (SIZE_MAX) is not guaranteed to fail -- think of a malloc implementation that uses mmap --, it's recommended to use size_overflow_p() or size_in_bounds_p() before invoking malloc(). The example thus becomes: size_t size = xsum (header_size, xtimes (n, element_size)); void *p = (size_in_bounds_p (size) ? malloc (size) : NULL); */ /* Convert an arbitrary N >= 0 to type size_t. N should not have side effects. */ #define xcast_size_t(N) \ ((N) <= SIZE_MAX ? (size_t) (N) : SIZE_MAX) /* Sum of two sizes, with overflow check. */ XSIZE_INLINE size_t ATTRIBUTE_PURE xsum (size_t size1, size_t size2) { if (INT_MAX < SIZE_MAX) { /* Optimize for the common case where size_t arithmetic wraps around without undefined behavior. */ size_t sum = size1 + size2; return size1 <= sum ? sum : SIZE_MAX; } return size1 <= SIZE_MAX - size2 ? size1 + size2 : SIZE_MAX; } /* Sum of three sizes, with overflow check. */ XSIZE_INLINE size_t ATTRIBUTE_PURE xsum3 (size_t size1, size_t size2, size_t size3) { return xsum (xsum (size1, size2), size3); } /* Sum of four sizes, with overflow check. */ XSIZE_INLINE size_t ATTRIBUTE_PURE xsum4 (size_t size1, size_t size2, size_t size3, size_t size4) { return xsum (xsum (xsum (size1, size2), size3), size4); } /* Maximum of two sizes, with overflow check. */ XSIZE_INLINE size_t ATTRIBUTE_PURE xmax (size_t size1, size_t size2) { /* No explicit check is needed here, because for any n: max (SIZE_MAX, n) == SIZE_MAX and max (n, SIZE_MAX) == SIZE_MAX. */ return (size1 >= size2 ? size1 : size2); } /* Multiplication of a count with an element size, with overflow check. The count must be >= 0 and the element size must be > 0. Arguments should not have side effects. The element size's type should be no wider than size_t. This is a macro, not a function, so that it works correctly even when N is of a wider type and N > SIZE_MAX. */ #define xtimes(N, ELSIZE) \ ((N) <= SIZE_MAX / (ELSIZE) ? (size_t) (N) * (ELSIZE) : SIZE_MAX) /* Check for overflow. */ #define size_overflow_p(SIZE) \ ((SIZE) == SIZE_MAX) /* Check against overflow. */ #define size_in_bounds_p(SIZE) \ ((SIZE) != SIZE_MAX) #ifdef __cplusplus } #endif _GL_INLINE_HEADER_END #endif /* _XSIZE_H */ libffcall-2.5/gnulib-lib/verify.h0000664000000000000000000003735414664171733013720 00000000000000/* Compile-time assert-like macros. Copyright (C) 2005-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Paul Eggert, Bruno Haible, and Jim Meyering. */ #ifndef _GL_VERIFY_H #define _GL_VERIFY_H /* Define _GL_HAVE__STATIC_ASSERT to 1 if _Static_assert (R, DIAGNOSTIC) works as per C11. This is supported by GCC 4.6.0+ and by clang 4+. Define _GL_HAVE__STATIC_ASSERT1 to 1 if _Static_assert (R) works as per C23. This is supported by GCC 9.1+. Support compilers claiming conformance to the relevant standard, and also support GCC when not pedantic. If we were willing to slow 'configure' down we could also use it with other compilers, but since this affects only the quality of diagnostics, why bother? */ #ifndef __cplusplus # if (201112 <= __STDC_VERSION__ \ || (!defined __STRICT_ANSI__ \ && ((4 < __GNUC__ + (6 <= __GNUC_MINOR__) && !defined __clang__) \ || 5 <= __clang_major__))) # define _GL_HAVE__STATIC_ASSERT 1 # endif # if (202311 <= __STDC_VERSION__ \ || (!defined __STRICT_ANSI__ && 9 <= __GNUC__ && !defined __clang__)) # define _GL_HAVE__STATIC_ASSERT1 1 # endif #endif /* FreeBSD 9.1 , included by and lots of other system headers, defines a conflicting _Static_assert that is no better than ours; override it. */ #ifndef _GL_HAVE__STATIC_ASSERT # include # undef _Static_assert #endif /* Each of these macros verifies that its argument R is nonzero. To be portable, R should be an integer constant expression. Unlike assert (R), there is no run-time overhead. If _Static_assert works, verify (R) uses it directly. Similarly, _GL_VERIFY_TRUE works by packaging a _Static_assert inside a struct that is an operand of sizeof. The code below uses several ideas for C++ compilers, and for C compilers that do not support _Static_assert: * The first step is ((R) ? 1 : -1). Given an expression R, of integral or boolean or floating-point type, this yields an expression of integral type, whose value is later verified to be constant and nonnegative. * Next this expression W is wrapped in a type struct _gl_verify_type { unsigned int _gl_verify_error_if_negative: W; }. If W is negative, this yields a compile-time error. No compiler can deal with a bit-field of negative size. One might think that an array size check would have the same effect, that is, that the type struct { unsigned int dummy[W]; } would work as well. However, inside a function, some compilers (such as C++ compilers and GNU C) allow local parameters and variables inside array size expressions. With these compilers, an array size check would not properly diagnose this misuse of the verify macro: void function (int n) { verify (n < 0); } * For the verify macro, the struct _gl_verify_type will need to somehow be embedded into a declaration. To be portable, this declaration must declare an object, a constant, a function, or a typedef name. If the declared entity uses the type directly, such as in struct dummy {...}; typedef struct {...} dummy; extern struct {...} *dummy; extern void dummy (struct {...} *); extern struct {...} *dummy (void); two uses of the verify macro would yield colliding declarations if the entity names are not disambiguated. A workaround is to attach the current line number to the entity name: #define _GL_CONCAT0(x, y) x##y #define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y) extern struct {...} * _GL_CONCAT (dummy, __LINE__); But this has the problem that two invocations of verify from within the same macro would collide, since the __LINE__ value would be the same for both invocations. (The GCC __COUNTER__ macro solves this problem, but is not portable.) A solution is to use the sizeof operator. It yields a number, getting rid of the identity of the type. Declarations like extern int dummy [sizeof (struct {...})]; extern void dummy (int [sizeof (struct {...})]); extern int (*dummy (void)) [sizeof (struct {...})]; can be repeated. * Should the implementation use a named struct or an unnamed struct? Which of the following alternatives can be used? extern int dummy [sizeof (struct {...})]; extern int dummy [sizeof (struct _gl_verify_type {...})]; extern void dummy (int [sizeof (struct {...})]); extern void dummy (int [sizeof (struct _gl_verify_type {...})]); extern int (*dummy (void)) [sizeof (struct {...})]; extern int (*dummy (void)) [sizeof (struct _gl_verify_type {...})]; In the second and sixth case, the struct type is exported to the outer scope; two such declarations therefore collide. GCC warns about the first, third, and fourth cases. So the only remaining possibility is the fifth case: extern int (*dummy (void)) [sizeof (struct {...})]; * GCC warns about duplicate declarations of the dummy function if -Wredundant-decls is used. GCC 4.3 and later have a builtin __COUNTER__ macro that can let us generate unique identifiers for each dummy function, to suppress this warning. * This implementation exploits the fact that older versions of GCC, which do not support _Static_assert, also do not warn about the last declaration mentioned above. * GCC warns if -Wnested-externs is enabled and 'verify' is used within a function body; but inside a function, you can always arrange to use verify_expr instead. * In C++, any struct definition inside sizeof is invalid. Use a template type to work around the problem. */ /* Concatenate two preprocessor tokens. */ #define _GL_CONCAT(x, y) _GL_CONCAT0 (x, y) #define _GL_CONCAT0(x, y) x##y /* _GL_COUNTER is an integer, preferably one that changes each time we use it. Use __COUNTER__ if it works, falling back on __LINE__ otherwise. __LINE__ isn't perfect, but it's better than a constant. */ #if defined __COUNTER__ && __COUNTER__ != __COUNTER__ # define _GL_COUNTER __COUNTER__ #else # define _GL_COUNTER __LINE__ #endif /* Generate a symbol with the given prefix, making it unique if possible. */ #define _GL_GENSYM(prefix) _GL_CONCAT (prefix, _GL_COUNTER) /* Verify requirement R at compile-time, as an integer constant expression that returns 1. If R is false, fail at compile-time, preferably with a diagnostic that includes the string-literal DIAGNOSTIC. */ #define _GL_VERIFY_TRUE(R, DIAGNOSTIC) \ (!!sizeof (_GL_VERIFY_TYPE (R, DIAGNOSTIC))) #ifdef __cplusplus # if !GNULIB_defined_struct__gl_verify_type template struct _gl_verify_type { unsigned int _gl_verify_error_if_negative: w; }; # define GNULIB_defined_struct__gl_verify_type 1 # endif # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \ _gl_verify_type<(R) ? 1 : -1> #elif defined _GL_HAVE__STATIC_ASSERT # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \ struct { \ _Static_assert (R, DIAGNOSTIC); \ int _gl_dummy; \ } #else # define _GL_VERIFY_TYPE(R, DIAGNOSTIC) \ struct { unsigned int _gl_verify_error_if_negative: (R) ? 1 : -1; } #endif /* Verify requirement R at compile-time, as a declaration without a trailing ';'. If R is false, fail at compile-time. This macro requires three or more arguments but uses at most the first two, so that the _Static_assert macro optionally defined below supports both the C11 two-argument syntax and the C23 one-argument syntax. Unfortunately, unlike C11, this implementation must appear as an ordinary declaration, and cannot appear inside struct { ... }. */ #if 202311 <= __STDC_VERSION__ || 200410 <= __cpp_static_assert # define _GL_VERIFY(R, DIAGNOSTIC, ...) static_assert (R, DIAGNOSTIC) #elif defined _GL_HAVE__STATIC_ASSERT # define _GL_VERIFY(R, DIAGNOSTIC, ...) _Static_assert (R, DIAGNOSTIC) #else # define _GL_VERIFY(R, DIAGNOSTIC, ...) \ extern int (*_GL_GENSYM (_gl_verify_function) (void)) \ [_GL_VERIFY_TRUE (R, DIAGNOSTIC)] # if 4 < __GNUC__ + (6 <= __GNUC_MINOR__) && !defined __clang__ # pragma GCC diagnostic ignored "-Wnested-externs" # endif #endif /* _GL_STATIC_ASSERT_H is defined if this code is copied into assert.h. */ #ifdef _GL_STATIC_ASSERT_H /* Define _Static_assert if needed. */ /* With clang ≥ 3.8.0 in C++ mode, _Static_assert already works and accepts 1 or 2 arguments. We better don't override it, because clang's standard C++ library uses static_assert inside classes in several places, and our replacement via _GL_VERIFY does not work in these contexts. */ # if (defined __cplusplus && defined __clang__ \ && (4 <= __clang_major__ + (8 <= __clang_minor__))) # if 5 <= __clang_major__ /* Avoid "warning: 'static_assert' with no message is a C++17 extension". */ # pragma clang diagnostic ignored "-Wc++17-extensions" # else /* Avoid "warning: static_assert with no message is a C++1z extension". */ # pragma clang diagnostic ignored "-Wc++1z-extensions" # endif # elif !defined _GL_HAVE__STATIC_ASSERT1 && !defined _Static_assert # if !defined _MSC_VER || defined __clang__ # define _Static_assert(...) \ _GL_VERIFY (__VA_ARGS__, "static assertion failed", -) # else # if defined __cplusplus && _MSC_VER >= 1910 /* In MSVC 14.1 or newer, static_assert accepts one or two arguments, but _Static_assert is not defined. */ # define _Static_assert static_assert # else /* Work around MSVC preprocessor incompatibility with ISO C; see . */ # define _Static_assert(R, ...) \ _GL_VERIFY ((R), "static assertion failed", -) # endif # endif # endif /* Define static_assert if needed. */ # if (!defined static_assert \ && __STDC_VERSION__ < 202311 \ && (!defined __cplusplus \ || (__cpp_static_assert < 201411 \ && __GNUG__ < 6 && __clang_major__ < 6 && _MSC_VER < 1910))) # if (defined __cplusplus && defined __GNUG__ && __GNUG__ < 6 \ && __cplusplus == 201103L && !defined __clang__) /* g++ >= 4.7, < 6 with option -std=c++11 or -std=gnu++11 supports the two-arguments static_assert but not the one-argument static_assert, and it does not support _Static_assert. We have to play preprocessor tricks to distinguish the two cases. */ # define _GL_SA1(a1) static_assert ((a1), "static assertion failed") # define _GL_SA2 static_assert # define _GL_SA3 static_assert # define _GL_SA_PICK(x1,x2,x3,x4,...) x4 # define static_assert(...) _GL_SA_PICK(__VA_ARGS__,_GL_SA3,_GL_SA2,_GL_SA1) (__VA_ARGS__) # elif defined __cplusplus && _MSC_VER >= 1900 && !defined __clang__ /* MSVC 14 in C++ mode supports the two-arguments static_assert but not the one-argument static_assert, and it does not support _Static_assert. We have to play preprocessor tricks to distinguish the two cases. Since the MSVC preprocessor is not ISO C compliant (see above), the solution is specific to MSVC. */ # define _GL_EXPAND(x) x # define _GL_SA1(a1) static_assert ((a1), "static assertion failed") # define _GL_SA2 static_assert # define _GL_SA3 static_assert # define _GL_SA_PICK(x1,x2,x3,x4,...) x4 # define static_assert(...) _GL_EXPAND(_GL_SA_PICK(__VA_ARGS__,_GL_SA3,_GL_SA2,_GL_SA1)) (__VA_ARGS__) /* Avoid "fatal error C1189: #error: The C++ Standard Library forbids macroizing keywords." */ # define _ALLOW_KEYWORD_MACROS 1 # else # define static_assert _Static_assert /* C11 requires this #define. */ # endif # endif #endif /* @assert.h omit start@ */ #if defined __clang_major__ && __clang_major__ < 5 # define _GL_HAS_BUILTIN_TRAP 0 #elif 3 < __GNUC__ + (3 < __GNUC_MINOR__ + (4 <= __GNUC_PATCHLEVEL__)) # define _GL_HAS_BUILTIN_TRAP 1 #elif defined __has_builtin # define _GL_HAS_BUILTIN_TRAP __has_builtin (__builtin_trap) #else # define _GL_HAS_BUILTIN_TRAP 0 #endif #ifndef _GL_HAS_BUILTIN_UNREACHABLE # if defined __clang_major__ && __clang_major__ < 5 # define _GL_HAS_BUILTIN_UNREACHABLE 0 # elif 4 < __GNUC__ + (5 <= __GNUC_MINOR__) && !defined __clang__ # define _GL_HAS_BUILTIN_UNREACHABLE 1 # elif defined __has_builtin # define _GL_HAS_BUILTIN_UNREACHABLE __has_builtin (__builtin_unreachable) # else # define _GL_HAS_BUILTIN_UNREACHABLE 0 # endif #endif /* Each of these macros verifies that its argument R is nonzero. To be portable, R should be an integer constant expression. Unlike assert (R), there is no run-time overhead. There are two macros, since no single macro can be used in all contexts in C. verify_expr (R, E) is for scalar contexts, including integer constant expression contexts. verify (R) is for declaration contexts, e.g., the top level. */ /* Verify requirement R at compile-time. Return the value of the expression E. */ #define verify_expr(R, E) \ (_GL_VERIFY_TRUE (R, "verify_expr (" #R ", " #E ")") ? (E) : (E)) /* Verify requirement R at compile-time, as a declaration without a trailing ';'. verify (R) acts like static_assert (R) except that it is portable to C11/C++14 and earlier, it can issue better diagnostics, and its name is shorter and may be more convenient. */ #ifdef __PGI /* PGI barfs if R is long. */ # define verify(R) _GL_VERIFY (R, "verify (...)", -) #else # define verify(R) _GL_VERIFY (R, "verify (" #R ")", -) #endif /* Assume that R always holds. Behavior is undefined if R is false, fails to evaluate, or has side effects. 'assume (R)' is a directive from the programmer telling the compiler that R is true so the compiler needn't generate code to test R. This is why 'assume' is in verify.h: it's related to static checking (in this case, static checking done by the programmer), not dynamic checking. 'assume (R)' can affect compilation of all the code, not just code that happens to be executed after the assume (R) is "executed". For example, if the code mistakenly does 'assert (R); assume (R);' the compiler is entitled to optimize away the 'assert (R)'. Although assuming R can help a compiler generate better code or diagnostics, performance can suffer if R uses hard-to-optimize features such as function calls not inlined by the compiler. Avoid Clang's __builtin_assume, as it breaks GNU Emacs master as of 2020-08-23T21:09:49Z!eggert@cs.ucla.edu; see . It's not known whether this breakage is a Clang bug or an Emacs bug; play it safe for now. */ #if _GL_HAS_BUILTIN_UNREACHABLE # define assume(R) ((R) ? (void) 0 : __builtin_unreachable ()) #elif 1200 <= _MSC_VER # define assume(R) __assume (R) #elif 202311 <= __STDC_VERSION__ # include # define assume(R) ((R) ? (void) 0 : unreachable ()) #elif (defined GCC_LINT || defined lint) && _GL_HAS_BUILTIN_TRAP /* Doing it this way helps various packages when configured with --enable-gcc-warnings, which compiles with -Dlint. It's nicer if 'assume' silences warnings with GCC 3.4 through GCC 4.4.7 (2012). */ # define assume(R) ((R) ? (void) 0 : __builtin_trap ()) #else /* Some older tools grok NOTREACHED, e.g., Oracle Studio 12.6 (2017). */ # define assume(R) ((R) ? (void) 0 : /*NOTREACHED*/ (void) 0) #endif /* @assert.h omit end@ */ #endif libffcall-2.5/gnulib-lib/gl_linkedhash_list.c0000664000000000000000000000640414631432055016215 00000000000000/* Sequential list data type implemented by a hash table with a linked list. Copyright (C) 2006, 2008-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "gl_linkedhash_list.h" #include /* for uintptr_t, SIZE_MAX */ #include #include "xsize.h" #define WITH_HASHTABLE 1 /* -------------------------- gl_list_t Data Type -------------------------- */ /* Generic hash-table code. */ #include "gl_anyhash1.h" /* Generic linked list code. */ #include "gl_anylinked_list1.h" /* Generic hash-table code. */ #define CONTAINER_T gl_list_t #define CONTAINER_COUNT(list) (list)->count #include "gl_anyhash2.h" /* Add a node to the hash table structure. */ static void add_to_bucket (gl_list_t list, gl_list_node_t node) { size_t bucket = node->h.hashcode % list->table_size; node->h.hash_next = list->table[bucket]; list->table[bucket] = &node->h; } /* Tell all compilers that the return value is 0. */ #define add_to_bucket(list,node) ((add_to_bucket) (list, node), 0) /* Remove a node from the hash table structure. */ static void remove_from_bucket (gl_list_t list, gl_list_node_t node) { size_t bucket = node->h.hashcode % list->table_size; gl_hash_entry_t *p; for (p = &list->table[bucket]; ; p = &(*p)->hash_next) { if (*p == &node->h) { *p = node->h.hash_next; break; } if (*p == NULL) /* node is not in the right bucket. Did the hash codes change inadvertently? */ abort (); } } /* Generic linked list code. */ #include "gl_anylinked_list2.h" const struct gl_list_implementation gl_linkedhash_list_implementation = { gl_linked_nx_create_empty, gl_linked_nx_create, gl_linked_size, gl_linked_node_value, gl_linked_node_nx_set_value, gl_linked_next_node, gl_linked_previous_node, gl_linked_first_node, gl_linked_last_node, gl_linked_get_at, gl_linked_nx_set_at, gl_linked_search_from_to, gl_linked_indexof_from_to, gl_linked_nx_add_first, gl_linked_nx_add_last, gl_linked_nx_add_before, gl_linked_nx_add_after, gl_linked_nx_add_at, gl_linked_remove_node, gl_linked_remove_at, gl_linked_remove, gl_linked_list_free, gl_linked_iterator, gl_linked_iterator_from_to, gl_linked_iterator_next, gl_linked_iterator_free, gl_linked_sortedlist_search, gl_linked_sortedlist_search_from_to, gl_linked_sortedlist_indexof, gl_linked_sortedlist_indexof_from_to, gl_linked_sortedlist_nx_add, gl_linked_sortedlist_remove }; libffcall-2.5/gnulib-lib/strerror.c0000664000000000000000000000405714631432055014252 00000000000000/* strerror.c --- POSIX compatible system error routine Copyright (C) 2007-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #include #include #include #include #include "intprops.h" #include "strerror-override.h" /* Use the system functions, not the gnulib overrides in this file. */ #undef sprintf char * strerror (int n) #undef strerror { static char buf[STACKBUF_LEN]; size_t len; /* Cast away const, due to the historical signature of strerror; callers should not be modifying the string. */ const char *msg = strerror_override (n); if (msg) return (char *) msg; msg = strerror (n); /* Our strerror_r implementation might use the system's strerror buffer, so all other clients of strerror have to see the error copied into a buffer that we manage. This is not thread-safe, even if the system strerror is, but portable programs shouldn't be using strerror if they care about thread-safety. */ if (!msg || !*msg) { static char const fmt[] = "Unknown error %d"; static_assert (sizeof buf >= sizeof (fmt) + INT_STRLEN_BOUND (n)); sprintf (buf, fmt, n); errno = EINVAL; return buf; } /* Fix STACKBUF_LEN if this ever aborts. */ len = strlen (msg); if (sizeof buf <= len) abort (); memcpy (buf, msg, len + 1); return buf; } libffcall-2.5/gnulib-lib/windows-spin.h0000664000000000000000000000273314631432055015035 00000000000000/* Spin locks (native Windows implementation). Copyright (C) 2019-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2019. */ #ifndef _WINDOWS_SPIN_H #define _WINDOWS_SPIN_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include typedef struct { LONG volatile word; } glwthread_spinlock_t; #define GLWTHREAD_SPIN_INIT { 0 } #ifdef __cplusplus extern "C" { #endif extern void glwthread_spin_init (glwthread_spinlock_t *lock); extern int glwthread_spin_lock (glwthread_spinlock_t *lock); extern int glwthread_spin_trylock (glwthread_spinlock_t *lock); extern int glwthread_spin_unlock (glwthread_spinlock_t *lock); extern int glwthread_spin_destroy (glwthread_spinlock_t *lock); #ifdef __cplusplus } #endif #endif /* _WINDOWS_SPIN_H */ libffcall-2.5/gnulib-lib/clean-temp-private.h0000664000000000000000000000610014631432055016061 00000000000000/* Private interface between modules 'clean-temp-simple' and 'clean-temp'. Copyright (C) 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _CLEAN_TEMP_PRIVATE_H #define _CLEAN_TEMP_PRIVATE_H #include #include "gl_list.h" #include "asyncsafe-spin.h" /* The use of 'volatile' in the types below (and ISO C 99 section 5.1.2.3.(5)) ensure that while constructing or modifying the data structures, the field values are written to memory in the order of the C statements. So the signal handler can rely on these field values to be up to date. */ /* Registry for a single temporary directory. 'struct temp_dir' from the public header file overlaps with this. */ struct tempdir { /* The absolute pathname of the directory. */ char * volatile dirname; /* Whether errors during explicit cleanup are reported to standard error. */ bool cleanup_verbose; /* Absolute pathnames of subdirectories. */ gl_list_t /* */ volatile subdirs; /* Absolute pathnames of files. */ gl_list_t /* */ volatile files; }; /* List of all temporary directories. */ struct all_tempdirs { struct tempdir * volatile * volatile tempdir_list; size_t volatile tempdir_count; size_t tempdir_allocated; }; #define dir_cleanup_list clean_temp_dir_cleanup_list extern struct all_tempdirs dir_cleanup_list; /* A file descriptor to be closed. In multithreaded programs, it is forbidden to close the same fd twice, because you never know what unrelated open() calls are being executed in other threads. So, the 'close (fd)' must be guarded by a once-only guard. */ struct closeable_fd { /* The file descriptor to close. */ int volatile fd; /* Set to true when it has been closed. */ bool volatile closed; /* Lock that protects the fd from being closed twice. */ asyncsafe_spinlock_t lock; /* Tells whether this list element has been done and can be freed. */ bool volatile done; }; #define descriptors clean_temp_descriptors extern gl_list_t /* */ volatile descriptors; extern bool clean_temp_string_equals (const void *x1, const void *x2); extern size_t clean_temp_string_hash (const void *x); extern _GL_ASYNC_SAFE int clean_temp_asyncsafe_close (struct closeable_fd *element); extern void clean_temp_init_asyncsafe_close (void); extern int clean_temp_init (void); extern int clean_temp_unlink (const char *absolute_file_name, bool cleanup_verbose); #endif /* _CLEAN_TEMP_PRIVATE_H */ libffcall-2.5/gnulib-lib/sigprocmask.c0000664000000000000000000002062214631432055014706 00000000000000/* POSIX compatible signal blocking. Copyright (C) 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #include #include #include #if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" #endif /* We assume that a platform without POSIX signal blocking functions also does not have the POSIX sigaction() function, only the signal() function. We also assume signal() has SysV semantics, where any handler is uninstalled prior to being invoked. This is true for native Windows platforms. */ /* We use raw signal(), but also provide a wrapper rpl_signal() so that applications can query or change a blocked signal. */ #undef signal /* Provide invalid signal numbers as fallbacks if the uncatchable signals are not defined. */ #ifndef SIGKILL # define SIGKILL (-1) #endif #ifndef SIGSTOP # define SIGSTOP (-1) #endif /* On native Windows, as of 2008, the signal SIGABRT_COMPAT is an alias for the signal SIGABRT. Only one signal handler is stored for both SIGABRT and SIGABRT_COMPAT. SIGABRT_COMPAT is not a signal of its own. */ #if defined _WIN32 && ! defined __CYGWIN__ # undef SIGABRT_COMPAT # define SIGABRT_COMPAT 6 #endif #ifdef SIGABRT_COMPAT # define SIGABRT_COMPAT_MASK (1U << SIGABRT_COMPAT) #else # define SIGABRT_COMPAT_MASK 0 #endif typedef void (*handler_t) (int); #if HAVE_MSVC_INVALID_PARAMETER_HANDLER static handler_t signal_nothrow (int sig, handler_t handler) { handler_t result; TRY_MSVC_INVAL { result = signal (sig, handler); } CATCH_MSVC_INVAL { result = SIG_ERR; errno = EINVAL; } DONE_MSVC_INVAL; return result; } # define signal signal_nothrow #endif /* Handling of gnulib defined signals. */ #if GNULIB_defined_SIGPIPE static handler_t SIGPIPE_handler = SIG_DFL; #endif #if GNULIB_defined_SIGPIPE static handler_t ext_signal (int sig, handler_t handler) { switch (sig) { case SIGPIPE: { handler_t old_handler = SIGPIPE_handler; SIGPIPE_handler = handler; return old_handler; } default: /* System defined signal */ return signal (sig, handler); } } # undef signal # define signal ext_signal #endif int sigismember (const sigset_t *set, int sig) { if (sig >= 0 && sig < NSIG) { #ifdef SIGABRT_COMPAT if (sig == SIGABRT_COMPAT) sig = SIGABRT; #endif return (*set >> sig) & 1; } else return 0; } int sigemptyset (sigset_t *set) { *set = 0; return 0; } int sigaddset (sigset_t *set, int sig) { if (sig >= 0 && sig < NSIG) { #ifdef SIGABRT_COMPAT if (sig == SIGABRT_COMPAT) sig = SIGABRT; #endif *set |= 1U << sig; return 0; } else { errno = EINVAL; return -1; } } int sigdelset (sigset_t *set, int sig) { if (sig >= 0 && sig < NSIG) { #ifdef SIGABRT_COMPAT if (sig == SIGABRT_COMPAT) sig = SIGABRT; #endif *set &= ~(1U << sig); return 0; } else { errno = EINVAL; return -1; } } int sigfillset (sigset_t *set) { *set = ((2U << (NSIG - 1)) - 1) & ~ SIGABRT_COMPAT_MASK; return 0; } /* Set of currently blocked signals. */ static volatile sigset_t blocked_set /* = 0 */; /* Set of currently blocked and pending signals. */ static volatile sig_atomic_t pending_array[NSIG] /* = { 0 } */; /* Signal handler that is installed for blocked signals. */ static void blocked_handler (int sig) { /* Reinstall the handler, in case the signal occurs multiple times while blocked. There is an inherent race where an asynchronous signal in between when the kernel uninstalled the handler and when we reinstall it will trigger the default handler; oh well. */ signal (sig, blocked_handler); if (sig >= 0 && sig < NSIG) pending_array[sig] = 1; } int sigpending (sigset_t *set) { sigset_t pending = 0; int sig; for (sig = 0; sig < NSIG; sig++) if (pending_array[sig]) pending |= 1U << sig; *set = pending; return 0; } /* The previous signal handlers. Only the array elements corresponding to blocked signals are relevant. */ static volatile handler_t old_handlers[NSIG]; int sigprocmask (int operation, const sigset_t *set, sigset_t *old_set) { if (old_set != NULL) *old_set = blocked_set; if (set != NULL) { sigset_t new_blocked_set; sigset_t to_unblock; sigset_t to_block; switch (operation) { case SIG_BLOCK: new_blocked_set = blocked_set | *set; break; case SIG_SETMASK: new_blocked_set = *set; break; case SIG_UNBLOCK: new_blocked_set = blocked_set & ~*set; break; default: errno = EINVAL; return -1; } to_unblock = blocked_set & ~new_blocked_set; to_block = new_blocked_set & ~blocked_set; if (to_block != 0) { int sig; for (sig = 0; sig < NSIG; sig++) if ((to_block >> sig) & 1) { pending_array[sig] = 0; if ((old_handlers[sig] = signal (sig, blocked_handler)) != SIG_ERR) blocked_set |= 1U << sig; } } if (to_unblock != 0) { sig_atomic_t received[NSIG]; int sig; for (sig = 0; sig < NSIG; sig++) if ((to_unblock >> sig) & 1) { if (signal (sig, old_handlers[sig]) != blocked_handler) /* The application changed a signal handler while the signal was blocked, bypassing our rpl_signal replacement. We don't support this. */ abort (); received[sig] = pending_array[sig]; blocked_set &= ~(1U << sig); pending_array[sig] = 0; } else received[sig] = 0; for (sig = 0; sig < NSIG; sig++) if (received[sig]) raise (sig); } } return 0; } /* Install the handler FUNC for signal SIG, and return the previous handler. */ handler_t rpl_signal (int sig, handler_t handler) { /* We must provide a wrapper, so that a user can query what handler they installed even if that signal is currently blocked. */ if (sig >= 0 && sig < NSIG && sig != SIGKILL && sig != SIGSTOP && handler != SIG_ERR) { #ifdef SIGABRT_COMPAT if (sig == SIGABRT_COMPAT) sig = SIGABRT; #endif if (blocked_set & (1U << sig)) { /* POSIX states that sigprocmask and signal are both async-signal-safe. This is not true of our implementation - there is a slight data race where an asynchronous interrupt on signal A can occur after we install blocked_handler but before we have updated old_handlers for signal B, such that handler A can see stale information if it calls signal(B). Oh well - signal handlers really shouldn't try to manipulate the installed handlers of unrelated signals. */ handler_t result = old_handlers[sig]; old_handlers[sig] = handler; return result; } else return signal (sig, handler); } else { errno = EINVAL; return SIG_ERR; } } #if GNULIB_defined_SIGPIPE /* Raise the signal SIGPIPE. */ int _gl_raise_SIGPIPE (void) { if (blocked_set & (1U << SIGPIPE)) pending_array[SIGPIPE] = 1; else { handler_t handler = SIGPIPE_handler; if (handler == SIG_DFL) exit (128 + SIGPIPE); else if (handler != SIG_IGN) (*handler) (SIGPIPE); } return 0; } #endif libffcall-2.5/gnulib-lib/alloca.in.h0000664000000000000000000000467414631432055014242 00000000000000/* Memory allocation on the stack. Copyright (C) 1995, 1999, 2001-2004, 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Avoid using the symbol _ALLOCA_H here, as Bison assumes _ALLOCA_H means there is a real alloca function. */ #ifndef _GL_ALLOCA_H #define _GL_ALLOCA_H /* alloca (N) returns a pointer to N bytes of memory allocated on the stack, which will last until the function returns. Use of alloca should be avoided: - inside arguments of function calls - undefined behaviour, - in inline functions - the allocation may actually last until the calling function returns, - for huge N (say, N >= 65536) - you never know how large (or small) the stack is, and when the stack cannot fulfill the memory allocation request, the program just crashes. */ #ifndef alloca /* Some version of mingw have an that causes trouble when included after 'alloca' gets defined as a macro. As a workaround, include this first and define 'alloca' as a macro afterwards if needed. */ # if defined __GNUC__ && (defined _WIN32 && ! defined __CYGWIN__) && @HAVE_ALLOCA_H@ # include_next # endif #endif #ifndef alloca # if defined __GNUC__ || (__clang_major__ >= 4) # define alloca __builtin_alloca # elif defined _AIX # define alloca __alloca # elif defined _MSC_VER # include # define alloca _alloca # elif defined __DECC && defined __VMS # define alloca __ALLOCA # elif defined __TANDEM && defined _TNS_E_TARGET # ifdef __cplusplus extern "C" # endif void *_alloca (unsigned short); # pragma intrinsic (_alloca) # define alloca _alloca # elif defined __MVS__ # include # else # include # ifdef __cplusplus extern "C" # endif void *alloca (size_t); # endif #endif #endif /* _GL_ALLOCA_H */ libffcall-2.5/gnulib-lib/warn-on-use.h0000664000000000000000000001616114664171733014560 00000000000000/* A C macro for emitting warnings if a function is used. Copyright (C) 2010-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* _GL_WARN_ON_USE (function, "literal string") issues a declaration for FUNCTION which will then trigger a compiler warning containing the text of "literal string" anywhere that function is called, if supported by the compiler. If the compiler does not support this feature, the macro expands to an unused extern declaration. _GL_WARN_ON_USE_ATTRIBUTE ("literal string") expands to the attribute used in _GL_WARN_ON_USE. If the compiler does not support this feature, it expands to empty. These macros are useful for marking a function as a potential portability trap, with the intent that "literal string" include instructions on the replacement function that should be used instead. _GL_WARN_ON_USE is for functions with 'extern' linkage. _GL_WARN_ON_USE_ATTRIBUTE is for functions with 'static' or 'inline' linkage. _GL_WARN_ON_USE should not be used more than once for a given function in a given compilation unit (because this may generate a warning even if the function is never called). However, one of the reasons that a function is a portability trap is if it has the wrong signature. Declaring FUNCTION with a different signature in C is a compilation error, so this macro must use the same type as any existing declaration so that programs that avoid the problematic FUNCTION do not fail to compile merely because they included a header that poisoned the function. But this implies that _GL_WARN_ON_USE is only safe to use if FUNCTION is known to already have a declaration. Use of this macro implies that there must not be any other macro hiding the declaration of FUNCTION; but undefining FUNCTION first is part of the poisoning process anyway (although for symbols that are provided only via a macro, the result is a compilation error rather than a warning containing "literal string"). Also note that in C++, it is only safe to use if FUNCTION has no overloads. For an example, it is possible to poison 'getline' by: - adding a call to gl_WARN_ON_USE_PREPARE([[#include ]], [getline]) in configure.ac, which potentially defines HAVE_RAW_DECL_GETLINE - adding this code to a header that wraps the system : #undef getline #if HAVE_RAW_DECL_GETLINE _GL_WARN_ON_USE (getline, "getline is required by POSIX 2008, but" "not universally present; use the gnulib module getline"); #endif It is not possible to directly poison global variables. But it is possible to write a wrapper accessor function, and poison that (less common usage, like &environ, will cause a compilation error rather than issue the nice warning, but the end result of informing the developer about their portability problem is still achieved): #if HAVE_RAW_DECL_ENVIRON static char *** rpl_environ (void) { return &environ; } _GL_WARN_ON_USE (rpl_environ, "environ is not always properly declared"); # undef environ # define environ (*rpl_environ ()) #endif or better (avoiding contradictory use of 'static' and 'extern'): #if HAVE_RAW_DECL_ENVIRON static char *** _GL_WARN_ON_USE_ATTRIBUTE ("environ is not always properly declared") rpl_environ (void) { return &environ; } # undef environ # define environ (*rpl_environ ()) #endif */ #ifndef _GL_WARN_ON_USE # if (4 < __GNUC__ || (__GNUC__ == 4 && 3 <= __GNUC_MINOR__)) && !defined __clang__ /* A compiler attribute is available in gcc versions 4.3.0 and later. */ # define _GL_WARN_ON_USE(function, message) \ _GL_WARN_EXTERN_C __typeof__ (function) function __attribute__ ((__warning__ (message))) # define _GL_WARN_ON_USE_ATTRIBUTE(message) \ __attribute__ ((__warning__ (message))) # elif __clang_major__ >= 4 /* Another compiler attribute is available in clang. */ # define _GL_WARN_ON_USE(function, message) \ _GL_WARN_EXTERN_C __typeof__ (function) function \ __attribute__ ((__diagnose_if__ (1, message, "warning"))) # define _GL_WARN_ON_USE_ATTRIBUTE(message) \ __attribute__ ((__diagnose_if__ (1, message, "warning"))) # elif (__GNUC__ >= 3 || defined __clang__) && GNULIB_STRICT_CHECKING /* Verify the existence of the function. */ # define _GL_WARN_ON_USE(function, message) \ _GL_WARN_EXTERN_C __typeof__ (function) function # define _GL_WARN_ON_USE_ATTRIBUTE(message) # else /* Unsupported. */ # define _GL_WARN_ON_USE(function, message) \ _GL_WARN_EXTERN_C int _gl_warn_on_use # define _GL_WARN_ON_USE_ATTRIBUTE(message) # endif #endif /* _GL_WARN_ON_USE_CXX (function, rettype_gcc, rettype_clang, parameters_and_attributes, "message") is like _GL_WARN_ON_USE (function, "message"), except that in C++ mode the function is declared with the given prototype, consisting of return type, parameters, and attributes. This variant is useful for overloaded functions in C++. _GL_WARN_ON_USE does not work in this case. */ #ifndef _GL_WARN_ON_USE_CXX # if !defined __cplusplus # define _GL_WARN_ON_USE_CXX(function,rettype_gcc,rettype_clang,parameters_and_attributes,msg) \ _GL_WARN_ON_USE (function, msg) # else # if (4 < __GNUC__ || (__GNUC__ == 4 && 3 <= __GNUC_MINOR__)) && !defined __clang__ /* A compiler attribute is available in gcc versions 4.3.0 and later. */ # define _GL_WARN_ON_USE_CXX(function,rettype_gcc,rettype_clang,parameters_and_attributes,msg) \ extern rettype_gcc function parameters_and_attributes \ __attribute__ ((__warning__ (msg))) # elif __clang_major__ >= 4 /* Another compiler attribute is available in clang. */ # define _GL_WARN_ON_USE_CXX(function,rettype_gcc,rettype_clang,parameters_and_attributes,msg) \ extern rettype_clang function parameters_and_attributes \ __attribute__ ((__diagnose_if__ (1, msg, "warning"))) # elif (__GNUC__ >= 3 || defined __clang__) && GNULIB_STRICT_CHECKING /* Verify the existence of the function. */ # define _GL_WARN_ON_USE_CXX(function,rettype_gcc,rettype_clang,parameters_and_attributes,msg) \ extern rettype_gcc function parameters_and_attributes # else /* Unsupported. */ # define _GL_WARN_ON_USE_CXX(function,rettype_gcc,rettype_clang,parameters_and_attributes,msg) \ _GL_WARN_EXTERN_C int _gl_warn_on_use # endif # endif #endif /* _GL_WARN_EXTERN_C declaration; performs the declaration with C linkage. */ #ifndef _GL_WARN_EXTERN_C # if defined __cplusplus # define _GL_WARN_EXTERN_C extern "C" # else # define _GL_WARN_EXTERN_C extern # endif #endif libffcall-2.5/gnulib-lib/stdlib.in.h0000664000000000000000000020706114664171733014274 00000000000000/* A GNU-like . Copyright (C) 1995, 2001-2004, 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if (defined __need_system_stdlib_h && !defined _GLIBCXX_STDLIB_H) || defined __need_malloc_and_calloc /* Special invocation conventions inside some gnulib header files, and inside some glibc header files, respectively. Do not recognize this special invocation convention when GCC's c++/11/stdlib.h is being included or has been included. This is needed to support the use of clang+llvm binaries on Ubuntu 22.04 with CXX="$clangdir/bin/clang++ -I/usr/include/c++/11 \ -I/usr/include/x86_64-linux-gnu/c++/11 -L/usr/lib/gcc/x86_64-linux-gnu/11 -Wl,-rpath,$clangdir/lib" because in this case /usr/include/c++/11/stdlib.h (which does not support the convention) is seen before the gnulib-generated stdlib.h. */ #@INCLUDE_NEXT@ @NEXT_STDLIB_H@ /* Make sure that the macros that indicate the special invocation convention get undefined. This is needed at least on CentOS 7. */ #undef __need_malloc_and_calloc #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_STDLIB_H /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_STDLIB_H@ #ifndef _@GUARD_PREFIX@_STDLIB_H #define _@GUARD_PREFIX@_STDLIB_H /* This file uses _Noreturn, _GL_ATTRIBUTE_DEALLOC, _GL_ATTRIBUTE_MALLOC, _GL_ATTRIBUTE_NODISCARD, _GL_ATTRIBUTE_NOTHROW, _GL_ATTRIBUTE_PURE, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* NetBSD 5.0 mis-defines NULL. */ #include /* MirBSD 10 defines WEXITSTATUS in , not in . */ #if @GNULIB_SYSTEM_POSIX@ && !defined WEXITSTATUS # include #endif /* Solaris declares getloadavg() in . */ #if (@GNULIB_GETLOADAVG@ || defined GNULIB_POSIXCHECK) && @HAVE_SYS_LOADAVG_H@ /* OpenIndiana has a bug: must be included before . */ # include # include #endif /* Native Windows platforms declare _mktemp() in . */ #if defined _WIN32 && !defined __CYGWIN__ # include #endif #if @GNULIB_RANDOM_R@ /* OSF/1 5.1 declares 'struct random_data' in , which is included from if _REENTRANT is defined. Include it whenever we need 'struct random_data'. */ # if @HAVE_RANDOM_H@ # include # endif # include # if !@HAVE_STRUCT_RANDOM_DATA@ /* Define 'struct random_data'. But allow multiple gnulib generated replacements to coexist. */ # if !GNULIB_defined_struct_random_data struct random_data { int32_t *fptr; /* Front pointer. */ int32_t *rptr; /* Rear pointer. */ int32_t *state; /* Array of state values. */ int rand_type; /* Type of random number generator. */ int rand_deg; /* Degree of random number generator. */ int rand_sep; /* Distance between front and rear. */ int32_t *end_ptr; /* Pointer behind state table. */ }; # define GNULIB_defined_struct_random_data 1 # endif # endif #endif #if (@GNULIB_MKSTEMP@ || @GNULIB_MKSTEMPS@ || @GNULIB_MKOSTEMP@ || @GNULIB_MKOSTEMPS@ || @GNULIB_GETSUBOPT@ || defined GNULIB_POSIXCHECK) && ! defined __GLIBC__ && !(defined _WIN32 && ! defined __CYGWIN__) /* On Mac OS X 10.3, only declares mkstemp. */ /* On Mac OS X 10.5, only declares mkstemps. */ /* On Mac OS X 10.13, only declares mkostemp and mkostemps. */ /* On Cygwin 1.7.1, only declares getsubopt. */ /* But avoid namespace pollution on glibc systems and native Windows. */ # include #endif #if ((@GNULIB_STRTOL@ && @REPLACE_STRTOL@) || (@GNULIB_STRTOLL@ && @REPLACE_STRTOLL@) || (@GNULIB_STRTOUL@ && @REPLACE_STRTOUL@) || (@GNULIB_STRTOULL@ && @REPLACE_STRTOULL@)) && defined __cplusplus && !defined GNULIB_NAMESPACE && defined __GNUG__ && !defined __clang__ && defined __sun /* When strtol, strtoll, strtoul, or strtoull is going to be defined as a macro below, this may cause compilation errors later in the libstdc++ header files (that are part of GCC), such as: error: 'rpl_strtol' is not a member of 'std' To avoid this, include the relevant header files here, before these symbols get defined as macros. But do so only on Solaris 11 (where it is needed), not on mingw (where it would cause other compilation errors). */ # include #endif /* _GL_ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. */ #ifndef _GL_ATTRIBUTE_DEALLOC # if __GNUC__ >= 11 && !defined __clang__ # define _GL_ATTRIBUTE_DEALLOC(f, i) __attribute__ ((__malloc__ (f, i))) # else # define _GL_ATTRIBUTE_DEALLOC(f, i) # endif #endif /* _GL_ATTRIBUTE_DEALLOC_FREE declares that the function returns pointers that can be freed via 'free'; it can be used only after declaring 'free'. */ /* Applies to: functions. Cannot be used on inline functions. */ #ifndef _GL_ATTRIBUTE_DEALLOC_FREE # define _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_DEALLOC (free, 1) #endif /* _GL_ATTRIBUTE_MALLOC declares that the function returns a pointer to freshly allocated memory. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_MALLOC # if __GNUC__ >= 3 || defined __clang__ # define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) # else # define _GL_ATTRIBUTE_MALLOC # endif #endif /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 2) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 3) || defined __clang__ # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* The __attribute__ feature is available in gcc versions 2.5 and later. The attribute __pure__ was added in gcc 2.96. */ #ifndef _GL_ATTRIBUTE_PURE # if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96) || defined __clang__ # define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__)) # else # define _GL_ATTRIBUTE_PURE /* empty */ # endif #endif /* The definition of _Noreturn is copied here. */ /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Some systems do not define EXIT_*, despite otherwise supporting C89. */ #ifndef EXIT_SUCCESS # define EXIT_SUCCESS 0 #endif /* Tandem/NSK and other platforms that define EXIT_FAILURE as -1 interfere with proper operation of xargs. */ #ifndef EXIT_FAILURE # define EXIT_FAILURE 1 #elif EXIT_FAILURE != 1 # undef EXIT_FAILURE # define EXIT_FAILURE 1 #endif #if @GNULIB__EXIT@ /* Terminate the current process with the given return code, without running the 'atexit' handlers. */ # if @REPLACE__EXIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef _Exit # define _Exit rpl__Exit # endif _GL_FUNCDECL_RPL (_Exit, _Noreturn void, (int status)); _GL_CXXALIAS_RPL (_Exit, void, (int status)); # else # if !@HAVE__EXIT@ _GL_FUNCDECL_SYS (_Exit, _Noreturn void, (int status)); # endif _GL_CXXALIAS_SYS (_Exit, void, (int status)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (_Exit); # endif #elif defined GNULIB_POSIXCHECK # undef _Exit # if HAVE_RAW_DECL__EXIT _GL_WARN_ON_USE (_Exit, "_Exit is unportable - " "use gnulib module _Exit for portability"); # endif #endif #if @GNULIB_ABORT_DEBUG@ /* Terminates the current process with signal SIGABRT. Note: While the original abort() function is safe to call in signal handlers, the overridden abort() function is not. */ # if @REPLACE_ABORT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef abort # define abort rpl_abort # endif _GL_FUNCDECL_RPL (abort, _Noreturn void, (void)); _GL_CXXALIAS_RPL (abort, void, (void)); # else _GL_CXXALIAS_SYS (abort, void, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (abort); # endif #endif #if @GNULIB_FREE_POSIX@ # if @REPLACE_FREE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef free # define free rpl_free # endif # if defined __cplusplus && (__GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2) _GL_FUNCDECL_RPL (free, void, (void *ptr)) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_RPL (free, void, (void *ptr)); # endif _GL_CXXALIAS_RPL (free, void, (void *ptr)); # else _GL_CXXALIAS_SYS (free, void, (void *ptr)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (free); # endif #elif defined GNULIB_POSIXCHECK # undef free /* Assume free is always declared. */ _GL_WARN_ON_USE (free, "free is not future POSIX compliant everywhere - " "use gnulib module free for portability"); #endif /* Allocate memory with indefinite extent and specified alignment. */ #if @GNULIB_ALIGNED_ALLOC@ # if @REPLACE_ALIGNED_ALLOC@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef aligned_alloc # define aligned_alloc rpl_aligned_alloc # endif _GL_FUNCDECL_RPL (aligned_alloc, void *, (size_t alignment, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (aligned_alloc, void *, (size_t alignment, size_t size)); # else # if @HAVE_ALIGNED_ALLOC@ # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate aligned_alloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 16) > 2 _GL_FUNCDECL_SYS (aligned_alloc, void *, (size_t alignment, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (aligned_alloc, void *, (size_t alignment, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (aligned_alloc, void *, (size_t alignment, size_t size)); # endif # endif # if (__GLIBC__ >= 2) && @HAVE_ALIGNED_ALLOC@ _GL_CXXALIASWARN (aligned_alloc); # endif #else # if @GNULIB_FREE_POSIX@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined aligned_alloc /* For -Wmismatched-dealloc: Associate aligned_alloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 16) > 2 _GL_FUNCDECL_SYS (aligned_alloc, void *, (size_t alignment, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (aligned_alloc, void *, (size_t alignment, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK # undef aligned_alloc # if HAVE_RAW_DECL_ALIGNED_ALLOC _GL_WARN_ON_USE (aligned_alloc, "aligned_alloc is not portable - " "use gnulib module aligned_alloc for portability"); # endif # endif #endif #if @GNULIB_ATOLL@ /* Parse a signed decimal integer. Returns the value of the integer. Errors are not detected. */ # if !@HAVE_ATOLL@ _GL_FUNCDECL_SYS (atoll, long long, (const char *string), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (atoll, long long, (const char *string)); _GL_CXXALIASWARN (atoll); #elif defined GNULIB_POSIXCHECK # undef atoll # if HAVE_RAW_DECL_ATOLL _GL_WARN_ON_USE (atoll, "atoll is unportable - " "use gnulib module atoll for portability"); # endif #endif #if @GNULIB_CALLOC_POSIX@ # if (@GNULIB_CALLOC_POSIX@ && @REPLACE_CALLOC_FOR_CALLOC_POSIX@) \ || (@GNULIB_CALLOC_GNU@ && @REPLACE_CALLOC_FOR_CALLOC_GNU@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef calloc # define calloc rpl_calloc # endif _GL_FUNCDECL_RPL (calloc, void *, (size_t nmemb, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (calloc, void *, (size_t nmemb, size_t size)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate calloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (calloc, void *, (size_t nmemb, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (calloc, void *, (size_t nmemb, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (calloc, void *, (size_t nmemb, size_t size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (calloc); # endif #else # if @GNULIB_FREE_POSIX@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined calloc /* For -Wmismatched-dealloc: Associate calloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (calloc, void *, (size_t nmemb, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (calloc, void *, (size_t nmemb, size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK # undef calloc /* Assume calloc is always declared. */ _GL_WARN_ON_USE (calloc, "calloc is not POSIX compliant everywhere - " "use gnulib module calloc-posix for portability"); # endif #endif #if @GNULIB_CANONICALIZE_FILE_NAME@ # if @REPLACE_CANONICALIZE_FILE_NAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define canonicalize_file_name rpl_canonicalize_file_name # endif _GL_FUNCDECL_RPL (canonicalize_file_name, char *, (const char *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (canonicalize_file_name, char *, (const char *name)); # else # if !@HAVE_CANONICALIZE_FILE_NAME@ || (__GNUC__ >= 11 && !defined __clang__) # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (canonicalize_file_name, char *, (const char *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (canonicalize_file_name, char *, (const char *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (canonicalize_file_name, char *, (const char *name)); # endif # ifndef GNULIB_defined_canonicalize_file_name # define GNULIB_defined_canonicalize_file_name \ (!@HAVE_CANONICALIZE_FILE_NAME@ || @REPLACE_CANONICALIZE_FILE_NAME@) # endif _GL_CXXALIASWARN (canonicalize_file_name); #else # if @GNULIB_FREE_POSIX@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined canonicalize_file_name /* For -Wmismatched-dealloc: Associate canonicalize_file_name with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (canonicalize_file_name, char *, (const char *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (canonicalize_file_name, char *, (const char *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK # undef canonicalize_file_name # if HAVE_RAW_DECL_CANONICALIZE_FILE_NAME _GL_WARN_ON_USE (canonicalize_file_name, "canonicalize_file_name is unportable - " "use gnulib module canonicalize-lgpl for portability"); # endif # endif #endif #if @GNULIB_MDA_ECVT@ /* On native Windows, map 'ecvt' to '_ecvt', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::ecvt on all platforms that have it. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ecvt # define ecvt _ecvt # endif _GL_CXXALIAS_MDA (ecvt, char *, (double number, int ndigits, int *decptp, int *signp)); # else # if @HAVE_DECL_ECVT@ _GL_CXXALIAS_SYS (ecvt, char *, (double number, int ndigits, int *decptp, int *signp)); # endif # endif # if (defined _WIN32 && !defined __CYGWIN__) || @HAVE_DECL_ECVT@ _GL_CXXALIASWARN (ecvt); # endif #endif #if @GNULIB_MDA_FCVT@ /* On native Windows, map 'fcvt' to '_fcvt', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::fcvt on all platforms that have it. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fcvt # define fcvt _fcvt # endif _GL_CXXALIAS_MDA (fcvt, char *, (double number, int ndigits, int *decptp, int *signp)); # else # if @HAVE_DECL_FCVT@ _GL_CXXALIAS_SYS (fcvt, char *, (double number, int ndigits, int *decptp, int *signp)); # endif # endif # if (defined _WIN32 && !defined __CYGWIN__) || @HAVE_DECL_FCVT@ _GL_CXXALIASWARN (fcvt); # endif #endif #if @GNULIB_MDA_GCVT@ /* On native Windows, map 'gcvt' to '_gcvt', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::gcvt on all platforms that have it. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef gcvt # define gcvt _gcvt # endif _GL_CXXALIAS_MDA (gcvt, char *, (double number, int ndigits, char *buf)); # else # if @HAVE_DECL_GCVT@ _GL_CXXALIAS_SYS (gcvt, char *, (double number, int ndigits, char *buf)); # endif # endif # if (defined _WIN32 && !defined __CYGWIN__) || @HAVE_DECL_GCVT@ _GL_CXXALIASWARN (gcvt); # endif #endif #if @GNULIB_GETLOADAVG@ /* Store max(NELEM,3) load average numbers in LOADAVG[]. The three numbers are the load average of the last 1 minute, the last 5 minutes, and the last 15 minutes, respectively. LOADAVG is an array of NELEM numbers. */ # if @REPLACE_GETLOADAVG@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getloadavg # define getloadavg rpl_getloadavg # endif _GL_FUNCDECL_RPL (getloadavg, int, (double loadavg[], int nelem), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (getloadavg, int, (double loadavg[], int nelem)); # else # if !@HAVE_DECL_GETLOADAVG@ _GL_FUNCDECL_SYS (getloadavg, int, (double loadavg[], int nelem), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (getloadavg, int, (double loadavg[], int nelem)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getloadavg); # endif #elif defined GNULIB_POSIXCHECK # undef getloadavg # if HAVE_RAW_DECL_GETLOADAVG _GL_WARN_ON_USE (getloadavg, "getloadavg is not portable - " "use gnulib module getloadavg for portability"); # endif #endif #if @GNULIB_GETPROGNAME@ /* Return the base name of the executing program. On native Windows this will usually end in ".exe" or ".EXE". */ # if @REPLACE_GETPROGNAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getprogname # define getprogname rpl_getprogname # endif # if @HAVE_DECL_PROGRAM_INVOCATION_NAME@ _GL_FUNCDECL_RPL (getprogname, const char *, (void), _GL_ATTRIBUTE_PURE); # else _GL_FUNCDECL_RPL (getprogname, const char *, (void)); # endif _GL_CXXALIAS_RPL (getprogname, const char *, (void)); # else # if !@HAVE_GETPROGNAME@ # if @HAVE_DECL_PROGRAM_INVOCATION_NAME@ _GL_FUNCDECL_SYS (getprogname, const char *, (void), _GL_ATTRIBUTE_PURE); # else _GL_FUNCDECL_SYS (getprogname, const char *, (void)); # endif # endif _GL_CXXALIAS_SYS (getprogname, const char *, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getprogname); # endif #elif defined GNULIB_POSIXCHECK # undef getprogname # if HAVE_RAW_DECL_GETPROGNAME _GL_WARN_ON_USE (getprogname, "getprogname is unportable - " "use gnulib module getprogname for portability"); # endif #endif #if @GNULIB_GETSUBOPT@ /* Assuming *OPTIONP is a comma separated list of elements of the form "token" or "token=value", getsubopt parses the first of these elements. If the first element refers to a "token" that is member of the given NULL-terminated array of tokens: - It replaces the comma with a NUL byte, updates *OPTIONP to point past the first option and the comma, sets *VALUEP to the value of the element (or NULL if it doesn't contain an "=" sign), - It returns the index of the "token" in the given array of tokens. Otherwise it returns -1, and *OPTIONP and *VALUEP are undefined. For more details see the POSIX specification. https://pubs.opengroup.org/onlinepubs/9699919799/functions/getsubopt.html */ # if @REPLACE_GETSUBOPT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getsubopt # define getsubopt rpl_getsubopt # endif _GL_FUNCDECL_RPL (getsubopt, int, (char **optionp, char *const *tokens, char **valuep), _GL_ARG_NONNULL ((1, 2, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getsubopt, int, (char **optionp, char *const *tokens, char **valuep)); # else # if !@HAVE_GETSUBOPT@ _GL_FUNCDECL_SYS (getsubopt, int, (char **optionp, char *const *tokens, char **valuep), _GL_ARG_NONNULL ((1, 2, 3)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getsubopt, int, (char **optionp, char *const *tokens, char **valuep)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getsubopt); # endif #elif defined GNULIB_POSIXCHECK # undef getsubopt # if HAVE_RAW_DECL_GETSUBOPT _GL_WARN_ON_USE (getsubopt, "getsubopt is unportable - " "use gnulib module getsubopt for portability"); # endif #endif #if @GNULIB_GRANTPT@ /* Change the ownership and access permission of the slave side of the pseudo-terminal whose master side is specified by FD. */ # if !@HAVE_GRANTPT@ _GL_FUNCDECL_SYS (grantpt, int, (int fd)); # endif _GL_CXXALIAS_SYS (grantpt, int, (int fd)); _GL_CXXALIASWARN (grantpt); #elif defined GNULIB_POSIXCHECK # undef grantpt # if HAVE_RAW_DECL_GRANTPT _GL_WARN_ON_USE (grantpt, "grantpt is not portable - " "use gnulib module grantpt for portability"); # endif #endif /* If _GL_USE_STDLIB_ALLOC is nonzero, the including module does not rely on GNU or POSIX semantics for malloc and realloc (for example, by never specifying a zero size), so it does not need malloc or realloc to be redefined. */ #if @GNULIB_MALLOC_POSIX@ # if (@GNULIB_MALLOC_POSIX@ && @REPLACE_MALLOC_FOR_MALLOC_POSIX@) \ || (@GNULIB_MALLOC_GNU@ && @REPLACE_MALLOC_FOR_MALLOC_GNU@) # if !((defined __cplusplus && defined GNULIB_NAMESPACE) \ || _GL_USE_STDLIB_ALLOC) # undef malloc # define malloc rpl_malloc # endif _GL_FUNCDECL_RPL (malloc, void *, (size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (malloc, void *, (size_t size)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate malloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (malloc, void *, (size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (malloc, void *, (size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (malloc, void *, (size_t size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (malloc); # endif #else # if @GNULIB_FREE_POSIX@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined malloc /* For -Wmismatched-dealloc: Associate malloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (malloc, void *, (size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (malloc, void *, (size_t size), _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK && !_GL_USE_STDLIB_ALLOC # undef malloc /* Assume malloc is always declared. */ _GL_WARN_ON_USE (malloc, "malloc is not POSIX compliant everywhere - " "use gnulib module malloc-posix for portability"); # endif #endif /* Return maximum number of bytes of a multibyte character. */ #if @REPLACE_MB_CUR_MAX@ # if !GNULIB_defined_MB_CUR_MAX static inline int gl_MB_CUR_MAX (void) { /* Turn the value 3 to the value 4, as needed for the UTF-8 encoding. */ return MB_CUR_MAX + (MB_CUR_MAX == 3); } # undef MB_CUR_MAX # define MB_CUR_MAX gl_MB_CUR_MAX () # define GNULIB_defined_MB_CUR_MAX 1 # endif #endif /* Convert a string to a wide string. */ #if @GNULIB_MBSTOWCS@ # if @REPLACE_MBSTOWCS@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mbstowcs # define mbstowcs rpl_mbstowcs # endif _GL_FUNCDECL_RPL (mbstowcs, size_t, (wchar_t *restrict dest, const char *restrict src, size_t len), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (mbstowcs, size_t, (wchar_t *restrict dest, const char *restrict src, size_t len)); # else _GL_CXXALIAS_SYS (mbstowcs, size_t, (wchar_t *restrict dest, const char *restrict src, size_t len)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mbstowcs); # endif #elif defined GNULIB_POSIXCHECK # undef mbstowcs # if HAVE_RAW_DECL_MBSTOWCS _GL_WARN_ON_USE (mbstowcs, "mbstowcs is unportable - " "use gnulib module mbstowcs for portability"); # endif #endif /* Convert a multibyte character to a wide character. */ #if @GNULIB_MBTOWC@ # if @REPLACE_MBTOWC@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mbtowc # define mbtowc rpl_mbtowc # endif _GL_FUNCDECL_RPL (mbtowc, int, (wchar_t *restrict pwc, const char *restrict s, size_t n)); _GL_CXXALIAS_RPL (mbtowc, int, (wchar_t *restrict pwc, const char *restrict s, size_t n)); # else # if !@HAVE_MBTOWC@ _GL_FUNCDECL_SYS (mbtowc, int, (wchar_t *restrict pwc, const char *restrict s, size_t n)); # endif _GL_CXXALIAS_SYS (mbtowc, int, (wchar_t *restrict pwc, const char *restrict s, size_t n)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mbtowc); # endif #elif defined GNULIB_POSIXCHECK # undef mbtowc # if HAVE_RAW_DECL_MBTOWC _GL_WARN_ON_USE (mbtowc, "mbtowc is not portable - " "use gnulib module mbtowc for portability"); # endif #endif #if @GNULIB_MKDTEMP@ /* Create a unique temporary directory from TEMPLATE. The last six characters of TEMPLATE must be "XXXXXX"; they are replaced with a string that makes the directory name unique. Returns TEMPLATE, or a null pointer if it cannot get a unique name. The directory is created mode 700. */ # if !@HAVE_MKDTEMP@ _GL_FUNCDECL_SYS (mkdtemp, char *, (char * /*template*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (mkdtemp, char *, (char * /*template*/)); _GL_CXXALIASWARN (mkdtemp); #elif defined GNULIB_POSIXCHECK # undef mkdtemp # if HAVE_RAW_DECL_MKDTEMP _GL_WARN_ON_USE (mkdtemp, "mkdtemp is unportable - " "use gnulib module mkdtemp for portability"); # endif #endif #if @GNULIB_MKOSTEMP@ /* Create a unique temporary file from TEMPLATE. The last six characters of TEMPLATE must be "XXXXXX"; they are replaced with a string that makes the file name unique. The flags are a bitmask, possibly including O_CLOEXEC (defined in ) and O_TEXT, O_BINARY (defined in "binary-io.h"). The file is then created, with the specified flags, ensuring it didn't exist before. The file is created read-write (mask at least 0600 & ~umask), but it may be world-readable and world-writable (mask 0666 & ~umask), depending on the implementation. Returns the open file descriptor if successful, otherwise -1 and errno set. */ # if @REPLACE_MKOSTEMP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkostemp # define mkostemp rpl_mkostemp # endif _GL_FUNCDECL_RPL (mkostemp, int, (char * /*template*/, int /*flags*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (mkostemp, int, (char * /*template*/, int /*flags*/)); # else # if !@HAVE_MKOSTEMP@ _GL_FUNCDECL_SYS (mkostemp, int, (char * /*template*/, int /*flags*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (mkostemp, int, (char * /*template*/, int /*flags*/)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mkostemp); # endif #elif defined GNULIB_POSIXCHECK # undef mkostemp # if HAVE_RAW_DECL_MKOSTEMP _GL_WARN_ON_USE (mkostemp, "mkostemp is unportable - " "use gnulib module mkostemp for portability"); # endif #endif #if @GNULIB_MKOSTEMPS@ /* Create a unique temporary file from TEMPLATE. The last six characters of TEMPLATE before a suffix of length SUFFIXLEN must be "XXXXXX"; they are replaced with a string that makes the file name unique. The flags are a bitmask, possibly including O_CLOEXEC (defined in ) and O_TEXT, O_BINARY (defined in "binary-io.h"). The file is then created, with the specified flags, ensuring it didn't exist before. The file is created read-write (mask at least 0600 & ~umask), but it may be world-readable and world-writable (mask 0666 & ~umask), depending on the implementation. Returns the open file descriptor if successful, otherwise -1 and errno set. */ # if @REPLACE_MKOSTEMPS@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkostemps # define mkostemps rpl_mkostemps # endif _GL_FUNCDECL_RPL (mkostemps, int, (char * /*template*/, int /*suffixlen*/, int /*flags*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (mkostemps, int, (char * /*template*/, int /*suffixlen*/, int /*flags*/)); # else # if !@HAVE_MKOSTEMPS@ _GL_FUNCDECL_SYS (mkostemps, int, (char * /*template*/, int /*suffixlen*/, int /*flags*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (mkostemps, int, (char * /*template*/, int /*suffixlen*/, int /*flags*/)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mkostemps); # endif #elif defined GNULIB_POSIXCHECK # undef mkostemps # if HAVE_RAW_DECL_MKOSTEMPS _GL_WARN_ON_USE (mkostemps, "mkostemps is unportable - " "use gnulib module mkostemps for portability"); # endif #endif #if @GNULIB_MKSTEMP@ /* Create a unique temporary file from TEMPLATE. The last six characters of TEMPLATE must be "XXXXXX"; they are replaced with a string that makes the file name unique. The file is then created, ensuring it didn't exist before. The file is created read-write (mask at least 0600 & ~umask), but it may be world-readable and world-writable (mask 0666 & ~umask), depending on the implementation. Returns the open file descriptor if successful, otherwise -1 and errno set. */ # if @REPLACE_MKSTEMP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mkstemp rpl_mkstemp # endif _GL_FUNCDECL_RPL (mkstemp, int, (char * /*template*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (mkstemp, int, (char * /*template*/)); # else # if ! @HAVE_MKSTEMP@ _GL_FUNCDECL_SYS (mkstemp, int, (char * /*template*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (mkstemp, int, (char * /*template*/)); # endif _GL_CXXALIASWARN (mkstemp); #elif defined GNULIB_POSIXCHECK # undef mkstemp # if HAVE_RAW_DECL_MKSTEMP _GL_WARN_ON_USE (mkstemp, "mkstemp is unportable - " "use gnulib module mkstemp for portability"); # endif #endif #if @GNULIB_MKSTEMPS@ /* Create a unique temporary file from TEMPLATE. The last six characters of TEMPLATE prior to a suffix of length SUFFIXLEN must be "XXXXXX"; they are replaced with a string that makes the file name unique. The file is then created, ensuring it didn't exist before. The file is created read-write (mask at least 0600 & ~umask), but it may be world-readable and world-writable (mask 0666 & ~umask), depending on the implementation. Returns the open file descriptor if successful, otherwise -1 and errno set. */ # if !@HAVE_MKSTEMPS@ _GL_FUNCDECL_SYS (mkstemps, int, (char * /*template*/, int /*suffixlen*/), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (mkstemps, int, (char * /*template*/, int /*suffixlen*/)); _GL_CXXALIASWARN (mkstemps); #elif defined GNULIB_POSIXCHECK # undef mkstemps # if HAVE_RAW_DECL_MKSTEMPS _GL_WARN_ON_USE (mkstemps, "mkstemps is unportable - " "use gnulib module mkstemps for portability"); # endif #endif #if @GNULIB_MDA_MKTEMP@ /* On native Windows, map 'mktemp' to '_mktemp', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::mktemp always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mktemp # define mktemp _mktemp # endif _GL_CXXALIAS_MDA (mktemp, char *, (char * /*template*/)); # else _GL_CXXALIAS_SYS (mktemp, char *, (char * /*template*/)); # endif _GL_CXXALIASWARN (mktemp); #endif /* Allocate memory with indefinite extent and specified alignment. */ #if @GNULIB_POSIX_MEMALIGN@ # if @REPLACE_POSIX_MEMALIGN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef posix_memalign # define posix_memalign rpl_posix_memalign # endif _GL_FUNCDECL_RPL (posix_memalign, int, (void **memptr, size_t alignment, size_t size), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (posix_memalign, int, (void **memptr, size_t alignment, size_t size)); # else # if @HAVE_POSIX_MEMALIGN@ _GL_CXXALIAS_SYS (posix_memalign, int, (void **memptr, size_t alignment, size_t size)); # endif # endif # if __GLIBC__ >= 2 && @HAVE_POSIX_MEMALIGN@ _GL_CXXALIASWARN (posix_memalign); # endif #elif defined GNULIB_POSIXCHECK # undef posix_memalign # if HAVE_RAW_DECL_POSIX_MEMALIGN _GL_WARN_ON_USE (posix_memalign, "posix_memalign is not portable - " "use gnulib module posix_memalign for portability"); # endif #endif #if @GNULIB_POSIX_OPENPT@ /* Return an FD open to the master side of a pseudo-terminal. Flags should include O_RDWR, and may also include O_NOCTTY. */ # if @REPLACE_POSIX_OPENPT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef posix_openpt # define posix_openpt rpl_posix_openpt # endif _GL_FUNCDECL_RPL (posix_openpt, int, (int flags), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (posix_openpt, int, (int flags)); # else # if !@HAVE_POSIX_OPENPT@ _GL_FUNCDECL_SYS (posix_openpt, int, (int flags), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (posix_openpt, int, (int flags)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (posix_openpt); # endif #elif defined GNULIB_POSIXCHECK # undef posix_openpt # if HAVE_RAW_DECL_POSIX_OPENPT _GL_WARN_ON_USE (posix_openpt, "posix_openpt is not portable - " "use gnulib module posix_openpt for portability"); # endif #endif #if @GNULIB_PTSNAME@ /* Return the pathname of the pseudo-terminal slave associated with the master FD is open on, or NULL on errors. */ # if @REPLACE_PTSNAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ptsname # define ptsname rpl_ptsname # endif _GL_FUNCDECL_RPL (ptsname, char *, (int fd), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (ptsname, char *, (int fd)); # else # if !@HAVE_PTSNAME@ _GL_FUNCDECL_SYS (ptsname, char *, (int fd), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (ptsname, char *, (int fd)); # endif _GL_CXXALIASWARN (ptsname); #elif defined GNULIB_POSIXCHECK # undef ptsname # if HAVE_RAW_DECL_PTSNAME _GL_WARN_ON_USE (ptsname, "ptsname is not portable - " "use gnulib module ptsname for portability"); # endif #endif #if @GNULIB_PTSNAME_R@ /* Set the pathname of the pseudo-terminal slave associated with the master FD is open on and return 0, or set errno and return non-zero on errors. */ # if @REPLACE_PTSNAME_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ptsname_r # define ptsname_r rpl_ptsname_r # endif _GL_FUNCDECL_RPL (ptsname_r, int, (int fd, char *buf, size_t len)); _GL_CXXALIAS_RPL (ptsname_r, int, (int fd, char *buf, size_t len)); # else # if !@HAVE_PTSNAME_R@ _GL_FUNCDECL_SYS (ptsname_r, int, (int fd, char *buf, size_t len)); # endif _GL_CXXALIAS_SYS (ptsname_r, int, (int fd, char *buf, size_t len)); # endif # ifndef GNULIB_defined_ptsname_r # define GNULIB_defined_ptsname_r (!@HAVE_PTSNAME_R@ || @REPLACE_PTSNAME_R@) # endif _GL_CXXALIASWARN (ptsname_r); #elif defined GNULIB_POSIXCHECK # undef ptsname_r # if HAVE_RAW_DECL_PTSNAME_R _GL_WARN_ON_USE (ptsname_r, "ptsname_r is not portable - " "use gnulib module ptsname_r for portability"); # endif #endif #if @GNULIB_PUTENV@ # if @REPLACE_PUTENV@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putenv # define putenv rpl_putenv # endif _GL_FUNCDECL_RPL (putenv, int, (char *string), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (putenv, int, (char *string)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putenv # define putenv _putenv # endif _GL_CXXALIAS_MDA (putenv, int, (char *string)); # elif defined __KLIBC__ /* Need to cast, because on OS/2 kLIBC, the first parameter is const char *string. */ _GL_CXXALIAS_SYS_CAST (putenv, int, (char *string)); # else _GL_CXXALIAS_SYS (putenv, int, (char *string)); # endif _GL_CXXALIASWARN (putenv); #elif @GNULIB_MDA_PUTENV@ /* On native Windows, map 'putenv' to '_putenv', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::putenv always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef putenv # define putenv _putenv # endif /* Need to cast, because on mingw, the parameter is either 'const char *string' or 'char *string'. */ _GL_CXXALIAS_MDA_CAST (putenv, int, (char *string)); # elif defined __KLIBC__ /* Need to cast, because on OS/2 kLIBC, the first parameter is const char *string. */ _GL_CXXALIAS_SYS_CAST (putenv, int, (char *string)); # else _GL_CXXALIAS_SYS (putenv, int, (char *string)); # endif _GL_CXXALIASWARN (putenv); #endif #if @GNULIB_QSORT_R@ /* Sort an array of NMEMB elements, starting at address BASE, each element occupying SIZE bytes, in ascending order according to the comparison function COMPARE. */ # ifdef __cplusplus extern "C" { # endif # if !GNULIB_defined_qsort_r_fn_types typedef int (*_gl_qsort_r_compar_fn) (void const *, void const *, void *); # define GNULIB_defined_qsort_r_fn_types 1 # endif # ifdef __cplusplus } # endif # if @REPLACE_QSORT_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef qsort_r # define qsort_r rpl_qsort_r # endif _GL_FUNCDECL_RPL (qsort_r, void, (void *base, size_t nmemb, size_t size, _gl_qsort_r_compar_fn compare, void *arg), _GL_ARG_NONNULL ((1, 4))); _GL_CXXALIAS_RPL (qsort_r, void, (void *base, size_t nmemb, size_t size, _gl_qsort_r_compar_fn compare, void *arg)); # else # if !@HAVE_QSORT_R@ _GL_FUNCDECL_SYS (qsort_r, void, (void *base, size_t nmemb, size_t size, _gl_qsort_r_compar_fn compare, void *arg), _GL_ARG_NONNULL ((1, 4))); # endif _GL_CXXALIAS_SYS (qsort_r, void, (void *base, size_t nmemb, size_t size, _gl_qsort_r_compar_fn compare, void *arg)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (qsort_r); # endif #elif defined GNULIB_POSIXCHECK # undef qsort_r # if HAVE_RAW_DECL_QSORT_R _GL_WARN_ON_USE (qsort_r, "qsort_r is not portable - " "use gnulib module qsort_r for portability"); # endif #endif #if @GNULIB_RAND@ || (@GNULIB_RANDOM_R@ && !@HAVE_RANDOM_R@) # ifndef RAND_MAX # define RAND_MAX 2147483647 # endif #endif #if @GNULIB_RAND@ # if @REPLACE_RAND@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef rand # define rand rpl_rand # endif _GL_FUNCDECL_RPL (rand, int, (void)); _GL_CXXALIAS_RPL (rand, int, (void)); # else _GL_CXXALIAS_SYS (rand, int, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (rand); # endif #endif #if @GNULIB_RANDOM@ # if @REPLACE_RANDOM@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef random # define random rpl_random # endif _GL_FUNCDECL_RPL (random, long, (void)); _GL_CXXALIAS_RPL (random, long, (void)); # else # if !@HAVE_RANDOM@ _GL_FUNCDECL_SYS (random, long, (void)); # endif /* Need to cast, because on Haiku, the return type is int. */ _GL_CXXALIAS_SYS_CAST (random, long, (void)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (random); # endif #elif defined GNULIB_POSIXCHECK # undef random # if HAVE_RAW_DECL_RANDOM _GL_WARN_ON_USE (random, "random is unportable - " "use gnulib module random for portability"); # endif #endif #if @GNULIB_RANDOM@ # if @REPLACE_RANDOM@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef srandom # define srandom rpl_srandom # endif _GL_FUNCDECL_RPL (srandom, void, (unsigned int seed)); _GL_CXXALIAS_RPL (srandom, void, (unsigned int seed)); # else # if !@HAVE_RANDOM@ _GL_FUNCDECL_SYS (srandom, void, (unsigned int seed)); # endif /* Need to cast, because on FreeBSD, the first parameter is unsigned long seed. */ _GL_CXXALIAS_SYS_CAST (srandom, void, (unsigned int seed)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (srandom); # endif #elif defined GNULIB_POSIXCHECK # undef srandom # if HAVE_RAW_DECL_SRANDOM _GL_WARN_ON_USE (srandom, "srandom is unportable - " "use gnulib module random for portability"); # endif #endif #if @GNULIB_RANDOM@ # if @REPLACE_INITSTATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef initstate # define initstate rpl_initstate # endif _GL_FUNCDECL_RPL (initstate, char *, (unsigned int seed, char *buf, size_t buf_size), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (initstate, char *, (unsigned int seed, char *buf, size_t buf_size)); # else # if !@HAVE_INITSTATE@ || !@HAVE_DECL_INITSTATE@ _GL_FUNCDECL_SYS (initstate, char *, (unsigned int seed, char *buf, size_t buf_size), _GL_ARG_NONNULL ((2))); # endif /* Need to cast, because on FreeBSD, the first parameter is unsigned long seed. */ _GL_CXXALIAS_SYS_CAST (initstate, char *, (unsigned int seed, char *buf, size_t buf_size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (initstate); # endif #elif defined GNULIB_POSIXCHECK # undef initstate # if HAVE_RAW_DECL_INITSTATE _GL_WARN_ON_USE (initstate, "initstate is unportable - " "use gnulib module random for portability"); # endif #endif #if @GNULIB_RANDOM@ # if @REPLACE_SETSTATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef setstate # define setstate rpl_setstate # endif _GL_FUNCDECL_RPL (setstate, char *, (char *arg_state), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (setstate, char *, (char *arg_state)); # else # if !@HAVE_SETSTATE@ || !@HAVE_DECL_SETSTATE@ _GL_FUNCDECL_SYS (setstate, char *, (char *arg_state), _GL_ARG_NONNULL ((1))); # endif /* Need to cast, because on Mac OS X 10.13, HP-UX, Solaris the first parameter is const char *arg_state. */ _GL_CXXALIAS_SYS_CAST (setstate, char *, (char *arg_state)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (setstate); # endif #elif defined GNULIB_POSIXCHECK # undef setstate # if HAVE_RAW_DECL_SETSTATE _GL_WARN_ON_USE (setstate, "setstate is unportable - " "use gnulib module random for portability"); # endif #endif #if @GNULIB_RANDOM_R@ # if @REPLACE_RANDOM_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef random_r # define random_r rpl_random_r # endif _GL_FUNCDECL_RPL (random_r, int, (struct random_data *buf, int32_t *result), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (random_r, int, (struct random_data *buf, int32_t *result)); # else # if !@HAVE_RANDOM_R@ _GL_FUNCDECL_SYS (random_r, int, (struct random_data *buf, int32_t *result), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (random_r, int, (struct random_data *buf, int32_t *result)); # endif _GL_CXXALIASWARN (random_r); #elif defined GNULIB_POSIXCHECK # undef random_r # if HAVE_RAW_DECL_RANDOM_R _GL_WARN_ON_USE (random_r, "random_r is unportable - " "use gnulib module random_r for portability"); # endif #endif #if @GNULIB_RANDOM_R@ # if @REPLACE_RANDOM_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef srandom_r # define srandom_r rpl_srandom_r # endif _GL_FUNCDECL_RPL (srandom_r, int, (unsigned int seed, struct random_data *rand_state), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (srandom_r, int, (unsigned int seed, struct random_data *rand_state)); # else # if !@HAVE_RANDOM_R@ _GL_FUNCDECL_SYS (srandom_r, int, (unsigned int seed, struct random_data *rand_state), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (srandom_r, int, (unsigned int seed, struct random_data *rand_state)); # endif _GL_CXXALIASWARN (srandom_r); #elif defined GNULIB_POSIXCHECK # undef srandom_r # if HAVE_RAW_DECL_SRANDOM_R _GL_WARN_ON_USE (srandom_r, "srandom_r is unportable - " "use gnulib module random_r for portability"); # endif #endif #if @GNULIB_RANDOM_R@ # if @REPLACE_RANDOM_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef initstate_r # define initstate_r rpl_initstate_r # endif _GL_FUNCDECL_RPL (initstate_r, int, (unsigned int seed, char *buf, size_t buf_size, struct random_data *rand_state), _GL_ARG_NONNULL ((2, 4))); _GL_CXXALIAS_RPL (initstate_r, int, (unsigned int seed, char *buf, size_t buf_size, struct random_data *rand_state)); # else # if !@HAVE_RANDOM_R@ _GL_FUNCDECL_SYS (initstate_r, int, (unsigned int seed, char *buf, size_t buf_size, struct random_data *rand_state), _GL_ARG_NONNULL ((2, 4))); # endif /* Need to cast, because on Haiku, the third parameter is unsigned long buf_size. */ _GL_CXXALIAS_SYS_CAST (initstate_r, int, (unsigned int seed, char *buf, size_t buf_size, struct random_data *rand_state)); # endif _GL_CXXALIASWARN (initstate_r); #elif defined GNULIB_POSIXCHECK # undef initstate_r # if HAVE_RAW_DECL_INITSTATE_R _GL_WARN_ON_USE (initstate_r, "initstate_r is unportable - " "use gnulib module random_r for portability"); # endif #endif #if @GNULIB_RANDOM_R@ # if @REPLACE_RANDOM_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef setstate_r # define setstate_r rpl_setstate_r # endif _GL_FUNCDECL_RPL (setstate_r, int, (char *arg_state, struct random_data *rand_state), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (setstate_r, int, (char *arg_state, struct random_data *rand_state)); # else # if !@HAVE_RANDOM_R@ _GL_FUNCDECL_SYS (setstate_r, int, (char *arg_state, struct random_data *rand_state), _GL_ARG_NONNULL ((1, 2))); # endif /* Need to cast, because on Haiku, the first parameter is void *arg_state. */ _GL_CXXALIAS_SYS_CAST (setstate_r, int, (char *arg_state, struct random_data *rand_state)); # endif _GL_CXXALIASWARN (setstate_r); #elif defined GNULIB_POSIXCHECK # undef setstate_r # if HAVE_RAW_DECL_SETSTATE_R _GL_WARN_ON_USE (setstate_r, "setstate_r is unportable - " "use gnulib module random_r for portability"); # endif #endif #if @GNULIB_REALLOC_POSIX@ # if (@GNULIB_REALLOC_POSIX@ && @REPLACE_REALLOC_FOR_REALLOC_POSIX@) \ || (@GNULIB_REALLOC_GNU@ && @REPLACE_REALLOC_FOR_REALLOC_GNU@) # if !((defined __cplusplus && defined GNULIB_NAMESPACE) \ || _GL_USE_STDLIB_ALLOC) # undef realloc # define realloc rpl_realloc # endif _GL_FUNCDECL_RPL (realloc, void *, (void *ptr, size_t size), _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (realloc, void *, (void *ptr, size_t size)); # else # if __GNUC__ >= 11 && !defined __clang__ /* For -Wmismatched-dealloc: Associate realloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (realloc, void *, (void *ptr, size_t size), _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (realloc, void *, (void *ptr, size_t size), _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_NODISCARD); # endif # endif _GL_CXXALIAS_SYS (realloc, void *, (void *ptr, size_t size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (realloc); # endif #else # if @GNULIB_FREE_POSIX@ \ && (__GNUC__ >= 11 && !defined __clang__) && !defined realloc /* For -Wmismatched-dealloc: Associate realloc with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2 _GL_FUNCDECL_SYS (realloc, void *, (void *ptr, size_t size), _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (realloc, void *, (void *ptr, size_t size), _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK && !_GL_USE_STDLIB_ALLOC # undef realloc /* Assume realloc is always declared. */ _GL_WARN_ON_USE (realloc, "realloc is not POSIX compliant everywhere - " "use gnulib module realloc-posix for portability"); # endif #endif #if @GNULIB_REALLOCARRAY@ # if @REPLACE_REALLOCARRAY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef reallocarray # define reallocarray rpl_reallocarray # endif _GL_FUNCDECL_RPL (reallocarray, void *, (void *ptr, size_t nmemb, size_t size), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (reallocarray, void *, (void *ptr, size_t nmemb, size_t size)); # else # if ! @HAVE_REALLOCARRAY@ _GL_FUNCDECL_SYS (reallocarray, void *, (void *ptr, size_t nmemb, size_t size), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (reallocarray, void *, (void *ptr, size_t nmemb, size_t size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (reallocarray); # endif #elif defined GNULIB_POSIXCHECK # undef reallocarray # if HAVE_RAW_DECL_REALLOCARRAY _GL_WARN_ON_USE (reallocarray, "reallocarray is not portable - " "use gnulib module reallocarray for portability"); # endif #endif #if @GNULIB_REALPATH@ # if @REPLACE_REALPATH@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define realpath rpl_realpath # endif _GL_FUNCDECL_RPL (realpath, char *, (const char *restrict name, char *restrict resolved), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (realpath, char *, (const char *restrict name, char *restrict resolved)); # else # if !@HAVE_REALPATH@ _GL_FUNCDECL_SYS (realpath, char *, (const char *restrict name, char *restrict resolved), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (realpath, char *, (const char *restrict name, char *restrict resolved)); # endif _GL_CXXALIASWARN (realpath); #elif defined GNULIB_POSIXCHECK # undef realpath # if HAVE_RAW_DECL_REALPATH _GL_WARN_ON_USE (realpath, "realpath is unportable - use gnulib module " "canonicalize or canonicalize-lgpl for portability"); # endif #endif #if @GNULIB_RPMATCH@ /* Test a user response to a question. Return 1 if it is affirmative, 0 if it is negative, or -1 if not clear. */ # if !@HAVE_RPMATCH@ _GL_FUNCDECL_SYS (rpmatch, int, (const char *response), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (rpmatch, int, (const char *response)); _GL_CXXALIASWARN (rpmatch); #elif defined GNULIB_POSIXCHECK # undef rpmatch # if HAVE_RAW_DECL_RPMATCH _GL_WARN_ON_USE (rpmatch, "rpmatch is unportable - " "use gnulib module rpmatch for portability"); # endif #endif #if @GNULIB_SECURE_GETENV@ /* Look up NAME in the environment, returning 0 in insecure situations. */ # if !@HAVE_SECURE_GETENV@ _GL_FUNCDECL_SYS (secure_getenv, char *, (char const *name), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (secure_getenv, char *, (char const *name)); _GL_CXXALIASWARN (secure_getenv); #elif defined GNULIB_POSIXCHECK # undef secure_getenv # if HAVE_RAW_DECL_SECURE_GETENV _GL_WARN_ON_USE (secure_getenv, "secure_getenv is unportable - " "use gnulib module secure_getenv for portability"); # endif #endif #if @GNULIB_SETENV@ /* Set NAME to VALUE in the environment. If REPLACE is nonzero, overwrite an existing value. */ # if @REPLACE_SETENV@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef setenv # define setenv rpl_setenv # endif _GL_FUNCDECL_RPL (setenv, int, (const char *name, const char *value, int replace), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (setenv, int, (const char *name, const char *value, int replace)); # else # if !@HAVE_DECL_SETENV@ _GL_FUNCDECL_SYS (setenv, int, (const char *name, const char *value, int replace), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (setenv, int, (const char *name, const char *value, int replace)); # endif # if !(@REPLACE_SETENV@ && !@HAVE_DECL_SETENV@) _GL_CXXALIASWARN (setenv); # endif #elif defined GNULIB_POSIXCHECK # undef setenv # if HAVE_RAW_DECL_SETENV _GL_WARN_ON_USE (setenv, "setenv is unportable - " "use gnulib module setenv for portability"); # endif #endif #if @GNULIB_STACK_TRACE@ /* Prints a stack trace of the current thread to standard error, if possible. */ # if @CAN_PRINT_STACK_TRACE@ _GL_EXTERN_C void print_stack_trace (void); # else # if !GNULIB_defined_print_stack_trace # define print_stack_trace() /* nothing */ # define GNULIB_defined_print_stack_trace 1 # endif # endif #endif #if @GNULIB_STRTOD@ /* Parse a double from STRING, updating ENDP if appropriate. */ # if @REPLACE_STRTOD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtod rpl_strtod # endif # define GNULIB_defined_strtod_function 1 _GL_FUNCDECL_RPL (strtod, double, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtod, double, (const char *restrict str, char **restrict endp)); # else # if !@HAVE_STRTOD@ _GL_FUNCDECL_SYS (strtod, double, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtod, double, (const char *restrict str, char **restrict endp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strtod); # endif #elif defined GNULIB_POSIXCHECK # undef strtod # if HAVE_RAW_DECL_STRTOD _GL_WARN_ON_USE (strtod, "strtod is unportable - " "use gnulib module strtod for portability"); # endif #endif #if @GNULIB_STRTOF@ /* Parse a float from STRING, updating ENDP if appropriate. */ # if @REPLACE_STRTOF@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtof rpl_strtof # endif # define GNULIB_defined_strtof_function 1 _GL_FUNCDECL_RPL (strtof, float, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtof, float, (const char *restrict str, char **restrict endp)); # else # if !@HAVE_STRTOF@ _GL_FUNCDECL_SYS (strtof, float, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtof, float, (const char *restrict str, char **restrict endp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strtof); # endif #elif defined GNULIB_POSIXCHECK # undef strtof # if HAVE_RAW_DECL_STRTOF _GL_WARN_ON_USE (strtof, "strtof is unportable - " "use gnulib module strtof for portability"); # endif #endif #if @GNULIB_STRTOLD@ /* Parse a 'long double' from STRING, updating ENDP if appropriate. */ # if @REPLACE_STRTOLD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtold rpl_strtold # endif # define GNULIB_defined_strtold_function 1 _GL_FUNCDECL_RPL (strtold, long double, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtold, long double, (const char *restrict str, char **restrict endp)); # else # if !@HAVE_STRTOLD@ _GL_FUNCDECL_SYS (strtold, long double, (const char *restrict str, char **restrict endp), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtold, long double, (const char *restrict str, char **restrict endp)); # endif _GL_CXXALIASWARN (strtold); #elif defined GNULIB_POSIXCHECK # undef strtold # if HAVE_RAW_DECL_STRTOLD _GL_WARN_ON_USE (strtold, "strtold is unportable - " "use gnulib module strtold for portability"); # endif #endif #if @GNULIB_STRTOL@ /* Parse a signed integer whose textual representation starts at STRING. The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, it may be decimal or octal (with prefix "0") or hexadecimal (with prefix "0x"). If ENDPTR is not NULL, the address of the first byte after the integer is stored in *ENDPTR. Upon overflow, the return value is LONG_MAX or LONG_MIN, and errno is set to ERANGE. */ # if @REPLACE_STRTOL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtol rpl_strtol # endif # define GNULIB_defined_strtol_function 1 _GL_FUNCDECL_RPL (strtol, long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtol, long, (const char *restrict string, char **restrict endptr, int base)); # else # if !@HAVE_STRTOL@ _GL_FUNCDECL_SYS (strtol, long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtol, long, (const char *restrict string, char **restrict endptr, int base)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strtol); # endif #elif defined GNULIB_POSIXCHECK # undef strtol # if HAVE_RAW_DECL_STRTOL _GL_WARN_ON_USE (strtol, "strtol is unportable - " "use gnulib module strtol for portability"); # endif #endif #if @GNULIB_STRTOLL@ /* Parse a signed integer whose textual representation starts at STRING. The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, it may be decimal or octal (with prefix "0") or hexadecimal (with prefix "0x"). If ENDPTR is not NULL, the address of the first byte after the integer is stored in *ENDPTR. Upon overflow, the return value is LLONG_MAX or LLONG_MIN, and errno is set to ERANGE. */ # if @REPLACE_STRTOLL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtoll rpl_strtoll # endif # define GNULIB_defined_strtoll_function 1 _GL_FUNCDECL_RPL (strtoll, long long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtoll, long long, (const char *restrict string, char **restrict endptr, int base)); # else # if !@HAVE_STRTOLL@ _GL_FUNCDECL_SYS (strtoll, long long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtoll, long long, (const char *restrict string, char **restrict endptr, int base)); # endif _GL_CXXALIASWARN (strtoll); #elif defined GNULIB_POSIXCHECK # undef strtoll # if HAVE_RAW_DECL_STRTOLL _GL_WARN_ON_USE (strtoll, "strtoll is unportable - " "use gnulib module strtoll for portability"); # endif #endif #if @GNULIB_STRTOUL@ /* Parse an unsigned integer whose textual representation starts at STRING. The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, it may be decimal or octal (with prefix "0") or hexadecimal (with prefix "0x"). If ENDPTR is not NULL, the address of the first byte after the integer is stored in *ENDPTR. Upon overflow, the return value is ULONG_MAX, and errno is set to ERANGE. */ # if @REPLACE_STRTOUL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtoul rpl_strtoul # endif # define GNULIB_defined_strtoul_function 1 _GL_FUNCDECL_RPL (strtoul, unsigned long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtoul, unsigned long, (const char *restrict string, char **restrict endptr, int base)); # else # if !@HAVE_STRTOUL@ _GL_FUNCDECL_SYS (strtoul, unsigned long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtoul, unsigned long, (const char *restrict string, char **restrict endptr, int base)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strtoul); # endif #elif defined GNULIB_POSIXCHECK # undef strtoul # if HAVE_RAW_DECL_STRTOUL _GL_WARN_ON_USE (strtoul, "strtoul is unportable - " "use gnulib module strtoul for portability"); # endif #endif #if @GNULIB_STRTOULL@ /* Parse an unsigned integer whose textual representation starts at STRING. The integer is expected to be in base BASE (2 <= BASE <= 36); if BASE == 0, it may be decimal or octal (with prefix "0") or hexadecimal (with prefix "0x"). If ENDPTR is not NULL, the address of the first byte after the integer is stored in *ENDPTR. Upon overflow, the return value is ULLONG_MAX, and errno is set to ERANGE. */ # if @REPLACE_STRTOULL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strtoull rpl_strtoull # endif # define GNULIB_defined_strtoull_function 1 _GL_FUNCDECL_RPL (strtoull, unsigned long long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strtoull, unsigned long long, (const char *restrict string, char **restrict endptr, int base)); # else # if !@HAVE_STRTOULL@ _GL_FUNCDECL_SYS (strtoull, unsigned long long, (const char *restrict string, char **restrict endptr, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strtoull, unsigned long long, (const char *restrict string, char **restrict endptr, int base)); # endif _GL_CXXALIASWARN (strtoull); #elif defined GNULIB_POSIXCHECK # undef strtoull # if HAVE_RAW_DECL_STRTOULL _GL_WARN_ON_USE (strtoull, "strtoull is unportable - " "use gnulib module strtoull for portability"); # endif #endif #if @GNULIB_UNLOCKPT@ /* Unlock the slave side of the pseudo-terminal whose master side is specified by FD, so that it can be opened. */ # if !@HAVE_UNLOCKPT@ _GL_FUNCDECL_SYS (unlockpt, int, (int fd)); # endif _GL_CXXALIAS_SYS (unlockpt, int, (int fd)); _GL_CXXALIASWARN (unlockpt); #elif defined GNULIB_POSIXCHECK # undef unlockpt # if HAVE_RAW_DECL_UNLOCKPT _GL_WARN_ON_USE (unlockpt, "unlockpt is not portable - " "use gnulib module unlockpt for portability"); # endif #endif #if @GNULIB_UNSETENV@ /* Remove the variable NAME from the environment. */ # if @REPLACE_UNSETENV@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef unsetenv # define unsetenv rpl_unsetenv # endif _GL_FUNCDECL_RPL (unsetenv, int, (const char *name), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (unsetenv, int, (const char *name)); # else # if !@HAVE_DECL_UNSETENV@ _GL_FUNCDECL_SYS (unsetenv, int, (const char *name), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (unsetenv, int, (const char *name)); # endif # if !(@REPLACE_UNSETENV@ && !@HAVE_DECL_UNSETENV@) _GL_CXXALIASWARN (unsetenv); # endif #elif defined GNULIB_POSIXCHECK # undef unsetenv # if HAVE_RAW_DECL_UNSETENV _GL_WARN_ON_USE (unsetenv, "unsetenv is unportable - " "use gnulib module unsetenv for portability"); # endif #endif /* Convert a wide character to a multibyte character. */ #if @GNULIB_WCTOMB@ # if @REPLACE_WCTOMB@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef wctomb # define wctomb rpl_wctomb # endif _GL_FUNCDECL_RPL (wctomb, int, (char *s, wchar_t wc)); _GL_CXXALIAS_RPL (wctomb, int, (char *s, wchar_t wc)); # else _GL_CXXALIAS_SYS (wctomb, int, (char *s, wchar_t wc)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (wctomb); # endif #endif #endif /* _@GUARD_PREFIX@_STDLIB_H */ #endif /* _@GUARD_PREFIX@_STDLIB_H */ #endif libffcall-2.5/gnulib-lib/stat-time.c0000664000000000000000000000152014631432055014267 00000000000000/* stat-related time functions. Copyright (C) 2012-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #define _GL_STAT_TIME_INLINE _GL_EXTERN_INLINE #include "stat-time.h" libffcall-2.5/gnulib-lib/fd-hook.h0000664000000000000000000001136414631432055013723 00000000000000/* Hook for making file descriptor functions close(), ioctl() extensible. Copyright (C) 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef FD_HOOK_H #define FD_HOOK_H #ifdef __cplusplus extern "C" { #endif /* Currently, this entire code is only needed for the handling of sockets on native Windows platforms. */ #if WINDOWS_SOCKETS /* Type of function that closes FD. */ typedef int (*gl_close_fn) (int fd); /* Type of function that applies a control request to FD. */ typedef int (*gl_ioctl_fn) (int fd, int request, void *arg); /* An element of the list of file descriptor hooks. In CLOS (Common Lisp Object System) speak, it consists of an "around" method for the close() function and an "around" method for the ioctl() function. The fields of this structure are considered private. */ struct fd_hook { /* Doubly linked list. */ struct fd_hook *private_next; struct fd_hook *private_prev; /* Function that treats the types of FD that it knows about and calls execute_close_hooks (REMAINING_LIST, PRIMARY, FD) as a fallback. */ int (*private_close_fn) (const struct fd_hook *remaining_list, gl_close_fn primary, int fd); /* Function that treats the types of FD that it knows about and calls execute_ioctl_hooks (REMAINING_LIST, PRIMARY, FD, REQUEST, ARG) as a fallback. */ int (*private_ioctl_fn) (const struct fd_hook *remaining_list, gl_ioctl_fn primary, int fd, int request, void *arg); }; /* This type of function closes FD, applying special knowledge for the FD types it knows about, and calls execute_close_hooks (REMAINING_LIST, PRIMARY, FD) for the other FD types. In CLOS speak, REMAINING_LIST is the remaining list of "around" methods, and PRIMARY is the "primary" method for close(). */ typedef int (*close_hook_fn) (const struct fd_hook *remaining_list, gl_close_fn primary, int fd); /* Execute the close hooks in REMAINING_LIST, with PRIMARY as "primary" method. Return 0 or -1, like close() would do. */ extern int execute_close_hooks (const struct fd_hook *remaining_list, gl_close_fn primary, int fd); /* Execute all close hooks, with PRIMARY as "primary" method. Return 0 or -1, like close() would do. */ extern int execute_all_close_hooks (gl_close_fn primary, int fd); /* This type of function applies a control request to FD, applying special knowledge for the FD types it knows about, and calls execute_ioctl_hooks (REMAINING_LIST, PRIMARY, FD, REQUEST, ARG) for the other FD types. In CLOS speak, REMAINING_LIST is the remaining list of "around" methods, and PRIMARY is the "primary" method for ioctl(). */ typedef int (*ioctl_hook_fn) (const struct fd_hook *remaining_list, gl_ioctl_fn primary, int fd, int request, void *arg); /* Execute the ioctl hooks in REMAINING_LIST, with PRIMARY as "primary" method. Return 0 or -1, like ioctl() would do. */ extern int execute_ioctl_hooks (const struct fd_hook *remaining_list, gl_ioctl_fn primary, int fd, int request, void *arg); /* Execute all ioctl hooks, with PRIMARY as "primary" method. Return 0 or -1, like ioctl() would do. */ extern int execute_all_ioctl_hooks (gl_ioctl_fn primary, int fd, int request, void *arg); /* Add a function pair to the list of file descriptor hooks. CLOSE_HOOK and IOCTL_HOOK may be NULL, indicating no change. The LINK variable points to a piece of memory which is guaranteed to be accessible until the corresponding call to unregister_fd_hook. */ extern void register_fd_hook (close_hook_fn close_hook, ioctl_hook_fn ioctl_hook, struct fd_hook *link); /* Removes a hook from the list of file descriptor hooks. */ extern void unregister_fd_hook (struct fd_hook *link); #endif #ifdef __cplusplus } #endif #endif /* FD_HOOK_H */ libffcall-2.5/gnulib-lib/time.in.h0000664000000000000000000005244614657156076013763 00000000000000/* A more-standard . Copyright (C) 2007-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* This file uses #include_next of a system file that defines time_t. For the 'year2038' module to work right, needs to have been included before. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Don't get in the way of glibc when it includes time.h merely to declare a few standard symbols, rather than to declare all the symbols. (However, skip this for MinGW as it treats __need_time_t incompatibly.) Also, Solaris 8 eventually includes itself recursively; if that is happening, just include the system without adding our own declarations. */ #if (((defined __need_time_t || defined __need_clock_t \ || defined __need_timespec) \ && !defined __MINGW32__) \ || defined _@GUARD_PREFIX@_TIME_H) # @INCLUDE_NEXT@ @NEXT_TIME_H@ #else # define _@GUARD_PREFIX@_TIME_H /* mingw's provides the functions asctime_r, ctime_r, gmtime_r, localtime_r only if or has been included before. */ # if defined __MINGW32__ # include # endif # @INCLUDE_NEXT@ @NEXT_TIME_H@ /* This file uses _GL_ATTRIBUTE_DEPRECATED, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ # if !_GL_CONFIG_H_INCLUDED # error "Please include config.h first." # endif /* NetBSD 5.0 mis-defines NULL. */ # include /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Some systems don't define struct timespec (e.g., AIX 4.1). Or they define it with the wrong member names or define it in (e.g., FreeBSD circa 1997). Stock Mingw prior to 3.0 does not define it, but the pthreads-win32 library defines it in . */ # if ! @TIME_H_DEFINES_STRUCT_TIMESPEC@ # if @SYS_TIME_H_DEFINES_STRUCT_TIMESPEC@ # include # elif @PTHREAD_H_DEFINES_STRUCT_TIMESPEC@ # include # elif @UNISTD_H_DEFINES_STRUCT_TIMESPEC@ # include # else # ifdef __cplusplus extern "C" { # endif # if !GNULIB_defined_struct_timespec # undef timespec # define timespec rpl_timespec struct timespec { time_t tv_sec; long int tv_nsec; }; # define GNULIB_defined_struct_timespec 1 # endif # ifdef __cplusplus } # endif # endif # endif # if !GNULIB_defined_struct_time_t_must_be_integral /* https://pubs.opengroup.org/onlinepubs/9699919799/basedefs/sys_types.h.html requires time_t to be an integer type, even though C99 permits floating point. We don't know of any implementation that uses floating point, and it is much easier to write code that doesn't have to worry about that corner case, so we force the issue. */ struct __time_t_must_be_integral { unsigned int __floating_time_t_unsupported : (time_t) 1; }; # define GNULIB_defined_struct_time_t_must_be_integral 1 # endif /* Define TIME_UTC, a positive integer constant used for timespec_get(). */ # if ! @TIME_H_DEFINES_TIME_UTC@ # if !GNULIB_defined_TIME_UTC # define TIME_UTC 1 # define GNULIB_defined_TIME_UTC 1 # endif # endif # if @GNULIB_TZNAME@ /* tzname[0..1]: Abbreviated time zone names, set by the tzset() function. */ # if NEED_DECL_TZNAME extern # ifdef __cplusplus "C" # endif char *tzname[]; # endif # if defined _WIN32 && !defined __CYGWIN__ /* On native Windows, map 'tzname' to '_tzname' etc., so that -loldnames is not required. */ # undef tzname # define tzname _tzname # endif # endif /* Set *TS to the current time, and return BASE. Upon failure, return 0. */ # if @GNULIB_TIMESPEC_GET@ # if @REPLACE_TIMESPEC_GET@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef timespec_get # define timespec_get rpl_timespec_get # endif _GL_FUNCDECL_RPL (timespec_get, int, (struct timespec *ts, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (timespec_get, int, (struct timespec *ts, int base)); # else # if !@HAVE_TIMESPEC_GET@ _GL_FUNCDECL_SYS (timespec_get, int, (struct timespec *ts, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (timespec_get, int, (struct timespec *ts, int base)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (timespec_get); # endif # elif defined GNULIB_POSIXCHECK # undef timespec_get # if HAVE_RAW_DECL_TIMESPEC_GET _GL_WARN_ON_USE (timespec_get, "timespec_get is unportable - " "use gnulib module timespec_get for portability"); # endif # endif /* Set *TS to the current time resolution, and return BASE. Upon failure, return 0. */ # if @GNULIB_TIMESPEC_GETRES@ # if @REPLACE_TIMESPEC_GETRES@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef timespec_getres # define timespec_getres rpl_timespec_getres # endif _GL_FUNCDECL_RPL (timespec_getres, int, (struct timespec *ts, int base), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (timespec_getres, int, (struct timespec *ts, int base)); # else # if !@HAVE_TIMESPEC_GETRES@ _GL_FUNCDECL_SYS (timespec_getres, int, (struct timespec *ts, int base), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (timespec_getres, int, (struct timespec *ts, int base)); # endif _GL_CXXALIASWARN (timespec_getres); # elif defined GNULIB_POSIXCHECK # undef timespec_getres # if HAVE_RAW_DECL_TIMESPEC_GETRES _GL_WARN_ON_USE (timespec_getres, "timespec_getres is unportable - " "use gnulib module timespec_getres for portability"); # endif # endif /* Return the number of seconds that have elapsed since the Epoch. */ # if @GNULIB_TIME@ # if @REPLACE_TIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define time rpl_time # endif _GL_FUNCDECL_RPL (time, time_t, (time_t *__tp)); _GL_CXXALIAS_RPL (time, time_t, (time_t *__tp)); # else _GL_CXXALIAS_SYS (time, time_t, (time_t *__tp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (time); # endif # elif defined GNULIB_POSIXCHECK # undef time # if HAVE_RAW_DECL_TIME _GL_WARN_ON_USE (time, "time has consistency problems - " "use gnulib module time for portability"); # endif # endif /* Sleep for at least RQTP seconds unless interrupted, If interrupted, return -1 and store the remaining time into RMTP. See . */ # if @GNULIB_NANOSLEEP@ # if @REPLACE_NANOSLEEP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define nanosleep rpl_nanosleep # endif _GL_FUNCDECL_RPL (nanosleep, int, (struct timespec const *__rqtp, struct timespec *__rmtp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (nanosleep, int, (struct timespec const *__rqtp, struct timespec *__rmtp)); # else # if ! @HAVE_NANOSLEEP@ _GL_FUNCDECL_SYS (nanosleep, int, (struct timespec const *__rqtp, struct timespec *__rmtp), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (nanosleep, int, (struct timespec const *__rqtp, struct timespec *__rmtp)); # endif _GL_CXXALIASWARN (nanosleep); # elif defined GNULIB_POSIXCHECK # undef nanosleep # if HAVE_RAW_DECL_NANOSLEEP _GL_WARN_ON_USE (nanosleep, "nanosleep is unportable - " "use gnulib module nanosleep for portability"); # endif # endif /* Initialize time conversion information. */ # if @GNULIB_TZSET@ # if @REPLACE_TZSET@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef tzset # define tzset rpl_tzset # endif _GL_FUNCDECL_RPL (tzset, void, (void)); _GL_CXXALIAS_RPL (tzset, void, (void)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef tzset # define tzset _tzset # endif _GL_CXXALIAS_MDA (tzset, void, (void)); # else _GL_CXXALIAS_SYS (tzset, void, (void)); # endif _GL_CXXALIASWARN (tzset); # elif @GNULIB_MDA_TZSET@ /* On native Windows, map 'tzset' to '_tzset', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::tzset always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef tzset # define tzset _tzset # endif _GL_CXXALIAS_MDA (tzset, void, (void)); # else _GL_CXXALIAS_SYS (tzset, void, (void)); # endif _GL_CXXALIASWARN (tzset); # elif defined GNULIB_POSIXCHECK # undef tzset # if HAVE_RAW_DECL_TZSET _GL_WARN_ON_USE (tzset, "tzset has portability problems - " "use gnulib module tzset for portability"); # endif # endif /* Return the 'time_t' representation of TP and normalize TP. */ # if @GNULIB_MKTIME@ # if @REPLACE_MKTIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mktime rpl_mktime # endif _GL_FUNCDECL_RPL (mktime, time_t, (struct tm *__tp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mktime, time_t, (struct tm *__tp)); # else _GL_CXXALIAS_SYS (mktime, time_t, (struct tm *__tp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mktime); # endif # elif defined GNULIB_POSIXCHECK # undef mktime # if HAVE_RAW_DECL_MKTIME _GL_WARN_ON_USE (mktime, "mktime has portability problems - " "use gnulib module mktime for portability"); # endif # endif /* Convert TIMER to RESULT, assuming local time and UTC respectively. See and . */ # if @GNULIB_TIME_R@ # if @REPLACE_LOCALTIME_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef localtime_r # define localtime_r rpl_localtime_r # endif _GL_FUNCDECL_RPL (localtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (localtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result)); # else # if ! @HAVE_DECL_LOCALTIME_R@ _GL_FUNCDECL_SYS (localtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (localtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result)); # endif # if @HAVE_DECL_LOCALTIME_R@ _GL_CXXALIASWARN (localtime_r); # endif # if @REPLACE_LOCALTIME_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef gmtime_r # define gmtime_r rpl_gmtime_r # endif _GL_FUNCDECL_RPL (gmtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (gmtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result)); # else # if ! @HAVE_DECL_LOCALTIME_R@ _GL_FUNCDECL_SYS (gmtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (gmtime_r, struct tm *, (time_t const *restrict __timer, struct tm *restrict __result)); # endif # if @HAVE_DECL_LOCALTIME_R@ _GL_CXXALIASWARN (gmtime_r); # endif # elif defined GNULIB_POSIXCHECK # undef localtime_r # if HAVE_RAW_DECL_LOCALTIME_R _GL_WARN_ON_USE (localtime_r, "localtime_r is unportable - " "use gnulib module time_r for portability"); # endif # undef gmtime_r # if HAVE_RAW_DECL_GMTIME_R _GL_WARN_ON_USE (gmtime_r, "gmtime_r is unportable - " "use gnulib module time_r for portability"); # endif # endif /* Convert TIMER to RESULT, assuming local time and UTC respectively. See and . */ # if @GNULIB_LOCALTIME@ || @REPLACE_LOCALTIME@ # if @REPLACE_LOCALTIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef localtime # define localtime rpl_localtime # endif _GL_FUNCDECL_RPL (localtime, struct tm *, (time_t const *__timer), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (localtime, struct tm *, (time_t const *__timer)); # else _GL_CXXALIAS_SYS (localtime, struct tm *, (time_t const *__timer)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (localtime); # endif # elif defined GNULIB_POSIXCHECK # undef localtime # if HAVE_RAW_DECL_LOCALTIME _GL_WARN_ON_USE (localtime, "localtime has portability problems - " "use gnulib module localtime for portability"); # endif # endif # if 0 || @REPLACE_GMTIME@ # if @REPLACE_GMTIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef gmtime # define gmtime rpl_gmtime # endif _GL_FUNCDECL_RPL (gmtime, struct tm *, (time_t const *__timer), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (gmtime, struct tm *, (time_t const *__timer)); # else _GL_CXXALIAS_SYS (gmtime, struct tm *, (time_t const *__timer)); # endif _GL_CXXALIASWARN (gmtime); # endif /* Parse BUF as a timestamp, assuming FORMAT specifies its layout, and store the resulting broken-down time into TM. See . */ # if @GNULIB_STRPTIME@ # if ! @HAVE_STRPTIME@ _GL_FUNCDECL_SYS (strptime, char *, (char const *restrict __buf, char const *restrict __format, struct tm *restrict __tm), _GL_ARG_NONNULL ((1, 2, 3))); # endif _GL_CXXALIAS_SYS (strptime, char *, (char const *restrict __buf, char const *restrict __format, struct tm *restrict __tm)); _GL_CXXALIASWARN (strptime); # elif defined GNULIB_POSIXCHECK # undef strptime # if HAVE_RAW_DECL_STRPTIME _GL_WARN_ON_USE (strptime, "strptime is unportable - " "use gnulib module strptime for portability"); # endif # endif /* Convert *TP to a date and time string. See . */ # if @GNULIB_CTIME@ # if @REPLACE_CTIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define ctime rpl_ctime # endif # ifndef __cplusplus _GL_ATTRIBUTE_DEPRECATED # endif _GL_FUNCDECL_RPL (ctime, char *, (time_t const *__tp), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (ctime, char *, (time_t const *__tp)); # else _GL_CXXALIAS_SYS (ctime, char *, (time_t const *__tp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (ctime); # endif # elif defined GNULIB_POSIXCHECK /* No need to warn about portability, as a more serious warning is below. */ # endif /* Convert *TP to a date and time string. See . */ # if @GNULIB_STRFTIME@ # if @REPLACE_STRFTIME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strftime rpl_strftime # endif _GL_FUNCDECL_RPL (strftime, size_t, (char *restrict __buf, size_t __bufsize, const char *restrict __fmt, const struct tm *restrict __tp), _GL_ARG_NONNULL ((1, 3, 4))); _GL_CXXALIAS_RPL (strftime, size_t, (char *restrict __buf, size_t __bufsize, const char *restrict __fmt, const struct tm *restrict __tp)); # else _GL_CXXALIAS_SYS (strftime, size_t, (char *restrict __buf, size_t __bufsize, const char *restrict __fmt, const struct tm *restrict __tp)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strftime); # endif # elif defined GNULIB_POSIXCHECK # undef strftime # if HAVE_RAW_DECL_STRFTIME _GL_WARN_ON_USE (strftime, "strftime has portability problems - " "use gnulib module strftime-fixes for portability"); # endif # endif # if defined _GNU_SOURCE && @GNULIB_TIME_RZ@ && ! @HAVE_TIMEZONE_T@ /* Functions that use a first-class time zone data type, instead of relying on an implicit global time zone. Inspired by NetBSD. */ /* Represents a time zone. (timezone_t) NULL stands for UTC. */ typedef struct tm_zone *timezone_t; /* tzalloc (name) Returns a time zone object for the given time zone NAME. This object represents the time zone that other functions would use it the TZ environment variable was set to NAME. If NAME is NULL, the result represents the time zone that other functions would use it the TZ environment variable was unset. May return NULL if NAME is invalid (this is platform dependent) or upon memory allocation failure. */ _GL_FUNCDECL_SYS (tzalloc, timezone_t, (char const *__name)); _GL_CXXALIAS_SYS (tzalloc, timezone_t, (char const *__name)); /* tzfree (tz) Frees a time zone object. The argument must have been returned by tzalloc(). */ _GL_FUNCDECL_SYS (tzfree, void, (timezone_t __tz)); _GL_CXXALIAS_SYS (tzfree, void, (timezone_t __tz)); /* localtime_rz (tz, &t, &result) Converts an absolute time T to a broken-down time RESULT, assuming the time zone TZ. This function is like 'localtime_r', but relies on the argument TZ instead of an implicit global time zone. */ _GL_FUNCDECL_SYS (localtime_rz, struct tm *, (timezone_t __tz, time_t const *restrict __timer, struct tm *restrict __result), _GL_ARG_NONNULL ((2, 3))); _GL_CXXALIAS_SYS (localtime_rz, struct tm *, (timezone_t __tz, time_t const *restrict __timer, struct tm *restrict __result)); /* mktime_z (tz, &tm) Normalizes the broken-down time TM and converts it to an absolute time, assuming the time zone TZ. Returns the absolute time. This function is like 'mktime', but relies on the argument TZ instead of an implicit global time zone. */ _GL_FUNCDECL_SYS (mktime_z, time_t, (timezone_t __tz, struct tm *restrict __tm), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_SYS (mktime_z, time_t, (timezone_t __tz, struct tm *restrict __tm)); /* Time zone abbreviation strings (returned by 'localtime_rz' or 'mktime_z' in the 'tm_zone' member of 'struct tm') are valid as long as - the 'struct tm' argument is not destroyed or overwritten, and - the 'timezone_t' argument is not freed through tzfree(). */ # endif /* Convert TM to a time_t value, assuming UTC. */ # if @GNULIB_TIMEGM@ # if @REPLACE_TIMEGM@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef timegm # define timegm rpl_timegm # endif _GL_FUNCDECL_RPL (timegm, time_t, (struct tm *__tm), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (timegm, time_t, (struct tm *__tm)); # else # if ! @HAVE_TIMEGM@ _GL_FUNCDECL_SYS (timegm, time_t, (struct tm *__tm), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (timegm, time_t, (struct tm *__tm)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (timegm); # endif # elif defined GNULIB_POSIXCHECK # undef timegm # if HAVE_RAW_DECL_TIMEGM _GL_WARN_ON_USE (timegm, "timegm is unportable - " "use gnulib module timegm for portability"); # endif # endif /* Encourage applications to avoid unsafe functions that can overrun buffers when given outlandish struct tm values. Portable applications should use strftime (or even sprintf) instead. */ # if defined GNULIB_POSIXCHECK # undef asctime # if HAVE_RAW_DECL_ASCTIME _GL_WARN_ON_USE (asctime, "asctime can overrun buffers in some cases - " "better use strftime (or even sprintf) instead"); # endif # endif # if defined GNULIB_POSIXCHECK # undef asctime_r # if HAVE_RAW_DECL_ASCTIME_R _GL_WARN_ON_USE (asctime_r, "asctime_r can overrun buffers in some cases - " "better use strftime (or even sprintf) instead"); # endif # endif # if defined GNULIB_POSIXCHECK # undef ctime # if HAVE_RAW_DECL_CTIME _GL_WARN_ON_USE (ctime, "ctime can overrun buffers in some cases - " "better use strftime (or even sprintf) instead"); # endif # endif # if defined GNULIB_POSIXCHECK # undef ctime_r # if HAVE_RAW_DECL_CTIME_R _GL_WARN_ON_USE (ctime_r, "ctime_r can overrun buffers in some cases - " "better use strftime (or even sprintf) instead"); # endif # endif #endif libffcall-2.5/gnulib-lib/_Noreturn.h0000664000000000000000000000460614664171733014361 00000000000000/* A C macro for declaring that a function does not return. Copyright (C) 2011-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _Noreturn # if (defined __cplusplus \ && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \ || (defined _MSC_VER && 1900 <= _MSC_VER)) \ && 0) /* [[noreturn]] is not practically usable, because with it the syntax extern _Noreturn void func (...); would not be valid; such a declaration would only be valid with 'extern' and '_Noreturn' swapped, or without the 'extern' keyword. However, some AIX system header files and several gnulib header files use precisely this syntax with 'extern'. */ # define _Noreturn [[noreturn]] # elif (defined __clang__ && __clang_major__ < 16 \ && defined _GL_WORK_AROUND_LLVM_BUG_59792) /* Compile with -D_GL_WORK_AROUND_LLVM_BUG_59792 to work around that rare LLVM bug, though you may get many false-alarm warnings. */ # define _Noreturn # elif ((!defined __cplusplus || defined __clang__) \ && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0) \ || (!defined __STRICT_ANSI__ \ && (4 < __GNUC__ + (7 <= __GNUC_MINOR__) && !defined __clang__ \ || (defined __apple_build_version__ \ ? 6000000 <= __apple_build_version__ \ : 3 < __clang_major__ + (5 <= __clang_minor__)))))) /* _Noreturn works as-is. */ # elif (2 < __GNUC__ + (8 <= __GNUC_MINOR__) || defined __clang__ \ || 0x5110 <= __SUNPRO_C) # define _Noreturn __attribute__ ((__noreturn__)) # elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0) # define _Noreturn __declspec (noreturn) # else # define _Noreturn # endif #endif libffcall-2.5/gnulib-lib/getdtablesize.c0000664000000000000000000000656514631432055015224 00000000000000/* getdtablesize() function: Return maximum possible file descriptor value + 1. Copyright (C) 2008-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2008. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #if defined _WIN32 && ! defined __CYGWIN__ # include # if HAVE_MSVC_INVALID_PARAMETER_HANDLER # include "msvc-inval.h" # endif # if HAVE_MSVC_INVALID_PARAMETER_HANDLER static int _setmaxstdio_nothrow (int newmax) { int result; TRY_MSVC_INVAL { result = _setmaxstdio (newmax); } CATCH_MSVC_INVAL { result = -1; } DONE_MSVC_INVAL; return result; } # else # define _setmaxstdio_nothrow _setmaxstdio # endif /* Cache for the previous getdtablesize () result. Safe to cache because Windows also lacks setrlimit. */ static int dtablesize; int getdtablesize (void) { if (dtablesize == 0) { /* We are looking for the number N such that the valid file descriptors are 0..N-1. It can be obtained through a loop as follows: { int fd; for (fd = 3; fd < 65536; fd++) if (dup2 (0, fd) == -1) break; return fd; } On Windows XP, the result is 2048. The drawback of this loop is that it allocates memory for a libc internal array that is never freed. The number N can also be obtained as the upper bound for _getmaxstdio (). _getmaxstdio () returns the maximum number of open FILE objects. The sanity check in _setmaxstdio reveals the maximum number of file descriptors. This too allocates memory, but it is freed when we call _setmaxstdio with the original value. */ int orig_max_stdio = _getmaxstdio (); unsigned int bound; for (bound = 0x10000; _setmaxstdio_nothrow (bound) < 0; bound = bound / 2) ; _setmaxstdio_nothrow (orig_max_stdio); dtablesize = bound; } return dtablesize; } #else # include # include # ifndef RLIM_SAVED_CUR # define RLIM_SAVED_CUR RLIM_INFINITY # endif # ifndef RLIM_SAVED_MAX # define RLIM_SAVED_MAX RLIM_INFINITY # endif # ifdef __CYGWIN__ /* Cygwin 1.7.25 auto-increases the RLIMIT_NOFILE soft limit until it hits the compile-time constant hard limit of 3200. We might as well just report the hard limit. */ # define rlim_cur rlim_max # endif int getdtablesize (void) { struct rlimit lim; if (getrlimit (RLIMIT_NOFILE, &lim) == 0 && 0 <= lim.rlim_cur && lim.rlim_cur <= INT_MAX && lim.rlim_cur != RLIM_INFINITY && lim.rlim_cur != RLIM_SAVED_CUR && lim.rlim_cur != RLIM_SAVED_MAX) return lim.rlim_cur; return INT_MAX; } #endif libffcall-2.5/gnulib-lib/stat-w32.h0000664000000000000000000000310714631432055013754 00000000000000/* Core of implementation of fstat and stat for native Windows. Copyright (C) 2017-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _STAT_W32_H #define _STAT_W32_H 1 /* Converts a FILETIME to GMT time since 1970-01-01 00:00:00. */ #if _GL_WINDOWS_STAT_TIMESPEC extern struct timespec _gl_convert_FILETIME_to_timespec (const FILETIME *ft); #else extern time_t _gl_convert_FILETIME_to_POSIX (const FILETIME *ft); #endif /* Fill *BUF with information about the file designated by H. PATH is the file name, if known, otherwise NULL. Return 0 if successful, or -1 with errno set upon failure. */ extern int _gl_fstat_by_handle (HANDLE h, const char *path, struct stat *buf); /* Bitmasks for st_mode. */ #define S_IREAD_UGO (_S_IREAD | (_S_IREAD >> 3) | (_S_IREAD >> 6)) #define S_IWRITE_UGO (_S_IWRITE | (_S_IWRITE >> 3) | (_S_IWRITE >> 6)) #define S_IEXEC_UGO (_S_IEXEC | (_S_IEXEC >> 3) | (_S_IEXEC >> 6)) #endif /* _STAT_W32_H */ libffcall-2.5/gnulib-lib/stdckdint.in.h0000664000000000000000000000264114631432055014766 00000000000000/* stdckdint.h -- checked integer arithmetic Copyright 2022-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_STDCKDINT_H #define _GL_STDCKDINT_H #include "intprops-internal.h" /* Store into *R the low-order bits of A + B, A - B, A * B, respectively. Return 1 if the result overflows, 0 otherwise. A, B, and *R can have any integer type other than char, bool, a bit-precise integer type, or an enumeration type. These are like the standard macros introduced in C23, except that arguments should not have side effects. */ #define ckd_add(r, a, b) ((bool) _GL_INT_ADD_WRAPV (a, b, r)) #define ckd_sub(r, a, b) ((bool) _GL_INT_SUBTRACT_WRAPV (a, b, r)) #define ckd_mul(r, a, b) ((bool) _GL_INT_MULTIPLY_WRAPV (a, b, r)) #endif /* _GL_STDCKDINT_H */ libffcall-2.5/gnulib-lib/sys_stat.in.h0000664000000000000000000006743214664171733014672 00000000000000/* Provide a more complete sys/stat.h header file. Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Eric Blake, Paul Eggert, and Jim Meyering. */ /* This file is supposed to be used on platforms where is incomplete. It is intended to provide definitions and prototypes needed by an application. Start with what the system provides. */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* This file uses #include_next of a system file that defines time_t. For the 'year2038' module to work right, needs to have been included before. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #if defined __need_system_sys_stat_h /* Special invocation convention. */ #@INCLUDE_NEXT@ @NEXT_SYS_STAT_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_SYS_STAT_H /* Get nlink_t. May also define off_t to a 64-bit type on native Windows. */ #include /* Get struct timespec. */ #include /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_SYS_STAT_H@ #ifndef _@GUARD_PREFIX@_SYS_STAT_H #define _@GUARD_PREFIX@_SYS_STAT_H /* This file uses _GL_ATTRIBUTE_NODISCARD, _GL_ATTRIBUTE_NOTHROW, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 2) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 3) || defined __clang__ # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Before doing "#define mknod rpl_mknod" below, we need to include all headers that may declare mknod(). OS/2 kLIBC declares mknod() in , not in . */ #ifdef __KLIBC__ # include #endif /* Before doing "#define mkdir rpl_mkdir" below, we need to include all headers that may declare mkdir(). Native Windows platforms declare mkdir in and/or , not in . */ #if defined _WIN32 && ! defined __CYGWIN__ # include /* mingw32, mingw64 */ # include /* mingw64, MSVC 9 */ #endif /* Native Windows platforms declare umask() in . */ #if 0 && (defined _WIN32 && ! defined __CYGWIN__) # include #endif /* Large File Support on native Windows. */ #if @WINDOWS_64_BIT_ST_SIZE@ # define stat _stati64 #endif /* Optionally, override 'struct stat' on native Windows. */ #if @GNULIB_OVERRIDES_STRUCT_STAT@ # undef stat # if @GNULIB_STAT@ # define stat rpl_stat # else # if !GNULIB_STAT /* Provoke a clear link error if stat() is used as a function and module 'stat' is not in use. */ # define stat stat_used_without_requesting_gnulib_module_stat # endif # endif # if !GNULIB_defined_struct_stat struct stat { dev_t st_dev; ino_t st_ino; mode_t st_mode; nlink_t st_nlink; # if 0 uid_t st_uid; # else /* uid_t is not defined by default on native Windows. */ short st_uid; # endif # if 0 gid_t st_gid; # else /* gid_t is not defined by default on native Windows. */ short st_gid; # endif dev_t st_rdev; off_t st_size; # if 0 blksize_t st_blksize; blkcnt_t st_blocks; # endif # if @WINDOWS_STAT_TIMESPEC@ struct timespec st_atim; struct timespec st_mtim; struct timespec st_ctim; # else time_t st_atime; time_t st_mtime; time_t st_ctime; # endif }; # if @WINDOWS_STAT_TIMESPEC@ # define st_atime st_atim.tv_sec # define st_mtime st_mtim.tv_sec # define st_ctime st_ctim.tv_sec /* Indicator, for gnulib internal purposes. */ # define _GL_WINDOWS_STAT_TIMESPEC 1 # endif # define GNULIB_defined_struct_stat 1 # endif /* Other possible values of st_mode. */ # if 0 # define _S_IFBLK 0x6000 # endif # if 0 # define _S_IFLNK 0xA000 # endif # if 0 # define _S_IFSOCK 0xC000 # endif #endif #ifndef S_IFIFO # ifdef _S_IFIFO # define S_IFIFO _S_IFIFO # endif #endif #ifndef S_IFMT # define S_IFMT 0170000 #endif #if STAT_MACROS_BROKEN # undef S_ISBLK # undef S_ISCHR # undef S_ISDIR # undef S_ISFIFO # undef S_ISLNK # undef S_ISNAM # undef S_ISMPB # undef S_ISMPC # undef S_ISNWK # undef S_ISREG # undef S_ISSOCK #endif #ifndef S_ISBLK # ifdef S_IFBLK # define S_ISBLK(m) (((m) & S_IFMT) == S_IFBLK) # else # define S_ISBLK(m) 0 # endif #endif #ifndef S_ISCHR # ifdef S_IFCHR # define S_ISCHR(m) (((m) & S_IFMT) == S_IFCHR) # else # define S_ISCHR(m) 0 # endif #endif #ifndef S_ISDIR # ifdef S_IFDIR # define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR) # else # define S_ISDIR(m) 0 # endif #endif #ifndef S_ISDOOR /* Solaris 2.5 and up */ # define S_ISDOOR(m) 0 #endif #ifndef S_ISFIFO # ifdef S_IFIFO # define S_ISFIFO(m) (((m) & S_IFMT) == S_IFIFO) # else # define S_ISFIFO(m) 0 # endif #endif #ifndef S_ISLNK # ifdef S_IFLNK # define S_ISLNK(m) (((m) & S_IFMT) == S_IFLNK) # else # define S_ISLNK(m) 0 # endif #endif #ifndef S_ISMPB /* V7 */ # ifdef S_IFMPB # define S_ISMPB(m) (((m) & S_IFMT) == S_IFMPB) # define S_ISMPC(m) (((m) & S_IFMT) == S_IFMPC) # else # define S_ISMPB(m) 0 # define S_ISMPC(m) 0 # endif #endif #ifndef S_ISMPX /* AIX */ # define S_ISMPX(m) 0 #endif #ifndef S_ISNAM /* Xenix */ # ifdef S_IFNAM # define S_ISNAM(m) (((m) & S_IFMT) == S_IFNAM) # else # define S_ISNAM(m) 0 # endif #endif #ifndef S_ISNWK /* HP/UX */ # ifdef S_IFNWK # define S_ISNWK(m) (((m) & S_IFMT) == S_IFNWK) # else # define S_ISNWK(m) 0 # endif #endif #ifndef S_ISPORT /* Solaris 10 and up */ # define S_ISPORT(m) 0 #endif #ifndef S_ISREG # ifdef S_IFREG # define S_ISREG(m) (((m) & S_IFMT) == S_IFREG) # else # define S_ISREG(m) 0 # endif #endif #ifndef S_ISSOCK # ifdef S_IFSOCK # define S_ISSOCK(m) (((m) & S_IFMT) == S_IFSOCK) # else # define S_ISSOCK(m) 0 # endif #endif #ifndef S_TYPEISMQ # define S_TYPEISMQ(p) 0 #endif #ifndef S_TYPEISTMO # define S_TYPEISTMO(p) 0 #endif #ifndef S_TYPEISSEM # ifdef S_INSEM # define S_TYPEISSEM(p) (S_ISNAM ((p)->st_mode) && (p)->st_rdev == S_INSEM) # else # define S_TYPEISSEM(p) 0 # endif #endif #ifndef S_TYPEISSHM # ifdef S_INSHD # define S_TYPEISSHM(p) (S_ISNAM ((p)->st_mode) && (p)->st_rdev == S_INSHD) # else # define S_TYPEISSHM(p) 0 # endif #endif /* high performance ("contiguous data") */ #ifndef S_ISCTG # define S_ISCTG(p) 0 #endif /* Cray DMF (data migration facility): off line, with data */ #ifndef S_ISOFD # define S_ISOFD(p) 0 #endif /* Cray DMF (data migration facility): off line, with no data */ #ifndef S_ISOFL # define S_ISOFL(p) 0 #endif /* 4.4BSD whiteout */ #ifndef S_ISWHT # define S_ISWHT(m) 0 #endif /* If any of the following are undefined, define them to their de facto standard values. */ #if !S_ISUID # define S_ISUID 04000 #endif #if !S_ISGID # define S_ISGID 02000 #endif /* S_ISVTX is a common extension to POSIX. */ #ifndef S_ISVTX # define S_ISVTX 01000 #endif #if !S_IRUSR && S_IREAD # define S_IRUSR S_IREAD #endif #if !S_IRUSR # define S_IRUSR 00400 #endif #if !S_IRGRP # define S_IRGRP (S_IRUSR >> 3) #endif #if !S_IROTH # define S_IROTH (S_IRUSR >> 6) #endif #if !S_IWUSR && S_IWRITE # define S_IWUSR S_IWRITE #endif #if !S_IWUSR # define S_IWUSR 00200 #endif #if !S_IWGRP # define S_IWGRP (S_IWUSR >> 3) #endif #if !S_IWOTH # define S_IWOTH (S_IWUSR >> 6) #endif #if !S_IXUSR && S_IEXEC # define S_IXUSR S_IEXEC #endif #if !S_IXUSR # define S_IXUSR 00100 #endif #if !S_IXGRP # define S_IXGRP (S_IXUSR >> 3) #endif #if !S_IXOTH # define S_IXOTH (S_IXUSR >> 6) #endif #if !S_IRWXU # define S_IRWXU (S_IRUSR | S_IWUSR | S_IXUSR) #endif #if !S_IRWXG # define S_IRWXG (S_IRGRP | S_IWGRP | S_IXGRP) #endif #if !S_IRWXO # define S_IRWXO (S_IROTH | S_IWOTH | S_IXOTH) #endif /* Although S_IXUGO and S_IRWXUGO are not specified by POSIX and are not implemented in GNU/Linux, some Gnulib-using apps use the macros. */ #if !S_IXUGO # define S_IXUGO (S_IXUSR | S_IXGRP | S_IXOTH) #endif #ifndef S_IRWXUGO # define S_IRWXUGO (S_IRWXU | S_IRWXG | S_IRWXO) #endif /* Macros for futimens and utimensat. */ #ifndef UTIME_NOW # define UTIME_NOW (-1) # define UTIME_OMIT (-2) #endif #if @GNULIB_CHMOD@ # if @REPLACE_CHMOD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef chmod # define chmod rpl_chmod # endif _GL_FUNCDECL_RPL (chmod, int, (const char *filename, mode_t mode), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (chmod, int, (const char *filename, mode_t mode)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef chmod # define chmod _chmod # endif /* Need to cast, because in mingw the last argument is 'int mode'. */ _GL_CXXALIAS_MDA_CAST (chmod, int, (const char *filename, mode_t mode)); # else _GL_CXXALIAS_SYS (chmod, int, (const char *filename, mode_t mode)); # endif _GL_CXXALIASWARN (chmod); #elif defined GNULIB_POSIXCHECK # undef chmod # if HAVE_RAW_DECL_CHMOD _GL_WARN_ON_USE (chmod, "chmod has portability problems - " "use gnulib module chmod for portability"); # endif #elif @GNULIB_MDA_CHMOD@ /* On native Windows, map 'chmod' to '_chmod', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::chmod always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef chmod # define chmod _chmod # endif /* Need to cast, because in mingw the last argument is 'int mode'. */ _GL_CXXALIAS_MDA_CAST (chmod, int, (const char *filename, mode_t mode)); # else _GL_CXXALIAS_SYS (chmod, int, (const char *filename, mode_t mode)); # endif _GL_CXXALIASWARN (chmod); #endif #if @GNULIB_FCHMODAT@ # if @REPLACE_FCHMODAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fchmodat # define fchmodat rpl_fchmodat # endif _GL_FUNCDECL_RPL (fchmodat, int, (int fd, char const *file, mode_t mode, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fchmodat, int, (int fd, char const *file, mode_t mode, int flag)); # else # if !@HAVE_FCHMODAT@ _GL_FUNCDECL_SYS (fchmodat, int, (int fd, char const *file, mode_t mode, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (fchmodat, int, (int fd, char const *file, mode_t mode, int flag)); # endif _GL_CXXALIASWARN (fchmodat); #elif defined GNULIB_POSIXCHECK # undef fchmodat # if HAVE_RAW_DECL_FCHMODAT _GL_WARN_ON_USE (fchmodat, "fchmodat is not portable - " "use gnulib module openat for portability"); # endif #endif #if @GNULIB_FSTAT@ # if @REPLACE_FSTAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fstat # define fstat rpl_fstat # endif _GL_FUNCDECL_RPL (fstat, int, (int fd, struct stat *buf), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (fstat, int, (int fd, struct stat *buf)); # else _GL_CXXALIAS_SYS (fstat, int, (int fd, struct stat *buf)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fstat); # endif #elif @GNULIB_OVERRIDES_STRUCT_STAT@ # if !GNULIB_FSTAT # undef fstat # define fstat fstat_used_without_requesting_gnulib_module_fstat # endif #elif @WINDOWS_64_BIT_ST_SIZE@ /* Above, we define stat to _stati64. */ # define fstat _fstati64 #elif defined GNULIB_POSIXCHECK # undef fstat # if HAVE_RAW_DECL_FSTAT _GL_WARN_ON_USE (fstat, "fstat has portability problems - " "use gnulib module fstat for portability"); # endif #endif #if @GNULIB_FSTATAT@ # if @REPLACE_FSTATAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fstatat # define fstatat rpl_fstatat # endif _GL_FUNCDECL_RPL (fstatat, int, (int fd, char const *restrict name, struct stat *restrict st, int flags), _GL_ARG_NONNULL ((2, 3))); _GL_CXXALIAS_RPL (fstatat, int, (int fd, char const *restrict name, struct stat *restrict st, int flags)); # else # if !@HAVE_FSTATAT@ _GL_FUNCDECL_SYS (fstatat, int, (int fd, char const *restrict name, struct stat *restrict st, int flags), _GL_ARG_NONNULL ((2, 3))); # endif _GL_CXXALIAS_SYS (fstatat, int, (int fd, char const *restrict name, struct stat *restrict st, int flags)); # endif _GL_CXXALIASWARN (fstatat); #elif @GNULIB_OVERRIDES_STRUCT_STAT@ # if !GNULIB_FSTATAT # undef fstatat # define fstatat fstatat_used_without_requesting_gnulib_module_fstatat # endif #elif defined GNULIB_POSIXCHECK # undef fstatat # if HAVE_RAW_DECL_FSTATAT _GL_WARN_ON_USE (fstatat, "fstatat is not portable - " "use gnulib module openat for portability"); # endif #endif #if @GNULIB_FUTIMENS@ /* Use the rpl_ prefix also on Solaris <= 9, because on Solaris 9 our futimens implementation relies on futimesat, which on Solaris 10 makes an invocation to futimens that is meant to invoke the libc's futimens(), not gnulib's futimens(). */ # if @REPLACE_FUTIMENS@ || (!@HAVE_FUTIMENS@ && defined __sun) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef futimens # define futimens rpl_futimens # endif _GL_FUNCDECL_RPL (futimens, int, (int fd, struct timespec const times[2])); _GL_CXXALIAS_RPL (futimens, int, (int fd, struct timespec const times[2])); # else # if !@HAVE_FUTIMENS@ _GL_FUNCDECL_SYS (futimens, int, (int fd, struct timespec const times[2])); # endif _GL_CXXALIAS_SYS (futimens, int, (int fd, struct timespec const times[2])); # endif # if __GLIBC__ >= 2 && @HAVE_FUTIMENS@ _GL_CXXALIASWARN (futimens); # endif #elif defined GNULIB_POSIXCHECK # undef futimens # if HAVE_RAW_DECL_FUTIMENS _GL_WARN_ON_USE (futimens, "futimens is not portable - " "use gnulib module futimens for portability"); # endif #endif #if @GNULIB_GETUMASK@ # if !@HAVE_GETUMASK@ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (getumask, mode_t, (void)) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (getumask, mode_t, (void)); # endif # endif _GL_CXXALIAS_SYS (getumask, mode_t, (void)); # if @HAVE_GETUMASK@ _GL_CXXALIASWARN (getumask); # endif #elif defined GNULIB_POSIXCHECK # undef getumask # if HAVE_RAW_DECL_GETUMASK _GL_WARN_ON_USE (getumask, "getumask is not portable - " "use gnulib module getumask for portability"); # endif #endif #if @GNULIB_LCHMOD@ /* Change the mode of FILENAME to MODE, without dereferencing it if FILENAME denotes a symbolic link. */ # if !@HAVE_LCHMOD@ || defined __hpux _GL_FUNCDECL_SYS (lchmod, int, (const char *filename, mode_t mode), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (lchmod, int, (const char *filename, mode_t mode)); _GL_CXXALIASWARN (lchmod); #elif defined GNULIB_POSIXCHECK # undef lchmod # if HAVE_RAW_DECL_LCHMOD _GL_WARN_ON_USE (lchmod, "lchmod is unportable - " "use gnulib module lchmod for portability"); # endif #endif #if @GNULIB_MKDIR@ # if @REPLACE_MKDIR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkdir # define mkdir rpl_mkdir # endif _GL_FUNCDECL_RPL (mkdir, int, (char const *name, mode_t mode), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mkdir, int, (char const *name, mode_t mode)); # elif defined _WIN32 && !defined __CYGWIN__ /* mingw's _mkdir() function has 1 argument, but we pass 2 arguments. Additionally, it declares _mkdir (and depending on compile flags, an alias mkdir), only in the nonstandard includes and , which are included above. */ # if !GNULIB_defined_rpl_mkdir static int rpl_mkdir (char const *name, mode_t mode) { return _mkdir (name); } # define GNULIB_defined_rpl_mkdir 1 # endif # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkdir # define mkdir rpl_mkdir # endif _GL_CXXALIAS_RPL (mkdir, int, (char const *name, mode_t mode)); # else _GL_CXXALIAS_SYS (mkdir, int, (char const *name, mode_t mode)); # endif _GL_CXXALIASWARN (mkdir); #elif @GNULIB_MDA_MKDIR@ /* On native Windows, map 'mkdir' to '_mkdir', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::mkdir always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !GNULIB_defined_rpl_mkdir static int rpl_mkdir (char const *name, mode_t mode) { return _mkdir (name); } # define GNULIB_defined_rpl_mkdir 1 # endif # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkdir # define mkdir rpl_mkdir # endif _GL_CXXALIAS_RPL (mkdir, int, (char const *name, mode_t mode)); # else _GL_CXXALIAS_SYS (mkdir, int, (char const *name, mode_t mode)); # endif _GL_CXXALIASWARN (mkdir); #elif defined GNULIB_POSIXCHECK # undef mkdir # if HAVE_RAW_DECL_MKDIR _GL_WARN_ON_USE (mkdir, "mkdir does not always support two parameters - " "use gnulib module mkdir for portability"); # endif #endif #if @GNULIB_MKDIRAT@ # if !@HAVE_MKDIRAT@ _GL_FUNCDECL_SYS (mkdirat, int, (int fd, char const *file, mode_t mode), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (mkdirat, int, (int fd, char const *file, mode_t mode)); _GL_CXXALIASWARN (mkdirat); #elif defined GNULIB_POSIXCHECK # undef mkdirat # if HAVE_RAW_DECL_MKDIRAT _GL_WARN_ON_USE (mkdirat, "mkdirat is not portable - " "use gnulib module openat for portability"); # endif #endif #if @GNULIB_MKFIFO@ # if @REPLACE_MKFIFO@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkfifo # define mkfifo rpl_mkfifo # endif _GL_FUNCDECL_RPL (mkfifo, int, (char const *file, mode_t mode), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mkfifo, int, (char const *file, mode_t mode)); # else # if !@HAVE_MKFIFO@ _GL_FUNCDECL_SYS (mkfifo, int, (char const *file, mode_t mode), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (mkfifo, int, (char const *file, mode_t mode)); # endif _GL_CXXALIASWARN (mkfifo); #elif defined GNULIB_POSIXCHECK # undef mkfifo # if HAVE_RAW_DECL_MKFIFO _GL_WARN_ON_USE (mkfifo, "mkfifo is not portable - " "use gnulib module mkfifo for portability"); # endif #endif #if @GNULIB_MKFIFOAT@ # if @REPLACE_MKFIFOAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mkfifoat # define mkfifoat rpl_mkfifoat # endif _GL_FUNCDECL_RPL (mkfifoat, int, (int fd, char const *file, mode_t mode), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (mkfifoat, int, (int fd, char const *file, mode_t mode)); # else # if !@HAVE_MKFIFOAT@ _GL_FUNCDECL_SYS (mkfifoat, int, (int fd, char const *file, mode_t mode), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (mkfifoat, int, (int fd, char const *file, mode_t mode)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mkfifoat); # endif #elif defined GNULIB_POSIXCHECK # undef mkfifoat # if HAVE_RAW_DECL_MKFIFOAT _GL_WARN_ON_USE (mkfifoat, "mkfifoat is not portable - " "use gnulib module mkfifoat for portability"); # endif #endif #if @GNULIB_MKNOD@ # if @REPLACE_MKNOD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mknod # define mknod rpl_mknod # endif _GL_FUNCDECL_RPL (mknod, int, (char const *file, mode_t mode, dev_t dev), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mknod, int, (char const *file, mode_t mode, dev_t dev)); # else # if !@HAVE_MKNOD@ _GL_FUNCDECL_SYS (mknod, int, (char const *file, mode_t mode, dev_t dev), _GL_ARG_NONNULL ((1))); # endif /* Need to cast, because on OSF/1 5.1, the third parameter is '...'. */ _GL_CXXALIAS_SYS_CAST (mknod, int, (char const *file, mode_t mode, dev_t dev)); # endif _GL_CXXALIASWARN (mknod); #elif defined GNULIB_POSIXCHECK # undef mknod # if HAVE_RAW_DECL_MKNOD _GL_WARN_ON_USE (mknod, "mknod is not portable - " "use gnulib module mknod for portability"); # endif #endif #if @GNULIB_MKNODAT@ # if @REPLACE_MKNODAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mknodat # define mknodat rpl_mknodat # endif _GL_FUNCDECL_RPL (mknodat, int, (int fd, char const *file, mode_t mode, dev_t dev), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (mknodat, int, (int fd, char const *file, mode_t mode, dev_t dev)); # else # if !@HAVE_MKNODAT@ _GL_FUNCDECL_SYS (mknodat, int, (int fd, char const *file, mode_t mode, dev_t dev), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (mknodat, int, (int fd, char const *file, mode_t mode, dev_t dev)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mknodat); # endif #elif defined GNULIB_POSIXCHECK # undef mknodat # if HAVE_RAW_DECL_MKNODAT _GL_WARN_ON_USE (mknodat, "mknodat is not portable - " "use gnulib module mkfifoat for portability"); # endif #endif #if @GNULIB_STAT@ # if @REPLACE_STAT@ # if !@GNULIB_OVERRIDES_STRUCT_STAT@ /* We can't use the object-like #define stat rpl_stat, because of struct stat. This means that rpl_stat will not be used if the user does (stat)(a,b). Oh well. */ # if defined _AIX && defined stat && defined _LARGE_FILES /* With _LARGE_FILES defined, AIX (only) defines stat to stat64, so we have to replace stat64() instead of stat(). */ # undef stat64 # define stat64(name, st) rpl_stat (name, st) # elif @WINDOWS_64_BIT_ST_SIZE@ /* Above, we define stat to _stati64. */ # if defined __MINGW32__ && defined _stati64 # ifndef _USE_32BIT_TIME_T /* The system headers define _stati64 to _stat64. */ # undef _stat64 # define _stat64(name, st) rpl_stat (name, st) # endif # elif defined _MSC_VER && defined _stati64 # ifdef _USE_32BIT_TIME_T /* The system headers define _stati64 to _stat32i64. */ # undef _stat32i64 # define _stat32i64(name, st) rpl_stat (name, st) # else /* The system headers define _stati64 to _stat64. */ # undef _stat64 # define _stat64(name, st) rpl_stat (name, st) # endif # else # undef _stati64 # define _stati64(name, st) rpl_stat (name, st) # endif # elif defined __MINGW32__ && defined stat # ifdef _USE_32BIT_TIME_T /* The system headers define stat to _stat32i64. */ # undef _stat32i64 # define _stat32i64(name, st) rpl_stat (name, st) # else /* The system headers define stat to _stat64. */ # undef _stat64 # define _stat64(name, st) rpl_stat (name, st) # endif # elif defined _MSC_VER && defined stat # ifdef _USE_32BIT_TIME_T /* The system headers define stat to _stat32. */ # undef _stat32 # define _stat32(name, st) rpl_stat (name, st) # else /* The system headers define stat to _stat64i32. */ # undef _stat64i32 # define _stat64i32(name, st) rpl_stat (name, st) # endif # else /* !(_AIX || __MINGW32__ || _MSC_VER) */ # undef stat # define stat(name, st) rpl_stat (name, st) # endif /* !_LARGE_FILES */ # endif /* !@GNULIB_OVERRIDES_STRUCT_STAT@ */ _GL_EXTERN_C int stat (const char *restrict name, struct stat *restrict buf) _GL_ARG_NONNULL ((1, 2)); # endif #elif @GNULIB_OVERRIDES_STRUCT_STAT@ /* see above: #define stat stat_used_without_requesting_gnulib_module_stat */ #elif defined GNULIB_POSIXCHECK # undef stat # if HAVE_RAW_DECL_STAT _GL_WARN_ON_USE (stat, "stat is unportable - " "use gnulib module stat for portability"); # endif #endif #if @GNULIB_LSTAT@ # if ! @HAVE_LSTAT@ /* mingw does not support symlinks, therefore it does not have lstat. But without links, stat does just fine. */ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define lstat stat # endif _GL_CXXALIAS_RPL_1 (lstat, stat, int, (const char *restrict name, struct stat *restrict buf)); # elif @REPLACE_LSTAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef lstat # define lstat rpl_lstat # endif _GL_FUNCDECL_RPL (lstat, int, (const char *restrict name, struct stat *restrict buf), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (lstat, int, (const char *restrict name, struct stat *restrict buf)); # else _GL_CXXALIAS_SYS (lstat, int, (const char *restrict name, struct stat *restrict buf)); # endif # if @HAVE_LSTAT@ _GL_CXXALIASWARN (lstat); # endif #elif @GNULIB_OVERRIDES_STRUCT_STAT@ # if !GNULIB_LSTAT # undef lstat # define lstat lstat_used_without_requesting_gnulib_module_lstat # endif #elif defined GNULIB_POSIXCHECK # undef lstat # if HAVE_RAW_DECL_LSTAT _GL_WARN_ON_USE (lstat, "lstat is unportable - " "use gnulib module lstat for portability"); # endif #endif #if @GNULIB_MDA_UMASK@ /* On native Windows, map 'umask' to '_umask', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::umask always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef umask # define umask _umask # endif /* Need to cast, because in mingw the last argument is 'int mode'. */ _GL_CXXALIAS_MDA_CAST (umask, mode_t, (mode_t mask)); # else _GL_CXXALIAS_SYS (umask, mode_t, (mode_t mask)); # endif _GL_CXXALIASWARN (umask); #endif #if @GNULIB_UTIMENSAT@ /* Use the rpl_ prefix also on Solaris <= 9, because on Solaris 9 our utimensat implementation relies on futimesat, which on Solaris 10 makes an invocation to utimensat that is meant to invoke the libc's utimensat(), not gnulib's utimensat(). */ # if @REPLACE_UTIMENSAT@ || (!@HAVE_UTIMENSAT@ && defined __sun) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef utimensat # define utimensat rpl_utimensat # endif _GL_FUNCDECL_RPL (utimensat, int, (int fd, char const *name, struct timespec const times[2], int flag), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (utimensat, int, (int fd, char const *name, struct timespec const times[2], int flag)); # else # if !@HAVE_UTIMENSAT@ _GL_FUNCDECL_SYS (utimensat, int, (int fd, char const *name, struct timespec const times[2], int flag), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (utimensat, int, (int fd, char const *name, struct timespec const times[2], int flag)); # endif # if __GLIBC__ >= 2 && @HAVE_UTIMENSAT@ _GL_CXXALIASWARN (utimensat); # endif #elif defined GNULIB_POSIXCHECK # undef utimensat # if HAVE_RAW_DECL_UTIMENSAT _GL_WARN_ON_USE (utimensat, "utimensat is not portable - " "use gnulib module utimensat for portability"); # endif #endif #endif /* _@GUARD_PREFIX@_SYS_STAT_H */ #endif /* _@GUARD_PREFIX@_SYS_STAT_H */ #endif libffcall-2.5/gnulib-lib/windows-rwlock.h0000664000000000000000000000513414631432055015363 00000000000000/* Read-write locks (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #ifndef _WINDOWS_RWLOCK_H #define _WINDOWS_RWLOCK_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include #include "windows-initguard.h" /* It is impossible to implement read-write locks using plain locks, without introducing an extra thread dedicated to managing read-write locks. Therefore here we need to use the low-level Event type. */ typedef struct { HANDLE *array; /* array of waiting threads, each represented by an event */ unsigned int count; /* number of waiting threads */ unsigned int alloc; /* length of allocated array */ unsigned int offset; /* index of first waiting thread in array */ } glwthread_carray_waitqueue_t; typedef struct { glwthread_initguard_t guard; /* protects the initialization */ CRITICAL_SECTION lock; /* protects the remaining fields */ glwthread_carray_waitqueue_t waiting_readers; /* waiting readers */ glwthread_carray_waitqueue_t waiting_writers; /* waiting writers */ int runcount; /* number of readers running, or -1 when a writer runs */ } glwthread_rwlock_t; #define GLWTHREAD_RWLOCK_INIT { GLWTHREAD_INITGUARD_INIT } #ifdef __cplusplus extern "C" { #endif extern void glwthread_rwlock_init (glwthread_rwlock_t *lock); extern int glwthread_rwlock_rdlock (glwthread_rwlock_t *lock); extern int glwthread_rwlock_wrlock (glwthread_rwlock_t *lock); extern int glwthread_rwlock_tryrdlock (glwthread_rwlock_t *lock); extern int glwthread_rwlock_trywrlock (glwthread_rwlock_t *lock); extern int glwthread_rwlock_unlock (glwthread_rwlock_t *lock); extern int glwthread_rwlock_destroy (glwthread_rwlock_t *lock); #ifdef __cplusplus } #endif #endif /* _WINDOWS_RWLOCK_H */ libffcall-2.5/gnulib-lib/error.c0000664000000000000000000002366314660212546013530 00000000000000/* Error handler for noninteractive utilities Copyright (C) 1990-2024 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see . */ /* Written by David MacKenzie . */ #if !_LIBC # include # define _GL_NO_INLINE_ERROR # define __error_internal(status, err, fmt, args, flags) \ verror (status, err, fmt, args) # define __error_at_line_internal(status, err, file, line, fmt, args, flags) \ verror_at_line (status, err, file, line, fmt, args) # define error_tail(status, err, fmt, args, flags) \ error_tail (status, err, fmt, args) #endif #include #include #include #include #include #if !_LIBC && ENABLE_NLS # include "gettext.h" # define _(msgid) gettext (msgid) #endif #ifdef _LIBC # include # include # include # include # define mbsrtowcs __mbsrtowcs # define USE_UNLOCKED_IO 0 # define _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD(a, b) # define _GL_ARG_NONNULL(a) #endif #if USE_UNLOCKED_IO # include "unlocked-io.h" #endif #ifndef _ # define _(String) String #endif /* If NULL, error will flush stdout, then print on stderr the program name, a colon and a space. Otherwise, error will call this function without parameters instead. */ void (*error_print_progname) (void); /* This variable is incremented each time 'error' is called. */ unsigned int error_message_count; #ifdef _LIBC /* In the GNU C library, there is a predefined variable for this. */ # define program_name program_invocation_name # include # include # include /* In GNU libc we want do not want to use the common name 'error' directly. Instead make it a weak alias. */ extern void __error (int status, int errnum, const char *message, ...) __attribute__ ((__format__ (__printf__, 3, 4))); extern void __error_at_line (int status, int errnum, const char *file_name, unsigned int line_number, const char *message, ...) __attribute__ ((__format__ (__printf__, 5, 6))); # define error __error # define error_at_line __error_at_line # include # define fflush(s) _IO_fflush (s) # undef putc # define putc(c, fp) _IO_putc (c, fp) # include #else /* not _LIBC */ # include # include # if defined _WIN32 && ! defined __CYGWIN__ /* Get declarations of the native Windows API functions. */ # define WIN32_LEAN_AND_MEAN # include /* Get _get_osfhandle. */ # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif # endif /* The gnulib override of fcntl is not needed in this file. */ # undef fcntl # if !(GNULIB_STRERROR_R_POSIX || HAVE_DECL_STRERROR_R) # ifndef HAVE_DECL_STRERROR_R "this configure-time declaration test was not run" # endif # if STRERROR_R_CHAR_P char *strerror_r (int errnum, char *buf, size_t buflen); # else int strerror_r (int errnum, char *buf, size_t buflen); # endif # endif # define program_name getprogname () # if GNULIB_STRERROR_R_POSIX || HAVE_STRERROR_R || defined strerror_r # define __strerror_r strerror_r # endif /* GNULIB_STRERROR_R_POSIX || HAVE_STRERROR_R || defined strerror_r */ # if GNULIB_defined_verror # undef verror # endif # if GNULIB_defined_verror_at_line # undef verror_at_line # endif #endif /* not _LIBC */ #if !_LIBC /* Return non-zero if FD is open. */ static int is_open (int fd) { # if defined _WIN32 && ! defined __CYGWIN__ /* On native Windows: The initial state of unassigned standard file descriptors is that they are open but point to an INVALID_HANDLE_VALUE. There is no fcntl, and the gnulib replacement fcntl does not support F_GETFL. */ return (HANDLE) _get_osfhandle (fd) != INVALID_HANDLE_VALUE; # else # ifndef F_GETFL # error Please port fcntl to your platform # endif return 0 <= fcntl (fd, F_GETFL); # endif } #endif static void flush_stdout (void) { #if !_LIBC int stdout_fd; # if GNULIB_FREOPEN_SAFER /* Use of gnulib's freopen-safer module normally ensures that fileno (stdout) == 1 whenever stdout is open. */ stdout_fd = STDOUT_FILENO; # else /* POSIX states that fileno (stdout) after fclose is unspecified. But in practice it is not a problem, because stdout is statically allocated and the fd of a FILE stream is stored as a field in its allocated memory. */ stdout_fd = fileno (stdout); # endif /* POSIX states that fflush (stdout) after fclose is unspecified; it is safe in glibc, but not on all other platforms. fflush (NULL) is always defined, but too draconian. */ if (0 <= stdout_fd && is_open (stdout_fd)) #endif fflush (stdout); } static void print_errno_message (int errnum) { char const *s; #if _LIBC || GNULIB_STRERROR_R_POSIX || defined HAVE_STRERROR_R char errbuf[1024]; # if _LIBC || (!GNULIB_STRERROR_R_POSIX && STRERROR_R_CHAR_P) s = __strerror_r (errnum, errbuf, sizeof errbuf); # else if (__strerror_r (errnum, errbuf, sizeof errbuf) == 0) s = errbuf; else s = 0; # endif #else s = strerror (errnum); #endif #if !_LIBC if (! s) s = _("Unknown system error"); #endif #if _LIBC __fxprintf (NULL, ": %s", s); #else fprintf (stderr, ": %s", s); #endif } static void _GL_ATTRIBUTE_FORMAT_PRINTF_STANDARD (3, 0) _GL_ARG_NONNULL ((3)) error_tail (int status, int errnum, const char *message, va_list args, unsigned int mode_flags) { #if _LIBC int ret = __vfxprintf (stderr, message, args, mode_flags); if (ret < 0 && errno == ENOMEM && _IO_fwide (stderr, 0) > 0) /* Leave a trace in case the heap allocation of the message string failed. */ fputws_unlocked (L"out of memory\n", stderr); #else vfprintf (stderr, message, args); #endif va_end (args); ++error_message_count; if (errnum) print_errno_message (errnum); #if _LIBC __fxprintf (NULL, "\n"); #else putc ('\n', stderr); #endif fflush (stderr); if (status) exit (status); } /* Print the program name and error message MESSAGE, which is a printf-style format string with optional args. If ERRNUM is nonzero, print its corresponding system error message. Exit with status STATUS if it is nonzero. */ void __error_internal (int status, int errnum, const char *message, va_list args, unsigned int mode_flags) { #if defined _LIBC /* We do not want this call to be cut short by a thread cancellation. Therefore disable cancellation for now. */ int state = PTHREAD_CANCEL_ENABLE; __pthread_setcancelstate (PTHREAD_CANCEL_DISABLE, &state); #endif flush_stdout (); #ifdef _LIBC _IO_flockfile (stderr); #endif if (error_print_progname) (*error_print_progname) (); else { #if _LIBC __fxprintf (NULL, "%s: ", program_name); #else fprintf (stderr, "%s: ", program_name); #endif } error_tail (status, errnum, message, args, mode_flags); #ifdef _LIBC _IO_funlockfile (stderr); __pthread_setcancelstate (state, NULL); #endif } void error (int status, int errnum, const char *message, ...) { va_list ap; va_start (ap, message); __error_internal (status, errnum, message, ap, 0); va_end (ap); } /* Sometimes we want to have at most one error per line. This variable controls whether this mode is selected or not. */ int error_one_per_line; void __error_at_line_internal (int status, int errnum, const char *file_name, unsigned int line_number, const char *message, va_list args, unsigned int mode_flags) { if (error_one_per_line) { static const char *old_file_name; static unsigned int old_line_number; if (old_line_number == line_number && (file_name == old_file_name || (old_file_name != NULL && file_name != NULL && strcmp (old_file_name, file_name) == 0))) /* Simply return and print nothing. */ return; old_file_name = file_name; old_line_number = line_number; } #if defined _LIBC /* We do not want this call to be cut short by a thread cancellation. Therefore disable cancellation for now. */ int state = PTHREAD_CANCEL_ENABLE; __pthread_setcancelstate (PTHREAD_CANCEL_DISABLE, &state); #endif flush_stdout (); #ifdef _LIBC _IO_flockfile (stderr); #endif if (error_print_progname) (*error_print_progname) (); else { #if _LIBC __fxprintf (NULL, "%s:", program_name); #else fprintf (stderr, "%s:", program_name); #endif } #if _LIBC __fxprintf (NULL, file_name != NULL ? "%s:%u: " : " ", file_name, line_number); #else fprintf (stderr, file_name != NULL ? "%s:%u: " : " ", file_name, line_number); #endif error_tail (status, errnum, message, args, mode_flags); #ifdef _LIBC _IO_funlockfile (stderr); __pthread_setcancelstate (state, NULL); #endif } void error_at_line (int status, int errnum, const char *file_name, unsigned int line_number, const char *message, ...) { va_list ap; va_start (ap, message); __error_at_line_internal (status, errnum, file_name, line_number, message, ap, 0); va_end (ap); } #ifdef _LIBC /* Make the weak alias. */ # undef error # undef error_at_line weak_alias (__error, error) weak_alias (__error_at_line, error_at_line) #endif libffcall-2.5/gnulib-lib/gettext.h0000664000000000000000000002501514631432055014056 00000000000000/* Convenience header for conditional use of GNU . Copyright (C) 1995-1998, 2000-2002, 2004-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _LIBGETTEXT_H #define _LIBGETTEXT_H 1 /* NLS can be disabled through the configure --disable-nls option or through "#define ENABLE NLS 0" before including this file. */ #if defined ENABLE_NLS && ENABLE_NLS /* Get declarations of GNU message catalog functions. */ # include /* You can set the DEFAULT_TEXT_DOMAIN macro to specify the domain used by the gettext() and ngettext() macros. This is an alternative to calling textdomain(), and is useful for libraries. */ # ifdef DEFAULT_TEXT_DOMAIN # undef gettext # define gettext(Msgid) \ dgettext (DEFAULT_TEXT_DOMAIN, Msgid) # undef ngettext # define ngettext(Msgid1, Msgid2, N) \ dngettext (DEFAULT_TEXT_DOMAIN, Msgid1, Msgid2, N) # endif #else /* Solaris /usr/include/locale.h includes /usr/include/libintl.h, which chokes if dcgettext is defined as a macro. So include it now, to make later inclusions of a NOP. We don't include as well because people using "gettext.h" will not include , and also including would fail on SunOS 4, whereas is OK. */ #if defined(__sun) # include #endif /* Many header files from the libstdc++ coming with g++ 3.3 or newer include , which chokes if dcgettext is defined as a macro. So include it now, to make later inclusions of a NOP. */ #if defined(__cplusplus) && defined(__GNUG__) && (__GNUC__ >= 3) # include # if (__GLIBC__ >= 2 && !defined __UCLIBC__) || _GLIBCXX_HAVE_LIBINTL_H # include # endif #endif /* Disabled NLS. The casts to 'const char *' serve the purpose of producing warnings for invalid uses of the value returned from these functions. On pre-ANSI systems without 'const', the config.h file is supposed to contain "#define const". */ # undef gettext # define gettext(Msgid) ((const char *) (Msgid)) # undef dgettext # define dgettext(Domainname, Msgid) ((void) (Domainname), gettext (Msgid)) # undef dcgettext # define dcgettext(Domainname, Msgid, Category) \ ((void) (Category), dgettext (Domainname, Msgid)) # undef ngettext # define ngettext(Msgid1, Msgid2, N) \ ((N) == 1 \ ? ((void) (Msgid2), (const char *) (Msgid1)) \ : ((void) (Msgid1), (const char *) (Msgid2))) # undef dngettext # define dngettext(Domainname, Msgid1, Msgid2, N) \ ((void) (Domainname), ngettext (Msgid1, Msgid2, N)) # undef dcngettext # define dcngettext(Domainname, Msgid1, Msgid2, N, Category) \ ((void) (Category), dngettext (Domainname, Msgid1, Msgid2, N)) # undef textdomain # define textdomain(Domainname) ((const char *) (Domainname)) # undef bindtextdomain # define bindtextdomain(Domainname, Dirname) \ ((void) (Domainname), (const char *) (Dirname)) # undef bind_textdomain_codeset # define bind_textdomain_codeset(Domainname, Codeset) \ ((void) (Domainname), (const char *) (Codeset)) #endif /* Prefer gnulib's setlocale override over libintl's setlocale override. */ #ifdef GNULIB_defined_setlocale # undef setlocale # define setlocale rpl_setlocale #endif /* A pseudo function call that serves as a marker for the automated extraction of messages, but does not call gettext(). The run-time translation is done at a different place in the code. The argument, String, should be a literal string. Concatenated strings and other string expressions won't work. The macro's expansion is not parenthesized, so that it is suitable as initializer for static 'char[]' or 'const char[]' variables. */ #define gettext_noop(String) String /* The separator between msgctxt and msgid in a .mo file. */ #define GETTEXT_CONTEXT_GLUE "\004" /* Pseudo function calls, taking a MSGCTXT and a MSGID instead of just a MSGID. MSGCTXT and MSGID must be string literals. MSGCTXT should be short and rarely need to change. The letter 'p' stands for 'particular' or 'special'. */ #ifdef DEFAULT_TEXT_DOMAIN # define pgettext(Msgctxt, Msgid) \ pgettext_aux (DEFAULT_TEXT_DOMAIN, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES) #else # define pgettext(Msgctxt, Msgid) \ pgettext_aux (NULL, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES) #endif #define dpgettext(Domainname, Msgctxt, Msgid) \ pgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, LC_MESSAGES) #define dcpgettext(Domainname, Msgctxt, Msgid, Category) \ pgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, Category) #ifdef DEFAULT_TEXT_DOMAIN # define npgettext(Msgctxt, Msgid, MsgidPlural, N) \ npgettext_aux (DEFAULT_TEXT_DOMAIN, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES) #else # define npgettext(Msgctxt, Msgid, MsgidPlural, N) \ npgettext_aux (NULL, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES) #endif #define dnpgettext(Domainname, Msgctxt, Msgid, MsgidPlural, N) \ npgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, LC_MESSAGES) #define dcnpgettext(Domainname, Msgctxt, Msgid, MsgidPlural, N, Category) \ npgettext_aux (Domainname, Msgctxt GETTEXT_CONTEXT_GLUE Msgid, Msgid, MsgidPlural, N, Category) #if defined __GNUC__ || defined __clang__ __inline #else #ifdef __cplusplus inline #endif #endif static const char * pgettext_aux (const char *domain, const char *msg_ctxt_id, const char *msgid, int category) { const char *translation = dcgettext (domain, msg_ctxt_id, category); if (translation == msg_ctxt_id) return msgid; else return translation; } #if defined __GNUC__ || defined __clang__ __inline #else #ifdef __cplusplus inline #endif #endif static const char * npgettext_aux (const char *domain, const char *msg_ctxt_id, const char *msgid, const char *msgid_plural, unsigned long int n, int category) { const char *translation = dcngettext (domain, msg_ctxt_id, msgid_plural, n, category); if (translation == msg_ctxt_id || translation == msgid_plural) return (n == 1 ? msgid : msgid_plural); else return translation; } /* The same thing extended for non-constant arguments. Here MSGCTXT and MSGID can be arbitrary expressions. But for string literals these macros are less efficient than those above. */ #include /* GNULIB_NO_VLA can be defined to disable use of VLAs even if supported. This relates to the -Wvla and -Wvla-larger-than warnings, enabled in the default GCC many warnings set. This allows programs to disable use of VLAs, which may be unintended, or may be awkward to support portably, or may have security implications due to non-deterministic stack usage. */ #if (!defined GNULIB_NO_VLA \ && defined __STDC_VERSION__ && 199901L <= __STDC_VERSION__ \ && !defined __STDC_NO_VLA__) # define _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS 1 #else # define _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS 0 #endif #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS #include #endif #define pgettext_expr(Msgctxt, Msgid) \ dcpgettext_expr (NULL, Msgctxt, Msgid, LC_MESSAGES) #define dpgettext_expr(Domainname, Msgctxt, Msgid) \ dcpgettext_expr (Domainname, Msgctxt, Msgid, LC_MESSAGES) #if defined __GNUC__ || defined __clang__ __inline #else #ifdef __cplusplus inline #endif #endif static const char * dcpgettext_expr (const char *domain, const char *msgctxt, const char *msgid, int category) { size_t msgctxt_len = strlen (msgctxt) + 1; size_t msgid_len = strlen (msgid) + 1; const char *translation; #if _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS char msg_ctxt_id[msgctxt_len + msgid_len]; #else char buf[1024]; char *msg_ctxt_id = (msgctxt_len + msgid_len <= sizeof (buf) ? buf : (char *) malloc (msgctxt_len + msgid_len)); if (msg_ctxt_id != NULL) #endif { int found_translation; memcpy (msg_ctxt_id, msgctxt, msgctxt_len - 1); msg_ctxt_id[msgctxt_len - 1] = '\004'; memcpy (msg_ctxt_id + msgctxt_len, msgid, msgid_len); translation = dcgettext (domain, msg_ctxt_id, category); found_translation = (translation != msg_ctxt_id); #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS if (msg_ctxt_id != buf) free (msg_ctxt_id); #endif if (found_translation) return translation; } return msgid; } #define npgettext_expr(Msgctxt, Msgid, MsgidPlural, N) \ dcnpgettext_expr (NULL, Msgctxt, Msgid, MsgidPlural, N, LC_MESSAGES) #define dnpgettext_expr(Domainname, Msgctxt, Msgid, MsgidPlural, N) \ dcnpgettext_expr (Domainname, Msgctxt, Msgid, MsgidPlural, N, LC_MESSAGES) #if defined __GNUC__ || defined __clang__ __inline #else #ifdef __cplusplus inline #endif #endif static const char * dcnpgettext_expr (const char *domain, const char *msgctxt, const char *msgid, const char *msgid_plural, unsigned long int n, int category) { size_t msgctxt_len = strlen (msgctxt) + 1; size_t msgid_len = strlen (msgid) + 1; const char *translation; #if _LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS char msg_ctxt_id[msgctxt_len + msgid_len]; #else char buf[1024]; char *msg_ctxt_id = (msgctxt_len + msgid_len <= sizeof (buf) ? buf : (char *) malloc (msgctxt_len + msgid_len)); if (msg_ctxt_id != NULL) #endif { int found_translation; memcpy (msg_ctxt_id, msgctxt, msgctxt_len - 1); msg_ctxt_id[msgctxt_len - 1] = '\004'; memcpy (msg_ctxt_id + msgctxt_len, msgid, msgid_len); translation = dcngettext (domain, msg_ctxt_id, msgid_plural, n, category); found_translation = !(translation == msg_ctxt_id || translation == msgid_plural); #if !_LIBGETTEXT_HAVE_VARIABLE_SIZE_ARRAYS if (msg_ctxt_id != buf) free (msg_ctxt_id); #endif if (found_translation) return translation; } return (n == 1 ? msgid : msgid_plural); } #endif /* _LIBGETTEXT_H */ libffcall-2.5/gnulib-lib/open.c0000664000000000000000000001546014631432055013331 00000000000000/* Open a descriptor to a file. Copyright (C) 2007-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2007. */ /* If the user's config.h happens to include , let it include only the system's here, so that orig_open doesn't recurse to rpl_open. */ #define __need_system_fcntl_h #include /* Get the original definition of open. It might be defined as a macro. */ #include #include #undef __need_system_fcntl_h static int orig_open (const char *filename, int flags, mode_t mode) { #if defined _WIN32 && !defined __CYGWIN__ return _open (filename, flags, mode); #else return open (filename, flags, mode); #endif } /* Specification. */ #ifdef __osf__ /* Write "fcntl.h" here, not , otherwise OSF/1 5.1 DTK cc eliminates this include because of the preliminary #include above. */ # include "fcntl.h" #else # include #endif #include "cloexec.h" #include #include #include #include #include #include #ifndef REPLACE_OPEN_DIRECTORY # define REPLACE_OPEN_DIRECTORY 0 #endif int open (const char *filename, int flags, ...) { /* 0 = unknown, 1 = yes, -1 = no. */ #if GNULIB_defined_O_CLOEXEC int have_cloexec = -1; #else static int have_cloexec; #endif mode_t mode; int fd; mode = 0; if (flags & O_CREAT) { va_list arg; va_start (arg, flags); /* We have to use PROMOTED_MODE_T instead of mode_t, otherwise GCC 4 creates crashing code when 'mode_t' is smaller than 'int'. */ mode = va_arg (arg, PROMOTED_MODE_T); va_end (arg); } #if GNULIB_defined_O_NONBLOCK /* The only known platform that lacks O_NONBLOCK is mingw, but it also lacks named pipes and Unix sockets, which are the only two file types that require non-blocking handling in open(). Therefore, it is safe to ignore O_NONBLOCK here. It is handy that mingw also lacks openat(), so that is also covered here. */ flags &= ~O_NONBLOCK; #endif #if defined _WIN32 && ! defined __CYGWIN__ if (strcmp (filename, "/dev/null") == 0) filename = "NUL"; #endif #if OPEN_TRAILING_SLASH_BUG /* Fail if one of O_CREAT, O_WRONLY, O_RDWR is specified and the filename ends in a slash, as POSIX says such a filename must name a directory : "A pathname that contains at least one non- character and that ends with one or more trailing characters shall not be resolved successfully unless the last pathname component before the trailing characters names an existing directory" If the named file already exists as a directory, then - if O_CREAT is specified, open() must fail because of the semantics of O_CREAT, - if O_WRONLY or O_RDWR is specified, open() must fail because POSIX says that it fails with errno = EISDIR in this case. If the named file does not exist or does not name a directory, then - if O_CREAT is specified, open() must fail since open() cannot create directories, - if O_WRONLY or O_RDWR is specified, open() must fail because the file does not contain a '.' directory. */ if ((flags & O_CREAT) || (flags & O_ACCMODE) == O_RDWR || (flags & O_ACCMODE) == O_WRONLY) { size_t len = strlen (filename); if (len > 0 && filename[len - 1] == '/') { errno = EISDIR; return -1; } } #endif fd = orig_open (filename, flags & ~(have_cloexec < 0 ? O_CLOEXEC : 0), mode); if (flags & O_CLOEXEC) { if (! have_cloexec) { if (0 <= fd) have_cloexec = 1; else if (errno == EINVAL) { fd = orig_open (filename, flags & ~O_CLOEXEC, mode); have_cloexec = -1; } } if (have_cloexec < 0 && 0 <= fd) set_cloexec_flag (fd, true); } #if REPLACE_FCHDIR /* Implementing fchdir and fdopendir requires the ability to open a directory file descriptor. If open doesn't support that (as on mingw), we use a dummy file that behaves the same as directories on Linux (ie. always reports EOF on attempts to read()), and override fstat() in fchdir.c to hide the fact that we have a dummy. */ if (REPLACE_OPEN_DIRECTORY && fd < 0 && errno == EACCES && ((flags & O_ACCMODE) == O_RDONLY || (O_SEARCH != O_RDONLY && (flags & O_ACCMODE) == O_SEARCH))) { struct stat statbuf; if (stat (filename, &statbuf) == 0 && S_ISDIR (statbuf.st_mode)) { /* Maximum recursion depth of 1. */ fd = open ("/dev/null", flags, mode); if (0 <= fd) fd = _gl_register_fd (fd, filename); } else errno = EACCES; } #endif #if OPEN_TRAILING_SLASH_BUG /* If the filename ends in a slash and fd does not refer to a directory, then fail. Rationale: POSIX says such a filename must name a directory : "A pathname that contains at least one non- character and that ends with one or more trailing characters shall not be resolved successfully unless the last pathname component before the trailing characters names an existing directory" If the named file without the slash is not a directory, open() must fail with ENOTDIR. */ if (fd >= 0) { /* We know len is positive, since open did not fail with ENOENT. */ size_t len = strlen (filename); if (filename[len - 1] == '/') { struct stat statbuf; if (fstat (fd, &statbuf) >= 0 && !S_ISDIR (statbuf.st_mode)) { close (fd); errno = ENOTDIR; return -1; } } } #endif #if REPLACE_FCHDIR if (!REPLACE_OPEN_DIRECTORY && 0 <= fd) fd = _gl_register_fd (fd, filename); #endif return fd; } libffcall-2.5/gnulib-lib/windows-rwlock.c0000664000000000000000000002727314631432055015366 00000000000000/* Read-write locks (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #include /* Specification. */ #include "windows-rwlock.h" #include #include /* Don't assume that UNICODE is not defined. */ #undef CreateEvent #define CreateEvent CreateEventA /* In this file, the waitqueues are implemented as circular arrays. */ #define glwthread_waitqueue_t glwthread_carray_waitqueue_t static void glwthread_waitqueue_init (glwthread_waitqueue_t *wq) { wq->array = NULL; wq->count = 0; wq->alloc = 0; wq->offset = 0; } /* Enqueues the current thread, represented by an event, in a wait queue. Returns INVALID_HANDLE_VALUE if an allocation failure occurs. */ static HANDLE glwthread_waitqueue_add (glwthread_waitqueue_t *wq) { HANDLE event; unsigned int index; if (wq->count == wq->alloc) { unsigned int new_alloc = 2 * wq->alloc + 1; HANDLE *new_array = (HANDLE *) realloc (wq->array, new_alloc * sizeof (HANDLE)); if (new_array == NULL) /* No more memory. */ return INVALID_HANDLE_VALUE; /* Now is a good opportunity to rotate the array so that its contents starts at offset 0. */ if (wq->offset > 0) { unsigned int old_count = wq->count; unsigned int old_alloc = wq->alloc; unsigned int old_offset = wq->offset; unsigned int i; if (old_offset + old_count > old_alloc) { unsigned int limit = old_offset + old_count - old_alloc; for (i = 0; i < limit; i++) new_array[old_alloc + i] = new_array[i]; } for (i = 0; i < old_count; i++) new_array[i] = new_array[old_offset + i]; wq->offset = 0; } wq->array = new_array; wq->alloc = new_alloc; } /* Whether the created event is a manual-reset one or an auto-reset one, does not matter, since we will wait on it only once. */ event = CreateEvent (NULL, TRUE, FALSE, NULL); if (event == INVALID_HANDLE_VALUE) /* No way to allocate an event. */ return INVALID_HANDLE_VALUE; index = wq->offset + wq->count; if (index >= wq->alloc) index -= wq->alloc; wq->array[index] = event; wq->count++; return event; } /* Notifies the first thread from a wait queue and dequeues it. */ static void glwthread_waitqueue_notify_first (glwthread_waitqueue_t *wq) { SetEvent (wq->array[wq->offset + 0]); wq->offset++; wq->count--; if (wq->count == 0 || wq->offset == wq->alloc) wq->offset = 0; } /* Notifies all threads from a wait queue and dequeues them all. */ static void glwthread_waitqueue_notify_all (glwthread_waitqueue_t *wq) { unsigned int i; for (i = 0; i < wq->count; i++) { unsigned int index = wq->offset + i; if (index >= wq->alloc) index -= wq->alloc; SetEvent (wq->array[index]); } wq->count = 0; wq->offset = 0; } void glwthread_rwlock_init (glwthread_rwlock_t *lock) { InitializeCriticalSection (&lock->lock); glwthread_waitqueue_init (&lock->waiting_readers); glwthread_waitqueue_init (&lock->waiting_writers); lock->runcount = 0; lock->guard.done = 1; } int glwthread_rwlock_rdlock (glwthread_rwlock_t *lock) { if (!lock->guard.done) { if (InterlockedIncrement (&lock->guard.started) == 0) /* This thread is the first one to need this lock. Initialize it. */ glwthread_rwlock_init (lock); else { /* Don't let lock->guard.started grow and wrap around. */ InterlockedDecrement (&lock->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this lock. */ while (!lock->guard.done) Sleep (0); } } EnterCriticalSection (&lock->lock); /* Test whether only readers are currently running, and whether the runcount field will not overflow, and whether no writer is waiting. The latter condition is because POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ if (!(lock->runcount + 1 > 0 && lock->waiting_writers.count == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_readers. */ HANDLE event = glwthread_waitqueue_add (&lock->waiting_readers); if (event != INVALID_HANDLE_VALUE) { DWORD result; LeaveCriticalSection (&lock->lock); /* Wait until another thread signals this event. */ result = WaitForSingleObject (event, INFINITE); if (result == WAIT_FAILED || result == WAIT_TIMEOUT) abort (); CloseHandle (event); /* The thread which signalled the event already did the bookkeeping: removed us from the waiting_readers, incremented lock->runcount. */ if (!(lock->runcount > 0)) abort (); return 0; } else { /* Allocation failure. Weird. */ do { LeaveCriticalSection (&lock->lock); Sleep (1); EnterCriticalSection (&lock->lock); } while (!(lock->runcount + 1 > 0)); } } lock->runcount++; LeaveCriticalSection (&lock->lock); return 0; } int glwthread_rwlock_wrlock (glwthread_rwlock_t *lock) { if (!lock->guard.done) { if (InterlockedIncrement (&lock->guard.started) == 0) /* This thread is the first one to need this lock. Initialize it. */ glwthread_rwlock_init (lock); else { /* Don't let lock->guard.started grow and wrap around. */ InterlockedDecrement (&lock->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this lock. */ while (!lock->guard.done) Sleep (0); } } EnterCriticalSection (&lock->lock); /* Test whether no readers or writers are currently running. */ if (!(lock->runcount == 0)) { /* This thread has to wait for a while. Enqueue it among the waiting_writers. */ HANDLE event = glwthread_waitqueue_add (&lock->waiting_writers); if (event != INVALID_HANDLE_VALUE) { DWORD result; LeaveCriticalSection (&lock->lock); /* Wait until another thread signals this event. */ result = WaitForSingleObject (event, INFINITE); if (result == WAIT_FAILED || result == WAIT_TIMEOUT) abort (); CloseHandle (event); /* The thread which signalled the event already did the bookkeeping: removed us from the waiting_writers, set lock->runcount = -1. */ if (!(lock->runcount == -1)) abort (); return 0; } else { /* Allocation failure. Weird. */ do { LeaveCriticalSection (&lock->lock); Sleep (1); EnterCriticalSection (&lock->lock); } while (!(lock->runcount == 0)); } } lock->runcount--; /* runcount becomes -1 */ LeaveCriticalSection (&lock->lock); return 0; } int glwthread_rwlock_tryrdlock (glwthread_rwlock_t *lock) { if (!lock->guard.done) { if (InterlockedIncrement (&lock->guard.started) == 0) /* This thread is the first one to need this lock. Initialize it. */ glwthread_rwlock_init (lock); else { /* Don't let lock->guard.started grow and wrap around. */ InterlockedDecrement (&lock->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this lock. */ while (!lock->guard.done) Sleep (0); } } /* It's OK to wait for this critical section, because it is never taken for a long time. */ EnterCriticalSection (&lock->lock); /* Test whether only readers are currently running, and whether the runcount field will not overflow, and whether no writer is waiting. The latter condition is because POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ if (!(lock->runcount + 1 > 0 && lock->waiting_writers.count == 0)) { /* This thread would have to wait for a while. Return instead. */ LeaveCriticalSection (&lock->lock); return EBUSY; } lock->runcount++; LeaveCriticalSection (&lock->lock); return 0; } int glwthread_rwlock_trywrlock (glwthread_rwlock_t *lock) { if (!lock->guard.done) { if (InterlockedIncrement (&lock->guard.started) == 0) /* This thread is the first one to need this lock. Initialize it. */ glwthread_rwlock_init (lock); else { /* Don't let lock->guard.started grow and wrap around. */ InterlockedDecrement (&lock->guard.started); /* Yield the CPU while waiting for another thread to finish initializing this lock. */ while (!lock->guard.done) Sleep (0); } } /* It's OK to wait for this critical section, because it is never taken for a long time. */ EnterCriticalSection (&lock->lock); /* Test whether no readers or writers are currently running. */ if (!(lock->runcount == 0)) { /* This thread would have to wait for a while. Return instead. */ LeaveCriticalSection (&lock->lock); return EBUSY; } lock->runcount--; /* runcount becomes -1 */ LeaveCriticalSection (&lock->lock); return 0; } int glwthread_rwlock_unlock (glwthread_rwlock_t *lock) { if (!lock->guard.done) return EINVAL; EnterCriticalSection (&lock->lock); if (lock->runcount < 0) { /* Drop a writer lock. */ if (!(lock->runcount == -1)) abort (); lock->runcount = 0; } else { /* Drop a reader lock. */ if (!(lock->runcount > 0)) { LeaveCriticalSection (&lock->lock); return EPERM; } lock->runcount--; } if (lock->runcount == 0) { /* POSIX recommends that "write locks shall take precedence over read locks", to avoid "writer starvation". */ if (lock->waiting_writers.count > 0) { /* Wake up one of the waiting writers. */ lock->runcount--; glwthread_waitqueue_notify_first (&lock->waiting_writers); } else { /* Wake up all waiting readers. */ lock->runcount += lock->waiting_readers.count; glwthread_waitqueue_notify_all (&lock->waiting_readers); } } LeaveCriticalSection (&lock->lock); return 0; } int glwthread_rwlock_destroy (glwthread_rwlock_t *lock) { if (!lock->guard.done) return EINVAL; if (lock->runcount != 0) return EBUSY; DeleteCriticalSection (&lock->lock); if (lock->waiting_readers.array != NULL) free (lock->waiting_readers.array); if (lock->waiting_writers.array != NULL) free (lock->waiting_writers.array); lock->guard.done = 0; return 0; } libffcall-2.5/gnulib-lib/clean-temp-simple.c0000664000000000000000000002721414657156076015722 00000000000000/* Temporary files with automatic cleanup. Copyright (C) 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "clean-temp-simple.h" #include "clean-temp-private.h" #include #include #include #include #include #include #include #include "fatal-signal.h" #include "asyncsafe-spin.h" #include "glthread/lock.h" #include "glthread/once.h" #include "thread-optim.h" #include "gl_list.h" #include "gl_linkedhash_list.h" #include "gettext.h" #define _(str) gettext (str) /* Lock that protects the file_cleanup_list from concurrent modification in different threads. */ gl_lock_define_initialized (static, file_cleanup_list_lock) /* List of all temporary files without temporary directories. */ static gl_list_t /* */ volatile file_cleanup_list; /* List of all temporary directories. */ struct all_tempdirs dir_cleanup_list /* = { NULL, 0, 0 } */; /* List of all open file descriptors to temporary files. */ gl_list_t /* */ volatile descriptors; /* For the subdirs and for the files, we use a gl_list_t of type LINKEDHASH. Why? We need a data structure that 1) Can contain an arbitrary number of 'char *' values. The strings are compared via strcmp, not pointer comparison. 2) Has insertion and deletion operations that are fast: ideally O(1), or possibly O(log n). This is important for GNU sort, which may create a large number of temporary files. 3) Allows iteration through all elements from within a signal handler. 4) May or may not allow duplicates. It doesn't matter here, since any file or subdir can only be removed once. Criterion 1) would allow any gl_list_t or gl_oset_t implementation. Criterion 2) leaves only GL_LINKEDHASH_LIST, GL_TREEHASH_LIST, or GL_TREE_OSET. Criterion 3) puts at disadvantage GL_TREEHASH_LIST and GL_TREE_OSET. Namely, iteration through the elements of a binary tree requires access to many ->left, ->right, ->parent pointers. However, the rebalancing code for insertion and deletion in an AVL or red-black tree is so complicated that we cannot assume that >left, ->right, ->parent pointers are in a consistent state throughout these operations. Therefore, to avoid a crash in the signal handler, all destructive operations to the lists would have to be protected by a block_fatal_signals (); ... unblock_fatal_signals (); pair. Which causes extra system calls. Criterion 3) would also discourage GL_ARRAY_LIST and GL_CARRAY_LIST, if they were not already excluded. Namely, these implementations use xrealloc(), leaving a time window in which in the list->elements pointer points to already deallocated memory. To avoid a crash in the signal handler at such a moment, all destructive operations would have to protected by block/unblock_fatal_signals (), in this case too. A list of type GL_LINKEDHASH_LIST without duplicates fulfills all requirements: 2) Insertion and deletion are O(1) on average. 3) The gl_list_iterator, gl_list_iterator_next implementations do not trigger memory allocations, nor other system calls, and are therefore safe to be called from a signal handler. Furthermore, since SIGNAL_SAFE_LIST is defined, the implementation of the destructive functions ensures that the list structure is safe to be traversed at any moment, even when interrupted by an asynchronous signal. */ /* String equality and hash code functions used by the lists. */ bool clean_temp_string_equals (const void *x1, const void *x2) { const char *s1 = (const char *) x1; const char *s2 = (const char *) x2; return strcmp (s1, s2) == 0; } #define SIZE_BITS (sizeof (size_t) * CHAR_BIT) /* A hash function for NUL-terminated char* strings using the method described by Bruno Haible. See https://www.haible.de/bruno/hashfunc.html. */ size_t clean_temp_string_hash (const void *x) { const char *s = (const char *) x; size_t h = 0; for (; *s; s++) h = *s + ((h << 9) | (h >> (SIZE_BITS - 9))); return h; } /* The set of fatal signal handlers. Cached here because we are not allowed to call get_fatal_signal_set () from a signal handler. */ static const sigset_t *fatal_signal_set /* = NULL */; static void init_fatal_signal_set (void) { if (fatal_signal_set == NULL) fatal_signal_set = get_fatal_signal_set (); } /* Close a file descriptor. Avoids race conditions with normal thread code or signal-handler code that might want to close the same file descriptor. */ _GL_ASYNC_SAFE int clean_temp_asyncsafe_close (struct closeable_fd *element) { sigset_t saved_mask; int ret; int saved_errno; asyncsafe_spin_lock (&element->lock, fatal_signal_set, &saved_mask); if (!element->closed) { ret = close (element->fd); saved_errno = errno; element->closed = true; } else { ret = 0; saved_errno = 0; } asyncsafe_spin_unlock (&element->lock, &saved_mask); element->done = true; errno = saved_errno; return ret; } /* Initializations for use of this function. */ void clean_temp_init_asyncsafe_close (void) { init_fatal_signal_set (); } /* The signal handler. It gets called asynchronously. */ static _GL_ASYNC_SAFE void cleanup_action (_GL_UNUSED int sig) { size_t i; /* First close all file descriptors to temporary files. */ { gl_list_t fds = descriptors; if (fds != NULL) { gl_list_iterator_t iter; const void *element; iter = gl_list_iterator (fds); while (gl_list_iterator_next (&iter, &element, NULL)) { clean_temp_asyncsafe_close ((struct closeable_fd *) element); } gl_list_iterator_free (&iter); } } { gl_list_t files = file_cleanup_list; if (files != NULL) { gl_list_iterator_t iter; const void *element; iter = gl_list_iterator (files); while (gl_list_iterator_next (&iter, &element, NULL)) { const char *file = (const char *) element; unlink (file); } gl_list_iterator_free (&iter); } } for (i = 0; i < dir_cleanup_list.tempdir_count; i++) { struct tempdir *dir = dir_cleanup_list.tempdir_list[i]; if (dir != NULL) { gl_list_iterator_t iter; const void *element; /* First cleanup the files in the subdirectories. */ iter = gl_list_iterator (dir->files); while (gl_list_iterator_next (&iter, &element, NULL)) { const char *file = (const char *) element; unlink (file); } gl_list_iterator_free (&iter); /* Then cleanup the subdirectories. */ iter = gl_list_iterator (dir->subdirs); while (gl_list_iterator_next (&iter, &element, NULL)) { const char *subdir = (const char *) element; rmdir (subdir); } gl_list_iterator_free (&iter); /* Then cleanup the temporary directory itself. */ rmdir (dir->dirname); } } } /* Set to -1 if initialization of this facility failed. */ static int volatile init_failed /* = 0 */; /* Initializes this facility. */ static void do_clean_temp_init (void) { /* Initialize the data used by the cleanup handler. */ init_fatal_signal_set (); /* Register the cleanup handler. */ if (at_fatal_signal (&cleanup_action) < 0) init_failed = -1; } /* Ensure that do_clean_temp_init is called once only. */ gl_once_define(static, clean_temp_once) /* Initializes this facility upon first use. Return 0 upon success, or -1 if there was a memory allocation problem. */ int clean_temp_init (void) { gl_once (clean_temp_once, do_clean_temp_init); return init_failed; } /* Remove a file, with optional error message. Return 0 upon success, or -1 if there was some problem. */ int clean_temp_unlink (const char *absolute_file_name, bool cleanup_verbose) { if (unlink (absolute_file_name) < 0 && cleanup_verbose && errno != ENOENT) { error (0, errno, _("cannot remove temporary file %s"), absolute_file_name); return -1; } return 0; } /* ============= Temporary files without temporary directories ============= */ /* Register the given ABSOLUTE_FILE_NAME as being a file that needs to be removed. Should be called before the file ABSOLUTE_FILE_NAME is created. Return 0 upon success, or -1 if there was a memory allocation problem. */ int register_temporary_file (const char *absolute_file_name) { bool mt = gl_multithreaded (); if (mt) gl_lock_lock (file_cleanup_list_lock); int ret = 0; /* Make sure that this facility and the file_cleanup_list are initialized. */ if (file_cleanup_list == NULL) { if (clean_temp_init () < 0) { ret = -1; goto done; } file_cleanup_list = gl_list_nx_create_empty (GL_LINKEDHASH_LIST, clean_temp_string_equals, clean_temp_string_hash, NULL, false); if (file_cleanup_list == NULL) { ret = -1; goto done; } } /* Add absolute_file_name to file_cleanup_list, without duplicates. */ if (gl_list_search (file_cleanup_list, absolute_file_name) == NULL) { char *absolute_file_name_copy = strdup (absolute_file_name); if (absolute_file_name_copy == NULL) { ret = -1; goto done; } if (gl_list_nx_add_first (file_cleanup_list, absolute_file_name_copy) == NULL) { free (absolute_file_name_copy); ret = -1; goto done; } } done: if (mt) gl_lock_unlock (file_cleanup_list_lock); return ret; } /* Unregister the given ABSOLUTE_FILE_NAME as being a file that needs to be removed. Should be called when the file ABSOLUTE_FILE_NAME could not be created. */ void unregister_temporary_file (const char *absolute_file_name) { bool mt = gl_multithreaded (); if (mt) gl_lock_lock (file_cleanup_list_lock); gl_list_t list = file_cleanup_list; if (list != NULL) { gl_list_node_t node = gl_list_search (list, absolute_file_name); if (node != NULL) { char *old_string = (char *) gl_list_node_value (list, node); gl_list_remove_node (list, node); free (old_string); } } if (mt) gl_lock_unlock (file_cleanup_list_lock); } /* Remove the given ABSOLUTE_FILE_NAME and unregister it. CLEANUP_VERBOSE determines whether errors are reported to standard error. Return 0 upon success, or -1 if there was some problem. */ int cleanup_temporary_file (const char *absolute_file_name, bool cleanup_verbose) { int err; err = clean_temp_unlink (absolute_file_name, cleanup_verbose); unregister_temporary_file (absolute_file_name); return err; } libffcall-2.5/gnulib-lib/intprops.h0000664000000000000000000003625014631432055014253 00000000000000/* intprops.h -- properties of integer types Copyright (C) 2001-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_INTPROPS_H #define _GL_INTPROPS_H #include "intprops-internal.h" /* The extra casts in the following macros work around compiler bugs, e.g., in Cray C 5.0.3.0. */ /* True if the arithmetic type T is an integer type. bool counts as an integer. */ #define TYPE_IS_INTEGER(t) ((t) 1.5 == 1) /* True if the real type T is signed. */ #define TYPE_SIGNED(t) _GL_TYPE_SIGNED (t) /* Return 1 if the real expression E, after promotion, has a signed or floating type. Do not evaluate E. */ #define EXPR_SIGNED(e) _GL_EXPR_SIGNED (e) /* Minimum and maximum values for integer types and expressions. */ /* The width in bits of the integer type or expression T. Do not evaluate T. T must not be a bit-field expression. Padding bits are not supported; this is checked at compile-time below. */ #define TYPE_WIDTH(t) _GL_TYPE_WIDTH (t) /* The maximum and minimum values for the integer type T. */ #define TYPE_MINIMUM(t) ((t) ~ TYPE_MAXIMUM (t)) #define TYPE_MAXIMUM(t) \ ((t) (! TYPE_SIGNED (t) \ ? (t) -1 \ : ((((t) 1 << (TYPE_WIDTH (t) - 2)) - 1) * 2 + 1))) /* Bound on length of the string representing an unsigned integer value representable in B bits. log10 (2.0) < 146/485. The smallest value of B where this bound is not tight is 2621. */ #define INT_BITS_STRLEN_BOUND(b) (((b) * 146 + 484) / 485) /* Bound on length of the string representing an integer type or expression T. T must not be a bit-field expression. Subtract 1 for the sign bit if T is signed, and then add 1 more for a minus sign if needed. Because _GL_SIGNED_TYPE_OR_EXPR sometimes returns 1 when its argument is unsigned, this macro may overestimate the true bound by one byte when applied to unsigned types of size 2, 4, 16, ... bytes. */ #define INT_STRLEN_BOUND(t) \ (INT_BITS_STRLEN_BOUND (TYPE_WIDTH (t) - _GL_SIGNED_TYPE_OR_EXPR (t)) \ + _GL_SIGNED_TYPE_OR_EXPR (t)) /* Bound on buffer size needed to represent an integer type or expression T, including the terminating null. T must not be a bit-field expression. */ #define INT_BUFSIZE_BOUND(t) (INT_STRLEN_BOUND (t) + 1) /* Range overflow checks. The INT__RANGE_OVERFLOW macros return 1 if the corresponding C operators overflow arithmetically when given the same arguments. These macros do not rely on undefined or implementation-defined behavior. Although their implementations are simple and straightforward, they are harder to use and may be less efficient than the INT__WRAPV, INT__OK, and INT__OVERFLOW macros described below. Example usage: long int i = ...; long int j = ...; if (INT_MULTIPLY_RANGE_OVERFLOW (i, j, LONG_MIN, LONG_MAX)) printf ("multiply would overflow"); else printf ("product is %ld", i * j); Restrictions on *_RANGE_OVERFLOW macros: These macros do not check for all possible numerical problems or undefined or unspecified behavior: they do not check for division by zero, for bad shift counts, or for shifting negative numbers. These macros may evaluate their arguments zero or multiple times, so the arguments should not have side effects. The arithmetic arguments (including the MIN and MAX arguments) must be of the same integer type after the usual arithmetic conversions, and the type must have minimum value MIN and maximum MAX. Unsigned types should use a zero MIN of the proper type. Because all arguments are subject to integer promotions, these macros typically do not work on types narrower than 'int'. These macros are tuned for constant MIN and MAX. For commutative operations such as A + B, they are also tuned for constant B. */ /* Return 1 if A + B would overflow in [MIN,MAX] arithmetic. See above for restrictions. */ #define INT_ADD_RANGE_OVERFLOW(a, b, min, max) \ ((b) < 0 \ ? (a) < (min) - (b) \ : (max) - (b) < (a)) /* Return 1 if A - B would overflow in [MIN,MAX] arithmetic. See above for restrictions. */ #define INT_SUBTRACT_RANGE_OVERFLOW(a, b, min, max) \ ((b) < 0 \ ? (max) + (b) < (a) \ : (a) < (min) + (b)) /* Return 1 if - A would overflow in [MIN,MAX] arithmetic. See above for restrictions. */ #define INT_NEGATE_RANGE_OVERFLOW(a, min, max) \ _GL_INT_NEGATE_RANGE_OVERFLOW (a, min, max) /* Return 1 if A * B would overflow in [MIN,MAX] arithmetic. See above for restrictions. Avoid && and || as they tickle bugs in Sun C 5.11 2010/08/13 and other compilers; see . */ #define INT_MULTIPLY_RANGE_OVERFLOW(a, b, min, max) \ ((b) < 0 \ ? ((a) < 0 \ ? (a) < (max) / (b) \ : (b) == -1 \ ? 0 \ : (min) / (b) < (a)) \ : (b) == 0 \ ? 0 \ : ((a) < 0 \ ? (a) < (min) / (b) \ : (max) / (b) < (a))) /* Return 1 if A / B would overflow in [MIN,MAX] arithmetic. See above for restrictions. Do not check for division by zero. */ #define INT_DIVIDE_RANGE_OVERFLOW(a, b, min, max) \ ((min) < 0 && (b) == -1 && (a) < - (max)) /* Return 1 if A % B would overflow in [MIN,MAX] arithmetic. See above for restrictions. Do not check for division by zero. Mathematically, % should never overflow, but on x86-like hosts INT_MIN % -1 traps, and the C standard permits this, so treat this as an overflow too. */ #define INT_REMAINDER_RANGE_OVERFLOW(a, b, min, max) \ INT_DIVIDE_RANGE_OVERFLOW (a, b, min, max) /* Return 1 if A << B would overflow in [MIN,MAX] arithmetic. See above for restrictions. Here, MIN and MAX are for A only, and B need not be of the same type as the other arguments. The C standard says that behavior is undefined for shifts unless 0 <= B < wordwidth, and that when A is negative then A << B has undefined behavior and A >> B has implementation-defined behavior, but do not check these other restrictions. */ #define INT_LEFT_SHIFT_RANGE_OVERFLOW(a, b, min, max) \ ((a) < 0 \ ? (a) < (min) >> (b) \ : (max) >> (b) < (a)) /* The _GL*_OVERFLOW macros have the same restrictions as the *_RANGE_OVERFLOW macros, except that they do not assume that operands (e.g., A and B) have the same type as MIN and MAX. Instead, they assume that the result (e.g., A + B) has that type. */ #if _GL_HAS_BUILTIN_OVERFLOW_P # define _GL_ADD_OVERFLOW(a, b, min, max) \ __builtin_add_overflow_p (a, b, (__typeof__ ((a) + (b))) 0) # define _GL_SUBTRACT_OVERFLOW(a, b, min, max) \ __builtin_sub_overflow_p (a, b, (__typeof__ ((a) - (b))) 0) # define _GL_MULTIPLY_OVERFLOW(a, b, min, max) \ __builtin_mul_overflow_p (a, b, (__typeof__ ((a) * (b))) 0) #else # define _GL_ADD_OVERFLOW(a, b, min, max) \ ((min) < 0 ? INT_ADD_RANGE_OVERFLOW (a, b, min, max) \ : (a) < 0 ? (b) <= (a) + (b) \ : (b) < 0 ? (a) <= (a) + (b) \ : (a) + (b) < (b)) # define _GL_SUBTRACT_OVERFLOW(a, b, min, max) \ ((min) < 0 ? INT_SUBTRACT_RANGE_OVERFLOW (a, b, min, max) \ : (a) < 0 ? 1 \ : (b) < 0 ? (a) - (b) <= (a) \ : (a) < (b)) # define _GL_MULTIPLY_OVERFLOW(a, b, min, max) \ (((min) == 0 && (((a) < 0 && 0 < (b)) || ((b) < 0 && 0 < (a)))) \ || INT_MULTIPLY_RANGE_OVERFLOW (a, b, min, max)) #endif #define _GL_DIVIDE_OVERFLOW(a, b, min, max) \ ((min) < 0 ? (b) == _GL_INT_NEGATE_CONVERT (min, 1) && (a) < - (max) \ : (a) < 0 ? (b) <= (a) + (b) - 1 \ : (b) < 0 && (a) + (b) <= (a)) #define _GL_REMAINDER_OVERFLOW(a, b, min, max) \ ((min) < 0 ? (b) == _GL_INT_NEGATE_CONVERT (min, 1) && (a) < - (max) \ : (a) < 0 ? (a) % (b) != ((max) - (b) + 1) % (b) \ : (b) < 0 && ! _GL_UNSIGNED_NEG_MULTIPLE (a, b, max)) /* Return a nonzero value if A is a mathematical multiple of B, where A is unsigned, B is negative, and MAX is the maximum value of A's type. A's type must be the same as (A % B)'s type. Normally (A % -B == 0) suffices, but things get tricky if -B would overflow. */ #define _GL_UNSIGNED_NEG_MULTIPLE(a, b, max) \ (((b) < -_GL_SIGNED_INT_MAXIMUM (b) \ ? (_GL_SIGNED_INT_MAXIMUM (b) == (max) \ ? (a) \ : (a) % (_GL_INT_CONVERT (a, _GL_SIGNED_INT_MAXIMUM (b)) + 1)) \ : (a) % - (b)) \ == 0) /* Check for integer overflow, and report low order bits of answer. The INT__OVERFLOW macros return 1 if the corresponding C operators might not yield numerically correct answers due to arithmetic overflow. The INT__WRAPV macros compute the low-order bits of the sum, difference, and product of two C integers, and return 1 if these low-order bits are not numerically correct. These macros work correctly on all known practical hosts, and do not rely on undefined behavior due to signed arithmetic overflow. Example usage, assuming A and B are long int: if (INT_MULTIPLY_OVERFLOW (a, b)) printf ("result would overflow\n"); else printf ("result is %ld (no overflow)\n", a * b); Example usage with WRAPV flavor: long int result; bool overflow = INT_MULTIPLY_WRAPV (a, b, &result); printf ("result is %ld (%s)\n", result, overflow ? "after overflow" : "no overflow"); Restrictions on these macros: These macros do not check for all possible numerical problems or undefined or unspecified behavior: they do not check for division by zero, for bad shift counts, or for shifting negative numbers. These macros may evaluate their arguments zero or multiple times, so the arguments should not have side effects. The WRAPV macros are not constant expressions. They support only +, binary -, and *. Because the WRAPV macros convert the result, they report overflow in different circumstances than the OVERFLOW macros do. For example, in the typical case with 16-bit 'short' and 32-bit 'int', if A, B and *R are all of type 'short' then INT_ADD_OVERFLOW (A, B) returns false because the addition cannot overflow after A and B are converted to 'int', whereas INT_ADD_WRAPV (A, B, R) returns true or false depending on whether the sum fits into 'short'. These macros are tuned for their last input argument being a constant. A, B, and *R should be integers; they need not be the same type, and they need not be all signed or all unsigned. However, none of the integer types should be bit-precise, and *R's type should not be char, bool, or an enumeration type. Return 1 if the integer expressions A * B, A - B, -A, A * B, A / B, A % B, and A << B would overflow, respectively. */ #define INT_ADD_OVERFLOW(a, b) \ _GL_BINARY_OP_OVERFLOW (a, b, _GL_ADD_OVERFLOW) #define INT_SUBTRACT_OVERFLOW(a, b) \ _GL_BINARY_OP_OVERFLOW (a, b, _GL_SUBTRACT_OVERFLOW) #define INT_NEGATE_OVERFLOW(a) _GL_INT_NEGATE_OVERFLOW (a) #define INT_MULTIPLY_OVERFLOW(a, b) \ _GL_BINARY_OP_OVERFLOW (a, b, _GL_MULTIPLY_OVERFLOW) #define INT_DIVIDE_OVERFLOW(a, b) \ _GL_BINARY_OP_OVERFLOW (a, b, _GL_DIVIDE_OVERFLOW) #define INT_REMAINDER_OVERFLOW(a, b) \ _GL_BINARY_OP_OVERFLOW (a, b, _GL_REMAINDER_OVERFLOW) #define INT_LEFT_SHIFT_OVERFLOW(a, b) \ INT_LEFT_SHIFT_RANGE_OVERFLOW (a, b, \ _GL_INT_MINIMUM (a), _GL_INT_MAXIMUM (a)) /* Return 1 if the expression A B would overflow, where OP_RESULT_OVERFLOW (A, B, MIN, MAX) does the actual test, assuming MIN and MAX are the minimum and maximum for the result type. Arguments should be free of side effects. */ #define _GL_BINARY_OP_OVERFLOW(a, b, op_result_overflow) \ op_result_overflow (a, b, \ _GL_INT_MINIMUM (_GL_INT_CONVERT (a, b)), \ _GL_INT_MAXIMUM (_GL_INT_CONVERT (a, b))) /* Store the low-order bits of A + B, A - B, A * B, respectively, into *R. Return 1 if the result overflows. See above for restrictions. */ #define INT_ADD_WRAPV(a, b, r) _GL_INT_ADD_WRAPV (a, b, r) #define INT_SUBTRACT_WRAPV(a, b, r) _GL_INT_SUBTRACT_WRAPV (a, b, r) #define INT_MULTIPLY_WRAPV(a, b, r) _GL_INT_MULTIPLY_WRAPV (a, b, r) /* The following macros compute A + B, A - B, and A * B, respectively. If no overflow occurs, they set *R to the result and return 1; otherwise, they return 0 and may modify *R. Example usage: long int result; if (INT_ADD_OK (a, b, &result)) printf ("result is %ld\n", result); else printf ("overflow\n"); A, B, and *R should be integers; they need not be the same type, and they need not be all signed or all unsigned. However, none of the integer types should be bit-precise, and *R's type should not be char, bool, or an enumeration type. These macros work correctly on all known practical hosts, and do not rely on undefined behavior due to signed arithmetic overflow. These macros are not constant expressions. These macros may evaluate their arguments zero or multiple times, so the arguments should not have side effects. These macros are tuned for B being a constant. */ #define INT_ADD_OK(a, b, r) (! INT_ADD_WRAPV (a, b, r)) #define INT_SUBTRACT_OK(a, b, r) (! INT_SUBTRACT_WRAPV (a, b, r)) #define INT_MULTIPLY_OK(a, b, r) (! INT_MULTIPLY_WRAPV (a, b, r)) #endif /* _GL_INTPROPS_H */ libffcall-2.5/gnulib-lib/vma-iter.h0000664000000000000000000000567214664171733014136 00000000000000/* Iteration over virtual memory areas. Copyright (C) 2011-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2011. This file is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ #ifndef _VMA_ITER_H #define _VMA_ITER_H /* This file uses HAVE_PSTAT_GETPROCVM, HAVE_MQUERY. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #ifdef __cplusplus extern "C" { #endif /* Bit mask for the FLAGS parameter of a vma_iterate callback function. */ #define VMA_PROT_READ (1<<0) #define VMA_PROT_WRITE (1<<1) #define VMA_PROT_EXECUTE (1<<2) typedef int (*vma_iterate_callback_fn) (void *data, uintptr_t start, uintptr_t end, unsigned int flags); /* Iterate over the virtual memory areas of the current process. If such iteration is supported, the callback is called once for every virtual memory area, in ascending order, with the following arguments: - DATA is the same argument as passed to vma_iterate. - START is the address of the first byte in the area, page-aligned. - END is the address of the last byte in the area plus 1, page-aligned. Note that it may be 0 for the last area in the address space. - FLAGS is a combination of the VMA_* bits. If the callback returns 0, the iteration continues. If it returns 1, the iteration terminates prematurely. This function may open file descriptors, but does not call malloc(). Return 0 if all went well, or -1 in case of error. */ extern int vma_iterate (vma_iterate_callback_fn callback, void *data); /* The macro VMA_ITERATE_SUPPORTED indicates that vma_iterate is supported on this platform. Note that even when this macro is defined, vma_iterate() may still fail to find any virtual memory area, for example if /proc is not mounted. */ #if defined __linux__ || defined __ANDROID__ || defined __GNU__ || defined __FreeBSD_kernel__ || defined __FreeBSD__ || defined __DragonFly__ || defined __NetBSD__ || defined _AIX || defined __sgi || defined __osf__ || defined __sun || HAVE_PSTAT_GETPROCVM || (defined __APPLE__ && defined __MACH__) || defined _WIN32 || defined __CYGWIN__ || defined __BEOS__ || defined __HAIKU__ || defined __minix || HAVE_MQUERY # define VMA_ITERATE_SUPPORTED 1 #endif #ifdef __cplusplus } #endif #endif /* _VMA_ITER_H */ libffcall-2.5/gnulib-lib/basename-lgpl.h0000664000000000000000000000551214631432055015101 00000000000000/* Extract the last component (base name) of a file name. Copyright (C) 1998, 2001, 2003-2006, 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _BASENAME_LGPL_H #define _BASENAME_LGPL_H /* This file uses _GL_ATTRIBUTE_PURE. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include #ifndef DOUBLE_SLASH_IS_DISTINCT_ROOT # define DOUBLE_SLASH_IS_DISTINCT_ROOT 0 #endif #ifdef __cplusplus extern "C" { #endif /* Return the address of the last file name component of FILENAME. If FILENAME has some trailing slash(es), they are considered to be part of the last component. If FILENAME has no relative file name components because it is a file system root, return the empty string. Examples: FILENAME RESULT "foo.c" "foo.c" "foo/bar.c" "bar.c" "/foo/bar.c" "bar.c" "foo/bar/" "bar/" "foo/bar//" "bar//" "/" "" "//" "" "" "" The return value is a tail of the given FILENAME; do NOT free() it! */ /* This function was traditionally called 'basename', but we avoid this function name because * Various platforms have different functions in their libc. In particular, the glibc basename(), defined in , does not consider trailing slashes to be part of the component: FILENAME RESULT "foo/bar/" "" "foo/bar//" "" * The 'basename' command eliminates trailing slashes and for a root produces a non-empty result: FILENAME RESULT "foo/bar/" "bar" "foo/bar//" "bar" "/" "/" "//" "/" */ extern char *last_component (char const *filename) _GL_ATTRIBUTE_PURE; /* Return the length of the basename FILENAME. Typically FILENAME is the value returned by base_name or last_component. Act like strlen (FILENAME), except omit all trailing slashes. */ extern size_t base_len (char const *filename) _GL_ATTRIBUTE_PURE; #ifdef __cplusplus } /* extern "C" */ #endif #endif /* _BASENAME_LGPL_H */ libffcall-2.5/gnulib-lib/vma-prot.h0000664000000000000000000000326114664171733014147 00000000000000/* Determine the protection of a virtual memory area. Copyright (C) 2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2024. */ #ifndef _VMA_PROT_H #define _VMA_PROT_H /* Get size_t. */ #include /* Get VMA_PROT_READ, VMA_PROT_WRITE, VMA_PROT_EXECUTE. */ #include "vma-iter.h" #ifdef __cplusplus extern "C" { #endif /* Returns the declared permissions available on the memory area that starts at START and is SIZE bytes long, as a combination of the bit masks VMA_PROT_READ, VMA_PROT_WRITE, VMA_PROT_EXECUTE. Note: The effective permissions may be larger. For example, some hardware allows execute permission anywhere where read permission is present. Returns -1 if it cannot be determined. Note: This function is expensive. If possible, an application should find faster alternatives for memory areas that it has allocated itself, such as through malloc(), mmap(), or shmat(). */ extern int get_vma_prot (void *start, size_t size); #ifdef __cplusplus } #endif #endif /* _VMA_PROT_H */ libffcall-2.5/gnulib-lib/fd-hook.c0000664000000000000000000000702514631432055013715 00000000000000/* Hook for making file descriptor functions close(), ioctl() extensible. Copyright (C) 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2009. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "fd-hook.h" #include /* Currently, this entire code is only needed for the handling of sockets on native Windows platforms. */ #if WINDOWS_SOCKETS /* The first and last link in the doubly linked list. Initially the list is empty. */ static struct fd_hook anchor = { &anchor, &anchor, NULL, NULL }; int execute_close_hooks (const struct fd_hook *remaining_list, gl_close_fn primary, int fd) { if (remaining_list == &anchor) /* End of list reached. */ return primary (fd); else return remaining_list->private_close_fn (remaining_list->private_next, primary, fd); } int execute_all_close_hooks (gl_close_fn primary, int fd) { return execute_close_hooks (anchor.private_next, primary, fd); } int execute_ioctl_hooks (const struct fd_hook *remaining_list, gl_ioctl_fn primary, int fd, int request, void *arg) { if (remaining_list == &anchor) /* End of list reached. */ return primary (fd, request, arg); else return remaining_list->private_ioctl_fn (remaining_list->private_next, primary, fd, request, arg); } int execute_all_ioctl_hooks (gl_ioctl_fn primary, int fd, int request, void *arg) { return execute_ioctl_hooks (anchor.private_next, primary, fd, request, arg); } void register_fd_hook (close_hook_fn close_hook, ioctl_hook_fn ioctl_hook, struct fd_hook *link) { if (close_hook == NULL) close_hook = execute_close_hooks; if (ioctl_hook == NULL) ioctl_hook = execute_ioctl_hooks; if (link->private_next == NULL && link->private_prev == NULL) { /* Add the link to the doubly linked list. */ link->private_next = anchor.private_next; link->private_prev = &anchor; link->private_close_fn = close_hook; link->private_ioctl_fn = ioctl_hook; anchor.private_next->private_prev = link; anchor.private_next = link; } else { /* The link is already in use. */ if (link->private_close_fn != close_hook || link->private_ioctl_fn != ioctl_hook) abort (); } } void unregister_fd_hook (struct fd_hook *link) { struct fd_hook *next = link->private_next; struct fd_hook *prev = link->private_prev; if (next != NULL && prev != NULL) { /* The link is in use. Remove it from the doubly linked list. */ prev->private_next = next; next->private_prev = prev; /* Clear the link, to mark it unused. */ link->private_next = NULL; link->private_prev = NULL; link->private_close_fn = NULL; link->private_ioctl_fn = NULL; } } #endif libffcall-2.5/gnulib-lib/gl_anyhash1.h0000664000000000000000000000257314631432055014574 00000000000000/* Hash table for sequential list, set, and map data type. Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Common code of gl_linkedhash_list.c, gl_avltreehash_list.c, gl_rbtreehash_list.c, gl_linkedhash_set.c, gl_hash_set.c, gl_linkedhash_map.c, gl_hash_map.c. */ /* Hash table entry. */ struct gl_hash_entry { struct gl_hash_entry *hash_next; /* chain of entries in same bucket */ size_t hashcode; /* cache of the hash code of - the key (for map data type) or - the value (for list, set data types) */ }; typedef struct gl_hash_entry * gl_hash_entry_t; libffcall-2.5/gnulib-lib/attribute.h0000664000000000000000000003233514657156076014416 00000000000000/* ATTRIBUTE_* macros for using attributes in GCC and similar compilers Copyright 2020-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Paul Eggert. */ /* Provide public ATTRIBUTE_* names for the private _GL_ATTRIBUTE_* macros used within Gnulib. */ /* The placement of these attributes depends on the kind of declaration and, in some cases, also on the programming language (C vs. C++). In function declarations and function definitions: * ATTRIBUTE_NOTHROW must come after the parameter list. * The macros ATTRIBUTE_CONST ATTRIBUTE_PURE DEPRECATED MAYBE_UNUSED NODISCARD REPRODUCIBLE UNSEQUENCED must come before the return type, and more precisely: - In a function declaration/definition without a storage-class specifier: at the beginning of the declaration/definition. - In a function declaration/definition with a storage-class specifier: - In C: before the storage-class specifier. - In C++: between the storage-class specifier and the return type. * The other macros can be placed - Either - In a function declaration/definition without a storage-class specifier: at the beginning of the declaration/definition. - In a function declaration/definition with a storage-class specifier: between the storage-class specifier and the return type. - Or after the parameter list, ∙ but after ATTRIBUTE_NOTHROW if present. In other declarations, such as variable declarations: * Either - In C: before the storage-class specifier. - In C++: between the storage-class specifier and the return type. Then they apply to all entities that are declared by the declaration. * Or immediately after the name of an entity being declared by the declaration. Then they apply to that entity only. */ #ifndef _GL_ATTRIBUTE_H #define _GL_ATTRIBUTE_H /* This file defines two types of attributes: * C23 standard attributes. These have macro names that do not begin with 'ATTRIBUTE_'. * Selected GCC attributes; see: https://gcc.gnu.org/onlinedocs/gcc/Common-Function-Attributes.html https://gcc.gnu.org/onlinedocs/gcc/Common-Variable-Attributes.html https://gcc.gnu.org/onlinedocs/gcc/Common-Type-Attributes.html These names begin with 'ATTRIBUTE_' to avoid name clashes. */ /* This file uses _GL_ATTRIBUTE_ALLOC_SIZE, _GL_ATTRIBUTE_ALWAYS_INLINE, _GL_ATTRIBUTE_ARTIFICIAL, _GL_ATTRIBUTE_COLD, _GL_ATTRIBUTE_CONST, _GL_ATTRIBUTE_DEALLOC, _GL_ATTRIBUTE_DEPRECATED, _GL_ATTRIBUTE_ERROR, _GL_ATTRIBUTE_WARNING, _GL_ATTRIBUTE_EXTERNALLY_VISIBLE, _GL_ATTRIBUTE_FALLTHROUGH, _GL_ATTRIBUTE_FORMAT, _GL_ATTRIBUTE_LEAF, _GL_ATTRIBUTE_MALLOC, _GL_ATTRIBUTE_MAY_ALIAS, _GL_ATTRIBUTE_MAYBE_UNUSED, _GL_ATTRIBUTE_NODISCARD, _GL_ATTRIBUTE_NOINLINE, _GL_ATTRIBUTE_NONNULL, _GL_ATTRIBUTE_NONSTRING, _GL_ATTRIBUTE_NOTHROW, _GL_ATTRIBUTE_PACKED, _GL_ATTRIBUTE_PURE, _GL_ATTRIBUTE_REPRODUCIBLE, _GL_ATTRIBUTE_RETURNS_NONNULL, _GL_ATTRIBUTE_SENTINEL, _GL_ATTRIBUTE_UNSEQUENCED. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* =============== Attributes for specific kinds of functions =============== */ /* Attributes for functions that should not be used. */ /* Warn if the entity is used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: namespace, class, template specialization. */ #define DEPRECATED _GL_ATTRIBUTE_DEPRECATED /* If a function call is not optimized way, warn with MSG. */ /* Applies to: functions. */ #define ATTRIBUTE_WARNING(msg) _GL_ATTRIBUTE_WARNING (msg) /* If a function call is not optimized way, report an error with MSG. */ /* Applies to: functions. */ #define ATTRIBUTE_ERROR(msg) _GL_ATTRIBUTE_ERROR (msg) /* Attributes for memory-allocating functions. */ /* The function returns a pointer to freshly allocated memory. */ /* Applies to: functions. */ #define ATTRIBUTE_MALLOC _GL_ATTRIBUTE_MALLOC /* ATTRIBUTE_ALLOC_SIZE ((N)) - The Nth argument of the function is the size of the returned memory block. ATTRIBUTE_ALLOC_SIZE ((M, N)) - Multiply the Mth and Nth arguments to determine the size of the returned memory block. */ /* Applies to: functions, pointer to functions, function types. */ #define ATTRIBUTE_ALLOC_SIZE(args) _GL_ATTRIBUTE_ALLOC_SIZE (args) /* ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. ATTRIBUTE_DEALLOC_FREE declares that the function returns pointers that can be freed via 'free'; it can be used only after declaring 'free'. */ /* Applies to: functions. Cannot be used on inline functions. */ #define ATTRIBUTE_DEALLOC(f, i) _GL_ATTRIBUTE_DEALLOC(f, i) #define ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_DEALLOC_FREE /* Attributes for variadic functions. */ /* The variadic function expects a trailing NULL argument. ATTRIBUTE_SENTINEL () - The last argument is NULL (requires C99). ATTRIBUTE_SENTINEL ((N)) - The (N+1)st argument from the end is NULL. */ /* Applies to: functions. */ #define ATTRIBUTE_SENTINEL(pos) _GL_ATTRIBUTE_SENTINEL (pos) /* ================== Attributes for compiler diagnostics ================== */ /* Attributes that help the compiler diagnose programmer mistakes. Some of them may also help for some compiler optimizations. */ /* ATTRIBUTE_FORMAT ((ARCHETYPE, STRING-INDEX, FIRST-TO-CHECK)) - The STRING-INDEXth function argument is a format string of style ARCHETYPE, which is one of: printf, gnu_printf scanf, gnu_scanf, strftime, gnu_strftime, strfmon, or the same thing prefixed and suffixed with '__'. If FIRST-TO-CHECK is not 0, arguments starting at FIRST-TO_CHECK are suitable for the format string. */ /* Applies to: functions. */ #define ATTRIBUTE_FORMAT(spec) _GL_ATTRIBUTE_FORMAT (spec) /* ATTRIBUTE_NONNULL ((N1, N2,...)) - Arguments N1, N2,... must not be NULL. ATTRIBUTE_NONNULL () - All pointer arguments must not be null. */ /* Applies to: functions. */ #define ATTRIBUTE_NONNULL(args) _GL_ATTRIBUTE_NONNULL (args) /* The function's return value is a non-NULL pointer. */ /* Applies to: functions. */ #define ATTRIBUTE_RETURNS_NONNULL _GL_ATTRIBUTE_RETURNS_NONNULL /* Warn if the caller does not use the return value, unless the caller uses something like ignore_value. */ /* Applies to: function, enumeration, class. */ #define NODISCARD _GL_ATTRIBUTE_NODISCARD /* Attributes that disable false alarms when the compiler diagnoses programmer "mistakes". */ /* Do not warn if the entity is not used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: class. */ #define MAYBE_UNUSED _GL_ATTRIBUTE_MAYBE_UNUSED /* The contents of a character array is not meant to be NUL-terminated. */ /* Applies to: struct/union members and variables that are arrays of element type '[[un]signed] char'. */ #define ATTRIBUTE_NONSTRING _GL_ATTRIBUTE_NONSTRING /* Do not warn if control flow falls through to the immediately following 'case' or 'default' label. */ /* Applies to: Empty statement (;), inside a 'switch' statement. */ #define FALLTHROUGH _GL_ATTRIBUTE_FALLTHROUGH /* ================== Attributes for debugging information ================== */ /* Attributes regarding debugging information emitted by the compiler. */ /* Omit the function from stack traces when debugging. */ /* Applies to: functions. */ #define ATTRIBUTE_ARTIFICIAL _GL_ATTRIBUTE_ARTIFICIAL /* Make the entity visible to debuggers etc., even with '-fwhole-program'. */ /* Applies to: functions, variables. */ #define ATTRIBUTE_EXTERNALLY_VISIBLE _GL_ATTRIBUTE_EXTERNALLY_VISIBLE /* ========== Attributes that mainly direct compiler optimizations ========== */ /* The function does not throw exceptions. */ /* Applies to: functions. */ /* After a function's parameter list, this attribute must come first, before other attributes. */ #define ATTRIBUTE_NOTHROW _GL_ATTRIBUTE_NOTHROW /* Do not inline the function. */ /* Applies to: functions. */ #define ATTRIBUTE_NOINLINE _GL_ATTRIBUTE_NOINLINE /* Always inline the function, and report an error if the compiler cannot inline. */ /* Applies to: functions. */ #define ATTRIBUTE_ALWAYS_INLINE _GL_ATTRIBUTE_ALWAYS_INLINE /* It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used. This attribute is safe for a function that neither depends on nor affects state, and always returns exactly once - e.g., does not raise an exception, call longjmp, or loop forever. (This attribute is stricter than ATTRIBUTE_PURE because the function cannot observe state. It is stricter than UNSEQUENCED because the function must return exactly once and cannot depend on state addressed by its arguments.) */ /* Applies to: functions. */ #define ATTRIBUTE_CONST _GL_ATTRIBUTE_CONST /* It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same. This attribute is safe for a function that is effectless, idempotent, stateless, and independent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is stricter than REPRODUCIBLE because the function must be stateless and independent. It is looser than ATTRIBUTE_CONST because the function need not return exactly once and can depend on state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function type. */ #define UNSEQUENCED _GL_ATTRIBUTE_UNSEQUENCED /* It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used, and if observable state is the same. This attribute is safe for a function that does not affect observable state and always returns exactly once. (This attribute is looser than ATTRIBUTE_CONST because the function can depend on observable state. It is stricter than REPRODUCIBLE because the function must return exactly once and cannot affect state addressed by its arguments.) */ /* Applies to: functions. */ #define ATTRIBUTE_PURE _GL_ATTRIBUTE_PURE /* It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same and is updated in time for the rest of the program. This attribute is safe for a function that is effectless and idempotent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is looser than UNSEQUENCED because the function need not be stateless and idempotent. It is looser than ATTRIBUTE_PURE because the function need not return exactly once and can affect state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function type. */ #define REPRODUCIBLE _GL_ATTRIBUTE_REPRODUCIBLE /* The function is rarely executed. */ /* Applies to: functions. */ #define ATTRIBUTE_COLD _GL_ATTRIBUTE_COLD /* If called from some other compilation unit, the function executes code from that unit only by return or by exception handling, letting the compiler optimize that unit more aggressively. */ /* Applies to: functions. */ #define ATTRIBUTE_LEAF _GL_ATTRIBUTE_LEAF /* For struct members: The member has the smallest possible alignment. For struct, union, class: All members have the smallest possible alignment, minimizing the memory required. */ /* Applies to: struct members, struct, union, in C++ also: class. */ #define ATTRIBUTE_PACKED _GL_ATTRIBUTE_PACKED /* ================ Attributes that make invalid code valid ================ */ /* Attributes that prevent fatal compiler optimizations for code that is not fully ISO C compliant. */ /* Pointers to the type may point to the same storage as pointers to other types, thus disabling strict aliasing optimization. */ /* Applies to: types. */ #define ATTRIBUTE_MAY_ALIAS _GL_ATTRIBUTE_MAY_ALIAS #endif /* _GL_ATTRIBUTE_H */ libffcall-2.5/gnulib-lib/msvc-inval.h0000664000000000000000000002143514631432055014453 00000000000000/* Invalid parameter handler for MSVC runtime libraries. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _MSVC_INVAL_H #define _MSVC_INVAL_H /* With MSVC runtime libraries with the "invalid parameter handler" concept, functions like fprintf(), dup2(), or close() crash when the caller passes an invalid argument. But POSIX wants error codes (such as EINVAL or EBADF) instead. This file defines macros that turn such an invalid parameter notification into a non-local exit. An error code can then be produced at the target of this exit. You can thus write code like TRY_MSVC_INVAL { } CATCH_MSVC_INVAL { } DONE_MSVC_INVAL; This entire block expands to a single statement. The handling of invalid parameters can be done in three ways: * The default way, which is reasonable for programs (not libraries): AC_DEFINE([MSVC_INVALID_PARAMETER_HANDLING], [DEFAULT_HANDLING]) * The way for libraries that make "hairy" calls (like close(-1), or fclose(fp) where fileno(fp) is closed, or simply getdtablesize()): AC_DEFINE([MSVC_INVALID_PARAMETER_HANDLING], [HAIRY_LIBRARY_HANDLING]) * The way for libraries that make no "hairy" calls: AC_DEFINE([MSVC_INVALID_PARAMETER_HANDLING], [SANE_LIBRARY_HANDLING]) */ /* This file uses HAVE_MSVC_INVALID_PARAMETER_HANDLER. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #define DEFAULT_HANDLING 0 #define HAIRY_LIBRARY_HANDLING 1 #define SANE_LIBRARY_HANDLING 2 #if HAVE_MSVC_INVALID_PARAMETER_HANDLER \ && !(MSVC_INVALID_PARAMETER_HANDLING == SANE_LIBRARY_HANDLING) /* A native Windows platform with the "invalid parameter handler" concept, and either DEFAULT_HANDLING or HAIRY_LIBRARY_HANDLING. */ # if MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING /* Default handling. */ # ifdef __cplusplus extern "C" { # endif /* Ensure that the invalid parameter handler in installed that just returns. Because we assume no other part of the program installs a different invalid parameter handler, this solution is multithread-safe. */ extern void gl_msvc_inval_ensure_handler (void); # ifdef __cplusplus } # endif # define TRY_MSVC_INVAL \ do \ { \ gl_msvc_inval_ensure_handler (); \ if (1) # define CATCH_MSVC_INVAL \ else # define DONE_MSVC_INVAL \ } \ while (0) # else /* Handling for hairy libraries. */ # include /* Gnulib can define its own status codes, as described in the page "Raising Software Exceptions" on microsoft.com . Our status codes are composed of - 0xE0000000, mandatory for all user-defined status codes, - 0x474E550, a API identifier ("GNU"), - 0, 1, 2, ..., used to distinguish different status codes from the same API. */ # define STATUS_GNULIB_INVALID_PARAMETER (0xE0000000 + 0x474E550 + 0) # if defined _MSC_VER /* A compiler that supports __try/__except, as described in the page "try-except statement" on microsoft.com . With __try/__except, we can use the multithread-safe exception handling. */ # ifdef __cplusplus extern "C" { # endif /* Ensure that the invalid parameter handler in installed that raises a software exception with code STATUS_GNULIB_INVALID_PARAMETER. Because we assume no other part of the program installs a different invalid parameter handler, this solution is multithread-safe. */ extern void gl_msvc_inval_ensure_handler (void); # ifdef __cplusplus } # endif # define TRY_MSVC_INVAL \ do \ { \ gl_msvc_inval_ensure_handler (); \ __try # define CATCH_MSVC_INVAL \ __except (GetExceptionCode () == STATUS_GNULIB_INVALID_PARAMETER \ ? EXCEPTION_EXECUTE_HANDLER \ : EXCEPTION_CONTINUE_SEARCH) # define DONE_MSVC_INVAL \ } \ while (0) # else /* Any compiler. We can only use setjmp/longjmp. */ # include # ifdef __cplusplus extern "C" { # endif struct gl_msvc_inval_per_thread { /* The restart that will resume execution at the code between CATCH_MSVC_INVAL and DONE_MSVC_INVAL. It is enabled only between TRY_MSVC_INVAL and CATCH_MSVC_INVAL. */ jmp_buf restart; /* Tells whether the contents of restart is valid. */ int restart_valid; }; /* Ensure that the invalid parameter handler in installed that passes control to the gl_msvc_inval_restart if it is valid, or raises a software exception with code STATUS_GNULIB_INVALID_PARAMETER otherwise. Because we assume no other part of the program installs a different invalid parameter handler, this solution is multithread-safe. */ extern void gl_msvc_inval_ensure_handler (void); /* Return a pointer to the per-thread data for the current thread. */ extern struct gl_msvc_inval_per_thread *gl_msvc_inval_current (void); # ifdef __cplusplus } # endif # define TRY_MSVC_INVAL \ do \ { \ struct gl_msvc_inval_per_thread *msvc_inval_current; \ gl_msvc_inval_ensure_handler (); \ msvc_inval_current = gl_msvc_inval_current (); \ /* First, initialize gl_msvc_inval_restart. */ \ if (setjmp (msvc_inval_current->restart) == 0) \ { \ /* Then, mark it as valid. */ \ msvc_inval_current->restart_valid = 1; # define CATCH_MSVC_INVAL \ /* Execution completed. \ Mark gl_msvc_inval_restart as invalid. */ \ msvc_inval_current->restart_valid = 0; \ } \ else \ { \ /* Execution triggered an invalid parameter notification. \ Mark gl_msvc_inval_restart as invalid. */ \ msvc_inval_current->restart_valid = 0; # define DONE_MSVC_INVAL \ } \ } \ while (0) # endif # endif #else /* A platform that does not need to the invalid parameter handler, or when SANE_LIBRARY_HANDLING is desired. */ /* The braces here avoid GCC warnings like "warning: suggest explicit braces to avoid ambiguous 'else'". */ # define TRY_MSVC_INVAL \ do \ { \ if (1) # define CATCH_MSVC_INVAL \ else # define DONE_MSVC_INVAL \ } \ while (0) #endif #endif /* _MSVC_INVAL_H */ libffcall-2.5/gnulib-lib/errno.in.h0000664000000000000000000001674414657156076014153 00000000000000/* A POSIX-like . Copyright (C) 2008-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _@GUARD_PREFIX@_ERRNO_H #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_ERRNO_H@ #ifndef _@GUARD_PREFIX@_ERRNO_H #define _@GUARD_PREFIX@_ERRNO_H /* On native Windows platforms, many macros are not defined. */ # if defined _WIN32 && ! defined __CYGWIN__ /* These are the same values as defined by MSVC 10, for interoperability. */ # ifndef ENOMSG # define ENOMSG 122 # define GNULIB_defined_ENOMSG 1 # endif # ifndef EIDRM # define EIDRM 111 # define GNULIB_defined_EIDRM 1 # endif # ifndef ENOLINK # define ENOLINK 121 # define GNULIB_defined_ENOLINK 1 # endif # ifndef EPROTO # define EPROTO 134 # define GNULIB_defined_EPROTO 1 # endif # ifndef EBADMSG # define EBADMSG 104 # define GNULIB_defined_EBADMSG 1 # endif # ifndef EOVERFLOW # define EOVERFLOW 132 # define GNULIB_defined_EOVERFLOW 1 # endif # ifndef ENOTSUP # define ENOTSUP 129 # define GNULIB_defined_ENOTSUP 1 # endif # ifndef ENETRESET # define ENETRESET 117 # define GNULIB_defined_ENETRESET 1 # endif # ifndef ECONNABORTED # define ECONNABORTED 106 # define GNULIB_defined_ECONNABORTED 1 # endif # ifndef ECANCELED # define ECANCELED 105 # define GNULIB_defined_ECANCELED 1 # endif # ifndef EOWNERDEAD # define EOWNERDEAD 133 # define GNULIB_defined_EOWNERDEAD 1 # endif # ifndef ENOTRECOVERABLE # define ENOTRECOVERABLE 127 # define GNULIB_defined_ENOTRECOVERABLE 1 # endif # ifndef EINPROGRESS # define EINPROGRESS 112 # define EALREADY 103 # define ENOTSOCK 128 # define EDESTADDRREQ 109 # define EMSGSIZE 115 # define EPROTOTYPE 136 # define ENOPROTOOPT 123 # define EPROTONOSUPPORT 135 # define EOPNOTSUPP 130 # define EAFNOSUPPORT 102 # define EADDRINUSE 100 # define EADDRNOTAVAIL 101 # define ENETDOWN 116 # define ENETUNREACH 118 # define ECONNRESET 108 # define ENOBUFS 119 # define EISCONN 113 # define ENOTCONN 126 # define ETIMEDOUT 138 # define ECONNREFUSED 107 # define ELOOP 114 # define EHOSTUNREACH 110 # define EWOULDBLOCK 140 # define GNULIB_defined_ESOCK 1 # endif # ifndef ETXTBSY # define ETXTBSY 139 # define ENODATA 120 /* not required by POSIX */ # define ENOSR 124 /* not required by POSIX */ # define ENOSTR 125 /* not required by POSIX */ # define ETIME 137 /* not required by POSIX */ # define EOTHER 131 /* not required by POSIX */ # define GNULIB_defined_ESTREAMS 1 # endif /* These are intentionally the same values as the WSA* error numbers, defined in . */ # define ESOCKTNOSUPPORT 10044 # define EPFNOSUPPORT 10046 /* not required by POSIX */ # define ESHUTDOWN 10058 /* not required by POSIX */ # define ETOOMANYREFS 10059 /* not required by POSIX */ # define EHOSTDOWN 10064 /* not required by POSIX */ # define EPROCLIM 10067 /* not required by POSIX */ # define EUSERS 10068 /* not required by POSIX */ # define EDQUOT 10069 # define ESTALE 10070 # define EREMOTE 10071 /* not required by POSIX */ # define GNULIB_defined_EWINSOCK 1 # endif /* On OSF/1 5.1, when _XOPEN_SOURCE_EXTENDED is not defined, the macros EMULTIHOP, ENOLINK, EOVERFLOW are not defined. */ # if @EMULTIHOP_HIDDEN@ # define EMULTIHOP @EMULTIHOP_VALUE@ # define GNULIB_defined_EMULTIHOP 1 # endif # if @ENOLINK_HIDDEN@ # define ENOLINK @ENOLINK_VALUE@ # define GNULIB_defined_ENOLINK 1 # endif # if @EOVERFLOW_HIDDEN@ # define EOVERFLOW @EOVERFLOW_VALUE@ # define GNULIB_defined_EOVERFLOW 1 # endif /* On OpenBSD 4.0 and on native Windows, the macros ENOMSG, EIDRM, ENOLINK, EPROTO, EMULTIHOP, EBADMSG, EOVERFLOW, ENOTSUP, ECANCELED are not defined. Likewise, on NonStop Kernel, EDQUOT is not defined. Define them here. Values >= 2000 seem safe to use: Solaris ESTALE = 151, HP-UX EWOULDBLOCK = 246, IRIX EDQUOT = 1133. Note: When one of these systems defines some of these macros some day, binaries will have to be recompiled so that they recognizes the new errno values from the system. */ # ifndef ENOMSG # define ENOMSG 2000 # define GNULIB_defined_ENOMSG 1 # endif # ifndef EIDRM # define EIDRM 2001 # define GNULIB_defined_EIDRM 1 # endif # ifndef ENOLINK # define ENOLINK 2002 # define GNULIB_defined_ENOLINK 1 # endif # ifndef EPROTO # define EPROTO 2003 # define GNULIB_defined_EPROTO 1 # endif # ifndef EMULTIHOP # define EMULTIHOP 2004 # define GNULIB_defined_EMULTIHOP 1 # endif # ifndef EBADMSG # define EBADMSG 2005 # define GNULIB_defined_EBADMSG 1 # endif # ifndef EOVERFLOW # define EOVERFLOW 2006 # define GNULIB_defined_EOVERFLOW 1 # endif # ifndef ENOTSUP # define ENOTSUP 2007 # define GNULIB_defined_ENOTSUP 1 # endif # ifndef ENETRESET # define ENETRESET 2011 # define GNULIB_defined_ENETRESET 1 # endif # ifndef ECONNABORTED # define ECONNABORTED 2012 # define GNULIB_defined_ECONNABORTED 1 # endif # ifndef ESTALE # define ESTALE 2009 # define GNULIB_defined_ESTALE 1 # endif # ifndef EDQUOT # define EDQUOT 2010 # define GNULIB_defined_EDQUOT 1 # endif # ifndef ECANCELED # define ECANCELED 2008 # define GNULIB_defined_ECANCELED 1 # endif /* On many platforms, the macros EOWNERDEAD and ENOTRECOVERABLE are not defined. */ # ifndef EOWNERDEAD # if defined __sun /* Use the same values as defined for Solaris >= 8, for interoperability. */ # define EOWNERDEAD 58 # define ENOTRECOVERABLE 59 # elif defined _WIN32 && ! defined __CYGWIN__ /* We have a conflict here: pthreads-win32 defines these values differently than MSVC 10. It's hairy to decide which one to use. */ # if defined __MINGW32__ && !defined USE_WINDOWS_THREADS /* Use the same values as defined by pthreads-win32, for interoperability. */ # define EOWNERDEAD 43 # define ENOTRECOVERABLE 44 # else /* Use the same values as defined by MSVC 10, for interoperability. */ # define EOWNERDEAD 133 # define ENOTRECOVERABLE 127 # endif # else # define EOWNERDEAD 2013 # define ENOTRECOVERABLE 2014 # endif # define GNULIB_defined_EOWNERDEAD 1 # define GNULIB_defined_ENOTRECOVERABLE 1 # endif /* On LynxOS, the macro EILSEQ is not defined. */ # ifndef EILSEQ # define EILSEQ 2015 # define GNULIB_defined_EILSEQ 1 # endif /* On Haiku, the macro ESOCKTNOSUPPORT is not defined. */ # ifndef ESOCKTNOSUPPORT # define ESOCKTNOSUPPORT 2016 # define GNULIB_defined_ESOCKTNOSUPPORT 1 # endif #endif /* _@GUARD_PREFIX@_ERRNO_H */ #endif /* _@GUARD_PREFIX@_ERRNO_H */ libffcall-2.5/gnulib-lib/malloca.c0000664000000000000000000001030314631432055013767 00000000000000/* Safe automatic memory allocation. Copyright (C) 2003, 2006-2007, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2003, 2018. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #define _GL_USE_STDLIB_ALLOC 1 #include /* Specification. */ #include "malloca.h" #include #if defined __CHERI_PURE_CAPABILITY__ # include #endif #include "idx.h" /* The speed critical point in this file is freea() applied to an alloca() result: it must be fast, to match the speed of alloca(). The speed of mmalloca() and freea() in the other case are not critical, because they are only invoked for big memory sizes. Here we use a bit in the address as an indicator, an idea by Ondřej Bílka. malloca() can return three types of pointers: - Pointers ≡ 0 mod 2*sa_alignment_max come from stack allocation. - Pointers ≡ sa_alignment_max mod 2*sa_alignment_max come from heap allocation. - NULL comes from a failed heap allocation. */ #if defined __CHERI_PURE_CAPABILITY__ /* Type for holding the original malloc() result. */ typedef uintptr_t small_t; #else /* Type for holding very small pointer differences. */ typedef unsigned char small_t; /* Verify that it is wide enough. */ static_assert (2 * sa_alignment_max - 1 <= (small_t) -1); #endif void * mmalloca (size_t n) { #if HAVE_ALLOCA /* Allocate one more word, used to determine the address to pass to freea(), and room for the alignment ≡ sa_alignment_max mod 2*sa_alignment_max. */ uintptr_t alignment2_mask = 2 * sa_alignment_max - 1; int plus = sizeof (small_t) + alignment2_mask; idx_t nplus; if (!ckd_add (&nplus, n, plus) && !xalloc_oversized (nplus, 1)) { char *mem = (char *) malloc (nplus); if (mem != NULL) { uintptr_t umem = (uintptr_t) mem; /* The ckd_add avoids signed integer overflow on theoretical platforms where UINTPTR_MAX <= INT_MAX. */ uintptr_t umemplus; ckd_add (&umemplus, umem, sizeof (small_t) + sa_alignment_max - 1); idx_t offset = (umemplus - umemplus % (2 * sa_alignment_max) + sa_alignment_max - umem); void *p = mem + offset; /* Here p >= mem + sizeof (small_t), and p <= mem + sizeof (small_t) + 2 * sa_alignment_max - 1 hence p + n <= mem + nplus. So, the memory range [p, p+n) lies in the allocated memory range [mem, mem + nplus). */ small_t *sp = p; # if defined __CHERI_PURE_CAPABILITY__ sp[-1] = umem; p = (char *) cheri_bounds_set ((char *) p - sizeof (small_t), sizeof (small_t) + n) + sizeof (small_t); # else sp[-1] = offset; # endif /* p ≡ sa_alignment_max mod 2*sa_alignment_max. */ return p; } } /* Out of memory. */ return NULL; #else # if !MALLOC_0_IS_NONNULL if (n == 0) n = 1; # endif return malloc (n); #endif } #if HAVE_ALLOCA void freea (void *p) { /* Check argument. */ uintptr_t u = (uintptr_t) p; if (u & (sa_alignment_max - 1)) { /* p was not the result of a malloca() call. Invalid argument. */ abort (); } /* Determine whether p was a non-NULL pointer returned by mmalloca(). */ if (u & sa_alignment_max) { char *cp = p; small_t *sp = p; # if defined __CHERI_PURE_CAPABILITY__ void *mem = sp[-1]; # else void *mem = cp - sp[-1]; # endif free (mem); } } #endif /* * Hey Emacs! * Local Variables: * coding: utf-8 * End: */ libffcall-2.5/gnulib-lib/strerror-override.h0000664000000000000000000000436214657156076016111 00000000000000/* strerror-override.h --- POSIX compatible system error routine Copyright (C) 2010-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_STRERROR_OVERRIDE_H #define _GL_STRERROR_OVERRIDE_H /* This file uses _GL_ATTRIBUTE_CONST. */ #if !_GL_CONFIG_H_INCLUDED # error "Please include config.h first." #endif #include #include #ifdef __cplusplus extern "C" { #endif /* Reasonable buffer size that should never trigger ERANGE; if this proves too small, we intentionally abort(), to remind us to fix this value. */ #define STACKBUF_LEN 256 /* If ERRNUM maps to an errno value defined by gnulib, return a string describing the error. Otherwise return NULL. */ #if REPLACE_STRERROR_0 \ || GNULIB_defined_ESOCK \ || GNULIB_defined_ESTREAMS \ || GNULIB_defined_EWINSOCK \ || GNULIB_defined_ENOMSG \ || GNULIB_defined_EIDRM \ || GNULIB_defined_ENOLINK \ || GNULIB_defined_EPROTO \ || GNULIB_defined_EMULTIHOP \ || GNULIB_defined_EBADMSG \ || GNULIB_defined_EOVERFLOW \ || GNULIB_defined_ENOTSUP \ || GNULIB_defined_ENETRESET \ || GNULIB_defined_ECONNABORTED \ || GNULIB_defined_ESTALE \ || GNULIB_defined_EDQUOT \ || GNULIB_defined_ECANCELED \ || GNULIB_defined_EOWNERDEAD \ || GNULIB_defined_ENOTRECOVERABLE \ || GNULIB_defined_EILSEQ \ || GNULIB_defined_ESOCKTNOSUPPORT extern const char *strerror_override (int errnum) _GL_ATTRIBUTE_CONST; #else # define strerror_override(ignored) NULL # define GNULIB_defined_strerror_override_macro 1 #endif #ifdef __cplusplus } #endif #endif /* _GL_STRERROR_OVERRIDE_H */ libffcall-2.5/gnulib-lib/msvc-inval.c0000664000000000000000000000755314631432055014453 00000000000000/* Invalid parameter handler for MSVC runtime libraries. Copyright (C) 2011-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include "msvc-inval.h" #if HAVE_MSVC_INVALID_PARAMETER_HANDLER \ && !(MSVC_INVALID_PARAMETER_HANDLING == SANE_LIBRARY_HANDLING) /* Get _invalid_parameter_handler type and _set_invalid_parameter_handler declaration. */ # include # if MSVC_INVALID_PARAMETER_HANDLING == DEFAULT_HANDLING static void __cdecl gl_msvc_invalid_parameter_handler (const wchar_t *expression, const wchar_t *function, const wchar_t *file, unsigned int line, uintptr_t dummy) { } # else /* Get declarations of the native Windows API functions. */ # define WIN32_LEAN_AND_MEAN # include # if defined _MSC_VER static void __cdecl gl_msvc_invalid_parameter_handler (const wchar_t *expression, const wchar_t *function, const wchar_t *file, unsigned int line, uintptr_t dummy) { RaiseException (STATUS_GNULIB_INVALID_PARAMETER, 0, 0, NULL); } # else /* An index to thread-local storage. */ static DWORD tls_index; static int tls_initialized /* = 0 */; /* Used as a fallback only. */ static struct gl_msvc_inval_per_thread not_per_thread; struct gl_msvc_inval_per_thread * gl_msvc_inval_current (void) { if (!tls_initialized) { tls_index = TlsAlloc (); tls_initialized = 1; } if (tls_index == TLS_OUT_OF_INDEXES) /* TlsAlloc had failed. */ return ¬_per_thread; else { struct gl_msvc_inval_per_thread *pointer = (struct gl_msvc_inval_per_thread *) TlsGetValue (tls_index); if (pointer == NULL) { /* First call. Allocate a new 'struct gl_msvc_inval_per_thread'. */ pointer = (struct gl_msvc_inval_per_thread *) malloc (sizeof (struct gl_msvc_inval_per_thread)); if (pointer == NULL) /* Could not allocate memory. Use the global storage. */ pointer = ¬_per_thread; TlsSetValue (tls_index, pointer); } return pointer; } } static void __cdecl gl_msvc_invalid_parameter_handler (const wchar_t *expression, const wchar_t *function, const wchar_t *file, unsigned int line, uintptr_t dummy) { struct gl_msvc_inval_per_thread *current = gl_msvc_inval_current (); if (current->restart_valid) longjmp (current->restart, 1); else /* An invalid parameter notification from outside the gnulib code. Give the caller a chance to intervene. */ RaiseException (STATUS_GNULIB_INVALID_PARAMETER, 0, 0, NULL); } # endif # endif static int gl_msvc_inval_initialized /* = 0 */; void gl_msvc_inval_ensure_handler (void) { if (gl_msvc_inval_initialized == 0) { _set_invalid_parameter_handler (gl_msvc_invalid_parameter_handler); gl_msvc_inval_initialized = 1; } } #endif libffcall-2.5/gnulib-lib/c++defs.h0000664000000000000000000003737314664171733013627 00000000000000/* C++ compatible function declaration macros. Copyright (C) 2010-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_CXXDEFS_H #define _GL_CXXDEFS_H /* Begin/end the GNULIB_NAMESPACE namespace. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_BEGIN_NAMESPACE namespace GNULIB_NAMESPACE { # define _GL_END_NAMESPACE } #else # define _GL_BEGIN_NAMESPACE # define _GL_END_NAMESPACE #endif /* The three most frequent use cases of these macros are: * For providing a substitute for a function that is missing on some platforms, but is declared and works fine on the platforms on which it exists: #if @GNULIB_FOO@ # if !@HAVE_FOO@ _GL_FUNCDECL_SYS (foo, ...); # endif _GL_CXXALIAS_SYS (foo, ...); _GL_CXXALIASWARN (foo); #elif defined GNULIB_POSIXCHECK ... #endif * For providing a replacement for a function that exists on all platforms, but is broken/insufficient and needs to be replaced on some platforms: #if @GNULIB_FOO@ # if @REPLACE_FOO@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef foo # define foo rpl_foo # endif _GL_FUNCDECL_RPL (foo, ...); _GL_CXXALIAS_RPL (foo, ...); # else _GL_CXXALIAS_SYS (foo, ...); # endif _GL_CXXALIASWARN (foo); #elif defined GNULIB_POSIXCHECK ... #endif * For providing a replacement for a function that exists on some platforms but is broken/insufficient and needs to be replaced on some of them and is additionally either missing or undeclared on some other platforms: #if @GNULIB_FOO@ # if @REPLACE_FOO@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef foo # define foo rpl_foo # endif _GL_FUNCDECL_RPL (foo, ...); _GL_CXXALIAS_RPL (foo, ...); # else # if !@HAVE_FOO@ or if !@HAVE_DECL_FOO@ _GL_FUNCDECL_SYS (foo, ...); # endif _GL_CXXALIAS_SYS (foo, ...); # endif _GL_CXXALIASWARN (foo); #elif defined GNULIB_POSIXCHECK ... #endif */ /* _GL_EXTERN_C declaration; performs the declaration with C linkage. */ #if defined __cplusplus # define _GL_EXTERN_C extern "C" #else # define _GL_EXTERN_C extern #endif /* _GL_EXTERN_C_FUNC declaration; performs the declaration of a function with C linkage. */ #if defined __cplusplus # define _GL_EXTERN_C_FUNC extern "C" #else /* In C mode, omit the 'extern' keyword, because attributes in bracket syntax are not allowed between 'extern' and the return type (see gnulib-common.m4). */ # define _GL_EXTERN_C_FUNC #endif /* _GL_FUNCDECL_RPL (func, rettype, parameters[, attributes]); declares a replacement function, named rpl_func, with the given prototype, consisting of return type, parameters, and attributes. Example: _GL_FUNCDECL_RPL (open, int, (const char *filename, int flags, ...), _GL_ARG_NONNULL ((1))); Note: Attributes, such as _GL_ATTRIBUTE_DEPRECATED, are supported in front of a _GL_FUNCDECL_RPL invocation only in C mode, not in C++ mode. (That's because [[...]] extern "C" ; is invalid syntax in C++.) Note: The attribute _GL_ATTRIBUTE_NOTHROW, if needed, must be placed outside of the _GL_FUNCDECL_RPL invocation, at the end of the declaration. */ #define _GL_FUNCDECL_RPL(func,rettype,parameters,...) \ _GL_FUNCDECL_RPL_1 (rpl_##func, rettype, parameters, __VA_ARGS__) #define _GL_FUNCDECL_RPL_1(rpl_func,rettype,parameters,...) \ _GL_EXTERN_C_FUNC __VA_ARGS__ rettype rpl_func parameters /* _GL_FUNCDECL_SYS (func, rettype, parameters[, attributes]); declares the system function, named func, with the given prototype, consisting of return type, parameters, and attributes. Example: _GL_FUNCDECL_SYS (open, int, (const char *filename, int flags, ...), _GL_ARG_NONNULL ((1))); Note: The attribute _GL_ATTRIBUTE_NOTHROW, if needed, must be placed outside of the _GL_FUNCDECL_SYS invocation, at the end of the declaration. */ #define _GL_FUNCDECL_SYS(func,rettype,parameters,...) \ _GL_EXTERN_C_FUNC __VA_ARGS__ rettype func parameters /* _GL_CXXALIAS_RPL (func, rettype, parameters); declares a C++ alias called GNULIB_NAMESPACE::func that redirects to rpl_func, if GNULIB_NAMESPACE is defined. Example: _GL_CXXALIAS_RPL (open, int, (const char *filename, int flags, ...)); Wrapping rpl_func in an object with an inline conversion operator avoids a reference to rpl_func unless GNULIB_NAMESPACE::func is actually used in the program. */ #define _GL_CXXALIAS_RPL(func,rettype,parameters) \ _GL_CXXALIAS_RPL_1 (func, rpl_##func, rettype, parameters) #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIAS_RPL_1(func,rpl_func,rettype,parameters) \ namespace GNULIB_NAMESPACE \ { \ static const struct _gl_ ## func ## _wrapper \ { \ typedef rettype (*type) parameters; \ \ inline operator type () const \ { \ return ::rpl_func; \ } \ } func = {}; \ } \ _GL_EXTERN_C int _gl_cxxalias_dummy #else # define _GL_CXXALIAS_RPL_1(func,rpl_func,rettype,parameters) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIAS_MDA (func, rettype, parameters); is to be used when func is a Microsoft deprecated alias, on native Windows. It declares a C++ alias called GNULIB_NAMESPACE::func that redirects to _func, if GNULIB_NAMESPACE is defined. Example: _GL_CXXALIAS_MDA (open, int, (const char *filename, int flags, ...)); */ #define _GL_CXXALIAS_MDA(func,rettype,parameters) \ _GL_CXXALIAS_RPL_1 (func, _##func, rettype, parameters) /* _GL_CXXALIAS_RPL_CAST_1 (func, rpl_func, rettype, parameters); is like _GL_CXXALIAS_RPL_1 (func, rpl_func, rettype, parameters); except that the C function rpl_func may have a slightly different declaration. A cast is used to silence the "invalid conversion" error that would otherwise occur. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIAS_RPL_CAST_1(func,rpl_func,rettype,parameters) \ namespace GNULIB_NAMESPACE \ { \ static const struct _gl_ ## func ## _wrapper \ { \ typedef rettype (*type) parameters; \ \ inline operator type () const \ { \ return reinterpret_cast(::rpl_func); \ } \ } func = {}; \ } \ _GL_EXTERN_C int _gl_cxxalias_dummy #else # define _GL_CXXALIAS_RPL_CAST_1(func,rpl_func,rettype,parameters) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIAS_MDA_CAST (func, rettype, parameters); is like _GL_CXXALIAS_MDA (func, rettype, parameters); except that the C function func may have a slightly different declaration. A cast is used to silence the "invalid conversion" error that would otherwise occur. */ #define _GL_CXXALIAS_MDA_CAST(func,rettype,parameters) \ _GL_CXXALIAS_RPL_CAST_1 (func, _##func, rettype, parameters) /* _GL_CXXALIAS_SYS (func, rettype, parameters); declares a C++ alias called GNULIB_NAMESPACE::func that redirects to the system provided function func, if GNULIB_NAMESPACE is defined. Example: _GL_CXXALIAS_SYS (open, int, (const char *filename, int flags, ...)); Wrapping func in an object with an inline conversion operator avoids a reference to func unless GNULIB_NAMESPACE::func is actually used in the program. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIAS_SYS(func,rettype,parameters) \ namespace GNULIB_NAMESPACE \ { \ static const struct _gl_ ## func ## _wrapper \ { \ typedef rettype (*type) parameters; \ \ inline operator type () const \ { \ return ::func; \ } \ } func = {}; \ } \ _GL_EXTERN_C int _gl_cxxalias_dummy #else # define _GL_CXXALIAS_SYS(func,rettype,parameters) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIAS_SYS_CAST (func, rettype, parameters); is like _GL_CXXALIAS_SYS (func, rettype, parameters); except that the C function func may have a slightly different declaration. A cast is used to silence the "invalid conversion" error that would otherwise occur. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIAS_SYS_CAST(func,rettype,parameters) \ namespace GNULIB_NAMESPACE \ { \ static const struct _gl_ ## func ## _wrapper \ { \ typedef rettype (*type) parameters; \ \ inline operator type () const \ { \ return reinterpret_cast(::func); \ } \ } func = {}; \ } \ _GL_EXTERN_C int _gl_cxxalias_dummy #else # define _GL_CXXALIAS_SYS_CAST(func,rettype,parameters) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIAS_SYS_CAST2 (func, rettype, parameters, rettype2, parameters2); is like _GL_CXXALIAS_SYS (func, rettype, parameters); except that the C function is picked among a set of overloaded functions, namely the one with rettype2 and parameters2. Two consecutive casts are used to silence the "cannot find a match" and "invalid conversion" errors that would otherwise occur. */ #if defined __cplusplus && defined GNULIB_NAMESPACE /* The outer cast must be a reinterpret_cast. The inner cast: When the function is defined as a set of overloaded functions, it works as a static_cast<>, choosing the designated variant. When the function is defined as a single variant, it works as a reinterpret_cast<>. The parenthesized cast syntax works both ways. */ # define _GL_CXXALIAS_SYS_CAST2(func,rettype,parameters,rettype2,parameters2) \ namespace GNULIB_NAMESPACE \ { \ static const struct _gl_ ## func ## _wrapper \ { \ typedef rettype (*type) parameters; \ \ inline operator type () const \ { \ return reinterpret_cast((rettype2 (*) parameters2)(::func)); \ } \ } func = {}; \ } \ _GL_EXTERN_C int _gl_cxxalias_dummy #else # define _GL_CXXALIAS_SYS_CAST2(func,rettype,parameters,rettype2,parameters2) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIASWARN (func); causes a warning to be emitted when ::func is used but not when GNULIB_NAMESPACE::func is used. func must be defined without overloaded variants. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIASWARN(func) \ _GL_CXXALIASWARN_1 (func, GNULIB_NAMESPACE) # define _GL_CXXALIASWARN_1(func,namespace) \ _GL_CXXALIASWARN_2 (func, namespace) /* To work around GCC bug , we enable the warning only when not optimizing. */ # if !(defined __GNUC__ && !defined __clang__ && __OPTIMIZE__) # define _GL_CXXALIASWARN_2(func,namespace) \ _GL_WARN_ON_USE (func, \ "The symbol ::" #func " refers to the system function. " \ "Use " #namespace "::" #func " instead.") # elif (__GNUC__ >= 3 || defined __clang__) && GNULIB_STRICT_CHECKING # define _GL_CXXALIASWARN_2(func,namespace) \ extern __typeof__ (func) func # else # define _GL_CXXALIASWARN_2(func,namespace) \ _GL_EXTERN_C int _gl_cxxalias_dummy # endif #else # define _GL_CXXALIASWARN(func) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif /* _GL_CXXALIASWARN1 (func, rettype, parameters_and_attributes); causes a warning to be emitted when the given overloaded variant of ::func is used but not when GNULIB_NAMESPACE::func is used. */ #if defined __cplusplus && defined GNULIB_NAMESPACE # define _GL_CXXALIASWARN1(func,rettype,parameters_and_attributes) \ _GL_CXXALIASWARN1_1 (func, rettype, parameters_and_attributes, \ GNULIB_NAMESPACE) # define _GL_CXXALIASWARN1_1(func,rettype,parameters_and_attributes,namespace) \ _GL_CXXALIASWARN1_2 (func, rettype, parameters_and_attributes, namespace) /* To work around GCC bug , we enable the warning only when not optimizing. */ # if !(defined __GNUC__ && !defined __clang__ && __OPTIMIZE__) # define _GL_CXXALIASWARN1_2(func,rettype,parameters_and_attributes,namespace) \ _GL_WARN_ON_USE_CXX (func, rettype, rettype, parameters_and_attributes, \ "The symbol ::" #func " refers to the system function. " \ "Use " #namespace "::" #func " instead.") # else # define _GL_CXXALIASWARN1_2(func,rettype,parameters_and_attributes,namespace) \ _GL_EXTERN_C int _gl_cxxalias_dummy # endif #else # define _GL_CXXALIASWARN1(func,rettype,parameters_and_attributes) \ _GL_EXTERN_C int _gl_cxxalias_dummy #endif #endif /* _GL_CXXDEFS_H */ libffcall-2.5/gnulib-lib/signal.in.h0000664000000000000000000004130314657156076014270 00000000000000/* A GNU-like . Copyright (C) 2006-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined __need_sig_atomic_t || defined __need_sigset_t || defined _GL_ALREADY_INCLUDING_SIGNAL_H || (defined _SIGNAL_H && !defined __SIZEOF_PTHREAD_MUTEX_T) /* Special invocation convention: - Inside glibc header files. - On glibc systems we have a sequence of nested includes -> -> . In this situation, the functions are not yet declared, therefore we cannot provide the C++ aliases. - On glibc systems with GCC 4.3 we have a sequence of nested includes -> -> -> . In this situation, some of the functions are not yet declared, therefore we cannot provide the C++ aliases. */ # @INCLUDE_NEXT@ @NEXT_SIGNAL_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_SIGNAL_H #define _GL_ALREADY_INCLUDING_SIGNAL_H /* Define pid_t, uid_t. Also, mingw defines sigset_t not in , but in . On Solaris 10, includes , which eventually includes us; so include now, before the second inclusion guard. */ #include /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_SIGNAL_H@ #undef _GL_ALREADY_INCLUDING_SIGNAL_H #ifndef _@GUARD_PREFIX@_SIGNAL_H #define _@GUARD_PREFIX@_SIGNAL_H /* This file uses GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* For testing the OpenBSD version. */ #if (@GNULIB_PTHREAD_SIGMASK@ || defined GNULIB_POSIXCHECK) \ && defined __OpenBSD__ # include #endif /* Mac OS X 10.3, FreeBSD < 8.0, OpenBSD < 5.1, OSF/1 4.0, Solaris 2.6, Android, OS/2 kLIBC declare pthread_sigmask in , not in . But avoid namespace pollution on glibc systems.*/ #if (@GNULIB_PTHREAD_SIGMASK@ || defined GNULIB_POSIXCHECK) \ && ((defined __APPLE__ && defined __MACH__) \ || (defined __FreeBSD__ && __FreeBSD__ < 8) \ || (defined __OpenBSD__ && OpenBSD < 201205) \ || defined __osf__ || defined __sun || defined __ANDROID__ \ || defined __KLIBC__) \ && ! defined __GLIBC__ # include #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* On AIX, sig_atomic_t already includes volatile. C99 requires that 'volatile sig_atomic_t' ignore the extra modifier, but C89 did not. Hence, redefine this to a non-volatile type as needed. */ #if ! @HAVE_TYPE_VOLATILE_SIG_ATOMIC_T@ # if !GNULIB_defined_sig_atomic_t typedef int rpl_sig_atomic_t; # undef sig_atomic_t # define sig_atomic_t rpl_sig_atomic_t # define GNULIB_defined_sig_atomic_t 1 # endif #endif /* A set or mask of signals. */ #if !@HAVE_SIGSET_T@ # if !GNULIB_defined_sigset_t typedef unsigned int sigset_t; # define GNULIB_defined_sigset_t 1 # endif #endif /* Define sighandler_t, the type of signal handlers. A GNU extension. */ #if !@HAVE_SIGHANDLER_T@ # ifdef __cplusplus extern "C" { # endif # if !GNULIB_defined_sighandler_t typedef void (*sighandler_t) (int); # define GNULIB_defined_sighandler_t 1 # endif # ifdef __cplusplus } # endif #endif #if @GNULIB_SIGNAL_H_SIGPIPE@ # ifndef SIGPIPE /* Define SIGPIPE to a value that does not overlap with other signals. */ # define SIGPIPE 13 # define GNULIB_defined_SIGPIPE 1 /* To actually use SIGPIPE, you also need the gnulib modules 'sigprocmask', 'write', 'stdio'. */ # endif #endif /* Maximum signal number + 1. */ #ifndef NSIG # if defined __TANDEM # define NSIG 32 # endif #endif /* Maximum size of a signal name returned by sig2str(), including the terminating NUL byte. */ #ifndef SIG2STR_MAX /* The longest one: "RTMAX", then "+" or "-", then up to 10 digits, then NUL. Add + 2 as a reserve for the future. */ # define SIG2STR_MAX (5 + 1 + 10 + 1 + 2) #endif #if @GNULIB_SIG2STR@ # if !@HAVE_SIG2STR@ _GL_FUNCDECL_SYS (sig2str, int, (int signo, char *str)); # endif _GL_CXXALIAS_SYS (sig2str, int, (int signo, char *str)); # if __GLIBC__ >= 2 _GL_CXXALIASWARN (sig2str); # endif #elif defined GNULIB_POSIXCHECK # undef sig2str # if HAVE_RAW_DECL_SIG2STR _GL_WARN_ON_USE (sig2str, "sig2str is not portable - " "use gnulib module sig2str for portability"); # endif #endif #if @GNULIB_SIG2STR@ # if !@HAVE_STR2SIG@ _GL_FUNCDECL_SYS (str2sig, int, (char const *str, int *signo_p)); # endif _GL_CXXALIAS_SYS (str2sig, int, (char const *str, int *signo_p)); # if __GLIBC__ >= 2 _GL_CXXALIASWARN (str2sig); # endif #elif defined GNULIB_POSIXCHECK # undef str2sig # if HAVE_RAW_DECL_STR2SIG _GL_WARN_ON_USE (str2sig, "str2sig is not portable - " "use gnulib module sig2str for portability"); # endif #endif #if @GNULIB_PTHREAD_SIGMASK@ # if @REPLACE_PTHREAD_SIGMASK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pthread_sigmask # define pthread_sigmask rpl_pthread_sigmask # endif _GL_FUNCDECL_RPL (pthread_sigmask, int, (int how, const sigset_t *restrict new_mask, sigset_t *restrict old_mask)); _GL_CXXALIAS_RPL (pthread_sigmask, int, (int how, const sigset_t *restrict new_mask, sigset_t *restrict old_mask)); # else # if !(@HAVE_PTHREAD_SIGMASK@ || defined pthread_sigmask) _GL_FUNCDECL_SYS (pthread_sigmask, int, (int how, const sigset_t *restrict new_mask, sigset_t *restrict old_mask)); # endif _GL_CXXALIAS_SYS (pthread_sigmask, int, (int how, const sigset_t *restrict new_mask, sigset_t *restrict old_mask)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pthread_sigmask); # endif #elif defined GNULIB_POSIXCHECK # undef pthread_sigmask # if HAVE_RAW_DECL_PTHREAD_SIGMASK _GL_WARN_ON_USE (pthread_sigmask, "pthread_sigmask is not portable - " "use gnulib module pthread_sigmask for portability"); # endif #endif #if @GNULIB_RAISE@ # if @REPLACE_RAISE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef raise # define raise rpl_raise # endif _GL_FUNCDECL_RPL (raise, int, (int sig)); _GL_CXXALIAS_RPL (raise, int, (int sig)); # else # if !@HAVE_RAISE@ _GL_FUNCDECL_SYS (raise, int, (int sig)); # endif _GL_CXXALIAS_SYS (raise, int, (int sig)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (raise); # endif #elif defined GNULIB_POSIXCHECK # undef raise /* Assume raise is always declared. */ _GL_WARN_ON_USE (raise, "raise can crash on native Windows - " "use gnulib module raise for portability"); #endif #if @GNULIB_SIGPROCMASK@ # if !@HAVE_POSIX_SIGNALBLOCKING@ # ifndef GNULIB_defined_signal_blocking # define GNULIB_defined_signal_blocking 1 # endif /* Maximum signal number + 1. */ # ifndef NSIG # define NSIG 32 # endif /* This code supports only 32 signals. */ # if !GNULIB_defined_verify_NSIG_constraint typedef int verify_NSIG_constraint[NSIG <= 32 ? 1 : -1]; # define GNULIB_defined_verify_NSIG_constraint 1 # endif # endif /* When also using extern inline, suppress the use of static inline in standard headers of problematic Apple configurations, as Libc at least through Libc-825.26 (2013-04-09) mishandles it; see, e.g., . Perhaps Apple will fix this some day. */ #if (defined _GL_EXTERN_INLINE_IN_USE && defined __APPLE__ \ && (defined __i386__ || defined __x86_64__)) # undef sigaddset # undef sigdelset # undef sigemptyset # undef sigfillset # undef sigismember #endif /* Test whether a given signal is contained in a signal set. */ # if @HAVE_POSIX_SIGNALBLOCKING@ /* This function is defined as a macro on Mac OS X. */ # if defined __cplusplus && defined GNULIB_NAMESPACE # undef sigismember # endif # else _GL_FUNCDECL_SYS (sigismember, int, (const sigset_t *set, int sig), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigismember, int, (const sigset_t *set, int sig)); _GL_CXXALIASWARN (sigismember); /* Initialize a signal set to the empty set. */ # if @HAVE_POSIX_SIGNALBLOCKING@ /* This function is defined as a macro on Mac OS X. */ # if defined __cplusplus && defined GNULIB_NAMESPACE # undef sigemptyset # endif # else _GL_FUNCDECL_SYS (sigemptyset, int, (sigset_t *set), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigemptyset, int, (sigset_t *set)); _GL_CXXALIASWARN (sigemptyset); /* Add a signal to a signal set. */ # if @HAVE_POSIX_SIGNALBLOCKING@ /* This function is defined as a macro on Mac OS X. */ # if defined __cplusplus && defined GNULIB_NAMESPACE # undef sigaddset # endif # else _GL_FUNCDECL_SYS (sigaddset, int, (sigset_t *set, int sig), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigaddset, int, (sigset_t *set, int sig)); _GL_CXXALIASWARN (sigaddset); /* Remove a signal from a signal set. */ # if @HAVE_POSIX_SIGNALBLOCKING@ /* This function is defined as a macro on Mac OS X. */ # if defined __cplusplus && defined GNULIB_NAMESPACE # undef sigdelset # endif # else _GL_FUNCDECL_SYS (sigdelset, int, (sigset_t *set, int sig), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigdelset, int, (sigset_t *set, int sig)); _GL_CXXALIASWARN (sigdelset); /* Fill a signal set with all possible signals. */ # if @HAVE_POSIX_SIGNALBLOCKING@ /* This function is defined as a macro on Mac OS X. */ # if defined __cplusplus && defined GNULIB_NAMESPACE # undef sigfillset # endif # else _GL_FUNCDECL_SYS (sigfillset, int, (sigset_t *set), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigfillset, int, (sigset_t *set)); _GL_CXXALIASWARN (sigfillset); /* Return the set of those blocked signals that are pending. */ # if !@HAVE_POSIX_SIGNALBLOCKING@ _GL_FUNCDECL_SYS (sigpending, int, (sigset_t *set), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (sigpending, int, (sigset_t *set)); _GL_CXXALIASWARN (sigpending); /* If OLD_SET is not NULL, put the current set of blocked signals in *OLD_SET. Then, if SET is not NULL, affect the current set of blocked signals by combining it with *SET as indicated in OPERATION. In this implementation, you are not allowed to change a signal handler while the signal is blocked. */ # if !@HAVE_POSIX_SIGNALBLOCKING@ # define SIG_BLOCK 0 /* blocked_set = blocked_set | *set; */ # define SIG_SETMASK 1 /* blocked_set = *set; */ # define SIG_UNBLOCK 2 /* blocked_set = blocked_set & ~*set; */ _GL_FUNCDECL_SYS (sigprocmask, int, (int operation, const sigset_t *restrict set, sigset_t *restrict old_set)); # endif _GL_CXXALIAS_SYS (sigprocmask, int, (int operation, const sigset_t *restrict set, sigset_t *restrict old_set)); _GL_CXXALIASWARN (sigprocmask); /* Install the handler FUNC for signal SIG, and return the previous handler. */ # ifdef __cplusplus extern "C" { # endif # if !GNULIB_defined_function_taking_int_returning_void_t typedef void (*_gl_function_taking_int_returning_void_t) (int); # define GNULIB_defined_function_taking_int_returning_void_t 1 # endif # ifdef __cplusplus } # endif # if !@HAVE_POSIX_SIGNALBLOCKING@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define signal rpl_signal # endif _GL_FUNCDECL_RPL (signal, _gl_function_taking_int_returning_void_t, (int sig, _gl_function_taking_int_returning_void_t func)); _GL_CXXALIAS_RPL (signal, _gl_function_taking_int_returning_void_t, (int sig, _gl_function_taking_int_returning_void_t func)); # else /* On OpenBSD, the declaration of 'signal' may not be present at this point, because it occurs in , not directly. */ # if defined __OpenBSD__ _GL_FUNCDECL_SYS (signal, _gl_function_taking_int_returning_void_t, (int sig, _gl_function_taking_int_returning_void_t func)); # endif _GL_CXXALIAS_SYS (signal, _gl_function_taking_int_returning_void_t, (int sig, _gl_function_taking_int_returning_void_t func)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (signal); # endif # if !@HAVE_POSIX_SIGNALBLOCKING@ && GNULIB_defined_SIGPIPE /* Raise signal SIGPIPE. */ _GL_EXTERN_C int _gl_raise_SIGPIPE (void); # endif #elif defined GNULIB_POSIXCHECK # undef sigaddset # if HAVE_RAW_DECL_SIGADDSET _GL_WARN_ON_USE (sigaddset, "sigaddset is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigdelset # if HAVE_RAW_DECL_SIGDELSET _GL_WARN_ON_USE (sigdelset, "sigdelset is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigemptyset # if HAVE_RAW_DECL_SIGEMPTYSET _GL_WARN_ON_USE (sigemptyset, "sigemptyset is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigfillset # if HAVE_RAW_DECL_SIGFILLSET _GL_WARN_ON_USE (sigfillset, "sigfillset is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigismember # if HAVE_RAW_DECL_SIGISMEMBER _GL_WARN_ON_USE (sigismember, "sigismember is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigpending # if HAVE_RAW_DECL_SIGPENDING _GL_WARN_ON_USE (sigpending, "sigpending is unportable - " "use the gnulib module sigprocmask for portability"); # endif # undef sigprocmask # if HAVE_RAW_DECL_SIGPROCMASK _GL_WARN_ON_USE (sigprocmask, "sigprocmask is unportable - " "use the gnulib module sigprocmask for portability"); # endif #endif /* @GNULIB_SIGPROCMASK@ */ #if @GNULIB_SIGACTION@ # if !@HAVE_SIGACTION@ # if !@HAVE_SIGINFO_T@ # if !GNULIB_defined_siginfo_types /* Present to allow compilation, but unsupported by gnulib. */ union sigval { int sival_int; void *sival_ptr; }; /* Present to allow compilation, but unsupported by gnulib. */ struct siginfo_t { int si_signo; int si_code; int si_errno; pid_t si_pid; uid_t si_uid; void *si_addr; int si_status; long si_band; union sigval si_value; }; typedef struct siginfo_t siginfo_t; # define GNULIB_defined_siginfo_types 1 # endif # endif /* !@HAVE_SIGINFO_T@ */ /* We assume that platforms which lack the sigaction() function also lack the 'struct sigaction' type, and vice versa. */ # if !GNULIB_defined_struct_sigaction struct sigaction { union { void (*_sa_handler) (int); /* Present to allow compilation, but unsupported by gnulib. POSIX says that implementations may, but not must, make sa_sigaction overlap with sa_handler, but we know of no implementation where they do not overlap. */ void (*_sa_sigaction) (int, siginfo_t *, void *); } _sa_func; sigset_t sa_mask; /* Not all POSIX flags are supported. */ int sa_flags; }; # define sa_handler _sa_func._sa_handler # define sa_sigaction _sa_func._sa_sigaction /* Unsupported flags are not present. */ # define SA_RESETHAND 1 # define SA_NODEFER 2 # define SA_RESTART 4 # define GNULIB_defined_struct_sigaction 1 # endif _GL_FUNCDECL_SYS (sigaction, int, (int, const struct sigaction *restrict, struct sigaction *restrict)); # elif !@HAVE_STRUCT_SIGACTION_SA_SIGACTION@ # define sa_sigaction sa_handler # endif /* !@HAVE_SIGACTION@, !@HAVE_STRUCT_SIGACTION_SA_SIGACTION@ */ _GL_CXXALIAS_SYS (sigaction, int, (int, const struct sigaction *restrict, struct sigaction *restrict)); _GL_CXXALIASWARN (sigaction); #elif defined GNULIB_POSIXCHECK # undef sigaction # if HAVE_RAW_DECL_SIGACTION _GL_WARN_ON_USE (sigaction, "sigaction is unportable - " "use the gnulib module sigaction for portability"); # endif #endif /* Some systems don't have SA_NODEFER. */ #ifndef SA_NODEFER # define SA_NODEFER 0 #endif #endif /* _@GUARD_PREFIX@_SIGNAL_H */ #endif /* _@GUARD_PREFIX@_SIGNAL_H */ #endif libffcall-2.5/gnulib-lib/error.in.h0000664000000000000000000002341614660212546014136 00000000000000/* Declarations for error-reporting functions. Copyright (C) 1995-1997, 2003, 2006, 2008-2024 Free Software Foundation, Inc. This file is part of the GNU C Library. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _@GUARD_PREFIX@_ERROR_H /* No @PRAGMA_SYSTEM_HEADER@ here, because it would prevent -Wimplicit-fallthrough warnings for missing FALLTHROUGH after error(...) or error_at_line(...) invocations. */ /* The include_next requires a split double-inclusion guard. */ #if @HAVE_ERROR_H@ && !defined __MINGW32__ # @INCLUDE_NEXT@ @NEXT_ERROR_H@ #endif #ifndef _@GUARD_PREFIX@_ERROR_H #define _@GUARD_PREFIX@_ERROR_H /* This file uses _GL_ATTRIBUTE_ALWAYS_INLINE, _GL_ATTRIBUTE_COLD, _GL_ATTRIBUTE_FORMAT, _GL_ATTRIBUTE_MAYBE_UNUSED. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* Get va_list. */ #include /* Get 'unreachable'. */ #include /* Get _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD, _GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM. */ #include /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ #if GNULIB_VFPRINTF_POSIX # define _GL_ATTRIBUTE_SPEC_PRINTF_ERROR _GL_ATTRIBUTE_SPEC_PRINTF_STANDARD #else # define _GL_ATTRIBUTE_SPEC_PRINTF_ERROR _GL_ATTRIBUTE_SPEC_PRINTF_SYSTEM #endif /* Helper macro for supporting the compiler's control flow analysis better. It evaluates its arguments only once. Test case: Compile copy-file.c with "gcc -Wimplicit-fallthrough". */ #if defined __GNUC__ || defined __clang__ /* Use 'unreachable' to tell the compiler when the function call does not return. */ # define __gl_error_call1(function, status, ...) \ ((function) (status, __VA_ARGS__), \ (status) != 0 ? unreachable () : (void) 0) /* If STATUS is a not a constant, the function call may or may not return; therefore -Wimplicit-fallthrough will produce a warning. Use a compound statement in order to evaluate STATUS only once. If STATUS is a constant, we don't use a compound statement, because that would trigger a -Wimplicit-fallthrough warning even when STATUS is != 0, when not optimizing. This causes STATUS to be evaluated twice, but that's OK since it does not have side effects. */ # define __gl_error_call(function, status, ...) \ (__builtin_constant_p (status) \ ? __gl_error_call1 (function, status, __VA_ARGS__) \ : __extension__ \ ({ \ int const __errstatus = status; \ __gl_error_call1 (function, __errstatus, __VA_ARGS__); \ })) #else # define __gl_error_call(function, status, ...) \ (function) (status, __VA_ARGS__) #endif #ifdef __cplusplus extern "C" { #endif /* Print a message with 'fprintf (stderr, FORMAT, ...)'; if ERRNUM is nonzero, follow it with ": " and strerror (ERRNUM). If STATUS is nonzero, terminate the program with 'exit (STATUS)'. */ #if @REPLACE_ERROR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef error # define error rpl_error # endif _GL_FUNCDECL_RPL (error, void, (int __status, int __errnum, const char *__format, ...), _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 3, 4))); _GL_CXXALIAS_RPL (error, void, (int __status, int __errnum, const char *__format, ...)); # ifndef _GL_NO_INLINE_ERROR # undef error # define error(status, ...) \ __gl_error_call (rpl_error, status, __VA_ARGS__) # endif #else # if ! @HAVE_ERROR@ _GL_FUNCDECL_SYS (error, void, (int __status, int __errnum, const char *__format, ...), _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 3, 4))); # endif _GL_CXXALIAS_SYS (error, void, (int __status, int __errnum, const char *__format, ...)); # ifndef _GL_NO_INLINE_ERROR # ifdef error /* Only gcc ≥ 4.7 has __builtin_va_arg_pack. */ # if _GL_GNUC_PREREQ (4, 7) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wattributes" _GL_ATTRIBUTE_MAYBE_UNUSED static void _GL_ATTRIBUTE_ALWAYS_INLINE _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 3, 4)) _gl_inline_error (int __status, int __errnum, const char *__format, ...) { return error (__status, __errnum, __format, __builtin_va_arg_pack ()); } # pragma GCC diagnostic pop # undef error # define error(status, ...) \ __gl_error_call (_gl_inline_error, status, __VA_ARGS__) # endif # else # define error(status, ...) \ __gl_error_call (error, status, __VA_ARGS__) # endif # endif #endif #if __GLIBC__ >= 2 _GL_CXXALIASWARN (error); #endif /* Likewise. If FILENAME is non-NULL, include FILENAME:LINENO: in the message. */ #if @REPLACE_ERROR_AT_LINE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef error_at_line # define error_at_line rpl_error_at_line # endif _GL_FUNCDECL_RPL (error_at_line, void, (int __status, int __errnum, const char *__filename, unsigned int __lineno, const char *__format, ...), _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 5, 6))); _GL_CXXALIAS_RPL (error_at_line, void, (int __status, int __errnum, const char *__filename, unsigned int __lineno, const char *__format, ...)); # ifndef _GL_NO_INLINE_ERROR # undef error_at_line # define error_at_line(status, ...) \ __gl_error_call (rpl_error_at_line, status, __VA_ARGS__) # endif #else # if ! @HAVE_ERROR_AT_LINE@ _GL_FUNCDECL_SYS (error_at_line, void, (int __status, int __errnum, const char *__filename, unsigned int __lineno, const char *__format, ...), _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 5, 6))); # endif _GL_CXXALIAS_SYS (error_at_line, void, (int __status, int __errnum, const char *__filename, unsigned int __lineno, const char *__format, ...)); # ifndef _GL_NO_INLINE_ERROR # ifdef error_at_line /* Only gcc ≥ 4.7 has __builtin_va_arg_pack. */ # if _GL_GNUC_PREREQ (4, 7) # pragma GCC diagnostic push # pragma GCC diagnostic ignored "-Wattributes" _GL_ATTRIBUTE_MAYBE_UNUSED static void _GL_ATTRIBUTE_ALWAYS_INLINE _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_ERROR, 5, 6)) _gl_inline_error_at_line (int __status, int __errnum, const char *__filename, unsigned int __lineno, const char *__format, ...) { return error_at_line (__status, __errnum, __filename, __lineno, __format, __builtin_va_arg_pack ()); } # pragma GCC diagnostic pop # undef error_at_line # define error_at_line(status, ...) \ __gl_error_call (_gl_inline_error_at_line, status, __VA_ARGS__) # endif # else # define error_at_line(status, ...) \ __gl_error_call (error_at_line, status, __VA_ARGS__) # endif # endif #endif _GL_CXXALIASWARN (error_at_line); /* Print a message with 'vfprintf (stderr, FORMAT, ARGS)'; if ERRNUM is nonzero, follow it with ": " and strerror (ERRNUM). If STATUS is nonzero, terminate the program with 'exit (STATUS)'. Use the globals error_print_progname and error_message_count similarly to error(). */ extern void verror (int __status, int __errnum, const char *__format, va_list __args) _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_STANDARD, 3, 0)); #ifndef _GL_NO_INLINE_ERROR # ifndef verror # define verror(status, ...) \ __gl_error_call (verror, status, __VA_ARGS__) # define GNULIB_defined_verror 1 # endif #endif /* Print a message with 'vfprintf (stderr, FORMAT, ARGS)'; if ERRNUM is nonzero, follow it with ": " and strerror (ERRNUM). If STATUS is nonzero, terminate the program with 'exit (STATUS)'. If FNAME is not NULL, prepend the message with "FNAME:LINENO:". Use the globals error_print_progname, error_message_count, and error_one_per_line similarly to error_at_line(). */ extern void verror_at_line (int __status, int __errnum, const char *__fname, unsigned int __lineno, const char *__format, va_list __args) _GL_ATTRIBUTE_COLD _GL_ATTRIBUTE_FORMAT ((_GL_ATTRIBUTE_SPEC_PRINTF_STANDARD, 5, 0)); #ifdef _GL_NO_INLINE_ERROR # ifndef verror_at_line # define verror_at_line(status, ...) \ __gl_error_call (verror_at_line, status, __VA_ARGS__) # define GNULIB_defined_verror_at_line 1 # endif #endif /* If NULL, error will flush stdout, then print on stderr the program name, a colon and a space. Otherwise, error will call this function without parameters instead. */ extern void (*error_print_progname) (void); /* This variable is incremented each time 'error' is called. */ extern unsigned int error_message_count; /* Sometimes we want to have at most one error per line. This variable controls whether this mode is selected or not. */ extern int error_one_per_line; #ifdef __cplusplus } #endif #endif /* _@GUARD_PREFIX@_ERROR_H */ #endif /* _@GUARD_PREFIX@_ERROR_H */ libffcall-2.5/gnulib-lib/clean-temp-simple.h0000664000000000000000000000357214631432055015712 00000000000000/* Temporary files with automatic cleanup. Copyright (C) 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _CLEAN_TEMP_SIMPLE_H #define _CLEAN_TEMP_SIMPLE_H #ifdef __cplusplus extern "C" { #endif /* See clean-temp.h for a general discussion of this module. */ /* Register the given ABSOLUTE_FILE_NAME as being a file that needs to be removed. Should be called before the file ABSOLUTE_FILE_NAME is created. Return 0 upon success, or -1 if there was a memory allocation problem. */ extern int register_temporary_file (const char *absolute_file_name); /* Unregister the given ABSOLUTE_FILE_NAME as being a file that needs to be removed. Should be called when the file ABSOLUTE_FILE_NAME could not be created. */ extern void unregister_temporary_file (const char *absolute_file_name); /* Remove the given ABSOLUTE_FILE_NAME and unregister it. CLEANUP_VERBOSE determines whether errors are reported to standard error. Return 0 upon success, or -1 if there was some problem. */ extern int cleanup_temporary_file (const char *absolute_file_name, bool cleanup_verbose); #ifdef __cplusplus } #endif #endif /* _CLEAN_TEMP_SIMPLE_H */ libffcall-2.5/gnulib-lib/unistd.in.h0000664000000000000000000024764414657156076014341 00000000000000/* Substitute for and wrapper around . Copyright (C) 2003-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _@GUARD_PREFIX@_UNISTD_H #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if @HAVE_UNISTD_H@ && defined _GL_INCLUDING_UNISTD_H /* Special invocation convention: - On Mac OS X 10.3.9 we have a sequence of nested includes -> -> -> In this situation, the functions are not yet declared, therefore we cannot provide the C++ aliases. */ #@INCLUDE_NEXT@ @NEXT_UNISTD_H@ #else /* Normal invocation convention. */ /* The include_next requires a split double-inclusion guard. */ #if @HAVE_UNISTD_H@ # define _GL_INCLUDING_UNISTD_H # @INCLUDE_NEXT@ @NEXT_UNISTD_H@ # undef _GL_INCLUDING_UNISTD_H #endif /* Avoid lseek bugs in FreeBSD, macOS . This bug is fixed after FreeBSD 13; see . Use macOS "9999" to stand for a future fixed macOS version. */ #if defined __FreeBSD__ && __FreeBSD__ < 14 # undef SEEK_DATA # undef SEEK_HOLE #elif defined __APPLE__ && defined __MACH__ && defined SEEK_DATA # ifdef __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ # include # endif # if (!defined MAC_OS_X_VERSION_MIN_REQUIRED \ || MAC_OS_X_VERSION_MIN_REQUIRED < 99990000) # include /* It also defines the two macros. */ # undef SEEK_DATA # undef SEEK_HOLE # endif #endif /* Get all possible declarations of gethostname(). */ #if @GNULIB_GETHOSTNAME@ && @UNISTD_H_HAVE_WINSOCK2_H@ \ && !defined _GL_INCLUDING_WINSOCK2_H # define _GL_INCLUDING_WINSOCK2_H # include # undef _GL_INCLUDING_WINSOCK2_H #endif #if !defined _@GUARD_PREFIX@_UNISTD_H && !defined _GL_INCLUDING_WINSOCK2_H #define _@GUARD_PREFIX@_UNISTD_H /* This file uses _GL_ATTRIBUTE_NODISCARD, _GL_INLINE_HEADER_BEGIN, _GL_INLINE, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* NetBSD 5.0 mis-defines NULL. Also get size_t. */ /* But avoid namespace pollution on glibc systems. */ #ifndef __GLIBC__ # include #endif /* mingw doesn't define the SEEK_* or *_FILENO macros in . */ /* MSVC declares 'unlink' in , not in . We must include it before we #define unlink rpl_unlink. */ /* Cygwin 1.7.1 declares symlinkat in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if (!(defined SEEK_CUR && defined SEEK_END && defined SEEK_SET) \ || ((@GNULIB_UNLINK@ || defined GNULIB_POSIXCHECK) \ && (defined _WIN32 && ! defined __CYGWIN__)) \ || ((@GNULIB_SYMLINKAT@ || defined GNULIB_POSIXCHECK) \ && defined __CYGWIN__)) \ && ! defined __GLIBC__ # include #endif /* Cygwin 1.7.1 and Android 4.3 declare unlinkat in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if (@GNULIB_UNLINKAT@ || defined GNULIB_POSIXCHECK) \ && (defined __CYGWIN__ || defined __ANDROID__) \ && ! defined __GLIBC__ # include #endif /* mingw fails to declare _exit in . */ /* mingw, MSVC, BeOS, Haiku declare environ in , not in . */ /* Solaris declares getcwd not only in but also in . */ /* OSF Tru64 Unix cannot see gnulib rpl_strtod when system is included here. */ /* But avoid namespace pollution on glibc systems. */ #if !defined __GLIBC__ && !defined __osf__ # define __need_system_stdlib_h # include # undef __need_system_stdlib_h #endif /* Native Windows platforms declare _chdir, _getcwd, _rmdir in and/or , not in . They also declare _access(), _chmod(), _close(), _dup(), _dup2(), _isatty(), _lseek(), _read(), _unlink(), _write() in . */ #if defined _WIN32 && !defined __CYGWIN__ # include # include #endif /* Native Windows platforms declare _execl*, _execv* in . */ #if defined _WIN32 && !defined __CYGWIN__ # include #endif /* AIX and OSF/1 5.1 declare getdomainname in , not in . NonStop Kernel declares gethostname in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if ((@GNULIB_GETDOMAINNAME@ && (defined _AIX || defined __osf__)) \ || (@GNULIB_GETHOSTNAME@ && defined __TANDEM)) \ && !defined __GLIBC__ # include #endif /* Mac OS X 10.13, Solaris 11.4, and Android 9.0 declare getentropy in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if (@GNULIB_GETENTROPY@ || defined GNULIB_POSIXCHECK) \ && ((defined __APPLE__ && defined __MACH__) || defined __sun \ || defined __ANDROID__) \ && @UNISTD_H_HAVE_SYS_RANDOM_H@ \ && !defined __GLIBC__ # include #endif /* Android 4.3 declares fchownat in , not in . */ /* But avoid namespace pollution on glibc systems. */ #if (@GNULIB_FCHOWNAT@ || defined GNULIB_POSIXCHECK) && defined __ANDROID__ \ && !defined __GLIBC__ # include #endif /* MSVC defines off_t in . May also define off_t to a 64-bit type on native Windows. Also defines off64_t on macOS, NetBSD, OpenBSD, MSVC, Cygwin, Haiku. */ /* Get off_t, off64_t, ssize_t, mode_t. */ #include /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Get getopt(), optarg, optind, opterr, optopt. */ #if @GNULIB_GETOPT_POSIX@ && @GNULIB_UNISTD_H_GETOPT@ && !defined _GL_SYSTEM_GETOPT # include # include #endif _GL_INLINE_HEADER_BEGIN #ifndef _GL_UNISTD_INLINE # define _GL_UNISTD_INLINE _GL_INLINE #endif /* Hide some function declarations from . */ #if @GNULIB_GETHOSTNAME@ && @UNISTD_H_HAVE_WINSOCK2_H@ # if !defined _@GUARD_PREFIX@_SYS_SOCKET_H # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef socket # define socket socket_used_without_including_sys_socket_h # undef connect # define connect connect_used_without_including_sys_socket_h # undef accept # define accept accept_used_without_including_sys_socket_h # undef bind # define bind bind_used_without_including_sys_socket_h # undef getpeername # define getpeername getpeername_used_without_including_sys_socket_h # undef getsockname # define getsockname getsockname_used_without_including_sys_socket_h # undef getsockopt # define getsockopt getsockopt_used_without_including_sys_socket_h # undef listen # define listen listen_used_without_including_sys_socket_h # undef recv # define recv recv_used_without_including_sys_socket_h # undef send # define send send_used_without_including_sys_socket_h # undef recvfrom # define recvfrom recvfrom_used_without_including_sys_socket_h # undef sendto # define sendto sendto_used_without_including_sys_socket_h # undef setsockopt # define setsockopt setsockopt_used_without_including_sys_socket_h # undef shutdown # define shutdown shutdown_used_without_including_sys_socket_h # else _GL_WARN_ON_USE (socket, "socket() used without including "); _GL_WARN_ON_USE (connect, "connect() used without including "); _GL_WARN_ON_USE (accept, "accept() used without including "); _GL_WARN_ON_USE (bind, "bind() used without including "); _GL_WARN_ON_USE (getpeername, "getpeername() used without including "); _GL_WARN_ON_USE (getsockname, "getsockname() used without including "); _GL_WARN_ON_USE (getsockopt, "getsockopt() used without including "); _GL_WARN_ON_USE (listen, "listen() used without including "); _GL_WARN_ON_USE (recv, "recv() used without including "); _GL_WARN_ON_USE (send, "send() used without including "); _GL_WARN_ON_USE (recvfrom, "recvfrom() used without including "); _GL_WARN_ON_USE (sendto, "sendto() used without including "); _GL_WARN_ON_USE (setsockopt, "setsockopt() used without including "); _GL_WARN_ON_USE (shutdown, "shutdown() used without including "); # endif # endif # if !defined _@GUARD_PREFIX@_SYS_SELECT_H # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef select # define select select_used_without_including_sys_select_h # else _GL_WARN_ON_USE (select, "select() used without including "); # endif # endif #endif /* OS/2 EMX lacks these macros. */ #ifndef STDIN_FILENO # define STDIN_FILENO 0 #endif #ifndef STDOUT_FILENO # define STDOUT_FILENO 1 #endif #ifndef STDERR_FILENO # define STDERR_FILENO 2 #endif /* Ensure *_OK macros exist. */ #ifndef F_OK # define F_OK 0 # define X_OK 1 # define W_OK 2 # define R_OK 4 #endif /* Declare overridden functions. */ #if @GNULIB_ACCESS@ # if @REPLACE_ACCESS@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef access # define access rpl_access # endif _GL_FUNCDECL_RPL (access, int, (const char *file, int mode), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (access, int, (const char *file, int mode)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef access # define access _access # endif _GL_CXXALIAS_MDA (access, int, (const char *file, int mode)); # else _GL_CXXALIAS_SYS (access, int, (const char *file, int mode)); # endif _GL_CXXALIASWARN (access); #elif defined GNULIB_POSIXCHECK # undef access # if HAVE_RAW_DECL_ACCESS /* The access() function is a security risk. */ _GL_WARN_ON_USE (access, "access does not always support X_OK - " "use gnulib module access for portability; " "also, this function is a security risk - " "use the gnulib module faccessat instead"); # endif #elif @GNULIB_MDA_ACCESS@ /* On native Windows, map 'access' to '_access', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::access always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef access # define access _access # endif _GL_CXXALIAS_MDA (access, int, (const char *file, int mode)); # else _GL_CXXALIAS_SYS (access, int, (const char *file, int mode)); # endif _GL_CXXALIASWARN (access); #endif #if @GNULIB_CHDIR@ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef chdir # define chdir _chdir # endif _GL_CXXALIAS_MDA (chdir, int, (const char *file)); # else _GL_CXXALIAS_SYS (chdir, int, (const char *file) _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIASWARN (chdir); #elif defined GNULIB_POSIXCHECK # undef chdir # if HAVE_RAW_DECL_CHDIR _GL_WARN_ON_USE (chdir, "chdir is not always in - " "use gnulib module chdir for portability"); # endif #elif @GNULIB_MDA_CHDIR@ /* On native Windows, map 'chdir' to '_chdir', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::chdir always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef chdir # define chdir _chdir # endif _GL_CXXALIAS_MDA (chdir, int, (const char *file)); # else _GL_CXXALIAS_SYS (chdir, int, (const char *file) _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIASWARN (chdir); #endif #if @GNULIB_CHOWN@ /* Change the owner of FILE to UID (if UID is not -1) and the group of FILE to GID (if GID is not -1). Follow symbolic links. Return 0 if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_DUP2@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define dup2 rpl_dup2 # endif _GL_FUNCDECL_RPL (dup2, int, (int oldfd, int newfd)); _GL_CXXALIAS_RPL (dup2, int, (int oldfd, int newfd)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef dup2 # define dup2 _dup2 # endif _GL_CXXALIAS_MDA (dup2, int, (int oldfd, int newfd)); # else _GL_CXXALIAS_SYS (dup2, int, (int oldfd, int newfd)); # endif _GL_CXXALIASWARN (dup2); #elif defined GNULIB_POSIXCHECK # undef dup2 # if HAVE_RAW_DECL_DUP2 _GL_WARN_ON_USE (dup2, "dup2 is unportable - " "use gnulib module dup2 for portability"); # endif #elif @GNULIB_MDA_DUP2@ /* On native Windows, map 'dup2' to '_dup2', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::dup2 always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef dup2 # define dup2 _dup2 # endif _GL_CXXALIAS_MDA (dup2, int, (int oldfd, int newfd)); # else _GL_CXXALIAS_SYS (dup2, int, (int oldfd, int newfd)); # endif _GL_CXXALIASWARN (dup2); #endif #if @GNULIB_DUP3@ /* Copy the file descriptor OLDFD into file descriptor NEWFD, with the specified flags. The flags are a bitmask, possibly including O_CLOEXEC (defined in ) and O_TEXT, O_BINARY (defined in "binary-io.h"). Close NEWFD first if it is open. Return newfd if successful, otherwise -1 and errno set. See the Linux man page at . */ # if @REPLACE_DUP3@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef dup3 # define dup3 rpl_dup3 # endif _GL_FUNCDECL_RPL (dup3, int, (int oldfd, int newfd, int flags)); _GL_CXXALIAS_RPL (dup3, int, (int oldfd, int newfd, int flags)); # else # if !@HAVE_DUP3@ _GL_FUNCDECL_SYS (dup3, int, (int oldfd, int newfd, int flags)); # endif _GL_CXXALIAS_SYS (dup3, int, (int oldfd, int newfd, int flags)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (dup3); # endif #elif defined GNULIB_POSIXCHECK # undef dup3 # if HAVE_RAW_DECL_DUP3 _GL_WARN_ON_USE (dup3, "dup3 is unportable - " "use gnulib module dup3 for portability"); # endif #endif #if @GNULIB_ENVIRON@ # if defined __CYGWIN__ && !defined __i386__ /* The 'environ' variable is defined in a DLL. Therefore its declaration needs the '__declspec(dllimport)' attribute, but the system's lacks it. This leads to a link error on 64-bit Cygwin when the option -Wl,--disable-auto-import is in use. */ _GL_EXTERN_C __declspec(dllimport) char **environ; # endif # if !@HAVE_DECL_ENVIRON@ /* Set of environment variables and values. An array of strings of the form "VARIABLE=VALUE", terminated with a NULL. */ # if defined __APPLE__ && defined __MACH__ # include # if !TARGET_OS_IPHONE && !TARGET_IPHONE_SIMULATOR # define _GL_USE_CRT_EXTERNS # endif # endif # ifdef _GL_USE_CRT_EXTERNS # include # define environ (*_NSGetEnviron ()) # else # ifdef __cplusplus extern "C" { # endif extern char **environ; # ifdef __cplusplus } # endif # endif # endif #elif defined GNULIB_POSIXCHECK # if HAVE_RAW_DECL_ENVIRON _GL_UNISTD_INLINE char *** _GL_WARN_ON_USE_ATTRIBUTE ("environ is unportable - " "use gnulib module environ for portability") rpl_environ (void) { return &environ; } # undef environ # define environ (*rpl_environ ()) # endif #endif #if @GNULIB_EUIDACCESS@ /* Like access(), except that it uses the effective user id and group id of the current process. */ # if !@HAVE_EUIDACCESS@ _GL_FUNCDECL_SYS (euidaccess, int, (const char *filename, int mode), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (euidaccess, int, (const char *filename, int mode)); _GL_CXXALIASWARN (euidaccess); # if defined GNULIB_POSIXCHECK /* Like access(), this function is a security risk. */ _GL_WARN_ON_USE (euidaccess, "the euidaccess function is a security risk - " "use the gnulib module faccessat instead"); # endif #elif defined GNULIB_POSIXCHECK # undef euidaccess # if HAVE_RAW_DECL_EUIDACCESS _GL_WARN_ON_USE (euidaccess, "euidaccess is unportable - " "use gnulib module euidaccess for portability"); # endif #endif #if @GNULIB_EXECL@ # if @REPLACE_EXECL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execl # define execl rpl_execl # endif _GL_FUNCDECL_RPL (execl, int, (const char *program, const char *arg, ...), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (execl, int, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execl, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execl); #elif defined GNULIB_POSIXCHECK # undef execl # if HAVE_RAW_DECL_EXECL _GL_WARN_ON_USE (execl, "execl behaves very differently on mingw - " "use gnulib module execl for portability"); # endif #elif @GNULIB_MDA_EXECL@ /* On native Windows, map 'execl' to '_execl', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execl always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execl # define execl _execl # endif _GL_CXXALIAS_MDA (execl, intptr_t, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execl, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execl); #endif #if @GNULIB_EXECLE@ # if @REPLACE_EXECLE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execle # define execle rpl_execle # endif _GL_FUNCDECL_RPL (execle, int, (const char *program, const char *arg, ...), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (execle, int, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execle, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execle); #elif defined GNULIB_POSIXCHECK # undef execle # if HAVE_RAW_DECL_EXECLE _GL_WARN_ON_USE (execle, "execle behaves very differently on mingw - " "use gnulib module execle for portability"); # endif #elif @GNULIB_MDA_EXECLE@ /* On native Windows, map 'execle' to '_execle', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execle always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execle # define execle _execle # endif _GL_CXXALIAS_MDA (execle, intptr_t, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execle, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execle); #endif #if @GNULIB_EXECLP@ # if @REPLACE_EXECLP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execlp # define execlp rpl_execlp # endif _GL_FUNCDECL_RPL (execlp, int, (const char *program, const char *arg, ...), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (execlp, int, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execlp, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execlp); #elif defined GNULIB_POSIXCHECK # undef execlp # if HAVE_RAW_DECL_EXECLP _GL_WARN_ON_USE (execlp, "execlp behaves very differently on mingw - " "use gnulib module execlp for portability"); # endif #elif @GNULIB_MDA_EXECLP@ /* On native Windows, map 'execlp' to '_execlp', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execlp always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execlp # define execlp _execlp # endif _GL_CXXALIAS_MDA (execlp, intptr_t, (const char *program, const char *arg, ...)); # else _GL_CXXALIAS_SYS (execlp, int, (const char *program, const char *arg, ...)); # endif _GL_CXXALIASWARN (execlp); #endif #if @GNULIB_EXECV@ # if @REPLACE_EXECV@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execv # define execv rpl_execv # endif _GL_FUNCDECL_RPL (execv, int, (const char *program, char * const *argv), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (execv, int, (const char *program, char * const *argv)); # else _GL_CXXALIAS_SYS (execv, int, (const char *program, char * const *argv)); # endif _GL_CXXALIASWARN (execv); #elif defined GNULIB_POSIXCHECK # undef execv # if HAVE_RAW_DECL_EXECV _GL_WARN_ON_USE (execv, "execv behaves very differently on mingw - " "use gnulib module execv for portability"); # endif #elif @GNULIB_MDA_EXECV@ /* On native Windows, map 'execv' to '_execv', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execv always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execv # define execv _execv # endif _GL_CXXALIAS_MDA_CAST (execv, intptr_t, (const char *program, char * const *argv)); # else _GL_CXXALIAS_SYS (execv, int, (const char *program, char * const *argv)); # endif _GL_CXXALIASWARN (execv); #endif #if @GNULIB_EXECVE@ # if @REPLACE_EXECVE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execve # define execve rpl_execve # endif _GL_FUNCDECL_RPL (execve, int, (const char *program, char * const *argv, char * const *env), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (execve, int, (const char *program, char * const *argv, char * const *env)); # else _GL_CXXALIAS_SYS (execve, int, (const char *program, char * const *argv, char * const *env)); # endif _GL_CXXALIASWARN (execve); #elif defined GNULIB_POSIXCHECK # undef execve # if HAVE_RAW_DECL_EXECVE _GL_WARN_ON_USE (execve, "execve behaves very differently on mingw - " "use gnulib module execve for portability"); # endif #elif @GNULIB_MDA_EXECVE@ /* On native Windows, map 'execve' to '_execve', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execve always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execve # define execve _execve # endif _GL_CXXALIAS_MDA_CAST (execve, intptr_t, (const char *program, char * const *argv, char * const *env)); # else _GL_CXXALIAS_SYS (execve, int, (const char *program, char * const *argv, char * const *env)); # endif _GL_CXXALIASWARN (execve); #endif #if @GNULIB_EXECVP@ # if @REPLACE_EXECVP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execvp # define execvp rpl_execvp # endif _GL_FUNCDECL_RPL (execvp, int, (const char *program, char * const *argv), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (execvp, int, (const char *program, char * const *argv)); # else _GL_CXXALIAS_SYS (execvp, int, (const char *program, char * const *argv)); # endif _GL_CXXALIASWARN (execvp); #elif defined GNULIB_POSIXCHECK # undef execvp # if HAVE_RAW_DECL_EXECVP _GL_WARN_ON_USE (execvp, "execvp behaves very differently on mingw - " "use gnulib module execvp for portability"); # endif #elif @GNULIB_MDA_EXECVP@ /* On native Windows, map 'execvp' to '_execvp', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execvp always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execvp # define execvp _execvp # endif _GL_CXXALIAS_MDA_CAST (execvp, intptr_t, (const char *program, char * const *argv)); # else _GL_CXXALIAS_SYS (execvp, int, (const char *program, char * const *argv)); # endif _GL_CXXALIASWARN (execvp); #endif #if @GNULIB_EXECVPE@ # if @REPLACE_EXECVPE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execvpe # define execvpe rpl_execvpe # endif _GL_FUNCDECL_RPL (execvpe, int, (const char *program, char * const *argv, char * const *env), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (execvpe, int, (const char *program, char * const *argv, char * const *env)); # else # if !@HAVE_DECL_EXECVPE@ _GL_FUNCDECL_SYS (execvpe, int, (const char *program, char * const *argv, char * const *env), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (execvpe, int, (const char *program, char * const *argv, char * const *env)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (execvpe); # endif #elif defined GNULIB_POSIXCHECK # undef execvpe # if HAVE_RAW_DECL_EXECVPE _GL_WARN_ON_USE (execvpe, "execvpe behaves very differently on mingw - " "use gnulib module execvpe for portability"); # endif #elif @GNULIB_MDA_EXECVPE@ /* On native Windows, map 'execvpe' to '_execvpe', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::execvpe on all platforms that have it. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef execvpe # define execvpe _execvpe # endif _GL_CXXALIAS_MDA_CAST (execvpe, intptr_t, (const char *program, char * const *argv, char * const *env)); # elif @HAVE_EXECVPE@ # if !@HAVE_DECL_EXECVPE@ _GL_FUNCDECL_SYS (execvpe, int, (const char *program, char * const *argv, char * const *env), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (execvpe, int, (const char *program, char * const *argv, char * const *env)); # endif # if (defined _WIN32 && !defined __CYGWIN__) || @HAVE_EXECVPE@ _GL_CXXALIASWARN (execvpe); # endif #endif #if @GNULIB_FACCESSAT@ # if @REPLACE_FACCESSAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef faccessat # define faccessat rpl_faccessat # endif _GL_FUNCDECL_RPL (faccessat, int, (int fd, char const *name, int mode, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (faccessat, int, (int fd, char const *name, int mode, int flag)); # else # if !@HAVE_FACCESSAT@ _GL_FUNCDECL_SYS (faccessat, int, (int fd, char const *file, int mode, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (faccessat, int, (int fd, char const *file, int mode, int flag)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (faccessat); # endif #elif defined GNULIB_POSIXCHECK # undef faccessat # if HAVE_RAW_DECL_FACCESSAT _GL_WARN_ON_USE (faccessat, "faccessat is not portable - " "use gnulib module faccessat for portability"); # endif #endif #if @GNULIB_FCHDIR@ /* Change the process' current working directory to the directory on which the given file descriptor is open. Return 0 if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_FCHDIR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fchdir # define fchdir rpl_fchdir # endif _GL_FUNCDECL_RPL (fchdir, int, (int /*fd*/), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fchdir, int, (int /*fd*/)); # else # if !@HAVE_FCHDIR@ || !@HAVE_DECL_FCHDIR@ _GL_FUNCDECL_SYS (fchdir, int, (int /*fd*/), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (fchdir, int, (int /*fd*/)); # endif _GL_CXXALIASWARN (fchdir); # if @REPLACE_FCHDIR@ || !@HAVE_FCHDIR@ /* Gnulib internal hooks needed to maintain the fchdir metadata. */ _GL_EXTERN_C int _gl_register_fd (int fd, const char *filename) _GL_ARG_NONNULL ((2)); _GL_EXTERN_C void _gl_unregister_fd (int fd); _GL_EXTERN_C int _gl_register_dup (int oldfd, int newfd); _GL_EXTERN_C const char *_gl_directory_name (int fd); # endif #elif defined GNULIB_POSIXCHECK # undef fchdir # if HAVE_RAW_DECL_FCHDIR _GL_WARN_ON_USE (fchdir, "fchdir is unportable - " "use gnulib module fchdir for portability"); # endif #endif #if @GNULIB_FCHOWNAT@ # if @REPLACE_FCHOWNAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fchownat # define fchownat rpl_fchownat # endif _GL_FUNCDECL_RPL (fchownat, int, (int fd, char const *file, uid_t owner, gid_t group, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (fchownat, int, (int fd, char const *file, uid_t owner, gid_t group, int flag)); # else # if !@HAVE_FCHOWNAT@ _GL_FUNCDECL_SYS (fchownat, int, (int fd, char const *file, uid_t owner, gid_t group, int flag), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (fchownat, int, (int fd, char const *file, uid_t owner, gid_t group, int flag)); # endif _GL_CXXALIASWARN (fchownat); #elif defined GNULIB_POSIXCHECK # undef fchownat # if HAVE_RAW_DECL_FCHOWNAT _GL_WARN_ON_USE (fchownat, "fchownat is not portable - " "use gnulib module fchownat for portability"); # endif #endif #if @GNULIB_FDATASYNC@ /* Synchronize changes to a file. Return 0 if successful, otherwise -1 and errno set. See POSIX:2008 specification . */ # if @REPLACE_FDATASYNC@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef fdatasync # define fdatasync rpl_fdatasync # endif _GL_FUNCDECL_RPL (fdatasync, int, (int fd)); _GL_CXXALIAS_RPL (fdatasync, int, (int fd)); # else # if !@HAVE_FDATASYNC@|| !@HAVE_DECL_FDATASYNC@ _GL_FUNCDECL_SYS (fdatasync, int, (int fd)); # endif _GL_CXXALIAS_SYS (fdatasync, int, (int fd)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (fdatasync); # endif #elif defined GNULIB_POSIXCHECK # undef fdatasync # if HAVE_RAW_DECL_FDATASYNC _GL_WARN_ON_USE (fdatasync, "fdatasync is unportable - " "use gnulib module fdatasync for portability"); # endif #endif #if @GNULIB_FSYNC@ /* Synchronize changes, including metadata, to a file. Return 0 if successful, otherwise -1 and errno set. See POSIX:2008 specification . */ # if !@HAVE_FSYNC@ _GL_FUNCDECL_SYS (fsync, int, (int fd)); # endif _GL_CXXALIAS_SYS (fsync, int, (int fd)); _GL_CXXALIASWARN (fsync); #elif defined GNULIB_POSIXCHECK # undef fsync # if HAVE_RAW_DECL_FSYNC _GL_WARN_ON_USE (fsync, "fsync is unportable - " "use gnulib module fsync for portability"); # endif #endif #if @GNULIB_FTRUNCATE@ /* Change the size of the file to which FD is opened to become equal to LENGTH. Return 0 if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_FTRUNCATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ftruncate # define ftruncate rpl_ftruncate # endif _GL_FUNCDECL_RPL (ftruncate, int, (int fd, off_t length), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (ftruncate, int, (int fd, off_t length)); # else # if !@HAVE_FTRUNCATE@ _GL_FUNCDECL_SYS (ftruncate, int, (int fd, off_t length), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (ftruncate, int, (int fd, off_t length)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (ftruncate); # endif #elif defined GNULIB_POSIXCHECK # undef ftruncate # if HAVE_RAW_DECL_FTRUNCATE _GL_WARN_ON_USE (ftruncate, "ftruncate is unportable - " "use gnulib module ftruncate for portability"); # endif #endif #if @GNULIB_GETCWD@ /* Get the name of the current working directory, and put it in SIZE bytes of BUF. Return BUF if successful, or NULL if the directory couldn't be determined or SIZE was too small. See the POSIX:2008 specification . Additionally, the gnulib module 'getcwd' or 'getcwd-lgpl' guarantees the following GNU extension: If BUF is NULL, an array is allocated with 'malloc'; the array is SIZE bytes long, unless SIZE == 0, in which case it is as big as necessary. */ # if @REPLACE_GETCWD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define getcwd rpl_getcwd # endif _GL_FUNCDECL_RPL (getcwd, char *, (char *buf, size_t size), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getcwd, char *, (char *buf, size_t size)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getcwd # define getcwd _getcwd # endif _GL_CXXALIAS_MDA (getcwd, char *, (char *buf, size_t size)); # else /* Need to cast, because on mingw, the second parameter is int size. */ _GL_CXXALIAS_SYS_CAST (getcwd, char *, (char *buf, size_t size)); # endif _GL_CXXALIASWARN (getcwd); #elif defined GNULIB_POSIXCHECK # undef getcwd # if HAVE_RAW_DECL_GETCWD _GL_WARN_ON_USE (getcwd, "getcwd is unportable - " "use gnulib module getcwd for portability"); # endif #elif @GNULIB_MDA_GETCWD@ /* On native Windows, map 'getcwd' to '_getcwd', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::getcwd always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getcwd # define getcwd _getcwd # endif /* Need to cast, because on mingw, the second parameter is either 'int size' or 'size_t size'. */ _GL_CXXALIAS_MDA_CAST (getcwd, char *, (char *buf, size_t size)); # else _GL_CXXALIAS_SYS_CAST (getcwd, char *, (char *buf, size_t size)); # endif _GL_CXXALIASWARN (getcwd); #endif #if @GNULIB_GETDOMAINNAME@ /* Return the NIS domain name of the machine. WARNING! The NIS domain name is unrelated to the fully qualified host name of the machine. It is also unrelated to email addresses. WARNING! The NIS domain name is usually the empty string or "(none)" when not using NIS. Put up to LEN bytes of the NIS domain name into NAME. Null terminate it if the name is shorter than LEN. If the NIS domain name is longer than LEN, set errno = EINVAL and return -1. Return 0 if successful, otherwise set errno and return -1. */ # if @REPLACE_GETDOMAINNAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getdomainname # define getdomainname rpl_getdomainname # endif _GL_FUNCDECL_RPL (getdomainname, int, (char *name, size_t len), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getdomainname, int, (char *name, size_t len)); # else # if !@HAVE_DECL_GETDOMAINNAME@ _GL_FUNCDECL_SYS (getdomainname, int, (char *name, size_t len), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getdomainname, int, (char *name, size_t len)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getdomainname); # endif #elif defined GNULIB_POSIXCHECK # undef getdomainname # if HAVE_RAW_DECL_GETDOMAINNAME _GL_WARN_ON_USE (getdomainname, "getdomainname is unportable - " "use gnulib module getdomainname for portability"); # endif #endif #if @GNULIB_GETDTABLESIZE@ /* Return the maximum number of file descriptors in the current process. In POSIX, this is same as sysconf (_SC_OPEN_MAX). */ # if @REPLACE_GETDTABLESIZE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getdtablesize # define getdtablesize rpl_getdtablesize # endif _GL_FUNCDECL_RPL (getdtablesize, int, (void)); _GL_CXXALIAS_RPL (getdtablesize, int, (void)); # else # if !@HAVE_GETDTABLESIZE@ _GL_FUNCDECL_SYS (getdtablesize, int, (void)); # endif /* Need to cast, because on AIX, the parameter list is (...). */ _GL_CXXALIAS_SYS_CAST (getdtablesize, int, (void)); # endif _GL_CXXALIASWARN (getdtablesize); #elif defined GNULIB_POSIXCHECK # undef getdtablesize # if HAVE_RAW_DECL_GETDTABLESIZE _GL_WARN_ON_USE (getdtablesize, "getdtablesize is unportable - " "use gnulib module getdtablesize for portability"); # endif #endif #if @GNULIB_GETENTROPY@ /* Fill a buffer with random bytes. */ # if @REPLACE_GETENTROPY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getentropy # define getentropy rpl_getentropy # endif _GL_FUNCDECL_RPL (getentropy, int, (void *buffer, size_t length), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getentropy, int, (void *buffer, size_t length)); # else # if !@HAVE_GETENTROPY@ _GL_FUNCDECL_SYS (getentropy, int, (void *buffer, size_t length), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getentropy, int, (void *buffer, size_t length)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getentropy); # endif #elif defined GNULIB_POSIXCHECK # undef getentropy # if HAVE_RAW_DECL_GETENTROPY _GL_WARN_ON_USE (getentropy, "getentropy is unportable - " "use gnulib module getentropy for portability"); # endif #endif #if @GNULIB_GETGROUPS@ /* Return the supplemental groups that the current process belongs to. It is unspecified whether the effective group id is in the list. If N is 0, return the group count; otherwise, N describes how many entries are available in GROUPS. Return -1 and set errno if N is not 0 and not large enough. Fails with ENOSYS on some systems. */ # if @REPLACE_GETGROUPS@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getgroups # define getgroups rpl_getgroups # endif _GL_FUNCDECL_RPL (getgroups, int, (int n, gid_t *groups), _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (getgroups, int, (int n, gid_t *groups)); # else # if !@HAVE_GETGROUPS@ _GL_FUNCDECL_SYS (getgroups, int, (int n, gid_t *groups), _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (getgroups, int, (int n, gid_t *groups)); # endif _GL_CXXALIASWARN (getgroups); #elif defined GNULIB_POSIXCHECK # undef getgroups # if HAVE_RAW_DECL_GETGROUPS _GL_WARN_ON_USE (getgroups, "getgroups is unportable - " "use gnulib module getgroups for portability"); # endif #endif #if @GNULIB_GETHOSTNAME@ /* Return the standard host name of the machine. WARNING! The host name may or may not be fully qualified. Put up to LEN bytes of the host name into NAME. Null terminate it if the name is shorter than LEN. If the host name is longer than LEN, set errno = EINVAL and return -1. Return 0 if successful, otherwise set errno and return -1. */ # if @UNISTD_H_HAVE_WINSOCK2_H@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef gethostname # define gethostname rpl_gethostname # endif _GL_FUNCDECL_RPL (gethostname, int, (char *name, size_t len), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (gethostname, int, (char *name, size_t len)); # else # if !@HAVE_GETHOSTNAME@ _GL_FUNCDECL_SYS (gethostname, int, (char *name, size_t len), _GL_ARG_NONNULL ((1))); # endif /* Need to cast, because on Solaris 10 and OSF/1 5.1 systems, the second parameter is int len. */ _GL_CXXALIAS_SYS_CAST (gethostname, int, (char *name, size_t len)); # endif _GL_CXXALIASWARN (gethostname); #elif @UNISTD_H_HAVE_WINSOCK2_H@ # if !GNULIB_GETHOSTNAME # undef gethostname # define gethostname gethostname_used_without_requesting_gnulib_module_gethostname # endif #elif defined GNULIB_POSIXCHECK # undef gethostname # if HAVE_RAW_DECL_GETHOSTNAME _GL_WARN_ON_USE (gethostname, "gethostname is unportable - " "use gnulib module gethostname for portability"); # endif #endif #if @GNULIB_GETLOGIN@ /* Returns the user's login name, or NULL if it cannot be found. Upon error, returns NULL with errno set. See . Most programs don't need to use this function, because the information is available through environment variables: ${LOGNAME-$USER} on Unix platforms, $USERNAME on native Windows platforms. */ # if !@HAVE_DECL_GETLOGIN@ _GL_FUNCDECL_SYS (getlogin, char *, (void)); # endif _GL_CXXALIAS_SYS (getlogin, char *, (void)); _GL_CXXALIASWARN (getlogin); #elif defined GNULIB_POSIXCHECK # undef getlogin # if HAVE_RAW_DECL_GETLOGIN _GL_WARN_ON_USE (getlogin, "getlogin is unportable - " "use gnulib module getlogin for portability"); # endif #endif #if @GNULIB_GETLOGIN_R@ /* Copies the user's login name to NAME. The array pointed to by NAME has room for SIZE bytes. Returns 0 if successful. Upon error, an error number is returned, or -1 in the case that the login name cannot be found but no specific error is provided (this case is hopefully rare but is left open by the POSIX spec). See . Most programs don't need to use this function, because the information is available through environment variables: ${LOGNAME-$USER} on Unix platforms, $USERNAME on native Windows platforms. */ # if @REPLACE_GETLOGIN_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define getlogin_r rpl_getlogin_r # endif _GL_FUNCDECL_RPL (getlogin_r, int, (char *name, size_t size), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (getlogin_r, int, (char *name, size_t size)); # else # if !@HAVE_DECL_GETLOGIN_R@ _GL_FUNCDECL_SYS (getlogin_r, int, (char *name, size_t size), _GL_ARG_NONNULL ((1))); # endif /* Need to cast, because on Solaris 10 systems, the second argument is int size. */ _GL_CXXALIAS_SYS_CAST (getlogin_r, int, (char *name, size_t size)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (getlogin_r); # endif #elif defined GNULIB_POSIXCHECK # undef getlogin_r # if HAVE_RAW_DECL_GETLOGIN_R _GL_WARN_ON_USE (getlogin_r, "getlogin_r is unportable - " "use gnulib module getlogin_r for portability"); # endif #endif #if @GNULIB_GETPAGESIZE@ # if @REPLACE_GETPAGESIZE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define getpagesize rpl_getpagesize # endif _GL_FUNCDECL_RPL (getpagesize, int, (void)); _GL_CXXALIAS_RPL (getpagesize, int, (void)); # else /* On HP-UX, getpagesize exists, but it is not declared in even if the compiler options -D_HPUX_SOURCE -D_XOPEN_SOURCE=600 are used. */ # if defined __hpux _GL_FUNCDECL_SYS (getpagesize, int, (void)); # endif # if !@HAVE_GETPAGESIZE@ # if !defined getpagesize /* This is for POSIX systems. */ # if !defined _gl_getpagesize && defined _SC_PAGESIZE # if ! (defined __VMS && __VMS_VER < 70000000) # define _gl_getpagesize() sysconf (_SC_PAGESIZE) # endif # endif /* This is for older VMS. */ # if !defined _gl_getpagesize && defined __VMS # ifdef __ALPHA # define _gl_getpagesize() 8192 # else # define _gl_getpagesize() 512 # endif # endif /* This is for BeOS. */ # if !defined _gl_getpagesize && @HAVE_OS_H@ # include # if defined B_PAGE_SIZE # define _gl_getpagesize() B_PAGE_SIZE # endif # endif /* This is for AmigaOS4.0. */ # if !defined _gl_getpagesize && defined __amigaos4__ # define _gl_getpagesize() 2048 # endif /* This is for older Unix systems. */ # if !defined _gl_getpagesize && @HAVE_SYS_PARAM_H@ # include # ifdef EXEC_PAGESIZE # define _gl_getpagesize() EXEC_PAGESIZE # else # ifdef NBPG # ifndef CLSIZE # define CLSIZE 1 # endif # define _gl_getpagesize() (NBPG * CLSIZE) # else # ifdef NBPC # define _gl_getpagesize() NBPC # endif # endif # endif # endif # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define getpagesize() _gl_getpagesize () # else # if !GNULIB_defined_getpagesize_function _GL_UNISTD_INLINE int getpagesize () { return _gl_getpagesize (); } # define GNULIB_defined_getpagesize_function 1 # endif # endif # endif # endif /* Need to cast, because on Cygwin 1.5.x systems, the return type is size_t. */ _GL_CXXALIAS_SYS_CAST (getpagesize, int, (void)); # endif # if @HAVE_DECL_GETPAGESIZE@ _GL_CXXALIASWARN (getpagesize); # endif #elif defined GNULIB_POSIXCHECK # undef getpagesize # if HAVE_RAW_DECL_GETPAGESIZE _GL_WARN_ON_USE (getpagesize, "getpagesize is unportable - " "use gnulib module getpagesize for portability"); # endif #endif #if @GNULIB_GETPASS@ /* Function getpass() from module 'getpass': Read a password from /dev/tty or stdin. Function getpass() from module 'getpass-gnu': Read a password of arbitrary length from /dev/tty or stdin. */ # if (@GNULIB_GETPASS@ && @REPLACE_GETPASS@) \ || (@GNULIB_GETPASS_GNU@ && @REPLACE_GETPASS_FOR_GETPASS_GNU@) # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getpass # define getpass rpl_getpass # endif _GL_FUNCDECL_RPL (getpass, char *, (const char *prompt), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (getpass, char *, (const char *prompt)); # else # if !@HAVE_GETPASS@ _GL_FUNCDECL_SYS (getpass, char *, (const char *prompt), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (getpass, char *, (const char *prompt)); # endif _GL_CXXALIASWARN (getpass); #elif defined GNULIB_POSIXCHECK # undef getpass # if HAVE_RAW_DECL_GETPASS _GL_WARN_ON_USE (getpass, "getpass is unportable - " "use gnulib module getpass or getpass-gnu for portability"); # endif #endif #if @GNULIB_MDA_GETPID@ /* On native Windows, map 'getpid' to '_getpid', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::getpid always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getpid # define getpid _getpid # endif _GL_CXXALIAS_MDA (getpid, int, (void)); # else _GL_CXXALIAS_SYS (getpid, pid_t, (void)); # endif _GL_CXXALIASWARN (getpid); #endif #if @GNULIB_GETUSERSHELL@ # if @REPLACE_GETUSERSHELL@ /* Return the next valid login shell on the system, or NULL when the end of the list has been reached. */ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef getusershell # define getusershell rpl_getusershell # endif _GL_FUNCDECL_RPL (getusershell, char *, (void)); _GL_CXXALIAS_RPL (getusershell, char *, (void)); # else # if !@HAVE_DECL_GETUSERSHELL@ _GL_FUNCDECL_SYS (getusershell, char *, (void)); # endif _GL_CXXALIAS_SYS (getusershell, char *, (void)); # endif _GL_CXXALIASWARN (getusershell); #elif defined GNULIB_POSIXCHECK # undef getusershell # if HAVE_RAW_DECL_GETUSERSHELL _GL_WARN_ON_USE (getusershell, "getusershell is unportable - " "use gnulib module getusershell for portability"); # endif #endif #if @GNULIB_GETUSERSHELL@ /* Rewind to pointer that is advanced at each getusershell() call. */ # if @REPLACE_GETUSERSHELL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef setusershell # define setusershell rpl_setusershell # endif _GL_FUNCDECL_RPL (setusershell, void, (void)); _GL_CXXALIAS_RPL (setusershell, void, (void)); # else # if !@HAVE_DECL_GETUSERSHELL@ _GL_FUNCDECL_SYS (setusershell, void, (void)); # endif _GL_CXXALIAS_SYS (setusershell, void, (void)); # endif _GL_CXXALIASWARN (setusershell); #elif defined GNULIB_POSIXCHECK # undef setusershell # if HAVE_RAW_DECL_SETUSERSHELL _GL_WARN_ON_USE (setusershell, "setusershell is unportable - " "use gnulib module getusershell for portability"); # endif #endif #if @GNULIB_GETUSERSHELL@ /* Free the pointer that is advanced at each getusershell() call and associated resources. */ # if @REPLACE_GETUSERSHELL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef endusershell # define endusershell rpl_endusershell # endif _GL_FUNCDECL_RPL (endusershell, void, (void)); _GL_CXXALIAS_RPL (endusershell, void, (void)); # else # if !@HAVE_DECL_GETUSERSHELL@ _GL_FUNCDECL_SYS (endusershell, void, (void)); # endif _GL_CXXALIAS_SYS (endusershell, void, (void)); # endif _GL_CXXALIASWARN (endusershell); #elif defined GNULIB_POSIXCHECK # undef endusershell # if HAVE_RAW_DECL_ENDUSERSHELL _GL_WARN_ON_USE (endusershell, "endusershell is unportable - " "use gnulib module getusershell for portability"); # endif #endif #if @GNULIB_GROUP_MEMBER@ /* Determine whether group id is in calling user's group list. */ # if !@HAVE_GROUP_MEMBER@ _GL_FUNCDECL_SYS (group_member, int, (gid_t gid)); # endif _GL_CXXALIAS_SYS (group_member, int, (gid_t gid)); _GL_CXXALIASWARN (group_member); #elif defined GNULIB_POSIXCHECK # undef group_member # if HAVE_RAW_DECL_GROUP_MEMBER _GL_WARN_ON_USE (group_member, "group_member is unportable - " "use gnulib module group-member for portability"); # endif #endif #if @GNULIB_ISATTY@ # if @REPLACE_ISATTY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef isatty # define isatty rpl_isatty # endif # define GNULIB_defined_isatty 1 _GL_FUNCDECL_RPL (isatty, int, (int fd)); _GL_CXXALIAS_RPL (isatty, int, (int fd)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef isatty # define isatty _isatty # endif _GL_CXXALIAS_MDA (isatty, int, (int fd)); # else _GL_CXXALIAS_SYS (isatty, int, (int fd)); # endif _GL_CXXALIASWARN (isatty); #elif defined GNULIB_POSIXCHECK # undef isatty # if HAVE_RAW_DECL_ISATTY _GL_WARN_ON_USE (isatty, "isatty has portability problems on native Windows - " "use gnulib module isatty for portability"); # endif #elif @GNULIB_MDA_ISATTY@ /* On native Windows, map 'isatty' to '_isatty', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::isatty always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef isatty # define isatty _isatty # endif _GL_CXXALIAS_MDA (isatty, int, (int fd)); # else _GL_CXXALIAS_SYS (isatty, int, (int fd)); # endif _GL_CXXALIASWARN (isatty); #endif #if @GNULIB_LCHOWN@ /* Change the owner of FILE to UID (if UID is not -1) and the group of FILE to GID (if GID is not -1). Do not follow symbolic links. Return 0 if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_LCHOWN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef lchown # define lchown rpl_lchown # endif _GL_FUNCDECL_RPL (lchown, int, (char const *file, uid_t owner, gid_t group), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (lchown, int, (char const *file, uid_t owner, gid_t group)); # else # if !@HAVE_LCHOWN@ _GL_FUNCDECL_SYS (lchown, int, (char const *file, uid_t owner, gid_t group), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (lchown, int, (char const *file, uid_t owner, gid_t group)); # endif _GL_CXXALIASWARN (lchown); #elif defined GNULIB_POSIXCHECK # undef lchown # if HAVE_RAW_DECL_LCHOWN _GL_WARN_ON_USE (lchown, "lchown is unportable to pre-POSIX.1-2001 systems - " "use gnulib module lchown for portability"); # endif #endif #if @GNULIB_LINK@ /* Create a new hard link for an existing file. Return 0 if successful, otherwise -1 and errno set. See POSIX:2008 specification . */ # if @REPLACE_LINK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define link rpl_link # endif _GL_FUNCDECL_RPL (link, int, (const char *path1, const char *path2), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (link, int, (const char *path1, const char *path2)); # else # if !@HAVE_LINK@ _GL_FUNCDECL_SYS (link, int, (const char *path1, const char *path2), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (link, int, (const char *path1, const char *path2)); # endif _GL_CXXALIASWARN (link); #elif defined GNULIB_POSIXCHECK # undef link # if HAVE_RAW_DECL_LINK _GL_WARN_ON_USE (link, "link is unportable - " "use gnulib module link for portability"); # endif #endif #if @GNULIB_LINKAT@ /* Create a new hard link for an existing file, relative to two directories. FLAG controls whether symlinks are followed. Return 0 if successful, otherwise -1 and errno set. */ # if @REPLACE_LINKAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef linkat # define linkat rpl_linkat # endif _GL_FUNCDECL_RPL (linkat, int, (int fd1, const char *path1, int fd2, const char *path2, int flag), _GL_ARG_NONNULL ((2, 4)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (linkat, int, (int fd1, const char *path1, int fd2, const char *path2, int flag)); # else # if !@HAVE_LINKAT@ _GL_FUNCDECL_SYS (linkat, int, (int fd1, const char *path1, int fd2, const char *path2, int flag), _GL_ARG_NONNULL ((2, 4)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (linkat, int, (int fd1, const char *path1, int fd2, const char *path2, int flag)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (linkat); # endif #elif defined GNULIB_POSIXCHECK # undef linkat # if HAVE_RAW_DECL_LINKAT _GL_WARN_ON_USE (linkat, "linkat is unportable - " "use gnulib module linkat for portability"); # endif #endif #if @GNULIB_LSEEK@ /* Set the offset of FD relative to SEEK_SET, SEEK_CUR, or SEEK_END. Return the new offset if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_LSEEK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define lseek rpl_lseek # endif _GL_FUNCDECL_RPL (lseek, off_t, (int fd, off_t offset, int whence)); _GL_CXXALIAS_RPL (lseek, off_t, (int fd, off_t offset, int whence)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef lseek # define lseek _lseek # endif _GL_CXXALIAS_MDA (lseek, off_t, (int fd, off_t offset, int whence)); # else _GL_CXXALIAS_SYS (lseek, off_t, (int fd, off_t offset, int whence)); # endif _GL_CXXALIASWARN (lseek); #elif defined GNULIB_POSIXCHECK # undef lseek # if HAVE_RAW_DECL_LSEEK _GL_WARN_ON_USE (lseek, "lseek does not fail with ESPIPE on pipes on some " "systems - use gnulib module lseek for portability"); # endif #elif @GNULIB_MDA_LSEEK@ /* On native Windows, map 'lseek' to '_lseek', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::lseek always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef lseek # define lseek _lseek # endif _GL_CXXALIAS_MDA (lseek, long, (int fd, long offset, int whence)); # else _GL_CXXALIAS_SYS (lseek, off_t, (int fd, off_t offset, int whence)); # endif _GL_CXXALIASWARN (lseek); #endif #if @GNULIB_PIPE@ /* Create a pipe, defaulting to O_BINARY mode. Store the read-end as fd[0] and the write-end as fd[1]. Return 0 upon success, or -1 with errno set upon failure. */ # if !@HAVE_PIPE@ _GL_FUNCDECL_SYS (pipe, int, (int fd[2]), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (pipe, int, (int fd[2])); _GL_CXXALIASWARN (pipe); #elif defined GNULIB_POSIXCHECK # undef pipe # if HAVE_RAW_DECL_PIPE _GL_WARN_ON_USE (pipe, "pipe is unportable - " "use gnulib module pipe-posix for portability"); # endif #endif #if @GNULIB_PIPE2@ /* Create a pipe, applying the given flags when opening the read-end of the pipe and the write-end of the pipe. The flags are a bitmask, possibly including O_CLOEXEC (defined in ) and O_TEXT, O_BINARY (defined in "binary-io.h"). Store the read-end as fd[0] and the write-end as fd[1]. Return 0 upon success, or -1 with errno set upon failure. See also the Linux man page at . */ # if @REPLACE_PIPE2@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pipe2 # define pipe2 rpl_pipe2 # endif _GL_FUNCDECL_RPL (pipe2, int, (int fd[2], int flags), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (pipe2, int, (int fd[2], int flags)); # else _GL_FUNCDECL_SYS (pipe2, int, (int fd[2], int flags), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_SYS (pipe2, int, (int fd[2], int flags)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pipe2); # endif #elif defined GNULIB_POSIXCHECK # undef pipe2 # if HAVE_RAW_DECL_PIPE2 _GL_WARN_ON_USE (pipe2, "pipe2 is unportable - " "use gnulib module pipe2 for portability"); # endif #endif #if @GNULIB_PREAD@ /* Read at most BUFSIZE bytes from FD into BUF, starting at OFFSET. Return the number of bytes placed into BUF if successful, otherwise set errno and return -1. 0 indicates EOF. See the POSIX:2008 specification . */ # if @REPLACE_PREAD@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pread # define pread rpl_pread # endif _GL_FUNCDECL_RPL (pread, ssize_t, (int fd, void *buf, size_t bufsize, off_t offset), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (pread, ssize_t, (int fd, void *buf, size_t bufsize, off_t offset)); # else # if !@HAVE_PREAD@ _GL_FUNCDECL_SYS (pread, ssize_t, (int fd, void *buf, size_t bufsize, off_t offset), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (pread, ssize_t, (int fd, void *buf, size_t bufsize, off_t offset)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pread); # endif #elif defined GNULIB_POSIXCHECK # undef pread # if HAVE_RAW_DECL_PREAD _GL_WARN_ON_USE (pread, "pread is unportable - " "use gnulib module pread for portability"); # endif #endif #if @GNULIB_PWRITE@ /* Write at most BUFSIZE bytes from BUF into FD, starting at OFFSET. Return the number of bytes written if successful, otherwise set errno and return -1. 0 indicates nothing written. See the POSIX:2008 specification . */ # if @REPLACE_PWRITE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef pwrite # define pwrite rpl_pwrite # endif _GL_FUNCDECL_RPL (pwrite, ssize_t, (int fd, const void *buf, size_t bufsize, off_t offset), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (pwrite, ssize_t, (int fd, const void *buf, size_t bufsize, off_t offset)); # else # if !@HAVE_PWRITE@ _GL_FUNCDECL_SYS (pwrite, ssize_t, (int fd, const void *buf, size_t bufsize, off_t offset), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (pwrite, ssize_t, (int fd, const void *buf, size_t bufsize, off_t offset)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (pwrite); # endif #elif defined GNULIB_POSIXCHECK # undef pwrite # if HAVE_RAW_DECL_PWRITE _GL_WARN_ON_USE (pwrite, "pwrite is unportable - " "use gnulib module pwrite for portability"); # endif #endif #if @GNULIB_READ@ /* Read up to COUNT bytes from file descriptor FD into the buffer starting at BUF. See the POSIX:2008 specification . */ # if @REPLACE_READ@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef read # define read rpl_read # endif _GL_FUNCDECL_RPL (read, ssize_t, (int fd, void *buf, size_t count), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (read, ssize_t, (int fd, void *buf, size_t count)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef read # define read _read # endif _GL_CXXALIAS_MDA (read, ssize_t, (int fd, void *buf, size_t count)); # else _GL_CXXALIAS_SYS (read, ssize_t, (int fd, void *buf, size_t count)); # endif _GL_CXXALIASWARN (read); #elif @GNULIB_MDA_READ@ /* On native Windows, map 'read' to '_read', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::read always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef read # define read _read # endif _GL_CXXALIAS_MDA_CAST (read, ssize_t, (int fd, void *buf, unsigned int count)); # else _GL_CXXALIAS_SYS (read, ssize_t, (int fd, void *buf, size_t count)); # endif _GL_CXXALIASWARN (read); #endif #if @GNULIB_READLINK@ /* Read the contents of the symbolic link FILE and place the first BUFSIZE bytes of it into BUF. Return the number of bytes placed into BUF if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_READLINK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define readlink rpl_readlink # endif _GL_FUNCDECL_RPL (readlink, ssize_t, (const char *restrict file, char *restrict buf, size_t bufsize), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (readlink, ssize_t, (const char *restrict file, char *restrict buf, size_t bufsize)); # else # if !@HAVE_READLINK@ _GL_FUNCDECL_SYS (readlink, ssize_t, (const char *restrict file, char *restrict buf, size_t bufsize), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (readlink, ssize_t, (const char *restrict file, char *restrict buf, size_t bufsize)); # endif _GL_CXXALIASWARN (readlink); #elif defined GNULIB_POSIXCHECK # undef readlink # if HAVE_RAW_DECL_READLINK _GL_WARN_ON_USE (readlink, "readlink is unportable - " "use gnulib module readlink for portability"); # endif #endif #if @GNULIB_READLINKAT@ # if @REPLACE_READLINKAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define readlinkat rpl_readlinkat # endif _GL_FUNCDECL_RPL (readlinkat, ssize_t, (int fd, char const *restrict file, char *restrict buf, size_t len), _GL_ARG_NONNULL ((2, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (readlinkat, ssize_t, (int fd, char const *restrict file, char *restrict buf, size_t len)); # else # if !@HAVE_READLINKAT@ _GL_FUNCDECL_SYS (readlinkat, ssize_t, (int fd, char const *restrict file, char *restrict buf, size_t len), _GL_ARG_NONNULL ((2, 3)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (readlinkat, ssize_t, (int fd, char const *restrict file, char *restrict buf, size_t len)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (readlinkat); # endif #elif defined GNULIB_POSIXCHECK # undef readlinkat # if HAVE_RAW_DECL_READLINKAT _GL_WARN_ON_USE (readlinkat, "readlinkat is not portable - " "use gnulib module readlinkat for portability"); # endif #endif #if @GNULIB_RMDIR@ /* Remove the directory DIR. */ # if @REPLACE_RMDIR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define rmdir rpl_rmdir # endif _GL_FUNCDECL_RPL (rmdir, int, (char const *name), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (rmdir, int, (char const *name)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef rmdir # define rmdir _rmdir # endif _GL_CXXALIAS_MDA (rmdir, int, (char const *name)); # else _GL_CXXALIAS_SYS (rmdir, int, (char const *name)); # endif _GL_CXXALIASWARN (rmdir); #elif defined GNULIB_POSIXCHECK # undef rmdir # if HAVE_RAW_DECL_RMDIR _GL_WARN_ON_USE (rmdir, "rmdir is unportable - " "use gnulib module rmdir for portability"); # endif #elif @GNULIB_MDA_RMDIR@ /* On native Windows, map 'rmdir' to '_rmdir', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::rmdir always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef rmdir # define rmdir _rmdir # endif _GL_CXXALIAS_MDA (rmdir, int, (char const *name)); # else _GL_CXXALIAS_SYS (rmdir, int, (char const *name)); # endif _GL_CXXALIASWARN (rmdir); #endif #if @GNULIB_SETHOSTNAME@ /* Set the host name of the machine. The host name may or may not be fully qualified. Put LEN bytes of NAME into the host name. Return 0 if successful, otherwise, set errno and return -1. Platforms with no ability to set the hostname return -1 and set errno = ENOSYS. */ # if @REPLACE_SETHOSTNAME@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef sethostname # define sethostname rpl_sethostname # endif _GL_FUNCDECL_RPL (sethostname, int, (const char *name, size_t len), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (sethostname, int, (const char *name, size_t len)); # else # if !@HAVE_SETHOSTNAME@ || !@HAVE_DECL_SETHOSTNAME@ _GL_FUNCDECL_SYS (sethostname, int, (const char *name, size_t len), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif /* Need to cast, because on Solaris 11 2011-10, Mac OS X 10.5, IRIX 6.5 and FreeBSD 6.4 the second parameter is int. On Solaris 11 2011-10, the first parameter is not const. */ _GL_CXXALIAS_SYS_CAST (sethostname, int, (const char *name, size_t len)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (sethostname); # endif #elif defined GNULIB_POSIXCHECK # undef sethostname # if HAVE_RAW_DECL_SETHOSTNAME _GL_WARN_ON_USE (sethostname, "sethostname is unportable - " "use gnulib module sethostname for portability"); # endif #endif #if @GNULIB_SLEEP@ /* Pause the execution of the current thread for N seconds. Returns the number of seconds left to sleep. See the POSIX:2008 specification . */ # if @REPLACE_SLEEP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef sleep # define sleep rpl_sleep # endif _GL_FUNCDECL_RPL (sleep, unsigned int, (unsigned int n)); _GL_CXXALIAS_RPL (sleep, unsigned int, (unsigned int n)); # else # if !@HAVE_SLEEP@ _GL_FUNCDECL_SYS (sleep, unsigned int, (unsigned int n)); # endif _GL_CXXALIAS_SYS (sleep, unsigned int, (unsigned int n)); # endif _GL_CXXALIASWARN (sleep); #elif defined GNULIB_POSIXCHECK # undef sleep # if HAVE_RAW_DECL_SLEEP _GL_WARN_ON_USE (sleep, "sleep is unportable - " "use gnulib module sleep for portability"); # endif #endif #if @GNULIB_MDA_SWAB@ /* On native Windows, map 'swab' to '_swab', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::swab always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef swab # define swab _swab # endif /* Need to cast, because in old mingw the arguments are (const char *from, char *to, size_t n). */ _GL_CXXALIAS_MDA_CAST (swab, void, (char *from, char *to, int n)); # else # if defined __hpux /* HP-UX */ _GL_CXXALIAS_SYS (swab, void, (const char *from, char *to, int n)); # elif defined __sun && (defined __SunOS_5_10 || defined __XOPEN_OR_POSIX) && !defined _XPG4 /* Solaris */ _GL_CXXALIAS_SYS (swab, void, (const char *from, char *to, ssize_t n)); # else _GL_CXXALIAS_SYS (swab, void, (const void *from, void *to, ssize_t n)); # endif # endif _GL_CXXALIASWARN (swab); #endif #if @GNULIB_SYMLINK@ # if @REPLACE_SYMLINK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef symlink # define symlink rpl_symlink # endif _GL_FUNCDECL_RPL (symlink, int, (char const *contents, char const *file), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (symlink, int, (char const *contents, char const *file)); # else # if !@HAVE_SYMLINK@ _GL_FUNCDECL_SYS (symlink, int, (char const *contents, char const *file), _GL_ARG_NONNULL ((1, 2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (symlink, int, (char const *contents, char const *file)); # endif _GL_CXXALIASWARN (symlink); #elif defined GNULIB_POSIXCHECK # undef symlink # if HAVE_RAW_DECL_SYMLINK _GL_WARN_ON_USE (symlink, "symlink is not portable - " "use gnulib module symlink for portability"); # endif #endif #if @GNULIB_SYMLINKAT@ # if @REPLACE_SYMLINKAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef symlinkat # define symlinkat rpl_symlinkat # endif _GL_FUNCDECL_RPL (symlinkat, int, (char const *contents, int fd, char const *file), _GL_ARG_NONNULL ((1, 3)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (symlinkat, int, (char const *contents, int fd, char const *file)); # else # if !@HAVE_SYMLINKAT@ _GL_FUNCDECL_SYS (symlinkat, int, (char const *contents, int fd, char const *file), _GL_ARG_NONNULL ((1, 3)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (symlinkat, int, (char const *contents, int fd, char const *file)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (symlinkat); # endif #elif defined GNULIB_POSIXCHECK # undef symlinkat # if HAVE_RAW_DECL_SYMLINKAT _GL_WARN_ON_USE (symlinkat, "symlinkat is not portable - " "use gnulib module symlinkat for portability"); # endif #endif #if @GNULIB_TRUNCATE@ /* Change the size of the file designated by FILENAME to become equal to LENGTH. Return 0 if successful, otherwise -1 and errno set. See the POSIX:2008 specification . */ # if @REPLACE_TRUNCATE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef truncate # define truncate rpl_truncate # endif _GL_FUNCDECL_RPL (truncate, int, (const char *filename, off_t length), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (truncate, int, (const char *filename, off_t length)); # else # if !@HAVE_DECL_TRUNCATE@ _GL_FUNCDECL_SYS (truncate, int, (const char *filename, off_t length), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (truncate, int, (const char *filename, off_t length)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (truncate); # endif #elif defined GNULIB_POSIXCHECK # undef truncate # if HAVE_RAW_DECL_TRUNCATE _GL_WARN_ON_USE (truncate, "truncate is unportable - " "use gnulib module truncate for portability"); # endif #endif #if @GNULIB_TTYNAME_R@ /* Store at most BUFLEN characters of the pathname of the terminal FD is open on in BUF. Return 0 on success, otherwise an error number. */ # if @REPLACE_TTYNAME_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef ttyname_r # define ttyname_r rpl_ttyname_r # endif _GL_FUNCDECL_RPL (ttyname_r, int, (int fd, char *buf, size_t buflen), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (ttyname_r, int, (int fd, char *buf, size_t buflen)); # else # if !@HAVE_DECL_TTYNAME_R@ _GL_FUNCDECL_SYS (ttyname_r, int, (int fd, char *buf, size_t buflen), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); # endif _GL_CXXALIAS_SYS (ttyname_r, int, (int fd, char *buf, size_t buflen)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (ttyname_r); # endif #elif defined GNULIB_POSIXCHECK # undef ttyname_r # if HAVE_RAW_DECL_TTYNAME_R _GL_WARN_ON_USE (ttyname_r, "ttyname_r is not portable - " "use gnulib module ttyname_r for portability"); # endif #endif #if @GNULIB_UNLINK@ # if @REPLACE_UNLINK@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef unlink # define unlink rpl_unlink # endif _GL_FUNCDECL_RPL (unlink, int, (char const *file), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (unlink, int, (char const *file)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef unlink # define unlink _unlink # endif _GL_CXXALIAS_MDA (unlink, int, (char const *file)); # else _GL_CXXALIAS_SYS (unlink, int, (char const *file)); # endif _GL_CXXALIASWARN (unlink); #elif defined GNULIB_POSIXCHECK # undef unlink # if HAVE_RAW_DECL_UNLINK _GL_WARN_ON_USE (unlink, "unlink is not portable - " "use gnulib module unlink for portability"); # endif #elif @GNULIB_MDA_UNLINK@ /* On native Windows, map 'unlink' to '_unlink', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::unlink always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef unlink # define unlink _unlink # endif _GL_CXXALIAS_MDA (unlink, int, (char const *file)); # else _GL_CXXALIAS_SYS (unlink, int, (char const *file)); # endif _GL_CXXALIASWARN (unlink); #endif #if @GNULIB_UNLINKAT@ # if @REPLACE_UNLINKAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef unlinkat # define unlinkat rpl_unlinkat # endif _GL_FUNCDECL_RPL (unlinkat, int, (int fd, char const *file, int flag), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (unlinkat, int, (int fd, char const *file, int flag)); # else # if !@HAVE_UNLINKAT@ _GL_FUNCDECL_SYS (unlinkat, int, (int fd, char const *file, int flag), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (unlinkat, int, (int fd, char const *file, int flag)); # endif _GL_CXXALIASWARN (unlinkat); #elif defined GNULIB_POSIXCHECK # undef unlinkat # if HAVE_RAW_DECL_UNLINKAT _GL_WARN_ON_USE (unlinkat, "unlinkat is not portable - " "use gnulib module unlinkat for portability"); # endif #endif #if @GNULIB_USLEEP@ /* Pause the execution of the current thread for N microseconds. Returns 0 on completion, or -1 on range error. See the POSIX:2001 specification . */ # if @REPLACE_USLEEP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef usleep # define usleep rpl_usleep # endif _GL_FUNCDECL_RPL (usleep, int, (useconds_t n)); _GL_CXXALIAS_RPL (usleep, int, (useconds_t n)); # else # if !@HAVE_USLEEP@ _GL_FUNCDECL_SYS (usleep, int, (useconds_t n)); # endif /* Need to cast, because on Haiku, the first parameter is unsigned int n. */ _GL_CXXALIAS_SYS_CAST (usleep, int, (useconds_t n)); # endif _GL_CXXALIASWARN (usleep); #elif defined GNULIB_POSIXCHECK # undef usleep # if HAVE_RAW_DECL_USLEEP _GL_WARN_ON_USE (usleep, "usleep is unportable - " "use gnulib module usleep for portability"); # endif #endif #if @GNULIB_WRITE@ /* Write up to COUNT bytes starting at BUF to file descriptor FD. See the POSIX:2008 specification . */ # if @REPLACE_WRITE@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef write # define write rpl_write # endif _GL_FUNCDECL_RPL (write, ssize_t, (int fd, const void *buf, size_t count), _GL_ARG_NONNULL ((2)) _GL_ATTRIBUTE_NODISCARD); _GL_CXXALIAS_RPL (write, ssize_t, (int fd, const void *buf, size_t count)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef write # define write _write # endif _GL_CXXALIAS_MDA (write, ssize_t, (int fd, const void *buf, size_t count)); # else _GL_CXXALIAS_SYS (write, ssize_t, (int fd, const void *buf, size_t count)); # endif _GL_CXXALIASWARN (write); #elif @GNULIB_MDA_WRITE@ /* On native Windows, map 'write' to '_write', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::write always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef write # define write _write # endif _GL_CXXALIAS_MDA_CAST (write, ssize_t, (int fd, const void *buf, unsigned int count)); # else _GL_CXXALIAS_SYS (write, ssize_t, (int fd, const void *buf, size_t count)); # endif _GL_CXXALIASWARN (write); #endif _GL_INLINE_HEADER_END #endif /* _@GUARD_PREFIX@_UNISTD_H */ #endif /* _GL_INCLUDING_UNISTD_H */ #endif /* _@GUARD_PREFIX@_UNISTD_H */ libffcall-2.5/gnulib-lib/thread-optim.h0000664000000000000000000000444114631432055014767 00000000000000/* Optimization of multithreaded code. Copyright (C) 2020-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2020. */ #ifndef _THREAD_OPTIM_H #define _THREAD_OPTIM_H /* This file defines a way to optimize multithreaded code for the single-thread case, based on the variable '__libc_single_threaded', defined in glibc >= 2.32. */ /* Typical use: In a block or function, use bool mt = gl_multithreaded (); ... if (mt) if (pthread_mutex_lock (&lock)) abort (); ... if (mt) if (pthread_mutex_unlock (&lock)) abort (); The gl_multithreaded () invocation determines whether the program currently is multithreaded. if (mt) STATEMENT executes STATEMENT in the multithreaded case, and skips it in the single-threaded case. The code between the gl_multithreaded () invocation and any use of the variable 'mt' must not create threads or invoke functions that may indirectly create threads (e.g. 'dlopen' may, indirectly through C++ initializers of global variables in the shared library being opened, create threads). The lock here is meant to synchronize threads in the same process. The same optimization cannot be applied to locks that synchronize different processes (e.g. through shared memory mappings). */ /* This file uses HAVE_SYS_SINGLE_THREADED_H. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #if HAVE_SYS_SINGLE_THREADED_H /* glibc >= 2.32 */ # include # define gl_multithreaded() (!__libc_single_threaded) #else # define gl_multithreaded() 1 #endif #endif /* _THREAD_OPTIM_H */ libffcall-2.5/gnulib-lib/hasmntopt.c0000664000000000000000000000242314660662607014412 00000000000000/* hasmntopt() function: test for the presence of a mount option. Copyright (C) 1995-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include #include char * hasmntopt (const struct mntent *mnt, const char *opt) { const size_t optlen = strlen (opt); char *rest = mnt->mnt_opts, *p; while ((p = strstr (rest, opt)) != NULL) { if ((p == rest || p[-1] == ',') && (p[optlen] == '\0' || p[optlen] == '=' || p[optlen] == ',')) return p; rest = strchr (p, ','); if (rest == NULL) break; ++rest; } return NULL; } libffcall-2.5/gnulib-lib/strerror-override.c0000664000000000000000000002202714657156076016102 00000000000000/* strerror-override.c --- POSIX compatible system error routine Copyright (C) 2010-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2010. */ #include #include "strerror-override.h" #include #if GNULIB_defined_EWINSOCK /* native Windows platforms */ # if HAVE_WINSOCK2_H # include # endif #endif #if !GNULIB_defined_strerror_override_macro /* If ERRNUM maps to an errno value defined by gnulib, return a string describing the error. Otherwise return NULL. */ const char * strerror_override (int errnum) { /* These error messages are taken from glibc/sysdeps/gnu/errlist.c. */ switch (errnum) { # if REPLACE_STRERROR_0 case 0: return "Success"; # endif # if GNULIB_defined_ESOCK /* native Windows platforms with older */ case EINPROGRESS: return "Operation now in progress"; case EALREADY: return "Operation already in progress"; case ENOTSOCK: return "Socket operation on non-socket"; case EDESTADDRREQ: return "Destination address required"; case EMSGSIZE: return "Message too long"; case EPROTOTYPE: return "Protocol wrong type for socket"; case ENOPROTOOPT: return "Protocol not available"; case EPROTONOSUPPORT: return "Protocol not supported"; case EOPNOTSUPP: return "Operation not supported"; case EAFNOSUPPORT: return "Address family not supported by protocol"; case EADDRINUSE: return "Address already in use"; case EADDRNOTAVAIL: return "Cannot assign requested address"; case ENETDOWN: return "Network is down"; case ENETUNREACH: return "Network is unreachable"; case ECONNRESET: return "Connection reset by peer"; case ENOBUFS: return "No buffer space available"; case EISCONN: return "Transport endpoint is already connected"; case ENOTCONN: return "Transport endpoint is not connected"; case ETIMEDOUT: return "Connection timed out"; case ECONNREFUSED: return "Connection refused"; case ELOOP: return "Too many levels of symbolic links"; case EHOSTUNREACH: return "No route to host"; case EWOULDBLOCK: return "Operation would block"; # endif # if GNULIB_defined_ESTREAMS /* native Windows platforms with older */ case ETXTBSY: return "Text file busy"; case ENODATA: return "No data available"; case ENOSR: return "Out of streams resources"; case ENOSTR: return "Device not a stream"; case ETIME: return "Timer expired"; case EOTHER: return "Other error"; # endif # if GNULIB_defined_EWINSOCK /* native Windows platforms */ case ESOCKTNOSUPPORT: return "Socket type not supported"; case EPFNOSUPPORT: return "Protocol family not supported"; case ESHUTDOWN: return "Cannot send after transport endpoint shutdown"; case ETOOMANYREFS: return "Too many references: cannot splice"; case EHOSTDOWN: return "Host is down"; case EPROCLIM: return "Too many processes"; case EUSERS: return "Too many users"; case EDQUOT: return "Disk quota exceeded"; case ESTALE: return "Stale NFS file handle"; case EREMOTE: return "Object is remote"; # if HAVE_WINSOCK2_H /* WSA_INVALID_HANDLE maps to EBADF */ /* WSA_NOT_ENOUGH_MEMORY maps to ENOMEM */ /* WSA_INVALID_PARAMETER maps to EINVAL */ case WSA_OPERATION_ABORTED: return "Overlapped operation aborted"; case WSA_IO_INCOMPLETE: return "Overlapped I/O event object not in signaled state"; case WSA_IO_PENDING: return "Overlapped operations will complete later"; /* WSAEINTR maps to EINTR */ /* WSAEBADF maps to EBADF */ /* WSAEACCES maps to EACCES */ /* WSAEFAULT maps to EFAULT */ /* WSAEINVAL maps to EINVAL */ /* WSAEMFILE maps to EMFILE */ /* WSAEWOULDBLOCK maps to EWOULDBLOCK */ /* WSAEINPROGRESS maps to EINPROGRESS */ /* WSAEALREADY maps to EALREADY */ /* WSAENOTSOCK maps to ENOTSOCK */ /* WSAEDESTADDRREQ maps to EDESTADDRREQ */ /* WSAEMSGSIZE maps to EMSGSIZE */ /* WSAEPROTOTYPE maps to EPROTOTYPE */ /* WSAENOPROTOOPT maps to ENOPROTOOPT */ /* WSAEPROTONOSUPPORT maps to EPROTONOSUPPORT */ /* WSAESOCKTNOSUPPORT is ESOCKTNOSUPPORT */ /* WSAEOPNOTSUPP maps to EOPNOTSUPP */ /* WSAEPFNOSUPPORT is EPFNOSUPPORT */ /* WSAEAFNOSUPPORT maps to EAFNOSUPPORT */ /* WSAEADDRINUSE maps to EADDRINUSE */ /* WSAEADDRNOTAVAIL maps to EADDRNOTAVAIL */ /* WSAENETDOWN maps to ENETDOWN */ /* WSAENETUNREACH maps to ENETUNREACH */ /* WSAENETRESET maps to ENETRESET */ /* WSAECONNABORTED maps to ECONNABORTED */ /* WSAECONNRESET maps to ECONNRESET */ /* WSAENOBUFS maps to ENOBUFS */ /* WSAEISCONN maps to EISCONN */ /* WSAENOTCONN maps to ENOTCONN */ /* WSAESHUTDOWN is ESHUTDOWN */ /* WSAETOOMANYREFS is ETOOMANYREFS */ /* WSAETIMEDOUT maps to ETIMEDOUT */ /* WSAECONNREFUSED maps to ECONNREFUSED */ /* WSAELOOP maps to ELOOP */ /* WSAENAMETOOLONG maps to ENAMETOOLONG */ /* WSAEHOSTDOWN is EHOSTDOWN */ /* WSAEHOSTUNREACH maps to EHOSTUNREACH */ /* WSAENOTEMPTY maps to ENOTEMPTY */ /* WSAEPROCLIM is EPROCLIM */ /* WSAEUSERS is EUSERS */ /* WSAEDQUOT is EDQUOT */ /* WSAESTALE is ESTALE */ /* WSAEREMOTE is EREMOTE */ case WSASYSNOTREADY: return "Network subsystem is unavailable"; case WSAVERNOTSUPPORTED: return "Winsock.dll version out of range"; case WSANOTINITIALISED: return "Successful WSAStartup not yet performed"; case WSAEDISCON: return "Graceful shutdown in progress"; case WSAENOMORE: case WSA_E_NO_MORE: return "No more results"; case WSAECANCELLED: case WSA_E_CANCELLED: return "Call was canceled"; case WSAEINVALIDPROCTABLE: return "Procedure call table is invalid"; case WSAEINVALIDPROVIDER: return "Service provider is invalid"; case WSAEPROVIDERFAILEDINIT: return "Service provider failed to initialize"; case WSASYSCALLFAILURE: return "System call failure"; case WSASERVICE_NOT_FOUND: return "Service not found"; case WSATYPE_NOT_FOUND: return "Class type not found"; case WSAEREFUSED: return "Database query was refused"; case WSAHOST_NOT_FOUND: return "Host not found"; case WSATRY_AGAIN: return "Nonauthoritative host not found"; case WSANO_RECOVERY: return "Nonrecoverable error"; case WSANO_DATA: return "Valid name, no data record of requested type"; /* WSA_QOS_* omitted */ # endif # endif # if GNULIB_defined_ENOMSG case ENOMSG: return "No message of desired type"; # endif # if GNULIB_defined_EIDRM case EIDRM: return "Identifier removed"; # endif # if GNULIB_defined_ENOLINK case ENOLINK: return "Link has been severed"; # endif # if GNULIB_defined_EPROTO case EPROTO: return "Protocol error"; # endif # if GNULIB_defined_EMULTIHOP case EMULTIHOP: return "Multihop attempted"; # endif # if GNULIB_defined_EBADMSG case EBADMSG: return "Bad message"; # endif # if GNULIB_defined_EOVERFLOW case EOVERFLOW: return "Value too large for defined data type"; # endif # if GNULIB_defined_ENOTSUP case ENOTSUP: return "Not supported"; # endif # if GNULIB_defined_ENETRESET case ENETRESET: return "Network dropped connection on reset"; # endif # if GNULIB_defined_ECONNABORTED case ECONNABORTED: return "Software caused connection abort"; # endif # if GNULIB_defined_ESTALE case ESTALE: return "Stale NFS file handle"; # endif # if GNULIB_defined_EDQUOT case EDQUOT: return "Disk quota exceeded"; # endif # if GNULIB_defined_ECANCELED case ECANCELED: return "Operation canceled"; # endif # if GNULIB_defined_EOWNERDEAD case EOWNERDEAD: return "Owner died"; # endif # if GNULIB_defined_ENOTRECOVERABLE case ENOTRECOVERABLE: return "State not recoverable"; # endif # if GNULIB_defined_EILSEQ case EILSEQ: return "Invalid or incomplete multibyte or wide character"; # endif # if GNULIB_defined_ESOCKTNOSUPPORT case ESOCKTNOSUPPORT: return "Socket type not supported"; # endif default: return NULL; } } #endif libffcall-2.5/gnulib-lib/gl_anyhash2.h0000664000000000000000000000517314631432055014574 00000000000000/* Hash table for sequential list, set, and map data type. Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Common code of gl_linkedhash_list.c, gl_avltreehash_list.c, gl_rbtreehash_list.c, gl_linkedhash_set.c, gl_hash_set.c, gl_linkedhash_map.c, gl_hash_map.c. */ #include "gl_anyhash_primes.h" /* Resizes the hash table with a new estimated size. */ static void hash_resize (CONTAINER_T container, size_t estimate) { size_t new_size = next_prime (estimate); if (new_size > container->table_size) { gl_hash_entry_t *old_table = container->table; /* Allocate the new table. */ gl_hash_entry_t *new_table; size_t i; if (size_overflow_p (xtimes (new_size, sizeof (gl_hash_entry_t)))) goto fail; new_table = (gl_hash_entry_t *) calloc (new_size, sizeof (gl_hash_entry_t)); if (new_table == NULL) goto fail; /* Iterate through the entries of the old table. */ for (i = container->table_size; i > 0; ) { gl_hash_entry_t node = old_table[--i]; while (node != NULL) { gl_hash_entry_t next = node->hash_next; /* Add the entry to the new table. */ size_t bucket = node->hashcode % new_size; node->hash_next = new_table[bucket]; new_table[bucket] = node; node = next; } } container->table = new_table; container->table_size = new_size; free (old_table); } return; fail: /* Just continue without resizing the table. */ return; } /* Resizes the hash table if needed, after CONTAINER_COUNT (container) was incremented. */ static void hash_resize_after_add (CONTAINER_T container) { size_t count = CONTAINER_COUNT (container); size_t estimate = xsum (count, count / 2); /* 1.5 * count */ if (estimate > container->table_size) hash_resize (container, estimate); } libffcall-2.5/gnulib-lib/xsize.c0000664000000000000000000000150414631432055013524 00000000000000/* Checked size_t computations. Copyright (C) 2012-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #define XSIZE_INLINE _GL_EXTERN_INLINE #include "xsize.h" libffcall-2.5/gnulib-lib/windows-initguard.h0000664000000000000000000000231614631432055016047 00000000000000/* Init guards, somewhat like spinlocks (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #ifndef _WINDOWS_INITGUARD_H #define _WINDOWS_INITGUARD_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include typedef struct { volatile int done; volatile LONG started; } glwthread_initguard_t; #define GLWTHREAD_INITGUARD_INIT { 0, -1 } #endif /* _WINDOWS_INITGUARD_H */ libffcall-2.5/gnulib-lib/stddef.in.h0000664000000000000000000001714114664171733014262 00000000000000/* A substitute for POSIX 2008 , for platforms that have issues. Copyright (C) 2009-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Eric Blake. */ /* * POSIX 2008 and ISO C 23 for platforms that have issues. * */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if (defined __need_wchar_t || defined __need_size_t \ || defined __need_ptrdiff_t || defined __need_NULL \ || defined __need_wint_t) \ /* Avoid warning triggered by "gcc -std=gnu23 -Wsystem-headers" \ in Fedora 40 with gcc 14.0.1. \ . */ \ && !@STDDEF_NOT_IDEMPOTENT@ /* Special invocation convention inside gcc header files. In particular, in some ancient versions of GCC blindly redefined NULL when __need_wint_t was defined, even though wint_t is not normally provided by . (FIXME: It's not clear what GCC versions those were - perhaps so ancient that we can stop worrying about this?) Although glibc 2.26 (2017) and later do not use __need_wint_t, for portability to macOS, Cygwin, Haiku, and older Glibc + GCC, remember if special invocation has ever been used to obtain wint_t, in which case we need to clean up NULL yet again. */ # if !(defined _@GUARD_PREFIX@_STDDEF_H && defined _@GUARD_PREFIX@_STDDEF_WINT_T) # ifdef __need_wint_t # define _@GUARD_PREFIX@_STDDEF_WINT_T # endif # @INCLUDE_NEXT@ @NEXT_STDDEF_H@ /* On TinyCC, make sure that the macros that indicate the special invocation convention get undefined. */ # undef __need_wchar_t # undef __need_size_t # undef __need_ptrdiff_t # undef __need_NULL # undef __need_wint_t # endif #else /* For @STDDEF_NOT_IDEMPOTENT@. */ # undef __need_wchar_t # undef __need_size_t # undef __need_ptrdiff_t # undef __need_NULL # undef __need_wint_t /* Normal invocation convention. */ # ifndef _@GUARD_PREFIX@_STDDEF_H /* On AIX 7.2, with xlc in 64-bit mode, defines max_align_t to a type with alignment 4, but 'long' has alignment 8. */ # if defined _AIX && defined __LP64__ && !@HAVE_MAX_ALIGN_T@ # if !GNULIB_defined_max_align_t # ifdef _MAX_ALIGN_T /* /usr/include/stddef.h has already defined max_align_t. Override it. */ typedef long rpl_max_align_t; # define max_align_t rpl_max_align_t # else /* Prevent /usr/include/stddef.h from defining max_align_t. */ typedef long max_align_t; # define _MAX_ALIGN_T # endif # define __CLANG_MAX_ALIGN_T_DEFINED # define GNULIB_defined_max_align_t 1 # endif # endif # if !defined _GCC_NULLPTR_T && !@NULLPTR_T_NEEDS_STDDEF@ /* Suppress unwanted nullptr_t typedef. See . */ # define _GCC_NULLPTR_T # endif /* The include_next requires a split double-inclusion guard. */ # @INCLUDE_NEXT@ @NEXT_STDDEF_H@ /* On NetBSD 5.0, the definition of NULL lacks proper parentheses. */ # if (@REPLACE_NULL@ \ && (!defined _@GUARD_PREFIX@_STDDEF_H || defined _@GUARD_PREFIX@_STDDEF_WINT_T)) # undef NULL # ifdef __cplusplus /* ISO C++ says that the macro NULL must expand to an integer constant expression, hence '((void *) 0)' is not allowed in C++. */ # if __GNUG__ >= 3 /* GNU C++ has a __null macro that behaves like an integer ('int' or 'long') but has the same size as a pointer. Use that, to avoid warnings. */ # define NULL __null # else # define NULL 0L # endif # else # define NULL ((void *) 0) # endif # endif # ifndef _@GUARD_PREFIX@_STDDEF_H # define _@GUARD_PREFIX@_STDDEF_H /* This file uses _Noreturn, _GL_ATTRIBUTE_NOTHROW. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 2) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 3) || defined __clang__ # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* Some platforms lack max_align_t. The check for _GCC_MAX_ALIGN_T is a hack in case the configure-time test was done with g++ even though we are currently compiling with gcc. On MSVC, max_align_t is defined only in C++ mode, after was included. Its definition is good since it has an alignment of 8 (on x86 and x86_64). Similarly on OS/2 kLIBC. */ #if (defined _MSC_VER || (defined __KLIBC__ && !defined __LIBCN__)) \ && defined __cplusplus # include #else # if ! (@HAVE_MAX_ALIGN_T@ || (defined _GCC_MAX_ALIGN_T && !defined __clang__)) # if !GNULIB_defined_max_align_t /* On the x86, the maximum storage alignment of double, long, etc. is 4, but GCC's C11 ABI for x86 says that max_align_t has an alignment of 8, and the C11 standard allows this. Work around this problem by using __alignof__ (which returns 8 for double) rather than _Alignof (which returns 4), and align each union member accordingly. */ # if defined __GNUC__ || (__clang_major__ >= 4) # define _GL_STDDEF_ALIGNAS(type) \ __attribute__ ((__aligned__ (__alignof__ (type)))) # else # define _GL_STDDEF_ALIGNAS(type) /* */ # endif typedef union { char *__p _GL_STDDEF_ALIGNAS (char *); double __d _GL_STDDEF_ALIGNAS (double); long double __ld _GL_STDDEF_ALIGNAS (long double); long int __i _GL_STDDEF_ALIGNAS (long int); } rpl_max_align_t; # define max_align_t rpl_max_align_t # define __CLANG_MAX_ALIGN_T_DEFINED # define GNULIB_defined_max_align_t 1 # endif # endif #endif /* ISO C 23 § 7.21.1 The unreachable macro */ #ifndef unreachable /* Code borrowed from verify.h. */ # ifndef _GL_HAS_BUILTIN_UNREACHABLE # if defined __clang_major__ && __clang_major__ < 5 # define _GL_HAS_BUILTIN_UNREACHABLE 0 # elif 4 < __GNUC__ + (5 <= __GNUC_MINOR__) && !defined __clang__ # define _GL_HAS_BUILTIN_UNREACHABLE 1 # elif defined __has_builtin # define _GL_HAS_BUILTIN_UNREACHABLE __has_builtin (__builtin_unreachable) # else # define _GL_HAS_BUILTIN_UNREACHABLE 0 # endif # endif # if _GL_HAS_BUILTIN_UNREACHABLE # define unreachable() __builtin_unreachable () # elif 1200 <= _MSC_VER # define unreachable() __assume (0) # else /* Declare abort(), without including . */ extern # if defined __cplusplus "C" # endif _Noreturn void abort (void) # if defined __cplusplus && (__GLIBC__ >= 2) _GL_ATTRIBUTE_NOTHROW # endif ; # define unreachable() abort () # endif #endif # endif /* _@GUARD_PREFIX@_STDDEF_H */ # endif /* _@GUARD_PREFIX@_STDDEF_H */ #endif /* __need_XXX */ libffcall-2.5/gnulib-lib/string.in.h0000664000000000000000000015337114664171733014325 00000000000000/* A GNU-like . Copyright (C) 1995-1996, 2001-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #if __GNUC__ >= 3 @PRAGMA_SYSTEM_HEADER@ #endif @PRAGMA_COLUMNS@ #if defined _GL_ALREADY_INCLUDING_STRING_H /* Special invocation convention: - On OS X/NetBSD we have a sequence of nested includes -> -> "string.h" In this situation system _chk variants due to -D_FORTIFY_SOURCE might be used after any replacements defined here. */ #@INCLUDE_NEXT@ @NEXT_STRING_H@ #else /* Normal invocation convention. */ #ifndef _@GUARD_PREFIX@_STRING_H #define _GL_ALREADY_INCLUDING_STRING_H /* The include_next requires a split double-inclusion guard. */ #@INCLUDE_NEXT@ @NEXT_STRING_H@ #undef _GL_ALREADY_INCLUDING_STRING_H #ifndef _@GUARD_PREFIX@_STRING_H #define _@GUARD_PREFIX@_STRING_H /* This file uses _GL_ATTRIBUTE_DEALLOC, _GL_ATTRIBUTE_MALLOC, _GL_ATTRIBUTE_NOTHROW, _GL_ATTRIBUTE_PURE, GNULIB_POSIXCHECK, HAVE_RAW_DECL_*. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif /* NetBSD 5.0 mis-defines NULL. */ #include /* MirBSD defines mbslen as a macro. */ #if @GNULIB_MBSLEN@ && defined __MirBSD__ # include #endif /* NetBSD 5.0 declares strsignal in , not in . */ /* But in any case avoid namespace pollution on glibc systems. */ #if (@GNULIB_STRSIGNAL@ || defined GNULIB_POSIXCHECK) && defined __NetBSD__ \ && ! defined __GLIBC__ # include #endif /* AIX 7.2 and Android 13 declare ffsl and ffsll in , not in . */ /* But in any case avoid namespace pollution on glibc systems. */ #if ((@GNULIB_FFSL@ || @GNULIB_FFSLL@ || defined GNULIB_POSIXCHECK) \ && (defined _AIX || defined __ANDROID__)) \ && ! defined __GLIBC__ # include #endif /* _GL_ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. */ #ifndef _GL_ATTRIBUTE_DEALLOC # if __GNUC__ >= 11 && !defined __clang__ # define _GL_ATTRIBUTE_DEALLOC(f, i) __attribute__ ((__malloc__ (f, i))) # else # define _GL_ATTRIBUTE_DEALLOC(f, i) # endif #endif /* _GL_ATTRIBUTE_DEALLOC_FREE declares that the function returns pointers that can be freed via 'free'; it can be used only after declaring 'free'. */ /* Applies to: functions. Cannot be used on inline functions. */ #ifndef _GL_ATTRIBUTE_DEALLOC_FREE # if defined __cplusplus && defined __GNUC__ && !defined __clang__ /* Work around GCC bug */ # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC ((void (*) (void *)) free, 1) # else # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC (free, 1) # endif #endif /* _GL_ATTRIBUTE_MALLOC declares that the function returns a pointer to freshly allocated memory. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_MALLOC # if __GNUC__ >= 3 || defined __clang__ # define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) # else # define _GL_ATTRIBUTE_MALLOC # endif #endif /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 2) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 3) || defined __clang__ # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* The __attribute__ feature is available in gcc versions 2.5 and later. The attribute __pure__ was added in gcc 2.96. */ #ifndef _GL_ATTRIBUTE_PURE # if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 96) || defined __clang__ # define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__)) # else # define _GL_ATTRIBUTE_PURE /* empty */ # endif #endif /* The definitions of _GL_FUNCDECL_RPL etc. are copied here. */ /* The definition of _GL_ARG_NONNULL is copied here. */ /* The definition of _GL_WARN_ON_USE is copied here. */ /* Make _GL_ATTRIBUTE_DEALLOC_FREE work, even though may not have been included yet. */ #if @GNULIB_FREE_POSIX@ # if (@REPLACE_FREE@ && !defined free \ && !(defined __cplusplus && defined GNULIB_NAMESPACE)) /* We can't do '#define free rpl_free' here. */ # if defined __cplusplus && (__GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2) _GL_EXTERN_C void rpl_free (void *) _GL_ATTRIBUTE_NOTHROW; # else _GL_EXTERN_C void rpl_free (void *); # endif # undef _GL_ATTRIBUTE_DEALLOC_FREE # define _GL_ATTRIBUTE_DEALLOC_FREE _GL_ATTRIBUTE_DEALLOC (rpl_free, 1) # else # if defined _MSC_VER && !defined free _GL_EXTERN_C # if defined _DLL __declspec (dllimport) # endif void __cdecl free (void *); # else # if defined __cplusplus && (__GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2) _GL_EXTERN_C void free (void *) _GL_ATTRIBUTE_NOTHROW; # else _GL_EXTERN_C void free (void *); # endif # endif # endif #else # if defined _MSC_VER && !defined free _GL_EXTERN_C # if defined _DLL __declspec (dllimport) # endif void __cdecl free (void *); # else # if defined __cplusplus && (__GLIBC__ + (__GLIBC_MINOR__ >= 14) > 2) _GL_EXTERN_C void free (void *) _GL_ATTRIBUTE_NOTHROW; # else _GL_EXTERN_C void free (void *); # endif # endif #endif /* Clear a block of memory. The compiler will not delete a call to this function, even if the block is dead after the call. */ #if @GNULIB_EXPLICIT_BZERO@ # if ! @HAVE_EXPLICIT_BZERO@ _GL_FUNCDECL_SYS (explicit_bzero, void, (void *__dest, size_t __n), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (explicit_bzero, void, (void *__dest, size_t __n)); _GL_CXXALIASWARN (explicit_bzero); #elif defined GNULIB_POSIXCHECK # undef explicit_bzero # if HAVE_RAW_DECL_EXPLICIT_BZERO _GL_WARN_ON_USE (explicit_bzero, "explicit_bzero is unportable - " "use gnulib module explicit_bzero for portability"); # endif #endif /* Find the index of the least-significant set bit. */ #if @GNULIB_FFSL@ # if !@HAVE_FFSL@ _GL_FUNCDECL_SYS (ffsl, int, (long int i)); # endif _GL_CXXALIAS_SYS (ffsl, int, (long int i)); _GL_CXXALIASWARN (ffsl); #elif defined GNULIB_POSIXCHECK # undef ffsl # if HAVE_RAW_DECL_FFSL _GL_WARN_ON_USE (ffsl, "ffsl is not portable - use the ffsl module"); # endif #endif /* Find the index of the least-significant set bit. */ #if @GNULIB_FFSLL@ # if @REPLACE_FFSLL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define ffsll rpl_ffsll # endif _GL_FUNCDECL_RPL (ffsll, int, (long long int i)); _GL_CXXALIAS_RPL (ffsll, int, (long long int i)); # else # if !@HAVE_FFSLL@ _GL_FUNCDECL_SYS (ffsll, int, (long long int i)); # endif _GL_CXXALIAS_SYS (ffsll, int, (long long int i)); # endif _GL_CXXALIASWARN (ffsll); #elif defined GNULIB_POSIXCHECK # undef ffsll # if HAVE_RAW_DECL_FFSLL _GL_WARN_ON_USE (ffsll, "ffsll is not portable - use the ffsll module"); # endif #endif #if @GNULIB_MDA_MEMCCPY@ /* On native Windows, map 'memccpy' to '_memccpy', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::memccpy always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef memccpy # define memccpy _memccpy # endif _GL_CXXALIAS_MDA (memccpy, void *, (void *dest, const void *src, int c, size_t n)); # else _GL_CXXALIAS_SYS (memccpy, void *, (void *dest, const void *src, int c, size_t n)); # endif _GL_CXXALIASWARN (memccpy); #endif /* Return the first instance of C within N bytes of S, or NULL. */ #if @GNULIB_MEMCHR@ # if @REPLACE_MEMCHR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef memchr # define memchr rpl_memchr # endif _GL_FUNCDECL_RPL (memchr, void *, (void const *__s, int __c, size_t __n), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (memchr, void *, (void const *__s, int __c, size_t __n)); # else /* On some systems, this function is defined as an overloaded function: extern "C" { const void * std::memchr (const void *, int, size_t); } extern "C++" { void * std::memchr (void *, int, size_t); } */ _GL_CXXALIAS_SYS_CAST2 (memchr, void *, (void const *__s, int __c, size_t __n), void const *, (void const *__s, int __c, size_t __n)); # endif # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (memchr, void *, (void *__s, int __c, size_t __n) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (memchr, void const *, (void const *__s, int __c, size_t __n) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (memchr); # endif #elif defined GNULIB_POSIXCHECK # undef memchr /* Assume memchr is always declared. */ _GL_WARN_ON_USE (memchr, "memchr has platform-specific bugs - " "use gnulib module memchr for portability" ); #endif /* Return the first occurrence of NEEDLE in HAYSTACK. */ #if @GNULIB_MEMMEM@ # if @REPLACE_MEMMEM@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define memmem rpl_memmem # endif _GL_FUNCDECL_RPL (memmem, void *, (void const *__haystack, size_t __haystack_len, void const *__needle, size_t __needle_len), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 3))); _GL_CXXALIAS_RPL (memmem, void *, (void const *__haystack, size_t __haystack_len, void const *__needle, size_t __needle_len)); # else # if ! @HAVE_DECL_MEMMEM@ _GL_FUNCDECL_SYS (memmem, void *, (void const *__haystack, size_t __haystack_len, void const *__needle, size_t __needle_len), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 3))); # endif _GL_CXXALIAS_SYS (memmem, void *, (void const *__haystack, size_t __haystack_len, void const *__needle, size_t __needle_len)); # endif _GL_CXXALIASWARN (memmem); #elif defined GNULIB_POSIXCHECK # undef memmem # if HAVE_RAW_DECL_MEMMEM _GL_WARN_ON_USE (memmem, "memmem is unportable and often quadratic - " "use gnulib module memmem-simple for portability, " "and module memmem for speed" ); # endif #endif /* Copy N bytes of SRC to DEST, return pointer to bytes after the last written byte. */ #if @GNULIB_MEMPCPY@ # if @REPLACE_MEMPCPY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef mempcpy # define mempcpy rpl_mempcpy # endif _GL_FUNCDECL_RPL (mempcpy, void *, (void *restrict __dest, void const *restrict __src, size_t __n), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (mempcpy, void *, (void *restrict __dest, void const *restrict __src, size_t __n)); # else # if !@HAVE_MEMPCPY@ _GL_FUNCDECL_SYS (mempcpy, void *, (void *restrict __dest, void const *restrict __src, size_t __n), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (mempcpy, void *, (void *restrict __dest, void const *restrict __src, size_t __n)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mempcpy); # endif #elif defined GNULIB_POSIXCHECK # undef mempcpy # if HAVE_RAW_DECL_MEMPCPY _GL_WARN_ON_USE (mempcpy, "mempcpy is unportable - " "use gnulib module mempcpy for portability"); # endif #endif /* Search backwards through a block for a byte (specified as an int). */ #if @GNULIB_MEMRCHR@ # if ! @HAVE_DECL_MEMRCHR@ _GL_FUNCDECL_SYS (memrchr, void *, (void const *, int, size_t), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); # endif /* On some systems, this function is defined as an overloaded function: extern "C++" { const void * std::memrchr (const void *, int, size_t); } extern "C++" { void * std::memrchr (void *, int, size_t); } */ _GL_CXXALIAS_SYS_CAST2 (memrchr, void *, (void const *, int, size_t), void const *, (void const *, int, size_t)); # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (memrchr, void *, (void *, int, size_t) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (memrchr, void const *, (void const *, int, size_t) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (memrchr); # endif #elif defined GNULIB_POSIXCHECK # undef memrchr # if HAVE_RAW_DECL_MEMRCHR _GL_WARN_ON_USE (memrchr, "memrchr is unportable - " "use gnulib module memrchr for portability"); # endif #endif /* Overwrite a block of memory. The compiler will not optimize effects away, even if the block is dead after the call. */ #if @GNULIB_MEMSET_EXPLICIT@ # if @REPLACE_MEMSET_EXPLICIT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef memset_explicit # define memset_explicit rpl_memset_explicit # endif _GL_FUNCDECL_RPL (memset_explicit, void *, (void *__dest, int __c, size_t __n), _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (memset_explicit, void *, (void *__dest, int __c, size_t __n)); # else # if !@HAVE_MEMSET_EXPLICIT@ _GL_FUNCDECL_SYS (memset_explicit, void *, (void *__dest, int __c, size_t __n), _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (memset_explicit, void *, (void *__dest, int __c, size_t __n)); # endif _GL_CXXALIASWARN (memset_explicit); #elif defined GNULIB_POSIXCHECK # undef memset_explicit # if HAVE_RAW_DECL_MEMSET_EXPLICIT _GL_WARN_ON_USE (memset_explicit, "memset_explicit is unportable - " "use gnulib module memset_explicit for portability"); # endif #endif /* Find the first occurrence of C in S. More efficient than memchr(S,C,N), at the expense of undefined behavior if C does not occur within N bytes. */ #if @GNULIB_RAWMEMCHR@ # if ! @HAVE_RAWMEMCHR@ _GL_FUNCDECL_SYS (rawmemchr, void *, (void const *__s, int __c_in), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); # endif /* On some systems, this function is defined as an overloaded function: extern "C++" { const void * std::rawmemchr (const void *, int); } extern "C++" { void * std::rawmemchr (void *, int); } */ _GL_CXXALIAS_SYS_CAST2 (rawmemchr, void *, (void const *__s, int __c_in), void const *, (void const *__s, int __c_in)); # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (rawmemchr, void *, (void *__s, int __c_in) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (rawmemchr, void const *, (void const *__s, int __c_in) _GL_ATTRIBUTE_NOTHROW); # else _GL_CXXALIASWARN (rawmemchr); # endif #elif defined GNULIB_POSIXCHECK # undef rawmemchr # if HAVE_RAW_DECL_RAWMEMCHR _GL_WARN_ON_USE (rawmemchr, "rawmemchr is unportable - " "use gnulib module rawmemchr for portability"); # endif #endif /* Copy SRC to DST, returning the address of the terminating '\0' in DST. */ #if @GNULIB_STPCPY@ # if @REPLACE_STPCPY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef stpcpy # define stpcpy rpl_stpcpy # endif _GL_FUNCDECL_RPL (stpcpy, char *, (char *restrict __dst, char const *restrict __src), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (stpcpy, char *, (char *restrict __dst, char const *restrict __src)); # else # if !@HAVE_STPCPY@ _GL_FUNCDECL_SYS (stpcpy, char *, (char *restrict __dst, char const *restrict __src), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (stpcpy, char *, (char *restrict __dst, char const *restrict __src)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (stpcpy); # endif #elif defined GNULIB_POSIXCHECK # undef stpcpy # if HAVE_RAW_DECL_STPCPY _GL_WARN_ON_USE (stpcpy, "stpcpy is unportable - " "use gnulib module stpcpy for portability"); # endif #endif /* Copy no more than N bytes of SRC to DST, returning a pointer past the last non-NUL byte written into DST. */ #if @GNULIB_STPNCPY@ # if @REPLACE_STPNCPY@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef stpncpy # define stpncpy rpl_stpncpy # endif _GL_FUNCDECL_RPL (stpncpy, char *, (char *restrict __dst, char const *restrict __src, size_t __n), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (stpncpy, char *, (char *restrict __dst, char const *restrict __src, size_t __n)); # else # if ! @HAVE_STPNCPY@ _GL_FUNCDECL_SYS (stpncpy, char *, (char *restrict __dst, char const *restrict __src, size_t __n), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (stpncpy, char *, (char *restrict __dst, char const *restrict __src, size_t __n)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (stpncpy); # endif #elif defined GNULIB_POSIXCHECK # undef stpncpy # if HAVE_RAW_DECL_STPNCPY _GL_WARN_ON_USE (stpncpy, "stpncpy is unportable - " "use gnulib module stpncpy for portability"); # endif #endif #if defined GNULIB_POSIXCHECK /* strchr() does not work with multibyte strings if the locale encoding is GB18030 and the character to be searched is a digit. */ # undef strchr /* Assume strchr is always declared. */ _GL_WARN_ON_USE_CXX (strchr, const char *, char *, (const char *, int), "strchr cannot work correctly on character strings " "in some multibyte locales - " "use mbschr if you care about internationalization"); #endif /* Find the first occurrence of C in S or the final NUL byte. */ #if @GNULIB_STRCHRNUL@ # if @REPLACE_STRCHRNUL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strchrnul rpl_strchrnul # endif _GL_FUNCDECL_RPL (strchrnul, char *, (const char *__s, int __c_in), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strchrnul, char *, (const char *str, int ch)); # else # if ! @HAVE_STRCHRNUL@ _GL_FUNCDECL_SYS (strchrnul, char *, (char const *__s, int __c_in), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); # endif /* On some systems, this function is defined as an overloaded function: extern "C++" { const char * std::strchrnul (const char *, int); } extern "C++" { char * std::strchrnul (char *, int); } */ _GL_CXXALIAS_SYS_CAST2 (strchrnul, char *, (char const *__s, int __c_in), char const *, (char const *__s, int __c_in)); # endif # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (strchrnul, char *, (char *__s, int __c_in) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (strchrnul, char const *, (char const *__s, int __c_in) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (strchrnul); # endif #elif defined GNULIB_POSIXCHECK # undef strchrnul # if HAVE_RAW_DECL_STRCHRNUL _GL_WARN_ON_USE (strchrnul, "strchrnul is unportable - " "use gnulib module strchrnul for portability"); # endif #endif /* Duplicate S, returning an identical malloc'd string. */ #if @GNULIB_STRDUP@ # if @REPLACE_STRDUP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strdup # define strdup rpl_strdup # endif _GL_FUNCDECL_RPL (strdup, char *, (char const *__s), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); _GL_CXXALIAS_RPL (strdup, char *, (char const *__s)); # elif defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strdup # define strdup _strdup # endif _GL_CXXALIAS_MDA (strdup, char *, (char const *__s)); # else # if defined __cplusplus && defined GNULIB_NAMESPACE && defined strdup /* strdup exists as a function and as a macro. Get rid of the macro. */ # undef strdup # endif # if (!@HAVE_DECL_STRDUP@ || (__GNUC__ >= 11 && !defined __clang__)) \ && !defined strdup # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (strdup, char *, (char const *__s), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (strdup, char *, (char const *__s), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif _GL_CXXALIAS_SYS (strdup, char *, (char const *__s)); # endif _GL_CXXALIASWARN (strdup); #else # if (__GNUC__ >= 11 && !defined __clang__) && !defined strdup /* For -Wmismatched-dealloc: Associate strdup with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (strdup, char *, (char const *__s), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (strdup, char *, (char const *__s), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK # undef strdup # if HAVE_RAW_DECL_STRDUP _GL_WARN_ON_USE (strdup, "strdup is unportable - " "use gnulib module strdup for portability"); # endif # elif @GNULIB_MDA_STRDUP@ /* On native Windows, map 'creat' to '_creat', so that -loldnames is not required. In C++ with GNULIB_NAMESPACE, avoid differences between platforms by defining GNULIB_NAMESPACE::strdup always. */ # if defined _WIN32 && !defined __CYGWIN__ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strdup # define strdup _strdup # endif _GL_CXXALIAS_MDA (strdup, char *, (char const *__s)); # else # if defined __cplusplus && defined GNULIB_NAMESPACE && defined strdup # undef strdup # endif _GL_CXXALIAS_SYS (strdup, char *, (char const *__s)); # endif _GL_CXXALIASWARN (strdup); # endif #endif /* Append no more than N characters from SRC onto DEST. */ #if @GNULIB_STRNCAT@ # if @REPLACE_STRNCAT@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strncat # define strncat rpl_strncat # endif _GL_FUNCDECL_RPL (strncat, char *, (char *restrict dest, const char *restrict src, size_t n), _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (strncat, char *, (char *restrict dest, const char *restrict src, size_t n)); # else _GL_CXXALIAS_SYS (strncat, char *, (char *restrict dest, const char *restrict src, size_t n)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strncat); # endif #elif defined GNULIB_POSIXCHECK # undef strncat # if HAVE_RAW_DECL_STRNCAT _GL_WARN_ON_USE (strncat, "strncat is unportable - " "use gnulib module strncat for portability"); # endif #endif /* Return a newly allocated copy of at most N bytes of STRING. */ #if @GNULIB_STRNDUP@ # if @REPLACE_STRNDUP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strndup # define strndup rpl_strndup # endif _GL_FUNCDECL_RPL (strndup, char *, (char const *__s, size_t __n), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); _GL_CXXALIAS_RPL (strndup, char *, (char const *__s, size_t __n)); # else # if !@HAVE_DECL_STRNDUP@ \ || ((__GNUC__ >= 11 && !defined __clang__) && !defined strndup) # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (strndup, char *, (char const *__s, size_t __n), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (strndup, char *, (char const *__s, size_t __n), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif _GL_CXXALIAS_SYS (strndup, char *, (char const *__s, size_t __n)); # endif _GL_CXXALIASWARN (strndup); #else # if (__GNUC__ >= 11 && !defined __clang__) && !defined strndup /* For -Wmismatched-dealloc: Associate strndup with free or rpl_free. */ # if __GLIBC__ + (__GLIBC_MINOR__ >= 2) > 2 _GL_FUNCDECL_SYS (strndup, char *, (char const *__s, size_t __n), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE) _GL_ATTRIBUTE_NOTHROW; # else _GL_FUNCDECL_SYS (strndup, char *, (char const *__s, size_t __n), _GL_ARG_NONNULL ((1)) _GL_ATTRIBUTE_MALLOC _GL_ATTRIBUTE_DEALLOC_FREE); # endif # endif # if defined GNULIB_POSIXCHECK # undef strndup # if HAVE_RAW_DECL_STRNDUP _GL_WARN_ON_USE (strndup, "strndup is unportable - " "use gnulib module strndup for portability"); # endif # endif #endif /* Find the length (number of bytes) of STRING, but scan at most MAXLEN bytes. If no '\0' terminator is found in that many bytes, return MAXLEN. */ #if @GNULIB_STRNLEN@ # if @REPLACE_STRNLEN@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strnlen # define strnlen rpl_strnlen # endif _GL_FUNCDECL_RPL (strnlen, size_t, (char const *__s, size_t __maxlen), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (strnlen, size_t, (char const *__s, size_t __maxlen)); # else # if ! @HAVE_DECL_STRNLEN@ _GL_FUNCDECL_SYS (strnlen, size_t, (char const *__s, size_t __maxlen), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); # endif _GL_CXXALIAS_SYS (strnlen, size_t, (char const *__s, size_t __maxlen)); # endif _GL_CXXALIASWARN (strnlen); #elif defined GNULIB_POSIXCHECK # undef strnlen # if HAVE_RAW_DECL_STRNLEN _GL_WARN_ON_USE (strnlen, "strnlen is unportable - " "use gnulib module strnlen for portability"); # endif #endif #if defined GNULIB_POSIXCHECK /* strcspn() assumes the second argument is a list of single-byte characters. Even in this simple case, it does not work with multibyte strings if the locale encoding is GB18030 and one of the characters to be searched is a digit. */ # undef strcspn /* Assume strcspn is always declared. */ _GL_WARN_ON_USE (strcspn, "strcspn cannot work correctly on character strings " "in multibyte locales - " "use mbscspn if you care about internationalization"); #endif /* Find the first occurrence in S of any character in ACCEPT. */ #if @GNULIB_STRPBRK@ # if ! @HAVE_STRPBRK@ _GL_FUNCDECL_SYS (strpbrk, char *, (char const *__s, char const *__accept), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); # endif /* On some systems, this function is defined as an overloaded function: extern "C" { const char * strpbrk (const char *, const char *); } extern "C++" { char * strpbrk (char *, const char *); } */ _GL_CXXALIAS_SYS_CAST2 (strpbrk, char *, (char const *__s, char const *__accept), const char *, (char const *__s, char const *__accept)); # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (strpbrk, char *, (char *__s, char const *__accept) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (strpbrk, char const *, (char const *__s, char const *__accept) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (strpbrk); # endif # if defined GNULIB_POSIXCHECK /* strpbrk() assumes the second argument is a list of single-byte characters. Even in this simple case, it does not work with multibyte strings if the locale encoding is GB18030 and one of the characters to be searched is a digit. */ # undef strpbrk _GL_WARN_ON_USE_CXX (strpbrk, const char *, char *, (const char *, const char *), "strpbrk cannot work correctly on character strings " "in multibyte locales - " "use mbspbrk if you care about internationalization"); # endif #elif defined GNULIB_POSIXCHECK # undef strpbrk # if HAVE_RAW_DECL_STRPBRK _GL_WARN_ON_USE_CXX (strpbrk, const char *, char *, (const char *, const char *), "strpbrk is unportable - " "use gnulib module strpbrk for portability"); # endif #endif #if defined GNULIB_POSIXCHECK /* strspn() assumes the second argument is a list of single-byte characters. Even in this simple case, it cannot work with multibyte strings. */ # undef strspn /* Assume strspn is always declared. */ _GL_WARN_ON_USE (strspn, "strspn cannot work correctly on character strings " "in multibyte locales - " "use mbsspn if you care about internationalization"); #endif #if defined GNULIB_POSIXCHECK /* strrchr() does not work with multibyte strings if the locale encoding is GB18030 and the character to be searched is a digit. */ # undef strrchr /* Assume strrchr is always declared. */ _GL_WARN_ON_USE_CXX (strrchr, const char *, char *, (const char *, int), "strrchr cannot work correctly on character strings " "in some multibyte locales - " "use mbsrchr if you care about internationalization"); #endif /* Search the next delimiter (char listed in DELIM) starting at *STRINGP. If one is found, overwrite it with a NUL, and advance *STRINGP to point to the next char after it. Otherwise, set *STRINGP to NULL. If *STRINGP was already NULL, nothing happens. Return the old value of *STRINGP. This is a variant of strtok() that is multithread-safe and supports empty fields. Caveat: It modifies the original string. Caveat: These functions cannot be used on constant strings. Caveat: The identity of the delimiting character is lost. Caveat: It doesn't work with multibyte strings unless all of the delimiter characters are ASCII characters < 0x30. See also strtok_r(). */ #if @GNULIB_STRSEP@ # if ! @HAVE_STRSEP@ _GL_FUNCDECL_SYS (strsep, char *, (char **restrict __stringp, char const *restrict __delim), _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (strsep, char *, (char **restrict __stringp, char const *restrict __delim)); _GL_CXXALIASWARN (strsep); # if defined GNULIB_POSIXCHECK # undef strsep _GL_WARN_ON_USE (strsep, "strsep cannot work correctly on character strings " "in multibyte locales - " "use mbssep if you care about internationalization"); # endif #elif defined GNULIB_POSIXCHECK # undef strsep # if HAVE_RAW_DECL_STRSEP _GL_WARN_ON_USE (strsep, "strsep is unportable - " "use gnulib module strsep for portability"); # endif #endif #if @GNULIB_STRSTR@ # if @REPLACE_STRSTR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strstr rpl_strstr # endif _GL_FUNCDECL_RPL (strstr, char *, (const char *haystack, const char *needle), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (strstr, char *, (const char *haystack, const char *needle)); # else /* On some systems, this function is defined as an overloaded function: extern "C++" { const char * strstr (const char *, const char *); } extern "C++" { char * strstr (char *, const char *); } */ _GL_CXXALIAS_SYS_CAST2 (strstr, char *, (const char *haystack, const char *needle), const char *, (const char *haystack, const char *needle)); # endif # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (strstr, char *, (char *haystack, const char *needle) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (strstr, const char *, (const char *haystack, const char *needle) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (strstr); # endif #elif defined GNULIB_POSIXCHECK /* strstr() does not work with multibyte strings if the locale encoding is different from UTF-8: POSIX says that it operates on "strings", and "string" in POSIX is defined as a sequence of bytes, not of characters. */ # undef strstr /* Assume strstr is always declared. */ _GL_WARN_ON_USE (strstr, "strstr is quadratic on many systems, and cannot " "work correctly on character strings in most " "multibyte locales - " "use mbsstr if you care about internationalization, " "or use strstr if you care about speed"); #endif /* Find the first occurrence of NEEDLE in HAYSTACK, using case-insensitive comparison. */ #if @GNULIB_STRCASESTR@ # if @REPLACE_STRCASESTR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strcasestr rpl_strcasestr # endif _GL_FUNCDECL_RPL (strcasestr, char *, (const char *haystack, const char *needle), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (strcasestr, char *, (const char *haystack, const char *needle)); # else # if ! @HAVE_STRCASESTR@ _GL_FUNCDECL_SYS (strcasestr, char *, (const char *haystack, const char *needle), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); # endif /* On some systems, this function is defined as an overloaded function: extern "C++" { const char * strcasestr (const char *, const char *); } extern "C++" { char * strcasestr (char *, const char *); } */ _GL_CXXALIAS_SYS_CAST2 (strcasestr, char *, (const char *haystack, const char *needle), const char *, (const char *haystack, const char *needle)); # endif # if ((__GLIBC__ == 2 && __GLIBC_MINOR__ >= 10) && !defined __UCLIBC__) \ && (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4) \ || defined __clang__) _GL_CXXALIASWARN1 (strcasestr, char *, (char *haystack, const char *needle) _GL_ATTRIBUTE_NOTHROW); _GL_CXXALIASWARN1 (strcasestr, const char *, (const char *haystack, const char *needle) _GL_ATTRIBUTE_NOTHROW); # elif __GLIBC__ >= 2 _GL_CXXALIASWARN (strcasestr); # endif #elif defined GNULIB_POSIXCHECK /* strcasestr() does not work with multibyte strings: It is a glibc extension, and glibc implements it only for unibyte locales. */ # undef strcasestr # if HAVE_RAW_DECL_STRCASESTR _GL_WARN_ON_USE (strcasestr, "strcasestr does work correctly on character " "strings in multibyte locales - " "use mbscasestr if you care about " "internationalization, or use c-strcasestr if you want " "a locale independent function"); # endif #endif /* Parse S into tokens separated by characters in DELIM. If S is NULL, the saved pointer in SAVE_PTR is used as the next starting point. For example: char s[] = "-abc-=-def"; char *sp; x = strtok_r(s, "-", &sp); // x = "abc", sp = "=-def" x = strtok_r(NULL, "-=", &sp); // x = "def", sp = NULL x = strtok_r(NULL, "=", &sp); // x = NULL // s = "abc\0-def\0" This is a variant of strtok() that is multithread-safe. For the POSIX documentation for this function, see: https://pubs.opengroup.org/onlinepubs/9699919799/functions/strtok.html Caveat: It modifies the original string. Caveat: These functions cannot be used on constant strings. Caveat: The identity of the delimiting character is lost. Caveat: It doesn't work with multibyte strings unless all of the delimiter characters are ASCII characters < 0x30. See also strsep(). */ #if @GNULIB_STRTOK_R@ # if @REPLACE_STRTOK_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strtok_r # define strtok_r rpl_strtok_r # endif _GL_FUNCDECL_RPL (strtok_r, char *, (char *restrict s, char const *restrict delim, char **restrict save_ptr), _GL_ARG_NONNULL ((2, 3))); _GL_CXXALIAS_RPL (strtok_r, char *, (char *restrict s, char const *restrict delim, char **restrict save_ptr)); # else # if @UNDEFINE_STRTOK_R@ || defined GNULIB_POSIXCHECK # undef strtok_r # endif # if ! @HAVE_DECL_STRTOK_R@ _GL_FUNCDECL_SYS (strtok_r, char *, (char *restrict s, char const *restrict delim, char **restrict save_ptr), _GL_ARG_NONNULL ((2, 3))); # endif _GL_CXXALIAS_SYS (strtok_r, char *, (char *restrict s, char const *restrict delim, char **restrict save_ptr)); # endif _GL_CXXALIASWARN (strtok_r); # if defined GNULIB_POSIXCHECK _GL_WARN_ON_USE (strtok_r, "strtok_r cannot work correctly on character " "strings in multibyte locales - " "use mbstok_r if you care about internationalization"); # endif #elif defined GNULIB_POSIXCHECK # undef strtok_r # if HAVE_RAW_DECL_STRTOK_R _GL_WARN_ON_USE (strtok_r, "strtok_r is unportable - " "use gnulib module strtok_r for portability"); # endif #endif /* The following functions are not specified by POSIX. They are gnulib extensions. */ #if @GNULIB_MBSLEN@ /* Return the number of multibyte characters in the character string STRING. This considers multibyte characters, unlike strlen, which counts bytes. */ # ifdef __MirBSD__ /* MirBSD defines mbslen as a macro. Override it. */ # undef mbslen # endif # if @HAVE_MBSLEN@ /* AIX, OSF/1, MirBSD define mbslen already in libc. */ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mbslen rpl_mbslen # endif _GL_FUNCDECL_RPL (mbslen, size_t, (const char *string), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mbslen, size_t, (const char *string)); # else _GL_FUNCDECL_SYS (mbslen, size_t, (const char *string), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_SYS (mbslen, size_t, (const char *string)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (mbslen); # endif #endif #if @GNULIB_MBSNLEN@ /* Return the number of multibyte characters in the character string starting at STRING and ending at STRING + LEN. */ _GL_EXTERN_C size_t mbsnlen (const char *string, size_t len) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1)); #endif #if @GNULIB_MBSCHR@ /* Locate the first single-byte character C in the character string STRING, and return a pointer to it. Return NULL if C is not found in STRING. Unlike strchr(), this function works correctly in multibyte locales with encodings such as GB18030. */ # if defined __hpux # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mbschr rpl_mbschr /* avoid collision with HP-UX function */ # endif _GL_FUNCDECL_RPL (mbschr, char *, (const char *string, int c), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mbschr, char *, (const char *string, int c)); # else _GL_FUNCDECL_SYS (mbschr, char *, (const char *string, int c), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_SYS (mbschr, char *, (const char *string, int c)); # endif _GL_CXXALIASWARN (mbschr); #endif #if @GNULIB_MBSRCHR@ /* Locate the last single-byte character C in the character string STRING, and return a pointer to it. Return NULL if C is not found in STRING. Unlike strrchr(), this function works correctly in multibyte locales with encodings such as GB18030. */ # if defined __hpux || defined __INTERIX # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mbsrchr rpl_mbsrchr /* avoid collision with system function */ # endif _GL_FUNCDECL_RPL (mbsrchr, char *, (const char *string, int c), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_RPL (mbsrchr, char *, (const char *string, int c)); # else _GL_FUNCDECL_SYS (mbsrchr, char *, (const char *string, int c), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1))); _GL_CXXALIAS_SYS (mbsrchr, char *, (const char *string, int c)); # endif _GL_CXXALIASWARN (mbsrchr); #endif #if @GNULIB_MBSSTR@ /* Find the first occurrence of the character string NEEDLE in the character string HAYSTACK. Return NULL if NEEDLE is not found in HAYSTACK. Unlike strstr(), this function works correctly in multibyte locales with encodings different from UTF-8. */ _GL_EXTERN_C char * mbsstr (const char *haystack, const char *needle) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSCASECMP@ /* Compare the character strings S1 and S2, ignoring case, returning less than, equal to or greater than zero if S1 is lexicographically less than, equal to or greater than S2. Note: This function may, in multibyte locales, return 0 for strings of different lengths! Unlike strcasecmp(), this function works correctly in multibyte locales. */ _GL_EXTERN_C int mbscasecmp (const char *s1, const char *s2) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSNCASECMP@ /* Compare the initial segment of the character string S1 consisting of at most N characters with the initial segment of the character string S2 consisting of at most N characters, ignoring case, returning less than, equal to or greater than zero if the initial segment of S1 is lexicographically less than, equal to or greater than the initial segment of S2. Note: This function may, in multibyte locales, return 0 for initial segments of different lengths! Unlike strncasecmp(), this function works correctly in multibyte locales. But beware that N is not a byte count but a character count! */ _GL_EXTERN_C int mbsncasecmp (const char *s1, const char *s2, size_t n) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSPCASECMP@ /* Compare the initial segment of the character string STRING consisting of at most mbslen (PREFIX) characters with the character string PREFIX, ignoring case. If the two match, return a pointer to the first byte after this prefix in STRING. Otherwise, return NULL. Note: This function may, in multibyte locales, return non-NULL if STRING is of smaller length than PREFIX! Unlike strncasecmp(), this function works correctly in multibyte locales. */ _GL_EXTERN_C char * mbspcasecmp (const char *string, const char *prefix) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSCASESTR@ /* Find the first occurrence of the character string NEEDLE in the character string HAYSTACK, using case-insensitive comparison. Note: This function may, in multibyte locales, return success even if strlen (haystack) < strlen (needle) ! Unlike strcasestr(), this function works correctly in multibyte locales. */ _GL_EXTERN_C char * mbscasestr (const char *haystack, const char *needle) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSCSPN@ /* Find the first occurrence in the character string STRING of any character in the character string ACCEPT. Return the number of bytes from the beginning of the string to this occurrence, or to the end of the string if none exists. Unlike strcspn(), this function works correctly in multibyte locales. */ _GL_EXTERN_C size_t mbscspn (const char *string, const char *accept) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSPBRK@ /* Find the first occurrence in the character string STRING of any character in the character string ACCEPT. Return the pointer to it, or NULL if none exists. Unlike strpbrk(), this function works correctly in multibyte locales. */ # if defined __hpux # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define mbspbrk rpl_mbspbrk /* avoid collision with HP-UX function */ # endif _GL_FUNCDECL_RPL (mbspbrk, char *, (const char *string, const char *accept), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (mbspbrk, char *, (const char *string, const char *accept)); # else _GL_FUNCDECL_SYS (mbspbrk, char *, (const char *string, const char *accept), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_SYS (mbspbrk, char *, (const char *string, const char *accept)); # endif _GL_CXXALIASWARN (mbspbrk); #endif #if @GNULIB_MBSSPN@ /* Find the first occurrence in the character string STRING of any character not in the character string REJECT. Return the number of bytes from the beginning of the string to this occurrence, or to the end of the string if none exists. Unlike strspn(), this function works correctly in multibyte locales. */ _GL_EXTERN_C size_t mbsspn (const char *string, const char *reject) _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSSEP@ /* Search the next delimiter (multibyte character listed in the character string DELIM) starting at the character string *STRINGP. If one is found, overwrite it with a NUL, and advance *STRINGP to point to the next multibyte character after it. Otherwise, set *STRINGP to NULL. If *STRINGP was already NULL, nothing happens. Return the old value of *STRINGP. This is a variant of mbstok_r() that supports empty fields. Caveat: It modifies the original string. Caveat: These functions cannot be used on constant strings. Caveat: The identity of the delimiting character is lost. See also mbstok_r(). */ _GL_EXTERN_C char * mbssep (char **stringp, const char *delim) _GL_ARG_NONNULL ((1, 2)); #endif #if @GNULIB_MBSTOK_R@ /* Parse the character string STRING into tokens separated by characters in the character string DELIM. If STRING is NULL, the saved pointer in SAVE_PTR is used as the next starting point. For example: char s[] = "-abc-=-def"; char *sp; x = mbstok_r(s, "-", &sp); // x = "abc", sp = "=-def" x = mbstok_r(NULL, "-=", &sp); // x = "def", sp = NULL x = mbstok_r(NULL, "=", &sp); // x = NULL // s = "abc\0-def\0" Caveat: It modifies the original string. Caveat: These functions cannot be used on constant strings. Caveat: The identity of the delimiting character is lost. See also mbssep(). */ _GL_EXTERN_C char * mbstok_r (char *restrict string, const char *delim, char **save_ptr) _GL_ARG_NONNULL ((2, 3)); #endif /* Map any int, typically from errno, into an error message. */ #if @GNULIB_STRERROR@ # if @REPLACE_STRERROR@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strerror # define strerror rpl_strerror # endif _GL_FUNCDECL_RPL (strerror, char *, (int)); _GL_CXXALIAS_RPL (strerror, char *, (int)); # else _GL_CXXALIAS_SYS (strerror, char *, (int)); # endif # if __GLIBC__ >= 2 _GL_CXXALIASWARN (strerror); # endif #elif defined GNULIB_POSIXCHECK # undef strerror /* Assume strerror is always declared. */ _GL_WARN_ON_USE (strerror, "strerror is unportable - " "use gnulib module strerror to guarantee non-NULL result"); #endif /* Map any int, typically from errno, into an error message. Multithread-safe. Uses the POSIX declaration, not the glibc declaration. */ #if @GNULIB_STRERROR_R@ # if @REPLACE_STRERROR_R@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strerror_r # define strerror_r rpl_strerror_r # endif _GL_FUNCDECL_RPL (strerror_r, int, (int errnum, char *buf, size_t buflen), _GL_ARG_NONNULL ((2))); _GL_CXXALIAS_RPL (strerror_r, int, (int errnum, char *buf, size_t buflen)); # else # if !@HAVE_DECL_STRERROR_R@ _GL_FUNCDECL_SYS (strerror_r, int, (int errnum, char *buf, size_t buflen), _GL_ARG_NONNULL ((2))); # endif _GL_CXXALIAS_SYS (strerror_r, int, (int errnum, char *buf, size_t buflen)); # endif # if __GLIBC__ >= 2 && @HAVE_DECL_STRERROR_R@ _GL_CXXALIASWARN (strerror_r); # endif #elif defined GNULIB_POSIXCHECK # undef strerror_r # if HAVE_RAW_DECL_STRERROR_R _GL_WARN_ON_USE (strerror_r, "strerror_r is unportable - " "use gnulib module strerror_r-posix for portability"); # endif #endif /* Return the name of the system error code ERRNUM. */ #if @GNULIB_STRERRORNAME_NP@ # if @REPLACE_STRERRORNAME_NP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # undef strerrorname_np # define strerrorname_np rpl_strerrorname_np # endif _GL_FUNCDECL_RPL (strerrorname_np, const char *, (int errnum)); _GL_CXXALIAS_RPL (strerrorname_np, const char *, (int errnum)); # else # if !@HAVE_STRERRORNAME_NP@ _GL_FUNCDECL_SYS (strerrorname_np, const char *, (int errnum)); # endif _GL_CXXALIAS_SYS (strerrorname_np, const char *, (int errnum)); # endif _GL_CXXALIASWARN (strerrorname_np); #elif defined GNULIB_POSIXCHECK # undef strerrorname_np # if HAVE_RAW_DECL_STRERRORNAME_NP _GL_WARN_ON_USE (strerrorname_np, "strerrorname_np is unportable - " "use gnulib module strerrorname_np for portability"); # endif #endif /* Return an abbreviation string for the signal number SIG. */ #if @GNULIB_SIGABBREV_NP@ # if ! @HAVE_SIGABBREV_NP@ _GL_FUNCDECL_SYS (sigabbrev_np, const char *, (int sig)); # endif _GL_CXXALIAS_SYS (sigabbrev_np, const char *, (int sig)); _GL_CXXALIASWARN (sigabbrev_np); #elif defined GNULIB_POSIXCHECK # undef sigabbrev_np # if HAVE_RAW_DECL_SIGABBREV_NP _GL_WARN_ON_USE (sigabbrev_np, "sigabbrev_np is unportable - " "use gnulib module sigabbrev_np for portability"); # endif #endif /* Return an English description string for the signal number SIG. */ #if @GNULIB_SIGDESCR_NP@ # if ! @HAVE_SIGDESCR_NP@ _GL_FUNCDECL_SYS (sigdescr_np, const char *, (int sig)); # endif _GL_CXXALIAS_SYS (sigdescr_np, const char *, (int sig)); _GL_CXXALIASWARN (sigdescr_np); #elif defined GNULIB_POSIXCHECK # undef sigdescr_np # if HAVE_RAW_DECL_SIGDESCR_NP _GL_WARN_ON_USE (sigdescr_np, "sigdescr_np is unportable - " "use gnulib module sigdescr_np for portability"); # endif #endif #if @GNULIB_STRSIGNAL@ # if @REPLACE_STRSIGNAL@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strsignal rpl_strsignal # endif _GL_FUNCDECL_RPL (strsignal, char *, (int __sig)); _GL_CXXALIAS_RPL (strsignal, char *, (int __sig)); # else # if ! @HAVE_DECL_STRSIGNAL@ _GL_FUNCDECL_SYS (strsignal, char *, (int __sig)); # endif /* Need to cast, because on Cygwin 1.5.x systems, the return type is 'const char *'. */ _GL_CXXALIAS_SYS_CAST (strsignal, char *, (int __sig)); # endif _GL_CXXALIASWARN (strsignal); #elif defined GNULIB_POSIXCHECK # undef strsignal # if HAVE_RAW_DECL_STRSIGNAL _GL_WARN_ON_USE (strsignal, "strsignal is unportable - " "use gnulib module strsignal for portability"); # endif #endif #if @GNULIB_STRVERSCMP@ # if @REPLACE_STRVERSCMP@ # if !(defined __cplusplus && defined GNULIB_NAMESPACE) # define strverscmp rpl_strverscmp # endif _GL_FUNCDECL_RPL (strverscmp, int, (const char *, const char *), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); _GL_CXXALIAS_RPL (strverscmp, int, (const char *, const char *)); # else # if !@HAVE_STRVERSCMP@ _GL_FUNCDECL_SYS (strverscmp, int, (const char *, const char *), _GL_ATTRIBUTE_PURE _GL_ARG_NONNULL ((1, 2))); # endif _GL_CXXALIAS_SYS (strverscmp, int, (const char *, const char *)); # endif _GL_CXXALIASWARN (strverscmp); #elif defined GNULIB_POSIXCHECK # undef strverscmp # if HAVE_RAW_DECL_STRVERSCMP _GL_WARN_ON_USE (strverscmp, "strverscmp is unportable - " "use gnulib module strverscmp for portability"); # endif #endif #endif /* _@GUARD_PREFIX@_STRING_H */ #endif /* _@GUARD_PREFIX@_STRING_H */ #endif libffcall-2.5/gnulib-lib/windows-once.h0000664000000000000000000000265314631432055015011 00000000000000/* Once-only control (native Windows implementation). Copyright (C) 2005-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ /* Written by Bruno Haible , 2005. Based on GCC's gthr-win32.h. */ #ifndef _WINDOWS_ONCE_H #define _WINDOWS_ONCE_H #define WIN32_LEAN_AND_MEAN /* avoid including junk */ #include typedef struct { volatile LONG inited; volatile LONG num_threads; volatile LONG started; CRITICAL_SECTION lock; } glwthread_once_t; #define GLWTHREAD_ONCE_INIT { -1, 0, -1 } #ifdef __cplusplus extern "C" { #endif extern void glwthread_once (glwthread_once_t *once_control, void (*initfunction) (void)); #ifdef __cplusplus } #endif #endif /* _WINDOWS_ONCE_H */ libffcall-2.5/gnulib-lib/gl_list.h0000664000000000000000000011462714631432055014037 00000000000000/* Abstract sequential list data type. -*- coding: utf-8 -*- Copyright (C) 2006-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2006. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #ifndef _GL_LIST_H #define _GL_LIST_H /* This file uses _GL_INLINE_HEADER_BEGIN, _GL_INLINE, _GL_ATTRIBUTE_NODISCARD. */ #if !_GL_CONFIG_H_INCLUDED #error "Please include config.h first." #endif #include _GL_INLINE_HEADER_BEGIN #ifndef GL_LIST_INLINE # define GL_LIST_INLINE _GL_INLINE #endif #ifdef __cplusplus extern "C" { #endif /* gl_list is an abstract list data type. It can contain any number of objects ('void *' or 'const void *' pointers) in any given order. Duplicates are allowed, but can optionally be forbidden. There are several implementations of this list datatype, optimized for different operations or for memory. You can start using the simplest list implementation, GL_ARRAY_LIST, and switch to a different implementation later, when you realize which operations are performed the most frequently. The API of the different implementations is exactly the same; when switching to a different implementation, you only have to change the gl_list_create call. The implementations are: GL_ARRAY_LIST a growable array GL_CARRAY_LIST a growable circular array GL_LINKED_LIST a linked list GL_AVLTREE_LIST a binary tree (AVL tree) GL_RBTREE_LIST a binary tree (red-black tree) GL_LINKEDHASH_LIST a hash table with a linked list GL_AVLTREEHASH_LIST a hash table with a binary tree (AVL tree) GL_RBTREEHASH_LIST a hash table with a binary tree (red-black tree) The memory consumption is asymptotically the same: O(1) for every object in the list. When looking more closely at the average memory consumed for an object, GL_ARRAY_LIST is the most compact representation, and GL_LINKEDHASH_LIST and GL_TREEHASH_LIST need more memory. The guaranteed average performance of the operations is, for a list of n elements: Operation ARRAY LINKED TREE LINKEDHASH TREEHASH CARRAY with|without with|without duplicates duplicates gl_list_size O(1) O(1) O(1) O(1) O(1) gl_list_node_value O(1) O(1) O(1) O(1) O(1) gl_list_node_set_value O(1) O(1) O(1) O(1) O((log n)²)/O(1) gl_list_next_node O(1) O(1) O(log n) O(1) O(log n) gl_list_previous_node O(1) O(1) O(log n) O(1) O(log n) gl_list_first_node O(1) O(1) O(log n) O(1) O(log n) gl_list_last_node O(1) O(1) O(log n) O(1) O(log n) gl_list_get_at O(1) O(n) O(log n) O(n) O(log n) gl_list_get_first O(1) O(1) O(log n) O(1) O(log n) gl_list_get_last O(1) O(1) O(log n) O(1) O(log n) gl_list_set_at O(1) O(n) O(log n) O(n) O((log n)²)/O(log n) gl_list_set_first O(1) O(1) O(log n) O(n)/O(1) O((log n)²)/O(log n) gl_list_set_last O(1) O(1) O(log n) O(n)/O(1) O((log n)²)/O(log n) gl_list_search O(n) O(n) O(n) O(n)/O(1) O(log n)/O(1) gl_list_search_from O(n) O(n) O(n) O(n)/O(1) O((log n)²)/O(log n) gl_list_search_from_to O(n) O(n) O(n) O(n)/O(1) O((log n)²)/O(log n) gl_list_indexof O(n) O(n) O(n) O(n) O(log n) gl_list_indexof_from O(n) O(n) O(n) O(n) O((log n)²)/O(log n) gl_list_indexof_from_to O(n) O(n) O(n) O(n) O((log n)²)/O(log n) gl_list_add_first O(n)/O(1) O(1) O(log n) O(1) O((log n)²)/O(log n) gl_list_add_last O(1) O(1) O(log n) O(1) O((log n)²)/O(log n) gl_list_add_before O(n) O(1) O(log n) O(1) O((log n)²)/O(log n) gl_list_add_after O(n) O(1) O(log n) O(1) O((log n)²)/O(log n) gl_list_add_at O(n) O(n) O(log n) O(n) O((log n)²)/O(log n) gl_list_remove_node O(n) O(1) O(log n) O(n)/O(1) O((log n)²)/O(log n) gl_list_remove_at O(n) O(n) O(log n) O(n) O((log n)²)/O(log n) gl_list_remove_first O(n)/O(1) O(1) O(log n) O(n)/O(1) O((log n)²)/O(log n) gl_list_remove_last O(1) O(1) O(log n) O(n)/O(1) O((log n)²)/O(log n) gl_list_remove O(n) O(n) O(n) O(n)/O(1) O((log n)²)/O(log n) gl_list_iterator O(1) O(1) O(log n) O(1) O(log n) gl_list_iterator_from_to O(1) O(n) O(log n) O(n) O(log n) gl_list_iterator_next O(1) O(1) O(log n) O(1) O(log n) gl_sortedlist_search O(log n) O(n) O(log n) O(n) O(log n) gl_sortedlist_search_from O(log n) O(n) O(log n) O(n) O(log n) gl_sortedlist_indexof O(log n) O(n) O(log n) O(n) O(log n) gl_sortedlist_indexof_fro O(log n) O(n) O(log n) O(n) O(log n) gl_sortedlist_add O(n) O(n) O(log n) O(n) O((log n)²)/O(log n) gl_sortedlist_remove O(n) O(n) O(log n) O(n) O((log n)²)/O(log n) */ /* -------------------------- gl_list_t Data Type -------------------------- */ /* Type of function used to compare two elements. NULL denotes pointer comparison. */ typedef bool (*gl_listelement_equals_fn) (const void *elt1, const void *elt2); /* Type of function used to compute a hash code. NULL denotes a function that depends only on the pointer itself. */ typedef size_t (*gl_listelement_hashcode_fn) (const void *elt); /* Type of function used to dispose an element once it's removed from a list. NULL denotes a no-op. */ typedef void (*gl_listelement_dispose_fn) (const void *elt); struct gl_list_impl; /* Type representing an entire list. */ typedef struct gl_list_impl * gl_list_t; struct gl_list_node_impl; /* Type representing the position of an element in the list, in a way that is more adapted to the list implementation than a plain index. Note: It is invalidated by insertions and removals! */ typedef struct gl_list_node_impl * gl_list_node_t; struct gl_list_implementation; /* Type representing a list datatype implementation. */ typedef const struct gl_list_implementation * gl_list_implementation_t; #if 0 /* Unless otherwise specified, these are defined inline below. */ /* Creates an empty list. IMPLEMENTATION is one of GL_ARRAY_LIST, GL_CARRAY_LIST, GL_LINKED_LIST, GL_AVLTREE_LIST, GL_RBTREE_LIST, GL_LINKEDHASH_LIST, GL_AVLTREEHASH_LIST, GL_RBTREEHASH_LIST. EQUALS_FN is an element comparison function or NULL. HASHCODE_FN is an element hash code function or NULL. DISPOSE_FN is an element disposal function or NULL. ALLOW_DUPLICATES is false if duplicate elements shall not be allowed in the list. The implementation may verify this at runtime. */ /* declared in gl_xlist.h */ extern gl_list_t gl_list_create_empty (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates) /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/ _GL_ATTRIBUTE_RETURNS_NONNULL; /* Likewise. Returns NULL upon out-of-memory. */ extern gl_list_t gl_list_nx_create_empty (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates) /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/; /* Creates a list with given contents. IMPLEMENTATION is one of GL_ARRAY_LIST, GL_CARRAY_LIST, GL_LINKED_LIST, GL_AVLTREE_LIST, GL_RBTREE_LIST, GL_LINKEDHASH_LIST, GL_AVLTREEHASH_LIST, GL_RBTREEHASH_LIST. EQUALS_FN is an element comparison function or NULL. HASHCODE_FN is an element hash code function or NULL. DISPOSE_FN is an element disposal function or NULL. ALLOW_DUPLICATES is false if duplicate elements shall not be allowed in the list. The implementation may verify this at runtime. COUNT is the number of initial elements. CONTENTS[0..COUNT-1] is the initial contents. */ /* declared in gl_xlist.h */ extern gl_list_t gl_list_create (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates, size_t count, const void **contents) /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/ _GL_ATTRIBUTE_RETURNS_NONNULL; /* Likewise. Returns NULL upon out-of-memory. */ extern gl_list_t gl_list_nx_create (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates, size_t count, const void **contents) /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/; /* Returns the current number of elements in a list. */ extern size_t gl_list_size (gl_list_t list); /* Returns the element value represented by a list node. */ extern const void * gl_list_node_value (gl_list_t list, gl_list_node_t node); /* Replaces the element value represented by a list node. */ /* declared in gl_xlist.h */ extern void gl_list_node_set_value (gl_list_t list, gl_list_node_t node, const void *elt); /* Likewise. Returns 0 upon success, -1 upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern int gl_list_node_nx_set_value (gl_list_t list, gl_list_node_t node, const void *elt); /* Returns the node immediately after the given node in the list, or NULL if the given node is the last (rightmost) one in the list. */ extern gl_list_node_t gl_list_next_node (gl_list_t list, gl_list_node_t node); /* Returns the node immediately before the given node in the list, or NULL if the given node is the first (leftmost) one in the list. */ extern gl_list_node_t gl_list_previous_node (gl_list_t list, gl_list_node_t node); /* Returns the first node in the list, or NULL if the list is empty. This function is useful for iterating through the list like this: gl_list_node_t node; for (node = gl_list_first_node (list); node != NULL; node = gl_list_next_node (node)) ... */ extern gl_list_node_t gl_list_first_node (gl_list_t list); /* Returns the last node in the list, or NULL if the list is empty. This function is useful for iterating through the list in backward order, like this: gl_list_node_t node; for (node = gl_list_last_node (list); node != NULL; node = gl_list_previous_node (node)) ... */ extern gl_list_node_t gl_list_last_node (gl_list_t list); /* Returns the element at a given position in the list. POSITION must be >= 0 and < gl_list_size (list). */ extern const void * gl_list_get_at (gl_list_t list, size_t position); /* Returns the element at the first position in the list. The list must be non-empty. */ extern const void * gl_list_get_first (gl_list_t list); /* Returns the element at the last position in the list. The list must be non-empty. */ extern const void * gl_list_get_last (gl_list_t list); /* Replaces the element at a given position in the list. POSITION must be >= 0 and < gl_list_size (list). Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_set_at (gl_list_t list, size_t position, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_set_at (gl_list_t list, size_t position, const void *elt); /* Replaces the element at the first position in the list. Returns its node. The list must be non-empty. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_set_first (gl_list_t list, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_set_first (gl_list_t list, const void *elt); /* Replaces the element at the last position in the list. Returns its node. The list must be non-empty. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_set_last (gl_list_t list, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_set_last (gl_list_t list, const void *elt); /* Searches whether an element is already in the list. Returns its node if found, or NULL if not present in the list. */ extern gl_list_node_t gl_list_search (gl_list_t list, const void *elt); /* Searches whether an element is already in the list, at a position >= START_INDEX. Returns its node if found, or NULL if not present in the list. */ extern gl_list_node_t gl_list_search_from (gl_list_t list, size_t start_index, const void *elt); /* Searches whether an element is already in the list, at a position >= START_INDEX and < END_INDEX. Returns its node if found, or NULL if not present in the list. */ extern gl_list_node_t gl_list_search_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt); /* Searches whether an element is already in the list. Returns its position if found, or (size_t)(-1) if not present in the list. */ extern size_t gl_list_indexof (gl_list_t list, const void *elt); /* Searches whether an element is already in the list, at a position >= START_INDEX. Returns its position if found, or (size_t)(-1) if not present in the list. */ extern size_t gl_list_indexof_from (gl_list_t list, size_t start_index, const void *elt); /* Searches whether an element is already in the list, at a position >= START_INDEX and < END_INDEX. Returns its position if found, or (size_t)(-1) if not present in the list. */ extern size_t gl_list_indexof_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt); /* Adds an element as the first element of the list. Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_add_first (gl_list_t list, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_add_first (gl_list_t list, const void *elt); /* Adds an element as the last element of the list. Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_add_last (gl_list_t list, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_add_last (gl_list_t list, const void *elt); /* Adds an element before a given element node of the list. Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_add_before (gl_list_t list, gl_list_node_t node, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_add_before (gl_list_t list, gl_list_node_t node, const void *elt); /* Adds an element after a given element node of the list. Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_add_after (gl_list_t list, gl_list_node_t node, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_add_after (gl_list_t list, gl_list_node_t node, const void *elt); /* Adds an element at a given position in the list. POSITION must be >= 0 and <= gl_list_size (list). */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_list_add_at (gl_list_t list, size_t position, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_list_nx_add_at (gl_list_t list, size_t position, const void *elt); /* Removes an element from the list. Returns true. */ extern bool gl_list_remove_node (gl_list_t list, gl_list_node_t node); /* Removes an element at a given position from the list. POSITION must be >= 0 and < gl_list_size (list). Returns true. */ extern bool gl_list_remove_at (gl_list_t list, size_t position); /* Removes the element at the first position from the list. Returns true if it was found and removed, or false if the list was empty. */ extern bool gl_list_remove_first (gl_list_t list); /* Removes the element at the last position from the list. Returns true if it was found and removed, or false if the list was empty. */ extern bool gl_list_remove_last (gl_list_t list); /* Searches and removes an element from the list. Returns true if it was found and removed. */ extern bool gl_list_remove (gl_list_t list, const void *elt); /* Frees an entire list. (But this call does not free the elements of the list. It only invokes the DISPOSE_FN on each of the elements of the list, and only if the list is not a sublist.) */ extern void gl_list_free (gl_list_t list); #endif /* End of inline and gl_xlist.h-defined functions. */ /* --------------------- gl_list_iterator_t Data Type --------------------- */ /* Functions for iterating through a list. */ /* Type of an iterator that traverses a list. This is a fixed-size struct, so that creation of an iterator doesn't need memory allocation on the heap. */ typedef struct { /* For fast dispatch of gl_list_iterator_next. */ const struct gl_list_implementation *vtable; /* For detecting whether the last returned element was removed. */ gl_list_t list; size_t count; /* Other, implementation-private fields. */ void *p; void *q; size_t i; size_t j; } gl_list_iterator_t; #if 0 /* These are defined inline below. */ /* Creates an iterator traversing a list. The list contents must not be modified while the iterator is in use, except for replacing or removing the last returned element. */ extern gl_list_iterator_t gl_list_iterator (gl_list_t list); /* Creates an iterator traversing the element with indices i, start_index <= i < end_index, of a list. The list contents must not be modified while the iterator is in use, except for replacing or removing the last returned element. */ extern gl_list_iterator_t gl_list_iterator_from_to (gl_list_t list, size_t start_index, size_t end_index); /* If there is a next element, stores the next element in *ELTP, stores its node in *NODEP if NODEP is non-NULL, advances the iterator and returns true. Otherwise, returns false. */ extern bool gl_list_iterator_next (gl_list_iterator_t *iterator, const void **eltp, gl_list_node_t *nodep); /* Frees an iterator. */ extern void gl_list_iterator_free (gl_list_iterator_t *iterator); #endif /* End of inline functions. */ /* ---------------------- Sorted gl_list_t Data Type ---------------------- */ /* The following functions are for lists without duplicates where the order is given by a sort criterion. */ /* Type of function used to compare two elements. Same as for qsort(). NULL denotes pointer comparison. */ typedef int (*gl_listelement_compar_fn) (const void *elt1, const void *elt2); #if 0 /* Unless otherwise specified, these are defined inline below. */ /* Searches whether an element is already in the list. The list is assumed to be sorted with COMPAR. Returns its node if found, or NULL if not present in the list. If the list contains several copies of ELT, the node of the leftmost one is returned. */ extern gl_list_node_t gl_sortedlist_search (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); /* Searches whether an element is already in the list. The list is assumed to be sorted with COMPAR. Only list elements with indices >= START_INDEX and < END_INDEX are considered; the implementation uses these bounds to minimize the number of COMPAR invocations. Returns its node if found, or NULL if not present in the list. If the list contains several copies of ELT, the node of the leftmost one is returned. */ extern gl_list_node_t gl_sortedlist_search_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt); /* Searches whether an element is already in the list. The list is assumed to be sorted with COMPAR. Returns its position if found, or (size_t)(-1) if not present in the list. If the list contains several copies of ELT, the position of the leftmost one is returned. */ extern size_t gl_sortedlist_indexof (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); /* Searches whether an element is already in the list. The list is assumed to be sorted with COMPAR. Only list elements with indices >= START_INDEX and < END_INDEX are considered; the implementation uses these bounds to minimize the number of COMPAR invocations. Returns its position if found, or (size_t)(-1) if not present in the list. If the list contains several copies of ELT, the position of the leftmost one is returned. */ extern size_t gl_sortedlist_indexof_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt); /* Adds an element at the appropriate position in the list. The list is assumed to be sorted with COMPAR. Returns its node. */ /* declared in gl_xlist.h */ extern gl_list_node_t gl_sortedlist_add (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); /* Likewise. Returns NULL upon out-of-memory. */ _GL_ATTRIBUTE_NODISCARD extern gl_list_node_t gl_sortedlist_nx_add (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); /* Searches and removes an element from the list. The list is assumed to be sorted with COMPAR. Returns true if it was found and removed. If the list contains several copies of ELT, only the leftmost one is removed. */ extern bool gl_sortedlist_remove (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); #endif /* End of inline and gl_xlist.h-defined functions. */ /* ------------------------ Implementation Details ------------------------ */ struct gl_list_implementation { /* gl_list_t functions. */ gl_list_t (*nx_create_empty) (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates); gl_list_t (*nx_create) (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates, size_t count, const void **contents); size_t (*size) (gl_list_t list); const void * (*node_value) (gl_list_t list, gl_list_node_t node); int (*node_nx_set_value) (gl_list_t list, gl_list_node_t node, const void *elt); gl_list_node_t (*next_node) (gl_list_t list, gl_list_node_t node); gl_list_node_t (*previous_node) (gl_list_t list, gl_list_node_t node); gl_list_node_t (*first_node) (gl_list_t list); gl_list_node_t (*last_node) (gl_list_t list); const void * (*get_at) (gl_list_t list, size_t position); gl_list_node_t (*nx_set_at) (gl_list_t list, size_t position, const void *elt); gl_list_node_t (*search_from_to) (gl_list_t list, size_t start_index, size_t end_index, const void *elt); size_t (*indexof_from_to) (gl_list_t list, size_t start_index, size_t end_index, const void *elt); gl_list_node_t (*nx_add_first) (gl_list_t list, const void *elt); gl_list_node_t (*nx_add_last) (gl_list_t list, const void *elt); gl_list_node_t (*nx_add_before) (gl_list_t list, gl_list_node_t node, const void *elt); gl_list_node_t (*nx_add_after) (gl_list_t list, gl_list_node_t node, const void *elt); gl_list_node_t (*nx_add_at) (gl_list_t list, size_t position, const void *elt); bool (*remove_node) (gl_list_t list, gl_list_node_t node); bool (*remove_at) (gl_list_t list, size_t position); bool (*remove_elt) (gl_list_t list, const void *elt); void (*list_free) (gl_list_t list); /* gl_list_iterator_t functions. */ gl_list_iterator_t (*iterator) (gl_list_t list); gl_list_iterator_t (*iterator_from_to) (gl_list_t list, size_t start_index, size_t end_index); bool (*iterator_next) (gl_list_iterator_t *iterator, const void **eltp, gl_list_node_t *nodep); void (*iterator_free) (gl_list_iterator_t *iterator); /* Sorted gl_list_t functions. */ gl_list_node_t (*sortedlist_search) (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); gl_list_node_t (*sortedlist_search_from_to) (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt); size_t (*sortedlist_indexof) (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); size_t (*sortedlist_indexof_from_to) (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt); gl_list_node_t (*sortedlist_nx_add) (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); bool (*sortedlist_remove) (gl_list_t list, gl_listelement_compar_fn compar, const void *elt); }; struct gl_list_impl_base { const struct gl_list_implementation *vtable; gl_listelement_equals_fn equals_fn; gl_listelement_hashcode_fn hashcode_fn; gl_listelement_dispose_fn dispose_fn; bool allow_duplicates; }; /* Define all functions of this file as accesses to the struct gl_list_implementation. */ GL_LIST_INLINE /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/ gl_list_t gl_list_nx_create_empty (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates) { return implementation->nx_create_empty (implementation, equals_fn, hashcode_fn, dispose_fn, allow_duplicates); } GL_LIST_INLINE /*_GL_ATTRIBUTE_DEALLOC (gl_list_free, 1)*/ gl_list_t gl_list_nx_create (gl_list_implementation_t implementation, gl_listelement_equals_fn equals_fn, gl_listelement_hashcode_fn hashcode_fn, gl_listelement_dispose_fn dispose_fn, bool allow_duplicates, size_t count, const void **contents) { return implementation->nx_create (implementation, equals_fn, hashcode_fn, dispose_fn, allow_duplicates, count, contents); } GL_LIST_INLINE size_t gl_list_size (gl_list_t list) { return ((const struct gl_list_impl_base *) list)->vtable ->size (list); } GL_LIST_INLINE const void * gl_list_node_value (gl_list_t list, gl_list_node_t node) { return ((const struct gl_list_impl_base *) list)->vtable ->node_value (list, node); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE int gl_list_node_nx_set_value (gl_list_t list, gl_list_node_t node, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->node_nx_set_value (list, node, elt); } GL_LIST_INLINE gl_list_node_t gl_list_next_node (gl_list_t list, gl_list_node_t node) { return ((const struct gl_list_impl_base *) list)->vtable ->next_node (list, node); } GL_LIST_INLINE gl_list_node_t gl_list_previous_node (gl_list_t list, gl_list_node_t node) { return ((const struct gl_list_impl_base *) list)->vtable ->previous_node (list, node); } GL_LIST_INLINE gl_list_node_t gl_list_first_node (gl_list_t list) { return ((const struct gl_list_impl_base *) list)->vtable ->first_node (list); } GL_LIST_INLINE gl_list_node_t gl_list_last_node (gl_list_t list) { return ((const struct gl_list_impl_base *) list)->vtable ->last_node (list); } GL_LIST_INLINE const void * gl_list_get_at (gl_list_t list, size_t position) { return ((const struct gl_list_impl_base *) list)->vtable ->get_at (list, position); } GL_LIST_INLINE const void * gl_list_get_first (gl_list_t list) { return gl_list_get_at (list, 0); } GL_LIST_INLINE const void * gl_list_get_last (gl_list_t list) { return gl_list_get_at (list, gl_list_size (list) - 1); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_set_at (gl_list_t list, size_t position, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_set_at (list, position, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_set_first (gl_list_t list, const void *elt) { return gl_list_nx_set_at (list, 0, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_set_last (gl_list_t list, const void *elt) { return gl_list_nx_set_at (list, gl_list_size (list) - 1, elt); } GL_LIST_INLINE gl_list_node_t gl_list_search (gl_list_t list, const void *elt) { size_t size = ((const struct gl_list_impl_base *) list)->vtable->size (list); return ((const struct gl_list_impl_base *) list)->vtable ->search_from_to (list, 0, size, elt); } GL_LIST_INLINE gl_list_node_t gl_list_search_from (gl_list_t list, size_t start_index, const void *elt) { size_t size = ((const struct gl_list_impl_base *) list)->vtable->size (list); return ((const struct gl_list_impl_base *) list)->vtable ->search_from_to (list, start_index, size, elt); } GL_LIST_INLINE gl_list_node_t gl_list_search_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->search_from_to (list, start_index, end_index, elt); } GL_LIST_INLINE size_t gl_list_indexof (gl_list_t list, const void *elt) { size_t size = ((const struct gl_list_impl_base *) list)->vtable->size (list); return ((const struct gl_list_impl_base *) list)->vtable ->indexof_from_to (list, 0, size, elt); } GL_LIST_INLINE size_t gl_list_indexof_from (gl_list_t list, size_t start_index, const void *elt) { size_t size = ((const struct gl_list_impl_base *) list)->vtable->size (list); return ((const struct gl_list_impl_base *) list)->vtable ->indexof_from_to (list, start_index, size, elt); } GL_LIST_INLINE size_t gl_list_indexof_from_to (gl_list_t list, size_t start_index, size_t end_index, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->indexof_from_to (list, start_index, end_index, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_add_first (gl_list_t list, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_add_first (list, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_add_last (gl_list_t list, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_add_last (list, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_add_before (gl_list_t list, gl_list_node_t node, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_add_before (list, node, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_add_after (gl_list_t list, gl_list_node_t node, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_add_after (list, node, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_list_nx_add_at (gl_list_t list, size_t position, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->nx_add_at (list, position, elt); } GL_LIST_INLINE bool gl_list_remove_node (gl_list_t list, gl_list_node_t node) { return ((const struct gl_list_impl_base *) list)->vtable ->remove_node (list, node); } GL_LIST_INLINE bool gl_list_remove_at (gl_list_t list, size_t position) { return ((const struct gl_list_impl_base *) list)->vtable ->remove_at (list, position); } GL_LIST_INLINE bool gl_list_remove_first (gl_list_t list) { size_t size = gl_list_size (list); if (size > 0) return gl_list_remove_at (list, 0); else return false; } GL_LIST_INLINE bool gl_list_remove_last (gl_list_t list) { size_t size = gl_list_size (list); if (size > 0) return gl_list_remove_at (list, size - 1); else return false; } GL_LIST_INLINE bool gl_list_remove (gl_list_t list, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->remove_elt (list, elt); } GL_LIST_INLINE void gl_list_free (gl_list_t list) { ((const struct gl_list_impl_base *) list)->vtable->list_free (list); } GL_LIST_INLINE gl_list_iterator_t gl_list_iterator (gl_list_t list) { return ((const struct gl_list_impl_base *) list)->vtable ->iterator (list); } GL_LIST_INLINE gl_list_iterator_t gl_list_iterator_from_to (gl_list_t list, size_t start_index, size_t end_index) { return ((const struct gl_list_impl_base *) list)->vtable ->iterator_from_to (list, start_index, end_index); } GL_LIST_INLINE bool gl_list_iterator_next (gl_list_iterator_t *iterator, const void **eltp, gl_list_node_t *nodep) { return iterator->vtable->iterator_next (iterator, eltp, nodep); } GL_LIST_INLINE void gl_list_iterator_free (gl_list_iterator_t *iterator) { iterator->vtable->iterator_free (iterator); } GL_LIST_INLINE gl_list_node_t gl_sortedlist_search (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_search (list, compar, elt); } GL_LIST_INLINE gl_list_node_t gl_sortedlist_search_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_search_from_to (list, compar, start_index, end_index, elt); } GL_LIST_INLINE size_t gl_sortedlist_indexof (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_indexof (list, compar, elt); } GL_LIST_INLINE size_t gl_sortedlist_indexof_from_to (gl_list_t list, gl_listelement_compar_fn compar, size_t start_index, size_t end_index, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_indexof_from_to (list, compar, start_index, end_index, elt); } _GL_ATTRIBUTE_NODISCARD GL_LIST_INLINE gl_list_node_t gl_sortedlist_nx_add (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_nx_add (list, compar, elt); } GL_LIST_INLINE bool gl_sortedlist_remove (gl_list_t list, gl_listelement_compar_fn compar, const void *elt) { return ((const struct gl_list_impl_base *) list)->vtable ->sortedlist_remove (list, compar, elt); } #ifdef __cplusplus } #endif _GL_INLINE_HEADER_END #endif /* _GL_LIST_H */ libffcall-2.5/gnulib-lib/unistd.c0000664000000000000000000000154114631432055013671 00000000000000/* Inline functions for . Copyright (C) 2012-2024 Free Software Foundation, Inc. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include #define _GL_UNISTD_INLINE _GL_EXTERN_INLINE #include typedef int dummy; libffcall-2.5/gnulib-lib/stdio-write.c0000664000000000000000000001670614631432055014646 00000000000000/* POSIX compatible FILE stream write function. Copyright (C) 2008-2024 Free Software Foundation, Inc. Written by Bruno Haible , 2008. This file is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This file is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this program. If not, see . */ #include /* Specification. */ #include /* Replace these functions only if module 'nonblocking' or module 'sigpipe' is requested. */ #if GNULIB_NONBLOCKING || GNULIB_SIGPIPE /* On native Windows platforms, SIGPIPE does not exist. When write() is called on a pipe with no readers, WriteFile() fails with error GetLastError() = ERROR_NO_DATA, and write() in consequence fails with error EINVAL. This write() function is at the basis of the function which flushes the buffer of a FILE stream. */ # if defined _WIN32 && ! defined __CYGWIN__ # include # include # include # define WIN32_LEAN_AND_MEAN /* avoid including junk */ # include # if GNULIB_MSVC_NOTHROW # include "msvc-nothrow.h" # else # include # endif /* Don't assume that UNICODE is not defined. */ # undef GetNamedPipeHandleState # define GetNamedPipeHandleState GetNamedPipeHandleStateA # if GNULIB_NONBLOCKING # define CLEAR_ERRNO \ errno = 0; # define HANDLE_ENOSPC \ if (errno == ENOSPC && ferror (stream)) \ { \ int fd = fileno (stream); \ if (fd >= 0) \ { \ HANDLE h = (HANDLE) _get_osfhandle (fd); \ if (GetFileType (h) == FILE_TYPE_PIPE) \ { \ /* h is a pipe or socket. */ \ DWORD state; \ if (GetNamedPipeHandleState (h, &state, NULL, NULL, \ NULL, NULL, 0) \ && (state & PIPE_NOWAIT) != 0) \ /* h is a pipe in non-blocking mode. \ Change errno from ENOSPC to EAGAIN. */ \ errno = EAGAIN; \ } \ } \ } \ else # else # define CLEAR_ERRNO # define HANDLE_ENOSPC # endif # if GNULIB_SIGPIPE # define CLEAR_LastError \ SetLastError (0); # define HANDLE_ERROR_NO_DATA \ if (GetLastError () == ERROR_NO_DATA && ferror (stream)) \ { \ int fd = fileno (stream); \ if (fd >= 0 \ && GetFileType ((HANDLE) _get_osfhandle (fd)) \ == FILE_TYPE_PIPE) \ { \ /* Try to raise signal SIGPIPE. */ \ raise (SIGPIPE); \ /* If it is currently blocked or ignored, change errno from \ EINVAL to EPIPE. */ \ errno = EPIPE; \ } \ } \ else # else # define CLEAR_LastError # define HANDLE_ERROR_NO_DATA # endif # define CALL_WITH_SIGPIPE_EMULATION(RETTYPE, EXPRESSION, FAILED) \ if (ferror (stream)) \ return (EXPRESSION); \ else \ { \ RETTYPE ret; \ CLEAR_ERRNO \ CLEAR_LastError \ ret = (EXPRESSION); \ if (FAILED) \ { \ HANDLE_ENOSPC \ HANDLE_ERROR_NO_DATA \ ; \ } \ return ret; \ } # if !REPLACE_PRINTF_POSIX /* avoid collision with printf.c */ int printf (const char *format, ...) { int retval; va_list args; va_start (args, format); retval = vfprintf (stdout, format, args); va_end (args); return retval; } # endif # if !REPLACE_FPRINTF_POSIX /* avoid collision with fprintf.c */ int fprintf (FILE *stream, const char *format, ...) { int retval; va_list args; va_start (args, format); retval = vfprintf (stream, format, args); va_end (args); return retval; } # endif # if !REPLACE_VPRINTF_POSIX /* avoid collision with vprintf.c */ int vprintf (const char *format, va_list args) { return vfprintf (stdout, format, args); } # endif # if !REPLACE_VFPRINTF_POSIX /* avoid collision with vfprintf.c */ int vfprintf (FILE *stream, const char *format, va_list args) #undef vfprintf { CALL_WITH_SIGPIPE_EMULATION (int, vfprintf (stream, format, args), ret == EOF) } # endif int putchar (int c) { return fputc (c, stdout); } int fputc (int c, FILE *stream) #undef fputc { CALL_WITH_SIGPIPE_EMULATION (int, fputc (c, stream), ret == EOF) } int fputs (const char *string, FILE *stream) #undef fputs { CALL_WITH_SIGPIPE_EMULATION (int, fputs (string, stream), ret == EOF) } int puts (const char *string) #undef puts { FILE *stream = stdout; CALL_WITH_SIGPIPE_EMULATION (int, puts (string), ret == EOF) } size_t fwrite (const void *ptr, size_t s, size_t n, FILE *stream) #undef fwrite { CALL_WITH_SIGPIPE_EMULATION (size_t, fwrite (ptr, s, n, stream), ret < n) } # endif #endif libffcall-2.5/ffcall-abi.h0000664000000000000000000002131314166673535012340 00000000000000/* * Copyright 2017-2022 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Define some canonical CPU and ABI indicators. References: - host-cpu-c-abi.m4 from gnulib - https://sourceforge.net/p/predef/wiki/Architectures/ - GCC source code: definitions of macro TARGET_CPU_CPP_BUILTINS - clang source code: defineMacro invocations in Basic/Targets.cpp, especially in getTargetDefines methods. Limitation: Unlike host-cpu-c-abi.m4, this preprocessor-based approach can not reliably distinguish __arm__ and __armhf__. */ #ifndef __i386__ #if defined(__i386__) /* GCC, clang */ || defined(__i386) /* Sun C */ || defined(_M_IX86) /* MSVC */ #define __i386__ 1 #endif #endif #ifndef __m68k__ #if defined(__m68k__) /* GCC */ #define __m68k__ 1 #endif #endif /* On mips, there are three ABIs: - 32 or o32: It defines _MIPS_SIM == _ABIO32 and _MIPS_SZLONG == 32. - n32: It defines _MIPS_SIM == _ABIN32 and _MIPS_SZLONG == 32. - 64: It defines _MIPS_SZLONG == 64. */ /* Note: When __mipsn32__ or __mips64__ is defined, __mips__ may or may not be defined as well. To test for the MIPS o32 ABI, use #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) */ /* To distinguish little-endian and big-endian arm, use the preprocessor defines _MIPSEB vs. _MIPSEL. */ #ifndef __mips__ #if defined(__mips) /* GCC, clang, IRIX cc */ /* Note: GCC, clang also define __mips__. */ #define __mips__ 1 #endif #endif #ifndef __mipsn32__ #if defined(__mips__) && (_MIPS_SIM == _ABIN32) #define __mipsn32__ 1 #endif #endif #ifndef __mips64__ #if defined(__mips__) && defined(_MIPS_SZLONG) && (_MIPS_SZLONG == 64) #define __mips64__ 1 #endif #endif /* Note: When __sparc64__ is defined, __sparc__ may or may not be defined as well. To test for the SPARC 32-bit ABI, use #if defined(__sparc__) && !defined(__sparc64__) */ #ifndef __sparc__ #if defined(__sparc) /* GCC, clang, Sun C */ /* Note: GCC, clang also define __sparc__. */ #define __sparc__ 1 #endif #endif #ifndef __sparc64__ #if defined(__sparcv9) /* GCC/Solaris, Sun C */ || defined(__arch64__) /* GCC/Linux */ #define __sparc64__ 1 #endif #endif #ifndef __alpha__ #if defined(__alpha) /* GCC, DEC C */ /* Note: GCC also defines __alpha__. */ #define __alpha__ 1 #endif #endif /* On hppa, the C compiler may be generating 32-bit code or 64-bit code. In the latter case, it defines _LP64 and __LP64__. */ /* Note: When __hppa64__ is defined, __hppa__ may or may not be defined as well. To test for the HP-PA 32-bit ABI, use #if defined(__hppa__) && !defined(__hppa64__) */ #ifndef __hppa__ #if defined(__hppa) /* GCC, HP C */ /* Note: GCC also defines __hppa__. */ #define __hppa__ 1 #endif #endif #ifndef __hppa64__ #if defined(__hppa__) && defined(__LP64__) #define __hppa64__ 1 #endif #endif /* Distinguish arm which passes floating-point arguments and return values in integer registers (r0, r1, ...) - this is gcc -mfloat-abi=soft or gcc -mfloat-abi=softfp - from arm which passes them in float registers (s0, s1, ...) and double registers (d0, d1, ...) - this is gcc -mfloat-abi=hard. GCC 4.6 or newer sets the preprocessor defines __ARM_PCS (for the first case) and __ARM_PCS_VFP (for the second case), but older GCC does not. */ /* Note: When __armhf__ is defined, __arm__ may or may not be defined as well. To test for the ARM ABI that does not use floating-point registers for parameter passing, use #if defined(__arm__) && !defined(__armhf__) */ /* To distinguish little-endian and big-endian arm, use the preprocessor defines __ARMEL__ vs. __ARMEB__. */ #ifndef __arm__ #if defined(__arm__) /* GCC, clang */ || defined(_M_ARM) /* MSVC */ #define __arm__ 1 #endif #endif #ifndef __armhf__ #if defined(__arm__) && defined(__ARM_PCS_VFP) /* GCC */ #define __armhf__ 1 #endif #endif /* On arm64 systems, the C compiler may be generating code in one of these ABIs: - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64. - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32. - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf (see above). */ /* Note: When __arm64_ilp32__ is defined, __arm64__ may or may not be defined as well. To test for the arm64 64-bit ABI, use #if defined(__arm64__) && !defined(__arm64_ilp32__) */ /* To distinguish little-endian and big-endian arm64, use the preprocessor defines __AARCH64EL__ vs. __AARCH64EB__. */ #ifndef __arm64__ #if defined(__aarch64__) /* GCC, clang */ || defined(_M_ARM64) /* MSVC */ #define __arm64__ 1 #endif #endif #ifndef __arm64_ilp32__ #if defined(__arm64__) && (defined(__ILP32__) || defined (_ILP32)) #define __arm64_ilp32__ 1 #endif #endif /* On powerpc and powerpc64, different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD. To distinguish them, use the OS dependent defines #if defined(_AIX) #if (defined(__MACH__) && defined(__APPLE__)) #if !(defined(_AIX) || (defined(__MACH__) && defined(__APPLE__))) */ /* On powerpc64, there are two ABIs on Linux: The AIX compatible one and the ELFv2 one. The latter defines _CALL_ELF=2. */ /* Note: When __powerpc64__ is defined, __powerpc__ may or may not be defined as well. To test for the SPARC 32-bit ABI, use #if defined(__powerpc__) && !defined(__powerpc64__) Note: When __powerpc64_elfv2__ is defined, __powerpc64__ may or may not be defined as well. To test for the SPARC 32-bit ABI, use #if defined(__powerpc64__) && !defined(__powerpc64_elfv2__) */ #ifndef __powerpc__ #if defined(_ARCH_PPC) /* GCC, XLC */ /* Note: On AIX, Linux also __powerpc__ is defined; whereas on Mac OS X also __ppc__ is defined. On AIX also _IBMR2 is defined. */ #define __powerpc__ 1 #endif #endif #ifndef __powerpc64__ #if defined(_ARCH_PPC64) /* GCC, XLC */ /* Note: On Linux, also __powerpc64__ is defined. */ #define __powerpc64__ 1 #endif #endif #ifndef __powerpc64_elfv2__ #if defined(__powerpc64__) && defined(_CALL_ELF) && _CALL_ELF == 2 #define __powerpc64_elfv2__ 1 #endif #endif /* On ia64 on HP-UX, the C compiler may be generating 64-bit code or 32-bit code. In the latter case, it defines _ILP32. */ /* Note: When __ia64_ilp32__ is defined, __ia64__ may or may not be defined as well. To test for the ia64 64-bit ABI, use #if defined(__ia64__) && !defined(__ia64_ilp32__) */ #ifndef __ia64__ #if defined(__ia64__) /* GCC, HP C */ /* Note: GCC, HP C also define __ia64. */ #define __ia64__ 1 #endif #endif #ifndef __ia64_ilp32__ #if defined(__ia64__) && defined(_ILP32) #define __ia64_ilp32__ 1 #endif #endif /* On x86_64 systems, the C compiler may be generating code in one of these ABIs: - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64. - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64 with native Windows (mingw, MSVC). - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32. - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386 (see above). */ /* Note: When __x86_64_x32__ is defined, __x86_64__ may or may not be defined as well. To test for the x86_64 64-bit ABI, use #if defined(__x86_64__) && !defined(__x86_64_x32__) */ #ifndef __x86_64__ #if (defined(__x86_64__) || defined(__amd64__)) /* GCC, clang, Sun C */ || (defined(_M_X64) || defined(_M_AMD64)) /* MSVC */ #define __x86_64__ 1 #endif #endif #ifndef __x86_64_x32__ #if defined(__x86_64__) && (defined(__ILP32__) || defined(_ILP32)) #define __x86_64_x32__ 1 #endif #endif /* Note: When __s390x__ is defined, __s390__ may or may not be defined as well. To test for the S/390 31-bit ABI, use #if defined(__s390__) && !defined(__s390x__) */ #ifndef __s390__ #if defined(__s390__) /* GCC, clang */ #define __s390__ 1 #endif #endif #ifndef __s390x__ #if defined(__s390x__) /* GCC, clang */ #define __s390x__ 1 #endif #endif #ifndef __riscv32__ #if defined(__riscv) && __riscv_xlen == 32 && !defined(__LP64__) /* GCC */ #define __riscv32__ 1 #endif #endif #ifndef __riscv64__ #if defined(__riscv) && __riscv_xlen == 64 && defined(__LP64__) /* GCC */ #define __riscv64__ 1 #endif #endif #ifndef __loongarch64__ #if defined(__loongarch64) && defined(__LP64__) #define __loongarch64__ 1 #endif #endif libffcall-2.5/vacall/0000775000000000000000000000000014665334232011521 500000000000000libffcall-2.5/vacall/vacall-s390-linux.s0000664000000000000000000000364114665263076014733 00000000000000 .file "vacall-s390.c" .text .align 4 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long vacall_function .LC1: .long 0 .LC2: .long 255 .LC3: .long 65535 .LC4: .long 1 .LTN0_0: l %r1,.LC0-.LT0_0(%r13) lr %r14,%r15 ahi %r15,-184 lr %r11,%r15 l %r12,0(%r1) st %r14,0(%r15) la %r1,280(%r11) st %r2,132(%r11) la %r2,96(%r11) st %r4,140(%r11) st %r5,144(%r11) st %r6,148(%r11) st %r3,136(%r11) std %f2,176(%r11) std %f0,168(%r11) ste %f2,160(%r11) ste %f0,156(%r11) mvc 96(4,%r11),.LC1-.LT0_0(%r13) st %r1,112(%r11) mvc 116(4,%r11),.LC1-.LT0_0(%r13) mvc 120(4,%r11),.LC1-.LT0_0(%r13) mvc 128(4,%r11),.LC1-.LT0_0(%r13) mvc 152(4,%r11),.LC1-.LT0_0(%r13) basr %r14,%r12 icm %r4,15,120(%r11) je .L1 chi %r4,1 je .L43 chi %r4,2 je .L44 chi %r4,3 je .L43 chi %r4,4 je .L45 chi %r4,5 je .L46 chi %r4,6 je .L40 chi %r4,7 je .L40 chi %r4,8 je .L40 chi %r4,9 je .L40 lr %r1,%r4 ahi %r1,-10 cl %r1,.LC4-.LT0_0(%r13) jh .L22 l %r2,104(%r11) l %r3,108(%r11) .L1: l %r4,240(%r11) lm %r6,%r15,208(%r11) br %r4 .L22: chi %r4,12 je .L47 chi %r4,13 je .L48 chi %r4,14 je .L40 chi %r4,15 jne .L1 tm 98(%r11),4 je .L1 l %r1,124(%r11) chi %r1,1 je .L49 chi %r1,2 je .L50 chi %r1,4 je .L51 chi %r1,8 jne .L1 l %r1,116(%r11) l %r3,4(%r1) .L39: l %r2,0(%r1) j .L1 .L51: l %r1,116(%r11) j .L39 .L50: l %r1,116(%r11) lh %r4,0(%r1) lr %r2,%r4 .L41: n %r2,.LC3-.LT0_0(%r13) j .L1 .L49: l %r1,116(%r11) ic %r4,0(%r1) lr %r2,%r4 .L42: n %r2,.LC2-.LT0_0(%r13) j .L1 .L40: l %r2,104(%r11) j .L1 .L48: ld %f0,104(%r11) j .L1 .L47: le %f0,104(%r11) j .L1 .L46: lh %r1,104(%r11) lr %r2,%r1 j .L41 .L45: lh %r2,104(%r11) j .L1 .L43: ic %r1,104(%r11) lr %r2,%r1 j .L42 .L44: icm %r1,8,104(%r11) lr %r2,%r1 sra %r2,24 j .L1 .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-arm64-macos-macro.S0000664000000000000000000000561614665263075016173 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) stp x29, x30, [sp, -256]! adrp x9, GOTPAGE(C(vacall_function)) add x29, sp, 0 add x10, x29, 256 stp s0, s1, [x29, 156] ldr x9, [x9, GOTPAGEOFF(C(vacall_function))] GOTINDIR(x9) stp x0, x1, [x29, 88] stp s2, s3, [x29, 164] stp x10, xzr, [x29, 40] stp s4, s5, [x29, 172] str x8, [x29, 72] stp s6, s7, [x29, 180] stp x2, x3, [x29, 104] stp d0, d1, [x29, 192] stp x4, x5, [x29, 120] stp d2, d3, [x29, 208] stp x6, x7, [x29, 136] str wzr, [x29, 24] add x0, x29, 24 str wzr, [x29, 56] str wzr, [x29, 80] str wzr, [x29, 152] stp d4, d5, [x29, 224] stp d6, d7, [x29, 240] blr x9 ldr w9, [x29, 56] cbz w9, L(1) cmp w9, 1 beq L(25) cmp w9, 2 beq L(29) cmp w9, 3 beq L(25) cmp w9, 4 beq L(30) cmp w9, 5 beq L(31) cmp w9, 6 beq L(32) cmp w9, 7 beq L(33) and w10, w9, -3 cmp w10, 8 beq L(27) cmp w10, 9 beq L(27) cmp w9, 12 beq L(34) cmp w9, 13 beq L(35) cmp w9, 14 beq L(27) cmp w9, 15 bne L(1) ldr w9, [x29, 24] tbz x9, 10, L(1) ldr x9, [x29, 64] sub x10, x9, $1 cmp x10, 15 bhi L(1) ldr x11, [x29, 48] cmp x9, 8 and x10, x11, 7 and x11, x11, -8 add x9, x9, x10 bhi L(15) cmp x9, 8 lsl w9, w9, 3 bhi L(16) mov x12, 2 sub w9, w9, $1 lsl x9, x12, x9 ldr x11, [x11] sub x9, x9, $1 lsl w10, w10, 3 and x9, x9, x11 asr x0, x9, x10 L(1): ldp x29, x30, [sp], 256 ret .p2align 3 L(25): ldrb w0, [x29, 32] ldp x29, x30, [sp], 256 ret .p2align 3 L(27): ldr x0, [x29, 32] b L(1) .p2align 3 L(29): ldrsb x0, [x29, 32] b L(1) .p2align 3 L(30): ldrsh x0, [x29, 32] b L(1) .p2align 3 L(31): ldrh w0, [x29, 32] b L(1) .p2align 3 L(32): ldrsw x0, [x29, 32] b L(1) .p2align 3 L(33): ldr w0, [x29, 32] b L(1) L(34): ldr s0, [x29, 32] b L(1) L(35): ldr d0, [x29, 32] b L(1) L(15): cmp x9, 16 lsl w9, w9, 3 bls L(36) mov x13, 2 sub w9, w9, $129 ldp x14, x12, [x11, 8] lsl x9, x13, x9 lsl w15, w10, 3 sub x9, x9, $1 neg w10, w10, lsl 3 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 lsl x16, x14, x10 asr x11, x11, x15 asr x14, x14, x15 lsl x10, x9, x10 orr x0, x11, x16 orr x1, x10, x14 b L(1) L(16): mov w13, -8 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x9, x11 b L(1) L(36): mov w13, -4 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 32 and x9, x9, x12 asr x1, x9, x15 lsl x9, x9, x10 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x11, x9 b L(1) FUNEND(vacall_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/vacall/vacall-m68k.motorola.S0000664000000000000000000000504214665263072015451 00000000000000#include "asm-m68k.h" .text .align 2 .globl C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) link.w %a6,#-32 movm.l #0x3030,-(%sp) clr.l -32(%a6) lea (8,%a6),%a2 move.l %a2,-20(%a6) clr.l -16(%a6) clr.l -12(%a6) move.l %a1,-4(%a6) pea -32(%a6) move.l C(vacall_function),%a2 jbsr (%a2) addq.l #4,%sp move.l -12(%a6),%a3 tst.l %a3 jbeq L(1) moveq.l #1,%d2 cmp.l %a3,%d2 jbeq L(46) moveq.l #2,%d3 cmp.l %a3,%d3 jbeq L(46) moveq.l #3,%d2 cmp.l %a3,%d2 jbeq L(47) moveq.l #4,%d3 cmp.l %a3,%d3 jbeq L(48) moveq.l #5,%d2 cmp.l %a3,%d2 jbeq L(49) moveq.l #6,%d3 cmp.l %a3,%d3 jbeq L(45) moveq.l #7,%d2 cmp.l %a3,%d2 jbeq L(45) moveq.l #8,%d3 cmp.l %a3,%d3 jbeq L(45) moveq.l #9,%d2 cmp.l %a3,%d2 jbeq L(45) lea (-10,%a3),%a2 moveq.l #1,%d3 cmp.l %a2,%d3 jbcs L(22) move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra L(1) .align 2 L(22): moveq.l #12,%d2 cmp.l %a3,%d2 jbeq L(50) moveq.l #13,%d2 cmp.l %a3,%d2 jbeq L(51) moveq.l #14,%d3 cmp.l %a3,%d3 jbeq L(52) moveq.l #15,%d2 cmp.l %a3,%d2 jbne L(1) btst #2,-30(%a6) jbeq L(1) move.l -8(%a6),%d2 moveq.l #1,%d3 cmp.l %d2,%d3 jbeq L(53) moveq.l #2,%d3 cmp.l %d2,%d3 jbeq L(54) moveq.l #4,%d3 cmp.l %d2,%d3 jbeq L(55) moveq.l #8,%d3 cmp.l %d2,%d3 jbne L(1) move.l -16(%a6),%a2 move.l (%a2),%d0 move.l 4(%a2),%d1 jbra L(1) .align 2 L(55): move.l -16(%a6),%a2 move.l (%a2),%d0 jbra L(1) .align 2 L(54): move.l -16(%a6),%a2 clr.l %d0 move.w (%a2),%d0 jbra L(1) .align 2 L(53): move.l -16(%a6),%a2 clr.l %d0 move.b (%a2),%d0 jbra L(1) .align 2 L(52): move.l -28(%a6),%d0 move.l %d0,%a0 jbra L(1) .align 2 L(51): btst #6,-29(%a6) jbeq L(31) fmove.d -28(%a6),%fp0 jbra L(1) .align 2 L(31): move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra L(1) .align 2 L(50): move.l -32(%a6),%d2 btst #6,%d2 jbeq L(25) fmove.s -28(%a6),%fp0 jbra L(1) .align 2 L(25): btst #5,%d2 jbeq L(27) fmove.s -28(%a6),%fp1 fmove.d %fp1,-(%sp) move.l (%sp)+,%d0 move.l (%sp)+,%d1 jbra L(1) .align 2 L(27): move.l -28(%a6),%d0 jbra L(1) .align 2 L(45): move.l -28(%a6),%d0 jbra L(1) .align 2 L(49): clr.l %d0 move.w -28(%a6),%d0 jbra L(1) .align 2 L(48): move.w -28(%a6),%d0 ext.l %d0 jbra L(1) .align 2 L(47): clr.l %d0 move.b -28(%a6),%d0 jbra L(1) .align 2 L(46): move.b -28(%a6),%d0 extb.l %d0 L(1): movm.l -48(%a6),#0xc0c unlk %a6 rts L(fe1): FUNEND(vacall_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-mips64eb-linux.s0000664000000000000000000001163614665263073015666 00000000000000 .file 1 "vacall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,272,$31 # vars= 160, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $28,184($sp) lui $28,%hi(%neg(%gp_rel(vacall_receiver))) daddu $28,$28,$25 daddiu $28,$28,%lo(%neg(%gp_rel(vacall_receiver))) ld $12,%got_disp(vacall_function)($28) sd $fp,192($sp) move $fp,$sp ld $25,0($12) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $4,208($fp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) swc1 $f19,88($fp) move $4,$fp sw $0,0($fp) sd $12,24($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L46 li $13,4 # 0x4 beq $12,$13,.L47 li $13,5 # 0x5 beq $12,$13,.L48 li $13,6 # 0x6 beq $12,$13,.L49 li $13,7 # 0x7 beq $12,$13,.L50 li $13,8 # 0x8 beq $12,$13,.L44 li $13,9 # 0x9 beq $12,$13,.L44 li $13,10 # 0xa beq $12,$13,.L44 li $13,11 # 0xb beq $12,$13,.L44 li $13,12 # 0xc beq $12,$13,.L51 li $13,13 # 0xd beq $12,$13,.L52 li $13,14 # 0xe beq $12,$13,.L44 li $13,15 # 0xf bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 # 0x1 beq $12,$13,.L53 li $13,2 # 0x2 beq $12,$13,.L54 li $13,4 # 0x4 beq $12,$13,.L55 li $13,8 # 0x8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $24,-8 # 0xfffffffffffffff8 sltu $25,$14,9 andi $15,$13,0x7 and $24,$13,$24 beq $25,$0,.L24 daddu $13,$14,$15 sltu $25,$13,9 sll $13,$13,0 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($24) sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $13,$24,$13 and $13,$13,$25 sll $15,$15,3 dsll $2,$13,$15 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $14,$13,.L56 li $13,8 # 0x8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 # 0x10 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $14,$12,.L60 li $12,16 # 0x10 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,0 ld $18,8($24) subu $13,$0,$13 move $16,$15 li $25,-1 # 0xffffffffffffffff subu $15,$0,$15 sll $13,$13,3 dsll $13,$25,$13 ld $17,0($24) sll $25,$15,2 addiu $24,$25,32 and $13,$13,$18 sll $15,$16,3 dsra $25,$13,$24 dsll $16,$17,$15 dsra $24,$25,$24 or $2,$16,$24 b .L23 dsll $3,$13,$15 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($24) subu $13,$0,$13 ld $16,8($24) ld $17,0($24) subu $25,$0,$15 sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $24,$24,$13 sll $25,$25,3 sll $15,$15,3 addiu $25,$25,64 and $13,$24,$18 dsra $13,$13,$25 dsll $24,$17,$15 dsra $17,$16,$25 dsll $15,$16,$15 or $2,$24,$17 b .L23 or $3,$13,$15 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($24) ld $25,0($24) sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $13,$24,$13 subu $24,$0,$15 and $13,$13,$16 sll $24,$24,3 sll $15,$15,3 dsra $13,$13,$24 dsll $15,$25,$15 b .L23 or $2,$13,$15 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/vacall-mipsel-macro.S0000664000000000000000000000721114665263073015422 00000000000000#include "asm-mips.h" .file 1 "vacall-mips.c" .text .align 2 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,104,$31 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) la $8,vacall_function sw $4,104($fp) lw $25,0($8) addiu $4,$fp,104 sw $4,40($fp) addiu $4,$fp,120 sw $4,56($fp) .cprestore 16 addiu $4,$fp,24 sw $5,108($fp) sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall-armhf.c0000664000000000000000000001446214662613007014146 00000000000000/* vacall function for arm CPU with -mfloat-abi=hard */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t; #endif /* armhf passes up to 16 float arguments and up to 8 double arguments in floating-point registers. */ register float farg0 __asm__("s0"); register float farg1 __asm__("s1"); register float farg2 __asm__("s2"); register float farg3 __asm__("s3"); register float farg4 __asm__("s4"); register float farg5 __asm__("s5"); register float farg6 __asm__("s6"); register float farg7 __asm__("s7"); register float farg8 __asm__("s8"); register float farg9 __asm__("s9"); register float farg10 __asm__("s10"); register float farg11 __asm__("s11"); register float farg12 __asm__("s12"); register float farg13 __asm__("s13"); register float farg14 __asm__("s14"); register float farg15 __asm__("s15"); register double darg0 __asm__("d0"); /* overlaps s0,s1 */ register double darg1 __asm__("d1"); /* overlaps s2,s3 */ register double darg2 __asm__("d2"); /* overlaps s4,s5 */ register double darg3 __asm__("d3"); /* overlaps s6,s7 */ register double darg4 __asm__("d4"); /* overlaps s8,s9 */ register double darg5 __asm__("d5"); /* overlaps s10,s11 */ register double darg6 __asm__("d6"); /* overlaps s12,s13 */ register double darg7 __asm__("d7"); /* overlaps s14,s15 */ register __varword iret __asm__("r0"); register __varword iret2 __asm__("r1"); register float fret __asm__("s0"); register double dret __asm__("d0"); #ifndef REENTRANT /* The ARM ABI requires that the first 4 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, sp, retaddr, pc} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* r0 */ __vaword word2; /* r1 */ __vaword word3; /* r2 */ __vaword word4; /* r3 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) #else /* REENTRANT */ /* The first 4 general-purpose argument words have already been pushed to the stack by the trampoline. We can ignore them here. */ void /* the return type is variable, not void! */ vacall_receiver (__vaword ignored1, __vaword ignored2, __vaword ignored3, __vaword ignored4, env_t* env, __vaword filler, __vaword saved_fp, __vaword saved_sp, __vaword saved_lr, __vaword saved_pc, __vaword firstword) #endif { __va_alist list; /* Save the floating point argument registers. */ list.farg[0] = farg0; list.farg[1] = farg1; list.farg[2] = farg2; list.farg[3] = farg3; list.farg[4] = farg4; list.farg[5] = farg5; list.farg[6] = farg6; list.farg[7] = farg7; list.farg[8] = farg8; list.farg[9] = farg9; list.farg[10] = farg10; list.farg[11] = farg11; list.farg[12] = farg12; list.farg[13] = farg13; list.farg[14] = farg14; list.farg[15] = farg15; list.darg[0] = darg0; list.darg[1] = darg1; list.darg[2] = darg2; list.darg[3] = darg3; list.darg[4] = darg4; list.darg[5] = darg5; list.darg[6] = darg6; list.darg[7] = darg7; /* Prepare the va_alist. */ list.flags = 0; #ifndef REENTRANT list.iarg = (__vaword*)&gpargs; #else /* REENTRANT */ list.iarg = (__vaword*)&firstword; #endif list.aptr = (long)(list.iarg + __VA_IARG_NUM); list.ianum = 0; list.fanum = 0; list.raddr = (void*)0; list.rtype = __VAvoid; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* NB: On arm, all structure sizes are divisible by 4. */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { /* can't occur */ iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { /* can't occur */ iret = *(unsigned short *) list.raddr; } else iret = *(unsigned int *) list.raddr; /* struct of size 3 :) */ } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-powerpc-macos.s0000664000000000000000000000527214665263075015660 00000000000000.text .align 2 .globl _vacall_receiver _vacall_receiver: mflr r0 stmw r29,-12(r1) bcl 20,31,L1$pb L1$pb: stw r0,8(r1) mflr r31 stwu r1,-224(r1) addis r29,r31,ha16(L_vacall_function$non_lazy_ptr-L1$pb) li r11,0 lwz r29,lo16(L_vacall_function$non_lazy_ptr-L1$pb)(r29) mr r30,r1 addi r0,r30,248 stw r3,248(r30) lwz r29,0(r29) addi r3,r30,64 stw r9,272(r30) stw r5,256(r30) mtctr r29 stw r6,260(r30) stw r7,264(r30) stw r8,268(r30) stw r10,276(r30) stw r0,80(r30) stw r11,96(r30) stw r4,252(r30) stfd f1,100(r30) stfd f2,108(r30) stfd f3,116(r30) stfd f4,124(r30) stfd f5,132(r30) stfd f6,140(r30) stfd f7,148(r30) stfd f8,156(r30) stfd f9,164(r30) stfd f10,172(r30) stfd f11,180(r30) stfd f12,188(r30) stfd f13,196(r30) stw r11,64(r30) stw r11,84(r30) stw r11,88(r30) bctrl lwz r9,88(r30) cmpwi cr0,r9,0 beq- cr0,L1 cmpwi cr0,r9,1 beq- cr0,L41 cmpwi cr0,r9,2 beq- cr0,L41 cmpwi cr0,r9,3 beq- cr0,L42 cmpwi cr0,r9,4 beq- cr0,L43 cmpwi cr0,r9,5 beq- cr0,L44 cmpwi cr0,r9,6 beq- cr0,L40 cmpwi cr0,r9,7 beq- cr0,L40 cmpwi cr0,r9,8 beq- cr0,L40 cmpwi cr0,r9,9 beq- cr0,L40 addi r0,r9,-10 cmplwi cr0,r0,1 bgt- cr0,L22 lwz r3,72(r30) lwz r4,76(r30) L1: lwz r1,0(r1) lwz r0,8(r1) lmw r29,-12(r1) mtlr r0 blr L22: cmpwi cr0,r9,12 beq- cr0,L45 cmpwi cr0,r9,13 beq- cr0,L46 cmpwi cr0,r9,14 beq- cr0,L40 cmpwi cr0,r9,15 bne+ cr0,L1 lwz r0,64(r30) andi. r9,r0,1024 beq- cr0,L1 lwz r9,92(r30) addi r0,r9,-1 cmplwi cr0,r0,7 bgt- cr0,L1 lwz r0,84(r30) cmplwi cr0,r9,4 rlwinm r10,r0,0,30,31 rlwinm r6,r0,0,0,29 add r7,r10,r9 bgt- cr0,L33 slwi r0,r10,3 cmplwi cr0,r7,4 subfic r0,r0,31 li r9,2 slw r9,r9,r0 addi r8,r9,-1 bgt- cr0,L34 lwz r9,0(r6) slwi r0,r7,3 subfic r0,r0,32 and r9,r9,r8 sraw r3,r9,r0 b L1 L34: lwz r0,0(r6) slwi r9,r7,3 lwz r11,4(r6) subfic r10,r9,64 and r0,r0,r8 addi r9,r9,-32 slw r0,r0,r9 sraw r11,r11,r10 L39: or r3,r11,r0 b L1 L33: slwi r0,r10,3 cmplwi cr0,r7,8 subfic r0,r0,31 li r9,2 slw r9,r9,r0 addi r5,r9,-1 bgt- cr0,L37 lwz r8,0(r6) slwi r11,r7,2 addi r11,r11,-16 lwz r10,4(r6) and r8,r8,r5 slwi r9,r7,3 subfic r9,r9,64 slw r0,r8,r11 slw r0,r0,r11 sraw r10,r10,r9 or r4,r0,r10 sraw r3,r8,r9 b L1 L37: slwi r9,r7,3 lwz r0,4(r6) lwz r11,0(r6) subfic r7,r9,96 lwz r10,8(r6) addi r9,r9,-64 slw r8,r0,r9 and r11,r11,r5 sraw r10,r10,r7 slw r11,r11,r9 sraw r0,r0,r7 or r4,r8,r10 b L39 L40: lwz r3,72(r30) b L1 L46: lfd f1,72(r30) b L1 L45: lfs f1,72(r30) b L1 L44: lhz r3,72(r30) b L1 L43: lha r3,72(r30) b L1 L42: lbz r3,72(r30) b L1 L41: lbz r0,72(r30) extsb r3,r0 b L1 .data .non_lazy_symbol_pointer L_vacall_function$non_lazy_ptr: .indirect_symbol _vacall_function .long 0 libffcall-2.5/vacall/vacall-i386.c0000664000000000000000000001250514662613007013536 00000000000000/* vacall function for i386 CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t; register env_t* env __asm__("%ecx"); #endif register void* sp __asm__("%esp"); register void* sret __asm__("%ebx"); register int iret __asm__("%eax"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword firstword) { __va_alist list; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = sret; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { /* This code is EXTREMELY fragile!! */ /* It depends on the register allocation chosen by gcc. */ iret = ((__varword *) &list.tmp._longlong)[0]; asm volatile ("movl %0,%%edx" : : "g"(((__varword *) &list.tmp._longlong)[1])); } else if (list.rtype == __VAfloat) { asm volatile ("flds %0": : "m"(list.tmp._float)); } else if (list.rtype == __VAdouble) { asm volatile ("fldl %0": : "m"(list.tmp._double)); } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; goto done; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; goto done; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; goto done; } else if (list.rsize == 2*sizeof(__varword)) { /* This code is EXTREMELY fragile!! */ /* It depends on the register allocation chosen by gcc. */ iret = ((__varword *) list.raddr)[0]; asm volatile ("movl %0,%%edx" : : "g"(((__varword *) list.raddr)[1])); goto done; } } /* On MSVC and on FreeBSD, must put the structure address into %eax. For the other platforms, it does not matter, but doesn't hurt either. */ iret = (long) list.raddr; if (!(list.flags & __VA_MSVC_STRUCT_RETURN)) { /* We have to pop the struct return address off the stack. */ /* Callers compiled with -fomit-frame-pointer expect this. */ /* Return via a "ret $4" instruction. */ /* NOTE: This is EXTREMELY fragile. We must use the same return sequence * as the one generated by GCC, except that we use a "ret $4" instruction * in place of the "ret" instruction. Look at the 'pushl' instructions * at the beginning of the generated code and at the sequence of * instructions right before the generated "ret" instruction. */ #ifdef REENTRANT asm volatile ("leal -8(%ebp), %esp"); asm volatile ("popl %esi"); asm volatile ("popl %edi"); asm volatile ("leave"); #else asm volatile ("leal -4(%ebp), %esp"); asm volatile ("popl %esi"); asm volatile ("leave"); #endif asm volatile ("ret $4"); /*NOTREACHED*/ } done: ; } if (list.flags & __VA_STDCALL_CLEANUP) { /* Return, and at the same time pop the arguments off the stack. */ /* Normally done through a "ret $n" instruction. */ /* Be careful not to clobber %eax and %edx. Only %ecx can be used. */ /* Use *__builtin_frame_address(0), since __builtin_return_address(0) * is buggy in gcc-2.7.2. */ asm volatile ("movl %0,%%ecx" : : "g" (*(void**)__builtin_frame_address(0))); sp = (void*)list.aptr; asm volatile ("jmp *%ecx"); /*NOTREACHED*/ } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-internal.h0000664000000000000000000016724514662613237014707 00000000000000/* * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _VACALL_INTERNAL_H #define _VACALL_INTERNAL_H /* Get intptr_t, uintptr_t. */ #include "ffcall-stdint.h" /* Include the public definitions, */ #ifndef REENTRANT #include "vacall.h" #else #include "vacall_r.h" #endif /* The platform indicator symbols (__i386__, etc.) come from - "config.h" when compiling vacall-libapi.c, - the GCC command line options when compiling vacall-$(CPU).c. */ /* These two variants of powerpc ABIs are quite different. */ #if defined(__powerpc__) && !defined(__powerpc64__) #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) #define __powerpc_aix__ 1 #else #define __powerpc_sysv4__ 1 #endif #endif /* The Unix and Windows variants of x86_64 ABIs are quite different. */ #if defined(__x86_64__) #if defined(_WIN32) || defined(__CYGWIN__) #define __x86_64_ms__ 1 #else #define __x86_64_sysv__ 1 #endif #endif /* Max # words in temporary structure storage. */ #ifndef __VA_ALIST_WORDS #define __VA_ALIST_WORDS 256 #endif /* * Definition of the ‘__va_alist’ type. */ /* Note: This struct must not contain members of type 'long' or 'unsigned long', because in the mingw port we use precompiled code that assumes 'long' is 64-bit whereas avcall-libapi.c is then compiled by a compiler that has a 32-bit 'long' type. */ typedef struct vacall_alist { /* some va_... macros need these flags */ int flags; /* temporary storage for return value */ #if defined(__i386__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__) && defined(__MACH__) && defined(__APPLE__)) /* Filler word, needed if the numbers of words up to now in this structure */ /* is odd. */ /* - On MSVC, alignof(double) = 8, but normally on i386 it is = 4. */ /* - On ARM, GCC 3.1 produces code for an ABI where alignof(double) = 4 */ /* and alignof(long long) = 4. But in the newer AAPCS ABI, these */ /* alignments are 8. */ /* - On Mac OS X, the Apple compiler has alignof(double) = 8 whereas the */ /* standard GCC has alignof(double) = 4. */ __vaword filler1; #endif union { char _char; signed char _schar; unsigned char _uchar; short _short; unsigned short _ushort; int _int; unsigned int _uint; long _long; unsigned long _ulong; #if !(defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || defined(__riscv64__) || defined(__loongarch64__)) long long _longlong; unsigned long long _ulonglong; #endif float _float; double _double; void* _ptr; __vaword _words[2]; } tmp; /* current pointer into the argument array */ uintptr_t aptr; /* structure return pointer, return type, return type size */ void* raddr; enum __VAtype rtype; uintptr_t rsize; #if defined(__i386__) || defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__) void* structraddr; #endif #if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || defined(__alpha__) || defined(__hppa__) || defined(__hppa64__) uintptr_t memargptr; #endif #if defined(__alpha__) long farg_offset; double farg[6]; #endif #if defined(__hppa__) && !defined(__hppa64__) long farg_offset; long darg_offset; float farg[4]; double darg[2]; #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) unsigned int anum; #define __VA_FARG_NUM 2 unsigned int fanum; float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__mipsn32__) || defined(__mips64__) int anum; #define __VA_FARG_NUM 8 float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__sparc64__) int anum; float farg[16]; double darg[16]; #endif #if defined(__hppa64__) #define __VA_FARG_NUM 8 float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__armhf__) #define __VA_IARG_NUM 4 /* The first __AV_IARG_NUM integer arguments are passed in registers, even if some floating-point arguments have already been allocated on the stack. */ __vaword* iarg; unsigned int ianum; unsigned int fanum; float farg[16]; double darg[8]; #endif #if defined(__arm64__) #define __VA_IARG_NUM 8 unsigned int ianum; __varword iarg[__VA_IARG_NUM]; #define __VA_FARG_NUM 8 unsigned int fanum; float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__powerpc__) || defined(__powerpc64__) #if defined(__powerpc_sysv4__) #define __VA_IARG_NUM 8 unsigned int ianum; __varword iarg[__VA_IARG_NUM]; #define __VA_FARG_NUM 8 #else #define __VA_FARG_NUM 13 #endif unsigned int fanum; double farg[__VA_FARG_NUM]; #endif #if defined(__ia64__) __vaword* saptr; #define __VA_FARG_NUM 8 unsigned int fanum; double farg[__VA_FARG_NUM]; #endif #if defined(__x86_64_sysv__) #define __VA_FARG_NUM 8 unsigned int fanum; double farg[__VA_FARG_NUM]; #define __VA_IARG_NUM 6 unsigned int ianum; __varword iarg[__VA_IARG_NUM]; #endif #if defined(__x86_64_ms__) int anum; #define __VA_FARG_NUM 4 float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__s390__) && !defined(__s390x__) #define __VA_IARG_NUM 5 unsigned int ianum; __varword iarg[5]; #define __VA_FARG_NUM 2 unsigned int fanum; float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__s390x__) #define __VA_IARG_NUM 5 unsigned int ianum; __varword iarg[__VA_IARG_NUM]; #define __VA_FARG_NUM 4 unsigned int fanum; float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) #define __VA_IARG_NUM 8 unsigned int ianum; __varword iarg[__VA_IARG_NUM]; /* Note: iarg[7] == ((__vaword *) (initial aptr))[-1]. */ #define __VA_FARG_NUM 8 unsigned int fanum; float farg[__VA_FARG_NUM]; double darg[__VA_FARG_NUM]; #endif } __va_alist; /* Avoid macro redefinition warnings on DragonFly BSD. */ #undef __va_start #undef __va_arg /* * Definition of the va_start_xxx macros. */ #define __va_start(LIST,RETTYPE,FLAGS) \ ((LIST)->flags = (FLAGS), \ (LIST)->rtype = (RETTYPE) \ ) /* * va_start_struct: Preparing structure return. */ #define __va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,FLAGS) \ (__va_start(LIST,__VAstruct,FLAGS), \ (LIST)->rsize = (TYPE_SIZE), \ ((LIST)->flags & __VA_SUNPROCC_STRUCT_RETURN \ ? __va_start_struct2(LIST) \ : ((LIST)->flags & __VA_SUNCC_STRUCT_RETURN \ ? ((TYPE_SIZE) <= sizeof(vacall_struct_buffer) || (vacall_error_struct_too_large(TYPE_SIZE), 0), \ (LIST)->raddr = &vacall_struct_buffer, \ 0 \ ) \ : (((LIST)->flags & __VA_SMALL_STRUCT_RETURN) \ && __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ? ((LIST)->raddr = &(LIST)->tmp, \ __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ) \ : __va_start_struct2(LIST) \ )) ) ) /* Determines whether a structure is returned in registers, * depending on its size and its word-splittable flag. */ #if (defined(__i386__) && defined(_WIN32)) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 \ || ((TYPE_SIZE) == 8 \ && (((LIST)->flags & __VA_MSVC_STRUCT_RETURN) \ || ((TYPE_SPLITTABLE) \ && ((LIST)->flags & __VA_GCC_STRUCT_RETURN) \ ) ) ) ) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0) #endif #if (defined(__i386__) && !defined(_WIN32)) || defined(__m68k__) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__s390__) && !defined(__s390x__)) #if (defined(__powerpc__) && !defined(__powerpc64__) && (defined(__FreeBSD__) || defined(__DragonFly__) || defined(__NetBSD__))) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 8) #else #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 \ || ((TYPE_SIZE) == 8 && (TYPE_SPLITTABLE) \ && ((LIST)->flags & __VA_GCC_STRUCT_RETURN) \ ) ) #endif /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__arm__) || defined(__armhf__) /* structs of size 3 also will be returned in register */ #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 4) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0) #endif #if defined(__alpha__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \ || ((TYPE_SIZE) == 16 && (TYPE_SPLITTABLE) \ && ((LIST)->flags & __VA_GCC_STRUCT_RETURN) \ ) ) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, 0) #endif #if (defined(__hppa__) && !defined(__hppa64__)) || defined(__riscv32__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 8) /* Test __VA_SMALL_STRUCT_RETURN at run time. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ 0 #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) || (defined(__sparc__) && !defined(__sparc64__)) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4) /* Test __VA_SMALL_STRUCT_RETURN instead of __VA_REGISTER_STRUCT_RETURN. */ #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->anum++, \ 0 \ ) #else #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ 0 #endif #endif #if defined(__mipsn32__) || defined(__mips64__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((LIST)->flags & __VA_GCC_STRUCT_RETURN \ ? ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) \ : ((TYPE_SIZE) <= 16) \ ) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. Also turn on * __VA_REGISTER_FLOATSTRUCT_RETURN or __VA_REGISTER_DOUBLESTRUCT_RETURN if * the struct will be returned in floating-point registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, \ (TYPE_ALIGN) == sizeof(float) && (TYPE_SPLITTABLE) \ && ((TYPE_SIZE) == sizeof(float) || (TYPE_SIZE) == 2*sizeof(float)) \ && ((LIST)->flags |= __VA_REGISTER_FLOATSTRUCT_RETURN), \ (TYPE_ALIGN) == sizeof(double) && (TYPE_SPLITTABLE) \ && ((TYPE_SIZE) == sizeof(double) || (TYPE_SIZE) == 2*sizeof(double)) \ && ((LIST)->flags |= __VA_REGISTER_DOUBLESTRUCT_RETURN), \ 0) #endif #if (defined(__powerpc64__) && !defined(__powerpc64_elfv2__)) || defined(__s390x__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ 0 #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ 0 #endif #if defined(__sparc64__) || defined(__ia64__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 32) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, \ 0) #endif #if defined(__hppa64__) || defined(__arm64__) || (defined(__powerpc64__) && defined(__powerpc64_elfv2__)) || defined(__x86_64_sysv__) || defined(__riscv64__) || defined(__loongarch64__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) <= 16) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, \ 0) #endif #if defined(__x86_64_ms__) #define __va_reg_struct_return(LIST,TYPE_SIZE,TYPE_SPLITTABLE) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8) /* Turn on __VA_REGISTER_STRUCT_RETURN if __VA_SMALL_STRUCT_RETURN was set * and the struct will actually be returned in registers. */ #define __va_start_struct1(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ ((LIST)->flags |= __VA_REGISTER_STRUCT_RETURN, \ 0) #endif /* * Preparing structure return in memory. */ #if defined(__i386__) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__powerpc_aix__) || defined(__powerpc64__) /* Return structure pointer is passed as first arg. */ #define __va_start_struct2(LIST) \ ((LIST)->raddr = *(void* *)((LIST)->aptr), \ (LIST)->aptr += sizeof(void*), \ 0 \ ) #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__) /* Return structure pointer is passed as first arg. */ #define __va_start_struct2(LIST) \ ((LIST)->raddr = *(void* *)((LIST)->aptr), \ (LIST)->aptr += sizeof(void*), \ (LIST)->anum++, \ 0 \ ) #endif #if defined(__armhf__) /* Return structure pointer is passed as first arg. */ #define __va_start_struct2(LIST) \ ((LIST)->raddr = (void*)(LIST)->iarg[(LIST)->ianum], \ (LIST)->ianum++, \ 0 \ ) #endif #if defined(__powerpc_sysv4__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* Return structure pointer is passed as first arg. */ #define __va_start_struct2(LIST) \ ((LIST)->raddr = (void*)((LIST)->iarg[(LIST)->ianum++]), \ 0 \ ) #endif #if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__hppa__) || defined(__hppa64__) || defined(__arm64__) || defined(__ia64__) /* Return structure pointer is passed in a special register. */ #define __va_start_struct2(LIST) \ ((LIST)->raddr = (LIST)->structraddr, 0) #endif /* * Definition of the va_arg_xxx macros. */ /* Padding of non-struct arguments. */ #define __va_argsize(TYPE_SIZE) \ (((TYPE_SIZE) + sizeof(__vaword)-1) & -(intptr_t)sizeof(__vaword)) #if defined(__i386__) || defined(__m68k__) || (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) || (defined(__sparc__) && !defined(__sparc64__)) || defined(__alpha__) || (defined(__arm__) && !defined(__armhf__)) || defined(__arm64__) || defined(__powerpc_aix__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64_sysv__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* args grow up */ /* small structures < 1 word are adjusted depending on compiler */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - __va_argsize(TYPE_SIZE) \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword) \ ? (TYPE_SIZE) \ : __va_argsize(TYPE_SIZE) \ ) \ ) #endif #if defined(__armhf__) /* args grow up */ /* small structures < 1 word are adjusted depending on compiler */ /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword), \ (char*)&(LIST)->iarg[(LIST)->ianum] \ ) \ : (((LIST)->aptr == (uintptr_t)&(LIST)->iarg[__VA_IARG_NUM] \ ? /* split case */ \ ((LIST)->aptr = (uintptr_t)&(LIST)->iarg[(LIST)->ianum] + __va_argsize(TYPE_SIZE), \ 0) \ : ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ 0)), \ (LIST)->ianum = __VA_IARG_NUM, \ (char*)(LIST)->aptr \ ) ) \ - __va_argsize(TYPE_SIZE) \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__vaword)-1) / sizeof(__vaword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__vaword), \ (char*)&(LIST)->iarg[(LIST)->ianum] \ ) \ : (((LIST)->aptr == (uintptr_t)&(LIST)->iarg[__VA_IARG_NUM] \ ? /* split case */ \ ((LIST)->aptr = (uintptr_t)&(LIST)->iarg[(LIST)->ianum] + __va_argsize(TYPE_SIZE), \ 0) \ : ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ 0)), \ (LIST)->ianum = __VA_IARG_NUM, \ (char*)(LIST)->aptr \ ) ) \ - ((TYPE_SIZE) < sizeof(__vaword) \ ? (TYPE_SIZE) \ : __va_argsize(TYPE_SIZE) \ ) \ ) #endif #if defined(__powerpc_sysv4__) /* args grow up */ /* small structures < 1 word are adjusted depending on compiler */ /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__varword), \ (char*)&(LIST)->iarg[(LIST)->ianum] \ ) \ : ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ (char*)(LIST)->aptr \ ) ) \ - __va_argsize(TYPE_SIZE) \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += __va_argsize(TYPE_SIZE) / sizeof(__varword), \ (char*)&(LIST)->iarg[(LIST)->ianum] \ ) \ : ((LIST)->aptr += __va_argsize(TYPE_SIZE), \ (char*)(LIST)->aptr \ ) ) \ - ((TYPE_SIZE) < sizeof(__vaword) \ ? (TYPE_SIZE) \ : __va_argsize(TYPE_SIZE) \ ) \ ) #endif #if defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__x86_64_ms__) /* args grow up */ /* small structures < 1 word are adjusted depending on compiler */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->anum += __va_argsize(TYPE_SIZE)/sizeof(__vaword), \ (LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - __va_argsize(TYPE_SIZE) \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->anum += __va_argsize(TYPE_SIZE)/sizeof(__vaword), \ (LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword) \ ? (TYPE_SIZE) \ : __va_argsize(TYPE_SIZE) \ ) \ ) #endif #if defined(__hppa__) && !defined(__hppa64__) /* args grow down */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->aptr = (LIST)->aptr - __va_argsize(TYPE_SIZE), \ ((TYPE_SIZE) > 4 && ((LIST)->aptr &= -8)), \ (LIST)->aptr \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->aptr = (LIST)->aptr - __va_argsize(TYPE_SIZE), \ ((TYPE_SIZE) > 4 && ((LIST)->aptr &= -8)), \ (LIST)->aptr + ((-(TYPE_SIZE)) & 3) \ ) #endif #if defined(__hppa64__) /* args grow up */ #define __va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((TYPE_SIZE) > 8 && ((LIST)->aptr = (((LIST)->aptr +15) & -16))), \ (LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - __va_argsize(TYPE_SIZE) \ ) #define __va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((TYPE_SIZE) > 8 && ((LIST)->aptr = (((LIST)->aptr +15) & -16))), \ (LIST)->aptr += __va_argsize(TYPE_SIZE), \ (LIST)->aptr - ((TYPE_SIZE) < sizeof(__vaword) \ ? (TYPE_SIZE) \ : __va_argsize(TYPE_SIZE) \ ) \ ) #endif #if defined(__i386__) || ((defined(__mipsn32__) || defined(__mips64__)) && defined(_MIPSEL)) || defined(__alpha__) || ((defined(__arm__) || defined(__armhf__)) && defined(__ARMEL__)) || defined(__ia64__) || (defined(__powerpc64__) && defined(__LITTLE_ENDIAN__)) || defined(__x86_64_ms__) /* little endian -> small args < 1 word are adjusted to the left */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) #endif #if defined(__m68k__) || ((defined(__mipsn32__) || defined(__mips64__)) && defined(_MIPSEB)) || defined(__sparc__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || ((defined(__arm__) || defined(__armhf__)) && !defined(__ARMEL__)) || (defined(__powerpc__) && !defined(__powerpc64__)) || (defined(__powerpc64__) && defined(__BIG_ENDIAN__)) /* big endian -> small args < 1 word are adjusted to the right */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) #ifdef _MIPSEB /* big endian -> small args < 1 word are adjusted to the right */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->anum++, \ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)) #else /* _MIPSEL */ /* little endian -> small args < 1 word are adjusted to the left */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->anum++, \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)) #endif #endif #if defined(__arm64__) /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword), \ &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword)] \ ) \ : ((LIST)->ianum = __VA_IARG_NUM, \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) ) #endif #if defined(__x86_64_sysv__) /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((TYPE_SIZE) <= 2*sizeof(__varword) \ && (LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM) \ ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword), \ &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword)] \ ) \ : (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) #endif #if defined(__s390__) || defined(__s390x__) /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword), \ (void*)((uintptr_t)&(LIST)->iarg[(LIST)->ianum] - (TYPE_SIZE)) \ ) \ : ((LIST)->ianum = __VA_IARG_NUM, \ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) ) #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* the first __VA_IARG_NUM argument words are passed in registers */ #define __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->ianum + ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword) <= __VA_IARG_NUM \ ? ((LIST)->ianum += ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword), \ &(LIST)->iarg[(LIST)->ianum - ((TYPE_SIZE) + sizeof(__varword)-1) / sizeof(__varword)] \ ) \ : (((LIST)->ianum < __VA_IARG_NUM \ ? ((LIST)->aptr -= (__VA_IARG_NUM - (LIST)->ianum) * sizeof(__vaword), \ (LIST)->ianum = __VA_IARG_NUM, \ 0) \ : 0), \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) ) #endif #define __va_arg(LIST,TYPE) \ *(TYPE*)__va_arg_adjusted(LIST,sizeof(TYPE),__VA_alignof(TYPE)) /* Integer arguments. */ #define _va_arg_char(LIST) __va_arg(LIST,char) #define _va_arg_schar(LIST) __va_arg(LIST,signed char) #define _va_arg_uchar(LIST) __va_arg(LIST,unsigned char) #define _va_arg_short(LIST) __va_arg(LIST,short) #define _va_arg_ushort(LIST) __va_arg(LIST,unsigned short) #define _va_arg_int(LIST) __va_arg(LIST,int) #define _va_arg_uint(LIST) __va_arg(LIST,unsigned int) #define _va_arg_long(LIST) __va_arg(LIST,long) #define _va_arg_ulong(LIST) __va_arg(LIST,unsigned long) #if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__VA_LLP64)) || defined(__s390x__) || defined(__riscv64__) || defined(__loongarch64__) /* ‘long long’ and ‘long’ are identical. */ #define _va_arg_longlong _va_arg_long #define _va_arg_ulonglong _va_arg_ulong #elif defined(__mipsn32__) || defined(__x86_64_x32__) || (defined(__x86_64__) && defined(__VA_LLP64)) /* ‘long long’ fits in __vaword. */ #define _va_arg_longlong(LIST) __va_arg(LIST,long long) #define _va_arg_ulonglong(LIST) __va_arg(LIST,unsigned long long) #elif defined(__i386__) || defined(__m68k__) || defined(__mips__) || (defined(__sparc__) && !defined(__sparc64__)) || (defined(__hppa__) && !defined(__hppa64__)) || defined(__arm__) || defined(__armhf__) || defined(__powerpc__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__) /* ‘long long’s are passed embedded on the arg stack. */ #define _va_arg_longlong(LIST) __va_arg_longlong(LIST,long long) #define _va_arg_ulonglong(LIST) __va_arg_longlong(LIST,unsigned long long) #if defined(__i386__) || defined(__m68k__) || defined(__powerpc_aix__) /* ‘long long’s are (at most) word-aligned. */ #define __va_arg_longlong(LIST,TYPE) __va_arg(LIST,TYPE) #endif #if defined(__mips__) || defined(__arm__) /* ‘long long’s have alignment 8. */ #define __va_arg_longlong(LIST,TYPE) \ ((LIST)->aptr = (((LIST)->aptr+__VA_alignof(TYPE)-1) & -(intptr_t)__VA_alignof(TYPE)), \ __va_arg(LIST,TYPE)) #endif #if defined(__armhf__) /* ‘long long’s have alignment 8. */ #define __va_arg_longlong(LIST,TYPE) \ (((LIST)->ianum < __VA_IARG_NUM \ ? ((LIST)->ianum = (((LIST)->ianum+__VA_alignof(TYPE)/sizeof(__vaword)-1) & -(intptr_t)(__VA_alignof(TYPE)/sizeof(__vaword))), 0) \ : ((LIST)->aptr = (((LIST)->aptr+__VA_alignof(TYPE)-1) & -(intptr_t)__VA_alignof(TYPE)), 0) \ ), \ __va_arg(LIST,TYPE)) #endif #if defined(__powerpc_sysv4__) /* ‘long long’s have alignment 8. */ #define __va_arg_longlong(LIST,TYPE) \ (((LIST)->ianum < __VA_IARG_NUM \ ? ((LIST)->ianum = (((LIST)->ianum+__VA_alignof(TYPE)/sizeof(__varword)-1) & -(intptr_t)(__VA_alignof(TYPE)/sizeof(__varword))), 0) \ : ((LIST)->aptr = (((LIST)->aptr+__VA_alignof(TYPE)-1) & -(intptr_t)__VA_alignof(TYPE)), 0) \ ), \ __va_arg(LIST,TYPE)) #endif #if (defined(__s390__) && !defined(__s390x__)) || defined(__riscv32__) /* Within the arg stack, the alignment is only 4, not 8. */ #define __va_arg_longlong(LIST,TYPE) __va_arg(LIST,TYPE) #endif #if (defined(__sparc__) && !defined(__sparc64__)) /* Within the arg stack, the alignment is only 4, not 8. */ /* Beware against unaligned accesses! */ #define __va_arg_longlong(LIST,TYPE) \ ((LIST)->tmp._words[0] = ((__vaword*)((LIST)->aptr))[0], \ (LIST)->tmp._words[1] = ((__vaword*)((LIST)->aptr))[1], \ (LIST)->aptr += sizeof(TYPE), \ (TYPE)((LIST)->tmp._longlong) \ ) #endif #if defined(__hppa__) && !defined(__hppa64__) /* ‘long long’s have alignment 8. */ #define __va_arg_longlong(LIST,TYPE) \ ((LIST)->aptr = ((LIST)->aptr & -(intptr_t)__VA_alignof(TYPE)), \ __va_arg(LIST,TYPE)) #endif #endif /* Floating point arguments. */ #if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || defined(__s390__) || defined(__s390x__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) #define __va_align_double(LIST) #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) || defined(__arm__) || defined(__armhf__) /* __VA_alignof(double) > sizeof(__vaword) */ #define __va_align_double(LIST) \ (LIST)->aptr = ((LIST)->aptr + sizeof(double)-1) & -(intptr_t)sizeof(double), #endif #if defined(__hppa__) && !defined(__hppa64__) #define __va_align_double(LIST) \ (LIST)->aptr = (LIST)->aptr & -(intptr_t)sizeof(double), #endif #if defined(__sparc__) && !defined(__sparc64__) /* Beware against unaligned ‘double’ accesses! */ #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->tmp._words[0] = ((__vaword*)((LIST)->aptr))[0], \ (LIST)->tmp._words[1] = ((__vaword*)((LIST)->aptr))[1], \ (LIST)->aptr += sizeof(double), \ (LIST)->tmp._double \ ) #endif #if defined(__alpha__) /* The first 6 floating point registers have been stored in another place. */ #define _va_arg_double(LIST) \ (((LIST)->aptr += sizeof(double)) <= (LIST)->memargptr \ ? *(double*)((LIST)->aptr - sizeof(double) + (LIST)->farg_offset) \ : *(double*)((LIST)->aptr - sizeof(double)) \ ) #define _va_arg_float(LIST) \ (((LIST)->aptr += sizeof(double)) <= (LIST)->memargptr \ ? /* The first 6 args have been put into memory by "stt" instructions */\ /* (see vacall-alpha.s!). Therefore load them as doubles. */ \ /* When viewed as floats, the value will be the correct one. */ \ (float)*(double*)((LIST)->aptr - sizeof(double) + (LIST)->farg_offset) \ : /* These args have been put into memory by "sts" instructions, */ \ /* therefore load them as floats. */ \ *(float*)((LIST)->aptr - sizeof(double)) \ ) #endif #if defined(__hppa__) && !defined(__hppa64__) /* The floats and doubles among the first 4 argument words are passed * - in both general registers and floating-point registers when the * function call is a variadic one, which means: * - for HP cc: the call is done through a function pointer or * directly to a function declared with a varargs prototype, * - for GCC: the function's type is a varargs function. * - in floating-point registers otherwise. * Since the code in tests.c uses a function pointer, casted to a non-varargs * function type, we are in the first case for HP cc, but in the second case * for GCC. * Therefore we need to take the values from the floating-point registers. */ #define _va_arg_float(LIST) \ (((LIST)->aptr -= sizeof(float)) >= (LIST)->memargptr \ ? /* The first 4 float args are stored separately. */ \ *(float*)((LIST)->aptr + (LIST)->farg_offset) \ : *(float*)((LIST)->aptr) \ ) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (((LIST)->aptr -= sizeof(double)) >= (LIST)->memargptr \ ? /* The first 2 double args are stored separately. */ \ *(double*)((LIST)->aptr + (LIST)->darg_offset) \ : *(double*)((LIST)->aptr) \ )) #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) /* The first 0,1,2 registers are stored elsewhere if they are floating-point * parameters. */ #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(float), \ (LIST)->anum++, \ (LIST)->fanum++, \ ((LIST)->anum == (LIST)->fanum && (LIST)->fanum <= __VA_FARG_NUM \ ? /* only floating-point arguments so far */ \ (LIST)->farg[(LIST)->fanum - 1] \ : *(float*)((LIST)->aptr - sizeof(float)) \ )) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ (LIST)->anum++, \ (LIST)->fanum++, \ ((LIST)->anum == (LIST)->fanum && (LIST)->fanum <= __VA_FARG_NUM \ ? /* only floating-point arguments so far */ \ (LIST)->darg[(LIST)->fanum - 1] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__mipsn32__) || defined(__mips64__) || defined(__x86_64_ms__) /* The first 0,..,8 registers are stored elsewhere if they are floating-point * parameters. */ #define _va_arg_float(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ (++(LIST)->anum <= __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->anum - 1] \ : *(float*)((LIST)->aptr - sizeof(double)) \ )) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ (++(LIST)->anum <= __VA_FARG_NUM \ ? (LIST)->darg[(LIST)->anum - 1] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__sparc64__) /* The first 0,..,16 registers are stored elsewhere if they are floating-point * parameters. */ #define _va_arg_float(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ (++(LIST)->anum <= 16 \ ? (LIST)->farg[(LIST)->anum - 1] \ : *(float*)((LIST)->aptr - sizeof(float)) \ )) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ (++(LIST)->anum <= 16 \ ? (LIST)->darg[(LIST)->anum - 1] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__hppa64__) /* The floating-point arguments among the first 8 argument words have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(double), \ ((LIST)->aptr <= (LIST)->memargptr \ ? (LIST)->farg[__VA_FARG_NUM-1-((LIST)->memargptr - (LIST)->aptr)/sizeof(__vaword)] \ : ((float*)(LIST)->aptr)[-1] \ )) #define _va_arg_double(LIST) \ ((LIST)->aptr += sizeof(double), \ ((LIST)->aptr <= (LIST)->memargptr \ ? (LIST)->darg[__VA_FARG_NUM-1-((LIST)->memargptr - (LIST)->aptr)/sizeof(__vaword)] \ : ((double*)(LIST)->aptr)[-1] \ )) #endif #if defined(__armhf__) #define _va_arg_float(LIST) \ ((LIST)->fanum <= 15 \ ? (LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(float), \ *(float*)((LIST)->aptr - sizeof(float)) \ ) ) #define _va_arg_double(LIST) \ (((LIST)->fanum % 2 ? (LIST)->fanum++ : 0), \ ((LIST)->fanum <= 14 \ ? ((LIST)->fanum += 2, (LIST)->darg[(LIST)->fanum / 2 - 1]) \ : ((LIST)->aptr += sizeof(double), \ *(double*)((LIST)->aptr - sizeof(double)) \ )) ) #endif #if defined(__arm64__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(__vaword), \ *(float*)((LIST)->aptr - sizeof(__vaword)) \ ) ) #define _va_arg_double(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->darg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(double), \ *(double*)((LIST)->aptr - sizeof(double)) \ ) ) #endif #if defined(__powerpc_aix__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(float), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : *(float*)((LIST)->aptr - sizeof(float)) \ )) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__powerpc_sysv4__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(float), \ *(float*)((LIST)->aptr - sizeof(float)) \ ) ) #define _va_arg_double(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ *(double*)((LIST)->aptr - sizeof(double)) \ ) ) #endif #if defined(__powerpc64__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #if defined(_AIX) #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(__vaword), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : ((float*)(LIST)->aptr)[(LIST)->flags & __VA_AIXCC_FLOAT_ARGS ? -2 : -1] \ )) #elif defined(__LITTLE_ENDIAN__) #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(__vaword), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : ((float*)(LIST)->aptr)[-2] \ )) #else /* _BIG_ENDIAN */ #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(__vaword), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : ((float*)(LIST)->aptr)[-1] \ )) #endif #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__ia64__) /* The first 8 floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->aptr += sizeof(__vaword), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (float) (LIST)->farg[(LIST)->fanum++] \ : *(float*)((LIST)->aptr - sizeof(__vaword)) \ )) #define _va_arg_double(LIST) \ (__va_align_double(LIST) \ (LIST)->aptr += sizeof(double), \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : *(double*)((LIST)->aptr - sizeof(double)) \ )) #endif #if defined(__x86_64_sysv__) /* The first 8 floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? *(float*)&(LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(__vaword), \ *(float*)((LIST)->aptr - sizeof(__vaword)) \ ) ) #define _va_arg_double(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(__vaword), \ *(double*)((LIST)->aptr - sizeof(__vaword)) \ ) ) #endif #if defined(__s390__) || defined(__s390x__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(__vaword), \ ((float*)(LIST)->aptr)[-1] \ ) ) #define _va_arg_double(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->darg[(LIST)->fanum++] \ : ((LIST)->aptr += sizeof(double), \ *(double*)((LIST)->aptr - sizeof(double)) \ ) ) #endif #if defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* The first __VA_FARG_NUM floating-point args have been stored elsewhere. */ #define _va_arg_float(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->farg[(LIST)->fanum++] \ : __va_arg((LIST),float) \ ) #define _va_arg_double(LIST) \ ((LIST)->fanum < __VA_FARG_NUM \ ? (LIST)->darg[(LIST)->fanum++] \ : __va_arg((LIST),double) \ ) #endif #ifndef _va_arg_float #define _va_arg_float(LIST) __va_arg(LIST,float) #endif #ifndef _va_arg_double #define _va_arg_double(LIST) \ (__va_align_double(LIST) __va_arg(LIST,double)) #endif /* Pointer arguments. */ #define _va_arg_ptr(LIST) __va_arg(LIST,void*) /* Structure arguments. */ /* Structure argument alignment. */ #if defined(__i386__) && defined(_MSC_VER) /* In MSVC, doubles inside structures have alignment 8, i.e. * __VA_alignof(double) = 8, but doubles (and also structures containing * doubles) are passed on the stack with alignment 4. Looks really weird. */ #define __va_struct_alignment(TYPE_ALIGN) \ ((TYPE_ALIGN) <= 4 ? (TYPE_ALIGN) : 4) #else #define __va_struct_alignment(TYPE_ALIGN) \ (TYPE_ALIGN) #endif #define __va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (LIST)->aptr = ((LIST)->aptr + __va_struct_alignment(TYPE_ALIGN)-1) & -(intptr_t)__va_struct_alignment(TYPE_ALIGN), #if defined(__i386__) || defined(__m68k__) || defined(__alpha__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc64__) && !defined(_AIX)) || defined(__x86_64_sysv__) #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) #endif #if defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__) /* small structures < 1 word are adjusted depending on compiler */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->flags & __VA_SGICC_STRUCT_ARGS \ ? /* SGI MIPS cc passes small structures left-adjusted, although big-endian! */\ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : /* SGI MIPS gcc passes small structures within the first four words left- \ * adjusted, for compatibility with cc. But structures in memory are passed \ * right-adjusted!! See gcc-2.6.3/config/mips/mips.c:function_arg(). \ */ \ ((LIST)->aptr < (LIST)->memargptr \ ? (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ )) ) #endif #if defined(__mipsn32__) || defined(__mips64__) /* small structures < 1 word are adjusted depending on compiler */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->flags & __VA_SGICC_STRUCT_ARGS \ ? /* SGI MIPS cc and gcc >= 3.4 passes small structures left-adjusted, although big-endian! */\ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : /* SGI MIPS gcc < 3.4 passes small structures right-adjusted. */ \ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ )) #endif #if defined(__powerpc_aix__) || (defined(__powerpc64__) && defined(_AIX)) /* small structures < 1 word are adjusted depending on compiler */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((LIST)->flags & __VA_AIXCC_STRUCT_ARGS \ ? /* AIX cc and xlc pass small structures left-adjusted, although big-endian! */\ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : /* gcc passes small structures right-adjusted. */ \ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ )) #endif #if defined(__powerpc_sysv4__) /* Structures are passed as pointers to caller-made local copies. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ va_arg_ptr(LIST,void*) #endif #if defined(__sparc__) && !defined(__sparc64__) /* Structures are passed as pointers to caller-made local copies. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ va_arg_ptr(LIST,void*) #endif #if defined(__sparc64__) /* Small structures are passed left-adjusted, although big-endian! */ /* Big structures are passed as pointers to caller-made local copies. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((TYPE_SIZE) <= 16 \ ? (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN)) \ : va_arg_ptr(LIST,void*) \ ) #endif #if defined(__hppa64__) /* Structures are passed left-adjusted (although big-endian!). */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (void*)__va_arg_leftadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) #endif #if defined(__arm64__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) /* Small structures are passed in registers or on the stack. */ /* Big structures are passed as pointers to caller-made local copies. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((TYPE_SIZE) <= 2*sizeof(__varword) \ ? (void*)__va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : va_arg_ptr(LIST,void*) \ ) #endif #if defined(__x86_64_ms__) || defined(__s390__) || defined(__s390x__) /* Structures of 1, 2, 4, 8 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers to caller-made local copies. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((TYPE_SIZE) == 1 || (TYPE_SIZE) == 2 || (TYPE_SIZE) == 4 || (TYPE_SIZE) == 8 \ ? (void*)__va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ : va_arg_ptr(LIST,void*) \ ) #endif #if defined(__hppa__) && !defined(__hppa64__) /* Structures <= 8 bytes are passed as embedded copies on the arg stack. * Big structures are passed as pointers (to caller-made local copies * with GCC >= 8, without copy otherwise). */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ ((TYPE_SIZE) > 8 \ ? va_arg_ptr(LIST,void*) \ : /* FIXME: gcc-2.6.3 passes structures <= 4 bytes in memory left-adjusted! ?? */\ (void*)__va_arg_rightadjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) #endif #if defined(__ia64__) /* With GCC < 3, types larger than a word have 2-word alignment. */ #define __va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (__va_align_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ (((LIST)->flags & __VA_OLDGCC_STRUCT_ARGS) && (TYPE_SIZE) > sizeof(__vaword) && (((__vaword*)(LIST)->aptr - (LIST)->saptr) & 1) ? (LIST)->aptr += sizeof(__vaword) : 0), \ __va_arg_adjusted(LIST,TYPE_SIZE,TYPE_ALIGN) \ ) #endif /* * Definition of the va_return_xxx macros. */ #define __va_return(LIST,RETTYPE) \ (((LIST)->rtype == (RETTYPE)) || (vacall_error_type_mismatch((LIST)->rtype,RETTYPE), 0)) #define _va_return_void(LIST) \ __va_return(LIST,__VAvoid) #define _va_return_char(LIST,VAL) \ (__va_return(LIST,__VAchar), (LIST)->tmp._char = (VAL)) #define _va_return_schar(LIST,VAL) \ (__va_return(LIST,__VAschar), (LIST)->tmp._schar = (VAL)) #define _va_return_uchar(LIST,VAL) \ (__va_return(LIST,__VAuchar), (LIST)->tmp._uchar = (VAL)) #define _va_return_short(LIST,VAL) \ (__va_return(LIST,__VAshort), (LIST)->tmp._short = (VAL)) #define _va_return_ushort(LIST,VAL) \ (__va_return(LIST,__VAushort), (LIST)->tmp._ushort = (VAL)) #define _va_return_int(LIST,VAL) \ (__va_return(LIST,__VAint), (LIST)->tmp._int = (VAL)) #define _va_return_uint(LIST,VAL) \ (__va_return(LIST,__VAuint), (LIST)->tmp._uint = (VAL)) #define _va_return_long(LIST,VAL) \ (__va_return(LIST,__VAlong), (LIST)->tmp._long = (VAL)) #define _va_return_ulong(LIST,VAL) \ (__va_return(LIST,__VAulong), (LIST)->tmp._ulong = (VAL)) #if defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm64__) || defined(__powerpc64__) || defined(__ia64__) || (defined(__x86_64__) && !defined(__x86_64_x32__) && !defined(__VA_LLP64)) || defined(__riscv64__) || defined(__loongarch64__) #define _va_return_longlong(LIST,VAL) \ (__va_return(LIST,__VAlonglong), (LIST)->tmp._long = (VAL)) #define _va_return_ulonglong(LIST,VAL) \ (__va_return(LIST,__VAulonglong), (LIST)->tmp._ulong = (VAL)) #else #define _va_return_longlong(LIST,VAL) \ (__va_return(LIST,__VAlonglong), (LIST)->tmp._longlong = (VAL)) #define _va_return_ulonglong(LIST,VAL) \ (__va_return(LIST,__VAulonglong), (LIST)->tmp._ulonglong = (VAL)) #endif #define _va_return_float(LIST,VAL) \ (__va_return(LIST,__VAfloat), (LIST)->tmp._float = (VAL)) #define _va_return_double(LIST,VAL) \ (__va_return(LIST,__VAdouble), (LIST)->tmp._double = (VAL)) #define _va_return_ptr(LIST,VAL) \ (__va_return(LIST,__VAvoidp), (LIST)->tmp._ptr = (VAL)) #define __va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) \ (__va_return(LIST,__VAstruct), \ vacall_structcpy((void*)((LIST)->raddr),VAL_ADDR,TYPE_SIZE,TYPE_ALIGN) \ ) /* * Miscellaneous declarations. */ extern void vacall_structcpy (void* dest, const void* src, unsigned long size, unsigned long alignment); #endif /* _VACALL_INTERNAL_H */ libffcall-2.5/vacall/vacall-hppa.c0000664000000000000000000002457114662613007014003 00000000000000/* vacall function for hppa CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /*--------------------------------------------------------------------------- HPPA Argument Passing Conventions: The calling conventions for anonymous functions and for explicitly named functions are different. Only the convention for explicitly named functions matters here. All arguments, except the first 4 words, are passed on the stack - growing down! - with word alignment. Doubles take two words and force double alignment. Structures args are passed as true structures embedded in the argument stack. They force double alignment and - if they don't fit entirely in the 4 register words - are passed in memory. The first 2 words are passed like this: %r26 = first integer arg, %r25 = second integer arg, or %fr4L = first float arg, %fr5L = second float arg, or %fr5 = double arg. Similarly for the next 2 words, passed in %r24 and %r23, or %fr6L and %fr7L, or %fr7. To return a structure, the called function copies the return value to the address supplied in register "%r28". ---------------------------------------------------------------------------*/ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("%r29"); #endif register void* sret __asm__("%r28"); register __varword arg1 __asm__("%r26"); register __varword arg2 __asm__("%r25"); register __varword arg3 __asm__("%r24"); register __varword arg4 __asm__("%r23"); register float farg1 __asm__("%fr4"); /* fr4L */ register float farg2 __asm__("%fr5"); /* fr5L */ register float farg3 __asm__("%fr6"); /* fr6L */ register float farg4 __asm__("%fr7"); /* fr7L */ register double darg1 __asm__("%fr5"); register double darg2 __asm__("%fr7"); register int iret __asm__("%r28"); register float fret __asm__("%fr4"); /* fr4L */ register double dret __asm__("%fr4"); register __varword iret1 __asm__("%r28"); register __varword iret2 __asm__("%r29"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword firstword) { /* gcc-2.6.3 source says: When a parameter is passed in a register, * stack space is still allocated for it. */ /* Note about stack offsets (see vacall-hppa.s): * &firstword = %r30 - 244, &word4 = %r30 - 240, ..., &word1 = %r30 - 228, */ __va_alist list; /* Move the arguments passed in registers to their stack locations. */ (&firstword)[4] = word1; (&firstword)[3] = word2; (&firstword)[2] = word3; (&firstword)[1] = word4; list.darg[1] = darg1; list.darg[0] = darg2; list.farg[3] = farg1; list.farg[2] = farg2; list.farg[1] = farg3; list.farg[0] = farg4; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword + 5); list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = sret; list.memargptr = (long)(&firstword + 1); list.farg_offset = (long)&list.farg[4] - list.aptr; list.darg_offset = (long)&list.darg[2] - list.aptr; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret1 = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; iret1 = list.tmp._words[0]; /* HP cc generates a RTNVAL=GR call */ } else if (list.rtype == __VAdouble) { dret = list.tmp._double; iret1 = list.tmp._words[0]; /* HP cc generates a RTNVAL=GR call */ iret2 = list.tmp._words[1]; /* i.e. result is expected in r28,r29 */ } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_SMALL_STRUCT_RETURN) { /* cc, c89 and gcc >= 2.7 return structs of size <= 8 in registers. */ /* This is really weird code, unlike all other big-endian platforms. */ if (list.rsize > 0 && list.rsize <= 8) { #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = ((unsigned char *) list.raddr)[0]; } else if (list.rsize == 2) { iret = (((unsigned char *) list.raddr)[0] << 8) | ((unsigned char *) list.raddr)[1]; } else if (list.rsize == 3) { iret = (((unsigned char *) list.raddr)[0] << 16) | (((unsigned char *) list.raddr)[1] << 8) | ((unsigned char *) list.raddr)[2]; } else if (list.rsize == 4) { iret = (((unsigned char *) list.raddr)[0] << 24) | (((unsigned char *) list.raddr)[1] << 16) | (((unsigned char *) list.raddr)[2] << 8) | ((unsigned char *) list.raddr)[3]; } else if (list.rsize == 5) { iret1 = ((unsigned char *) list.raddr)[0]; iret2 = (((unsigned char *) list.raddr)[1] << 24) | (((unsigned char *) list.raddr)[2] << 16) | (((unsigned char *) list.raddr)[3] << 8) | ((unsigned char *) list.raddr)[4]; } else if (list.rsize == 6) { iret1 = (((unsigned char *) list.raddr)[0] << 8) | ((unsigned char *) list.raddr)[1]; iret2 = (((unsigned char *) list.raddr)[2] << 24) | (((unsigned char *) list.raddr)[3] << 16) | (((unsigned char *) list.raddr)[4] << 8) | ((unsigned char *) list.raddr)[5]; } else if (list.rsize == 7) { iret1 = (((unsigned char *) list.raddr)[0] << 16) | (((unsigned char *) list.raddr)[1] << 8) | ((unsigned char *) list.raddr)[2]; iret2 = (((unsigned char *) list.raddr)[3] << 24) | (((unsigned char *) list.raddr)[4] << 16) | (((unsigned char *) list.raddr)[5] << 8) | ((unsigned char *) list.raddr)[6]; } else if (list.rsize == 8) { iret1 = (((unsigned char *) list.raddr)[0] << 24) | (((unsigned char *) list.raddr)[1] << 16) | (((unsigned char *) list.raddr)[2] << 8) | ((unsigned char *) list.raddr)[3]; iret2 = (((unsigned char *) list.raddr)[4] << 24) | (((unsigned char *) list.raddr)[5] << 16) | (((unsigned char *) list.raddr)[6] << 8) | ((unsigned char *) list.raddr)[7]; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ __varword mask0 = ((__varword)2 << (sizeof(__varword)*8-start_offset*8-1)) - 1; if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ iret = (wordaddr[0] & mask0) >> (sizeof(__varword)*8-end_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ iret = ((wordaddr[0] & mask0) << (end_offset*8-sizeof(__varword)*8)) | (wordaddr[1] >> (2*sizeof(__varword)*8-end_offset*8)); } } else { /* Assign iret, iret2. */ __varword mask0 = ((__varword)2 << (sizeof(__varword)*8-start_offset*8-1)) - 1; if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ iret = (wordaddr[0] & mask0) >> (2*sizeof(__varword)*8-end_offset*8); iret2 = ((wordaddr[0] & mask0) << (end_offset*4-sizeof(__varword)*4) << (end_offset*4-sizeof(__varword)*4)) | (wordaddr[1] >> (2*sizeof(__varword)*8-end_offset*8)); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ iret = ((wordaddr[0] & mask0) << (end_offset*8-2*sizeof(__varword)*8)) | (wordaddr[1] >> (3*sizeof(__varword)*8-end_offset*8)); iret2 = (wordaddr[1] << (end_offset*8-2*sizeof(__varword)*8)) | (wordaddr[2] >> (3*sizeof(__varword)*8-end_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/minitests-c++.cc0000664000000000000000000000133213347755333014341 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "minitests.c" libffcall-2.5/vacall/vacall-alpha-macro.S0000664000000000000000000000525314665263073015222 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl vacall_receiver .ent vacall_receiver vacall_receiver: .frame $15,192,$26,48 .mask 0x4008000,-192 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $vacall_receiver..ng: lda $30,-192($30) stq $15,8($30) mov $30,$15 lda $3,144($15) stq $26,0($30) .prologue 1 lda $2,88($15) stq $16,144($15) subq $2,$3,$2 ldq $3,vacall_function($29) !literal stq $2,80($15) lda $2,192($15) lda $16,16($15) stq $2,72($15) ldq $27,0($3) lda $2,144($15) stq $17,152($15) stq $18,160($15) stq $19,168($15) stq $20,176($15) stq $21,184($15) stt $f16,88($15) stt $f17,96($15) stt $f18,104($15) stt $f19,112($15) stt $f20,120($15) stt $f21,128($15) stl $31,16($15) stq $2,40($15) stq $31,48($15) stl $31,56($15) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 ldl $2,56($15) beq $2,$L43 zapnot $2,15,$3 cmpeq $3,1,$2 bne $2,$L44 cmpeq $3,2,$2 bne $2,$L44 cmpeq $3,3,$2 bne $2,$L50 cmpeq $3,4,$2 bne $2,$L51 cmpeq $3,5,$2 bne $2,$L52 cmpeq $3,6,$2 bne $2,$L53 cmpeq $3,7,$2 bne $2,$L54 cmpeq $3,8,$2 bne $2,$L48 cmpeq $3,9,$2 bne $2,$L48 cmpeq $3,10,$2 bne $2,$L48 cmpeq $3,11,$2 bne $2,$L48 cmpeq $3,12,$2 bne $2,$L55 cmpeq $3,13,$2 bne $2,$L56 cmpeq $3,14,$2 bne $2,$L48 cmpeq $3,15,$2 beq $2,$L43 lda $2,1024($31) ldl $3,16($15) and $2,$3,$2 beq $2,$L43 ldq $3,64($15) cmpeq $3,1,$2 bne $2,$L57 cmpeq $3,2,$2 bne $2,$L58 cmpeq $3,4,$2 bne $2,$L59 cmpeq $3,8,$2 bne $2,$L60 cmpeq $3,16,$2 beq $2,$L43 ldq $2,48($15) ldq $1,8($2) ldq $0,0($2) .align 4 $L43: mov $15,$30 ldq $26,0($30) ldq $15,8($30) lda $30,192($30) ret $31,($26),1 .align 4 $L44: mov $15,$30 ldl $2,24($15) ldq $26,0($30) sll $2,56,$2 sra $2,56,$0 ldq $15,8($30) lda $30,192($30) ret $31,($26),1 $L51: ldl $2,24($15) sll $2,48,$2 sra $2,48,$0 br $31,$L43 $L50: ldl $2,24($15) bis $31,$31,$31 and $2,0xff,$0 br $31,$L43 $L48: ldq $0,24($15) br $31,$L43 $L52: ldl $2,24($15) bis $31,$31,$31 zapnot $2,3,$0 br $31,$L43 $L53: ldl $3,24($15) bis $31,$31,$31 mov $3,$0 br $31,$L43 $L54: ldl $2,24($15) bis $31,$31,$31 zapnot $2,15,$0 br $31,$L43 $L55: lds $f0,24($15) br $31,$L43 $L56: ldt $f0,24($15) br $31,$L43 $L57: ldq $3,48($15) ldq_u $2,0($3) extbl $2,$3,$0 br $31,$L43 $L58: ldq $3,48($15) ldq_u $2,0($3) extwl $2,$3,$0 br $31,$L43 $L60: ldq $2,48($15) bis $31,$31,$31 ldq $0,0($2) br $31,$L43 $L59: ldq $2,48($15) ldl $3,0($2) zapnot $3,15,$0 br $31,$L43 .end vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-x86_64.c0000664000000000000000000002047214662613007014005 00000000000000/* vacall function for x86_64 CPU with the Unix ABI ('gcc -mabi=sysv') */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r10"); #endif /*register __varword iarg1 __asm__("rdi");*/ /*register __varword iarg2 __asm__("rsi");*/ /*register __varword iarg3 __asm__("rdx");*/ /*register __varword iarg4 __asm__("rcx");*/ /*register __varword iarg5 __asm__("r8");*/ /*register __varword iarg6 __asm__("r9");*/ register double farg1 __asm__("xmm0"); register double farg2 __asm__("xmm1"); register double farg3 __asm__("xmm2"); register double farg4 __asm__("xmm3"); register double farg5 __asm__("xmm4"); register double farg6 __asm__("xmm5"); register double farg7 __asm__("xmm6"); register double farg8 __asm__("xmm7"); register __varword iret __asm__("rax"); register __varword iret2 __asm__("rdx"); register float fret __asm__("xmm0"); register double dret __asm__("xmm0"); /* * Tell gcc to not use the call-saved registers %rbx, %rbp. * This ensures that the return sequence does not need to restore registers * from the stack. */ register void* dummy1 __asm__("%rbx"); #if __GNUC__ < 4 || (__GNUC__ == 4 && __GNUC_MINOR__ < 9) register void* dummy2 __asm__("%rbp"); #endif #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = word1; list.iarg[1] = word2; list.iarg[2] = word3; list.iarg[3] = word4; list.iarg[4] = word5; list.iarg[5] = word6; list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { #ifdef __x86_64_x32__ iret = list.tmp._longlong; #else iret = list.tmp._long; #endif } else if (list.rtype == __VAulonglong) { #ifdef __x86_64_x32__ iret = list.tmp._ulonglong; #else iret = list.tmp._ulong; #endif } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { #ifdef __x86_64_x32__ /* The x86_64 ABI, section 10.1, specifies that pointers are zero-extended from 32 bits to 64 bits. */ iret = (unsigned long long)(unsigned long)list.tmp._ptr; #else iret = (long)list.tmp._ptr; #endif } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) iret |= (__varword)((unsigned char *) list.raddr)[4] << 32; if (list.rsize >= 6) iret |= (__varword)((unsigned char *) list.raddr)[5] << 40; if (list.rsize >= 7) iret |= (__varword)((unsigned char *) list.raddr)[6] << 48; if (list.rsize >= 8) iret |= (__varword)((unsigned char *) list.raddr)[7] << 56; if (list.rsize >= 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; if (list.rsize >= 10) iret2 |= (__varword)((unsigned char *) list.raddr)[9] << 8; if (list.rsize >= 11) iret2 |= (__varword)((unsigned char *) list.raddr)[10] << 16; if (list.rsize >= 12) iret2 |= (__varword)((unsigned char *) list.raddr)[11] << 24; if (list.rsize >= 13) iret2 |= (__varword)((unsigned char *) list.raddr)[12] << 32; if (list.rsize >= 14) iret2 |= (__varword)((unsigned char *) list.raddr)[13] << 40; if (list.rsize >= 15) iret2 |= (__varword)((unsigned char *) list.raddr)[14] << 48; if (list.rsize >= 16) iret2 |= (__varword)((unsigned char *) list.raddr)[15] << 56; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-arm64.c0000664000000000000000000002043714662613007014001 00000000000000/* vacall function for arm64 (a.k.a. aarch64) CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("x18"); #endif register __vaword* sret __asm__("x8"); /* structure return pointer */ register __varword iarg1 __asm__("x0"); register __varword iarg2 __asm__("x1"); register __varword iarg3 __asm__("x2"); register __varword iarg4 __asm__("x3"); register __varword iarg5 __asm__("x4"); register __varword iarg6 __asm__("x5"); register __varword iarg7 __asm__("x6"); register __varword iarg8 __asm__("x7"); register float farg1 __asm__("s0"); register float farg2 __asm__("s1"); register float farg3 __asm__("s2"); register float farg4 __asm__("s3"); register float farg5 __asm__("s4"); register float farg6 __asm__("s5"); register float farg7 __asm__("s6"); register float farg8 __asm__("s7"); register double darg1 __asm__("d0"); register double darg2 __asm__("d1"); register double darg3 __asm__("d2"); register double darg4 __asm__("d3"); register double darg5 __asm__("d4"); register double darg6 __asm__("d5"); register double darg7 __asm__("d6"); register double darg8 __asm__("d7"); register __varword iret __asm__("x0"); register __varword iret2 __asm__("x1"); register float fret __asm__("s0"); register double dret __asm__("d0"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, __vaword word8, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = iarg1; list.iarg[1] = iarg2; list.iarg[2] = iarg3; list.iarg[3] = iarg4; list.iarg[4] = iarg5; list.iarg[5] = iarg6; list.iarg[6] = iarg7; list.iarg[7] = iarg8; list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; list.darg[4] = darg5; list.darg[5] = darg6; list.darg[6] = darg7; list.darg[7] = darg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = sret; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong || list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulong || list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* normal struct return convention */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) iret |= (__varword)((unsigned char *) list.raddr)[4] << 32; if (list.rsize >= 6) iret |= (__varword)((unsigned char *) list.raddr)[5] << 40; if (list.rsize >= 7) iret |= (__varword)((unsigned char *) list.raddr)[6] << 48; if (list.rsize >= 8) iret |= (__varword)((unsigned char *) list.raddr)[7] << 56; if (list.rsize >= 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; if (list.rsize >= 10) iret2 |= (__varword)((unsigned char *) list.raddr)[9] << 8; if (list.rsize >= 11) iret2 |= (__varword)((unsigned char *) list.raddr)[10] << 16; if (list.rsize >= 12) iret2 |= (__varword)((unsigned char *) list.raddr)[11] << 24; if (list.rsize >= 13) iret2 |= (__varword)((unsigned char *) list.raddr)[12] << 32; if (list.rsize >= 14) iret2 |= (__varword)((unsigned char *) list.raddr)[13] << 40; if (list.rsize >= 15) iret2 |= (__varword)((unsigned char *) list.raddr)[14] << 48; if (list.rsize >= 16) iret2 |= (__varword)((unsigned char *) list.raddr)[15] << 56; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-powerpc64-aix.s0000664000000000000000000000406314665263075015506 00000000000000 .file "vacall-powerpc64.c" .csect .text[PR] .toc .csect .text[PR] .toc LC..0: .tc vacall_function[TC],vacall_function[UA] .csect .text[PR] .align 2 .align 4 .globl vacall_receiver .globl .vacall_receiver .csect vacall_receiver[DS],3 vacall_receiver: .llong .vacall_receiver, TOC[tc0], 0 .csect .text[PR] .vacall_receiver: mflr 0 std 31,-8(1) li 11,0 std 0,16(1) li 0,0 stdu 1,-304(1) mr 31,1 std 2,40(1) stw 0,112(31) stw 11,152(31) stw 11,168(31) std 9,400(31) addi 9,31,352 std 3,352(31) stfd 1,172(31) std 4,360(31) std 5,368(31) std 6,376(31) std 7,384(31) std 8,392(31) stfd 2,180(31) addi 3,31,112 stfd 3,188(31) stfd 4,196(31) stfd 5,204(31) stfd 6,212(31) stfd 7,220(31) stfd 8,228(31) stfd 9,236(31) stfd 10,244(31) stfd 11,252(31) stfd 12,260(31) stfd 13,268(31) std 9,136(31) std 11,144(31) std 10,408(31) ld 9,LC..0(2) ld 9,0(9) ld 10,0(9) ld 11,16(9) mtctr 10 ld 2,8(9) bctrl ld 2,40(1) lwz 9,152(31) cmpdi 7,9,0 beq 7,L..1 cmplwi 7,9,1 beq 7,L..20 cmplwi 7,9,2 beq 7,L..23 cmplwi 7,9,3 beq 7,L..20 cmplwi 7,9,4 beq 7,L..24 cmplwi 7,9,5 beq 7,L..25 cmplwi 7,9,6 beq 7,L..26 cmplwi 7,9,7 beq 7,L..27 cmplwi 7,9,8 beq 7,L..21 cmplwi 7,9,9 beq 7,L..21 cmplwi 7,9,10 beq 7,L..21 cmplwi 7,9,11 beq 7,L..21 cmplwi 7,9,12 beq 7,L..28 cmplwi 7,9,13 beq 7,L..29 cmplwi 7,9,14 beq 7,L..21 L..1: addi 1,31,304 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .align 4 L..20: lbz 3,120(31) addi 1,31,304 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .align 4 L..23: lbz 9,120(31) extsb 3,9 b L..1 .align 4 L..21: ld 3,120(31) b L..1 .align 4 L..24: lha 3,120(31) b L..1 .align 4 L..25: lhz 3,120(31) b L..1 .align 4 L..26: lwa 3,120(31) b L..1 .align 4 L..28: lfs 1,120(31) b L..1 .align 4 L..27: lwz 3,120(31) b L..1 L..29: lfd 1,120(31) b L..1 LT..vacall_receiver: .long 0 .byte 0,0,32,97,128,1,8,0 .long 0 .long LT..vacall_receiver-.vacall_receiver .short 15 .byte "vacall_receiver" .byte 31 .align 2 _section_.text: .csect .data[RW],4 .llong _section_.text .extern vacall_function[UA] libffcall-2.5/vacall/vacall-powerpc-aix.s0000664000000000000000000000563614665263075015343 00000000000000 .file "vacall-powerpc.c" .toc .csect .text[PR] .toc LC..0: .tc vacall_function[TC],vacall_function[RW] .csect .text[PR] .align 2 .globl vacall_receiver .globl .vacall_receiver .csect vacall_receiver[DS] vacall_receiver: .long .vacall_receiver, TOC[tc0], 0 .csect .text[PR] .vacall_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous mflr 0 stw 0,8(1) stw 29,-12(1) stw 31,-4(1) lwz 11,LC..0(2) stwu 1,-216(1) mr 31,1 lwz 29,0(11) addi 0,31,240 li 11,0 stw 9,264(31) stw 3,240(31) stw 5,248(31) stw 6,252(31) stw 7,256(31) stw 8,260(31) stw 10,268(31) stw 11,88(31) stw 4,244(31) stfd 1,92(31) stfd 2,100(31) stfd 3,108(31) stfd 4,116(31) stfd 5,124(31) stfd 6,132(31) stfd 7,140(31) stfd 8,148(31) stfd 9,156(31) stfd 10,164(31) stfd 11,172(31) stfd 12,180(31) stfd 13,188(31) stw 11,56(31) stw 11,76(31) stw 11,80(31) stw 0,72(31) lwz 0,0(29) addi 3,31,56 stw 2,20(1) mtctr 0 lwz 11,8(29) lwz 2,4(29) bctrl lwz 2,20(1) lwz 9,80(31) cmpwi 0,9,0 beq- 0,L..1 cmpwi 0,9,1 beq- 0,L..40 cmpwi 0,9,2 beq- 0,L..41 cmpwi 0,9,3 beq- 0,L..40 cmpwi 0,9,4 beq- 0,L..42 cmpwi 0,9,5 beq- 0,L..43 cmpwi 0,9,6 beq- 0,L..39 cmpwi 0,9,7 beq- 0,L..39 cmpwi 0,9,8 beq- 0,L..39 cmpwi 0,9,9 beq- 0,L..39 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,L..22 lwz 3,64(31) lwz 4,68(31) L..1: lwz 1,0(1) lwz 0,8(1) lwz 29,-12(1) mtlr 0 lwz 31,-4(1) blr L..22: cmpwi 0,9,12 beq- 0,L..44 cmpwi 0,9,13 beq- 0,L..45 cmpwi 0,9,14 beq- 0,L..39 cmpwi 0,9,15 bne+ 0,L..1 lwz 0,56(31) andi. 9,0,1024 beq- 0,L..1 lwz 9,84(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,L..1 cmplwi 0,9,4 lwz 0,76(31) rlwinm 10,0,0,30,31 rlwinm 7,0,0,0,29 add 6,10,9 bgt- 0,L..33 cmplwi 0,6,4 slwi 0,10,3 subfic 0,0,31 li 9,2 slw 9,9,0 addi 8,9,-1 bgt- 0,L..34 lwz 9,0(7) slwi 0,6,3 and 9,9,8 subfic 0,0,32 sraw 3,9,0 b L..1 L..34: lwz 0,0(7) slwi 9,6,3 lwz 11,4(7) subfic 10,9,64 and 0,0,8 addi 9,9,-32 slw 0,0,9 sraw 11,11,10 or 3,0,11 b L..1 L..33: cmplwi 0,6,8 slwi 0,10,3 subfic 0,0,31 li 9,2 slw 9,9,0 addi 5,9,-1 bgt- 0,L..37 lwz 8,0(7) slwi 11,6,2 and 8,8,5 addi 11,11,-16 lwz 10,4(7) slwi 9,6,3 subfic 9,9,64 slw 0,8,11 slw 0,0,11 sraw 10,10,9 or 4,0,10 sraw 3,8,9 b L..1 L..37: lwz 11,0(7) slwi 9,6,3 lwz 10,8(7) lwz 0,4(7) subfic 8,9,96 and 11,11,5 addi 9,9,-64 slw 7,0,9 sraw 10,10,8 slw 11,11,9 sraw 0,0,8 or 3,11,0 or 4,7,10 b L..1 L..39: lwz 3,64(31) b L..1 L..45: lfd 1,64(31) b L..1 L..44: lfs 1,64(31) b L..1 L..43: lhz 3,64(31) b L..1 L..42: lha 3,64(31) b L..1 L..40: lbz 3,64(31) b L..1 L..41: lbz 0,64(31) slwi 0,0,24 srawi 3,0,24 b L..1 LT..vacall_receiver: .long 0 .byte 0,0,32,97,128,3,8,0 .long 0 .long LT..vacall_receiver-.vacall_receiver .short 15 .byte "vacall_receiver" .byte 31 .align 2 _section_.text: .csect .data[RW],3 .long _section_.text .extern vacall_function[RW] libffcall-2.5/vacall/vacall-riscv64.c0000664000000000000000000002142414662613007014345 00000000000000/* vacall function for RISC-V 64-bit CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("t2"); #endif register __varword iarg1 __asm__("a0"); register __varword iarg2 __asm__("a1"); register __varword iarg3 __asm__("a2"); register __varword iarg4 __asm__("a3"); register __varword iarg5 __asm__("a4"); register __varword iarg6 __asm__("a5"); register __varword iarg7 __asm__("a6"); register __varword iarg8 __asm__("a7"); register float farg1 __asm__("fa0"); register float farg2 __asm__("fa1"); register float farg3 __asm__("fa2"); register float farg4 __asm__("fa3"); register float farg5 __asm__("fa4"); register float farg6 __asm__("fa5"); register float farg7 __asm__("fa6"); register float farg8 __asm__("fa7"); register double darg1 __asm__("fa0"); register double darg2 __asm__("fa1"); register double darg3 __asm__("fa2"); register double darg4 __asm__("fa3"); register double darg5 __asm__("fa4"); register double darg6 __asm__("fa5"); register double darg7 __asm__("fa6"); register double darg8 __asm__("fa7"); register __varword iret __asm__("a0"); register __varword iret2 __asm__("a1"); register float fret __asm__("fa0"); register double dret __asm__("fa0"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to structs that are at most 2 words large. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the retaddr - if and only if they are part of a struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word8; /* a7 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, struct gpargsequence gpargs) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = iarg1; list.iarg[1] = iarg2; list.iarg[2] = iarg3; list.iarg[3] = iarg4; list.iarg[4] = iarg5; list.iarg[5] = iarg6; list.iarg[6] = iarg7; list.iarg[7] = iarg8; /* = gpargs.word8 */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; list.darg[4] = darg5; list.darg[5] = darg6; list.darg[6] = darg7; list.darg[7] = darg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs + sizeof(__vaword); list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong || list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulong || list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* normal struct return convention */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) iret |= (__varword)((unsigned char *) list.raddr)[4] << 32; if (list.rsize >= 6) iret |= (__varword)((unsigned char *) list.raddr)[5] << 40; if (list.rsize >= 7) iret |= (__varword)((unsigned char *) list.raddr)[6] << 48; if (list.rsize >= 8) iret |= (__varword)((unsigned char *) list.raddr)[7] << 56; if (list.rsize >= 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; if (list.rsize >= 10) iret2 |= (__varword)((unsigned char *) list.raddr)[9] << 8; if (list.rsize >= 11) iret2 |= (__varword)((unsigned char *) list.raddr)[10] << 16; if (list.rsize >= 12) iret2 |= (__varword)((unsigned char *) list.raddr)[11] << 24; if (list.rsize >= 13) iret2 |= (__varword)((unsigned char *) list.raddr)[12] << 32; if (list.rsize >= 14) iret2 |= (__varword)((unsigned char *) list.raddr)[13] << 40; if (list.rsize >= 15) iret2 |= (__varword)((unsigned char *) list.raddr)[14] << 48; if (list.rsize >= 16) iret2 |= (__varword)((unsigned char *) list.raddr)[15] << 56; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-arm-eabi-macro.S0000664000000000000000000000771414665263074015617 00000000000000#include "asm-arm.h" #ifdef __PIC__ .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .text .align 2 .global C(vacall_receiver) .syntax unified .arm .fpu softvfp .type vacall_receiver, %function FUNBEGIN(vacall_receiver) // Function supports interworking. // args = 20, pretend = 16, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, $16 push {fp, lr} mov lr, $0 add fp, sp, $4 sub sp, sp, $32 add ip, fp, $4 stm ip, {r0, r1, r2, r3} ldr r3, L(31) str lr, [fp, $-36] str lr, [fp, $-16] str lr, [fp, $-12] str ip, [fp, $-20] ldr r2, L(31)+4 L(PIC0): add r3, pc, r3 ldr r3, [r3, r2] sub r0, fp, $36 ldr r3, [r3] mov lr, pc bx r3 ldr r3, [fp, $-12] cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-28] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-28] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-28] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(28) cmp r3, $12 ldreq r0, [fp, $-28] // float beq L(1) cmp r3, $13 beq L(28) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-36] tst r3, $1024 beq L(1) ldr r3, [fp, $-8] cmp r3, $1 beq L(30) cmp r3, $2 ldr r3, [fp, $-16] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $4 // sp needed pop {fp, lr} add sp, sp, $16 bx lr L(25): ldrb r0, [fp, $-28] // zero_extendqisi2 sub sp, fp, $4 // sp needed pop {fp, lr} add sp, sp, $16 bx lr L(27): ldr r0, [fp, $-28] sub sp, fp, $4 // sp needed pop {fp, lr} add sp, sp, $16 bx lr L(28): sub r0, fp, $28 ldm r0, {r0, r1} b L(1) L(30): ldr r3, [fp, $-16] ldrb r0, [r3] // zero_extendqisi2 b L(1) L(32): .align 2 L(31): .word _GLOBAL_OFFSET_TABLE_-(L(PIC0)+8) .word C(vacall_function)(GOT) FUNEND(vacall_receiver) #else .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .text .align 2 .global C(vacall_receiver) .syntax unified .arm .fpu softvfp .type vacall_receiver, %function FUNBEGIN(vacall_receiver) // Function supports interworking. // args = 20, pretend = 16, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, $16 push {r4, fp, lr} add fp, sp, $8 sub sp, sp, $36 mov lr, $0 ldr r4, L(31) add ip, fp, $4 stm ip, {r0, r1, r2, r3} str ip, [fp, $-28] ldr r3, [r4] sub r0, fp, $44 str lr, [fp, $-44] str lr, [fp, $-24] str lr, [fp, $-20] mov lr, pc bx r3 ldr r3, [fp, $-20] cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-36] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-36] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-36] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(28) cmp r3, $12 ldreq r0, [fp, $-36] // float beq L(1) cmp r3, $13 beq L(28) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-44] tst r3, $1024 beq L(1) ldr r3, [fp, $-16] cmp r3, $1 beq L(30) cmp r3, $2 ldr r3, [fp, $-24] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $8 // sp needed pop {r4, fp, lr} add sp, sp, $16 bx lr L(25): ldrb r0, [fp, $-36] // zero_extendqisi2 sub sp, fp, $8 // sp needed pop {r4, fp, lr} add sp, sp, $16 bx lr L(27): ldr r0, [fp, $-36] sub sp, fp, $8 // sp needed pop {r4, fp, lr} add sp, sp, $16 bx lr L(28): sub r0, fp, $36 ldm r0, {r0, r1} b L(1) L(30): ldr r3, [fp, $-24] ldrb r0, [r3] // zero_extendqisi2 b L(1) L(32): .align 2 L(31): .word C(vacall_function) FUNEND(vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/vacall/vacall-powerpc-sysv4-macro.S0000664000000000000000000000477014665263075016707 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 li 11,0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 9,76(31) addi 0,31,184 lis 9,vacall_function@ha stw 3,52(31) lwz 9,vacall_function@l(9) addi 3,31,16 stw 5,60(31) mtctr 9 stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 0,32(31) stw 11,84(31) stw 4,56(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 11,16(31) stw 11,48(31) stw 11,36(31) stw 11,40(31) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 10,0,0,30,31 rlwinm 6,0,0,0,29 add 7,10,9 bgt- 0,.L33 slwi 0,10,3 cmplwi 0,7,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 8,9,-1 bgt- 0,.L34 lwz 9,0(6) slwi 0,7,3 subfic 0,0,32 and 9,9,8 sraw 3,9,0 b .L1 .L34: lwz 0,0(6) slwi 9,7,3 lwz 11,4(6) subfic 10,9,64 and 0,0,8 addi 9,9,-32 slw 0,0,9 sraw 11,11,10 .L39: or 3,11,0 b .L1 .L33: slwi 0,10,3 cmplwi 0,7,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 5,9,-1 bgt- 0,.L37 lwz 8,0(6) slwi 11,7,2 addi 11,11,-16 lwz 10,4(6) and 8,8,5 slwi 9,7,3 subfic 9,9,64 slw 0,8,11 slw 0,0,11 sraw 10,10,9 or 4,0,10 sraw 3,8,9 b .L1 .L37: slwi 9,7,3 lwz 0,4(6) lwz 11,0(6) subfic 7,9,96 lwz 10,8(6) addi 9,9,-64 slw 8,0,9 and 11,11,5 sraw 10,10,7 slw 11,11,9 sraw 0,0,7 or 4,8,10 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size vacall_receiver, .-vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-i386-macro.S0000664000000000000000000001655014665263072014627 00000000000000#include "asm-i386.h" #ifdef __PIC__ TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(esi)) INSN1(push,l ,R(ebx)) INSN2(sub,l ,NUM(48), R(esp)) INSN1(call,_ ,L(44)) L(44): INSN1(pop,l ,R(ebx)) #ifdef __ELF__ INSN2(add,l ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(44)],R(ebx)) #endif INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(sub,l ,NUM(12), R(esp)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN2(mov,l ,C(vacall_function)@MEM_DISP(ebx,GOT), R(edx)) INSN1(call,_ ,INDIR(X4 MEM(edx))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(ecx)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(45)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(45)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(49)) INSN2(lea,l ,X4 MEM_DISP(ecx,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) L(3): INSN2(and,l ,NUM(512), R(ecx)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(ebx)) INSN1(pop,l ,R(esi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(13), R(ecx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(14), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) INSN2(test,l ,NUM(1024), R(ecx)) INSN2(mov,l ,R(ecx), R(esi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(57)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(58)) L(31): INSN2(and,l ,NUM(16), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-4), R(esp)) INSN1(pop,l ,R(esi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(58): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(49): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(54): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(52): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(51): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(45): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(vacall_receiver,L(fe1)-vacall_receiver) #else TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN1(push,l ,R(esi)) INSN2(sub,l ,NUM(64), R(esp)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN1(call,_ ,INDIR(X4 C(vacall_function))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(ecx)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(48)) INSN2(lea,l ,X4 MEM_DISP(ecx,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) L(3): INSN2(and,l ,NUM(512), R(ecx)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(mov,l ,X4 MEM_DISP(ebp,-4), R(esi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(13), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(14), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) INSN2(test,l ,NUM(1024), R(ecx)) INSN2(mov,l ,R(ecx), R(esi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(57)) L(31): INSN2(and,l ,NUM(16), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-4), R(esp)) INSN1(pop,l ,R(esi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(48): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(52): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(51): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(49): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(44): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(vacall_receiver,L(fe1)-vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-libapi.c0000664000000000000000000001245614662613007014312 00000000000000/* * Copyright 1995-2018 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include #include #include #include "vacall-internal.h" /* This is the implementation of the library API. The symbols that the linker sees are all prefixed with 'vacall', to avoid potential collisions with other libraries. */ #ifndef REENTRANT /* This is the function pointer vacall(). A function pointer indirection is needed because gcc-3.4 generates invalid code when the address of a symbol is casted to a function pointer with different return type. (https://gcc.gnu.org/ml/gcc-patches/2003-12/msg01767.html) */ #ifdef __cplusplus extern "C" void vacall_receiver (); /* the return type is variable, not void! */ #else extern void vacall_receiver (); /* the return type is variable, not void! */ #endif void (*vacall) () = vacall_receiver; /* This is the function called by vacall(). */ void (* vacall_function) (va_alist); #endif /* Room for returning structs according to the Sun C non-reentrant struct return convention. */ typedef union { __vaword room[__VA_ALIST_WORDS]; double align; } __va_struct_buffer_t; static __va_struct_buffer_t vacall_struct_buffer; static _Noreturn void vacall_error_type_mismatch (enum __VAtype start_type, enum __VAtype return_type) { /* If you see this, fix your code. */ fprintf (stderr, "vacall: va_start type %d and va_return type %d disagree.\n", (int)start_type, (int)return_type); abort(); } static _Noreturn void vacall_error_struct_too_large (unsigned int size) { /* If you see this, increase __VA_ALIST_WORDS: */ fprintf (stderr, "vacall: struct of size %u too large for Sun C struct return.\n", size); abort(); } void vacall_start (va_alist list, int rettype, int flags) { __va_start(list,rettype,flags); } void vacall_start_struct (va_alist list, size_t type_size, size_t type_align, int type_splittable, int flags) { __va_start_struct(list,type_size,type_align,type_splittable,flags); } char vacall_arg_char (va_alist list) { return _va_arg_char(list); } signed char vacall_arg_schar (va_alist list) { return _va_arg_schar(list); } unsigned char vacall_arg_uchar (va_alist list) { return _va_arg_uchar(list); } short vacall_arg_short (va_alist list) { return _va_arg_short(list); } unsigned short vacall_arg_ushort (va_alist list) { return _va_arg_ushort(list); } int vacall_arg_int (va_alist list) { return _va_arg_int(list); } unsigned int vacall_arg_uint (va_alist list) { return _va_arg_uint(list); } long vacall_arg_long (va_alist list) { return _va_arg_long(list); } unsigned long vacall_arg_ulong (va_alist list) { return _va_arg_ulong(list); } long long vacall_arg_longlong (va_alist list) { return _va_arg_longlong(list); } unsigned long long vacall_arg_ulonglong (va_alist list) { return _va_arg_ulonglong(list); } float vacall_arg_float (va_alist list) { return _va_arg_float(list); } double vacall_arg_double (va_alist list) { return _va_arg_double(list); } void* vacall_arg_ptr (va_alist list) { return _va_arg_ptr(list); } void* vacall_arg_struct (va_alist list, size_t type_size, size_t type_align) { return __va_arg_struct(list,type_size,type_align); } void vacall_return_void (va_alist list) { _va_return_void(list); } void vacall_return_char (va_alist list, char val) { _va_return_char(list,val); } void vacall_return_schar (va_alist list, signed char val) { _va_return_schar(list,val); } void vacall_return_uchar (va_alist list, unsigned char val) { _va_return_uchar(list,val); } void vacall_return_short (va_alist list, short val) { _va_return_short(list,val); } void vacall_return_ushort (va_alist list, unsigned short val) { _va_return_ushort(list,val); } void vacall_return_int (va_alist list, int val) { _va_return_int(list,val); } void vacall_return_uint (va_alist list, unsigned int val) { _va_return_uint(list,val); } void vacall_return_long (va_alist list, long val) { _va_return_long(list,val); } void vacall_return_ulong (va_alist list, unsigned long val) { _va_return_ulong(list,val); } void vacall_return_longlong (va_alist list, long long val) { _va_return_longlong(list,val); } void vacall_return_ulonglong (va_alist list, unsigned long long val) { _va_return_ulonglong(list,val); } void vacall_return_float (va_alist list, float val) { _va_return_float(list,val); } void vacall_return_double (va_alist list, double val) { _va_return_double(list,val); } void vacall_return_ptr (va_alist list, void* val) { _va_return_ptr(list,val); } void vacall_return_struct (va_alist list, size_t type_size, size_t type_align, const void* val_addr) { __va_return_struct(list,type_size,type_align,val_addr); } libffcall-2.5/vacall/vacall-loongarch64-macro.S0000664000000000000000000000666114665263077016273 00000000000000 .file "vacall-loongarch64.c" .text .align 2 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-272 .cfi_def_cfa_offset 272 st.d $r1,$r3,248 st.d $r22,$r3,240 la.global $r12,vacall_function .cfi_offset 1, -24 .cfi_offset 22, -32 addi.d $r22,$r3,256 .cfi_def_cfa 22, 16 addi.d $r13,$r22,16 ldptr.d $r12,$r12,0 st.d $r4,$r22,-184 st.d $r11,$r22,8 st.d $r5,$r22,-176 st.d $r6,$r22,-168 st.d $r7,$r22,-160 st.d $r8,$r22,-152 st.d $r9,$r22,-144 st.d $r10,$r22,-136 st.d $r11,$r22,-128 fst.s $f0,$r22,-116 fst.s $f1,$r22,-112 fst.s $f2,$r22,-108 fst.s $f3,$r22,-104 fst.s $f4,$r22,-100 fst.s $f5,$r22,-96 fst.s $f6,$r22,-92 fst.s $f7,$r22,-88 fst.d $f0,$r22,-80 fst.d $f1,$r22,-72 fst.d $f2,$r22,-64 fst.d $f3,$r22,-56 fst.d $f4,$r22,-48 fst.d $f5,$r22,-40 fst.d $f6,$r22,-32 fst.d $f7,$r22,-24 st.d $r13,$r22,-224 st.w $r0,$r22,-248 st.d $r0,$r22,-216 st.w $r0,$r22,-208 addi.d $r4,$r22,-248 st.w $r0,$r22,-192 st.w $r0,$r22,-120 jirl $r1,$r12,0 ldptr.w $r12,$r22,-208 beqz $r12,.L1 addi.w $r13,$r0,15 # 0xf bgtu $r12,$r13,.L1 slli.d $r12,$r12,3 la.local $r13,.L4 ldx.d $r12,$r13,$r12 jr $r12 .section .rodata .align 3 .align 2 .L4: .dword .L1 .dword .L15 .dword .L15 .dword .L14 .dword .L13 .dword .L12 .dword .L11 .dword .L10 .dword .L5 .dword .L5 .dword .L5 .dword .L5 .dword .L7 .dword .L6 .dword .L5 .dword .L3 .text .L5: ld.d $r4,$r22,-240 .L1: ld.d $r1,$r3,248 .cfi_remember_state .cfi_restore 1 ld.d $r22,$r3,240 .cfi_restore 22 addi.d $r3,$r3,272 .cfi_def_cfa 3, 0 jr $r1 .L15: .cfi_restore_state ld.b $r4,$r22,-240 b .L1 .L10: ld.wu $r4,$r22,-240 b .L1 .L14: ld.bu $r4,$r22,-240 b .L1 .L13: ld.h $r4,$r22,-240 b .L1 .L12: ld.hu $r4,$r22,-240 b .L1 .L11: ldptr.w $r4,$r22,-240 b .L1 .L6: fld.d $f0,$r22,-240 b .L1 .L7: fld.s $f0,$r22,-240 b .L1 .L3: ldptr.w $r12,$r22,-248 andi $r12,$r12,1024 beqz $r12,.L1 ld.d $r13,$r22,-200 addi.w $r12,$r0,15 # 0xf addi.d $r14,$r13,-1 bgtu $r14,$r12,.L1 ld.d $r14,$r22,-216 addi.w $r15,$r0,-8 # 0xfffffffffffffff8 addi.w $r12,$r0,8 # 0x8 andi $r16,$r14,7 add.d $r17,$r13,$r16 and $r14,$r14,$r15 ldptr.d $r19,$r14,0 slli.w $r15,$r17,3 slli.w $r18,$r16,3 bgtu $r13,$r12,.L17 bgtu $r17,$r12,.L18 addi.w $r15,$r15,-1 addi.w $r4,$r0,2 # 0x2 sll.d $r4,$r4,$r15 addi.d $r4,$r4,-1 and $r4,$r4,$r19 sra.d $r4,$r4,$r18 b .L1 .L17: addi.w $r13,$r0,16 # 0x10 ld.d $r20,$r14,8 sra.d $r19,$r19,$r18 sub.d $r12,$r12,$r16 bgtu $r17,$r13,.L19 addi.w $r15,$r15,-65 addi.w $r5,$r0,2 # 0x2 sll.d $r5,$r5,$r15 addi.d $r5,$r5,-1 and $r5,$r5,$r20 slli.w $r12,$r12,2 sll.d $r4,$r5,$r12 sll.d $r4,$r4,$r12 or $r4,$r4,$r19 sra.d $r5,$r5,$r18 b .L1 .L18: ld.d $r14,$r14,8 addi.w $r15,$r15,-65 addi.w $r13,$r0,2 # 0x2 sll.d $r13,$r13,$r15 addi.d $r13,$r13,-1 sub.d $r12,$r12,$r16 and $r13,$r13,$r14 slli.w $r12,$r12,3 sll.d $r12,$r13,$r12 sra.d $r19,$r19,$r18 or $r4,$r12,$r19 b .L1 .L19: ld.d $r14,$r14,16 addi.w $r15,$r15,-129 addi.w $r13,$r0,2 # 0x2 sll.d $r13,$r13,$r15 addi.d $r13,$r13,-1 slli.w $r12,$r12,3 and $r13,$r13,$r14 sll.d $r4,$r20,$r12 sll.d $r12,$r13,$r12 sra.d $r20,$r20,$r18 or $r4,$r4,$r19 or $r5,$r12,$r20 b .L1 .cfi_endproc .LFE0: .size vacall_receiver, .-vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-mipsn32eb-linux.s0000664000000000000000000001144714665263073016037 00000000000000 .file 1 "vacall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,256,$31 # vars= 144, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $28,168($sp) lui $28,%hi(__gnu_local_gp) addiu $28,$28,%lo(__gnu_local_gp) lw $12,%got_disp(vacall_function)($28) sd $fp,176($sp) move $fp,$sp lw $25,0($12) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $4,192($fp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) swc1 $f19,72($fp) move $4,$fp sw $0,0($fp) sw $12,24($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L49 li $13,4 # 0x4 beq $12,$13,.L50 li $13,5 # 0x5 beq $12,$13,.L51 li $13,6 # 0x6 beq $12,$13,.L46 li $13,7 # 0x7 beq $12,$13,.L45 li $13,8 # 0x8 beq $12,$13,.L46 li $13,9 # 0x9 beq $12,$13,.L45 li $13,10 # 0xa beq $12,$13,.L47 li $13,11 # 0xb beq $12,$13,.L47 li $13,12 # 0xc beq $12,$13,.L52 li $13,13 # 0xd beq $12,$13,.L53 li $13,14 # 0xe beq $12,$13,.L46 li $13,15 # 0xf bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 # 0x1 beq $12,$13,.L54 li $13,2 # 0x2 beq $12,$13,.L55 li $13,4 # 0x4 beq $12,$13,.L56 li $13,8 # 0x8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($15) sll $13,$13,3 li $15,-1 # 0xffffffffffffffff dsll $13,$15,$13 and $13,$13,$25 sll $14,$14,3 dsll $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $24,$13,.L57 li $13,8 # 0x8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 # 0x10 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $24,$12,.L61 li $12,16 # 0x10 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 subu $13,$0,$13 ld $17,8($15) subu $16,$0,$14 li $25,-1 # 0xffffffffffffffff sll $13,$13,3 dsll $13,$25,$13 sll $25,$16,2 ld $16,0($15) and $13,$13,$17 addiu $15,$25,32 sll $14,$14,3 dsra $25,$13,$15 dsll $16,$16,$14 dsra $15,$25,$15 or $2,$16,$15 b .L23 dsll $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($15) ld $16,8($15) ld $17,0($15) subu $25,$0,$14 li $15,-1 # 0xffffffffffffffff sll $13,$13,3 sll $25,$25,3 dsll $13,$15,$13 sll $14,$14,3 addiu $15,$25,64 and $13,$13,$18 dsll $25,$17,$14 dsra $13,$13,$15 dsra $17,$16,$15 dsll $14,$16,$14 or $2,$25,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($15) ld $25,0($15) sll $13,$13,3 li $15,-1 # 0xffffffffffffffff dsll $13,$15,$13 subu $15,$0,$14 and $13,$13,$16 sll $15,$15,3 sll $14,$14,3 dsra $13,$13,$15 dsll $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/vacall-powerpc-linux.s0000664000000000000000000000465014665263075015714 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 li 11,0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 9,76(31) addi 0,31,184 lis 9,vacall_function@ha stw 3,52(31) lwz 9,vacall_function@l(9) addi 3,31,16 stw 5,60(31) mtctr 9 stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 0,32(31) stw 11,84(31) stw 4,56(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 11,16(31) stw 11,48(31) stw 11,36(31) stw 11,40(31) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 10,0,0,30,31 rlwinm 6,0,0,0,29 add 7,10,9 bgt- 0,.L33 slwi 0,10,3 cmplwi 0,7,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 8,9,-1 bgt- 0,.L34 lwz 9,0(6) slwi 0,7,3 subfic 0,0,32 and 9,9,8 sraw 3,9,0 b .L1 .L34: lwz 0,0(6) slwi 9,7,3 lwz 11,4(6) subfic 10,9,64 and 0,0,8 addi 9,9,-32 slw 0,0,9 sraw 11,11,10 .L39: or 3,11,0 b .L1 .L33: slwi 0,10,3 cmplwi 0,7,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 5,9,-1 bgt- 0,.L37 lwz 8,0(6) slwi 11,7,2 addi 11,11,-16 lwz 10,4(6) and 8,8,5 slwi 9,7,3 subfic 9,9,64 slw 0,8,11 slw 0,0,11 sraw 10,10,9 or 4,0,10 sraw 3,8,9 b .L1 .L37: slwi 9,7,3 lwz 0,4(6) lwz 11,0(6) subfic 7,9,96 lwz 10,8(6) addi 9,9,-64 slw 8,0,9 and 11,11,5 sraw 10,10,7 slw 11,11,9 sraw 0,0,7 or 4,8,10 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size vacall_receiver, .-vacall_receiver .section .note.GNU-stack,"",@progbits .ident "GCC: (GNU) 3.3.6" libffcall-2.5/vacall/vacall-riscv32-ilp32d-macro.S0000664000000000000000000001110114665263077016514 00000000000000#ifdef __PIC__ .file "vacall-riscv32.c" .option pic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 la t1,vacall_function lw t1,0(t1) sw a0,-148(s0) add a0,s0,16 sw a7,12(s0) sw a1,-144(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a0,-168(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) add a0,s0,-184 sw zero,-152(s0) sw zero,-116(s0) jalr t1 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size vacall_receiver, .-vacall_receiver #else .file "vacall-riscv32.c" .option nopic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 lui t1,%hi(vacall_function) lw t1,%lo(vacall_function)(t1) sw a0,-148(s0) add a0,s0,16 sw a7,12(s0) sw a1,-144(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a0,-168(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) add a0,s0,-184 sw zero,-152(s0) sw zero,-116(s0) jalr t1 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size vacall_receiver, .-vacall_receiver #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-mips.c0000664000000000000000000001001214662613007014004 00000000000000/* vacall function for mips CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifndef REENTRANT typedef void (*func_pointer)(va_alist); #else /* REENTRANT */ #define vacall_receiver callback_receiver typedef void (*func_pointer)(void*,va_alist); register struct { func_pointer vacall_function; void* arg; } * env __asm__("$2"); #endif register float farg1 __asm__("$f12"); register float farg2 __asm__("$f14"); register double darg1 __asm__("$f12"); register double darg2 __asm__("$f14"); register __varword iret __asm__("$2"); register __varword iret2 __asm__("$3"); register float fret __asm__("$f0"); register double dret __asm__("$f0"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword firstword) { __va_alist list; /* gcc-2.6.3 source says: When a parameter is passed in a register, * stack space is still allocated for it. */ /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-4] = word1; (&firstword)[-3] = word2; (&firstword)[-2] = word3; (&firstword)[-1] = word4; list.darg[0] = darg1; list.darg[1] = darg2; list.farg[0] = farg1; list.farg[1] = farg2; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 4); list.raddr = (void*)0; list.rtype = __VAvoid; list.memargptr = (long)&firstword; list.anum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_SMALL_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } } else { iret = (long)list.raddr; } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-hppa64-macro.S0000664000000000000000000001017414665263073015235 00000000000000#include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) DEF(vacall_receiver) .PROC .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=8 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,384(%r30) std %r4,224(%r3) copy %r27,%r4 std %r8,192(%r3) std %r7,200(%r3) std %r6,208(%r3) std %r5,216(%r3) std %r26,-64(%r29) std %r19,-8(%r29) std %r25,-56(%r29) std %r24,-48(%r29) std %r23,-40(%r29) std %r22,-32(%r29) std %r21,-24(%r29) std %r20,-16(%r29) fstw %fr4R,88(%r3) fstw %fr5R,92(%r3) fstw %fr6R,96(%r3) fstw %fr7R,100(%r3) fstw %fr8R,104(%r3) fstw %fr9R,108(%r3) fstw %fr10R,112(%r3) fstw %fr11R,116(%r3) fstd %fr10,168(%r3) addil LT!vacall_function,%r27 ldo -64(%r29),%r31 ldd RT!vacall_function(%r1),%r1 ldo 16(%r3),%r26 std %r31,40(%r3) std %r29,80(%r3) ldo -16(%r30),%r29 ldd 0(%r1),%r31 fstd %fr11,176(%r3) fstd %fr4,120(%r3) fstd %fr5,128(%r3) fstd %fr6,136(%r3) fstd %fr7,144(%r3) fstd %fr8,152(%r3) fstd %fr9,160(%r3) stw %r0,16(%r3) std %r0,48(%r3) stw %r0,56(%r3) ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldw 56(%r3),%r31 cmpib,= 0,%r31,L(1) copy %r4,%r27 cmpib,=,n 1,%r31,L(43) cmpib,=,n 2,%r31,L(43) cmpib,=,n 3,%r31,L(44) cmpib,=,n 4,%r31,L(45) cmpib,=,n 5,%r31,L(46) cmpib,=,n 6,%r31,L(47) cmpib,=,n 7,%r31,L(41) cmpib,=,n 8,%r31,L(40) cmpib,=,n 10,%r31,L(40) cmpib,=,n 9,%r31,L(40) cmpib,=,n 11,%r31,L(40) cmpib,=,n 12,%r31,L(48) cmpib,=,n 13,%r31,L(49) cmpib,=,n 14,%r31,L(40) cmpib,= 15,%r31,L(50) ldw 16(%r3),%r31 DEF(L(1)) ldd -16(%r3),%r2 ldd 192(%r3),%r8 ldd 200(%r3),%r7 ldd 208(%r3),%r6 ldd 216(%r3),%r5 ldd 224(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 DEF(L(50)) extrd,u %r31,53+1-1,1,%r31 cmpib,= 0,%r31,L(1) ldd 48(%r3),%r28 ldd 48(%r3),%r31 ldd 64(%r3),%r2 extrd,u %r31,63,3,%r6 copy %r31,%r1 depdi 0,63,3,%r1 cmpib,*<< 8,%r2,L(32) add,l %r6,%r2,%r4 cmpib,*<< 8,%r4,L(33) depd,z %r4,60,61,%r31 subi 64,%r31,%r31 ldd 0(%r1),%r2 extrd,s %r31,63,32,%r31 mtsarcm %r31 depd,z %r6,60,61,%r4 depdi,z 1,%sar,64,%r31 mtsarcm %r4 sub %r0,%r31,%r31 and %r2,%r31,%r2 depd,z %r2,%sar,64,%r2 b L(1) copy %r2,%r28 DEF(L(33)) subi 128,%r31,%r31 depd,z %r6,60,61,%r2 extrd,s %r31,63,32,%r31 subi 64,%r2,%r5 mtsarcm %r31 subi 63,%r2,%r7 depdi,z 1,%sar,64,%r31 mtsar %r7 ldd 8(%r1),%r4 sub %r0,%r31,%r31 extrd,s %r5,63,32,%r5 ldd 0(%r1),%r2 subi 63,%r5,%r5 and %r4,%r31,%r4 depd,z %r2,%sar,64,%r2 mtsar %r5 extrd,s %r4,%sar,64,%r4 DEF(L(39)) b L(1) or %r4,%r2,%r28 DEF(L(32)) ldi 16,%r31 cmpb,*<< %r31,%r4,L(36) depd,z %r4,60,61,%r31 subi 128,%r31,%r31 depd,z %r6,61,62,%r2 extrd,s %r31,63,32,%r31 subi 32,%r2,%r2 mtsarcm %r31 extrd,s %r2,63,32,%r2 depdi,z 1,%sar,64,%r31 subi 63,%r2,%r7 ldd 8(%r1),%r4 sub %r0,%r31,%r31 mtsar %r7 ldd 0(%r1),%r5 and %r4,%r31,%r4 depd,z %r6,60,61,%r31 extrd,s %r4,%sar,64,%r2 subi 63,%r31,%r31 extrd,s %r2,%sar,64,%r2 mtsar %r31 depd,z %r4,%sar,64,%r4 depd,z %r5,%sar,64,%r5 copy %r4,%r29 b L(1) or %r5,%r2,%r28 DEF(L(36)) subi 192,%r31,%r31 depd,z %r6,60,61,%r2 extrd,s %r31,63,32,%r31 subi 64,%r2,%r6 mtsarcm %r31 subi 63,%r2,%r8 depdi,z 1,%sar,64,%r31 mtsar %r8 ldd 8(%r1),%r2 sub %r0,%r31,%r31 ldd 16(%r1),%r5 extrd,s %r6,63,32,%r6 subi 63,%r6,%r6 and %r5,%r31,%r5 ldd 0(%r1),%r4 depd,z %r2,%sar,64,%r31 mtsar %r6 extrd,s %r5,%sar,64,%r5 mtsar %r8 depd,z %r4,%sar,64,%r4 or %r31,%r5,%r29 mtsar %r6 b L(39) extrd,s %r2,%sar,64,%r2 DEF(L(40)) b L(1) ldd 24(%r3),%r28 DEF(L(49)) b L(40) fldd 24(%r3),%fr4 DEF(L(48)) fldw 24(%r3),%fr4R DEF(L(41)) ldw 24(%r3),%r31 DEF(L(42)) b L(1) copy %r31,%r28 DEF(L(47)) ldw 24(%r3),%r31 b L(1) extrd,s %r31,63,32,%r28 DEF(L(46)) b L(42) ldh 24(%r3),%r31 DEF(L(45)) ldh 24(%r3),%r31 b L(1) extrd,s %r31,63,16,%r28 DEF(L(44)) b L(42) ldb 24(%r3),%r31 DEF(L(43)) ldb 24(%r3),%r31 b L(1) extrd,s %r31,63,8,%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(vacall_receiver) IMPORT_DATA(vacall_function) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-m68k-linux.s0000664000000000000000000000456614665263072015025 00000000000000 .file "vacall-m68k.c" .text .align 2 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: link.w %a6,#-32 movm.l #0x3030,-(%sp) clr.l -32(%a6) lea (8,%a6),%a2 move.l %a2,-20(%a6) clr.l -16(%a6) clr.l -12(%a6) move.l %a1,-4(%a6) pea -32(%a6) move.l vacall_function,%a2 jbsr (%a2) addq.l #4,%sp move.l -12(%a6),%a3 tst.l %a3 jbeq .L1 moveq.l #1,%d2 cmp.l %a3,%d2 jbeq .L46 moveq.l #2,%d3 cmp.l %a3,%d3 jbeq .L46 moveq.l #3,%d2 cmp.l %a3,%d2 jbeq .L47 moveq.l #4,%d3 cmp.l %a3,%d3 jbeq .L48 moveq.l #5,%d2 cmp.l %a3,%d2 jbeq .L49 moveq.l #6,%d3 cmp.l %a3,%d3 jbeq .L45 moveq.l #7,%d2 cmp.l %a3,%d2 jbeq .L45 moveq.l #8,%d3 cmp.l %a3,%d3 jbeq .L45 moveq.l #9,%d2 cmp.l %a3,%d2 jbeq .L45 lea (-10,%a3),%a2 moveq.l #1,%d3 cmp.l %a2,%d3 jbcs .L22 move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra .L1 .align 2 .L22: moveq.l #12,%d2 cmp.l %a3,%d2 jbeq .L50 moveq.l #13,%d2 cmp.l %a3,%d2 jbeq .L51 moveq.l #14,%d3 cmp.l %a3,%d3 jbeq .L52 moveq.l #15,%d2 cmp.l %a3,%d2 jbne .L1 btst #2,-30(%a6) jbeq .L1 move.l -8(%a6),%d2 moveq.l #1,%d3 cmp.l %d2,%d3 jbeq .L53 moveq.l #2,%d3 cmp.l %d2,%d3 jbeq .L54 moveq.l #4,%d3 cmp.l %d2,%d3 jbeq .L55 moveq.l #8,%d3 cmp.l %d2,%d3 jbne .L1 move.l -16(%a6),%a2 move.l (%a2),%d0 move.l 4(%a2),%d1 jbra .L1 .align 2 .L55: move.l -16(%a6),%a2 move.l (%a2),%d0 jbra .L1 .align 2 .L54: move.l -16(%a6),%a2 clr.l %d0 move.w (%a2),%d0 jbra .L1 .align 2 .L53: move.l -16(%a6),%a2 clr.l %d0 move.b (%a2),%d0 jbra .L1 .align 2 .L52: move.l -28(%a6),%d0 move.l %d0,%a0 jbra .L1 .align 2 .L51: btst #6,-29(%a6) jbeq .L31 fmove.d -28(%a6),%fp0 jbra .L1 .align 2 .L31: move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra .L1 .align 2 .L50: move.l -32(%a6),%d2 btst #6,%d2 jbeq .L25 fmove.s -28(%a6),%fp0 jbra .L1 .align 2 .L25: btst #5,%d2 jbeq .L27 fmove.s -28(%a6),%fp1 fmove.d %fp1,-(%sp) move.l (%sp)+,%d0 move.l (%sp)+,%d1 jbra .L1 .align 2 .L27: move.l -28(%a6),%d0 jbra .L1 .align 2 .L45: move.l -28(%a6),%d0 jbra .L1 .align 2 .L49: clr.l %d0 move.w -28(%a6),%d0 jbra .L1 .align 2 .L48: move.w -28(%a6),%d0 ext.l %d0 jbra .L1 .align 2 .L47: clr.l %d0 move.b -28(%a6),%d0 jbra .L1 .align 2 .L46: move.b -28(%a6),%d0 extb.l %d0 .L1: movm.l -48(%a6),#0xc0c unlk %a6 rts .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-arm64-macro.S0000664000000000000000000000561614665263075015073 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) stp x29, x30, [sp, -256]! adrp x9, GOTPAGE(C(vacall_function)) add x29, sp, 0 add x10, x29, 256 stp s0, s1, [x29, 156] ldr x9, [x9, GOTPAGEOFF(C(vacall_function))] GOTINDIR(x9) stp x0, x1, [x29, 88] stp s2, s3, [x29, 164] stp x10, xzr, [x29, 40] stp s4, s5, [x29, 172] str x8, [x29, 72] stp s6, s7, [x29, 180] stp x2, x3, [x29, 104] stp d0, d1, [x29, 192] stp x4, x5, [x29, 120] stp d2, d3, [x29, 208] stp x6, x7, [x29, 136] str wzr, [x29, 16] add x0, x29, 16 str wzr, [x29, 56] str wzr, [x29, 80] str wzr, [x29, 152] stp d4, d5, [x29, 224] stp d6, d7, [x29, 240] blr x9 ldr w9, [x29, 56] cbz w9, L(1) cmp w9, 1 beq L(25) cmp w9, 2 beq L(29) cmp w9, 3 beq L(25) cmp w9, 4 beq L(30) cmp w9, 5 beq L(31) cmp w9, 6 beq L(32) cmp w9, 7 beq L(33) and w10, w9, -3 cmp w10, 8 beq L(27) cmp w10, 9 beq L(27) cmp w9, 12 beq L(34) cmp w9, 13 beq L(35) cmp w9, 14 beq L(27) cmp w9, 15 bne L(1) ldr w9, [x29, 16] tbz x9, 10, L(1) ldr x9, [x29, 64] sub x10, x9, $1 cmp x10, 15 bhi L(1) ldr x11, [x29, 48] cmp x9, 8 and x10, x11, 7 and x11, x11, -8 add x9, x9, x10 bhi L(15) cmp x9, 8 lsl w9, w9, 3 bhi L(16) mov x12, 2 sub w9, w9, $1 lsl x9, x12, x9 ldr x11, [x11] sub x9, x9, $1 lsl w10, w10, 3 and x9, x9, x11 asr x0, x9, x10 L(1): ldp x29, x30, [sp], 256 ret .p2align 3 L(25): ldrb w0, [x29, 24] ldp x29, x30, [sp], 256 ret .p2align 3 L(27): ldr x0, [x29, 24] b L(1) .p2align 3 L(29): ldrsb x0, [x29, 24] b L(1) .p2align 3 L(30): ldrsh x0, [x29, 24] b L(1) .p2align 3 L(31): ldrh w0, [x29, 24] b L(1) .p2align 3 L(32): ldrsw x0, [x29, 24] b L(1) .p2align 3 L(33): ldr w0, [x29, 24] b L(1) L(34): ldr s0, [x29, 24] b L(1) L(35): ldr d0, [x29, 24] b L(1) L(15): cmp x9, 16 lsl w9, w9, 3 bls L(36) mov x13, 2 sub w9, w9, $129 ldp x14, x12, [x11, 8] lsl x9, x13, x9 lsl w15, w10, 3 sub x9, x9, $1 neg w10, w10, lsl 3 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 lsl x16, x14, x10 asr x11, x11, x15 asr x14, x14, x15 lsl x10, x9, x10 orr x0, x11, x16 orr x1, x10, x14 b L(1) L(16): mov w13, -8 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x9, x11 b L(1) L(36): mov w13, -4 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 32 and x9, x9, x12 asr x1, x9, x15 lsl x9, x9, x10 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x11, x9 b L(1) FUNEND(vacall_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/vacall/vacall-mipseb-linux.s0000664000000000000000000000754114665263073015514 00000000000000 .file 1 "vacall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,104,$31 # vars= 72, regs= 2/0, args= 16, gp= 8 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) la $8,vacall_function sw $4,104($fp) lw $25,0($8) addiu $4,$fp,104 sw $4,40($fp) addiu $4,$fp,120 sw $4,56($fp) .cprestore 16 addiu $4,$fp,24 sw $5,108($fp) sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 # 0x1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 # 0x1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 # 0x2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/vacall-armhf-eabi-linux.s0000664000000000000000000000520014665263074016217 00000000000000 .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .file "vacall-armhf.c" .text .align 2 .global vacall_receiver .syntax unified .arm .fpu vfpv3-d16 .type vacall_receiver, %function vacall_receiver: @ args = 20, pretend = 16, frame = 176 @ frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, #16 mov ip, #0 push {r4, r5, fp, lr} add fp, sp, #12 ldr r4, .L32 add lr, fp, #4 add r5, fp, #20 sub sp, sp, #176 stm lr, {r0, r1, r2, r3} vstr.32 s0, [fp, #-144] vstr.32 s1, [fp, #-140] vstr.32 s2, [fp, #-136] vstr.32 s3, [fp, #-132] vstr.32 s4, [fp, #-128] vstr.32 s5, [fp, #-124] vstr.32 s6, [fp, #-120] vstr.32 s7, [fp, #-116] vstr.32 s8, [fp, #-112] vstr.32 s9, [fp, #-108] vstr.32 s10, [fp, #-104] vstr.32 s11, [fp, #-100] vstr.32 s12, [fp, #-96] vstr.32 s13, [fp, #-92] vstr.32 s14, [fp, #-88] vstr.32 s15, [fp, #-84] vstr.64 d0, [fp, #-76] vstr.64 d1, [fp, #-68] vstr.64 d2, [fp, #-60] vstr.64 d3, [fp, #-52] vstr.64 d4, [fp, #-44] vstr.64 d5, [fp, #-36] vstr.64 d6, [fp, #-28] vstr.64 d7, [fp, #-20] str lr, [fp, #-156] str ip, [fp, #-188] sub r0, fp, #188 str ip, [fp, #-152] ldr r3, [r4] str r5, [fp, #-172] str ip, [fp, #-148] str ip, [fp, #-168] strb ip, [fp, #-164] blx r3 ldrb r3, [fp, #-164] @ zero_extendqisi2 cmp r3, #0 beq .L1 cmp r3, #1 beq .L25 cmp r3, #2 ldrsbeq r0, [fp, #-180] beq .L1 cmp r3, #3 beq .L25 cmp r3, #4 ldrsheq r0, [fp, #-180] beq .L1 cmp r3, #5 ldrheq r0, [fp, #-180] beq .L1 cmp r3, #6 beq .L27 cmp r3, #7 beq .L27 cmp r3, #8 beq .L27 cmp r3, #9 beq .L27 sub r2, r3, #10 cmp r2, #1 bls .L29 cmp r3, #12 vldreq.32 s0, [fp, #-180] beq .L1 cmp r3, #13 beq .L30 cmp r3, #14 beq .L27 cmp r3, #15 bne .L1 ldr r3, [fp, #-188] tst r3, #1024 beq .L1 ldr r3, [fp, #-160] cmp r3, #1 beq .L31 cmp r3, #2 ldr r3, [fp, #-168] ldrheq r0, [r3] ldrne r0, [r3] .L1: sub sp, fp, #12 @ sp needed pop {r4, r5, fp, lr} add sp, sp, #16 bx lr .L25: ldrb r0, [fp, #-180] @ zero_extendqisi2 sub sp, fp, #12 @ sp needed pop {r4, r5, fp, lr} add sp, sp, #16 bx lr .L27: ldr r0, [fp, #-180] sub sp, fp, #12 @ sp needed pop {r4, r5, fp, lr} add sp, sp, #16 bx lr .L30: vldr.64 d0, [fp, #-180] b .L1 .L29: ldr r0, [fp, #-180] ldr r1, [fp, #-176] b .L1 .L31: ldr r3, [fp, #-168] ldrb r0, [r3] @ zero_extendqisi2 b .L1 .L33: .align 2 .L32: .word vacall_function .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 6.5.0" .section .note.GNU-stack,"",%progbits libffcall-2.5/vacall/vacall.html0000664000000000000000000002527213136760230013572 00000000000000 VACALL manual page

VACALL manual page

Name

 vacall - C functions called with variable arguments

Synopsis

 
#include <vacall.h>


extern void* vacall_function;


void function (va_alist alist)
{
  va_start_type(alist[, return_type]);
  arg = va_arg_type(alist[, arg_type]);
  va_return_type(alist[[, return_type], return_value]);
}


vacall_function = &function;


val = ((return_type (*) ()) vacall) (arg1,arg2,...);

Description

 This set of macros permit a C function function to be called with variable arguments and to return variable return values. This is much like the stdarg(3) facility, but also allows the return value to be specified at run time.

Function calling conventions differ considerably on different machines, and vacall attempts to provide some degree of isolation from such architecture dependencies.

The function that can be called with any number and type of arguments and which will return any type of return value is vacall. It will do some magic and call the function stored in the variable vacall_function. If you want to make more than one use of vacall, use the trampoline(3) facility to store &function into vacall_function just before calling vacall.

Within function, the following macros can be used to walk through the argument list and specify a return value: 

va_start_type(alist[, return_type]);
starts the walk through the argument list and specifies the return type. 

arg = va_arg_type(alist[, arg_type]);
fetches the next argument from the argument list. 

va_return_type(alist[[, return_type], return_value]);
ends the walk through the argument list and specifies the return value.

The type in va_start_type and va_return_type shall be one of void, int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of return_type.

The type specifiers in va_start_type and va_return_type must be the same. The return_type specifiers passed to va_start_type and va_return_type must be the same.

The type in va_arg_type shall be one of int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of arg_type.

In va_start_struct(alist, return_type, splittable); the splittable flag specifies whether the struct return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: 

va_word_splittable_1 (type1)
va_word_splittable_2 (type1, type2)
va_word_splittable_3 (type1, type2, type3)
va_word_splittable_4 (type1, type2, type3, type4)
For a struct with three slots 
struct { type1 id1; type2 id2; type3 id3; }
you can specify splittable as va_word_splittable_3 (type1, type2, type3).

Notes
  1. Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the type values char, schar, uchar, short, ushort, float. As prescribed by the default K&R C expression promotions, they have to use int instead of char, schar, uchar, short, ushort and double instead of float.

  2. The macros va_start_longlong(), va_start_ulonglong(), va_return_longlong(), va_return_ulonglong(), va_arg_longlong() and va_arg_ulonglong() work only if the C compiler has a working long long 64-bit integer type.

  3. The struct types used in va_start_struct() and va_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported.

Example

 This example, a possible implementation of execl(3) on top of execv(2) using stdarg(3), 
#include <stdarg.h>
#define MAXARGS 100
/* execl is called by execl(file, arg1, arg2, ..., (char *)0); */
int execl (...)
{
  va_list ap;
  char* file;
  char* args[MAXARGS];
  int argno = 0;
  va_start (ap);
  file = va_arg(ap, char*);
  while ((args[argno] = va_arg(ap, char*)) != (char *)0)
    argno++;
  va_end (ap);
  return execv(file, args);
}
looks like this using vacall(3): 
#include <vacall.h>
#define MAXARGS 100
/* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */
void execl (va_alist ap)
{
  char* file;
  char* args[MAXARGS];
  int argno = 0;
  int retval;
  va_start_int (ap);
  file = va_arg_ptr(ap, char*);
  while ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0)
    argno++;
  retval = execv(file, args);
  va_return_int (ap, retval);
}
vacall_function = &execl;

See also

stdarg(3), trampoline(3), callback(3).

Bugs

 The current implementations have been tested on a selection of common cases but there are probably still many bugs.

There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments.

The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in registers and struct { char a[3]; } in memory, although both types have the same size and the same alignment.

The argument list can only be walked once.

The use of the global variable vacall_function is not reentrant. This is fixed in the callback(3) package.

Porting

Knowledge about argument passing conventions can be found in the gcc source, file gcc-2.6.3/config/cpu/cpu.h, section "Stack layout; function entry, exit and calling."

The implementation of varargs for gcc can be found in the gcc source, files gcc-2.6.3/ginclude/va*.h.

gcc's __builtin_saveregs() function is defined in the gcc source, file gcc-2.6.3/libgcc2.c.

Author

Bruno Haible <bruno@clisp.org>

Acknowledgements

 Many ideas and a lot of code were cribbed from the gcc source.

VACALL manual page
Bruno Haible <bruno@clisp.org>

Last modified: 1 January 2017. libffcall-2.5/vacall/vacall-sparc64-macro.S0000664000000000000000000002657314665263073015427 00000000000000#include "asm-sparc.h" #ifdef __PIC__ .section ".text" .align 4 L(LADDPC0): jmp %o7+8 add %o7, %l7, %l7 .align 4 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) .proc 020 FUNBEGIN(vacall_receiver) .register %g2, $scratch .register %g3, $scratch save %sp, -448, %sp add %fp, 2175, %g1 stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call L(LADDPC0) add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 st %f23, [%fp+1879] stx %g1, [%fp+1799] sethi %hi(C(vacall_function)), %g1 or %g1, %lo(C(vacall_function)), %g1 st %f25, [%fp+1883] ldx [%l7+%g1], %g2 st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] stx %g0, [%fp+1807] st %g0, [%fp+1815] st %g0, [%fp+1831] ldx [%g2], %g3 call %g3, 0 add %fp, 1775, %o0 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, L(L61) cmp %g1, 1 be,pn %icc, L(L50) cmp %g1, 2 be,pn %icc, L(L50) cmp %g1, 3 be,pn %icc, L(L53) cmp %g1, 4 be,pn %icc, L(L54) cmp %g1, 5 be,pn %icc, L(L55) cmp %g1, 6 be,pn %icc, L(L56) cmp %g1, 7 be,pn %icc, L(L57) cmp %g1, 8 be,pn %icc, L(L51) cmp %g1, 9 be,pn %icc, L(L51) cmp %g1, 10 be,pn %icc, L(L51) cmp %g1, 11 be,pn %icc, L(L51) cmp %g1, 12 be,pn %icc, L(L58) cmp %g1, 13 be,pn %icc, L(L59) cmp %g1, 14 be,pn %icc, L(L51) cmp %g1, 15 bne,pt %icc, L(L61) lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, L(L61) ldx [%fp+1823], %g5 add %g5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, L(L61) ldx [%fp+1807], %g1 cmp %g5, 8 and %g1, 7, %o2 and %g1, -8, %l0 bgu,pt %xcc, L(L35) add %g5, %o2, %g2 cmp %g2, 8 bgu,pt %xcc, L(L37) sllx %o2, 3, %g4 sllx %g2, 3, %g2 ldx [%l0], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 L(L47): ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g4 ldx [%l0+16], %g5 sllx %g4, %o4, %o1 sllx %g5, %o4, %o0 ldx [%l0+24], %o5 sllx %g2, 3, %o3 sllx %o5, %o4, %o7 ldx [%l0+32], %o2 sub %g0, %o3, %o3 mov 64, %g3 sub %g3, %o4, %g3 srax %g4, %g3, %g4 srax %g5, %g3, %g5 or %g1, %g4, %i0 srax %o5, %g3, %o5 mov -1, %g1 or %o1, %g5, %i1 sllx %g1, %o3, %g1 or %o0, %o5, %i2 and %g1, %o2, %g1 srax %g1, %g3, %g1 or %o7, %g1, %i3 L(L61): return %i7+8 nop L(L50): ldsb [%fp+1783], %i0 return %i7+8 nop L(L54): ldsh [%fp+1783], %i0 return %i7+8 nop L(L53): ldub [%fp+1783], %i0 return %i7+8 nop L(L51): ldx [%fp+1783], %i0 return %i7+8 nop L(L55): lduh [%fp+1783], %i0 return %i7+8 nop L(L56): ldsw [%fp+1783], %i0 return %i7+8 nop L(L57): lduw [%fp+1783], %i0 return %i7+8 nop L(L58): ld [%fp+1783], %f0 return %i7+8 nop L(L59): ldd [%fp+1783], %f0 return %i7+8 nop L(L35): cmp %g5, 16 bgu,pt %xcc, L(L39) cmp %g5, 24 cmp %g2, 16 bgu,pt %xcc, L(L41) sllx %o2, 3, %o5 sllx %g2, 3, %g3 ldx [%l0+8], %g2 sll %o2, 3, %g5 sllx %o2, 2, %o5 sub %g0, %g3, %g3 ldx [%l0], %g4 mov -1, %g1 sllx %g4, %g5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %g5, %i1 sub %g2, %o5, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 L(L37): sllx %g2, 3, %g3 ldx [%l0+8], %g5 sub %g0, %g3, %g3 sub %g0, %g4, %o5 ldx [%l0], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %g5, %g1 srax %g1, %o5, %g1 return %i7+8 or %g2, %g1, %o0 L(L39): bgu,pt %xcc, L(L43) cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, L(L45) sllx %o2, 3, %o4 sllx %o2, 2, %g1 sll %o2, 3, %g5 sllx %g2, 3, %o5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %g5, %o3 sub %g0, %o5, %o5 mov 32, %g4 ldx [%l0], %g2 sub %g4, %g1, %g4 sllx %g2, %g5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o5, %g1 and %g1, %o4, %g1 sllx %g1, %g5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L41): sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %o5, %o3 sub %g0, %g5, %g5 mov 64, %g4 ldx [%l0], %g2 sub %g4, %o5, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L45): ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o4, %o3 sllx %g4, %o4, %o1 sllx %g2, 3, %o5 ldx [%l0+24], %o2 sub %g0, %o5, %o5 mov 64, %g5 sub %g5, %o4, %g5 srax %g3, %g5, %g3 srax %g4, %g5, %g4 or %g1, %g3, %i0 or %o3, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 srax %g1, %g5, %g1 or %o1, %g1, %i2 return %i7+8 nop L(L43): bgu,pt %xcc, L(L47) sllx %o2, 3, %o4 sll %o2, 3, %o5 ldx [%l0], %g1 sllx %g1, %o5, %g1 sllx %o2, 2, %o4 sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o5, %o2 sllx %g4, %o5, %o1 ldx [%l0+24], %o3 sub %g0, %g5, %g5 mov 32, %g2 sub %g2, %o4, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o1, %g1, %i2 return %i7+8 nop FUNEND(vacall_receiver) #else .section ".text" .align 4 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) .proc 020 FUNBEGIN(vacall_receiver) .register %g2, $scratch .register %g3, $scratch save %sp, -448, %sp add %fp, 2175, %g1 stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] sethi %lm(C(vacall_function)), %g2 st %f23, [%fp+1879] stx %g1, [%fp+1799] st %f25, [%fp+1883] st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] stx %g0, [%fp+1807] st %g0, [%fp+1815] st %g0, [%fp+1831] sethi %hh(C(vacall_function)), %g1 or %g1, %hm(C(vacall_function)), %g1 sllx %g1, 32, %g1 add %g1, %g2, %g1 ldx [%g1+%lo(C(vacall_function))], %g3 call %g3, 0 add %fp, 1775, %o0 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, L(L61) cmp %g1, 1 be,pn %icc, L(L50) cmp %g1, 2 be,pn %icc, L(L50) cmp %g1, 3 be,pn %icc, L(L53) cmp %g1, 4 be,pn %icc, L(L54) cmp %g1, 5 be,pn %icc, L(L55) cmp %g1, 6 be,pn %icc, L(L56) cmp %g1, 7 be,pn %icc, L(L57) cmp %g1, 8 be,pn %icc, L(L51) cmp %g1, 9 be,pn %icc, L(L51) cmp %g1, 10 be,pn %icc, L(L51) cmp %g1, 11 be,pn %icc, L(L51) cmp %g1, 12 be,pn %icc, L(L58) cmp %g1, 13 be,pn %icc, L(L59) cmp %g1, 14 be,pn %icc, L(L51) cmp %g1, 15 bne,pt %icc, L(L61) lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, L(L61) ldx [%fp+1823], %g5 add %g5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, L(L61) ldx [%fp+1807], %g1 cmp %g5, 8 and %g1, 7, %o2 and %g1, -8, %l0 bgu,pt %xcc, L(L35) add %g5, %o2, %g2 cmp %g2, 8 bgu,pt %xcc, L(L37) sllx %o2, 3, %g4 sllx %g2, 3, %g2 ldx [%l0], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 L(L47): ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g4 ldx [%l0+16], %g5 sllx %g4, %o4, %o1 sllx %g5, %o4, %o0 ldx [%l0+24], %o5 sllx %g2, 3, %o3 sllx %o5, %o4, %o7 ldx [%l0+32], %o2 sub %g0, %o3, %o3 mov 64, %g3 sub %g3, %o4, %g3 srax %g4, %g3, %g4 srax %g5, %g3, %g5 or %g1, %g4, %i0 srax %o5, %g3, %o5 mov -1, %g1 or %o1, %g5, %i1 sllx %g1, %o3, %g1 or %o0, %o5, %i2 and %g1, %o2, %g1 srax %g1, %g3, %g1 or %o7, %g1, %i3 L(L61): return %i7+8 nop L(L50): ldsb [%fp+1783], %i0 return %i7+8 nop L(L54): ldsh [%fp+1783], %i0 return %i7+8 nop L(L53): ldub [%fp+1783], %i0 return %i7+8 nop L(L51): ldx [%fp+1783], %i0 return %i7+8 nop L(L55): lduh [%fp+1783], %i0 return %i7+8 nop L(L56): ldsw [%fp+1783], %i0 return %i7+8 nop L(L57): lduw [%fp+1783], %i0 return %i7+8 nop L(L58): ld [%fp+1783], %f0 return %i7+8 nop L(L59): ldd [%fp+1783], %f0 return %i7+8 nop L(L35): cmp %g5, 16 bgu,pt %xcc, L(L39) cmp %g5, 24 cmp %g2, 16 bgu,pt %xcc, L(L41) sllx %o2, 3, %o5 sllx %g2, 3, %g3 ldx [%l0+8], %g2 sll %o2, 3, %g5 sllx %o2, 2, %o5 sub %g0, %g3, %g3 ldx [%l0], %g4 mov -1, %g1 sllx %g4, %g5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %g5, %i1 sub %g2, %o5, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 L(L37): sllx %g2, 3, %g3 ldx [%l0+8], %g5 sub %g0, %g3, %g3 sub %g0, %g4, %o5 ldx [%l0], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %g5, %g1 srax %g1, %o5, %g1 return %i7+8 or %g2, %g1, %o0 L(L39): bgu,pt %xcc, L(L43) cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, L(L45) sllx %o2, 3, %o4 sllx %o2, 2, %g1 sll %o2, 3, %g5 sllx %g2, 3, %o5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %g5, %o3 sub %g0, %o5, %o5 mov 32, %g4 ldx [%l0], %g2 sub %g4, %g1, %g4 sllx %g2, %g5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o5, %g1 and %g1, %o4, %g1 sllx %g1, %g5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L41): sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %o5, %o3 sub %g0, %g5, %g5 mov 64, %g4 ldx [%l0], %g2 sub %g4, %o5, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L45): ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o4, %o3 sllx %g4, %o4, %o1 sllx %g2, 3, %o5 ldx [%l0+24], %o2 sub %g0, %o5, %o5 mov 64, %g5 sub %g5, %o4, %g5 srax %g3, %g5, %g3 srax %g4, %g5, %g4 or %g1, %g3, %i0 or %o3, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 srax %g1, %g5, %g1 or %o1, %g1, %i2 return %i7+8 nop L(L43): bgu,pt %xcc, L(L47) sllx %o2, 3, %o4 sll %o2, 3, %o5 ldx [%l0], %g1 sllx %g1, %o5, %g1 sllx %o2, 2, %o4 sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o5, %o2 sllx %g4, %o5, %o1 ldx [%l0+24], %o3 sub %g0, %g5, %g5 mov 32, %g2 sub %g2, %o4, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o1, %g1, %i2 return %i7+8 nop FUNEND(vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-mipsn32el-linux.s0000664000000000000000000001147714665263073016054 00000000000000 .file 1 "vacall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,256,$31 # vars= 144, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $28,168($sp) lui $28,%hi(__gnu_local_gp) addiu $28,$28,%lo(__gnu_local_gp) lw $12,%got_disp(vacall_function)($28) sd $fp,176($sp) move $fp,$sp lw $25,0($12) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $4,192($fp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) swc1 $f19,72($fp) move $4,$fp sw $0,0($fp) sw $12,24($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L49 li $13,4 # 0x4 beq $12,$13,.L50 li $13,5 # 0x5 beq $12,$13,.L51 li $13,6 # 0x6 beq $12,$13,.L46 li $13,7 # 0x7 beq $12,$13,.L45 li $13,8 # 0x8 beq $12,$13,.L46 li $13,9 # 0x9 beq $12,$13,.L45 li $13,10 # 0xa beq $12,$13,.L47 li $13,11 # 0xb beq $12,$13,.L47 li $13,12 # 0xc beq $12,$13,.L52 li $13,13 # 0xd beq $12,$13,.L53 li $13,14 # 0xe beq $12,$13,.L46 li $13,15 # 0xf bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 # 0x1 beq $12,$13,.L54 li $13,2 # 0x2 beq $12,$13,.L55 li $13,4 # 0x4 beq $12,$13,.L56 li $13,8 # 0x8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 sll $13,$13,3 ld $25,0($15) addiu $13,$13,-1 li $15,2 # 0x2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $14,$14,3 dsra $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $24,$13,.L57 li $13,8 # 0x8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 # 0x10 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $24,$12,.L61 li $12,16 # 0x10 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,3 ld $17,8($15) li $25,2 # 0x2 addiu $13,$13,-65 dsll $13,$25,$13 subu $25,$0,$14 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $14,$14,3 dsll $25,$13,$15 dsra $16,$16,$14 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $16,8($15) ld $17,0($15) addiu $13,$13,-129 ld $18,16($15) li $15,2 # 0x2 subu $25,$0,$14 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $14,$14,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$14 dsll $17,$16,$25 dsra $14,$16,$14 or $2,$15,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: li $25,2 # 0x2 addiu $13,$13,-65 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$14 and $15,$13,$17 sll $14,$14,3 sll $13,$16,3 dsll $13,$15,$13 dsra $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/Makefile.devel0000664000000000000000000006142214665262430014204 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! THISFILE = Makefile.devel LN = ln -s RM = rm -f # ============ Rules that require cross-compilation tools ============ GCC = gcc GCCFLAGS = -I.. -I../dummy -O2 -fno-omit-frame-pointer SED = sed CROSS_TOOL = cross precompiled : \ vacall-i386-macro.S \ vacall-m68k.mit.S vacall-m68k.motorola.S \ vacall-mipseb-macro.S vacall-mipsel-macro.S vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S vacall-mips64eb-macro.S vacall-mips64el-macro.S \ vacall-sparc-macro.S vacall-sparc64-macro.S \ vacall-alpha-macro.S \ vacall-hppa-macro.S vacall-hppa64-macro.S \ vacall-arm-old-macro.S vacall-arm-eabi-macro.S vacall-armhf-eabi-macro.S \ vacall-arm64-macro.S vacall-arm64-macos-macro.S \ vacall-powerpc-aix.s vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S vacall-powerpc-macos.s vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \ vacall-ia64-macro.S \ vacall-x86_64-macro.S vacall-x86_64-x32-linux.s vacall-x86_64-windows-macro.S \ vacall-s390-macro.S vacall-s390x-macro.S \ vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-macro.S \ vacall-loongarch64-macro.S vacall-i386-linux.s : vacall-i386.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -S vacall-i386.c -o vacall-i386-linux.s vacall-i386-linux-pic.s : vacall-i386.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -fPIC -D__i386__ -S vacall-i386.c -o vacall-i386-linux-pic.s vacall-i386-macro.S : vacall-i386-linux.s vacall-i386-linux-pic.s ../common/asm-i386.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-i386.h"' ; echo '#ifdef __PIC__' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' | ../common/asm-i386.sh ; echo '#else' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' | ../common/asm-i386.sh ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-i386-macro.S vacall-m68k-linux.s : vacall-m68k.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S vacall-m68k.c -o vacall-m68k-linux.s vacall-m68k-sun.s : vacall-m68k.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S vacall-m68k.c -o vacall-m68k-sun.s vacall-m68k.mit.S : vacall-m68k-sun.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh mit < vacall-m68k-sun.s ; cat ../common/noexecstack.h) > vacall-m68k.mit.S vacall-m68k.motorola.S : vacall-m68k-linux.s ../common/asm-m68k.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../common/asm-m68k.sh motorola < vacall-m68k-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; cat ../common/noexecstack.h) > vacall-m68k.motorola.S vacall-mipseb-linux.s : vacall-mips.c vacall-internal.h vacall.h $(THISFILE) # For references to global symbols: -mno-explicit-relocs ensures a syntax that the IRIX assembler understands. $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S vacall-mips.c -o vacall-mipseb-linux.s vacall-mipseb-macro.S : vacall-mipseb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipseb-linux.s) > vacall-mipseb-macro.S vacall-mipsel-linux.s : vacall-mips.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S vacall-mips.c -o vacall-mipsel-linux.s vacall-mipsel-macro.S : vacall-mipsel-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsel-linux.s) > vacall-mipsel-macro.S vacall-mipsn32eb-linux.s : vacall-mipsn32.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S vacall-mipsn32.c -o vacall-mipsn32eb-linux.s vacall-mipsn32eb-macro.S : vacall-mipsn32eb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsn32eb-linux.s) > vacall-mipsn32eb-macro.S vacall-mipsn32el-linux.s : vacall-mipsn32.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S vacall-mipsn32.c -o vacall-mipsn32el-linux.s vacall-mipsn32el-macro.S : vacall-mipsn32el-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mipsn32el-linux.s) > vacall-mipsn32el-macro.S vacall-mips64eb-linux.s : vacall-mips64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S vacall-mips64.c -o vacall-mips64eb-linux.s vacall-mips64eb-macro.S : vacall-mips64eb-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mips64eb-linux.s) > vacall-mips64eb-macro.S vacall-mips64el-linux.s : vacall-mips64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S vacall-mips64.c -o vacall-mips64el-linux.s vacall-mips64el-macro.S : vacall-mips64el-linux.s ../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../common/asm-mips.sh < vacall-mips64el-linux.s) > vacall-mips64el-macro.S vacall-sparc-linux.s : vacall-sparc.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S vacall-sparc.c -o vacall-sparc-linux.s vacall-sparc-linux-pic.s : vacall-sparc.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -fPIC -D__sparc__ -S vacall-sparc.c -o vacall-sparc-linux-pic.s vacall-sparc-macro.S : vacall-sparc-linux.s vacall-sparc-linux-pic.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) # For references to global symbols, we need to distinguish the PIC and non-PIC case. # See https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653 (echo '#include "asm-sparc.h"' ; echo '#ifdef __PIC__' ; ../common/asm-sparc.sh < vacall-sparc-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-sparc.sh < vacall-sparc-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-sparc-macro.S vacall-sparc64-linux.s : vacall-sparc64.c vacall-internal.h vacall.h $(THISFILE) # For references to global symbols in non-PIC mode: # - -mcmodel=medlow uses 2 instructions, but the code does not work on Solaris (error "ld: fatal: relocation error: R_SPARC_HI22"). # - -mcmodel=medmid uses 3 instructions, but the code still makes some assumptions about the address space. # - -mcmodel=medany uses 4 instructions. $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 -mcmodel=medany $(GCCFLAGS) -D__sparc64__ -S vacall-sparc64.c -o vacall-sparc64-linux.s vacall-sparc64-linux-pic.s : vacall-sparc64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -fPIC -D__sparc64__ -S vacall-sparc64.c -o vacall-sparc64-linux-pic.s vacall-sparc64-macro.S : vacall-sparc64-linux.s vacall-sparc64-linux-pic.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) # For references to global symbols, we need to distinguish the PIC and non-PIC case. # See https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81653 (echo '#include "asm-sparc.h"' ; echo '#ifdef __PIC__' ; ../common/asm-sparc.sh < vacall-sparc64-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-sparc.sh < vacall-sparc64-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-sparc64-macro.S vacall-alpha-linux.s : vacall-alpha.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S vacall-alpha.c -o vacall-alpha-linux.s vacall-alpha-macro.S : vacall-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE) (../common/asm-alpha.sh < vacall-alpha-linux.s ; cat ../common/noexecstack.h) > vacall-alpha-macro.S vacall-hppa-linux.s : vacall-hppa.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S vacall-hppa.c -o vacall-hppa-linux.s vacall-hppa-linux-pic.s : vacall-hppa.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -fPIC -D__hppa__ -S vacall-hppa.c -o vacall-hppa-linux-pic.s vacall-hppa-macro.S : vacall-hppa-linux.s vacall-hppa-linux-pic.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa.h"' ; echo '#ifdef __PIC__' ; ../common/asm-hppa.sh < vacall-hppa-linux-pic.s ; echo '#else' ; ../common/asm-hppa.sh < vacall-hppa-linux.s ; echo 'IMPORT_DATA(vacall_function)' ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-hppa-macro.S vacall-hppa64-linux.s : vacall-hppa64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S vacall-hppa64.c -o vacall-hppa64-linux.s vacall-hppa64-macro.S : vacall-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa64.h"' ; ../common/asm-hppa64.sh < vacall-hppa64-linux.s ; echo 'IMPORT_DATA(vacall_function)' ; cat ../common/noexecstack.h) > vacall-hppa64-macro.S vacall-arm-old-linux.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S vacall-arm.c -o vacall-armel.s $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S vacall-arm.c -o vacall-armeb.s cmp vacall-armel.s vacall-armeb.s > /dev/null cp vacall-armel.s vacall-arm-old-linux.s $(RM) vacall-armel.s vacall-armeb.s vacall-arm-old-linux-pic.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -fPIC -D__arm__ -S vacall-arm.c -o vacall-armel-pic.s $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -fPIC -D__arm__ -S vacall-arm.c -o vacall-armeb-pic.s cmp vacall-armel-pic.s vacall-armeb-pic.s > /dev/null cp vacall-armel-pic.s vacall-arm-old-linux-pic.s $(RM) vacall-armel-pic.s vacall-armeb-pic.s vacall-arm-old-macro.S : vacall-arm-old-linux.s vacall-arm-old-linux-pic.s ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) (echo '#include "asm-arm.h"' ; echo '#ifdef __PIC__' ; ../common/asm-arm.sh < vacall-arm-old-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-arm.sh < vacall-arm-old-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack-arm.h) > vacall-arm-old-macro.S vacall-arm-eabi-linux.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -S vacall-arm.c -o vacall-armel.s $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mbig-endian $(GCCFLAGS) -S vacall-arm.c -o vacall-armeb.s cmp vacall-armel.s vacall-armeb.s > /dev/null cp vacall-armel.s vacall-arm-eabi-linux.s $(RM) vacall-armel.s vacall-armeb.s vacall-arm-eabi-linux-pic.s : vacall-arm.c vacall-internal.h vacall.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -fPIC -S vacall-arm.c -o vacall-armel-pic.s $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mbig-endian $(GCCFLAGS) -fPIC -S vacall-arm.c -o vacall-armeb-pic.s cmp vacall-armel-pic.s vacall-armeb-pic.s > /dev/null cp vacall-armel-pic.s vacall-arm-eabi-linux-pic.s $(RM) vacall-armel-pic.s vacall-armeb-pic.s vacall-arm-eabi-macro.S : vacall-arm-eabi-linux.s vacall-arm-eabi-linux-pic.s ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) (echo '#include "asm-arm.h"' ; echo '#ifdef __PIC__' ; ../common/asm-arm.sh < vacall-arm-eabi-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-arm.sh < vacall-arm-eabi-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack-arm.h) > vacall-arm-eabi-macro.S vacall-armhf-eabi-linux.s : vacall-armhf.c vacall-internal.h vacall.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -D__armhf__ -S vacall-armhf.c -o vacall-armhfel.s $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mbig-endian $(GCCFLAGS) -D__armhf__ -S vacall-armhf.c -o vacall-armhfeb.s cmp vacall-armhfel.s vacall-armhfeb.s > /dev/null cp vacall-armhfel.s vacall-armhf-eabi-linux.s $(RM) vacall-armhfel.s vacall-armhfeb.s vacall-armhf-eabi-linux-pic.s : vacall-armhf.c vacall-internal.h vacall.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -fPIC -D__armhf__ -S vacall-armhf.c -o vacall-armhfel-pic.s $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mbig-endian $(GCCFLAGS) -fPIC -D__armhf__ -S vacall-armhf.c -o vacall-armhfeb-pic.s cmp vacall-armhfel-pic.s vacall-armhfeb-pic.s > /dev/null cp vacall-armhfel-pic.s vacall-armhf-eabi-linux-pic.s $(RM) vacall-armhfel-pic.s vacall-armhfeb-pic.s vacall-armhf-eabi-macro.S : vacall-armhf-eabi-linux.s vacall-armhf-eabi-linux-pic.s ../common/asm-arm.sh ../common/noexecstack-arm.h $(THISFILE) (echo '#include "asm-arm.h"' ; echo '#ifdef __PIC__' ; ../common/asm-arm.sh < vacall-armhf-eabi-linux-pic.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#else' ; ../common/asm-arm.sh < vacall-armhf-eabi-linux.s | sed -e 's/vacall_function/C(vacall_function)/g' ; echo '#endif' ; cat ../common/noexecstack-arm.h) > vacall-armhf-eabi-macro.S vacall-arm64-macro.S : vacall-arm64.c vacall-internal.h vacall.h ../common/asm-arm64.sh ../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S vacall-arm64.c -o vacall-arm64el.s $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S vacall-arm64.c -o vacall-arm64eb.s cmp vacall-arm64el.s vacall-arm64eb.s > /dev/null (echo '#include "asm-arm64.h"' ; ../common/asm-arm64.sh < vacall-arm64el.s ; cat ../common/noexecstack-arm.h) > vacall-arm64-macro.S $(RM) vacall-arm64el.s vacall-arm64eb.s vacall-arm64-macos-macro.S : vacall-arm64.c vacall-internal.h vacall.h ../common/asm-arm64.sh ../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -D__APPLE__ -D__MACH__ -S vacall-arm64.c -o vacall-arm64-macos.s (echo '#include "asm-arm64.h"' ; ../common/asm-arm64.sh < vacall-arm64-macos.s ; cat ../common/noexecstack-arm.h) > vacall-arm64-macos-macro.S $(RM) vacall-arm64-macos.s vacall-powerpc-aix.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-aix.s echo ' .extern vacall_function[RW]' >> vacall-powerpc-aix.s vacall-powerpc-linux.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-linux.s vacall-powerpc-linux-macro.S : vacall-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) (../common/asm-powerpc.sh < vacall-powerpc-linux.s ; cat ../common/noexecstack.h) > vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S : vacall-powerpc.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-sysv4.s (../common/asm-powerpc.sh < vacall-powerpc-sysv4.s ; cat ../common/noexecstack.h) > vacall-powerpc-sysv4-macro.S $(RM) vacall-powerpc-sysv4.s vacall-powerpc-macos.s : vacall-powerpc.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S vacall-powerpc.c -o vacall-powerpc-macos.s vacall-powerpc64-aix.s : vacall-powerpc64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-aix.s echo ' .extern vacall_function[UA]' >> vacall-powerpc64-aix.s vacall-powerpc64-linux.S : vacall-powerpc64.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S vacall-powerpc64.c -o vacall-powerpc64-linux-be.s cmp vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s > /dev/null (../common/asm-powerpc.sh < vacall-powerpc64-linux-be.s ; cat ../common/noexecstack.h) > vacall-powerpc64-linux.S $(RM) vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s vacall-powerpc64-elfv2-linux.S : vacall-powerpc64.c vacall-internal.h vacall.h ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S vacall-powerpc64.c -o vacall-powerpc64-elfv2-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S vacall-powerpc64.c -o vacall-powerpc64-elfv2-linux-be.s (echo '#ifdef __LITTLE_ENDIAN__' ; ../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-le.s ; echo '#else' ; ../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-be.s ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-powerpc64-elfv2-linux.S $(RM) vacall-powerpc64-elfv2-linux-le.s vacall-powerpc64-elfv2-linux-be.s vacall-ia64-linux.s : vacall-ia64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S vacall-ia64.c -o vacall-ia64-linux.s vacall-ia64-macro.S : vacall-ia64-linux.s ../common/noexecstack.h $(THISFILE) cat vacall-ia64-linux.s ../common/noexecstack.h > vacall-ia64-macro.S vacall-x86_64-linux.s : vacall-x86_64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S vacall-x86_64.c -o vacall-x86_64-linux.s vacall-x86_64-linux-pic.s : vacall-x86_64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -fPIC -D__x86_64__ -S vacall-x86_64.c -o vacall-x86_64-linux-pic.s vacall-x86_64-macro.S : vacall-x86_64-linux.s vacall-x86_64-linux-pic.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; echo '#if defined __OpenBSD__ || defined __HAIKU__' ; ../common/asm-x86_64.sh < vacall-x86_64-linux-pic.s ; echo '#else' ; ../common/asm-x86_64.sh < vacall-x86_64-linux.s ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-x86_64-macro.S vacall-x86_64-x32-linux.s : vacall-x86_64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S vacall-x86_64.c -o vacall-x86_64-x32-linux.s vacall-x86_64-windows.s : vacall-x86_64-windows.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S vacall-x86_64-windows.c -o vacall-x86_64-windows.s vacall-x86_64-windows-macro.S : vacall-x86_64-windows.s ../common/asm-x86_64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; ../common/asm-x86_64.sh < vacall-x86_64-windows.s ; cat ../common/noexecstack.h) > vacall-x86_64-windows-macro.S vacall-s390-linux.s : vacall-s390.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S vacall-s390.c -o vacall-s390-linux.s vacall-s390-macro.S : vacall-s390-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE) (../common/asm-s390.sh < vacall-s390-linux.s ; cat ../common/noexecstack.h) > vacall-s390-macro.S vacall-s390x-linux.s : vacall-s390x.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S vacall-s390x.c -o vacall-s390x-linux.s vacall-s390x-macro.S : vacall-s390x-linux.s ../common/asm-s390.sh ../common/noexecstack.h $(THISFILE) (../common/asm-s390.sh < vacall-s390x-linux.s ; cat ../common/noexecstack.h) > vacall-s390x-macro.S vacall-riscv32-ilp32d-linux.s : vacall-riscv32.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S vacall-riscv32.c -o vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-linux-pic.s : vacall-riscv32.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -fPIC -D__riscv32__ -S vacall-riscv32.c -o vacall-riscv32-ilp32d-linux-pic.s vacall-riscv32-ilp32d-macro.S : vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-linux-pic.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE) (echo '#ifdef __PIC__' ; ../common/asm-riscv.sh < vacall-riscv32-ilp32d-linux-pic.s ; echo '#else' ; ../common/asm-riscv.sh < vacall-riscv32-ilp32d-linux.s ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-linux.s : vacall-riscv64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S vacall-riscv64.c -o vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-linux-pic.s : vacall-riscv64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -fPIC -D__riscv64__ -S vacall-riscv64.c -o vacall-riscv64-lp64d-linux-pic.s vacall-riscv64-lp64d-macro.S : vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-linux-pic.s ../common/asm-riscv.sh ../common/noexecstack.h $(THISFILE) (echo '#ifdef __PIC__' ; ../common/asm-riscv.sh < vacall-riscv64-lp64d-linux-pic.s ; echo '#else' ; ../common/asm-riscv.sh < vacall-riscv64-lp64d-linux.s ; echo '#endif' ; cat ../common/noexecstack.h) > vacall-riscv64-lp64d-macro.S vacall-loongarch64-linux.s : vacall-loongarch64.c vacall-internal.h vacall.h $(THISFILE) $(CROSS_TOOL) loongarch64-linux gcc-12.1.0 $(GCCFLAGS) -D__loongarch64__ -S vacall-loongarch64.c -o vacall-loongarch64-linux.s vacall-loongarch64-macro.S : vacall-loongarch64-linux.s ../common/asm-loongarch.sh ../common/noexecstack.h $(THISFILE) (../common/asm-loongarch.sh < vacall-loongarch64-linux.s ; cat ../common/noexecstack.h) > vacall-loongarch64-macro.S # --------------- Rules for debugging test failures --------------- tests : tests-i386.s tests-m68k.s tests-mips.s tests-sparc.s tests-alpha.s tests-hppa.s tests-arm.s tests-powerpc.s tests-powerpc64.s tests-ia64.s tests-x86_64.s true tests-i386.s : tests.c vacall.h $(GCC) -V 2.7.2 -b i486-linuxaout $(GCCFLAGS) -I/usr/include -D__i386__ -S tests.c -o tests-i386.s tests-m68k.s : tests.c vacall.h $(GCC) -V 2.95.2 -b m68k-sun $(GCCFLAGS) -I/usr/include -D__m68k__ -S tests.c -o tests-m68k.s tests-mips.s : tests.c vacall.h $(GCC) -V 2.95.2 -b mips-sgi $(GCCFLAGS) -I/usr/include -D__mips__ -S tests.c -o tests-mips.s tests-sparc.s : tests.c vacall.h $(GCC) -V 2.95.2 -b sparc-sun $(GCCFLAGS) -I/usr/include -D__sparc__ -S tests.c -o tests-sparc.s tests-alpha.s : tests.c vacall.h $(GCC) -V 2.7.2 -b alpha-dec-osf $(GCCFLAGS) -I/usr/include -D__alpha__ -S tests.c -o tests-alpha.s tests-hppa.s : tests.c vacall.h $(GCC) -V 2.6.3 -b hppa1.0-hpux $(GCCFLAGS) -I/usr/include -D__hppa__ -S tests.c -o tests-hppa.s tests-arm.s : tests.c vacall.h $(GCC) -V 2.6.3 -b arm-acorn-riscix $(GCCFLAGS) -I/usr/include -D__arm__ -S tests.c -o tests-arm.s tests-powerpc.s : tests.c vacall.h $(GCC) -V 2.95.2 -b rs6000 $(GCCFLAGS) -I/usr/include -D__powerpc__ -S tests.c -o tests-powerpc.s tests-powerpc64.s : tests.c vacall.h /cross/powerpc64-linux-tools/bin/powerpc64-linux-gcc $(GCCFLAGS) -I/usr/include -D__powerpc64__ -S tests.c -o tests-powerpc64.s tests-ia64.s : tests.c vacall.h $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(GCCFLAGS) -I/usr/include -D__ia64__ -S tests.c -o tests-ia64.s tests-x86_64.s : tests.c vacall.h $(GCC) -V 3.2.2 -b x86_64-suse-linux $(GCCFLAGS) -I/usr/include -D__x86_64__ -S tests.c -o tests-x86_64.s libffcall-2.5/vacall/vacall-i386-msvc.c0000664000000000000000000001662314665326517014523 00000000000000#ifdef _MSC_VER #include "vacall.h" #endif #include "asm-i386.h" #ifdef __PIC__ TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(esi)) INSN1(push,l ,R(ebx)) INSN2(sub,l ,NUM(48), R(esp)) INSN1(call,_ ,L(44)) L(44): INSN1(pop,l ,R(ebx)) #ifdef __ELF__ INSN2(add,l ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(44)],R(ebx)) #endif INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(sub,l ,NUM(12), R(esp)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN2(mov,l ,C(vacall_function)@MEM_DISP(ebx,GOT), R(edx)) INSN1(call,_ ,INDIR(X4 MEM(edx))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(ecx)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(45)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(45)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(49)) INSN2(lea,l ,X4 MEM_DISP(ecx,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) L(3): INSN2(and,l ,NUM(512), R(ecx)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(ebx)) INSN1(pop,l ,R(esi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(13), R(ecx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(14), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) INSN2(test,l ,NUM(1024), R(ecx)) INSN2(mov,l ,R(ecx), R(esi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(57)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(58)) L(31): INSN2(and,l ,NUM(16), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-4), R(esp)) INSN1(pop,l ,R(esi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(58): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(49): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(54): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(52): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(51): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(45): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(vacall_receiver,L(fe1)-vacall_receiver) #else TEXT() ALIGN(2) P2ALIGN(2,3) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN1(push,l ,R(esi)) INSN2(sub,l ,NUM(64), R(esp)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN1(call,_ ,INDIR(X4 C(vacall_function))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(ecx)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(3), R(ecx)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(4), R(ecx)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(5), R(ecx)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(6), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(7), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(8), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(9), R(ecx)) INSN1(je,_ ,L(48)) INSN2(lea,l ,X4 MEM_DISP(ecx,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) L(3): INSN2(and,l ,NUM(512), R(ecx)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(mov,l ,X4 MEM_DISP(ebp,-4), R(esi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(ecx)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(13), R(ecx)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(14), R(ecx)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(15), R(ecx)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(ecx)) INSN2(test,l ,NUM(1024), R(ecx)) INSN2(mov,l ,R(ecx), R(esi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(57)) L(31): INSN2(and,l ,NUM(16), R(esi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-4), R(esp)) INSN1(pop,l ,R(esi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(48): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(52): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(51): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(49): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(44): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(vacall_receiver,L(fe1)-vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-s390x-macro.S0000664000000000000000000000376314665263076015032 00000000000000 .file "vacall-s390x.c" .text .align 8 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0: .cfi_startproc stmg %r11,%r15,88(%r15) .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 aghi %r15,-320 .cfi_def_cfa_offset 480 lgr %r11,%r15 .cfi_def_cfa_register 11 larl %r1,vacall_function lhi %r0,0 lg %r1,0(%r1) st %r0,160(%r11) la %r0,480(%r11) stg %r0,184(%r11) lghi %r0,0 stg %r2,224(%r11) stg %r3,232(%r11) stg %r4,240(%r11) stg %r5,248(%r11) stg %r6,256(%r11) ste %f0,268(%r11) ste %f2,272(%r11) ste %f4,276(%r11) ste %f6,280(%r11) std %f0,288(%r11) std %f2,296(%r11) std %f4,304(%r11) std %f6,312(%r11) stg %r0,192(%r11) st %r0,200(%r11) st %r0,216(%r11) st %r0,264(%r11) la %r2,160(%r11) basr %r14,%r1 icm %r1,15,200(%r11) je .L1 chi %r1,1 je .L18 chi %r1,2 je .L21 chi %r1,3 je .L18 chi %r1,4 je .L22 chi %r1,5 je .L23 chi %r1,6 je .L24 chi %r1,7 je .L25 lr %r0,%r1 nill %r0,65533 chi %r0,8 je .L19 chi %r0,9 je .L19 chi %r1,12 je .L26 chi %r1,13 je .L27 chi %r1,14 je .L19 .L1: lg %r4,432(%r11) lmg %r11,%r15,408(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_def_cfa 15, 160 br %r4 .L18: .cfi_restore_state lg %r4,432(%r11) llgc %r2,168(%r11) lmg %r11,%r15,408(%r11) .cfi_remember_state .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L21: .cfi_restore_state icmh %r2,8,168(%r11) srag %r2,%r2,56 j .L1 .L19: lg %r2,168(%r11) j .L1 .L22: lgh %r2,168(%r11) j .L1 .L23: llgh %r2,168(%r11) j .L1 .L24: lgf %r2,168(%r11) j .L1 .L26: le %f0,168(%r11) j .L1 .L25: llgf %r2,168(%r11) j .L1 .L27: ld %f0,168(%r11) j .L1 .cfi_endproc .LFE0: .size vacall_receiver, .-vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/Makefile.in0000664000000000000000000004227214661171017013511 00000000000000# Makefile for vacall #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ OS = @host_os@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": # C compiler CC = @CC@ CFLAGS = @CFLAGS@ CPP = @CPP@ # C++ compiler CXX = @CXX@ CXXFLAGS = @CXXFLAGS@ # Both C and C++ compiler CPPFLAGS = @CPPFLAGS@ INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. INCLUDES_WITH_GNULIB = $(INCLUDES) -I../gnulib-lib -I$(srcdir)/../gnulib-lib ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi` LDFLAGS = @LDFLAGS@ AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ MV = mv LN = @LN@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ #### End of system configuration section. #### SHELL = /bin/sh OBJECTS = vacall.@OBJEXT@ vacall-libapi.@OBJEXT@ vacall-structcpy.@OBJEXT@ all : $(OBJECTS) libvacall.a $(srcdir)/vacall.3 $(srcdir)/vacall.html vacall.@OBJEXT@ : vacall-$(CPU).@OBJEXT@ $(RM) vacall.@OBJEXT@ $(LN) vacall-$(CPU).@OBJEXT@ vacall.@OBJEXT@ @IFNOT_MSVC@vacall-i386.@OBJEXT@ : vacall-i386.s @IFNOT_MSVC@ $(CC) @GCC_X_NONE@ -c vacall-i386.s @IFNOT_MSVC@vacall-i386.s : $(srcdir)/vacall-i386-macro.S @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-i386.s @IF_MSVC@vacall-i386.@OBJEXT@ : $(srcdir)/vacall-i386-msvc.c @IF_MSVC@ $(CC) $(INCLUDES) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-i386-msvc.c -o vacall-i386.@OBJEXT@ vacall-sparc.@OBJEXT@ : vacall-sparc.s $(CC) @WORKAROUND_BUG_81653@ @GCC_X_NONE@ -c vacall-sparc.s vacall-sparc.s : $(srcdir)/vacall-sparc-macro.S $(CPP) @WORKAROUND_BUG_81653@ $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc.s vacall-sparc64.@OBJEXT@ : vacall-sparc64.s $(CC) @GCC_X_NONE@ -c vacall-sparc64.s vacall-sparc64.s : $(srcdir)/vacall-sparc64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc64.s vacall-m68k.@OBJEXT@ : vacall-m68k.s $(CC) @GCC_X_NONE@ -c vacall-m68k.s vacall-m68k.s : $(srcdir)/vacall-m68k.mit.S $(srcdir)/vacall-m68k.motorola.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > vacall-m68k.s vacall-mips.@OBJEXT@ : vacall-mips.s $(CC) @GCC_X_NONE@ -c vacall-mips.s vacall-mips.s : $(srcdir)/vacall-mips@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips.s vacall-mipsn32.@OBJEXT@ : vacall-mipsn32.s $(CC) @GCC_X_NONE@ -c vacall-mipsn32.s vacall-mipsn32.s : $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mipsn32.s vacall-mips64.@OBJEXT@ : vacall-mips64.s $(CC) @GCC_X_NONE@ -c vacall-mips64.s vacall-mips64.s : $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips64.s vacall-alpha.@OBJEXT@ : vacall-alpha.s $(CC) @GCC_X_NONE@ -c vacall-alpha.s vacall-alpha.s : $(srcdir)/vacall-alpha-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-alpha.s vacall-hppa.@OBJEXT@ : vacall-hppa.s $(CC) @GCC_X_NONE@ -c vacall-hppa.s vacall-hppa.s : $(srcdir)/vacall-hppa-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa.s vacall-hppa64.@OBJEXT@ : vacall-hppa64.s $(CC) @GCC_X_NONE@ -c vacall-hppa64.s vacall-hppa64.s : $(srcdir)/vacall-hppa64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa64.s vacall-arm-old.@OBJEXT@ : vacall-arm-old.s $(CC) @GCC_X_NONE@ -c vacall-arm-old.s vacall-arm-old.s : $(srcdir)/vacall-arm-old-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-arm-old-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm-old.s vacall-arm-eabi.@OBJEXT@ : vacall-arm-eabi.s $(CC) @GCC_X_NONE@ -c vacall-arm-eabi.s vacall-arm-eabi.s : $(srcdir)/vacall-arm-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-arm-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm-eabi.s vacall-armhf-eabi.@OBJEXT@ : vacall-armhf-eabi.s $(CC) @GCC_X_NONE@ -c vacall-armhf-eabi.s vacall-armhf-eabi.s : $(srcdir)/vacall-armhf-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-armhf-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-armhf-eabi.s vacall-arm64.@OBJEXT@ : vacall-arm64.s $(CC) @GCC_X_NONE@ -c vacall-arm64.s vacall-arm64.s : $(srcdir)/vacall-arm64-macro.S $(srcdir)/vacall-arm64-macos-macro.S case "$(OS)" in \ macos* | darwin*) input=vacall-arm64-macos-macro.S ;; \ *) input=vacall-arm64-macro.S ;; \ esac; \ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/$${input} | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm64.s vacall-powerpc.@OBJEXT@ : vacall-powerpc.s $(CC) @GCC_X_NONE@ -c vacall-powerpc.s vacall-powerpc.s : $(srcdir)/vacall-powerpc-aix.s $(srcdir)/vacall-powerpc-linux-macro.S $(srcdir)/vacall-powerpc-macos.s $(srcdir)/vacall-powerpc-sysv4-macro.S case "$(OS)" in \ aix*) syntax=aix;; \ linux* | netbsd* | openbsd*) syntax=linux;; \ macos* | darwin*) syntax=macos;; \ *) syntax=sysv4;; \ esac; \ case $${syntax} in \ macos) \ grep -v '\.machine' $(srcdir)/vacall-powerpc-$${syntax}.s > vacall-powerpc.s || exit 1 ;; \ linux | sysv4) \ $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc.s || exit 1 ;; \ *) \ cp $(srcdir)/vacall-powerpc-$${syntax}.s vacall-powerpc.s || exit 1 ;; \ esac vacall-powerpc64.@OBJEXT@ : vacall-powerpc64.s $(CC) @GCC_X_NONE@ -c vacall-powerpc64.s vacall-powerpc64.s : $(srcdir)/vacall-powerpc64-aix.s $(srcdir)/vacall-powerpc64-linux.S case "$(OS)" in \ aix*) syntax=aix;; \ *) syntax=linux;; \ esac; \ case $${syntax} in \ linux) \ $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64.s || exit 1 ;; \ *) \ cp $(srcdir)/vacall-powerpc64-$${syntax}.s vacall-powerpc64.s || exit 1 ;; \ esac vacall-powerpc64-elfv2.@OBJEXT@ : vacall-powerpc64-elfv2.s $(CC) @GCC_X_NONE@ -c vacall-powerpc64-elfv2.s vacall-powerpc64-elfv2.s : $(srcdir)/vacall-powerpc64-elfv2-linux.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64-elfv2.s vacall-ia64.@OBJEXT@ : vacall-ia64.s $(CC) @GCC_X_NONE@ -c vacall-ia64.s vacall-ia64.s : $(srcdir)/vacall-ia64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-ia64.s @IFNOT_MSVC@vacall-x86_64.@OBJEXT@ : vacall-x86_64.s @IFNOT_MSVC@ $(CC) @GCC_X_NONE@ -c vacall-x86_64.s @IFNOT_MSVC@vacall-x86_64.s : $(srcdir)/vacall-x86_64-macro.S $(srcdir)/vacall-x86_64-windows-macro.S @IFNOT_MSVC@ case "$(OS)" in \ @IFNOT_MSVC@ cygwin* | mingw*) variant='-windows';; \ @IFNOT_MSVC@ *) variant='';; \ @IFNOT_MSVC@ esac; \ @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/vacall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-x86_64.s @IF_MSVC@vacall-x86_64.@OBJEXT@ : vacall-x86_64.asm @IF_MSVC@ ml64 -c -nologo vacall-x86_64.asm @IF_MSVC@vacall-x86_64.asm : $(srcdir)/vacall-x86_64-windows-macro.S @IF_MSVC@ { echo 'EXTERNDEF vacall_function:QWORD'; $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/vacall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > vacall-x86_64.asm vacall-x86_64-x32.@OBJEXT@ : vacall-x86_64-x32.s $(CC) @GCC_X_NONE@ -c vacall-x86_64-x32.s vacall-x86_64-x32.s : $(srcdir)/vacall-x86_64-x32-linux.s cp $(srcdir)/vacall-x86_64-x32-linux.s vacall-x86_64-x32.s vacall-s390.@OBJEXT@ : vacall-s390.s $(CC) @GCC_X_NONE@ -c vacall-s390.s vacall-s390.s : $(srcdir)/vacall-s390-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390.s vacall-s390x.@OBJEXT@ : vacall-s390x.s $(CC) @GCC_X_NONE@ -c vacall-s390x.s vacall-s390x.s : $(srcdir)/vacall-s390x-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390x.s vacall-riscv32-ilp32d.@OBJEXT@ : vacall-riscv32-ilp32d.s $(CC) @GCC_X_NONE@ -c vacall-riscv32-ilp32d.s vacall-riscv32-ilp32d.s : $(srcdir)/vacall-riscv32-ilp32d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.@OBJEXT@ : vacall-riscv64-lp64d.s $(CC) @GCC_X_NONE@ -c vacall-riscv64-lp64d.s vacall-riscv64-lp64d.s : $(srcdir)/vacall-riscv64-lp64d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv64-lp64d.s vacall-loongarch64.@OBJEXT@ : vacall-loongarch64.s $(CC) @GCC_X_NONE@ -c vacall-loongarch64.s vacall-loongarch64.s : $(srcdir)/vacall-loongarch64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-loongarch64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-loongarch64.s vacall-libapi.@OBJEXT@ : $(srcdir)/vacall-libapi.c $(srcdir)/vacall-internal.h $(srcdir)/vacall.h ../config.h $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -c $(srcdir)/vacall-libapi.c vacall-structcpy.@OBJEXT@ : $(srcdir)/vacall-structcpy.c $(srcdir)/../common/structcpy.c $(CC) -I$(srcdir)/../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-structcpy.c libvacall.a : $(OBJECTS) $(RM) libvacall.a $(AR) $(AR_FLAGS) libvacall.a $(OBJECTS) $(RANLIB) libvacall.a install : all force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) $(INSTALL_DATA) libvacall.a $(DESTDIR)$(libdir)/libvacall.a mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/vacall.h $(DESTDIR)$(includedir)/vacall.h mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 $(INSTALL_DATA) $(srcdir)/vacall.3 $(DESTDIR)$(mandir)/man3/vacall.3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) $(INSTALL_DATA) $(srcdir)/vacall.html $(DESTDIR)$(htmldir)/vacall.html installdirs : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) uninstall : force $(RM) $(DESTDIR)$(libdir)/libvacall.a $(RM) $(DESTDIR)$(includedir)/vacall.h $(RM) $(DESTDIR)$(mandir)/man3/vacall.3 $(RM) $(DESTDIR)$(htmldir)/vacall.html minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c minitests : minitests.@OBJEXT@ libvacall.a $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libvacall.a $(LDFLAGS) -o minitests minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/vacall.h $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc minitests-c++ : minitests-c++.@OBJEXT@ libvacall.a $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libvacall.a $(LDFLAGS) -o minitests-c++ check : all minitests ./minitests > minitests.out LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST) test '!' -s minitests.output.$(HOST) @IF_CXX@ ./minitests-c++ > minitests-c++.out @IF_CXX@ LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST) @IF_CXX@ test '!' -s minitests-c++.output.$(HOST) @IF_CXX@check : minitests-c++ tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/vacall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c tests.s : $(srcdir)/tests.c $(srcdir)/vacall.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c tests : tests.@OBJEXT@ libvacall.a $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libvacall.a $(LDFLAGS) -o tests extracheck : all tests ./tests > tests.out LC_ALL=C uniq -u < tests.out > tests.output.$(HOST) test '!' -s tests.output.$(HOST) mostlyclean : clean clean : force $(RM) *.@OBJEXT@ *.a core $(RM) vacall-i386.s vacall-sparc.s vacall-sparc64.s vacall-m68k.s vacall-mips.s vacall-mipsn32.s vacall-mips64.s vacall-alpha.s vacall-hppa.s vacall-hppa64.s vacall-arm-old.s vacall-arm-eabi.s vacall-armhf-eabi.s vacall-arm64.s vacall-powerpc.s vacall-powerpc64.s vacall-powerpc64-elfv2.s vacall-ia64.s vacall-x86_64.s vacall-x86_64.asm vacall-x86_64-x32.s vacall-s390.s vacall-s390x.s vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.s vacall-loongarch64.s $(RM) minitests.@OBJEXT@ minitests.s minitests minitests.out $(RM) minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out $(RM) tests.@OBJEXT@ tests.s tests tests.out distclean : clean $(RM) Makefile minitests.output.* minitests-c++.output.* tests.output.* maintainer-clean : distclean # List of source files (committed in version control or generated by Makefile.devel). SOURCE_FILES = \ COPYING \ PLATFORMS README vacall.3 vacall.html \ Makefile.devel \ Makefile.maint \ Makefile.in \ vacall.h vacall-internal.h \ vacall-alpha.c vacall-alpha-linux.s vacall-alpha-macro.S \ vacall-arm.c vacall-arm-old-linux.s vacall-arm-old-linux-pic.s vacall-arm-old-macro.S vacall-arm-eabi-linux.s vacall-arm-eabi-linux-pic.s vacall-arm-eabi-macro.S \ vacall-armhf.c vacall-armhf-eabi-linux.s vacall-armhf-eabi-linux-pic.s vacall-armhf-eabi-macro.S \ vacall-arm64.c vacall-arm64-macro.S vacall-arm64-macos-macro.S \ vacall-hppa.c vacall-hppa-linux.s vacall-hppa-macro.S \ vacall-hppa64.c vacall-hppa64-linux.s vacall-hppa64-macro.S \ vacall-i386.c vacall-i386-linux.s vacall-i386-linux-pic.s vacall-i386-macro.S \ vacall-ia64.c vacall-ia64-linux.s vacall-ia64-macro.S \ vacall-loongarch64.c vacall-loongarch64-linux.s vacall-loongarch64-macro.S \ vacall-m68k.c vacall-m68k-linux.s vacall-m68k-sun.s vacall-m68k.mit.S vacall-m68k.motorola.S \ vacall-mips.c vacall-mipseb-linux.s vacall-mipsel-linux.s vacall-mipseb-macro.S vacall-mipsel-macro.S \ vacall-mipsn32.c vacall-mipsn32eb-linux.s vacall-mipsn32el-linux.s vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S \ vacall-mips64.c vacall-mips64eb-linux.s vacall-mips64el-linux.s vacall-mips64eb-macro.S vacall-mips64el-macro.S \ vacall-powerpc.c \ vacall-powerpc-aix.s \ vacall-powerpc-linux.s vacall-powerpc-linux-macro.S vacall-powerpc-macos.s vacall-powerpc-sysv4-macro.S \ vacall-powerpc64.c vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \ vacall-riscv32.c vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-linux-pic.s vacall-riscv32-ilp32d-macro.S \ vacall-riscv64.c vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-linux-pic.s vacall-riscv64-lp64d-macro.S \ vacall-s390.c vacall-s390-linux.s vacall-s390-macro.S \ vacall-s390x.c vacall-s390x-linux.s vacall-s390x-macro.S \ vacall-sparc.c vacall-sparc-linux.s vacall-sparc-linux-pic.s vacall-sparc-macro.S \ vacall-sparc64.c vacall-sparc64-linux.s vacall-sparc64-linux-pic.s vacall-sparc64-macro.S \ vacall-x86_64.c vacall-x86_64-linux.s vacall-x86_64-macro.S vacall-x86_64-x32-linux.s \ vacall-x86_64-windows.c vacall-x86_64-windows.s vacall-x86_64-windows-macro.S \ vacall-libapi.c \ vacall-structcpy.c \ minitests.c minitests-c++.cc \ tests.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ vacall.man \ vacall-i386-msvc.c # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done force : libffcall-2.5/vacall/vacall-s390-macro.S0000664000000000000000000000403214665263076014630 00000000000000 .file "vacall-s390.c" .text .align 4 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long vacall_function .LC1: .long 0 .LC2: .long 255 .LC3: .long 65535 .LC4: .long 1 .LTN0_0: l %r1,.LC0-.LT0_0(%r13) lr %r14,%r15 ahi %r15,-184 lr %r11,%r15 l %r12,0(%r1) st %r14,0(%r15) la %r1,280(%r11) st %r2,132(%r11) la %r2,96(%r11) st %r4,140(%r11) st %r5,144(%r11) st %r6,148(%r11) st %r3,136(%r11) std %f2,176(%r11) std %f0,168(%r11) ste %f2,160(%r11) ste %f0,156(%r11) mvc 96(4,%r11),.LC1-.LT0_0(%r13) st %r1,112(%r11) mvc 116(4,%r11),.LC1-.LT0_0(%r13) mvc 120(4,%r11),.LC1-.LT0_0(%r13) mvc 128(4,%r11),.LC1-.LT0_0(%r13) mvc 152(4,%r11),.LC1-.LT0_0(%r13) basr %r14,%r12 icm %r4,15,120(%r11) je .L1 chi %r4,1 je .L43 chi %r4,2 je .L44 chi %r4,3 je .L43 chi %r4,4 je .L45 chi %r4,5 je .L46 chi %r4,6 je .L40 chi %r4,7 je .L40 chi %r4,8 je .L40 chi %r4,9 je .L40 lr %r1,%r4 ahi %r1,-10 cl %r1,.LC4-.LT0_0(%r13) jh .L22 l %r2,104(%r11) l %r3,108(%r11) .L1: l %r4,240(%r11) lm %r6,%r15,208(%r11) br %r4 .L22: chi %r4,12 je .L47 chi %r4,13 je .L48 chi %r4,14 je .L40 chi %r4,15 jne .L1 tm 98(%r11),4 je .L1 l %r1,124(%r11) chi %r1,1 je .L49 chi %r1,2 je .L50 chi %r1,4 je .L51 chi %r1,8 jne .L1 l %r1,116(%r11) l %r3,4(%r1) .L39: l %r2,0(%r1) j .L1 .L51: l %r1,116(%r11) j .L39 .L50: l %r1,116(%r11) lh %r4,0(%r1) lr %r2,%r4 .L41: n %r2,.LC3-.LT0_0(%r13) j .L1 .L49: l %r1,116(%r11) ic %r4,0(%r1) lr %r2,%r4 .L42: n %r2,.LC2-.LT0_0(%r13) j .L1 .L40: l %r2,104(%r11) j .L1 .L48: ld %f0,104(%r11) j .L1 .L47: le %f0,104(%r11) j .L1 .L46: lh %r1,104(%r11) lr %r2,%r1 j .L41 .L45: lh %r2,104(%r11) j .L1 .L43: ic %r1,104(%r11) lr %r2,%r1 j .L42 .L44: icm %r1,8,104(%r11) lr %r2,%r1 sra %r2,24 j .L1 .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-ia64-macro.S0000664000000000000000000002455514665263075014710 00000000000000 .file "vacall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .global vacall_receiver# .proc vacall_receiver# vacall_receiver: .prologue 14, 41 .spill 48 .mmb .save ar.pfs, r42 alloc r42 = ar.pfs, 8, 5, 1, 0 .vframe r43 mov r43 = r12 nop 0 .mmi adds r12 = -208, r12 mov r44 = r1 .save rp, r41 mov r41 = b0 .body ;; .mmi adds r14 = -48, r43 adds r16 = -48, r43 adds r40 = -152, r43 .mmb adds r45 = -192, r43 st8 [r43] = r38 nop 0 ;; .mmi nop 0 st8 [r14] = r32, 8 adds r32 = -160, r43 .mmi st4 [r40] = r0 ;; st8 [r14] = r33 adds r14 = -32, r43 .mmi st4 [r45] = r0 ;; st8 [r14] = r34 addl r14 = @ltoffx(vacall_function#), r1 .mmb nop 0 st8 [r32] = r0 nop 0 ;; .mmi ld8.mov r14 = [r14], vacall_function# ;; ld8 r15 = [r14] nop 0 .mmi adds r14 = -24, r43 ;; st8 [r14] = r35 adds r14 = -16, r43 ;; .mfi st8 [r14] = r36 nop 0 adds r14 = -8, r43 .mmi nop 0 ;; st8 [r14] = r37 nop 0 .mmi adds r14 = 8, r43 ;; st8 [r14] = r39 adds r14 = -112, r43 ;; .mfi stfd [r14] = f8 nop 0 adds r14 = -104, r43 .mmi nop 0 ;; stfd [r14] = f9 nop 0 .mmi adds r14 = -96, r43 ;; stfd [r14] = f10 adds r14 = -88, r43 ;; .mfi stfd [r14] = f11 nop 0 adds r14 = -80, r43 .mmi nop 0 ;; stfd [r14] = f12 nop 0 .mmi adds r14 = -72, r43 ;; stfd [r14] = f13 adds r14 = -64, r43 ;; .mfi stfd [r14] = f14 nop 0 adds r14 = -56, r43 .mmi nop 0 ;; stfd [r14] = f15 nop 0 .mmi adds r14 = -168, r43 ;; st8 [r14] = r16 adds r14 = -128, r43 ;; .mii st8 [r14] = r16 adds r14 = -120, r43 ;; nop 0 .mii st4 [r14] = r0 adds r14 = -136, r43 ;; nop 0 .mmb st8 [r14] = r8 ld8 r14 = [r15], 8 nop 0 ;; .mib nop 0 mov b6 = r14 nop 0 .mbb ld8 r1 = [r15] nop 0 br.call.sptk.many b0 = b6 ;; .mmb mov r1 = r44 ld4 r40 = [r40] nop 0 ;; .mfb cmp4.eq p6, p7 = 0, r40 nop 0 (p6) br.cond.dpnt .L49 ;; .mfb cmp4.ne p6, p7 = 1, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mfb cmp4.ne p6, p7 = 2, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mii nop 0 cmp4.ne p6, p7 = 3, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld1 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 4, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r43 ;; (p7) ld2 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt2 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 5, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld2 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 6, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r43 ;; (p7) ld4 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt4 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 7, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld4 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 8, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 9, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 10, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 11, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mii nop 0 cmp4.ne p6, p7 = 12, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ldfs f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 13, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ldfd f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 14, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mib nop 0 cmp4.ne p6, p7 = 15, r40 (p6) br.cond.dptk .L49 .mii nop 0 adds r15 = -192, r43 ;; nop 0 .mmi ld4 r14 = [r15] ;; nop 0 tbit.z p6, p7 = r14, 10 .mfb adds r14 = -144, r43 nop 0 (p6) br.cond.dpnt .L49 ;; .mmi ld8 r21 = [r14] ;; adds r14 = -1, r21 nop 0 ;; .mib nop 0 cmp.ltu p6, p7 = 31, r14 (p6) br.cond.dpnt .L49 .mmi ld8 r14 = [r32] ;; and r20 = 7, r14 and r23 = -8, r14 .mii nop 0 cmp.ltu p6, p7 = 8, r21 ;; nop 0 .mfb add r14 = r21, r20 nop 0 (p6) br.cond.dptk .L35 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r14 (p6) br.cond.dptk .L37 .mfi shladd r15 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r16 = [r23] shladd r17 = r20, 3, r0 ;; adds r15 = -1, r15 ;; .mii nop 0 sxt4 r15 = r15 ;; shl r14 = r14, r15 ;; .mmi adds r14 = -1, r14 ;; and r14 = r16, r14 nop 0 .mmi nop 0 ;; nop 0 shr r8 = r14, r17 .L49: .mii nop 0 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 1 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L50: .body .copy_state 1 .mii nop 0 adds r14 = -184, r43 ;; nop 0 .mii ld1 r14 = [r14] nop 0 ;; sxt1 r8 = r14 .mii nop 0 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 2 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L54: .body .copy_state 2 .mmb nop 0 adds r14 = -184, r43 nop 0 ;; .mii ld8 r8 = [r14] mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 3 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L35: .body .copy_state 3 .mib nop 0 cmp.ltu p6, p7 = 16, r21 (p6) br.cond.dptk .L39 ;; .mib nop 0 cmp.ltu p6, p7 = 16, r14 (p6) br.cond.dptk .L41 .mmi shladd r15 = r14, 3, r0 adds r14 = 8, r23 shladd r16 = r20, 2, r0 .mmb shladd r18 = r20, 3, r0 ld8 r17 = [r23] nop 0 ;; .mfi ld8 r19 = [r14] nop 0 addl r14 = 2, r0 .mii adds r15 = -65, r15 sub r16 = 32, r16 ;; sxt4 r15 = r15 .mii nop 0 sxt4 r16 = r16 shr r17 = r17, r18 ;; .mii nop 0 shl r14 = r14, r15 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r19, r14 ;; shl r15 = r14, r16 .mii nop 0 shr r9 = r14, r18 ;; shl r15 = r15, r16 ;; .mii or r8 = r15, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 4 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L37: .body .copy_state 4 .mfi shladd r15 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r17 = [r23], 8 shladd r18 = r20, 3, r0 ;; adds r15 = -65, r15 .mii ld8 r19 = [r23] sub r16 = 64, r18 ;; sxt4 r15 = r15 .mii nop 0 sxt4 r16 = r16 ;; shl r14 = r14, r15 .mii nop 0 shr r17 = r17, r18 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r19, r14 ;; shl r14 = r14, r16 ;; .mii or r8 = r14, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 5 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L39: .body .copy_state 5 .mib nop 0 cmp.ltu p6, p7 = 24, r21 (p6) br.cond.dptk .L43 ;; .mib nop 0 cmp.ltu p6, p7 = 24, r14 (p6) br.cond.dptk .L45 .mmi shladd r15 = r14, 3, r0 adds r14 = 8, r23 shladd r16 = r20, 2, r0 .mmb shladd r19 = r20, 3, r0 ld8 r18 = [r23], 16 nop 0 ;; .mmi ld8 r17 = [r14] addl r14 = 2, r0 adds r15 = -65, r15 .mmb sub r16 = 32, r16 ld8 r20 = [r23] nop 0 ;; .mii nop 0 sxt4 r15 = r15 sxt4 r16 = r16 .mii nop 0 shr r18 = r18, r19 ;; shl r14 = r14, r15 .mii nop 0 shl r15 = r17, r16 shr r17 = r17, r19 ;; .mii nop 0 shl r15 = r15, r16 adds r14 = -1, r14 ;; .mii and r14 = r20, r14 or r8 = r15, r18 ;; shl r15 = r14, r16 .mii nop 0 shr r10 = r14, r19 ;; shl r15 = r15, r16 ;; .mii or r9 = r15, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 6 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L41: .body .copy_state 6 .mfi shladd r16 = r14, 3, r0 nop 0 adds r14 = 8, r23 .mfi ld8 r18 = [r23], 16 nop 0 shladd r15 = r20, 3, r0 ;; .mmi ld8 r17 = [r14] addl r14 = 2, r0 adds r16 = -129, r16 .mmi ld8 r20 = [r23] mov r19 = r15 sub r15 = 64, r15 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r15 = r15 ;; .mii nop 0 shl r14 = r14, r16 shr r18 = r18, r19 .mii nop 0 shl r16 = r17, r15 shr r17 = r17, r19 ;; .mmi adds r14 = -1, r14 ;; and r14 = r20, r14 or r8 = r16, r18 ;; .mib nop 0 shl r14 = r14, r15 nop 0 ;; .mii or r9 = r14, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 7 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mmi shladd r16 = r14, 3, r0 adds r14 = 24, r23 shladd r15 = r20, 3, r0 .mmi adds r18 = 8, r23 ld8 r20 = [r23] adds r19 = 16, r23 ;; .mmi ld8 r22 = [r14] addl r14 = 2, r0 adds r16 = -129, r16 .mmi mov r17 = r15 ld8 r18 = [r18] sub r15 = 64, r15 ;; .mib nop 0 sxt4 r16 = r16 nop 0 .mii ld8 r19 = [r19] sxt4 r15 = r15 ;; shl r14 = r14, r16 .mii nop 0 shr r21 = r19, r17 shl r16 = r18, r15 .mii nop 0 shr r20 = r20, r17 shr r18 = r18, r17 .mii nop 0 shl r19 = r19, r15 ;; nop 0 .mmi adds r14 = -1, r14 ;; and r14 = r22, r14 or r8 = r16, r20 .mii nop 0 or r9 = r19, r18 ;; shl r14 = r14, r15 ;; .mii or r10 = r14, r21 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 8 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L43: .body .copy_state 8 .mib nop 0 cmp.ltu p6, p7 = 32, r14 (p6) br.cond.dptk .L47 .mmi adds r15 = 24, r23 shladd r14 = r14, 3, r0 adds r17 = 8, r23 .mmi shladd r16 = r20, 2, r0 adds r18 = 16, r23 shladd r20 = r20, 3, r0 ;; .mmi nop 0 ld8 r22 = [r15] addl r15 = 2, r0 .mmi adds r14 = -65, r14 ld8 r19 = [r17] sub r16 = 32, r16 ;; .mii nop 0 sxt4 r14 = r14 sxt4 r16 = r16 .mmb ld8 r21 = [r18] ld8 r18 = [r23] nop 0 ;; .mii nop 0 shl r15 = r15, r14 shl r14 = r19, r16 .mii nop 0 shr r18 = r18, r20 shl r17 = r21, r16 ;; .mii nop 0 shl r14 = r14, r16 shr r19 = r19, r20 .mii adds r15 = -1, r15 shl r17 = r17, r16 shr r21 = r21, r20 ;; .mmi nop 0 and r15 = r22, r15 or r8 = r14, r18 .mmi or r9 = r17, r19 ;; nop 0 shl r14 = r15, r16 .mii nop 0 shr r11 = r15, r20 ;; shl r14 = r14, r16 ;; .mii or r10 = r14, r21 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 9 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L47: .body .copy_state 9 .mmb shladd r16 = r14, 3, r0 adds r14 = 32, r23 nop 0 .mmi adds r18 = 8, r23 adds r19 = 16, r23 shladd r15 = r20, 3, r0 ;; .mfi ld8 r22 = [r14] nop 0 adds r14 = 24, r23 .mmi ld8 r20 = [r18] adds r16 = -129, r16 mov r17 = r15 .mfi ld8 r18 = [r19] nop 0 sub r15 = 64, r15 ;; .mmi ld8 r19 = [r14] addl r14 = 2, r0 sxt4 r16 = r16 .mii nop 0 sxt4 r15 = r15 ;; shl r21 = r20, r15 .mii nop 0 shr r20 = r20, r17 shl r14 = r14, r16 .mii ld8 r16 = [r23] shr r23 = r19, r17 shl r19 = r19, r15 ;; .mii nop 0 shr r16 = r16, r17 shr r17 = r18, r17 .mii adds r14 = -1, r14 shl r18 = r18, r15 ;; and r14 = r22, r14 .mmi nop 0 or r8 = r21, r16 or r10 = r19, r17 .mii nop 0 or r9 = r18, r20 ;; shl r14 = r14, r15 ;; .mii or r11 = r14, r23 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .restore sp mov r12 = r43 br.ret.sptk.many b0 .endp vacall_receiver# .ident "GCC: (GNU) 4.0.1" #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-hppa64.c0000664000000000000000000003160614662613007014152 00000000000000/* vacall function for hppa64 CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("%r31"); #endif register __varword arg1 __asm__("r26"); register __varword arg2 __asm__("r25"); register __varword arg3 __asm__("r24"); register __varword arg4 __asm__("r23"); register __varword arg5 __asm__("r22"); register __varword arg6 __asm__("r21"); register __varword arg7 __asm__("r20"); register __varword arg8 __asm__("r19"); /*register float farg1 __asm__("fr4R");*/ /*register float farg2 __asm__("fr5R");*/ /*register float farg3 __asm__("fr6R");*/ /*register float farg4 __asm__("fr7R");*/ /*register float farg5 __asm__("fr8R");*/ /*register float farg6 __asm__("fr9R");*/ /*register float farg7 __asm__("fr10R");*/ /*register float farg8 __asm__("fr11R");*/ register double darg1 __asm__("fr4"); register double darg2 __asm__("fr5"); register double darg3 __asm__("fr6"); register double darg4 __asm__("fr7"); register double darg5 __asm__("fr8"); register double darg6 __asm__("fr9"); register double darg7 __asm__("fr10"); register double darg8 __asm__("fr11"); register __varword iret __asm__("r28"); register __varword iret2 __asm__("r29"); void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, __vaword word8, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-8] = word1; (&firstword)[-7] = word2; (&firstword)[-6] = word3; (&firstword)[-5] = word4; (&firstword)[-4] = word5; (&firstword)[-3] = word6; (&firstword)[-2] = word7; (&firstword)[-1] = word8; __asm__ __volatile__ ("fstw %%fr4R,%0" : : "m" (list.farg[0])); /* list.farg[0] = farg1; */ __asm__ __volatile__ ("fstw %%fr5R,%0" : : "m" (list.farg[1])); /* list.farg[1] = farg2; */ __asm__ __volatile__ ("fstw %%fr6R,%0" : : "m" (list.farg[2])); /* list.farg[2] = farg3; */ __asm__ __volatile__ ("fstw %%fr7R,%0" : : "m" (list.farg[3])); /* list.farg[3] = farg4; */ __asm__ __volatile__ ("fstw %%fr8R,%0" : : "m" (list.farg[4])); /* list.farg[4] = farg5; */ __asm__ __volatile__ ("fstw %%fr9R,%0" : : "m" (list.farg[5])); /* list.farg[5] = farg6; */ __asm__ __volatile__ ("fstw %%fr10R,%0" : : "m" (list.farg[6])); /* list.farg[6] = farg7; */ __asm__ __volatile__ ("fstw %%fr11R,%0" : : "m" (list.farg[7])); /* list.farg[7] = farg8; */ list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; list.darg[4] = darg5; list.darg[5] = darg6; list.darg[6] = darg7; list.darg[7] = darg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 8); list.raddr = (void*)0; list.rtype = __VAvoid; list.memargptr = (long)&firstword; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong || list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulong || list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { __asm__ __volatile__ ("fldw %0,%%fr4R" : : "m" (list.tmp._float)); /* farg1 = list.tmp._float; */ iret = *(unsigned int *)&list.tmp._float; } else if (list.rtype == __VAdouble) { darg1 = list.tmp._double; iret = *(unsigned long*)&list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = (__varword)((unsigned char *) list.raddr)[0] << 56; } else if (list.rsize == 2) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48); } else if (list.rsize == 3) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40); } else if (list.rsize == 4) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32); } else if (list.rsize == 5) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24); } else if (list.rsize == 6) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16); } else if (list.rsize == 7) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8); } else if (list.rsize >= 8 && list.rsize <= 16) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8) | (__varword)((unsigned char *) list.raddr)[7]; if (list.rsize == 8) { } else if (list.rsize == 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8] << 56; } else if (list.rsize == 10) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48); } else if (list.rsize == 11) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40); } else if (list.rsize == 12) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32); } else if (list.rsize == 13) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24); } else if (list.rsize == 14) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16); } else if (list.rsize == 15) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8); } else if (list.rsize == 16) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8) | (__varword)((unsigned char *) list.raddr)[15]; } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = - ((__varword)1 << (sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] & mask0) << (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) << (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*8-start_offset*8)); } } #endif } else { iret = (long)list.raddr; } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-mips64eb-macro.S0000664000000000000000000001107214665263073015562 00000000000000#include "asm-mips.h" .file 1 "vacall-mips64.c" .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,272,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $28,184($sp) lui $28,%hi(%neg(%gp_rel(vacall_receiver))) daddu $28,$28,$25 daddiu $28,$28,%lo(%neg(%gp_rel(vacall_receiver))) ld $12,%got_disp(vacall_function)($28) sd $fp,192($sp) move $fp,$sp ld $25,0($12) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $4,208($fp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) swc1 $f19,88($fp) move $4,$fp sw $0,0($fp) sd $12,24($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L46 li $13,4 beq $12,$13,.L47 li $13,5 beq $12,$13,.L48 li $13,6 beq $12,$13,.L49 li $13,7 beq $12,$13,.L50 li $13,8 beq $12,$13,.L44 li $13,9 beq $12,$13,.L44 li $13,10 beq $12,$13,.L44 li $13,11 beq $12,$13,.L44 li $13,12 beq $12,$13,.L51 li $13,13 beq $12,$13,.L52 li $13,14 beq $12,$13,.L44 li $13,15 bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 beq $12,$13,.L53 li $13,2 beq $12,$13,.L54 li $13,4 beq $12,$13,.L55 li $13,8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $24,-8 sltu $25,$14,9 andi $15,$13,0x7 and $24,$13,$24 beq $25,$0,.L24 daddu $13,$14,$15 sltu $25,$13,9 sll $13,$13,0 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($24) sll $13,$13,3 li $24,-1 dsll $13,$24,$13 and $13,$13,$25 sll $15,$15,3 dsll $2,$13,$15 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $14,$13,.L56 li $13,8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $14,$12,.L60 li $12,16 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,0 ld $18,8($24) subu $13,$0,$13 move $16,$15 li $25,-1 subu $15,$0,$15 sll $13,$13,3 dsll $13,$25,$13 ld $17,0($24) sll $25,$15,2 addiu $24,$25,32 and $13,$13,$18 sll $15,$16,3 dsra $25,$13,$24 dsll $16,$17,$15 dsra $24,$25,$24 or $2,$16,$24 b .L23 dsll $3,$13,$15 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($24) subu $13,$0,$13 ld $16,8($24) ld $17,0($24) subu $25,$0,$15 sll $13,$13,3 li $24,-1 dsll $24,$24,$13 sll $25,$25,3 sll $15,$15,3 addiu $25,$25,64 and $13,$24,$18 dsra $13,$13,$25 dsll $24,$17,$15 dsra $17,$16,$25 dsll $15,$16,$15 or $2,$24,$17 b .L23 or $3,$13,$15 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($24) ld $25,0($24) sll $13,$13,3 li $24,-1 dsll $13,$24,$13 subu $24,$0,$15 and $13,$13,$16 sll $24,$24,3 sll $15,$15,3 dsra $13,$13,$24 dsll $15,$25,$15 b .L23 or $2,$13,$15 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall-mips64el-macro.S0000664000000000000000000001122314665263073015572 00000000000000#include "asm-mips.h" .file 1 "vacall-mips64.c" .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,272,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $28,184($sp) lui $28,%hi(%neg(%gp_rel(vacall_receiver))) daddu $28,$28,$25 daddiu $28,$28,%lo(%neg(%gp_rel(vacall_receiver))) ld $12,%got_disp(vacall_function)($28) sd $fp,192($sp) move $fp,$sp ld $25,0($12) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $4,208($fp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) swc1 $f19,88($fp) move $4,$fp sw $0,0($fp) sd $12,24($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L46 li $13,4 beq $12,$13,.L47 li $13,5 beq $12,$13,.L48 li $13,6 beq $12,$13,.L49 li $13,7 beq $12,$13,.L50 li $13,8 beq $12,$13,.L44 li $13,9 beq $12,$13,.L44 li $13,10 beq $12,$13,.L44 li $13,11 beq $12,$13,.L44 li $13,12 beq $12,$13,.L51 li $13,13 beq $12,$13,.L52 li $13,14 beq $12,$13,.L44 li $13,15 bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 beq $12,$13,.L53 li $13,2 beq $12,$13,.L54 li $13,4 beq $12,$13,.L55 li $13,8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $15,-8 sltu $25,$14,9 andi $24,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 daddu $13,$14,$24 sltu $25,$13,9 beq $25,$0,.L25 dsll $13,$13,3 daddiu $13,$13,-1 ld $25,0($15) sll $13,$13,0 li $15,2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $24,$24,3 dsra $2,$13,$24 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $14,$13,.L56 li $13,8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $14,$12,.L60 li $12,16 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 dsll $13,$13,3 daddiu $13,$13,-65 ld $17,8($15) li $25,2 sll $13,$13,0 dsll $13,$25,$13 subu $25,$0,$24 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $24,$24,3 dsll $25,$13,$15 dsra $16,$16,$24 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$24 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: daddiu $13,$13,-129 ld $16,8($15) ld $17,0($15) sll $13,$13,0 ld $18,16($15) li $15,2 subu $25,$0,$24 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $24,$24,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$24 dsll $17,$16,$25 dsra $24,$16,$24 or $2,$15,$17 b .L23 or $3,$13,$24 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: daddiu $13,$13,-65 li $25,2 sll $13,$13,0 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$24 and $15,$13,$17 sll $24,$24,3 sll $13,$16,3 dsll $13,$15,$13 dsra $24,$25,$24 b .L23 or $2,$13,$24 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall-arm-old-linux.s0000664000000000000000000000300714665263073015561 00000000000000 .file "vacall-arm.c" .text .align 2 .global vacall_receiver .type vacall_receiver,function vacall_receiver: @ args = 20, pretend = 16, frame = 32 @ frame_needed = 1, uses_anonymous_args = 0 mov ip, sp sub sp, sp, #-4294967280 stmfd sp!, {fp, ip, lr, pc} sub fp, ip, #-4294967276 add lr, fp, #4 mov ip, #0 sub sp, sp, #32 stmia lr, {r0, r1, r2, r3} bic sp, sp, #7 str lr, [fp, #-28] str ip, [fp, #-20] str ip, [fp, #-44] str ip, [fp, #-24] sub r0, fp, #44 ldr r3, .L40 mov lr, pc ldr pc, [r3, #0] ldr r2, [fp, #-20] cmp r2, #0 beq .L1 cmp r2, #1 beq .L38 cmp r2, #2 ldreqsb r0, [fp, #-36] beq .L1 cmp r2, #3 beq .L38 cmp r2, #4 ldreqsh r0, [fp, #-36] beq .L1 cmp r2, #5 ldreqh r0, [fp, #-36] beq .L1 cmp r2, #6 beq .L37 cmp r2, #7 beq .L37 cmp r2, #8 beq .L37 cmp r2, #9 beq .L37 sub r3, r2, #10 cmp r3, #1 bls .L36 cmp r2, #12 ldreq r0, [fp, #-36] @ float beq .L1 cmp r2, #13 beq .L36 cmp r2, #14 beq .L37 cmp r2, #15 beq .L39 .L1: ldmea fp, {fp, sp, pc} .L39: ldr r3, [fp, #-44] tst r3, #1024 beq .L1 ldr r3, [fp, #-16] cmp r3, #1 ldreq r3, [fp, #-24] ldreqb r0, [r3, #0] @ zero_extendqisi2 beq .L1 cmp r3, #2 ldreq r3, [fp, #-24] ldrne r3, [fp, #-24] ldreqh r0, [r3, #0] ldrne r0, [r3, #0] b .L1 .L37: ldr r0, [fp, #-36] b .L1 .L36: sub r0, fp, #36 ldmia r0, {r0, r1} @ phole ldm b .L1 .L38: ldrb r0, [fp, #-36] @ zero_extendqisi2 b .L1 .L41: .align 2 .L40: .word vacall_function .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-riscv32.c0000664000000000000000000002011514662613007014334 00000000000000/* vacall function for RISC-V 32-bit CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("t2"); #endif register __varword iarg1 __asm__("a0"); register __varword iarg2 __asm__("a1"); register __varword iarg3 __asm__("a2"); register __varword iarg4 __asm__("a3"); register __varword iarg5 __asm__("a4"); register __varword iarg6 __asm__("a5"); register __varword iarg7 __asm__("a6"); register __varword iarg8 __asm__("a7"); register float farg1 __asm__("fa0"); register float farg2 __asm__("fa1"); register float farg3 __asm__("fa2"); register float farg4 __asm__("fa3"); register float farg5 __asm__("fa4"); register float farg6 __asm__("fa5"); register float farg7 __asm__("fa6"); register float farg8 __asm__("fa7"); register double darg1 __asm__("fa0"); register double darg2 __asm__("fa1"); register double darg3 __asm__("fa2"); register double darg4 __asm__("fa3"); register double darg5 __asm__("fa4"); register double darg6 __asm__("fa5"); register double darg7 __asm__("fa6"); register double darg8 __asm__("fa7"); register __varword iret __asm__("a0"); register __varword iret2 __asm__("a1"); register float fret __asm__("fa0"); register double dret __asm__("fa0"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to structs that are at most 2 words large. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the retaddr - if and only if they are part of a struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word8; /* a7 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, struct gpargsequence gpargs) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = iarg1; list.iarg[1] = iarg2; list.iarg[2] = iarg3; list.iarg[3] = iarg4; list.iarg[4] = iarg5; list.iarg[5] = iarg6; list.iarg[6] = iarg7; list.iarg[7] = iarg8; /* = gpargs.word8 */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; list.darg[4] = darg5; list.darg[5] = darg6; list.darg[6] = darg7; list.darg[7] = darg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs + sizeof(__vaword); list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* normal struct return convention */ if (list.flags & __VA_SMALL_STRUCT_RETURN) { /* Return structs of size <= 8 in registers. */ if (list.rsize > 0 && list.rsize <= 8) { #if 1 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) { iret2 = (__varword)((unsigned char *) list.raddr)[4]; if (list.rsize >= 6) iret2 |= (__varword)((unsigned char *) list.raddr)[5] << 8; if (list.rsize >= 7) iret2 |= (__varword)((unsigned char *) list.raddr)[6] << 16; if (list.rsize >= 8) iret2 |= (__varword)((unsigned char *) list.raddr)[7] << 24; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall.h0000664000000000000000000004762314662613237013072 00000000000000/* * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _VACALL_H #define _VACALL_H #include #include "ffcall-version.h" #include "ffcall-abi.h" /* Determine whether the current ABI is LLP64 ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */ #if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__) #define __VA_LLP64 1 #endif /* Determine the alignment of a type at compile time. */ #if defined(__GNUC__) || defined(__IBM__ALIGNOF__) #define __VA_alignof __alignof__ #elif defined(__cplusplus) template struct __VA_alignof_helper { char __slot1; type __slot2; }; #define __VA_alignof(type) offsetof (__VA_alignof_helper, __slot2) #elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */ #define __VA_alignof __builtin_alignof #else #define __VA_offsetof(type,ident) ((unsigned long)&(((type*)0)->ident)) #define __VA_alignof(type) __VA_offsetof(struct { char __slot1; type __slot2; }, __slot2) #endif #ifdef __cplusplus extern "C" { #endif /* __vaword represents a single word that can be pushed on the stack. * __varword represents a general-purpose register. */ #if defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) typedef int __vaword; typedef long __varword; #elif defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__VA_LLP64) typedef long long __vaword; typedef long long __varword; #else typedef long __vaword; typedef long __varword; #endif /* C builtin types. */ enum __VAtype { __VAvoid, __VAchar, __VAschar, __VAuchar, __VAshort, __VAushort, __VAint, __VAuint, __VAlong, __VAulong, __VAlonglong, __VAulonglong, __VAfloat, __VAdouble, __VAvoidp, __VAstruct }; enum __VA_alist_flags { /* how to return structs */ /* There are basically 3 ways to return structs: * a. The called function returns a pointer to static data. Not reentrant. * Not supported any more. * b. The caller passes the return structure address in a dedicated register * or as a first (or last), invisible argument. The called function stores * its result there. * c. Like b, and the called function also returns the return structure * address in the return value register. (This is not very distinguishable * from b.) * Independently of this, * r. small structures (<= 4 or <= 8 bytes) may be returned in the return * value register(s), or * m. even small structures are passed in memory. */ /* gcc-2.6.3 employs the following strategy: * - If PCC_STATIC_STRUCT_RETURN is defined in the machine description * it uses method a, else method c. * - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description) * it uses method m, else (either by -freg-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description) * method r. */ __VA_SMALL_STRUCT_RETURN = 1<<1, /* r: special case for small structs */ __VA_GCC_STRUCT_RETURN = 1<<2, /* consider 8 byte structs as small */ #if defined(__sparc__) && !defined(__sparc64__) __VA_SUNCC_STRUCT_RETURN = 1<<3, __VA_SUNPROCC_STRUCT_RETURN = 1<<4, #else __VA_SUNCC_STRUCT_RETURN = 0, __VA_SUNPROCC_STRUCT_RETURN = 0, #endif #if defined(__i386__) __VA_MSVC_STRUCT_RETURN = 1<<4, #endif /* the default way to return structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another struct returning convention, * just #define __VA_STRUCT_RETURN ... * before or after #including . */ #ifndef __VA_STRUCT_RETURN __VA_STRUCT_RETURN = #if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */ __VA_SUNPROCC_STRUCT_RETURN, #else #if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || (defined(__powerpc__) && !defined(__powerpc64__) && (defined(__FreeBSD__) || defined(__DragonFly__) || defined(__NetBSD__))) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) __VA_SMALL_STRUCT_RETURN | #endif #if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3))) __VA_GCC_STRUCT_RETURN | #endif #if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */ __VA_MSVC_STRUCT_RETURN | #endif 0, #endif #endif /* how to return floats */ #if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) __VA_SUNCC_FLOAT_RETURN = 1<<5, #endif #if defined(__m68k__) __VA_FREG_FLOAT_RETURN = 1<<6, #endif /* the default way to return floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float returning convention, * just #define __VA_FLOAT_RETURN ... * before or after #including . */ #ifndef __VA_FLOAT_RETURN #if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* Sun cc or CC */ __VA_FLOAT_RETURN = __VA_SUNCC_FLOAT_RETURN, #elif defined(__m68k__) __VA_FLOAT_RETURN = __VA_FREG_FLOAT_RETURN, #else __VA_FLOAT_RETURN = 0, #endif #endif /* how to pass structs */ #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) __VA_SGICC_STRUCT_ARGS = 1<<7, #endif #if defined(__powerpc__) || defined(__powerpc64__) __VA_AIXCC_STRUCT_ARGS = 1<<7, #endif #if defined(__ia64__) __VA_OLDGCC_STRUCT_ARGS = 1<<7, #endif /* the default way to pass structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another structs passing convention, * just #define __VA_STRUCT_ARGS ... * before or after #including . */ #ifndef __VA_STRUCT_ARGS #if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */ __VA_STRUCT_ARGS = __VA_SGICC_STRUCT_ARGS, #else #if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */ __VA_STRUCT_ARGS = __VA_SGICC_STRUCT_ARGS, #else #if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */ __VA_STRUCT_ARGS = __VA_AIXCC_STRUCT_ARGS, #else #if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc, xlclang */ __VA_STRUCT_ARGS = __VA_AIXCC_STRUCT_ARGS, #else #if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3)) __VA_STRUCT_ARGS = __VA_OLDGCC_STRUCT_ARGS, #else __VA_STRUCT_ARGS = 0, #endif #endif #endif #endif #endif #endif /* how to pass floats */ /* ANSI C compilers and GNU gcc pass floats as floats. * K&R C compilers pass floats as doubles. We don't support them any more. */ #if defined(__powerpc64__) __VA_AIXCC_FLOAT_ARGS = 1<<8, /* pass floats in the low 4 bytes of an 8-bytes word */ #endif /* the default way to pass floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float passing convention, * just #define __VA_FLOAT_ARGS ... * before or after #including . */ #ifndef __VA_FLOAT_ARGS #if defined(__powerpc64__) && defined(_AIX) && (defined(__ibmxl__) || !defined(__GNUC__)) /* AIX 64-bit xlc, xlclang */ __VA_FLOAT_ARGS = __VA_AIXCC_FLOAT_ARGS, #else __VA_FLOAT_ARGS = 0, #endif #endif /* how to pass and return small integer arguments */ __VA_ANSI_INTEGERS = 0, /* no promotions */ __VA_TRADITIONAL_INTEGERS = 0, /* promote [u]char, [u]short to [u]int */ /* Fortunately these two methods are compatible. Our macros work with both. */ /* stack cleanup policy */ __VA_CDECL_CLEANUP = 0, /* caller pops args after return */ __VA_STDCALL_CLEANUP = 1<<9, /* callee pops args before return */ /* currently only supported on __i386__ */ #ifndef __VA_CLEANUP __VA_CLEANUP = __VA_CDECL_CLEANUP, #endif /* These are for internal use only */ #if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__) || defined(__loongarch64__) __VA_REGISTER_STRUCT_RETURN = 1<<10, #endif #if defined(__mipsn32__) || defined(__mips64__) __VA_REGISTER_FLOATSTRUCT_RETURN = 1<<11, __VA_REGISTER_DOUBLESTRUCT_RETURN = 1<<12, #endif __VA_flag_for_broken_compilers_that_dont_like_trailing_commas }; /* * Definition of the ‘va_alist’ type. */ struct vacall_alist; typedef struct vacall_alist * va_alist; /* * Definition of the va_start_xxx macros. */ #define __VA_START_FLAGS \ __VA_STRUCT_RETURN | __VA_FLOAT_RETURN | __VA_STRUCT_ARGS | __VA_FLOAT_ARGS | __VA_CLEANUP extern void vacall_start (va_alist /* LIST */, int /* RETTYPE */, int /* FLAGS */); #define va_start_void(LIST) vacall_start(LIST,__VAvoid, __VA_START_FLAGS) #define va_start_char(LIST) vacall_start(LIST,__VAchar, __VA_START_FLAGS) #define va_start_schar(LIST) vacall_start(LIST,__VAschar, __VA_START_FLAGS) #define va_start_uchar(LIST) vacall_start(LIST,__VAuchar, __VA_START_FLAGS) #define va_start_short(LIST) vacall_start(LIST,__VAshort, __VA_START_FLAGS) #define va_start_ushort(LIST) vacall_start(LIST,__VAushort, __VA_START_FLAGS) #define va_start_int(LIST) vacall_start(LIST,__VAint, __VA_START_FLAGS) #define va_start_uint(LIST) vacall_start(LIST,__VAuint, __VA_START_FLAGS) #define va_start_long(LIST) vacall_start(LIST,__VAlong, __VA_START_FLAGS) #define va_start_ulong(LIST) vacall_start(LIST,__VAulong, __VA_START_FLAGS) #define va_start_longlong(LIST) vacall_start(LIST,__VAlonglong, __VA_START_FLAGS) #define va_start_ulonglong(LIST) vacall_start(LIST,__VAulonglong,__VA_START_FLAGS) #define va_start_float(LIST) vacall_start(LIST,__VAfloat, __VA_START_FLAGS) #define va_start_double(LIST) vacall_start(LIST,__VAdouble, __VA_START_FLAGS) #define va_start_ptr(LIST,TYPE) vacall_start(LIST,__VAvoidp, __VA_START_FLAGS) /* * va_start_struct: Preparing structure return. */ extern void vacall_start_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, int /* TYPE_SPLITTABLE */, int /* FLAGS */); #define va_start_struct(LIST,TYPE,TYPE_SPLITTABLE) \ _va_start_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),TYPE_SPLITTABLE) /* _va_start_struct() is like va_start_struct(), except that you pass * the type's size and alignment instead of the type itself. * Undocumented, but used by GNU clisp. */ #define _va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ vacall_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,__VA_START_FLAGS) /* * Definition of the va_arg_xxx macros. */ extern char vacall_arg_char (va_alist /* LIST */); extern signed char vacall_arg_schar (va_alist /* LIST */); extern unsigned char vacall_arg_uchar (va_alist /* LIST */); extern short vacall_arg_short (va_alist /* LIST */); extern unsigned short vacall_arg_ushort (va_alist /* LIST */); extern int vacall_arg_int (va_alist /* LIST */); extern unsigned int vacall_arg_uint (va_alist /* LIST */); extern long vacall_arg_long (va_alist /* LIST */); extern unsigned long vacall_arg_ulong (va_alist /* LIST */); #define va_arg_char(LIST) vacall_arg_char(LIST) #define va_arg_schar(LIST) vacall_arg_schar(LIST) #define va_arg_uchar(LIST) vacall_arg_uchar(LIST) #define va_arg_short(LIST) vacall_arg_short(LIST) #define va_arg_ushort(LIST) vacall_arg_ushort(LIST) #define va_arg_int(LIST) vacall_arg_int(LIST) #define va_arg_uint(LIST) vacall_arg_uint(LIST) #define va_arg_long(LIST) vacall_arg_long(LIST) #define va_arg_ulong(LIST) vacall_arg_ulong(LIST) extern long long vacall_arg_longlong (va_alist /* LIST */); extern unsigned long long vacall_arg_ulonglong (va_alist /* LIST */); #define va_arg_longlong(LIST) vacall_arg_longlong(LIST) #define va_arg_ulonglong(LIST) vacall_arg_ulonglong(LIST) /* Floating point arguments. */ extern float vacall_arg_float (va_alist /* LIST */); extern double vacall_arg_double (va_alist /* LIST */); #define va_arg_float(LIST) vacall_arg_float(LIST) #define va_arg_double(LIST) vacall_arg_double(LIST) /* Pointer arguments. */ extern void* vacall_arg_ptr (va_alist /* LIST */); #define va_arg_ptr(LIST,TYPE) ((TYPE)vacall_arg_ptr(LIST)) /* Structure arguments. */ extern void* vacall_arg_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */); #define va_arg_struct(LIST,TYPE) \ *(TYPE*)vacall_arg_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE)) /* _va_arg_struct() is like va_arg_struct(), except that you pass the type's * size and alignment instead of the type and get the value's address instead * of the value itself. * Undocumented, but used by GNU clisp. */ #define _va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ vacall_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) /* * Definition of the va_return_xxx macros. */ extern void vacall_return_void (va_alist /* LIST */); #define va_return_void(LIST) vacall_return_void(LIST) extern void vacall_return_char (va_alist /* LIST */, char /* VAL */); extern void vacall_return_schar (va_alist /* LIST */, signed char /* VAL */); extern void vacall_return_uchar (va_alist /* LIST */, unsigned char /* VAL */); extern void vacall_return_short (va_alist /* LIST */, short /* VAL */); extern void vacall_return_ushort (va_alist /* LIST */, unsigned short /* VAL */); extern void vacall_return_int (va_alist /* LIST */, int /* VAL */); extern void vacall_return_uint (va_alist /* LIST */, unsigned int /* VAL */); extern void vacall_return_long (va_alist /* LIST */, long /* VAL */); extern void vacall_return_ulong (va_alist /* LIST */, unsigned long /* VAL */); #define va_return_char(LIST,VAL) vacall_return_char(LIST,VAL) #define va_return_schar(LIST,VAL) vacall_return_schar(LIST,VAL) #define va_return_uchar(LIST,VAL) vacall_return_uchar(LIST,VAL) #define va_return_short(LIST,VAL) vacall_return_short(LIST,VAL) #define va_return_ushort(LIST,VAL) vacall_return_ushort(LIST,VAL) #define va_return_int(LIST,VAL) vacall_return_int(LIST,VAL) #define va_return_uint(LIST,VAL) vacall_return_uint(LIST,VAL) #define va_return_long(LIST,VAL) vacall_return_long(LIST,VAL) #define va_return_ulong(LIST,VAL) vacall_return_ulong(LIST,VAL) extern void vacall_return_longlong (va_alist /* LIST */, long long /* VAL */); extern void vacall_return_ulonglong (va_alist /* LIST */, unsigned long long /* VAL */); #define va_return_longlong(LIST,VAL) vacall_return_longlong(LIST,VAL) #define va_return_ulonglong(LIST,VAL) vacall_return_ulonglong(LIST,VAL) extern void vacall_return_float (va_alist /* LIST */, float /* VAL */); extern void vacall_return_double (va_alist /* LIST */, double /* VAL */); #define va_return_float(LIST,VAL) vacall_return_float(LIST,VAL) #define va_return_double(LIST,VAL) vacall_return_double(LIST,VAL) extern void vacall_return_ptr (va_alist /* LIST */, void* /* VAL */); #define va_return_ptr(LIST,TYPE,VAL) vacall_return_ptr(LIST,(void*)(TYPE)(VAL)) extern void vacall_return_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */); #define va_return_struct(LIST,TYPE,VAL) \ _va_return_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),&(VAL)) /* Undocumented, but used by GNU clisp. */ #define _va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) \ vacall_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) /* Determine whether a struct type is word-splittable, i.e. whether each of * its components fit into a register. * The entire computation is done at compile time. */ #define va_word_splittable_1(slot1) \ (__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) #define va_word_splittable_2(slot1,slot2) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ ) #define va_word_splittable_3(slot1,slot2,slot3) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \ ) #define va_word_splittable_4(slot1,slot2,slot3,slot4) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \ && (__va_offset4(slot1,slot2,slot3,slot4)/sizeof(__vaword) == (__va_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__vaword)) \ ) #define __va_offset1(slot1) \ 0 #define __va_offset2(slot1,slot2) \ ((__va_offset1(slot1)+sizeof(slot1)+__VA_alignof(slot2)-1) & -(long)__VA_alignof(slot2)) #define __va_offset3(slot1,slot2,slot3) \ ((__va_offset2(slot1,slot2)+sizeof(slot2)+__VA_alignof(slot3)-1) & -(long)__VA_alignof(slot3)) #define __va_offset4(slot1,slot2,slot3,slot4) \ ((__va_offset3(slot1,slot2,slot3)+sizeof(slot3)+__VA_alignof(slot4)-1) & -(long)__VA_alignof(slot4)) /* * Miscellaneous declarations. */ #ifdef __cplusplus extern "C" void (*vacall) (); /* the return type is variable, not void! */ #else extern void (*vacall) (); /* the return type is variable, not void! */ #endif extern void (* vacall_function) (va_alist); #ifdef __cplusplus } #endif #endif /* _VACALL_H */ libffcall-2.5/vacall/vacall-s390x-linux.s0000664000000000000000000000364314665263076015125 00000000000000 .file "vacall-s390x.c" .text .align 8 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0: .cfi_startproc stmg %r11,%r15,88(%r15) .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 aghi %r15,-320 .cfi_def_cfa_offset 480 lgr %r11,%r15 .cfi_def_cfa_register 11 larl %r1,vacall_function lhi %r0,0 lg %r1,0(%r1) st %r0,160(%r11) la %r0,480(%r11) stg %r0,184(%r11) lghi %r0,0 stg %r2,224(%r11) stg %r3,232(%r11) stg %r4,240(%r11) stg %r5,248(%r11) stg %r6,256(%r11) ste %f0,268(%r11) ste %f2,272(%r11) ste %f4,276(%r11) ste %f6,280(%r11) std %f0,288(%r11) std %f2,296(%r11) std %f4,304(%r11) std %f6,312(%r11) stg %r0,192(%r11) st %r0,200(%r11) st %r0,216(%r11) st %r0,264(%r11) la %r2,160(%r11) basr %r14,%r1 icm %r1,15,200(%r11) je .L1 chi %r1,1 je .L18 chi %r1,2 je .L21 chi %r1,3 je .L18 chi %r1,4 je .L22 chi %r1,5 je .L23 chi %r1,6 je .L24 chi %r1,7 je .L25 lr %r0,%r1 nill %r0,65533 chi %r0,8 je .L19 chi %r0,9 je .L19 chi %r1,12 je .L26 chi %r1,13 je .L27 chi %r1,14 je .L19 .L1: lg %r4,432(%r11) lmg %r11,%r15,408(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_def_cfa 15, 160 br %r4 .L18: .cfi_restore_state lg %r4,432(%r11) llgc %r2,168(%r11) lmg %r11,%r15,408(%r11) .cfi_remember_state .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L21: .cfi_restore_state icmh %r2,8,168(%r11) srag %r2,%r2,56 j .L1 .L19: lg %r2,168(%r11) j .L1 .L22: lgh %r2,168(%r11) j .L1 .L23: llgh %r2,168(%r11) j .L1 .L24: lgf %r2,168(%r11) j .L1 .L26: le %f0,168(%r11) j .L1 .L25: llgf %r2,168(%r11) j .L1 .L27: ld %f0,168(%r11) j .L1 .cfi_endproc .LFE0: .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-ia64-linux.s0000664000000000000000000002433314665263075015000 00000000000000 .file "vacall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .global vacall_receiver# .proc vacall_receiver# vacall_receiver: .prologue 14, 41 .spill 48 .mmb .save ar.pfs, r42 alloc r42 = ar.pfs, 8, 5, 1, 0 .vframe r43 mov r43 = r12 nop 0 .mmi adds r12 = -208, r12 mov r44 = r1 .save rp, r41 mov r41 = b0 .body ;; .mmi adds r14 = -48, r43 adds r16 = -48, r43 adds r40 = -152, r43 .mmb adds r45 = -192, r43 st8 [r43] = r38 nop 0 ;; .mmi nop 0 st8 [r14] = r32, 8 adds r32 = -160, r43 .mmi st4 [r40] = r0 ;; st8 [r14] = r33 adds r14 = -32, r43 .mmi st4 [r45] = r0 ;; st8 [r14] = r34 addl r14 = @ltoffx(vacall_function#), r1 .mmb nop 0 st8 [r32] = r0 nop 0 ;; .mmi ld8.mov r14 = [r14], vacall_function# ;; ld8 r15 = [r14] nop 0 .mmi adds r14 = -24, r43 ;; st8 [r14] = r35 adds r14 = -16, r43 ;; .mfi st8 [r14] = r36 nop 0 adds r14 = -8, r43 .mmi nop 0 ;; st8 [r14] = r37 nop 0 .mmi adds r14 = 8, r43 ;; st8 [r14] = r39 adds r14 = -112, r43 ;; .mfi stfd [r14] = f8 nop 0 adds r14 = -104, r43 .mmi nop 0 ;; stfd [r14] = f9 nop 0 .mmi adds r14 = -96, r43 ;; stfd [r14] = f10 adds r14 = -88, r43 ;; .mfi stfd [r14] = f11 nop 0 adds r14 = -80, r43 .mmi nop 0 ;; stfd [r14] = f12 nop 0 .mmi adds r14 = -72, r43 ;; stfd [r14] = f13 adds r14 = -64, r43 ;; .mfi stfd [r14] = f14 nop 0 adds r14 = -56, r43 .mmi nop 0 ;; stfd [r14] = f15 nop 0 .mmi adds r14 = -168, r43 ;; st8 [r14] = r16 adds r14 = -128, r43 ;; .mii st8 [r14] = r16 adds r14 = -120, r43 ;; nop 0 .mii st4 [r14] = r0 adds r14 = -136, r43 ;; nop 0 .mmb st8 [r14] = r8 ld8 r14 = [r15], 8 nop 0 ;; .mib nop 0 mov b6 = r14 nop 0 .mbb ld8 r1 = [r15] nop 0 br.call.sptk.many b0 = b6 ;; .mmb mov r1 = r44 ld4 r40 = [r40] nop 0 ;; .mfb cmp4.eq p6, p7 = 0, r40 nop 0 (p6) br.cond.dpnt .L49 ;; .mfb cmp4.ne p6, p7 = 1, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mfb cmp4.ne p6, p7 = 2, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mii nop 0 cmp4.ne p6, p7 = 3, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld1 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 4, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r43 ;; (p7) ld2 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt2 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 5, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld2 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 6, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r43 ;; (p7) ld4 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt4 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 7, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ld4 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 8, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 9, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 10, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 11, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mii nop 0 cmp4.ne p6, p7 = 12, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ldfs f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 13, r40 ;; (p7) adds r14 = -184, r43 ;; .mfb (p7) ldfd f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 14, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mib nop 0 cmp4.ne p6, p7 = 15, r40 (p6) br.cond.dptk .L49 .mii nop 0 adds r15 = -192, r43 ;; nop 0 .mmi ld4 r14 = [r15] ;; nop 0 tbit.z p6, p7 = r14, 10 .mfb adds r14 = -144, r43 nop 0 (p6) br.cond.dpnt .L49 ;; .mmi ld8 r21 = [r14] ;; adds r14 = -1, r21 nop 0 ;; .mib nop 0 cmp.ltu p6, p7 = 31, r14 (p6) br.cond.dpnt .L49 .mmi ld8 r14 = [r32] ;; and r20 = 7, r14 and r23 = -8, r14 .mii nop 0 cmp.ltu p6, p7 = 8, r21 ;; nop 0 .mfb add r14 = r21, r20 nop 0 (p6) br.cond.dptk .L35 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r14 (p6) br.cond.dptk .L37 .mfi shladd r15 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r16 = [r23] shladd r17 = r20, 3, r0 ;; adds r15 = -1, r15 ;; .mii nop 0 sxt4 r15 = r15 ;; shl r14 = r14, r15 ;; .mmi adds r14 = -1, r14 ;; and r14 = r16, r14 nop 0 .mmi nop 0 ;; nop 0 shr r8 = r14, r17 .L49: .mii nop 0 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 1 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L50: .body .copy_state 1 .mii nop 0 adds r14 = -184, r43 ;; nop 0 .mii ld1 r14 = [r14] nop 0 ;; sxt1 r8 = r14 .mii nop 0 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 2 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L54: .body .copy_state 2 .mmb nop 0 adds r14 = -184, r43 nop 0 ;; .mii ld8 r8 = [r14] mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 3 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L35: .body .copy_state 3 .mib nop 0 cmp.ltu p6, p7 = 16, r21 (p6) br.cond.dptk .L39 ;; .mib nop 0 cmp.ltu p6, p7 = 16, r14 (p6) br.cond.dptk .L41 .mmi shladd r15 = r14, 3, r0 adds r14 = 8, r23 shladd r16 = r20, 2, r0 .mmb shladd r18 = r20, 3, r0 ld8 r17 = [r23] nop 0 ;; .mfi ld8 r19 = [r14] nop 0 addl r14 = 2, r0 .mii adds r15 = -65, r15 sub r16 = 32, r16 ;; sxt4 r15 = r15 .mii nop 0 sxt4 r16 = r16 shr r17 = r17, r18 ;; .mii nop 0 shl r14 = r14, r15 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r19, r14 ;; shl r15 = r14, r16 .mii nop 0 shr r9 = r14, r18 ;; shl r15 = r15, r16 ;; .mii or r8 = r15, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 4 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L37: .body .copy_state 4 .mfi shladd r15 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r17 = [r23], 8 shladd r18 = r20, 3, r0 ;; adds r15 = -65, r15 .mii ld8 r19 = [r23] sub r16 = 64, r18 ;; sxt4 r15 = r15 .mii nop 0 sxt4 r16 = r16 ;; shl r14 = r14, r15 .mii nop 0 shr r17 = r17, r18 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r19, r14 ;; shl r14 = r14, r16 ;; .mii or r8 = r14, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 5 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L39: .body .copy_state 5 .mib nop 0 cmp.ltu p6, p7 = 24, r21 (p6) br.cond.dptk .L43 ;; .mib nop 0 cmp.ltu p6, p7 = 24, r14 (p6) br.cond.dptk .L45 .mmi shladd r15 = r14, 3, r0 adds r14 = 8, r23 shladd r16 = r20, 2, r0 .mmb shladd r19 = r20, 3, r0 ld8 r18 = [r23], 16 nop 0 ;; .mmi ld8 r17 = [r14] addl r14 = 2, r0 adds r15 = -65, r15 .mmb sub r16 = 32, r16 ld8 r20 = [r23] nop 0 ;; .mii nop 0 sxt4 r15 = r15 sxt4 r16 = r16 .mii nop 0 shr r18 = r18, r19 ;; shl r14 = r14, r15 .mii nop 0 shl r15 = r17, r16 shr r17 = r17, r19 ;; .mii nop 0 shl r15 = r15, r16 adds r14 = -1, r14 ;; .mii and r14 = r20, r14 or r8 = r15, r18 ;; shl r15 = r14, r16 .mii nop 0 shr r10 = r14, r19 ;; shl r15 = r15, r16 ;; .mii or r9 = r15, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 6 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L41: .body .copy_state 6 .mfi shladd r16 = r14, 3, r0 nop 0 adds r14 = 8, r23 .mfi ld8 r18 = [r23], 16 nop 0 shladd r15 = r20, 3, r0 ;; .mmi ld8 r17 = [r14] addl r14 = 2, r0 adds r16 = -129, r16 .mmi ld8 r20 = [r23] mov r19 = r15 sub r15 = 64, r15 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r15 = r15 ;; .mii nop 0 shl r14 = r14, r16 shr r18 = r18, r19 .mii nop 0 shl r16 = r17, r15 shr r17 = r17, r19 ;; .mmi adds r14 = -1, r14 ;; and r14 = r20, r14 or r8 = r16, r18 ;; .mib nop 0 shl r14 = r14, r15 nop 0 ;; .mii or r9 = r14, r17 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 7 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mmi shladd r16 = r14, 3, r0 adds r14 = 24, r23 shladd r15 = r20, 3, r0 .mmi adds r18 = 8, r23 ld8 r20 = [r23] adds r19 = 16, r23 ;; .mmi ld8 r22 = [r14] addl r14 = 2, r0 adds r16 = -129, r16 .mmi mov r17 = r15 ld8 r18 = [r18] sub r15 = 64, r15 ;; .mib nop 0 sxt4 r16 = r16 nop 0 .mii ld8 r19 = [r19] sxt4 r15 = r15 ;; shl r14 = r14, r16 .mii nop 0 shr r21 = r19, r17 shl r16 = r18, r15 .mii nop 0 shr r20 = r20, r17 shr r18 = r18, r17 .mii nop 0 shl r19 = r19, r15 ;; nop 0 .mmi adds r14 = -1, r14 ;; and r14 = r22, r14 or r8 = r16, r20 .mii nop 0 or r9 = r19, r18 ;; shl r14 = r14, r15 ;; .mii or r10 = r14, r21 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 8 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L43: .body .copy_state 8 .mib nop 0 cmp.ltu p6, p7 = 32, r14 (p6) br.cond.dptk .L47 .mmi adds r15 = 24, r23 shladd r14 = r14, 3, r0 adds r17 = 8, r23 .mmi shladd r16 = r20, 2, r0 adds r18 = 16, r23 shladd r20 = r20, 3, r0 ;; .mmi nop 0 ld8 r22 = [r15] addl r15 = 2, r0 .mmi adds r14 = -65, r14 ld8 r19 = [r17] sub r16 = 32, r16 ;; .mii nop 0 sxt4 r14 = r14 sxt4 r16 = r16 .mmb ld8 r21 = [r18] ld8 r18 = [r23] nop 0 ;; .mii nop 0 shl r15 = r15, r14 shl r14 = r19, r16 .mii nop 0 shr r18 = r18, r20 shl r17 = r21, r16 ;; .mii nop 0 shl r14 = r14, r16 shr r19 = r19, r20 .mii adds r15 = -1, r15 shl r17 = r17, r16 shr r21 = r21, r20 ;; .mmi nop 0 and r15 = r22, r15 or r8 = r14, r18 .mmi or r9 = r17, r19 ;; nop 0 shl r14 = r15, r16 .mii nop 0 shr r11 = r15, r20 ;; shl r14 = r14, r16 ;; .mii or r10 = r14, r21 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .label_state 9 .restore sp mov r12 = r43 br.ret.sptk.many b0 .L47: .body .copy_state 9 .mmb shladd r16 = r14, 3, r0 adds r14 = 32, r23 nop 0 .mmi adds r18 = 8, r23 adds r19 = 16, r23 shladd r15 = r20, 3, r0 ;; .mfi ld8 r22 = [r14] nop 0 adds r14 = 24, r23 .mmi ld8 r20 = [r18] adds r16 = -129, r16 mov r17 = r15 .mfi ld8 r18 = [r19] nop 0 sub r15 = 64, r15 ;; .mmi ld8 r19 = [r14] addl r14 = 2, r0 sxt4 r16 = r16 .mii nop 0 sxt4 r15 = r15 ;; shl r21 = r20, r15 .mii nop 0 shr r20 = r20, r17 shl r14 = r14, r16 .mii ld8 r16 = [r23] shr r23 = r19, r17 shl r19 = r19, r15 ;; .mii nop 0 shr r16 = r16, r17 shr r17 = r18, r17 .mii adds r14 = -1, r14 shl r18 = r18, r15 ;; and r14 = r22, r14 .mmi nop 0 or r8 = r21, r16 or r10 = r19, r17 .mii nop 0 or r9 = r18, r20 ;; shl r14 = r14, r15 ;; .mii or r11 = r14, r23 mov ar.pfs = r42 mov b0 = r41 .mib nop 0 .restore sp mov r12 = r43 br.ret.sptk.many b0 .endp vacall_receiver# .ident "GCC: (GNU) 4.0.1" libffcall-2.5/vacall/vacall-x86_64-x32-linux.s0000664000000000000000000001045614665263076015607 00000000000000 .file "vacall-x86_64.c" .section .text.unlikely,"ax",@progbits .LCOLDB0: .text .LHOTB0: .p2align 4,,15 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0: pushq %rbp .LCFI0: movl %esp, %ebp .LCFI1: pushq %r14 subl $184, %esp .LCFI2: movq %rsi, -64(%ebp) leal 16(%rbp), %esi movq %rcx, -48(%ebp) movl vacall_function(%rip), %ecx movsd %xmm0, -144(%ebp) movq %rdi, -72(%ebp) movq %rdx, -56(%ebp) movsd %xmm1, -136(%ebp) movq %r8, -40(%ebp) movsd %xmm2, -128(%ebp) leal -192(%rbp), %edi movq %r9, -32(%ebp) movsd %xmm3, -120(%ebp) movsd %xmm4, -112(%ebp) movl $0, -192(%ebp) movsd %xmm5, -104(%ebp) movl %esi, -168(%ebp) movsd %xmm6, -96(%ebp) movl $0, -164(%ebp) movsd %xmm7, -88(%ebp) movl $0, -160(%ebp) movl $0, -80(%ebp) movl $0, -152(%ebp) call *%rcx movl -160(%ebp), %ecx testl %ecx, %ecx je .L1 cmpl $1, %ecx je .L27 cmpl $2, %ecx je .L27 cmpl $3, %ecx je .L33 cmpl $4, %ecx je .L34 cmpl $5, %ecx je .L35 cmpl $6, %ecx je .L28 cmpl $7, %ecx je .L30 cmpl $8, %ecx je .L28 cmpl $9, %ecx je .L30 cmpl $10, %ecx je .L31 cmpl $11, %ecx je .L31 cmpl $12, %ecx je .L36 cmpl $13, %ecx je .L37 cmpl $14, %ecx je .L30 cmpl $15, %ecx jne .L1 testb $4, -191(%ebp) je .L1 movl -156(%ebp), %ecx leal -1(%rcx), %esi cmpl $15, %esi ja .L1 movl -164(%ebp), %esi movl %esi, %edi andl $7, %esi andl $-8, %edi cmpl $8, %ecx leal (%rcx,%rsi), %r10d ja .L17 cmpl $8, %r10d ja .L18 leal -1(,%r10,8), %ecx movl $2, %r8d salq %cl, %r8 movq %r8, %rcx subq $1, %rcx andq (%edi), %rcx movq %rcx, %rdi leal 0(,%rsi,8), %ecx sarq %cl, %rdi movq %rdi, %rax .L1: addl $184, %esp popq %r14 popq %rbp .LCFI3: ret .p2align 4,,10 .p2align 3 .L27: .LCFI4: movsbq -184(%ebp), %rax addl $184, %esp popq %r14 popq %rbp .LCFI5: ret .p2align 4,,10 .p2align 3 .L28: .LCFI6: movslq -184(%ebp), %rax jmp .L1 .p2align 4,,10 .p2align 3 .L33: movzbl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L34: movswq -184(%ebp), %rax jmp .L1 .p2align 4,,10 .p2align 3 .L30: movl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L35: movzwl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L36: movss -184(%ebp), %xmm0 jmp .L1 .p2align 4,,10 .p2align 3 .L31: movq -184(%ebp), %rax jmp .L1 .L37: movsd -184(%ebp), %xmm0 jmp .L1 .L17: cmpl $16, %r10d leal 0(,%rsi,8), %r9d jbe .L38 negl %esi movq 8(%edi), %r8 movl %r9d, %ecx leal 64(,%rsi,8), %r11d movq (%edi), %rsi movq %r8, %r14 sarq %cl, %rsi movl %r11d, %ecx salq %cl, %r14 leal -129(,%r10,8), %ecx orq %r14, %rsi movq %rsi, %rax movl $2, %esi salq %cl, %rsi movl %r11d, %ecx subq $1, %rsi andq 16(%edi), %rsi salq %cl, %rsi movl %r9d, %ecx sarq %cl, %r8 orq %r8, %rsi movq %rsi, %rdx jmp .L1 .L18: leal -65(,%r10,8), %ecx movl $2, %r8d salq %cl, %r8 movl %esi, %ecx subq $1, %r8 andq 8(%edi), %r8 negl %ecx leal 64(,%rcx,8), %ecx movq (%edi), %rdi salq %cl, %r8 leal 0(,%rsi,8), %ecx sarq %cl, %rdi orq %rdi, %r8 movq %r8, %rax jmp .L1 .L38: leal -65(,%r10,8), %ecx movl $2, %r8d movq (%edi), %r10 imull $-4, %esi, %esi salq %cl, %r8 movl %r9d, %ecx subq $1, %r8 andq 8(%edi), %r8 sarq %cl, %r10 addl $32, %esi movl %esi, %ecx movq %r8, %rdi salq %cl, %rdi salq %cl, %rdi movl %r9d, %ecx orq %rdi, %r10 sarq %cl, %r8 movq %r10, %rax movq %r8, %rdx jmp .L1 .LFE0: .size vacall_receiver, .-vacall_receiver .section .text.unlikely .LCOLDE0: .text .LHOTE0: .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x3 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 4 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0 .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0x8e .uleb128 0x3 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xb .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xb .align 4 .LEFDE1: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-mipseb-macro.S0000664000000000000000000000721114665263073015410 00000000000000#include "asm-mips.h" .file 1 "vacall-mips.c" .text .align 2 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,104,$31 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) la $8,vacall_function sw $4,104($fp) lw $25,0($8) addiu $4,$fp,104 sw $4,40($fp) addiu $4,$fp,120 sw $4,56($fp) .cprestore 16 addiu $4,$fp,24 sw $5,108($fp) sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall-m68k.c0000664000000000000000000000772614662613007013643 00000000000000/* vacall function for m68k CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("a0"); #endif register void* sret __asm__("a1"); register __varword iret __asm__("d0"); register __varword iret2 __asm__("d1"); register __varword pret __asm__("a0"); /* some compilers return pointers in a0 */ register float fret __asm__("d0"); /* d0 */ register double dret __asm__("d0"); /* d0,d1 */ register float fp_fret __asm__("fp0"); register double fp_dret __asm__("fp0"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword firstword) { __va_alist list; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = sret; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { if (list.flags & __VA_FREG_FLOAT_RETURN) { fp_fret = list.tmp._float; } else { if (list.flags & __VA_SUNCC_FLOAT_RETURN) { dret = (double)list.tmp._float; } else { fret = list.tmp._float; } } } else if (list.rtype == __VAdouble) { if (list.flags & __VA_FREG_FLOAT_RETURN) { fp_dret = list.tmp._double; } else { dret = list.tmp._double; } } else if (list.rtype == __VAvoidp) { pret = iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* NB: On m68k, all structure sizes are divisible by 2. */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { /* can't occur */ iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } else if (list.rsize == 2*sizeof(__varword)) { iret = ((__varword *) list.raddr)[0]; iret2 = ((__varword *) list.raddr)[1]; } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-powerpc.c0000664000000000000000000002357514662613007014535 00000000000000/* vacall function for powerpc CPU */ /* * Copyright 1995-2024 Bruno Haible * Copyright 2000 Adam Fedor * Copyright 2004 Paul Guyot * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r11"); #endif register double farg1 __asm__("fr1"); register double farg2 __asm__("fr2"); register double farg3 __asm__("fr3"); register double farg4 __asm__("fr4"); register double farg5 __asm__("fr5"); register double farg6 __asm__("fr6"); register double farg7 __asm__("fr7"); register double farg8 __asm__("fr8"); register double farg9 __asm__("fr9"); register double farg10 __asm__("fr10"); register double farg11 __asm__("fr11"); register double farg12 __asm__("fr12"); register double farg13 __asm__("fr13"); register __varword iret __asm__("r3"); register __varword iret2 __asm__("r4"); register float fret __asm__("fr1"); register double dret __asm__("fr1"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, __vaword word8, __vaword firstword) { __va_alist list; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ /* gcc-2.6.3 source says: When a parameter is passed in a register, * stack space is still allocated for it. */ /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-8] = word1; (&firstword)[-7] = word2; (&firstword)[-6] = word3; (&firstword)[-5] = word4; (&firstword)[-4] = word5; (&firstword)[-3] = word6; (&firstword)[-2] = word7; (&firstword)[-1] = word8; #else /* __powerpc_sysv4__ */ /* Move the arguments passed in registers to temp storage, since moving them to the stack would mess up the stack */ list.iarg[0] = word1; list.iarg[1] = word2; list.iarg[2] = word3; list.iarg[3] = word4; list.iarg[4] = word5; list.iarg[5] = word6; list.iarg[6] = word7; list.iarg[7] = word8; #endif list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ list.farg[8] = farg9; list.farg[9] = farg10; list.farg[10] = farg11; list.farg[11] = farg12; list.farg[12] = farg13; #endif /* Prepare the va_alist. */ list.flags = 0; #if defined(_AIX) || (defined(__MACH__) && defined(__APPLE__)) /* __powerpc_aix__ */ list.aptr = (long)(&firstword - 8); #else /* __powerpc_sysv4__ */ list.aptr = (long)(&firstword); list.ianum = 0; #endif list.raddr = (void*)0; list.rtype = __VAvoid; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* On Linux, AIX, only structs of sizes 1, 2, 4, 8 can be returned in registers. But on FreeBSD, NetBSD, structs of any size <= 8 are returned in registers. */ if (list.rsize > 0 && list.rsize <= 8) { #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = ((unsigned char *) list.raddr)[0]; } else if (list.rsize == 2) { iret = (((unsigned char *) list.raddr)[0] << 8) | ((unsigned char *) list.raddr)[1]; } else if (list.rsize == 3) { iret = (((unsigned char *) list.raddr)[0] << 16) | (((unsigned char *) list.raddr)[1] << 8) | ((unsigned char *) list.raddr)[2]; } else if (list.rsize == 4) { iret = (((unsigned char *) list.raddr)[0] << 24) | (((unsigned char *) list.raddr)[1] << 16) | (((unsigned char *) list.raddr)[2] << 8) | ((unsigned char *) list.raddr)[3]; } else if (list.rsize == 5) { iret1 = ((unsigned char *) list.raddr)[0]; iret2 = (((unsigned char *) list.raddr)[1] << 24) | (((unsigned char *) list.raddr)[2] << 16) | (((unsigned char *) list.raddr)[3] << 8) | ((unsigned char *) list.raddr)[4]; } else if (list.rsize == 6) { iret1 = (((unsigned char *) list.raddr)[0] << 8) | ((unsigned char *) list.raddr)[1]; iret2 = (((unsigned char *) list.raddr)[2] << 24) | (((unsigned char *) list.raddr)[3] << 16) | (((unsigned char *) list.raddr)[4] << 8) | ((unsigned char *) list.raddr)[5]; } else if (list.rsize == 7) { iret1 = (((unsigned char *) list.raddr)[0] << 16) | (((unsigned char *) list.raddr)[1] << 8) | ((unsigned char *) list.raddr)[2]; iret2 = (((unsigned char *) list.raddr)[3] << 24) | (((unsigned char *) list.raddr)[4] << 16) | (((unsigned char *) list.raddr)[5] << 8) | ((unsigned char *) list.raddr)[6]; } else if (list.rsize == 8) { iret1 = (((unsigned char *) list.raddr)[0] << 24) | (((unsigned char *) list.raddr)[1] << 16) | (((unsigned char *) list.raddr)[2] << 8) | ((unsigned char *) list.raddr)[3]; iret2 = (((unsigned char *) list.raddr)[4] << 24) | (((unsigned char *) list.raddr)[5] << 16) | (((unsigned char *) list.raddr)[6] << 8) | ((unsigned char *) list.raddr)[7]; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ __varword mask0 = ((__varword)2 << (sizeof(__varword)*8-start_offset*8-1)) - 1; if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ iret = (wordaddr[0] & mask0) >> (sizeof(__varword)*8-end_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ iret = ((wordaddr[0] & mask0) << (end_offset*8-sizeof(__varword)*8)) | (wordaddr[1] >> (2*sizeof(__varword)*8-end_offset*8)); } } else { /* Assign iret, iret2. */ __varword mask0 = ((__varword)2 << (sizeof(__varword)*8-start_offset*8-1)) - 1; if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ iret = (wordaddr[0] & mask0) >> (2*sizeof(__varword)*8-end_offset*8); iret2 = ((wordaddr[0] & mask0) << (end_offset*4-sizeof(__varword)*4) << (end_offset*4-sizeof(__varword)*4)) | (wordaddr[1] >> (2*sizeof(__varword)*8-end_offset*8)); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ iret = ((wordaddr[0] & mask0) << (end_offset*8-2*sizeof(__varword)*8)) | (wordaddr[1] >> (3*sizeof(__varword)*8-end_offset*8)); iret2 = (wordaddr[1] << (end_offset*8-2*sizeof(__varword)*8)) | (wordaddr[2] >> (3*sizeof(__varword)*8-end_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-arm-old-macro.S0000664000000000000000000000644514665263073015474 00000000000000#include "asm-arm.h" #ifdef __PIC__ .text .align 2 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) // args = 20, pretend = 16, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 mov ip, sp sub sp, sp, $-4294967280 stmfd sp!, {sl, fp, ip, lr, pc} sub fp, ip, $-4294967276 add ip, fp, $4 ldr sl, L(41) sub sp, sp, $32 stmia ip, {r0, r1, r2, r3} ldr r3, L(41)+4 mov lr, $0 L(36): add sl, pc, sl ldr r2, [sl, r3] str ip, [fp, $-32] str lr, [fp, $-24] str lr, [fp, $-48] str lr, [fp, $-28] bic sp, sp, $7 sub r0, fp, $48 mov lr, pc ldr pc, [r2, $0] ldr r2, [fp, $-24] cmp r2, $0 beq L(1) cmp r2, $1 beq L(39) cmp r2, $2 ldreqsb r0, [fp, $-40] beq L(1) cmp r2, $3 beq L(39) cmp r2, $4 ldreqsh r0, [fp, $-40] beq L(1) cmp r2, $5 ldreqh r0, [fp, $-40] beq L(1) cmp r2, $6 beq L(38) cmp r2, $7 beq L(38) cmp r2, $8 beq L(38) cmp r2, $9 beq L(38) sub r3, r2, $10 cmp r3, $1 bls L(37) cmp r2, $12 ldreq r0, [fp, $-40] // float beq L(1) cmp r2, $13 beq L(37) cmp r2, $14 beq L(38) cmp r2, $15 beq L(40) L(1): ldmea fp, {sl, fp, sp, pc} L(40): ldr r3, [fp, $-48] tst r3, $1024 beq L(1) ldr r3, [fp, $-20] cmp r3, $1 ldreq r3, [fp, $-28] ldreqb r0, [r3, $0] // zero_extendqisi2 beq L(1) cmp r3, $2 ldreq r3, [fp, $-28] ldrne r3, [fp, $-28] ldreqh r0, [r3, $0] ldrne r0, [r3, $0] b L(1) L(38): ldr r0, [fp, $-40] b L(1) L(37): sub r0, fp, $40 ldmia r0, {r0, r1} // phole ldm b L(1) L(39): ldrb r0, [fp, $-40] // zero_extendqisi2 b L(1) L(42): .align 2 L(41): .word _GLOBAL_OFFSET_TABLE_-(L(36)+8) .word C(vacall_function)(GOT) L(fe1): FUNEND(vacall_receiver) #else .text .align 2 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) // args = 20, pretend = 16, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 mov ip, sp sub sp, sp, $-4294967280 stmfd sp!, {fp, ip, lr, pc} sub fp, ip, $-4294967276 add lr, fp, $4 mov ip, $0 sub sp, sp, $32 stmia lr, {r0, r1, r2, r3} bic sp, sp, $7 str lr, [fp, $-28] str ip, [fp, $-20] str ip, [fp, $-44] str ip, [fp, $-24] sub r0, fp, $44 ldr r3, L(40) mov lr, pc ldr pc, [r3, $0] ldr r2, [fp, $-20] cmp r2, $0 beq L(1) cmp r2, $1 beq L(38) cmp r2, $2 ldreqsb r0, [fp, $-36] beq L(1) cmp r2, $3 beq L(38) cmp r2, $4 ldreqsh r0, [fp, $-36] beq L(1) cmp r2, $5 ldreqh r0, [fp, $-36] beq L(1) cmp r2, $6 beq L(37) cmp r2, $7 beq L(37) cmp r2, $8 beq L(37) cmp r2, $9 beq L(37) sub r3, r2, $10 cmp r3, $1 bls L(36) cmp r2, $12 ldreq r0, [fp, $-36] // float beq L(1) cmp r2, $13 beq L(36) cmp r2, $14 beq L(37) cmp r2, $15 beq L(39) L(1): ldmea fp, {fp, sp, pc} L(39): ldr r3, [fp, $-44] tst r3, $1024 beq L(1) ldr r3, [fp, $-16] cmp r3, $1 ldreq r3, [fp, $-24] ldreqb r0, [r3, $0] // zero_extendqisi2 beq L(1) cmp r3, $2 ldreq r3, [fp, $-24] ldrne r3, [fp, $-24] ldreqh r0, [r3, $0] ldrne r0, [r3, $0] b L(1) L(37): ldr r0, [fp, $-36] b L(1) L(36): sub r0, fp, $36 ldmia r0, {r0, r1} // phole ldm b L(1) L(38): ldrb r0, [fp, $-36] // zero_extendqisi2 b L(1) L(41): .align 2 L(40): .word C(vacall_function) L(fe1): FUNEND(vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/vacall/vacall-sparc-linux-pic.s0000664000000000000000000000372514665263073016116 00000000000000 .file "vacall-sparc.c" .section ".text" .align 4 .LLGETPC0: retl add %o7, %l7, %l7 .align 4 .global vacall_receiver .type vacall_receiver,#function .proc 020 vacall_receiver: !#PROLOGUE# 0 save %sp, -144, %sp sethi %hi(vacall_function), %o0 sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call .LLGETPC0 add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 or %o0, %lo(vacall_function), %o0 ld [%l7+%o0], %o1 st %i2, [%fp+76] ld [%o1], %o2 add %fp, 68, %o0 ld [%fp+64], %o1 st %o0, [%fp-32] st %o1, [%fp-16] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] st %g0, [%fp-28] st %g0, [%fp-24] call %o2, 0 add %fp, -48, %o0 ld [%fp-24], %o1 cmp %o1, 0 be .LL1 cmp %o1, 1 be .LL44 cmp %o1, 2 be .LL44 cmp %o1, 3 be .LL45 cmp %o1, 4 be .LL46 cmp %o1, 5 be .LL47 cmp %o1, 6 be .LL43 cmp %o1, 7 be .LL43 cmp %o1, 8 be .LL43 cmp %o1, 9 be .LL43 add %o1, -10, %o0 cmp %o0, 1 bgu .LL22 cmp %o1, 12 ld [%fp-40], %i0 b .LL1 ld [%fp-36], %i1 .LL22: be .LL48 cmp %o1, 13 be .LL49 cmp %o1, 14 be .LL43 cmp %o1, 15 bne .LL1 ld [%fp-48], %o0 andcc %o0, 16, %g0 be .LL33 andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne .LL1 ld [%fp-28], %i0 b .LL1 add %i7, 4, %i7 .LL33: be,a .LL1 add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be .LL50 cmp %o0, 2 be .LL51 cmp %o0, 4 bne,a .LL1 add %i7, 4, %i7 ld [%fp-28], %o0 b .LL1 ld [%o0], %i0 .LL51: ld [%fp-28], %o0 b .LL1 lduh [%o0], %i0 .LL50: ld [%fp-28], %o0 b .LL1 ldub [%o0], %i0 .LL43: b .LL1 ld [%fp-40], %i0 .LL49: b .LL1 ldd [%fp-40], %f0 .LL48: ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a .LL1 ld [%fp-40], %f0 ld [%fp-40], %f2 b .LL1 fstod %f2, %f0 .LL47: b .LL1 lduh [%fp-40], %i0 .LL46: b .LL1 ldsh [%fp-40], %i0 .LL45: b .LL1 ldub [%fp-40], %i0 .LL44: ldsb [%fp-40], %i0 .LL38: .LL1: nop ret restore .LLfe1: .size vacall_receiver,.LLfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-sparc64.c0000664000000000000000000005535314662613007014337 00000000000000/* vacall function for sparc64 CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("%g5"); #endif register __vaword* fp __asm__("%fp"); /* our %fp, caller's %sp */ register __vaword* ret __asm__("%i7"); /* %i7+8 = return address */ register float farg0 __asm__("%f1"); register float farg1 __asm__("%f3"); register float farg2 __asm__("%f5"); register float farg3 __asm__("%f7"); register float farg4 __asm__("%f9"); register float farg5 __asm__("%f11"); register float farg6 __asm__("%f13"); register float farg7 __asm__("%f15"); register float farg8 __asm__("%f17"); register float farg9 __asm__("%f19"); register float farg10 __asm__("%f21"); register float farg11 __asm__("%f23"); register float farg12 __asm__("%f25"); register float farg13 __asm__("%f27"); register float farg14 __asm__("%f29"); register float farg15 __asm__("%f31"); register double darg0 __asm__("%f0"); register double darg1 __asm__("%f2"); register double darg2 __asm__("%f4"); register double darg3 __asm__("%f6"); register double darg4 __asm__("%f8"); register double darg5 __asm__("%f10"); register double darg6 __asm__("%f12"); register double darg7 __asm__("%f14"); register double darg8 __asm__("%f16"); register double darg9 __asm__("%f18"); register double darg10 __asm__("%f20"); register double darg11 __asm__("%f22"); register double darg12 __asm__("%f24"); register double darg13 __asm__("%f26"); register double darg14 __asm__("%f28"); register double darg15 __asm__("%f30"); register __varword iret __asm__("%i0"); register __varword o1 __asm__("%i1"); register __varword o2 __asm__("%i2"); register __varword o3 __asm__("%i3"); register __varword o4 __asm__("%i4"); register __varword o5 __asm__("%i5"); register float fret __asm__("%f0"); /* %f0 */ register double dret __asm__("%f0"); /* %f0,%f1 */ void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-6] = word1; (&firstword)[-5] = word2; (&firstword)[-4] = word3; (&firstword)[-3] = word4; (&firstword)[-2] = word5; (&firstword)[-1] = word6; list.darg[0] = darg0; list.darg[1] = darg1; list.darg[2] = darg2; list.darg[3] = darg3; list.darg[4] = darg4; list.darg[5] = darg5; list.darg[6] = darg6; list.darg[7] = darg7; list.darg[8] = darg8; list.darg[9] = darg9; list.darg[10] = darg10; list.darg[11] = darg11; list.darg[12] = darg12; list.darg[13] = darg13; list.darg[14] = darg14; list.darg[15] = darg15; list.farg[0] = farg0; list.farg[1] = farg1; list.farg[2] = farg2; list.farg[3] = farg3; list.farg[4] = farg4; list.farg[5] = farg5; list.farg[6] = farg6; list.farg[7] = farg7; list.farg[8] = farg8; list.farg[9] = farg9; list.farg[10] = farg10; list.farg[11] = farg11; list.farg[12] = farg12; list.farg[13] = farg13; list.farg[14] = farg14; list.farg[15] = farg15; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 6); list.raddr = (void*)0; list.rtype = __VAvoid; list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 32 in registers. */ #define iret2 o1 #define iret3 o2 #define iret4 o3 if (list.rsize > 0 && list.rsize <= 32) { #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = (__varword)((unsigned char *) list.raddr)[0] << 56; } else if (list.rsize == 2) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48); } else if (list.rsize == 3) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40); } else if (list.rsize == 4) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32); } else if (list.rsize == 5) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24); } else if (list.rsize == 6) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16); } else if (list.rsize == 7) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8); } else if (list.rsize >= 8 && list.rsize <= 32) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8) | (__varword)((unsigned char *) list.raddr)[7]; if (list.rsize == 8) { } else if (list.rsize == 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8] << 56; } else if (list.rsize == 10) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48); } else if (list.rsize == 11) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40); } else if (list.rsize == 12) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32); } else if (list.rsize == 13) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24); } else if (list.rsize == 14) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16); } else if (list.rsize == 15) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8); } else if (list.rsize >= 16 && list.rsize <= 32) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8) | (__varword)((unsigned char *) list.raddr)[15]; if (list.rsize == 16) { } else if (list.rsize == 17) { iret3 = (__varword)((unsigned char *) list.raddr)[16] << 56; } else if (list.rsize == 18) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48); } else if (list.rsize == 19) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40); } else if (list.rsize == 20) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40) | ((__varword)((unsigned char *) list.raddr)[19] << 32); } else if (list.rsize == 21) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40) | ((__varword)((unsigned char *) list.raddr)[19] << 32) | ((__varword)((unsigned char *) list.raddr)[20] << 24); } else if (list.rsize == 22) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40) | ((__varword)((unsigned char *) list.raddr)[19] << 32) | ((__varword)((unsigned char *) list.raddr)[20] << 24) | ((__varword)((unsigned char *) list.raddr)[21] << 16); } else if (list.rsize == 23) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40) | ((__varword)((unsigned char *) list.raddr)[19] << 32) | ((__varword)((unsigned char *) list.raddr)[20] << 24) | ((__varword)((unsigned char *) list.raddr)[21] << 16) | ((__varword)((unsigned char *) list.raddr)[22] << 8); } else if (list.rsize >= 24 && list.rsize <= 32) { iret3 = ((__varword)((unsigned char *) list.raddr)[16] << 56) | ((__varword)((unsigned char *) list.raddr)[17] << 48) | ((__varword)((unsigned char *) list.raddr)[18] << 40) | ((__varword)((unsigned char *) list.raddr)[19] << 32) | ((__varword)((unsigned char *) list.raddr)[20] << 24) | ((__varword)((unsigned char *) list.raddr)[21] << 16) | ((__varword)((unsigned char *) list.raddr)[22] << 8) | (__varword)((unsigned char *) list.raddr)[23]; if (list.rsize == 24) { } else if (list.rsize == 25) { iret4 = (__varword)((unsigned char *) list.raddr)[24] << 56; } else if (list.rsize == 26) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48); } else if (list.rsize == 27) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40); } else if (list.rsize == 28) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40) | ((__varword)((unsigned char *) list.raddr)[27] << 32); } else if (list.rsize == 29) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40) | ((__varword)((unsigned char *) list.raddr)[27] << 32) | ((__varword)((unsigned char *) list.raddr)[28] << 24); } else if (list.rsize == 30) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40) | ((__varword)((unsigned char *) list.raddr)[27] << 32) | ((__varword)((unsigned char *) list.raddr)[28] << 24) | ((__varword)((unsigned char *) list.raddr)[29] << 16); } else if (list.rsize == 31) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40) | ((__varword)((unsigned char *) list.raddr)[27] << 32) | ((__varword)((unsigned char *) list.raddr)[28] << 24) | ((__varword)((unsigned char *) list.raddr)[29] << 16) | ((__varword)((unsigned char *) list.raddr)[30] << 8); } else if (list.rsize == 32) { iret4 = ((__varword)((unsigned char *) list.raddr)[24] << 56) | ((__varword)((unsigned char *) list.raddr)[25] << 48) | ((__varword)((unsigned char *) list.raddr)[26] << 40) | ((__varword)((unsigned char *) list.raddr)[27] << 32) | ((__varword)((unsigned char *) list.raddr)[28] << 24) | ((__varword)((unsigned char *) list.raddr)[29] << 16) | ((__varword)((unsigned char *) list.raddr)[30] << 8) | (__varword)((unsigned char *) list.raddr)[31]; } } } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 4*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = - ((__varword)1 << (sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] & mask0) << (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*8-start_offset*8)); } } else if (count <= 2*sizeof(__varword)) { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) << (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*8-start_offset*8)); } } else if (count <= 3*sizeof(__varword)) { /* Assign iret, iret2, iret3. */ if (end_offset <= 3*sizeof(__varword)) { /* 2*sizeof(__varword) < end_offset ≤ 3*sizeof(__varword) */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret3 = (wordaddr[2] & mask2) << (start_offset*8); } else { /* 3*sizeof(__varword) < end_offset < 4*sizeof(__varword), start_offset > 0 */ __varword mask3 = - ((__varword)1 << (4*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__varword)*8-start_offset*8)); iret3 = (wordaddr[2] << (start_offset*8)) | ((wordaddr[3] & mask3) >> (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2, iret3, iret4. */ if (end_offset <= 4*sizeof(__varword)) { /* 3*sizeof(__varword) < end_offset ≤ 4*sizeof(__varword) */ __varword mask3 = - ((__varword)1 << (4*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret3 = (wordaddr[2] << (start_offset*8)) | ((wordaddr[3] & mask3) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret4 = (wordaddr[3] & mask3) << (start_offset*8); } else { /* 4*sizeof(__varword) < end_offset < 5*sizeof(__varword), start_offset > 0 */ __varword mask4 = - ((__varword)1 << (5*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | (wordaddr[2] >> (sizeof(__varword)*8-start_offset*8)); iret3 = (wordaddr[2] << (start_offset*8)) | (wordaddr[3] >> (sizeof(__varword)*8-start_offset*8)); iret4 = (wordaddr[3] << (start_offset*8)) | ((wordaddr[4] & mask4) >> (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } libffcall-2.5/vacall/vacall-arm-eabi-linux-pic.s0000664000000000000000000000374414665263074016465 00000000000000 .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .file "vacall-arm.c" .text .align 2 .global vacall_receiver .syntax unified .arm .fpu softvfp .type vacall_receiver, %function vacall_receiver: @ Function supports interworking. @ args = 20, pretend = 16, frame = 32 @ frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, #16 push {fp, lr} mov lr, #0 add fp, sp, #4 sub sp, sp, #32 add ip, fp, #4 stm ip, {r0, r1, r2, r3} ldr r3, .L31 str lr, [fp, #-36] str lr, [fp, #-16] str lr, [fp, #-12] str ip, [fp, #-20] ldr r2, .L31+4 .LPIC0: add r3, pc, r3 ldr r3, [r3, r2] sub r0, fp, #36 ldr r3, [r3] mov lr, pc bx r3 ldr r3, [fp, #-12] cmp r3, #0 beq .L1 cmp r3, #1 beq .L25 cmp r3, #2 ldrsbeq r0, [fp, #-28] beq .L1 cmp r3, #3 beq .L25 cmp r3, #4 ldrsheq r0, [fp, #-28] beq .L1 cmp r3, #5 ldrheq r0, [fp, #-28] beq .L1 cmp r3, #6 beq .L27 cmp r3, #7 beq .L27 cmp r3, #8 beq .L27 cmp r3, #9 beq .L27 sub r2, r3, #10 cmp r2, #1 bls .L28 cmp r3, #12 ldreq r0, [fp, #-28] @ float beq .L1 cmp r3, #13 beq .L28 cmp r3, #14 beq .L27 cmp r3, #15 bne .L1 ldr r3, [fp, #-36] tst r3, #1024 beq .L1 ldr r3, [fp, #-8] cmp r3, #1 beq .L30 cmp r3, #2 ldr r3, [fp, #-16] ldrheq r0, [r3] ldrne r0, [r3] .L1: sub sp, fp, #4 @ sp needed pop {fp, lr} add sp, sp, #16 bx lr .L25: ldrb r0, [fp, #-28] @ zero_extendqisi2 sub sp, fp, #4 @ sp needed pop {fp, lr} add sp, sp, #16 bx lr .L27: ldr r0, [fp, #-28] sub sp, fp, #4 @ sp needed pop {fp, lr} add sp, sp, #16 bx lr .L28: sub r0, fp, #28 ldm r0, {r0, r1} b .L1 .L30: ldr r3, [fp, #-16] ldrb r0, [r3] @ zero_extendqisi2 b .L1 .L32: .align 2 .L31: .word _GLOBAL_OFFSET_TABLE_-(.LPIC0+8) .word vacall_function(GOT) .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 6.5.0" .section .note.GNU-stack,"",%progbits libffcall-2.5/vacall/README0000664000000000000000000000473713347755333012341 00000000000000vacall - C functions called with variable arguments This library allows C functions to be called with variable arguments and to return variable return values. This is much like the varargs(3) facility, but also allows the return value to be specified at run time. A typical use is the implementation of call-back functions in embedded interpreters. Installation instructions: Configure the parent directory. Then: cd vacall make make check make install Files in this package: Documentation: README this text COPYING free software license PLATFORMS list of supported platforms vacall.3 manual page in Unix man format vacall.man manual page vacall.html manual page in HTML format Source: vacall.h main include file vacall-*.c source for the main interface function vacall-*.[sS] its translation to assembly language vacall-libapi.c implementation of other library API vacall-structcpy.c auxiliary function tests.c test program Building: Makefile.in Makefile master Porting: Makefile.devel developer's Makefile This subdirectory produces a static library. Reason: The vacall-*.c files access global variables. Such accesses causes portability problems when combined with the option -fPIC (because of the small/medium/large memory models and platform dependent assembler syntax to access the GOT). Therefore Makefile.devel in this directory compiles the files without -fPIC. Therefore the resulting object files are not suitable for being put into a shared library. Therefore this direcory must - either not use libtool, - or pass '-static' to $(LIBTOOL_LINK) when creating libvacall.la. Copyright notice: Copyright 1995-2017 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . libffcall-2.5/vacall/vacall-x86_64-windows-macro.S0000664000000000000000000001543314665263076016567 00000000000000#include "asm-x86_64.h" TEXT() P2ALIGN(4,15) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) L(FB0): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN2(sub,q ,NUM(144), R(rsp)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,16)) INSN2(lea,q ,X8 MEM_DISP(rbp,16), R(rcx)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(rbp,24)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,32)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,40)) INSN2S(movs,s ,R(xmm0),X4 MEM_DISP(rbp,-52)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-88)) INSN2S(movs,s ,R(xmm1),X4 MEM_DISP(rbp,-48)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-112)) INSN2S(movs,s ,R(xmm2),X4 MEM_DISP(rbp,-44)) INSN2(mov,q ,NUM(0),X8 MEM_DISP(rbp,-80)) INSN2(lea,q ,X8 MEM_DISP(rbp,-112), R(rcx)) INSN2S(movs,s ,R(xmm3),X4 MEM_DISP(rbp,-40)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-72)) INSN2S(movs,d ,R(xmm0),X8 MEM_DISP(rbp,-32)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-56)) INSN2S(movs,d ,R(xmm1),X8 MEM_DISP(rbp,-24)) INSN2S(movs,d ,R(xmm2),X8 MEM_DISP(rbp,-16)) INSN2S(movs,d ,R(xmm3),X8 MEM_DISP(rbp,-8)) INSN1(call,_ ,INDIR(X8 MEM_PCRELATIVE(C(vacall_function)))) INSN2(mov,l ,X4 MEM_DISP(rbp,-72), R(edx)) INSN2(test,l ,R(edx), R(edx)) INSN1(je,_ ,L(1)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(34)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(34)) INSN2(cmp,l ,NUM(3), R(edx)) INSN1(je,_ ,L(37)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(38)) INSN2(cmp,l ,NUM(5), R(edx)) INSN1(je,_ ,L(39)) INSN2(cmp,l ,NUM(6), R(edx)) INSN1(je,_ ,L(40)) INSN2(cmp,l ,NUM(7), R(edx)) INSN1(je,_ ,L(41)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(9), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(10), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(11), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(12), R(edx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(13), R(edx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(14), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(15), R(edx)) INSN1(jne,_ ,L(1)) INSN2(test,b ,NUM(4),X1 MEM_DISP(rbp,-111)) INSN1(je,_ ,L(17)) INSN2(mov,q ,X8 MEM_DISP(rbp,-64), R(rdx)) INSN2(lea,q ,X8 MEM_DISP(rdx,-4), R(rcx)) INSN2(test,q ,NUM(-5), R(rcx)) INSN1(je,_ ,L(20)) INSN2(lea,q ,X8 MEM_DISP(rdx,-1), R(rcx)) INSN2(cmp,q ,NUM(1), R(rcx)) INSN1(ja,_ ,L(1)) L(20): INSN2(mov,q ,X8 MEM_DISP(rbp,-80), R(r8)) INSN2(mov,q ,R(r8), R(r9)) INSN2(and,l ,NUM(7), R(r8d)) INSN2(add,q ,R(r8), R(rdx)) INSN2(and,q ,NUM(-8), R(r9)) INSN2(cmp,q ,NUM(8), R(rdx)) INSN1(ja,_ ,L(19)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,rdx,8), R(ecx)) INSN2(mov,l ,NUM(2), R(edx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN2(sub,q ,NUM(1), R(rdx)) INSN2(and,q ,X8 MEM(r9), R(rdx)) INSN2(sar,q ,R(cl), R(rdx)) INSN2(mov,q ,R(rdx), R(rax)) L(1): leave L(CFI2): ret P2ALIGN(4,10) P2ALIGN(3,7) L(34): L(CFI3): INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-104), R(rax)) leave L(CFI4): ret P2ALIGN(4,10) P2ALIGN(3,7) L(35): L(CFI5): INSN2(mov,q ,X8 MEM_DISP(rbp,-104), R(rax)) leave L(CFI6): ret P2ALIGN(4,10) P2ALIGN(3,7) L(37): L(CFI7): INSN2MOVXL(movz,b,X1 MEM_DISP(rbp,-104), R(eax)) leave L(CFI8): ret P2ALIGN(4,10) P2ALIGN(3,7) L(38): L(CFI9): INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-104), R(rax)) leave L(CFI10): ret P2ALIGN(4,10) P2ALIGN(3,7) L(39): L(CFI11): INSN2MOVXL(movz,w,X2 MEM_DISP(rbp,-104), R(eax)) leave L(CFI12): ret P2ALIGN(4,10) P2ALIGN(3,7) L(40): L(CFI13): INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-104), R(rax)) leave L(CFI14): ret P2ALIGN(4,10) P2ALIGN(3,7) L(42): L(CFI15): INSN2S(movs,s ,X4 MEM_DISP(rbp,-104), R(xmm0)) leave L(CFI16): ret P2ALIGN(4,10) P2ALIGN(3,7) L(41): L(CFI17): INSN2(mov,l ,X4 MEM_DISP(rbp,-104), R(eax)) leave L(CFI18): ret L(43): L(CFI19): INSN2S(movs,d ,X8 MEM_DISP(rbp,-104), R(xmm0)) leave L(CFI20): ret L(17): L(CFI21): INSN2(mov,q ,X8 MEM_DISP(rbp,-80), R(rax)) leave L(CFI22): ret L(19): L(CFI23): INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,rdx,8), R(ecx)) INSN2(mov,l ,NUM(2), R(edx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(mov,l ,R(r8d), R(ecx)) INSN2(sub,q ,NUM(1), R(rdx)) INSN2(and,q ,X8 MEM_DISP(r9,8), R(rdx)) INSN1(neg,l ,R(ecx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(64,rcx,8), R(ecx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN2(mov,q ,X8 MEM(r9), R(r8)) leave L(CFI24): INSN2(sar,q ,R(cl), R(r8)) INSN2(or,q ,R(r8), R(rdx)) INSN2(mov,q ,R(rdx), R(rax)) ret L(FE0): FUNEND(vacall_receiver, .-vacall_receiver) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x3 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB0) .long L(FE0)-.LFB0 .uleb128 0 .byte 0x4 .long L(CFI0)-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI2)-.LCFI1 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI3)-.LCFI2 .byte 0xb .byte 0x4 .long L(CFI4)-.LCFI3 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI5)-.LCFI4 .byte 0xb .byte 0x4 .long L(CFI6)-.LCFI5 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI7)-.LCFI6 .byte 0xb .byte 0x4 .long L(CFI8)-.LCFI7 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI9)-.LCFI8 .byte 0xb .byte 0x4 .long L(CFI10)-.LCFI9 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI11)-.LCFI10 .byte 0xb .byte 0x4 .long L(CFI12)-.LCFI11 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI13)-.LCFI12 .byte 0xb .byte 0x4 .long L(CFI14)-.LCFI13 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI15)-.LCFI14 .byte 0xb .byte 0x4 .long L(CFI16)-.LCFI15 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI17)-.LCFI16 .byte 0xb .byte 0x4 .long L(CFI18)-.LCFI17 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI19)-.LCFI18 .byte 0xb .byte 0x4 .long L(CFI20)-.LCFI19 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI21)-.LCFI20 .byte 0xb .byte 0x4 .long L(CFI22)-.LCFI21 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI23)-.LCFI22 .byte 0xb .byte 0x4 .long L(CFI24)-.LCFI23 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 L(EFDE1): #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-mips64el-linux.s0000664000000000000000000001167314665263073015701 00000000000000 .file 1 "vacall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,272,$31 # vars= 160, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $28,184($sp) lui $28,%hi(%neg(%gp_rel(vacall_receiver))) daddu $28,$28,$25 daddiu $28,$28,%lo(%neg(%gp_rel(vacall_receiver))) ld $12,%got_disp(vacall_function)($28) sd $fp,192($sp) move $fp,$sp ld $25,0($12) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $4,208($fp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) swc1 $f19,88($fp) move $4,$fp sw $0,0($fp) sd $12,24($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L46 li $13,4 # 0x4 beq $12,$13,.L47 li $13,5 # 0x5 beq $12,$13,.L48 li $13,6 # 0x6 beq $12,$13,.L49 li $13,7 # 0x7 beq $12,$13,.L50 li $13,8 # 0x8 beq $12,$13,.L44 li $13,9 # 0x9 beq $12,$13,.L44 li $13,10 # 0xa beq $12,$13,.L44 li $13,11 # 0xb beq $12,$13,.L44 li $13,12 # 0xc beq $12,$13,.L51 li $13,13 # 0xd beq $12,$13,.L52 li $13,14 # 0xe beq $12,$13,.L44 li $13,15 # 0xf bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 # 0x1 beq $12,$13,.L53 li $13,2 # 0x2 beq $12,$13,.L54 li $13,4 # 0x4 beq $12,$13,.L55 li $13,8 # 0x8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $28,184($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$14,9 andi $24,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 daddu $13,$14,$24 sltu $25,$13,9 beq $25,$0,.L25 dsll $13,$13,3 daddiu $13,$13,-1 ld $25,0($15) sll $13,$13,0 li $15,2 # 0x2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $24,$24,3 dsra $2,$13,$24 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $14,$13,.L56 li $13,8 # 0x8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 # 0x10 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $14,$12,.L60 li $12,16 # 0x10 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 dsll $13,$13,3 daddiu $13,$13,-65 ld $17,8($15) li $25,2 # 0x2 sll $13,$13,0 dsll $13,$25,$13 subu $25,$0,$24 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $24,$24,3 dsll $25,$13,$15 dsra $16,$16,$24 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$24 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: daddiu $13,$13,-129 ld $16,8($15) ld $17,0($15) sll $13,$13,0 ld $18,16($15) li $15,2 # 0x2 subu $25,$0,$24 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $24,$24,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$24 dsll $17,$16,$25 dsra $24,$16,$24 or $2,$15,$17 b .L23 or $3,$13,$24 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: daddiu $13,$13,-65 li $25,2 # 0x2 sll $13,$13,0 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$24 and $15,$13,$17 sll $24,$24,3 sll $13,$16,3 dsll $13,$15,$13 dsra $24,$25,$24 b .L23 or $2,$13,$24 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/vacall-mipsn32el-macro.S0000664000000000000000000001102614665263073015744 00000000000000#include "asm-mips.h" .file 1 "vacall-mipsn32.c" .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,256,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $28,168($sp) lui $28,%hi(__gnu_local_gp) addiu $28,$28,%lo(__gnu_local_gp) lw $12,%got_disp(vacall_function)($28) sd $fp,176($sp) move $fp,$sp lw $25,0($12) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $4,192($fp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) swc1 $f19,72($fp) move $4,$fp sw $0,0($fp) sw $12,24($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L49 li $13,4 beq $12,$13,.L50 li $13,5 beq $12,$13,.L51 li $13,6 beq $12,$13,.L46 li $13,7 beq $12,$13,.L45 li $13,8 beq $12,$13,.L46 li $13,9 beq $12,$13,.L45 li $13,10 beq $12,$13,.L47 li $13,11 beq $12,$13,.L47 li $13,12 beq $12,$13,.L52 li $13,13 beq $12,$13,.L53 li $13,14 beq $12,$13,.L46 li $13,15 bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 beq $12,$13,.L54 li $13,2 beq $12,$13,.L55 li $13,4 beq $12,$13,.L56 li $13,8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 sll $13,$13,3 ld $25,0($15) addiu $13,$13,-1 li $15,2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $14,$14,3 dsra $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $24,$13,.L57 li $13,8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $24,$12,.L61 li $12,16 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,3 ld $17,8($15) li $25,2 addiu $13,$13,-65 dsll $13,$25,$13 subu $25,$0,$14 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $14,$14,3 dsll $25,$13,$15 dsra $16,$16,$14 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $16,8($15) ld $17,0($15) addiu $13,$13,-129 ld $18,16($15) li $15,2 subu $25,$0,$14 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $14,$14,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$14 dsll $17,$16,$25 dsra $14,$16,$14 or $2,$15,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: li $25,2 addiu $13,$13,-65 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$14 and $15,$13,$17 sll $14,$14,3 sll $13,$16,3 dsll $13,$15,$13 dsra $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall.30000664000000000000000000001745013136760230012767 00000000000000.\" Copyright (C) 1995-2017 Bruno Haible .\" .\" This manual is free documentation. It is dually licensed under the .\" GNU FDL and the GNU GPL. This means that you can redistribute this .\" manual under either of these two licenses, at your choice. .\" .\" This manual is covered by the GNU FDL. Permission is granted to copy, .\" distribute and/or modify this document under the terms of the .\" GNU Free Documentation License (FDL), either version 1.2 of the .\" License, or (at your option) any later version published by the .\" Free Software Foundation (FSF); with no Invariant Sections, with no .\" Front-Cover Text, and with no Back-Cover Texts. .\" A copy of the license is at . .\" .\" This manual is covered by the GNU GPL. You can redistribute it and/or .\" modify it under the terms of the GNU General Public License (GPL), either .\" version 2 of the License, or (at your option) any later version published .\" by the Free Software Foundation (FSF). .\" A copy of the license is at . .\" .TH VACALL 3 "1 January 2017" .SH NAME vacall \- C functions called with variable arguments .SH SYNOPSIS .B #include .LP .B extern void* vacall_function; .LP .nf .BI "void " function " (va_alist" alist ")" .BI "{" .BI " va_start_" type "(" alist "[, " return_type "]);" .BI " " arg " = va_arg_" type "(" alist "[, " arg_type "]);" .BI " va_return_" type "(" alist "[[, " return_type "], " return_value "]);" .BI "}" .fi .LP .BI "vacall_function = " "&function" ";" .LP .IB "val" " = ((" return_type " (*) ()) vacall) (" arg1 , arg2 , ... ");" .SH DESCRIPTION This set of macros permit a C function .I function to be called with variable arguments and to return variable return values. This is much like the .BR stdarg (3) facility, but also allows the return value to be specified at run time. Function calling conventions differ considerably on different machines, and .I vacall attempts to provide some degree of isolation from such architecture dependencies. The function that can be called with any number and type of arguments and which will return any type of return value is .BR vacall . It will do some magic and call the function stored in the variable .BR vacall_function . If you want to make more than one use of .IR vacall , use the .IR trampoline (3) facility to store .I &function into .B vacall_function just before calling .BR vacall . Within .IR function , the following macros can be used to walk through the argument list and specify a return value: .RS 0 .TP .BI "va_start_" type "(" alist "[, " return_type "]);" starts the walk through the argument list and specifies the return type. .TP .IB arg " = va_arg_" type "(" alist "[, " arg_type "]);" fetches the next argument from the argument list. .TP .BI "va_return_" type "(" alist "[[, " return_type "], " return_value "]);" ends the walk through the argument list and specifies the return value. .RE The .I type in .BI va_start_ type and .BI va_return_ type shall be one of .BR void ", " int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr or (for ANSI C calling conventions only) .BR char ", " schar ", " uchar ", " short ", " ushort ", " float , depending on the class of .IR return_type . The .I type specifiers in .BI va_start_ type and .BI va_return_ type must be the same. The .I return_type specifiers passed to .BI va_start_ type and .BI va_return_ type must be the same. The .I type in .BI va_arg_ type shall be one of .BR int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr or (for ANSI C calling conventions only) .BR char ", " schar ", " uchar ", " short ", " ushort ", " float , depending on the class of .IR arg_type . In .BI "va_start_struct(" alist ", " return_type ", " splittable ); the .I splittable flag specifies whether the struct .I return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), .I splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), .I splittable is ignored and assumed to be 0. There are some handy macros for this: .nf .BI "va_word_splittable_1 (" type1 ) .BI "va_word_splittable_2 (" type1 ", " type2 ) .BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 ) .BI "va_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 ) .fi For a struct with three slots .nf .BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }" .fi you can specify .I splittable as .BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 ) .RB . .SH NOTES Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the .I type values .BR char ", " schar ", " uchar ", " short ", " ushort ", " float . As prescribed by the default K&R C expression promotions, they have to use .B int instead of .BR char ", " schar ", " uchar ", " short ", " ushort and .B double instead of .BR float . The macros .BR va_start_longlong(\|) , .BR va_start_ulonglong(\|) , .BR va_return_longlong(\|) , .BR va_return_ulonglong(\|) , .B va_arg_longlong(\|) and .B va_arg_ulonglong(\|) work only if the C compiler has a working .B long long 64-bit integer type. The struct types used in .B va_start_struct(\|) and .B va_struct(\|) must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. .SH EXAMPLE This example, a possible implementation of .BR execl (3) on top of .BR execv (2) using .BR stdarg (3), .nf .ft B #include #define MAXARGS 100 /* execl is called by execl(file, arg1, arg2, ..., (char *)0); */ int execl (...) { va_list ap; char* file; char* args[MAXARGS]; int argno = 0; va_start (ap); file = va_arg(ap, char*); while ((args[argno] = va_arg(ap, char*)) != (char *)0) argno++; va_end (ap); return execv(file, args); } .ft .fi looks like this using .BR vacall (3): .nf .ft B #include #define MAXARGS 100 /* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */ void execl (va_alist ap) { char* file; char* args[MAXARGS]; int argno = 0; int retval; va_start_int (ap); file = va_arg_ptr(ap, char*); while ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0) argno++; retval = execv(file, args); va_return_int (ap, retval); } vacall_function = &execl; .ft .fi .SH SEE ALSO .BR stdarg (3), .BR trampoline (3), .BR callback (3). .SH BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns .B "struct { char a,b,c; }" in registers and .B "struct { char a[3]; }" in memory, although both types have the same size and the same alignment. The argument list can only be walked once. The use of the global variable .B vacall_function is not reentrant. This is fixed in the .BR callback (3) package. .SH PORTING Knowledge about argument passing conventions can be found in the gcc source, file .RI gcc-2.6.3/config/ cpu / cpu .h, section "Stack layout; function entry, exit and calling." The implementation of varargs for gcc can be found in the gcc source, files gcc-2.6.3/ginclude/va*.h. gcc's __builtin_saveregs() function is defined in the gcc source, file gcc-2.6.3/libgcc2.c. .SH AUTHOR Bruno Haible .SH ACKNOWLEDGEMENTS Many ideas and a lot of code were cribbed from the gcc source. libffcall-2.5/vacall/vacall-i386-linux.s0000664000000000000000000000375214665263072014725 00000000000000 .file "vacall-i386.c" .text .align 2 .p2align 2,,3 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: pushl %ebp movl %esp, %ebp leal 8(%ebp), %edx pushl %esi subl $64, %esp movl %edx, -40(%ebp) leal -56(%ebp), %edx movl $0, -56(%ebp) movl $0, -36(%ebp) movl $0, -32(%ebp) movl %ebx, -24(%ebp) pushl %edx call *vacall_function movl -32(%ebp), %ecx addl $16, %esp testl %ecx, %ecx je .L43 cmpl $1, %ecx je .L44 cmpl $2, %ecx je .L44 cmpl $3, %ecx je .L49 cmpl $4, %ecx je .L50 cmpl $5, %ecx je .L51 cmpl $6, %ecx je .L48 cmpl $7, %ecx je .L48 cmpl $8, %ecx je .L48 cmpl $9, %ecx je .L48 leal -10(%ecx), %edx cmpl $1, %edx ja .L22 movl -48(%ebp), %eax #APP movl -44(%ebp),%edx .L33: .p2align 2,,3 #NO_APP .L43: movl -56(%ebp), %ecx .L3: andl $512, %ecx je .L1 #APP movl 0(%ebp),%ecx #NO_APP movl -40(%ebp), %esp #APP jmp *%ecx #NO_APP .L1: movl -4(%ebp), %esi leave ret .L22: cmpl $12, %ecx je .L52 cmpl $13, %ecx je .L53 cmpl $14, %ecx je .L48 cmpl $15, %ecx jne .L43 movl -56(%ebp), %ecx testl $1024, %ecx movl %ecx, %esi je .L31 movl -28(%ebp), %edx cmpl $1, %edx je .L54 cmpl $2, %edx je .L55 cmpl $4, %edx je .L56 cmpl $8, %edx je .L57 .L31: andl $16, %esi movl -36(%ebp), %eax jne .L3 #APP leal -4(%ebp), %esp popl %esi leave ret $4 #NO_APP jmp .L3 .L57: movl -36(%ebp), %edx movl (%edx), %eax #APP movl 4(%edx),%edx #NO_APP jmp .L3 .L56: movl -36(%ebp), %edx movl (%edx), %eax jmp .L3 .L55: movl -36(%ebp), %edx movzwl (%edx), %eax jmp .L3 .L54: movl -36(%ebp), %edx movzbl (%edx), %eax jmp .L3 .p2align 2,,3 .L48: movl -48(%ebp), %eax jmp .L43 .L53: #APP fldl -48(%ebp) #NO_APP jmp .L43 .L52: #APP flds -48(%ebp) #NO_APP jmp .L43 .p2align 2,,3 .L51: movzwl -48(%ebp), %eax jmp .L43 .L50: movswl -48(%ebp),%eax jmp .L43 .L49: movzbl -48(%ebp), %eax jmp .L43 .p2align 2,,3 .L44: movsbl -48(%ebp),%eax jmp .L43 .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-i386-linux-pic.s0000664000000000000000000000420114665263072015464 00000000000000 .file "vacall-i386.c" .text .align 2 .p2align 2,,3 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: pushl %ebp movl %esp, %ebp pushl %esi pushl %ebx subl $48, %esp call .L44 .L44: popl %ebx addl $_GLOBAL_OFFSET_TABLE_+[.-.L44], %ebx leal 8(%ebp), %edx movl %edx, -40(%ebp) subl $12, %esp leal -56(%ebp), %edx movl $0, -56(%ebp) movl $0, -36(%ebp) movl $0, -32(%ebp) movl %ebx, -24(%ebp) pushl %edx movl vacall_function@GOT(%ebx), %edx call *(%edx) movl -32(%ebp), %ecx addl $16, %esp testl %ecx, %ecx je .L43 cmpl $1, %ecx je .L45 cmpl $2, %ecx je .L45 cmpl $3, %ecx je .L50 cmpl $4, %ecx je .L51 cmpl $5, %ecx je .L52 cmpl $6, %ecx je .L49 cmpl $7, %ecx je .L49 cmpl $8, %ecx je .L49 cmpl $9, %ecx je .L49 leal -10(%ecx), %edx cmpl $1, %edx ja .L22 movl -48(%ebp), %eax #APP movl -44(%ebp),%edx .L33: .p2align 2,,3 #NO_APP .L43: movl -56(%ebp), %ecx .L3: andl $512, %ecx je .L1 #APP movl 0(%ebp),%ecx #NO_APP movl -40(%ebp), %esp #APP jmp *%ecx #NO_APP .L1: leal -8(%ebp), %esp popl %ebx popl %esi leave ret .L22: cmpl $12, %ecx je .L53 cmpl $13, %ecx je .L54 cmpl $14, %ecx je .L49 cmpl $15, %ecx jne .L43 movl -56(%ebp), %ecx testl $1024, %ecx movl %ecx, %esi je .L31 movl -28(%ebp), %edx cmpl $1, %edx je .L55 cmpl $2, %edx je .L56 cmpl $4, %edx je .L57 cmpl $8, %edx je .L58 .L31: andl $16, %esi movl -36(%ebp), %eax jne .L3 #APP leal -4(%ebp), %esp popl %esi leave ret $4 #NO_APP jmp .L3 .L58: movl -36(%ebp), %edx movl (%edx), %eax #APP movl 4(%edx),%edx #NO_APP jmp .L3 .L57: movl -36(%ebp), %edx movl (%edx), %eax jmp .L3 .L56: movl -36(%ebp), %edx movzwl (%edx), %eax jmp .L3 .L55: movl -36(%ebp), %edx movzbl (%edx), %eax jmp .L3 .p2align 2,,3 .L49: movl -48(%ebp), %eax jmp .L43 .L54: #APP fldl -48(%ebp) #NO_APP jmp .L43 .L53: #APP flds -48(%ebp) #NO_APP jmp .L43 .p2align 2,,3 .L52: movzwl -48(%ebp), %eax jmp .L43 .L51: movswl -48(%ebp),%eax jmp .L43 .L50: movzbl -48(%ebp), %eax jmp .L43 .p2align 2,,3 .L45: movsbl -48(%ebp),%eax jmp .L43 .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-powerpc64-elfv2-linux.S0000664000000000000000000001373614665263075017047 00000000000000#ifdef __LITTLE_ENDIAN__ .file "vacall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .section ".toc","aw" .LC0: .quad vacall_function .section ".text" .align 2 .p2align 4,,15 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry vacall_receiver,.-vacall_receiver mflr 0 std 31,-8(1) addis 11,2,.LC0@toc@ha ld 12,.LC0@toc@l(11) li 11,0 std 0,16(1) stdu 1,-224(1) mr 31,1 ld 0,0(12) std 2,24(1) std 9,304(31) li 9,0 std 3,256(31) addi 3,31,32 std 4,264(31) std 5,272(31) mtctr 0 stw 9,32(31) std 6,280(31) std 7,288(31) std 8,296(31) std 10,312(31) stfd 1,96(31) addi 9,31,256 stfd 2,104(31) stfd 3,112(31) stfd 4,120(31) stfd 5,128(31) mr 12,0 std 9,56(31) stfd 6,136(31) stfd 7,144(31) stfd 8,152(31) stfd 9,160(31) stfd 10,168(31) stfd 11,176(31) stfd 12,184(31) stfd 13,192(31) std 11,64(31) stw 11,72(31) stw 11,88(31) bctrl ld 2,24(1) lwz 9,72(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L27 cmplwi 7,9,2 beq 7,.L30 cmplwi 7,9,3 beq 7,.L27 cmplwi 7,9,4 beq 7,.L31 cmplwi 7,9,5 beq 7,.L32 cmplwi 7,9,6 beq 7,.L33 cmplwi 7,9,7 beq 7,.L34 cmplwi 7,9,8 beq 7,.L28 cmplwi 7,9,9 beq 7,.L28 cmplwi 7,9,10 beq 7,.L28 cmplwi 7,9,11 beq 7,.L28 cmplwi 7,9,12 beq 7,.L35 cmplwi 7,9,13 beq 7,.L36 cmplwi 7,9,14 beq 7,.L28 cmplwi 7,9,15 bne 7,.L1 lwz 9,32(31) rldicl. 10,9,54,63 beq 0,.L1 ld 9,80(31) addi 10,9,-1 cmpldi 7,10,15 bgt 7,.L1 ld 8,64(31) cmpldi 7,9,8 rldicl 10,8,0,61 rldicr 8,8,0,60 add 9,9,10 bgt 7,.L17 cmpldi 7,9,8 slwi 9,9,3 bgt 7,.L18 ld 7,0(8) addi 9,9,-1 li 8,2 slwi 10,10,3 sld 9,8,9 addi 9,9,-1 and 9,9,7 srad 3,9,10 .L1: addi 1,31,224 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L27: addi 1,31,224 lbz 3,40(31) ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L30: lbz 9,40(31) extsb 3,9 b .L1 .p2align 4,,15 .L28: ld 3,40(31) b .L1 .p2align 4,,15 .L31: lha 3,40(31) b .L1 .p2align 4,,15 .L32: lhz 3,40(31) b .L1 .p2align 4,,15 .L33: lwa 3,40(31) b .L1 .p2align 4,,15 .L35: lfs 1,40(31) b .L1 .p2align 4,,15 .L34: lwz 3,40(31) b .L1 .L36: lfd 1,40(31) b .L1 .L17: cmpldi 7,9,16 rldicl 10,10,0,32 slwi 9,9,3 ble 7,.L37 li 7,2 addi 9,9,-129 ld 11,16(8) ld 5,0(8) mulli 6,10,-8 sld 9,7,9 ld 7,8(8) addi 8,9,-1 slwi 9,10,3 addi 6,6,64 and 10,8,11 srad 8,5,9 sld 5,7,6 srad 9,7,9 sld 10,10,6 or 3,8,5 or 4,10,9 b .L1 .L18: rldicl 10,10,0,32 li 7,2 ld 6,8(8) ld 8,0(8) addi 9,9,-65 sld 9,7,9 mulli 7,10,-8 slwi 10,10,3 addi 9,9,-1 srad 10,8,10 and 9,9,6 addi 7,7,64 sld 9,9,7 or 3,9,10 b .L1 .L37: li 7,2 addi 9,9,-65 ld 5,8(8) ld 6,0(8) sld 9,7,9 mulli 7,10,-4 addi 9,9,-1 addi 7,7,32 and 8,9,5 slwi 9,10,3 sld 10,8,7 srad 6,6,9 srad 4,8,9 sld 7,10,7 or 3,6,7 b .L1 .long 0 .byte 0,0,0,1,128,1,0,0 .size vacall_receiver,.-vacall_receiver #else .file "vacall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .section ".toc","aw" .LC0: .quad vacall_function .section ".text" .align 2 .p2align 4,,15 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry vacall_receiver,.-vacall_receiver mflr 0 std 31,-8(1) addis 11,2,.LC0@toc@ha ld 12,.LC0@toc@l(11) li 11,0 std 0,16(1) stdu 1,-224(1) mr 31,1 ld 0,0(12) std 2,24(1) std 9,304(31) li 9,0 std 3,256(31) addi 3,31,32 std 4,264(31) std 5,272(31) mtctr 0 stw 9,32(31) std 6,280(31) std 7,288(31) std 8,296(31) std 10,312(31) stfd 1,96(31) addi 9,31,256 stfd 2,104(31) stfd 3,112(31) stfd 4,120(31) stfd 5,128(31) mr 12,0 std 9,56(31) stfd 6,136(31) stfd 7,144(31) stfd 8,152(31) stfd 9,160(31) stfd 10,168(31) stfd 11,176(31) stfd 12,184(31) stfd 13,192(31) std 11,64(31) stw 11,72(31) stw 11,88(31) bctrl ld 2,24(1) lwz 9,72(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L27 cmplwi 7,9,2 beq 7,.L30 cmplwi 7,9,3 beq 7,.L27 cmplwi 7,9,4 beq 7,.L31 cmplwi 7,9,5 beq 7,.L32 cmplwi 7,9,6 beq 7,.L33 cmplwi 7,9,7 beq 7,.L34 cmplwi 7,9,8 beq 7,.L28 cmplwi 7,9,9 beq 7,.L28 cmplwi 7,9,10 beq 7,.L28 cmplwi 7,9,11 beq 7,.L28 cmplwi 7,9,12 beq 7,.L35 cmplwi 7,9,13 beq 7,.L36 cmplwi 7,9,14 beq 7,.L28 cmplwi 7,9,15 bne 7,.L1 lwz 9,32(31) rldicl. 10,9,54,63 beq 0,.L1 ld 7,80(31) addi 10,7,-1 cmpldi 7,10,15 bgt 7,.L1 ld 8,64(31) cmpldi 7,7,8 rldicl 9,8,0,61 rldicr 8,8,0,60 rldicl 6,9,0,32 add 9,7,9 mulli 10,6,-8 addi 7,10,63 li 10,2 sld 10,10,7 addi 10,10,-1 bgt 7,.L17 cmpldi 7,9,8 bgt 7,.L18 ld 8,0(8) mulli 9,9,-8 and 10,10,8 addi 9,9,64 srad 3,10,9 .L1: addi 1,31,224 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L27: addi 1,31,224 lbz 3,40(31) ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L30: lbz 9,40(31) extsb 3,9 b .L1 .p2align 4,,15 .L28: ld 3,40(31) b .L1 .p2align 4,,15 .L31: lha 3,40(31) b .L1 .p2align 4,,15 .L32: lhz 3,40(31) b .L1 .p2align 4,,15 .L33: lwa 3,40(31) b .L1 .p2align 4,,15 .L35: lfs 1,40(31) b .L1 .p2align 4,,15 .L34: lwz 3,40(31) b .L1 .L36: lfd 1,40(31) b .L1 .L17: cmpldi 7,9,16 ble 7,.L37 mulli 9,9,-8 ld 5,8(8) ld 11,0(8) mulli 7,6,-4 ld 0,16(8) li 8,-1 addi 9,9,192 slwi 6,6,3 addi 7,7,32 sld 8,8,9 and 9,10,11 srad 11,5,7 and 8,8,0 sld 9,9,6 sld 6,5,6 srad 10,8,7 srad 8,11,7 srad 10,10,7 or 3,9,8 or 4,10,6 b .L1 .L18: rldicl 9,9,0,32 ld 7,0(8) ld 8,8(8) mulli 6,9,-8 slwi 9,9,3 and 10,10,7 addi 9,9,-64 addi 7,6,128 sld 9,10,9 srad 10,8,7 or 3,9,10 b .L1 .L37: ld 11,8(8) mulli 7,6,-4 ld 8,0(8) mulli 9,9,-8 slwi 6,6,3 addi 7,7,32 and 10,10,8 addi 9,9,128 li 8,-1 srad 5,11,7 sld 10,10,6 sld 9,8,9 srad 7,5,7 and 9,9,11 or 3,10,7 sld 4,9,6 b .L1 .long 0 .byte 0,0,0,1,128,1,0,0 .size vacall_receiver,.-vacall_receiver #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-s390x.c0000664000000000000000000000725114662613007013735 00000000000000/* vacall function for s390x (S/390 64-bit) CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r0"); #endif register __varword iarg1 __asm__("r2"); register __varword iarg2 __asm__("r3"); register __varword iarg3 __asm__("r4"); register __varword iarg4 __asm__("r5"); register __varword iarg5 __asm__("r6"); register float farg1 __asm__("f0"); register float farg2 __asm__("f2"); register float farg3 __asm__("f4"); register float farg4 __asm__("f6"); register double darg1 __asm__("f0"); register double darg2 __asm__("f2"); register double darg3 __asm__("f4"); register double darg4 __asm__("f6"); register __varword iret __asm__("r2"); register float fret __asm__("f0"); register double dret __asm__("f0"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = iarg1; list.iarg[1] = iarg2; list.iarg[2] = iarg3; list.iarg[3] = iarg4; list.iarg[4] = iarg5; list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong || list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulong || list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* normal struct return convention */ } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-powerpc64-linux.S0000664000000000000000000000413214665263075016021 00000000000000 .file "vacall-powerpc64.c" .machine power4 .section ".toc","aw" .section ".text" .section ".toc","aw" .LC0: .quad vacall_function .section ".text" .align 2 .p2align 4,,15 .globl vacall_receiver .section ".opd","aw" .align 3 vacall_receiver: .quad .L.vacall_receiver,.TOC.@tocbase,0 .previous .type vacall_receiver, @function .L.vacall_receiver: mflr 0 std 31,-8(1) li 11,0 std 0,16(1) stdu 1,-304(1) li 0,0 mr 31,1 std 2,40(1) stw 11,152(31) stw 0,112(31) stw 11,168(31) std 9,400(31) std 3,352(31) std 4,360(31) std 5,368(31) std 6,376(31) std 7,384(31) std 8,392(31) std 10,408(31) stfd 1,176(31) addi 9,31,352 stfd 2,184(31) stfd 3,192(31) stfd 4,200(31) stfd 5,208(31) addis 10,2,.LC0@toc@ha addi 3,31,112 stfd 6,216(31) stfd 7,224(31) stfd 8,232(31) stfd 9,240(31) stfd 10,248(31) stfd 11,256(31) stfd 12,264(31) stfd 13,272(31) std 9,136(31) std 11,144(31) ld 9,.LC0@toc@l(10) ld 9,0(9) ld 10,0(9) ld 11,16(9) mtctr 10 ld 2,8(9) bctrl ld 2,40(1) lwz 9,152(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L20 cmplwi 7,9,2 beq 7,.L23 cmplwi 7,9,3 beq 7,.L20 cmplwi 7,9,4 beq 7,.L24 cmplwi 7,9,5 beq 7,.L25 cmplwi 7,9,6 beq 7,.L26 cmplwi 7,9,7 beq 7,.L27 cmplwi 7,9,8 beq 7,.L21 cmplwi 7,9,9 beq 7,.L21 cmplwi 7,9,10 beq 7,.L21 cmplwi 7,9,11 beq 7,.L21 cmplwi 7,9,12 beq 7,.L28 cmplwi 7,9,13 beq 7,.L29 cmplwi 7,9,14 beq 7,.L21 .L1: addi 1,31,304 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L20: lbz 3,120(31) addi 1,31,304 ld 0,16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L23: lbz 9,120(31) extsb 3,9 b .L1 .p2align 4,,15 .L21: ld 3,120(31) b .L1 .p2align 4,,15 .L24: lha 3,120(31) b .L1 .p2align 4,,15 .L25: lhz 3,120(31) b .L1 .p2align 4,,15 .L26: lwa 3,120(31) b .L1 .p2align 4,,15 .L28: lfs 1,120(31) b .L1 .p2align 4,,15 .L27: lwz 3,120(31) b .L1 .L29: lfd 1,120(31) b .L1 .long 0 .byte 0,0,0,1,128,1,0,0 .size vacall_receiver,.-.L.vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall.man0000664000000000000000000002262414665326517013415 00000000000000VACALL(3) Library Functions Manual VACALL(3) NAME vacall - C functions called with variable arguments SYNOPSIS #include  extern void* vacall_function; void function (va_alistalist) { va_start_type(alist[, return_type]); arg = va_arg_type(alist[, arg_type]); va_return_type(alist[[, return_type], return_value]); } vacall_function = &function; val = ((return_type (*) ()) vacall) (arg1,arg2,...); DESCRIPTION This set of macros permit a C function function to be called with vari‐ able arguments and to return variable return values. This is much like the stdarg(3) facility, but also allows the return value to be speci‐ fied at run time. Function calling conventions differ considerably on different machines, and vacall attempts to provide some degree of isolation from such architecture dependencies. The function that can be called with any number and type of arguments and which will return any type of return value is vacall. It will do some magic and call the function stored in the variable vacall_func‐ tion. If you want to make more than one use of vacall, use the trampo‐ line(3) facility to store &function into vacall_function just before calling vacall. Within function, the following macros can be used to walk through the argument list and specify a return value: va_start_type(alist[, return_type]); starts the walk through the argument list and specifies the return type. arg = va_arg_type(alist[, arg_type]); fetches the next argument from the argument list. va_return_type(alist[[, return_type], return_value]); ends the walk through the argument list and specifies the return value. The type in va_start_type and va_return_type shall be one of void, int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of return_type. The type specifiers in va_start_type and va_return_type must be the same. The return_type specifiers passed to va_start_type and va_return_type must be the same. The type in va_arg_type shall be one of int, uint, long, ulong, long‐ long, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of arg_type. In va_start_struct(alist, return_type, splittable); the splittable flag specifies whether the struct return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: va_word_splittable_1 (type1) va_word_splittable_2 (type1, type2) va_word_splittable_3 (type1, type2, type3) va_word_splittable_4 (type1, type2, type3, type4) For a struct with three slots struct { type1 id1; type2 id2; type3 id3; } you can specify splittable as va_word_splittable_3 (type1, type2, type3) . NOTES Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the type values char, schar, uchar, short, ushort, float. As pre‐ scribed by the default K&R C expression promotions, they have to use int instead of char, schar, uchar, short, ushort and double instead of float. The macros va_start_longlong(), va_start_ulonglong(), va_return_long‐ long(), va_return_ulonglong(), va_arg_longlong() and va_arg_ulonglong() work only if the C compiler has a working long long 64-bit integer type. The struct types used in va_start_struct() and va_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. EXAMPLE This example, a possible implementation of execl(3) on top of execv(2) using stdarg(3), #include  #define MAXARGS 100 /* execl is called by execl(file, arg1, arg2, ..., (char *)0); */ int execl (...) { va_list ap; char* file; char* args[MAXARGS]; int argno = 0; va_start (ap); file = va_arg(ap, char*); while ((args[argno] = va_arg(ap, char*)) != (char *)0) argno++; va_end (ap); return execv(file, args); } looks like this using vacall(3): #include  #define MAXARGS 100 /* execl is called by vacall(file, arg1, arg2, ..., (char *)0); */ void execl (va_alist ap) { char* file; char* args[MAXARGS]; int argno = 0; int retval; va_start_int (ap); file = va_arg_ptr(ap, char*); while ((args[argno] = va_arg_ptr(ap, char*)) != (char *)0) argno++; retval = execv(file, args); va_return_int (ap, retval); } vacall_function = &execl; SEE ALSO stdarg(3), trampoline(3), callback(3). BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in mem‐ ory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in regis‐ ters and struct { char a[3]; } in memory, although both types have the same size and the same alignment. The argument list can only be walked once. The use of the global variable vacall_function is not reentrant. This is fixed in the callback(3) package. PORTING Knowledge about argument passing conventions can be found in the gcc source, file gcc-2.6.3/config/cpu/cpu.h, section "Stack layout; func‐ tion entry, exit and calling." The implementation of varargs for gcc can be found in the gcc source, files gcc-2.6.3/ginclude/va*.h. gcc's __builtin_saveregs() function is defined in the gcc source, file gcc-2.6.3/libgcc2.c. AUTHOR Bruno Haible ACKNOWLEDGEMENTS Many ideas and a lot of code were cribbed from the gcc source. 1 January 2017 VACALL(3) libffcall-2.5/vacall/vacall-x86_64-windows.c0000664000000000000000000001473114662613007015476 00000000000000/* vacall function for x86_64 CPU with the Windows ABI ('gcc -mabi=ms') */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r10"); #endif /*register __varword iarg1 __asm__("rcx");*/ /*register __varword iarg2 __asm__("rdx");*/ /*register __varword iarg3 __asm__("r8");*/ /*register __varword iarg4 __asm__("r9");*/ register float farg1 __asm__("xmm0"); register float farg2 __asm__("xmm1"); register float farg3 __asm__("xmm2"); register float farg4 __asm__("xmm3"); register double darg1 __asm__("xmm0"); register double darg2 __asm__("xmm1"); register double darg3 __asm__("xmm2"); register double darg4 __asm__("xmm3"); register __varword iret __asm__("rax"); register float fret __asm__("xmm0"); register double dret __asm__("xmm0"); /* * Tell gcc to not use the call-saved registers %rbx, %rsi, %rdi. * This ensures that the return sequence does not need to restore registers * from the stack. */ register void* dummy1 __asm__("%rbx"); register void* dummy2 __asm__("%rsi"); register void* dummy3 __asm__("%rdi"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-4] = word1; (&firstword)[-3] = word2; (&firstword)[-2] = word3; (&firstword)[-1] = word4; /* Move the floating-point arguments passed in registers to temp storage. */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 4); list.raddr = (void*)0; list.rtype = __VAvoid; list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size 1, 2, 4, 8 in registers. */ #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = (__varword)((unsigned char *) list.raddr)[0]; } else if (list.rsize == 2) { iret = (__varword)((unsigned char *) list.raddr)[0] | ((__varword)((unsigned char *) list.raddr)[1] << 8); } else if (list.rsize == 4) { iret = (__varword)((unsigned char *) list.raddr)[0] | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24); } else if (list.rsize == 8) { iret = (__varword)((unsigned char *) list.raddr)[0] | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48) | ((__varword)((unsigned char *) list.raddr)[7] << 56); } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ sizeof(__varword) */ if (count == 1 || count == 2 || count == 4 || count == 8) { __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 2*sizeof(__varword) */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } #endif } else { iret = (long)list.raddr; } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-x86_64-windows.s0000664000000000000000000001136514665263076015530 00000000000000 .file "vacall-x86_64-windows.c" .text .p2align 4,,15 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: subq $144, %rsp movq %rcx, 16(%rbp) leaq 16(%rbp), %rcx movq %rdx, 24(%rbp) movq %r8, 32(%rbp) movq %r9, 40(%rbp) movss %xmm0, -52(%rbp) movq %rcx, -88(%rbp) movss %xmm1, -48(%rbp) movl $0, -112(%rbp) movss %xmm2, -44(%rbp) movq $0, -80(%rbp) leaq -112(%rbp), %rcx movss %xmm3, -40(%rbp) movl $0, -72(%rbp) movsd %xmm0, -32(%rbp) movl $0, -56(%rbp) movsd %xmm1, -24(%rbp) movsd %xmm2, -16(%rbp) movsd %xmm3, -8(%rbp) call *vacall_function(%rip) movl -72(%rbp), %edx testl %edx, %edx je .L1 cmpl $1, %edx je .L34 cmpl $2, %edx je .L34 cmpl $3, %edx je .L37 cmpl $4, %edx je .L38 cmpl $5, %edx je .L39 cmpl $6, %edx je .L40 cmpl $7, %edx je .L41 cmpl $8, %edx je .L35 cmpl $9, %edx je .L35 cmpl $10, %edx je .L35 cmpl $11, %edx je .L35 cmpl $12, %edx je .L42 cmpl $13, %edx je .L43 cmpl $14, %edx je .L35 cmpl $15, %edx jne .L1 testb $4, -111(%rbp) je .L17 movq -64(%rbp), %rdx leaq -4(%rdx), %rcx testq $-5, %rcx je .L20 leaq -1(%rdx), %rcx cmpq $1, %rcx ja .L1 .L20: movq -80(%rbp), %r8 movq %r8, %r9 andl $7, %r8d addq %r8, %rdx andq $-8, %r9 cmpq $8, %rdx ja .L19 leal -1(,%rdx,8), %ecx movl $2, %edx salq %cl, %rdx leal 0(,%r8,8), %ecx subq $1, %rdx andq (%r9), %rdx sarq %cl, %rdx movq %rdx, %rax .L1: leave .LCFI2: ret .p2align 4,,10 .p2align 3 .L34: .LCFI3: movsbq -104(%rbp), %rax leave .LCFI4: ret .p2align 4,,10 .p2align 3 .L35: .LCFI5: movq -104(%rbp), %rax leave .LCFI6: ret .p2align 4,,10 .p2align 3 .L37: .LCFI7: movzbl -104(%rbp), %eax leave .LCFI8: ret .p2align 4,,10 .p2align 3 .L38: .LCFI9: movswq -104(%rbp), %rax leave .LCFI10: ret .p2align 4,,10 .p2align 3 .L39: .LCFI11: movzwl -104(%rbp), %eax leave .LCFI12: ret .p2align 4,,10 .p2align 3 .L40: .LCFI13: movslq -104(%rbp), %rax leave .LCFI14: ret .p2align 4,,10 .p2align 3 .L42: .LCFI15: movss -104(%rbp), %xmm0 leave .LCFI16: ret .p2align 4,,10 .p2align 3 .L41: .LCFI17: movl -104(%rbp), %eax leave .LCFI18: ret .L43: .LCFI19: movsd -104(%rbp), %xmm0 leave .LCFI20: ret .L17: .LCFI21: movq -80(%rbp), %rax leave .LCFI22: ret .L19: .LCFI23: leal -65(,%rdx,8), %ecx movl $2, %edx salq %cl, %rdx movl %r8d, %ecx subq $1, %rdx andq 8(%r9), %rdx negl %ecx leal 64(,%rcx,8), %ecx salq %cl, %rdx leal 0(,%r8,8), %ecx movq (%r9), %r8 leave .LCFI24: sarq %cl, %r8 orq %r8, %rdx movq %rdx, %rax ret .LFE0: .size vacall_receiver, .-vacall_receiver .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x3 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0 .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xb .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xb .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI7-.LCFI6 .byte 0xb .byte 0x4 .long .LCFI8-.LCFI7 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI9-.LCFI8 .byte 0xb .byte 0x4 .long .LCFI10-.LCFI9 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI11-.LCFI10 .byte 0xb .byte 0x4 .long .LCFI12-.LCFI11 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI13-.LCFI12 .byte 0xb .byte 0x4 .long .LCFI14-.LCFI13 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI15-.LCFI14 .byte 0xb .byte 0x4 .long .LCFI16-.LCFI15 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI17-.LCFI16 .byte 0xb .byte 0x4 .long .LCFI18-.LCFI17 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI19-.LCFI18 .byte 0xb .byte 0x4 .long .LCFI20-.LCFI19 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI21-.LCFI20 .byte 0xb .byte 0x4 .long .LCFI22-.LCFI21 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI23-.LCFI22 .byte 0xb .byte 0x4 .long .LCFI24-.LCFI23 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 .LEFDE1: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-sparc64-linux.s0000664000000000000000000001312314665263073015510 00000000000000 .file "vacall-sparc64.c" .section ".text" .align 4 .global vacall_receiver .type vacall_receiver, #function .proc 020 vacall_receiver: .register %g2, #scratch .register %g3, #scratch save %sp, -448, %sp add %fp, 2175, %g1 stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] sethi %lm(vacall_function), %g2 st %f23, [%fp+1879] stx %g1, [%fp+1799] st %f25, [%fp+1883] st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] stx %g0, [%fp+1807] st %g0, [%fp+1815] st %g0, [%fp+1831] sethi %hh(vacall_function), %g1 or %g1, %hm(vacall_function), %g1 sllx %g1, 32, %g1 add %g1, %g2, %g1 ldx [%g1+%lo(vacall_function)], %g3 call %g3, 0 add %fp, 1775, %o0 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, .LL61 cmp %g1, 1 be,pn %icc, .LL50 cmp %g1, 2 be,pn %icc, .LL50 cmp %g1, 3 be,pn %icc, .LL53 cmp %g1, 4 be,pn %icc, .LL54 cmp %g1, 5 be,pn %icc, .LL55 cmp %g1, 6 be,pn %icc, .LL56 cmp %g1, 7 be,pn %icc, .LL57 cmp %g1, 8 be,pn %icc, .LL51 cmp %g1, 9 be,pn %icc, .LL51 cmp %g1, 10 be,pn %icc, .LL51 cmp %g1, 11 be,pn %icc, .LL51 cmp %g1, 12 be,pn %icc, .LL58 cmp %g1, 13 be,pn %icc, .LL59 cmp %g1, 14 be,pn %icc, .LL51 cmp %g1, 15 bne,pt %icc, .LL61 lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, .LL61 ldx [%fp+1823], %g5 add %g5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, .LL61 ldx [%fp+1807], %g1 cmp %g5, 8 and %g1, 7, %o2 and %g1, -8, %l0 bgu,pt %xcc, .LL35 add %g5, %o2, %g2 cmp %g2, 8 bgu,pt %xcc, .LL37 sllx %o2, 3, %g4 sllx %g2, 3, %g2 ldx [%l0], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 .LL47: ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g4 ldx [%l0+16], %g5 sllx %g4, %o4, %o1 sllx %g5, %o4, %o0 ldx [%l0+24], %o5 sllx %g2, 3, %o3 sllx %o5, %o4, %o7 ldx [%l0+32], %o2 sub %g0, %o3, %o3 mov 64, %g3 sub %g3, %o4, %g3 srax %g4, %g3, %g4 srax %g5, %g3, %g5 or %g1, %g4, %i0 srax %o5, %g3, %o5 mov -1, %g1 or %o1, %g5, %i1 sllx %g1, %o3, %g1 or %o0, %o5, %i2 and %g1, %o2, %g1 srax %g1, %g3, %g1 or %o7, %g1, %i3 .LL61: return %i7+8 nop .LL50: ldsb [%fp+1783], %i0 return %i7+8 nop .LL54: ldsh [%fp+1783], %i0 return %i7+8 nop .LL53: ldub [%fp+1783], %i0 return %i7+8 nop .LL51: ldx [%fp+1783], %i0 return %i7+8 nop .LL55: lduh [%fp+1783], %i0 return %i7+8 nop .LL56: ldsw [%fp+1783], %i0 return %i7+8 nop .LL57: lduw [%fp+1783], %i0 return %i7+8 nop .LL58: ld [%fp+1783], %f0 return %i7+8 nop .LL59: ldd [%fp+1783], %f0 return %i7+8 nop .LL35: cmp %g5, 16 bgu,pt %xcc, .LL39 cmp %g5, 24 cmp %g2, 16 bgu,pt %xcc, .LL41 sllx %o2, 3, %o5 sllx %g2, 3, %g3 ldx [%l0+8], %g2 sll %o2, 3, %g5 sllx %o2, 2, %o5 sub %g0, %g3, %g3 ldx [%l0], %g4 mov -1, %g1 sllx %g4, %g5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %g5, %i1 sub %g2, %o5, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 .LL37: sllx %g2, 3, %g3 ldx [%l0+8], %g5 sub %g0, %g3, %g3 sub %g0, %g4, %o5 ldx [%l0], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %g5, %g1 srax %g1, %o5, %g1 return %i7+8 or %g2, %g1, %o0 .LL39: bgu,pt %xcc, .LL43 cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, .LL45 sllx %o2, 3, %o4 sllx %o2, 2, %g1 sll %o2, 3, %g5 sllx %g2, 3, %o5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %g5, %o3 sub %g0, %o5, %o5 mov 32, %g4 ldx [%l0], %g2 sub %g4, %g1, %g4 sllx %g2, %g5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o5, %g1 and %g1, %o4, %g1 sllx %g1, %g5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL41: sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %o5, %o3 sub %g0, %g5, %g5 mov 64, %g4 ldx [%l0], %g2 sub %g4, %o5, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL45: ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o4, %o3 sllx %g4, %o4, %o1 sllx %g2, 3, %o5 ldx [%l0+24], %o2 sub %g0, %o5, %o5 mov 64, %g5 sub %g5, %o4, %g5 srax %g3, %g5, %g3 srax %g4, %g5, %g4 or %g1, %g3, %i0 or %o3, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 srax %g1, %g5, %g1 or %o1, %g1, %i2 return %i7+8 nop .LL43: bgu,pt %xcc, .LL47 sllx %o2, 3, %o4 sll %o2, 3, %o5 ldx [%l0], %g1 sllx %g1, %o5, %g1 sllx %o2, 2, %o4 sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o5, %o2 sllx %g4, %o5, %o1 ldx [%l0+24], %o3 sub %g0, %g5, %g5 mov 32, %g2 sub %g2, %o4, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o1, %g1, %i2 return %i7+8 nop .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/vacall/vacall-m68k.mit.S0000664000000000000000000000456514665263072014417 00000000000000#include "asm-m68k.h" .text .even .globl C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) link $a6,#-32 moveml #0x3030,$sp@- clrl $a6@(-32) lea $a6@(8),$a2 movel $a2,$a6@(-20) clrl $a6@(-16) clrl $a6@(-12) movel $a1,$a6@(-4) pea $a6@(-32) movel C(vacall_function),$a2 jbsr $a2@ addql #4,$sp movel $a6@(-12),$a3 tstl $a3 jeq L(1) moveq #1,$d2 cmpl $a3,$d2 jeq L(46) moveq #2,$d3 cmpl $a3,$d3 jeq L(46) moveq #3,$d2 cmpl $a3,$d2 jeq L(47) moveq #4,$d3 cmpl $a3,$d3 jeq L(48) moveq #5,$d2 cmpl $a3,$d2 jeq L(49) moveq #6,$d3 cmpl $a3,$d3 jeq L(45) moveq #7,$d2 cmpl $a3,$d2 jeq L(45) moveq #8,$d3 cmpl $a3,$d3 jeq L(45) moveq #9,$d2 cmpl $a3,$d2 jeq L(45) lea $a3@(-10),$a2 moveq #1,$d3 cmpl $a2,$d3 jcs L(22) movel $a6@(-28),$d0 movel $a6@(-24),$d1 jra L(1) .even L(22): moveq #12,$d2 cmpl $a3,$d2 jeq L(50) moveq #13,$d2 cmpl $a3,$d2 jeq L(51) moveq #14,$d3 cmpl $a3,$d3 jeq L(52) moveq #15,$d2 cmpl $a3,$d2 jne L(1) btst #2,$a6@(-30) jeq L(1) movel $a6@(-8),$d2 moveq #1,$d3 cmpl $d2,$d3 jeq L(53) moveq #2,$d3 cmpl $d2,$d3 jeq L(54) moveq #4,$d3 cmpl $d2,$d3 jeq L(55) moveq #8,$d3 cmpl $d2,$d3 jne L(1) movel $a6@(-16),$a2 movel $a2@,$d0 movel $a2@(4),$d1 jra L(1) .even L(55): movel $a6@(-16),$a2 movel $a2@,$d0 jra L(1) .even L(54): movel $a6@(-16),$a2 clrl $d0 movew $a2@,$d0 jra L(1) .even L(53): movel $a6@(-16),$a2 clrl $d0 moveb $a2@,$d0 jra L(1) .even L(52): movel $a6@(-28),$d0 movel $d0,$a0 jra L(1) .even L(51): btst #6,$a6@(-29) jeq L(31) fmoved $a6@(-28),$fp0 jra L(1) .even L(31): movel $a6@(-28),$d0 movel $a6@(-24),$d1 jra L(1) .even L(50): movel $a6@(-32),$d2 btst #6,$d2 jeq L(25) fmoves $a6@(-28),$fp0 jra L(1) .even L(25): btst #5,$d2 jeq L(27) fmoves $a6@(-28),$fp1 fmoved $fp1,$sp@- movel $sp@+,$d0 movel $sp@+,$d1 jra L(1) .even L(27): movel $a6@(-28),$d0 jra L(1) .even L(45): movel $a6@(-28),$d0 jra L(1) .even L(49): clrl $d0 movew $a6@(-28),$d0 jra L(1) .even L(48): movew $a6@(-28),$d0 extl $d0 jra L(1) .even L(47): clrl $d0 moveb $a6@(-28),$d0 jra L(1) .even L(46): moveb $a6@(-28),$d0 extbl $d0 L(1): moveml $a6@(-48),#0xc0c unlk $a6 rts FUNEND(vacall_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-riscv64-lp64d-linux.s0000664000000000000000000000513414665263077016464 00000000000000 .file "vacall-riscv64.c" .option nopic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 lui t1,%hi(vacall_function) ld t1,%lo(vacall_function)(t1) sd a0,-200(s0) add a0,s0,16 sd a7,8(s0) sd a1,-192(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a0,-240(s0) sw zero,-264(s0) sd zero,-232(s0) add a0,s0,-264 sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) jalr t1 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s1,8 and t6,t5,7 add t2,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,t2,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s1,.L15 bgtu t2,s1,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s1,16 sra t4,t4,t3 ld t0,8(t5) bleu t2,s1,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/vacall/vacall-hppa64-linux.s0000664000000000000000000000757014665263073015341 00000000000000 .LEVEL 2.0w .text .align 8 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: .PROC .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=8 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,384(%r30) std %r4,224(%r3) copy %r27,%r4 std %r8,192(%r3) std %r7,200(%r3) std %r6,208(%r3) std %r5,216(%r3) std %r26,-64(%r29) std %r19,-8(%r29) std %r25,-56(%r29) std %r24,-48(%r29) std %r23,-40(%r29) std %r22,-32(%r29) std %r21,-24(%r29) std %r20,-16(%r29) #APP fstw %fr4R,88(%r3) fstw %fr5R,92(%r3) fstw %fr6R,96(%r3) fstw %fr7R,100(%r3) fstw %fr8R,104(%r3) fstw %fr9R,108(%r3) fstw %fr10R,112(%r3) fstw %fr11R,116(%r3) #NO_APP fstd %fr10,168(%r3) addil LT'vacall_function,%r27 ldo -64(%r29),%r31 ldd RT'vacall_function(%r1),%r1 ldo 16(%r3),%r26 std %r31,40(%r3) std %r29,80(%r3) ldo -16(%r30),%r29 ldd 0(%r1),%r31 fstd %fr11,176(%r3) fstd %fr4,120(%r3) fstd %fr5,128(%r3) fstd %fr6,136(%r3) fstd %fr7,144(%r3) fstd %fr8,152(%r3) fstd %fr9,160(%r3) stw %r0,16(%r3) std %r0,48(%r3) stw %r0,56(%r3) ldd 16(%r31),%r2 ldd 24(%r31),%r27 bve,l (%r2),%r2 nop ldw 56(%r3),%r31 cmpib,= 0,%r31,.L1 copy %r4,%r27 cmpib,=,n 1,%r31,.L43 cmpib,=,n 2,%r31,.L43 cmpib,=,n 3,%r31,.L44 cmpib,=,n 4,%r31,.L45 cmpib,=,n 5,%r31,.L46 cmpib,=,n 6,%r31,.L47 cmpib,=,n 7,%r31,.L41 cmpib,=,n 8,%r31,.L40 cmpib,=,n 10,%r31,.L40 cmpib,=,n 9,%r31,.L40 cmpib,=,n 11,%r31,.L40 cmpib,=,n 12,%r31,.L48 cmpib,=,n 13,%r31,.L49 cmpib,=,n 14,%r31,.L40 cmpib,= 15,%r31,.L50 ldw 16(%r3),%r31 .L1: ldd -16(%r3),%r2 ldd 192(%r3),%r8 ldd 200(%r3),%r7 ldd 208(%r3),%r6 ldd 216(%r3),%r5 ldd 224(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 .L50: extrd,u %r31,53+1-1,1,%r31 cmpib,= 0,%r31,.L1 ldd 48(%r3),%r28 ldd 48(%r3),%r31 ldd 64(%r3),%r2 extrd,u %r31,63,3,%r6 copy %r31,%r1 depdi 0,63,3,%r1 cmpib,*<< 8,%r2,.L32 add,l %r6,%r2,%r4 cmpib,*<< 8,%r4,.L33 depd,z %r4,60,61,%r31 subi 64,%r31,%r31 ldd 0(%r1),%r2 extrd,s %r31,63,32,%r31 mtsarcm %r31 depd,z %r6,60,61,%r4 depdi,z 1,%sar,64,%r31 mtsarcm %r4 sub %r0,%r31,%r31 and %r2,%r31,%r2 depd,z %r2,%sar,64,%r2 b .L1 copy %r2,%r28 .L33: subi 128,%r31,%r31 depd,z %r6,60,61,%r2 extrd,s %r31,63,32,%r31 subi 64,%r2,%r5 mtsarcm %r31 subi 63,%r2,%r7 depdi,z 1,%sar,64,%r31 mtsar %r7 ldd 8(%r1),%r4 sub %r0,%r31,%r31 extrd,s %r5,63,32,%r5 ldd 0(%r1),%r2 subi 63,%r5,%r5 and %r4,%r31,%r4 depd,z %r2,%sar,64,%r2 mtsar %r5 extrd,s %r4,%sar,64,%r4 .L39: b .L1 or %r4,%r2,%r28 .L32: ldi 16,%r31 cmpb,*<< %r31,%r4,.L36 depd,z %r4,60,61,%r31 subi 128,%r31,%r31 depd,z %r6,61,62,%r2 extrd,s %r31,63,32,%r31 subi 32,%r2,%r2 mtsarcm %r31 extrd,s %r2,63,32,%r2 depdi,z 1,%sar,64,%r31 subi 63,%r2,%r7 ldd 8(%r1),%r4 sub %r0,%r31,%r31 mtsar %r7 ldd 0(%r1),%r5 and %r4,%r31,%r4 depd,z %r6,60,61,%r31 extrd,s %r4,%sar,64,%r2 subi 63,%r31,%r31 extrd,s %r2,%sar,64,%r2 mtsar %r31 depd,z %r4,%sar,64,%r4 depd,z %r5,%sar,64,%r5 copy %r4,%r29 b .L1 or %r5,%r2,%r28 .L36: subi 192,%r31,%r31 depd,z %r6,60,61,%r2 extrd,s %r31,63,32,%r31 subi 64,%r2,%r6 mtsarcm %r31 subi 63,%r2,%r8 depdi,z 1,%sar,64,%r31 mtsar %r8 ldd 8(%r1),%r2 sub %r0,%r31,%r31 ldd 16(%r1),%r5 extrd,s %r6,63,32,%r6 subi 63,%r6,%r6 and %r5,%r31,%r5 ldd 0(%r1),%r4 depd,z %r2,%sar,64,%r31 mtsar %r6 extrd,s %r5,%sar,64,%r5 mtsar %r8 depd,z %r4,%sar,64,%r4 or %r31,%r5,%r29 mtsar %r6 b .L39 extrd,s %r2,%sar,64,%r2 .L40: b .L1 ldd 24(%r3),%r28 .L49: b .L40 fldd 24(%r3),%fr4 .L48: #APP fldw 24(%r3),%fr4R #NO_APP .L41: ldw 24(%r3),%r31 .L42: b .L1 copy %r31,%r28 .L47: ldw 24(%r3),%r31 b .L1 extrd,s %r31,63,32,%r28 .L46: b .L42 ldh 24(%r3),%r31 .L45: ldh 24(%r3),%r31 b .L1 extrd,s %r31,63,16,%r28 .L44: b .L42 ldb 24(%r3),%r31 .L43: ldb 24(%r3),%r31 b .L1 extrd,s %r31,63,8,%r28 .EXIT .PROCEND .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-riscv32-ilp32d-linux-pic.s0000664000000000000000000000432714665263077017377 00000000000000 .file "vacall-riscv32.c" .option pic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 la t1,vacall_function lw t1,0(t1) sw a0,-148(s0) add a0,s0,16 sw a7,12(s0) sw a1,-144(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a0,-168(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) add a0,s0,-184 sw zero,-152(s0) sw zero,-116(s0) jalr t1 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/vacall/vacall-mipsn32eb-macro.S0000664000000000000000000001070214665263073015732 00000000000000#include "asm-mips.h" .file 1 "vacall-mipsn32.c" .text .align 2 .align 3 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver DECLARE_FUNCTION(vacall_receiver) vacall_receiver: .frame $fp,256,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $28,168($sp) lui $28,%hi(__gnu_local_gp) addiu $28,$28,%lo(__gnu_local_gp) lw $12,%got_disp(vacall_function)($28) sd $fp,176($sp) move $fp,$sp lw $25,0($12) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $4,192($fp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) swc1 $f19,72($fp) move $4,$fp sw $0,0($fp) sw $12,24($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L49 li $13,4 beq $12,$13,.L50 li $13,5 beq $12,$13,.L51 li $13,6 beq $12,$13,.L46 li $13,7 beq $12,$13,.L45 li $13,8 beq $12,$13,.L46 li $13,9 beq $12,$13,.L45 li $13,10 beq $12,$13,.L47 li $13,11 beq $12,$13,.L47 li $13,12 beq $12,$13,.L52 li $13,13 beq $12,$13,.L53 li $13,14 beq $12,$13,.L46 li $13,15 bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 beq $12,$13,.L54 li $13,2 beq $12,$13,.L55 li $13,4 beq $12,$13,.L56 li $13,8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $28,168($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($15) sll $13,$13,3 li $15,-1 dsll $13,$15,$13 and $13,$13,$25 sll $14,$14,3 dsll $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $24,$13,.L57 li $13,8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $24,$12,.L61 li $12,16 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 subu $13,$0,$13 ld $17,8($15) subu $16,$0,$14 li $25,-1 sll $13,$13,3 dsll $13,$25,$13 sll $25,$16,2 ld $16,0($15) and $13,$13,$17 addiu $15,$25,32 sll $14,$14,3 dsra $25,$13,$15 dsll $16,$16,$14 dsra $15,$25,$15 or $2,$16,$15 b .L23 dsll $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($15) ld $16,8($15) ld $17,0($15) subu $25,$0,$14 li $15,-1 sll $13,$13,3 sll $25,$25,3 dsll $13,$15,$13 sll $14,$14,3 addiu $15,$25,64 and $13,$13,$18 dsll $25,$17,$14 dsra $13,$13,$15 dsra $17,$16,$15 dsll $14,$16,$14 or $2,$25,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($15) ld $25,0($15) sll $13,$13,3 li $15,-1 dsll $13,$15,$13 subu $15,$0,$14 and $13,$13,$16 sll $15,$15,3 sll $14,$14,3 dsra $13,$13,$15 dsll $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver libffcall-2.5/vacall/vacall-arm-eabi-linux.s0000664000000000000000000000361614665263074015712 00000000000000 .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .file "vacall-arm.c" .text .align 2 .global vacall_receiver .syntax unified .arm .fpu softvfp .type vacall_receiver, %function vacall_receiver: @ Function supports interworking. @ args = 20, pretend = 16, frame = 32 @ frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, #16 push {r4, fp, lr} add fp, sp, #8 sub sp, sp, #36 mov lr, #0 ldr r4, .L31 add ip, fp, #4 stm ip, {r0, r1, r2, r3} str ip, [fp, #-28] ldr r3, [r4] sub r0, fp, #44 str lr, [fp, #-44] str lr, [fp, #-24] str lr, [fp, #-20] mov lr, pc bx r3 ldr r3, [fp, #-20] cmp r3, #0 beq .L1 cmp r3, #1 beq .L25 cmp r3, #2 ldrsbeq r0, [fp, #-36] beq .L1 cmp r3, #3 beq .L25 cmp r3, #4 ldrsheq r0, [fp, #-36] beq .L1 cmp r3, #5 ldrheq r0, [fp, #-36] beq .L1 cmp r3, #6 beq .L27 cmp r3, #7 beq .L27 cmp r3, #8 beq .L27 cmp r3, #9 beq .L27 sub r2, r3, #10 cmp r2, #1 bls .L28 cmp r3, #12 ldreq r0, [fp, #-36] @ float beq .L1 cmp r3, #13 beq .L28 cmp r3, #14 beq .L27 cmp r3, #15 bne .L1 ldr r3, [fp, #-44] tst r3, #1024 beq .L1 ldr r3, [fp, #-16] cmp r3, #1 beq .L30 cmp r3, #2 ldr r3, [fp, #-24] ldrheq r0, [r3] ldrne r0, [r3] .L1: sub sp, fp, #8 @ sp needed pop {r4, fp, lr} add sp, sp, #16 bx lr .L25: ldrb r0, [fp, #-36] @ zero_extendqisi2 sub sp, fp, #8 @ sp needed pop {r4, fp, lr} add sp, sp, #16 bx lr .L27: ldr r0, [fp, #-36] sub sp, fp, #8 @ sp needed pop {r4, fp, lr} add sp, sp, #16 bx lr .L28: sub r0, fp, #36 ldm r0, {r0, r1} b .L1 .L30: ldr r3, [fp, #-24] ldrb r0, [r3] @ zero_extendqisi2 b .L1 .L32: .align 2 .L31: .word vacall_function .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 6.5.0" .section .note.GNU-stack,"",%progbits libffcall-2.5/vacall/vacall-loongarch64.c0000664000000000000000000002141014662613007015166 00000000000000/* vacall function for LoongArch 64-bit CPU */ /* * Copyright 1995-2022 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r20"); #endif register __varword iarg1 __asm__("r4"); register __varword iarg2 __asm__("r5"); register __varword iarg3 __asm__("r6"); register __varword iarg4 __asm__("r7"); register __varword iarg5 __asm__("r8"); register __varword iarg6 __asm__("r9"); register __varword iarg7 __asm__("r10"); register __varword iarg8 __asm__("r11"); register float farg1 __asm__("f0"); register float farg2 __asm__("f1"); register float farg3 __asm__("f2"); register float farg4 __asm__("f3"); register float farg5 __asm__("f4"); register float farg6 __asm__("f5"); register float farg7 __asm__("f6"); register float farg8 __asm__("f7"); register double darg1 __asm__("f0"); register double darg2 __asm__("f1"); register double darg3 __asm__("f2"); register double darg4 __asm__("f3"); register double darg5 __asm__("f4"); register double darg6 __asm__("f5"); register double darg7 __asm__("f6"); register double darg8 __asm__("f7"); register __varword iret __asm__("r4"); register __varword iret2 __asm__("r5"); register float fret __asm__("f0"); register double dret __asm__("f0"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to structs that are at most 2 words large. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the retaddr - if and only if they are part of a struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word8; /* a7 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, struct gpargsequence gpargs) { __va_alist list; /* Move the arguments passed in registers to temp storage. */ list.iarg[0] = iarg1; list.iarg[1] = iarg2; list.iarg[2] = iarg3; list.iarg[3] = iarg4; list.iarg[4] = iarg5; list.iarg[5] = iarg6; list.iarg[6] = iarg7; list.iarg[7] = iarg8; /* = gpargs.word8 */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; list.darg[0] = darg1; list.darg[1] = darg2; list.darg[2] = darg3; list.darg[3] = darg4; list.darg[4] = darg5; list.darg[5] = darg6; list.darg[6] = darg7; list.darg[7] = darg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs + sizeof(__vaword); list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong || list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulong || list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* normal struct return convention */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 16 in registers. */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) iret |= (__varword)((unsigned char *) list.raddr)[4] << 32; if (list.rsize >= 6) iret |= (__varword)((unsigned char *) list.raddr)[5] << 40; if (list.rsize >= 7) iret |= (__varword)((unsigned char *) list.raddr)[6] << 48; if (list.rsize >= 8) iret |= (__varword)((unsigned char *) list.raddr)[7] << 56; if (list.rsize >= 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; if (list.rsize >= 10) iret2 |= (__varword)((unsigned char *) list.raddr)[9] << 8; if (list.rsize >= 11) iret2 |= (__varword)((unsigned char *) list.raddr)[10] << 16; if (list.rsize >= 12) iret2 |= (__varword)((unsigned char *) list.raddr)[11] << 24; if (list.rsize >= 13) iret2 |= (__varword)((unsigned char *) list.raddr)[12] << 32; if (list.rsize >= 14) iret2 |= (__varword)((unsigned char *) list.raddr)[13] << 40; if (list.rsize >= 15) iret2 |= (__varword)((unsigned char *) list.raddr)[14] << 48; if (list.rsize >= 16) iret2 |= (__varword)((unsigned char *) list.raddr)[15] << 56; } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-arm.c0000664000000000000000000001144414662613007013625 00000000000000/* vacall function for arm CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver typedef struct { void (*vacall_function) (void*,va_alist); void* arg; } env_t; #endif /* armel have only softvfp which uses generic registers */ register __varword iret __asm__("r0"); register __varword iret2 __asm__("r1"); register float fret __asm__("r0"); register __varword dret1 __asm__("r0"); register __varword dret2 __asm__("r1"); #ifndef REENTRANT /* The ARM ABI requires that the first 4 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, sp, retaddr, pc} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* r0 */ __vaword word2; /* r1 */ __vaword word3; /* r2 */ __vaword word4; /* r3 */ __vaword firststackword; }; void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) #else /* REENTRANT */ /* The first 4 general-purpose argument words have already been pushed to the stack by the trampoline. We can ignore them here. */ static void /* the return type is variable, not void! */ vacall_receiver (__vaword ignored1, __vaword ignored2, __vaword ignored3, __vaword ignored4, env_t* env, __vaword filler, __vaword saved_fp, __vaword saved_sp, __vaword saved_lr, __vaword saved_pc, __vaword firstword) #endif { __va_alist list; /* Enforce 8-bytes-alignment of the stack pointer. We need to do it this way because the old GCC that we use to compile this file does not support the option '-mabi=aapcs'. */ register unsigned long sp __asm__("r13"); /* C names for registers */ sp &= -8; /* Prepare the va_alist. */ list.flags = 0; #ifndef REENTRANT list.aptr = (long)&gpargs; #else /* REENTRANT */ list.aptr = (long)&firstword; #endif list.raddr = (void*)0; list.rtype = __VAvoid; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret1 = ((__varword *) &list.tmp._double)[0]; dret2 = ((__varword *) &list.tmp._double)[1]; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { /* NB: On arm, all structure sizes are divisible by 4. */ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { /* can't occur */ iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { /* can't occur */ iret = *(unsigned short *) list.raddr; } else iret = *(unsigned int *) list.raddr; /* struct of size 3 :) */ } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/minitests.c0000664000000000000000000000136614662613007013627 00000000000000/* * Copyright 1999-2001 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define SKIP_EXTRA_STRUCTS #include "tests.c" libffcall-2.5/vacall/PLATFORMS0000664000000000000000000000624414171045010012722 00000000000000Supported CPUs: (Put the GNU config.guess values here.) i386 i486-unknown-linux (gcc), i686-unknown-gnu0.9 (gcc), i386-unknown-sysv4.0 (gcc, /usr/bin/cc, /usr/ucb/cc), i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc), i486-unknown-sco3.2v4.2 (gcc, cc -Of), i386-pc-cygwin32 (gcc), i386-w64-mingw32 (gcc, MSVC 14), i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc), i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc), i586-pc-haiku (gcc-x86), i386-pc-minix (clang) m68k m68k-next-nextstep3 (cc), m68k-sun-sunos4.0 (cc), m68k-unknown-linux (gcc) mips mips-sgi-irix4.0.5 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix6.2 (cc -32), mips-sgi-irix6.4 (cc -32, cc -n32, cc -64), mips-sgi-irix6.5 (cc -32, cc -n32, gcc -mabi=n32), mips-unknown-linux (gcc -mabi=32), mips64-unknown-linux (gcc -mabi=n32, -mabi=64) sparc sparc-sun-sunos4.1.1 (gcc, cc), sparc-sun-solaris2.3 (gcc), sparc-sun-solaris2.4 (gcc, cc), sparc-sun-solaris2.10 (gcc, cc), sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64), sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc), sparc-unknown-netbsdelf7.1 (gcc), sparc64-unknown-netbsd8.0 (gcc) alpha alpha-dec-osf3.0 (gcc, cc), alpha-dec-osf4.0 (gcc, cc), alphaev67-unknown-linux (gcc) hppa hppa1.0-hp-hpux8.00 (gcc, cc), hppa1.1-hp-hpux9.05 (cc), hppa1.1-hp-hpux10.01 (cc), hppa2.0-hp-hpux10.20 (cc +DA1.1), hppa2.0w-hp-hpux11.31 (cc), hppa-unknown-linux (gcc) hppa64 hppa64-hp-hpux11.31 (cc +DD64) arm armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc), armv7l-unknown-linux (gcc) arm64 aarch64-unknown-linux (gcc), aarch64-apple-darwin20.4.0 (cc) powerpc powerpc-ibm-aix4.1.4.0 (cc), powerpc-ibm-aix7.1.3.0 (xlc, gcc), powerpc-unknown-linux (gcc), powerpc-apple-darwin6.8 (gcc), powerpc-apple-darwin9.8.0 (gcc) powerpc64 powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"), powerpc64-unknown-linux (gcc -m64), powerpc64le-unknown-linux (gcc) ia64 ia64-unknown-linux (gcc) x86_64 x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32), x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64), x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14), x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc), x86_64-unknown-openbsd6.0 (gcc) s390 s390x-ibm-linux (gcc -m31) s390x s390x-ibm-linux (gcc) riscv32 riscv32-unknown-linux (gcc -mabi=ilp32d) riscv64 riscv64-unknown-linux (gcc -mabi=lp64d) loongarch64 loongarch64-unknown-linux (gcc) libffcall-2.5/vacall/vacall-riscv64-lp64d-linux-pic.s0000664000000000000000000000510114665263077017227 00000000000000 .file "vacall-riscv64.c" .option pic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 la t1,vacall_function ld t1,0(t1) sd a0,-200(s0) add a0,s0,16 sd a7,8(s0) sd a1,-192(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a0,-240(s0) sw zero,-264(s0) sd zero,-232(s0) add a0,s0,-264 sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) jalr t1 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s1,8 and t6,t5,7 add t2,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,t2,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s1,.L15 bgtu t2,s1,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s1,16 sra t4,t4,t3 ld t0,8(t5) bleu t2,s1,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/vacall/vacall-sparc64-linux-pic.s0000664000000000000000000001324514665263073016266 00000000000000 .file "vacall-sparc64.c" .section ".text" .align 4 .LLADDPC0: jmp %o7+8 add %o7, %l7, %l7 .align 4 .global vacall_receiver .type vacall_receiver, #function .proc 020 vacall_receiver: .register %g2, #scratch .register %g3, #scratch save %sp, -448, %sp add %fp, 2175, %g1 stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call .LLADDPC0 add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 st %f23, [%fp+1879] stx %g1, [%fp+1799] sethi %hi(vacall_function), %g1 or %g1, %lo(vacall_function), %g1 st %f25, [%fp+1883] ldx [%l7+%g1], %g2 st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] stx %g0, [%fp+1807] st %g0, [%fp+1815] st %g0, [%fp+1831] ldx [%g2], %g3 call %g3, 0 add %fp, 1775, %o0 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, .LL61 cmp %g1, 1 be,pn %icc, .LL50 cmp %g1, 2 be,pn %icc, .LL50 cmp %g1, 3 be,pn %icc, .LL53 cmp %g1, 4 be,pn %icc, .LL54 cmp %g1, 5 be,pn %icc, .LL55 cmp %g1, 6 be,pn %icc, .LL56 cmp %g1, 7 be,pn %icc, .LL57 cmp %g1, 8 be,pn %icc, .LL51 cmp %g1, 9 be,pn %icc, .LL51 cmp %g1, 10 be,pn %icc, .LL51 cmp %g1, 11 be,pn %icc, .LL51 cmp %g1, 12 be,pn %icc, .LL58 cmp %g1, 13 be,pn %icc, .LL59 cmp %g1, 14 be,pn %icc, .LL51 cmp %g1, 15 bne,pt %icc, .LL61 lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, .LL61 ldx [%fp+1823], %g5 add %g5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, .LL61 ldx [%fp+1807], %g1 cmp %g5, 8 and %g1, 7, %o2 and %g1, -8, %l0 bgu,pt %xcc, .LL35 add %g5, %o2, %g2 cmp %g2, 8 bgu,pt %xcc, .LL37 sllx %o2, 3, %g4 sllx %g2, 3, %g2 ldx [%l0], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 .LL47: ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g4 ldx [%l0+16], %g5 sllx %g4, %o4, %o1 sllx %g5, %o4, %o0 ldx [%l0+24], %o5 sllx %g2, 3, %o3 sllx %o5, %o4, %o7 ldx [%l0+32], %o2 sub %g0, %o3, %o3 mov 64, %g3 sub %g3, %o4, %g3 srax %g4, %g3, %g4 srax %g5, %g3, %g5 or %g1, %g4, %i0 srax %o5, %g3, %o5 mov -1, %g1 or %o1, %g5, %i1 sllx %g1, %o3, %g1 or %o0, %o5, %i2 and %g1, %o2, %g1 srax %g1, %g3, %g1 or %o7, %g1, %i3 .LL61: return %i7+8 nop .LL50: ldsb [%fp+1783], %i0 return %i7+8 nop .LL54: ldsh [%fp+1783], %i0 return %i7+8 nop .LL53: ldub [%fp+1783], %i0 return %i7+8 nop .LL51: ldx [%fp+1783], %i0 return %i7+8 nop .LL55: lduh [%fp+1783], %i0 return %i7+8 nop .LL56: ldsw [%fp+1783], %i0 return %i7+8 nop .LL57: lduw [%fp+1783], %i0 return %i7+8 nop .LL58: ld [%fp+1783], %f0 return %i7+8 nop .LL59: ldd [%fp+1783], %f0 return %i7+8 nop .LL35: cmp %g5, 16 bgu,pt %xcc, .LL39 cmp %g5, 24 cmp %g2, 16 bgu,pt %xcc, .LL41 sllx %o2, 3, %o5 sllx %g2, 3, %g3 ldx [%l0+8], %g2 sll %o2, 3, %g5 sllx %o2, 2, %o5 sub %g0, %g3, %g3 ldx [%l0], %g4 mov -1, %g1 sllx %g4, %g5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %g5, %i1 sub %g2, %o5, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 .LL37: sllx %g2, 3, %g3 ldx [%l0+8], %g5 sub %g0, %g3, %g3 sub %g0, %g4, %o5 ldx [%l0], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %g5, %g1 srax %g1, %o5, %g1 return %i7+8 or %g2, %g1, %o0 .LL39: bgu,pt %xcc, .LL43 cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, .LL45 sllx %o2, 3, %o4 sllx %o2, 2, %g1 sll %o2, 3, %g5 sllx %g2, 3, %o5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %g5, %o3 sub %g0, %o5, %o5 mov 32, %g4 ldx [%l0], %g2 sub %g4, %g1, %g4 sllx %g2, %g5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o5, %g1 and %g1, %o4, %g1 sllx %g1, %g5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL41: sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %o4 sllx %g3, %o5, %o3 sub %g0, %g5, %g5 mov 64, %g4 ldx [%l0], %g2 sub %g4, %o5, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o4, %g1 srax %g1, %g4, %g1 or %o3, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL45: ldx [%l0], %g1 sllx %g1, %o4, %g1 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o4, %o3 sllx %g4, %o4, %o1 sllx %g2, 3, %o5 ldx [%l0+24], %o2 sub %g0, %o5, %o5 mov 64, %g5 sub %g5, %o4, %g5 srax %g3, %g5, %g3 srax %g4, %g5, %g4 or %g1, %g3, %i0 or %o3, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 srax %g1, %g5, %g1 or %o1, %g1, %i2 return %i7+8 nop .LL43: bgu,pt %xcc, .LL47 sllx %o2, 3, %o4 sll %o2, 3, %o5 ldx [%l0], %g1 sllx %g1, %o5, %g1 sllx %o2, 2, %o4 sllx %g2, 3, %g5 ldx [%l0+8], %g3 ldx [%l0+16], %g4 sllx %g3, %o5, %o2 sllx %g4, %o5, %o1 ldx [%l0+24], %o3 sub %g0, %g5, %g5 mov 32, %g2 sub %g2, %o4, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %g5, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o1, %g1, %i2 return %i7+8 nop .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/vacall/vacall-armhf-eabi-macro.S0000664000000000000000000001273514665263074016134 00000000000000#include "asm-arm.h" #ifdef __PIC__ .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .text .align 2 .global C(vacall_receiver) .syntax unified .arm .fpu vfpv3-d16 .type vacall_receiver, %function FUNBEGIN(vacall_receiver) // args = 20, pretend = 16, frame = 176 // frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, $16 mov ip, $0 push {r4, r5, r6, fp, lr} add fp, sp, $16 ldr r4, L(32) ldr r5, L(32)+4 add lr, fp, $4 L(PIC0): add r4, pc, r4 add r6, fp, $20 sub sp, sp, $180 stm lr, {r0, r1, r2, r3} vstr.32 s0, [fp, $-152] vstr.32 s1, [fp, $-148] vstr.32 s2, [fp, $-144] vstr.32 s3, [fp, $-140] vstr.32 s4, [fp, $-136] vstr.32 s5, [fp, $-132] vstr.32 s6, [fp, $-128] vstr.32 s7, [fp, $-124] vstr.32 s8, [fp, $-120] vstr.32 s9, [fp, $-116] vstr.32 s10, [fp, $-112] vstr.32 s11, [fp, $-108] vstr.32 s12, [fp, $-104] vstr.32 s13, [fp, $-100] vstr.32 s14, [fp, $-96] vstr.32 s15, [fp, $-92] vstr.64 d0, [fp, $-84] vstr.64 d1, [fp, $-76] vstr.64 d2, [fp, $-68] vstr.64 d3, [fp, $-60] vstr.64 d4, [fp, $-52] vstr.64 d5, [fp, $-44] vstr.64 d6, [fp, $-36] vstr.64 d7, [fp, $-28] str lr, [fp, $-164] str ip, [fp, $-196] str ip, [fp, $-160] str r6, [fp, $-180] str ip, [fp, $-156] str ip, [fp, $-176] strb ip, [fp, $-172] ldr r2, [r4, r5] mov r3, r4 sub r0, fp, $196 ldr r3, [r2] blx r3 ldrb r3, [fp, $-172] // zero_extendqisi2 cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-188] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-188] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-188] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(29) cmp r3, $12 vldreq.32 s0, [fp, $-188] beq L(1) cmp r3, $13 beq L(30) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-196] tst r3, $1024 beq L(1) ldr r3, [fp, $-168] cmp r3, $1 beq L(31) cmp r3, $2 ldr r3, [fp, $-176] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $16 // sp needed pop {r4, r5, r6, fp, lr} add sp, sp, $16 bx lr L(25): ldrb r0, [fp, $-188] // zero_extendqisi2 sub sp, fp, $16 // sp needed pop {r4, r5, r6, fp, lr} add sp, sp, $16 bx lr L(27): ldr r0, [fp, $-188] sub sp, fp, $16 // sp needed pop {r4, r5, r6, fp, lr} add sp, sp, $16 bx lr L(30): vldr.64 d0, [fp, $-188] b L(1) L(29): ldr r0, [fp, $-188] ldr r1, [fp, $-184] b L(1) L(31): ldr r3, [fp, $-176] ldrb r0, [r3] // zero_extendqisi2 b L(1) L(33): .align 2 L(32): .word _GLOBAL_OFFSET_TABLE_-(L(PIC0)+8) .word C(vacall_function)(GOT) FUNEND(vacall_receiver) #else .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .text .align 2 .global C(vacall_receiver) .syntax unified .arm .fpu vfpv3-d16 .type vacall_receiver, %function FUNBEGIN(vacall_receiver) // args = 20, pretend = 16, frame = 176 // frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, $16 mov ip, $0 push {r4, r5, fp, lr} add fp, sp, $12 ldr r4, L(32) add lr, fp, $4 add r5, fp, $20 sub sp, sp, $176 stm lr, {r0, r1, r2, r3} vstr.32 s0, [fp, $-144] vstr.32 s1, [fp, $-140] vstr.32 s2, [fp, $-136] vstr.32 s3, [fp, $-132] vstr.32 s4, [fp, $-128] vstr.32 s5, [fp, $-124] vstr.32 s6, [fp, $-120] vstr.32 s7, [fp, $-116] vstr.32 s8, [fp, $-112] vstr.32 s9, [fp, $-108] vstr.32 s10, [fp, $-104] vstr.32 s11, [fp, $-100] vstr.32 s12, [fp, $-96] vstr.32 s13, [fp, $-92] vstr.32 s14, [fp, $-88] vstr.32 s15, [fp, $-84] vstr.64 d0, [fp, $-76] vstr.64 d1, [fp, $-68] vstr.64 d2, [fp, $-60] vstr.64 d3, [fp, $-52] vstr.64 d4, [fp, $-44] vstr.64 d5, [fp, $-36] vstr.64 d6, [fp, $-28] vstr.64 d7, [fp, $-20] str lr, [fp, $-156] str ip, [fp, $-188] sub r0, fp, $188 str ip, [fp, $-152] ldr r3, [r4] str r5, [fp, $-172] str ip, [fp, $-148] str ip, [fp, $-168] strb ip, [fp, $-164] blx r3 ldrb r3, [fp, $-164] // zero_extendqisi2 cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-180] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-180] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-180] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(29) cmp r3, $12 vldreq.32 s0, [fp, $-180] beq L(1) cmp r3, $13 beq L(30) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-188] tst r3, $1024 beq L(1) ldr r3, [fp, $-160] cmp r3, $1 beq L(31) cmp r3, $2 ldr r3, [fp, $-168] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} add sp, sp, $16 bx lr L(25): ldrb r0, [fp, $-180] // zero_extendqisi2 sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} add sp, sp, $16 bx lr L(27): ldr r0, [fp, $-180] sub sp, fp, $12 // sp needed pop {r4, r5, fp, lr} add sp, sp, $16 bx lr L(30): vldr.64 d0, [fp, $-180] b L(1) L(29): ldr r0, [fp, $-180] ldr r1, [fp, $-176] b L(1) L(31): ldr r3, [fp, $-168] ldrb r0, [r3] // zero_extendqisi2 b L(1) L(33): .align 2 L(32): .word C(vacall_function) FUNEND(vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/vacall/vacall-alpha-linux.s0000664000000000000000000000513314665263073015315 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl vacall_receiver .ent vacall_receiver vacall_receiver: .frame $15,192,$26,48 .mask 0x4008000,-192 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $vacall_receiver..ng: lda $30,-192($30) stq $15,8($30) mov $30,$15 lda $3,144($15) stq $26,0($30) .prologue 1 lda $2,88($15) stq $16,144($15) subq $2,$3,$2 ldq $3,vacall_function($29) !literal stq $2,80($15) lda $2,192($15) lda $16,16($15) stq $2,72($15) ldq $27,0($3) lda $2,144($15) stq $17,152($15) stq $18,160($15) stq $19,168($15) stq $20,176($15) stq $21,184($15) stt $f16,88($15) stt $f17,96($15) stt $f18,104($15) stt $f19,112($15) stt $f20,120($15) stt $f21,128($15) stl $31,16($15) stq $2,40($15) stq $31,48($15) stl $31,56($15) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 ldl $2,56($15) beq $2,$L43 zapnot $2,15,$3 cmpeq $3,1,$2 bne $2,$L44 cmpeq $3,2,$2 bne $2,$L44 cmpeq $3,3,$2 bne $2,$L50 cmpeq $3,4,$2 bne $2,$L51 cmpeq $3,5,$2 bne $2,$L52 cmpeq $3,6,$2 bne $2,$L53 cmpeq $3,7,$2 bne $2,$L54 cmpeq $3,8,$2 bne $2,$L48 cmpeq $3,9,$2 bne $2,$L48 cmpeq $3,10,$2 bne $2,$L48 cmpeq $3,11,$2 bne $2,$L48 cmpeq $3,12,$2 bne $2,$L55 cmpeq $3,13,$2 bne $2,$L56 cmpeq $3,14,$2 bne $2,$L48 cmpeq $3,15,$2 beq $2,$L43 lda $2,1024($31) ldl $3,16($15) and $2,$3,$2 beq $2,$L43 ldq $3,64($15) cmpeq $3,1,$2 bne $2,$L57 cmpeq $3,2,$2 bne $2,$L58 cmpeq $3,4,$2 bne $2,$L59 cmpeq $3,8,$2 bne $2,$L60 cmpeq $3,16,$2 beq $2,$L43 ldq $2,48($15) ldq $1,8($2) ldq $0,0($2) .align 4 $L43: mov $15,$30 ldq $26,0($30) ldq $15,8($30) lda $30,192($30) ret $31,($26),1 .align 4 $L44: mov $15,$30 ldl $2,24($15) ldq $26,0($30) sll $2,56,$2 sra $2,56,$0 ldq $15,8($30) lda $30,192($30) ret $31,($26),1 $L51: ldl $2,24($15) sll $2,48,$2 sra $2,48,$0 br $31,$L43 $L50: ldl $2,24($15) bis $31,$31,$31 and $2,0xff,$0 br $31,$L43 $L48: ldq $0,24($15) br $31,$L43 $L52: ldl $2,24($15) bis $31,$31,$31 zapnot $2,3,$0 br $31,$L43 $L53: ldl $3,24($15) bis $31,$31,$31 mov $3,$0 br $31,$L43 $L54: ldl $2,24($15) bis $31,$31,$31 zapnot $2,15,$0 br $31,$L43 $L55: lds $f0,24($15) br $31,$L43 $L56: ldt $f0,24($15) br $31,$L43 $L57: ldq $3,48($15) ldq_u $2,0($3) extbl $2,$3,$0 br $31,$L43 $L58: ldq $3,48($15) ldq_u $2,0($3) extwl $2,$3,$0 br $31,$L43 $L60: ldq $2,48($15) bis $31,$31,$31 ldq $0,0($2) br $31,$L43 $L59: ldq $2,48($15) ldl $3,0($2) zapnot $3,15,$0 br $31,$L43 .end vacall_receiver .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-hppa-macro.S0000664000000000000000000001552214665263073015065 00000000000000#include "asm-hppa.h" #ifdef __PIC__ .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 GLOBL(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) DEF(vacall_receiver) .PROC .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,192(%r30) ldo -32(%r3),%r2 ldo 16(%r3),%r21 ldo 88(%r3),%r20 stw %r5,96(%r3) sub %r21,%r2,%r31 addil LT!vacall_function,%r19 stw %r4,100(%r3) copy %r19,%r5 ldo 80(%r31),%r4 ldo 64(%r31),%r31 stw %r19,-32(%r30) stw %r26,-36(%r3) copy %r21,%r26 ldo 76(%r3),%r21 fstds %fr5,0(%r20) ldo 80(%r3),%r20 fstws %fr4L,0(%r21) ldo 68(%r3),%r21 ldw RT!vacall_function(%r1),%r1 fstds %fr7,0(%r20) ldo 72(%r3),%r20 fstws %fr5L,0(%r20) ldo 64(%r3),%r20 fstws %fr6L,0(%r21) ldo -48(%r3),%r21 stw %r21,52(%r3) ldw 0(%r1),%r22 fstws %fr7L,0(%r20) stw %r31,56(%r3) stw %r4,60(%r3) stw %r25,-40(%r3) stw %r24,-44(%r3) stw %r23,-48(%r3) stw %r0,16(%r3) stw %r2,32(%r3) stw %r0,36(%r3) stw %r0,40(%r3) stw %r28,48(%r3) .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 40(%r3),%r21 comib,= 0,%r21,L(1) copy %r5,%r19 comib,= 1,%r21,L(48) ldb 24(%r3),%r20 comib,=,n 2,%r21,L(48) comib,=,n 3,%r21,L(43) comib,=,n 4,%r21,L(44) comib,=,n 5,%r21,L(45) comib,=,n 6,%r21,L(41) comib,=,n 7,%r21,L(41) comib,=,n 8,%r21,L(41) comib,= 9,%r21,L(41) ldo -10(%r21),%r20 comib,<<,n 1,%r20,L(22) ldw 24(%r3),%r28 DEF(L(40)) ldw 28(%r3),%r29 DEF(L(1)) ldw -20(%r3),%r2 DEF(L(49)) DEF(L(50)) ldw 96(%r3),%r5 ldw 100(%r3),%r4 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 DEF(L(22)) comib,= 12,%r21,L(46) ldo 24(%r3),%r20 comib,=,n 13,%r21,L(47) comib,=,n 14,%r21,L(1) ldw 24(%r3),%r28 comib,<> 15,%r21,L(49) ldw -20(%r3),%r2 ldw 16(%r3),%r20 bb,>= %r20,30,L(49) ldw 44(%r3),%r4 ldo -1(%r4),%r20 comib,<< 7,%r20,L(50) ldw 36(%r3),%r20 extru %r20,31,2,%r31 copy %r20,%r2 depi 0,31,2,%r2 comib,<< 4,%r4,L(33) addl %r31,%r4,%r5 zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 4,%r5,L(34) ldo -1(%r20),%r31 ldw 0(%r2),%r20 zdep %r5,28,29,%r21 ldo -1(%r21),%r21 and %r20,%r31,%r20 mtsar %r21 vextrs %r20,32,%r20 movb,tr %r20,%r28,L(49) ldw -20(%r3),%r2 DEF(L(34)) ldw 0(%r2),%r20 zdep %r5,28,29,%r22 ldw 4(%r2),%r21 and %r20,%r31,%r20 ldo -33(%r22),%r2 subi 63,%r22,%r22 mtsar %r22 zvdep %r20,32,%r20 mtsar %r2 vextrs %r21,32,%r21 DEF(L(39)) b L(1) or %r21,%r20,%r28 DEF(L(33)) zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 8,%r5,L(37) ldo -1(%r20),%r4 ldw 0(%r2),%r22 zdep %r5,29,30,%r20 and %r22,%r4,%r22 ldw 4(%r2),%r31 subi 47,%r20,%r4 zdep %r5,28,29,%r20 mtsar %r4 ldo -33(%r20),%r20 zvdep %r22,32,%r21 zvdep %r21,32,%r21 mtsar %r20 vextrs %r31,32,%r31 vextrs %r22,32,%r22 movb,tr %r22,%r28,L(1) or %r21,%r31,%r29 DEF(L(37)) ldw 0(%r2),%r21 zdep %r5,28,29,%r31 ldw 8(%r2),%r22 and %r21,%r4,%r21 ldo -65(%r31),%r4 ldw 4(%r2),%r20 mtsar %r4 subi 95,%r31,%r2 vextrs %r22,32,%r22 mtsar %r2 zvdep %r20,32,%r31 zvdep %r21,32,%r21 or %r31,%r22,%r29 mtsar %r4 b L(39) vextrs %r20,32,%r20 DEF(L(41)) b L(1) ldw 24(%r3),%r28 DEF(L(47)) ldw 24(%r3),%r28 b L(40) fldds 0(%r20),%fr4 DEF(L(46)) ldw 24(%r3),%r28 b L(1) fldws 0(%r20),%fr4L DEF(L(45)) b L(1) ldh 24(%r3),%r28 DEF(L(44)) ldh 24(%r3),%r20 b L(1) extrs %r20,31,16,%r28 DEF(L(43)) b L(1) ldb 24(%r3),%r28 DEF(L(48)) b L(1) extrs %r20,31,8,%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(vacall_receiver) #else .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 GLOBL(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) DEF(vacall_receiver) .PROC .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,192(%r30) addil LR!vacall_function-$global$,%r27 ldo -32(%r3),%r2 ldo 16(%r3),%r22 sub %r22,%r2,%r20 ldo 104(%r3),%r19 ldo 72(%r3),%r21 ldo 80(%r20),%r31 fstds %fr5,-16(%r19) ldo 64(%r20),%r20 ldo -48(%r3),%r19 stw %r26,-36(%r3) copy %r22,%r26 stw %r20,56(%r3) fstws %fr7L,-8(%r21) stw %r19,52(%r3) stw %r31,60(%r3) stw %r25,-40(%r3) stw %r24,-44(%r3) stw %r23,-48(%r3) fstds %fr7,8(%r21) fstws %fr4L,4(%r21) fstws %fr5L,0(%r21) fstws %fr6L,-4(%r21) stw %r0,16(%r3) stw %r2,32(%r3) stw %r0,36(%r3) stw %r0,40(%r3) stw %r28,48(%r3) ldw RR!vacall_function-$global$(%r1),%r22 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 40(%r3),%r20 comib,= 0,%r20,L(48) ldw -20(%r3),%r2 comib,= 1,%r20,L(49) ldb 24(%r3),%r19 comib,=,n 2,%r20,L(49) comib,=,n 3,%r20,L(43) comib,=,n 4,%r20,L(44) comib,=,n 5,%r20,L(45) comib,=,n 6,%r20,L(41) comib,=,n 7,%r20,L(41) comib,=,n 8,%r20,L(41) comib,= 9,%r20,L(41) ldo -10(%r20),%r19 comib,<<,n 1,%r19,L(22) ldw 24(%r3),%r28 DEF(L(40)) ldw 28(%r3),%r29 DEF(L(1)) ldw -20(%r3),%r2 DEF(L(48)) ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 DEF(L(22)) comib,= 12,%r20,L(46) ldo 40(%r3),%r19 comib,=,n 13,%r20,L(47) comib,=,n 14,%r20,L(1) ldw 24(%r3),%r28 comib,<> 15,%r20,L(48) ldw -20(%r3),%r2 ldw 16(%r3),%r19 bb,>= %r19,30,L(1) ldw 44(%r3),%r2 ldo -1(%r2),%r19 comib,<< 7,%r19,L(1) ldw 36(%r3),%r19 extru %r19,31,2,%r22 copy %r19,%r31 depi 0,31,2,%r31 comib,<< 4,%r2,L(33) addl %r22,%r2,%r1 zdep %r22,28,29,%r22 mtsar %r22 zvdepi 2,32,%r19 comib,<< 4,%r1,L(34) ldo -1(%r19),%r22 ldw 0(%r31),%r19 zdep %r1,28,29,%r20 ldo -1(%r20),%r20 and %r19,%r22,%r19 mtsar %r20 vextrs %r19,32,%r19 movb,tr %r19,%r28,L(48) ldw -20(%r3),%r2 DEF(L(34)) ldw 0(%r31),%r19 zdep %r1,28,29,%r21 ldw 4(%r31),%r20 and %r19,%r22,%r19 ldo -33(%r21),%r31 subi 63,%r21,%r21 mtsar %r21 zvdep %r19,32,%r19 mtsar %r31 vextrs %r20,32,%r20 DEF(L(39)) b L(1) or %r20,%r19,%r28 DEF(L(33)) zdep %r22,28,29,%r22 mtsar %r22 zvdepi 2,32,%r19 comib,<< 8,%r1,L(37) ldo -1(%r19),%r2 ldw 0(%r31),%r21 zdep %r1,29,30,%r19 and %r21,%r2,%r21 ldw 4(%r31),%r22 subi 47,%r19,%r2 zdep %r1,28,29,%r19 mtsar %r2 ldo -33(%r19),%r19 zvdep %r21,32,%r20 zvdep %r20,32,%r20 mtsar %r19 vextrs %r22,32,%r22 vextrs %r21,32,%r21 movb,tr %r21,%r28,L(1) or %r20,%r22,%r29 DEF(L(37)) ldw 0(%r31),%r20 zdep %r1,28,29,%r22 ldw 8(%r31),%r21 and %r20,%r2,%r20 ldo -65(%r22),%r2 ldw 4(%r31),%r19 mtsar %r2 subi 95,%r22,%r31 vextrs %r21,32,%r21 mtsar %r31 zvdep %r19,32,%r22 zvdep %r20,32,%r20 or %r22,%r21,%r29 mtsar %r2 b L(39) vextrs %r19,32,%r19 DEF(L(41)) b L(1) ldw 24(%r3),%r28 DEF(L(47)) ldw 24(%r3),%r28 b L(40) fldds -16(%r19),%fr4 DEF(L(46)) ldw 24(%r3),%r28 b L(1) fldws -16(%r19),%fr4L DEF(L(45)) b L(1) ldh 24(%r3),%r28 DEF(L(44)) ldh 24(%r3),%r19 b L(1) extrs %r19,31,16,%r28 DEF(L(43)) b L(1) ldb 24(%r3),%r28 DEF(L(49)) b L(1) extrs %r19,31,8,%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(vacall_receiver) IMPORT_DATA(vacall_function) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-loongarch64-linux.s0000664000000000000000000000654214665263077016367 00000000000000 .file "vacall-loongarch64.c" .text .align 2 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-272 .cfi_def_cfa_offset 272 st.d $r1,$r3,248 st.d $r22,$r3,240 la.global $r12,vacall_function .cfi_offset 1, -24 .cfi_offset 22, -32 addi.d $r22,$r3,256 .cfi_def_cfa 22, 16 addi.d $r13,$r22,16 ldptr.d $r12,$r12,0 st.d $r4,$r22,-184 st.d $r11,$r22,8 st.d $r5,$r22,-176 st.d $r6,$r22,-168 st.d $r7,$r22,-160 st.d $r8,$r22,-152 st.d $r9,$r22,-144 st.d $r10,$r22,-136 st.d $r11,$r22,-128 fst.s $f0,$r22,-116 fst.s $f1,$r22,-112 fst.s $f2,$r22,-108 fst.s $f3,$r22,-104 fst.s $f4,$r22,-100 fst.s $f5,$r22,-96 fst.s $f6,$r22,-92 fst.s $f7,$r22,-88 fst.d $f0,$r22,-80 fst.d $f1,$r22,-72 fst.d $f2,$r22,-64 fst.d $f3,$r22,-56 fst.d $f4,$r22,-48 fst.d $f5,$r22,-40 fst.d $f6,$r22,-32 fst.d $f7,$r22,-24 st.d $r13,$r22,-224 st.w $r0,$r22,-248 st.d $r0,$r22,-216 st.w $r0,$r22,-208 addi.d $r4,$r22,-248 st.w $r0,$r22,-192 st.w $r0,$r22,-120 jirl $r1,$r12,0 ldptr.w $r12,$r22,-208 beqz $r12,.L1 addi.w $r13,$r0,15 # 0xf bgtu $r12,$r13,.L1 slli.d $r12,$r12,3 la.local $r13,.L4 ldx.d $r12,$r13,$r12 jr $r12 .section .rodata .align 3 .align 2 .L4: .dword .L1 .dword .L15 .dword .L15 .dword .L14 .dword .L13 .dword .L12 .dword .L11 .dword .L10 .dword .L5 .dword .L5 .dword .L5 .dword .L5 .dword .L7 .dword .L6 .dword .L5 .dword .L3 .text .L5: ld.d $r4,$r22,-240 .L1: ld.d $r1,$r3,248 .cfi_remember_state .cfi_restore 1 ld.d $r22,$r3,240 .cfi_restore 22 addi.d $r3,$r3,272 .cfi_def_cfa 3, 0 jr $r1 .L15: .cfi_restore_state ld.b $r4,$r22,-240 b .L1 .L10: ld.wu $r4,$r22,-240 b .L1 .L14: ld.bu $r4,$r22,-240 b .L1 .L13: ld.h $r4,$r22,-240 b .L1 .L12: ld.hu $r4,$r22,-240 b .L1 .L11: ldptr.w $r4,$r22,-240 b .L1 .L6: fld.d $f0,$r22,-240 b .L1 .L7: fld.s $f0,$r22,-240 b .L1 .L3: ldptr.w $r12,$r22,-248 andi $r12,$r12,1024 beqz $r12,.L1 ld.d $r13,$r22,-200 addi.w $r12,$r0,15 # 0xf addi.d $r14,$r13,-1 bgtu $r14,$r12,.L1 ld.d $r14,$r22,-216 addi.w $r15,$r0,-8 # 0xfffffffffffffff8 addi.w $r12,$r0,8 # 0x8 andi $r16,$r14,7 add.d $r17,$r13,$r16 and $r14,$r14,$r15 ldptr.d $r19,$r14,0 slli.w $r15,$r17,3 slli.w $r18,$r16,3 bgtu $r13,$r12,.L17 bgtu $r17,$r12,.L18 addi.w $r15,$r15,-1 addi.w $r4,$r0,2 # 0x2 sll.d $r4,$r4,$r15 addi.d $r4,$r4,-1 and $r4,$r4,$r19 sra.d $r4,$r4,$r18 b .L1 .L17: addi.w $r13,$r0,16 # 0x10 ld.d $r20,$r14,8 sra.d $r19,$r19,$r18 sub.d $r12,$r12,$r16 bgtu $r17,$r13,.L19 addi.w $r15,$r15,-65 addi.w $r5,$r0,2 # 0x2 sll.d $r5,$r5,$r15 addi.d $r5,$r5,-1 and $r5,$r5,$r20 slli.w $r12,$r12,2 sll.d $r4,$r5,$r12 sll.d $r4,$r4,$r12 or $r4,$r4,$r19 sra.d $r5,$r5,$r18 b .L1 .L18: ld.d $r14,$r14,8 addi.w $r15,$r15,-65 addi.w $r13,$r0,2 # 0x2 sll.d $r13,$r13,$r15 addi.d $r13,$r13,-1 sub.d $r12,$r12,$r16 and $r13,$r13,$r14 slli.w $r12,$r12,3 sll.d $r12,$r13,$r12 sra.d $r19,$r19,$r18 or $r4,$r12,$r19 b .L1 .L19: ld.d $r14,$r14,16 addi.w $r15,$r15,-129 addi.w $r13,$r0,2 # 0x2 sll.d $r13,$r13,$r15 addi.d $r13,$r13,-1 slli.w $r12,$r12,3 and $r13,$r13,$r14 sll.d $r4,$r20,$r12 sll.d $r12,$r13,$r12 sra.d $r20,$r20,$r18 or $r4,$r4,$r19 or $r5,$r12,$r20 b .L1 .cfi_endproc .LFE0: .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 12.1.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-structcpy.c0000664000000000000000000000142414662613007015103 00000000000000/* copy structs */ /* * Copyright 2016 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define __structcpy vacall_structcpy #include "structcpy.c" libffcall-2.5/vacall/vacall-mipsel-linux.s0000664000000000000000000000754114665263073015526 00000000000000 .file 1 "vacall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .globl vacall_receiver .set nomips16 .set nomicromips .ent vacall_receiver .type vacall_receiver, @function vacall_receiver: .frame $fp,104,$31 # vars= 72, regs= 2/0, args= 16, gp= 8 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) la $8,vacall_function sw $4,104($fp) lw $25,0($8) addiu $4,$fp,104 sw $4,40($fp) addiu $4,$fp,120 sw $4,56($fp) .cprestore 16 addiu $4,$fp,24 sw $5,108($fp) sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 # 0x1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 # 0x1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 # 0x2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end vacall_receiver .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/vacall/tests.c0000664000000000000000000022624014662613007012752 00000000000000/* Some random tests for vacall. */ /* * Copyright 1993 Bill Triggs * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include #include "vacall.h" #include "testcases.c" #if defined(__m68k__) && defined(__GNUC__) /* "gcc-2.6.3 -freg-struct-return" returns T = struct { char c[3]; } (which * has size 4 !) in memory, in contrast to struct { char a,b,c; } and * struct { char c[4]; } and struct { char a,b,c,d; } which have the same * size and the same alignment but are returned in registers. I don't know why. */ #define SKIP_T #endif #if defined(__sparc__) && defined(__sun) && defined(__SUNPRO_C) /* SUNWspro cc */ /* SunPRO cc miscompiles the simulator function for X_BcdB: d.i[1] is * temporarily stored in %l2 and put onto the stack from %l2, but in between * the copy of X has used %l2 as a counter without saving and restoring its * value. */ #define SKIP_X #endif #if defined(__mipsn32__) && !defined(__GNUC__) /* The X test crashes for an unknown reason. */ #define SKIP_X #endif void* current_function; /* This function simulates the behaviour of current_function. */ void simulator (va_alist alist) { /* void tests */ if (current_function == (void*)&v_v) { va_start_void(alist); fprintf(out,"void f(void):\n"); fflush(out); va_return_void(alist); } /* int tests */ else if (current_function == (void*)&i_v) { va_start_int(alist); {int r=99; fprintf(out,"int f(void):"); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i) { va_start_int(alist); {int a = va_arg_int(alist); int r=a+1; fprintf(out,"int f(int):(%d)",a); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i2) { va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int r=a+b; fprintf(out,"int f(2*int):(%d,%d)",a,b); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i4) { va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int r=a+b+c+d; fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i8) { va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int r=a+b+c+d+e+f+g+h; fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i16) { va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int i = va_arg_int(alist); int j = va_arg_int(alist); int k = va_arg_int(alist); int l = va_arg_int(alist); int m = va_arg_int(alist); int n = va_arg_int(alist); int o = va_arg_int(alist); int p = va_arg_int(alist); int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_int(alist, r); }} else if (current_function == (void*)&i_i32) { va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int i = va_arg_int(alist); int j = va_arg_int(alist); int k = va_arg_int(alist); int l = va_arg_int(alist); int m = va_arg_int(alist); int n = va_arg_int(alist); int o = va_arg_int(alist); int p = va_arg_int(alist); int aa = va_arg_int(alist); int ab = va_arg_int(alist); int ac = va_arg_int(alist); int ad = va_arg_int(alist); int ae = va_arg_int(alist); int af = va_arg_int(alist); int ag = va_arg_int(alist); int ah = va_arg_int(alist); int ai = va_arg_int(alist); int aj = va_arg_int(alist); int ak = va_arg_int(alist); int al = va_arg_int(alist); int am = va_arg_int(alist); int an = va_arg_int(alist); int ao = va_arg_int(alist); int ap = va_arg_int(alist); int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap; fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap); fflush(out); va_return_int(alist, r); }} /* float tests */ else if (current_function == (void*)&f_f) { va_start_float(alist); {float a = va_arg_float(alist); float r=a+1.0; fprintf(out,"float f(float):(%g)",a); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f2) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float r=a+b; fprintf(out,"float f(2*float):(%g,%g)",a,b); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f4) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float r=a+b+c+d; fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f8) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float r=a+b+c+d+e+f+g+h; fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f16) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f24) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float q = va_arg_float(alist); float s = va_arg_float(alist); float t = va_arg_float(alist); float u = va_arg_float(alist); float v = va_arg_float(alist); float w = va_arg_float(alist); float x = va_arg_float(alist); float y = va_arg_float(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y; fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y); fflush(out); va_return_float(alist, r); }} /* double tests */ else if (current_function == (void*)&d_d) { va_start_double(alist); {double a = va_arg_double(alist); double r=a+1.0; fprintf(out,"double f(double):(%g)",a); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d2) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double r=a+b; fprintf(out,"double f(2*double):(%g,%g)",a,b); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d4) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d8) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double r=a+b+c+d+e+f+g+h; fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d16) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); double n = va_arg_double(alist); double o = va_arg_double(alist); double p = va_arg_double(alist); double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_double(alist, r); }} /* pointer tests */ else if (current_function == (void*)&vp_vpdpcpsp) { va_start_ptr(alist, void*); {void* a = va_arg_ptr(alist, void*); double* b = va_arg_ptr(alist, double*); char* c = va_arg_ptr(alist, char*); Int* d = va_arg_ptr(alist, Int*); void* ret = (char*)b + 1; fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d); fflush(out); va_return_ptr(alist, void*, ret); }} /* mixed number tests */ else if (current_function == (void*)&uc_ucsil) { va_start_uchar(alist); {uchar a = va_arg_uchar(alist); ushort b = va_arg_ushort(alist); uint c = va_arg_uint(alist); ulong d = va_arg_ulong(alist); uchar r = (uchar)-1; fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d); fflush(out); va_return_uchar(alist, r); }} else if (current_function == (void*)&d_iidd) { va_start_double(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_iiidi) { va_start_double(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); double d = va_arg_double(alist); int e = va_arg_int(alist); double r=a+b+c+d+e; fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_idid) { va_start_double(alist); {int a = va_arg_int(alist); double b = va_arg_double(alist); int c = va_arg_int(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_fdi) { va_start_double(alist); {float a = va_arg_float(alist); double b = va_arg_double(alist); int c = va_arg_int(alist); double r=a+b+c; fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&us_cdcd) { va_start_ushort(alist); {char a = va_arg_char(alist); double b = va_arg_double(alist); char c = va_arg_char(alist); double d = va_arg_double(alist); ushort r = (ushort)(int)(a + b + c + d); fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d); fflush(out); va_return_ushort(alist, r); }} else if (current_function == (void*)&ll_iiilli) { va_start_longlong(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); long long d = va_arg_longlong(alist); int e = va_arg_int(alist); long long r = (long long)a + (long long)b + (long long)c + d + (long long)e; fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_flli) { va_start_longlong(alist); {float a = va_arg_float(alist); long long b = va_arg_longlong(alist); int c = va_arg_int(alist); long long r = (long long)(int)a + b + (long long)c; fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&f_fi) { va_start_float(alist); {float a = va_arg_float(alist); int z = va_arg_int(alist); float r = a+z; fprintf(out,"float f(float,int):(%g,%d)",a,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f2i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+z; fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f3i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+z; fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f4i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+d+z; fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f7i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+d+e+f+g+z; fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f8i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+d+e+f+g+h+z; fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f12i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&f_f13i) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); int z = va_arg_int(alist); float r = a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&d_di) { va_start_double(alist); {double a = va_arg_double(alist); int z = va_arg_int(alist); double r = a+z; fprintf(out,"double f(double,int):(%g,%d)",a,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d2i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+z; fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d3i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+z; fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d4i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+d+z; fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d7i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+d+e+f+g+z; fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d8i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+d+e+f+g+h+z; fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d12i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_d13i) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); int z = va_arg_int(alist); double r = a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); va_return_double(alist, r); }} /* small structure return tests */ else if (current_function == (void*)&S1_v) { Size1 r; va_start_struct(alist, Size1, 1); r = Size1_1; fprintf(out,"Size1 f(void):"); fflush(out); va_return_struct(alist, Size1, r); } else if (current_function == (void*)&S2_v) { Size2 r; va_start_struct(alist, Size2, 1); r = Size2_1; fprintf(out,"Size2 f(void):"); fflush(out); va_return_struct(alist, Size2, r); } else if (current_function == (void*)&S3_v) { Size3 r; va_start_struct(alist, Size3, 1); r = Size3_1; fprintf(out,"Size3 f(void):"); fflush(out); va_return_struct(alist, Size3, r); } else if (current_function == (void*)&S4_v) { Size4 r; va_start_struct(alist, Size4, 1); r = Size4_1; fprintf(out,"Size4 f(void):"); fflush(out); va_return_struct(alist, Size4, r); } else if (current_function == (void*)&S7_v) { Size7 r; va_start_struct(alist, Size7, 1); r = Size7_1; fprintf(out,"Size7 f(void):"); fflush(out); va_return_struct(alist, Size7, r); } else if (current_function == (void*)&S8_v) { Size8 r; va_start_struct(alist, Size8, 1); r = Size8_1; fprintf(out,"Size8 f(void):"); fflush(out); va_return_struct(alist, Size8, r); } else if (current_function == (void*)&S12_v) { Size12 r; va_start_struct(alist, Size12, 1); r = Size12_1; fprintf(out,"Size12 f(void):"); fflush(out); va_return_struct(alist, Size12, r); } else if (current_function == (void*)&S15_v) { Size15 r; va_start_struct(alist, Size15, 1); r = Size15_1; fprintf(out,"Size15 f(void):"); fflush(out); va_return_struct(alist, Size15, r); } else if (current_function == (void*)&S16_v) { Size16 r; va_start_struct(alist, Size16, 1); r = Size16_1; fprintf(out,"Size16 f(void):"); fflush(out); va_return_struct(alist, Size16, r); } /* structure tests */ else if (current_function == (void*)&I_III) { Int a; Int b; Int c; Int r; va_start_struct(alist, Int, 1); a = va_arg_struct(alist, Int); b = va_arg_struct(alist, Int); c = va_arg_struct(alist, Int); r.x = a.x + b.x + c.x; fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x); fflush(out); va_return_struct(alist, Int, r); } #ifndef SKIP_EXTRA_STRUCTS else if (current_function == (void*)&C_CdC) { Char a; double b; Char c; Char r; va_start_struct(alist, Char, 1); a = va_arg_struct(alist, Char); b = va_arg_double(alist); c = va_arg_struct(alist, Char); r.x = (a.x + c.x)/2; fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x); fflush(out); va_return_struct(alist, Char, r); } else if (current_function == (void*)&F_Ffd) { Float a; float b; double c; Float r; va_start_struct(alist, Float, va_word_splittable_1(float)); a = va_arg_struct(alist, Float); b = va_arg_float(alist); c = va_arg_double(alist); r.x = a.x + b + c; fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); va_return_struct(alist, Float, r); } else if (current_function == (void*)&D_fDd) { float a; Double b; double c; Double r; va_start_struct(alist, Double, va_word_splittable_1(double)); a = va_arg_float(alist); b = va_arg_struct(alist, Double); c = va_arg_double(alist); r.x = a + b.x + c; fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c); fflush(out); va_return_struct(alist, Double, r); } else if (current_function == (void*)&D_Dfd) { Double a; float b; double c; Double r; va_start_struct(alist, Double, va_word_splittable_1(double)); a = va_arg_struct(alist, Double); b = va_arg_float(alist); c = va_arg_double(alist); r.x = a.x + b + c; fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); va_return_struct(alist, Double, r); } #endif else if (current_function == (void*)&J_JiJ) { J a; int b; J c; J r; va_start_struct(alist, J, va_word_splittable_2(long,long)); a = va_arg_struct(alist, J); b = va_arg_int(alist); c = va_arg_struct(alist, J); r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2; fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2); fflush(out); va_return_struct(alist, J, r); } #ifndef SKIP_EXTRA_STRUCTS else if (current_function == (void*)&T_TcT) { T a; char b; T c; T r; va_start_struct(alist, T, 1); a = va_arg_struct(alist, T); b = va_arg_char(alist); c = va_arg_struct(alist, T); r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2]; fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]); fflush(out); va_return_struct(alist, T, r); } else if (current_function == (void*)&X_BcdB) { B a; char b; double c; B d; static X xr={"return val",'R'}; X r; va_start_struct(alist, X, 0); a = va_arg_struct(alist, B); b = va_arg_char(alist); c = va_arg_double(alist); d = va_arg_struct(alist, B); r = xr; r.c1 = b; fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})", a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]); fflush(out); va_return_struct(alist, X, r); } #endif /* gpargs boundary tests */ else if (current_function == (void*)&l_l0J) { va_start_long(alist); {J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = b.l1 + b.l2 + c; fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l1J) { va_start_long(alist); {long a1 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + b.l1 + b.l2 + c; fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l2J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + b.l1 + b.l2 + c; fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l3J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + b.l1 + b.l2 + c; fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l4J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c; fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l5J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c; fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l6J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c; fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l7J) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c; fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l0K) { va_start_long(alist); {K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l1K) { va_start_long(alist); {long a1 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l2K) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l3K) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l4K) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l5K) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&l_l6K) { va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} else if (current_function == (void*)&f_f17l3L) { va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float q = va_arg_float(alist); long s = va_arg_long(alist); long t = va_arg_long(alist); long u = va_arg_long(alist); L z = va_arg_struct(alist, L); float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); va_return_float(alist, r); }} else if (current_function == (void*)&d_d17l3L) { va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); double n = va_arg_double(alist); double o = va_arg_double(alist); double p = va_arg_double(alist); double q = va_arg_double(alist); long s = va_arg_long(alist); long t = va_arg_long(alist); long u = va_arg_long(alist); L z = va_arg_struct(alist, L); double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&ll_l2ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2) + b + c; fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_l3ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3) + b + c; fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_l4ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_l5ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_l6ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&ll_l7ll) { va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} else if (current_function == (void*)&d_l2d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2) + b + c; fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_l3d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3) + b + c; fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_l4d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_l5d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_l6d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c); fflush(out); va_return_double(alist, r); }} else if (current_function == (void*)&d_l7d) { va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c); fflush(out); va_return_double(alist, r); }} /* by-value tests */ else if (current_function == (void*)&v_clobber_K) { va_start_void(alist); {K k = va_arg_struct(alist, K); k.l1 += 1; k.l2 += 10; k.l3 += 100; k.l4 += 1000; va_return_void(alist); }} else { fprintf(out,"simulate: unknown function\n"); fflush(out); } } /* * The way we run these tests - first call the function directly, then * through vacall() - there is the danger that arguments or results seem * to be passed correctly, but what we are seeing are in fact the vestiges * (traces) or the previous call. This may seriously fake the test. * Avoid this by clearing the registers between the first and the second call. */ long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h, long i, long j, long k, long l, long m, long n, long o, long p) { return 0; } float clear_traces_f (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p) { return 0.0; } double clear_traces_d (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, double n, double o, double p) { return 0.0; } J clear_traces_J (void) { J j; j.l1 = j.l2 = 0; return j; } void clear_traces (void) { clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0); clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_J(); } int main (void) { out = stdout; vacall_function = &simulator; /* void tests */ v_v(); clear_traces(); current_function = (void*) &v_v; ((void (*) (void)) vacall) (); /* int tests */ { int ir; ir = i_v(); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_v; ir = ((int (*) (void)) vacall) (); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i(i1); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i; ir = ((int (*) (int)) vacall) (i1); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i2(i1,i2); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i2; ir = ((int (*) (int,int)) vacall) (i1,i2); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i4(i1,i2,i3,i4); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i4; ir = ((int (*) (int,int,int,int)) vacall) (i1,i2,i3,i4); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i8; ir = ((int (*) (int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i16; ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); current_function = (void*) &i_i32; ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) vacall) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32); fprintf(out,"->%d\n",ir); fflush(out); } /* float tests */ { float fr; fr = f_f(f1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f; fr = ((float (*) (float)) vacall) (f1); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2(f1,f2); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f2; fr = ((float (*) (float,float)) vacall) (f1,f2); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4(f1,f2,f3,f4); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f4; fr = ((float (*) (float,float,float,float)) vacall) (f1,f2,f3,f4); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f8; fr = ((float (*) (float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f16; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f24; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24); fprintf(out,"->%g\n",fr); fflush(out); } /* double tests */ { double dr; dr = d_d(d1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d; dr = ((double (*) (double)) vacall) (d1); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2(d1,d2); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d2; dr = ((double (*) (double,double)) vacall) (d1,d2); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4(d1,d2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d4; dr = ((double (*) (double,double,double,double)) vacall) (d1,d2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d8; dr = ((double (*) (double,double,double,double,double,double,double,double)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d16; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16); fprintf(out,"->%g\n",dr); fflush(out); } /* pointer tests */ { void* vpr; vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4); fprintf(out,"->0x%p\n",vpr); fflush(out); vpr = 0; clear_traces(); current_function = (void*) &vp_vpdpcpsp; vpr = ((void* (*) (void*,double*,char*,Int*)) vacall) (&uc1,&d2,str3,&I4); fprintf(out,"->0x%p\n",vpr); fflush(out); } /* mixed number tests */ { uchar ucr; ushort usr; float fr; double dr; long long llr; ucr = uc_ucsil(uc1,us2,ui3,ul4); fprintf(out,"->%u\n",ucr); fflush(out); ucr = 0; clear_traces(); current_function = (void*) &uc_ucsil; ucr = ((uchar (*) (uchar,ushort,uint,ulong)) vacall) (uc1,us2,ui3,ul4); fprintf(out,"->%u\n",ucr); fflush(out); dr = d_iidd(i1,i2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_iidd; dr = ((double (*) (int,int,double,double)) vacall) (i1,i2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_iiidi(i1,i2,i3,d4,i5); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_iiidi; dr = ((double (*) (int,int,int,double,int)) vacall) (i1,i2,i3,d4,i5); fprintf(out,"->%g\n",dr); fflush(out); dr = d_idid(i1,d2,i3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_idid; dr = ((double (*) (int,double,int,double)) vacall) (i1,d2,i3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_fdi(f1,d2,i3); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_fdi; dr = ((double (*) (float,double,int)) vacall) (f1,d2,i3); fprintf(out,"->%g\n",dr); fflush(out); usr = us_cdcd(c1,d2,c3,d4); fprintf(out,"->%u\n",usr); fflush(out); usr = 0; clear_traces(); current_function = (void*) &us_cdcd; usr = ((ushort (*) (char,double,char,double)) vacall) (c1,d2,c3,d4); fprintf(out,"->%u\n",usr); fflush(out); llr = ll_iiilli(i1,i2,i3,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_iiilli; llr = ((long long (*) (int,int,int,long long,int)) vacall) (i1,i2,i3,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_flli(f13,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_flli; llr = ((long long (*) (float,long long,int)) vacall) (f13,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); fr = f_fi(f1,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_fi; fr = ((float (*) (float,int)) vacall) (f1,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2i(f1,f2,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f2i; fr = ((float (*) (float,float,int)) vacall) (f1,f2,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f3i(f1,f2,f3,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f3i; fr = ((float (*) (float,float,float,int)) vacall) (f1,f2,f3,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4i(f1,f2,f3,f4,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f4i; fr = ((float (*) (float,float,float,float,int)) vacall) (f1,f2,f3,f4,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f7i; fr = ((float (*) (float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f8i; fr = ((float (*) (float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f12i; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f13i; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,int)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9); fprintf(out,"->%g\n",fr); fflush(out); dr = d_di(d1,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_di; dr = ((double (*) (double,int)) vacall) (d1,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2i(d1,d2,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d2i; dr = ((double (*) (double,double,int)) vacall) (d1,d2,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d3i(d1,d2,d3,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d3i; dr = ((double (*) (double,double,double,int)) vacall) (d1,d2,d3,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4i(d1,d2,d3,d4,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d4i; dr = ((double (*) (double,double,double,double,int)) vacall) (d1,d2,d3,d4,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d7i; dr = ((double (*) (double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d8i; dr = ((double (*) (double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d12i; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d13i; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,int)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9); fprintf(out,"->%g\n",dr); fflush(out); } /* small structure return tests */ { Size1 r = S1_v(); fprintf(out,"->{%c}\n",r.x1); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S1_v; r = ((Size1 (*) (void)) vacall) (); fprintf(out,"->{%c}\n",r.x1); fflush(out); } { Size2 r = S2_v(); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S2_v; r = ((Size2 (*) (void)) vacall) (); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); } { Size3 r = S3_v(); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S3_v; r = ((Size3 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); } { Size4 r = S4_v(); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S4_v; r = ((Size4 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); } { Size7 r = S7_v(); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S7_v; r = ((Size7 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); } { Size8 r = S8_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S8_v; r = ((Size8 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); } { Size12 r = S12_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S12_v; r = ((Size12 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); } { Size15 r = S15_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S15_v; r = ((Size15 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); } { Size16 r = S16_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); current_function = (void*) &S16_v; r = ((Size16 (*) (void)) vacall) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); } /* structure tests */ { Int Ir; Char Cr; Float Fr; Double Dr; J Jr; T Tr; X Xr; Ir = I_III(I1,I2,I3); fprintf(out,"->{%d}\n",Ir.x); fflush(out); Ir.x = 0; clear_traces(); current_function = (void*) &I_III; Ir = ((Int (*) (Int,Int,Int)) vacall) (I1,I2,I3); fprintf(out,"->{%d}\n",Ir.x); fflush(out); #ifndef SKIP_EXTRA_STRUCTS Cr = C_CdC(C1,d2,C3); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Cr.x = '\0'; clear_traces(); current_function = (void*) &C_CdC; Cr = ((Char (*) (Char,double,Char)) vacall) (C1,d2,C3); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Fr = F_Ffd(F1,f2,d3); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Fr.x = 0.0; clear_traces(); current_function = (void*) &F_Ffd; Fr = ((Float (*) (Float,float,double)) vacall) (F1,f2,d3); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Dr = D_fDd(f1,D2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); current_function = (void*) &D_fDd; Dr = ((Double (*) (float,Double,double)) vacall) (f1,D2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr = D_Dfd(D1,f2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); current_function = (void*) &D_Dfd; Dr = ((Double (*) (Double,float,double)) vacall) (D1,f2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); #endif Jr = J_JiJ(J1,i2,J2); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); Jr.l1 = Jr.l2 = 0; clear_traces(); current_function = (void*) &J_JiJ; Jr = ((J (*) (J,int,J)) vacall) (J1,i2,J2); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); #ifndef SKIP_EXTRA_STRUCTS #ifndef SKIP_T Tr = T_TcT(T1,' ',T2); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces(); current_function = (void*) &T_TcT; Tr = ((T (*) (T,char,T)) vacall) (T1,' ',T2); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); #endif #ifndef SKIP_X Xr = X_BcdB(B1,c2,d3,B2); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); Xr.c[0]=Xr.c1='\0'; clear_traces(); current_function = (void*) &X_BcdB; Xr = ((X (*) (B,char,double,B)) vacall) (B1,c2,d3,B2); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); #endif #endif } /* gpargs boundary tests */ { long lr; long long llr; float fr; double dr; lr = l_l0J(J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l0J; lr = ((long (*) (J,long)) vacall) (J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1J(l1,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l1J; lr = ((long (*) (long,J,long)) vacall) (l1,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2J(l1,l2,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l2J; lr = ((long (*) (long,long,J,long)) vacall) (l1,l2,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3J(l1,l2,l3,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l3J; lr = ((long (*) (long,long,long,J,long)) vacall) (l1,l2,l3,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4J(l1,l2,l3,l4,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l4J; lr = ((long (*) (long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5J(l1,l2,l3,l4,l5,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l5J; lr = ((long (*) (long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l6J; lr = ((long (*) (long,long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,l6,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l7J; lr = ((long (*) (long,long,long,long,long,long,long,J,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l0K(K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l0K; lr = ((long (*) (K,long)) vacall) (K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1K(l1,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l1K; lr = ((long (*) (long,K,long)) vacall) (l1,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2K(l1,l2,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l2K; lr = ((long (*) (long,long,K,long)) vacall) (l1,l2,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3K(l1,l2,l3,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l3K; lr = ((long (*) (long,long,long,K,long)) vacall) (l1,l2,l3,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4K(l1,l2,l3,l4,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l4K; lr = ((long (*) (long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5K(l1,l2,l3,l4,l5,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l5K; lr = ((long (*) (long,long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,l5,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); current_function = (void*) &l_l6K; lr = ((long (*) (long,long,long,long,long,long,K,long)) vacall) (l1,l2,l3,l4,l5,l6,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); current_function = (void*) &f_f17l3L; fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,long,long,long,L)) vacall) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1); fprintf(out,"->%g\n",fr); fflush(out); dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_d17l3L; dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,long,long,long,L)) vacall) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1); fprintf(out,"->%g\n",dr); fflush(out); llr = ll_l2ll(l1,l2,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l2ll; llr = ((long long (*) (long,long,long long,long)) vacall) (l1,l2,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l3ll(l1,l2,l3,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l3ll; llr = ((long long (*) (long,long,long,long long,long)) vacall) (l1,l2,l3,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l4ll(l1,l2,l3,l4,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l4ll; llr = ((long long (*) (long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l5ll; llr = ((long long (*) (long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l6ll; llr = ((long long (*) (long,long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); current_function = (void*) &ll_l7ll; llr = ((long long (*) (long,long,long,long,long,long,long,long long,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); dr = d_l2d(l1,l2,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l2d; dr = ((double (*) (long,long,double,long)) vacall) (l1,l2,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l3d(l1,l2,l3,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l3d; dr = ((double (*) (long,long,long,double,long)) vacall) (l1,l2,l3,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l4d(l1,l2,l3,l4,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l4d; dr = ((double (*) (long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l5d(l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l5d; dr = ((double (*) (long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l6d(l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l6d; dr = ((double (*) (long,long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); current_function = (void*) &d_l7d; dr = ((double (*) (long,long,long,long,long,long,long,double,long)) vacall) (l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); } /* by-value tests */ /* This test is trivial, since a copy of k is allocated on the callee's stack. But anyway... */ { K k; k.l1 = l1; k.l2 = l2; k.l3 = l3; k.l4 = l4; fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); clear_traces(); current_function = (void*) &v_clobber_K; ((void (*) (K)) vacall) (k); fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); } exit(0); } libffcall-2.5/vacall/vacall-hppa-linux.s0000664000000000000000000000617314665263073015165 00000000000000 .LEVEL 1.1 .text .align 4 .globl vacall_receiver .type vacall_receiver,@function vacall_receiver: .PROC .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,192(%r30) addil LR'vacall_function-$global$,%r27 ldo -32(%r3),%r2 ldo 16(%r3),%r22 sub %r22,%r2,%r20 ldo 104(%r3),%r19 ldo 72(%r3),%r21 ldo 80(%r20),%r31 fstds %fr5,-16(%r19) ldo 64(%r20),%r20 ldo -48(%r3),%r19 stw %r26,-36(%r3) copy %r22,%r26 stw %r20,56(%r3) fstws %fr7L,-8(%r21) stw %r19,52(%r3) stw %r31,60(%r3) stw %r25,-40(%r3) stw %r24,-44(%r3) stw %r23,-48(%r3) fstds %fr7,8(%r21) fstws %fr4L,4(%r21) fstws %fr5L,0(%r21) fstws %fr6L,-4(%r21) stw %r0,16(%r3) stw %r2,32(%r3) stw %r0,36(%r3) stw %r0,40(%r3) stw %r28,48(%r3) ldw RR'vacall_function-$global$(%r1),%r22 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 40(%r3),%r20 comib,= 0,%r20,.L48 ldw -20(%r3),%r2 comib,= 1,%r20,.L49 ldb 24(%r3),%r19 comib,=,n 2,%r20,.L49 comib,=,n 3,%r20,.L43 comib,=,n 4,%r20,.L44 comib,=,n 5,%r20,.L45 comib,=,n 6,%r20,.L41 comib,=,n 7,%r20,.L41 comib,=,n 8,%r20,.L41 comib,= 9,%r20,.L41 ldo -10(%r20),%r19 comib,<<,n 1,%r19,.L22 ldw 24(%r3),%r28 .L40: ldw 28(%r3),%r29 .L1: ldw -20(%r3),%r2 .L48: ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 .L22: comib,= 12,%r20,.L46 ldo 40(%r3),%r19 comib,=,n 13,%r20,.L47 comib,=,n 14,%r20,.L1 ldw 24(%r3),%r28 comib,<> 15,%r20,.L48 ldw -20(%r3),%r2 ldw 16(%r3),%r19 bb,>= %r19,30,.L1 ldw 44(%r3),%r2 ldo -1(%r2),%r19 comib,<< 7,%r19,.L1 ldw 36(%r3),%r19 extru %r19,31,2,%r22 copy %r19,%r31 depi 0,31,2,%r31 comib,<< 4,%r2,.L33 addl %r22,%r2,%r1 zdep %r22,28,29,%r22 mtsar %r22 zvdepi 2,32,%r19 comib,<< 4,%r1,.L34 ldo -1(%r19),%r22 ldw 0(%r31),%r19 zdep %r1,28,29,%r20 ldo -1(%r20),%r20 and %r19,%r22,%r19 mtsar %r20 vextrs %r19,32,%r19 movb,tr %r19,%r28,.L48 ldw -20(%r3),%r2 .L34: ldw 0(%r31),%r19 zdep %r1,28,29,%r21 ldw 4(%r31),%r20 and %r19,%r22,%r19 ldo -33(%r21),%r31 subi 63,%r21,%r21 mtsar %r21 zvdep %r19,32,%r19 mtsar %r31 vextrs %r20,32,%r20 .L39: b .L1 or %r20,%r19,%r28 .L33: zdep %r22,28,29,%r22 mtsar %r22 zvdepi 2,32,%r19 comib,<< 8,%r1,.L37 ldo -1(%r19),%r2 ldw 0(%r31),%r21 zdep %r1,29,30,%r19 and %r21,%r2,%r21 ldw 4(%r31),%r22 subi 47,%r19,%r2 zdep %r1,28,29,%r19 mtsar %r2 ldo -33(%r19),%r19 zvdep %r21,32,%r20 zvdep %r20,32,%r20 mtsar %r19 vextrs %r22,32,%r22 vextrs %r21,32,%r21 movb,tr %r21,%r28,.L1 or %r20,%r22,%r29 .L37: ldw 0(%r31),%r20 zdep %r1,28,29,%r22 ldw 8(%r31),%r21 and %r20,%r2,%r20 ldo -65(%r22),%r2 ldw 4(%r31),%r19 mtsar %r2 subi 95,%r22,%r31 vextrs %r21,32,%r21 mtsar %r31 zvdep %r19,32,%r22 zvdep %r20,32,%r20 or %r22,%r21,%r29 mtsar %r2 b .L39 vextrs %r19,32,%r19 .L41: b .L1 ldw 24(%r3),%r28 .L47: ldw 24(%r3),%r28 b .L40 fldds -16(%r19),%fr4 .L46: ldw 24(%r3),%r28 b .L1 fldws -16(%r19),%fr4L .L45: b .L1 ldh 24(%r3),%r28 .L44: ldh 24(%r3),%r19 b .L1 extrs %r19,31,16,%r28 .L43: b .L1 ldb 24(%r3),%r28 .L49: b .L1 extrs %r19,31,8,%r28 .EXIT .PROCEND .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-sparc-macro.S0000664000000000000000000000770614665263073015252 00000000000000#include "asm-sparc.h" #ifdef __PIC__ .section ".text" .align 4 L(LGETPC0): retl add %o7, %l7, %l7 .align 4 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) .proc 020 FUNBEGIN(vacall_receiver) !$PROLOGUE$ 0 save %sp, -144, %sp sethi %hi(C(vacall_function)), %o0 sethi %hi(_GLOBAL_OFFSET_TABLE_-4), %l7 call L(LGETPC0) add %l7, %lo(_GLOBAL_OFFSET_TABLE_+4), %l7 or %o0, %lo(C(vacall_function)), %o0 ld [%l7+%o0], %o1 st %i2, [%fp+76] ld [%o1], %o2 add %fp, 68, %o0 ld [%fp+64], %o1 st %o0, [%fp-32] st %o1, [%fp-16] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] st %g0, [%fp-28] st %g0, [%fp-24] call %o2, 0 add %fp, -48, %o0 ld [%fp-24], %o1 cmp %o1, 0 be L(L1) cmp %o1, 1 be L(L44) cmp %o1, 2 be L(L44) cmp %o1, 3 be L(L45) cmp %o1, 4 be L(L46) cmp %o1, 5 be L(L47) cmp %o1, 6 be L(L43) cmp %o1, 7 be L(L43) cmp %o1, 8 be L(L43) cmp %o1, 9 be L(L43) add %o1, -10, %o0 cmp %o0, 1 bgu L(L22) cmp %o1, 12 ld [%fp-40], %i0 b L(L1) ld [%fp-36], %i1 L(L22): be L(L48) cmp %o1, 13 be L(L49) cmp %o1, 14 be L(L43) cmp %o1, 15 bne L(L1) ld [%fp-48], %o0 andcc %o0, 16, %g0 be L(L33) andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne L(L1) ld [%fp-28], %i0 b L(L1) add %i7, 4, %i7 L(L33): be,a L(L1) add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be L(L50) cmp %o0, 2 be L(L51) cmp %o0, 4 bne,a L(L1) add %i7, 4, %i7 ld [%fp-28], %o0 b L(L1) ld [%o0], %i0 L(L51): ld [%fp-28], %o0 b L(L1) lduh [%o0], %i0 L(L50): ld [%fp-28], %o0 b L(L1) ldub [%o0], %i0 L(L43): b L(L1) ld [%fp-40], %i0 L(L49): b L(L1) ldd [%fp-40], %f0 L(L48): ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a L(L1) ld [%fp-40], %f0 ld [%fp-40], %f2 b L(L1) fstod %f2, %f0 L(L47): b L(L1) lduh [%fp-40], %i0 L(L46): b L(L1) ldsh [%fp-40], %i0 L(L45): b L(L1) ldub [%fp-40], %i0 L(L44): ldsb [%fp-40], %i0 L(L38): L(L1): nop ret restore L(Lfe1): FUNEND(vacall_receiver) #else .section ".text" .align 4 .global C(vacall_receiver) DECLARE_FUNCTION(vacall_receiver) .proc 020 FUNBEGIN(vacall_receiver) !$PROLOGUE$ 0 save %sp, -144, %sp !$PROLOGUE$ 1 sethi %hi(C(vacall_function)), %o0 ld [%o0+%lo(C(vacall_function))], %o2 st %i2, [%fp+76] add %fp, 68, %o0 ld [%fp+64], %o1 st %o0, [%fp-32] st %o1, [%fp-16] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] st %g0, [%fp-28] st %g0, [%fp-24] call %o2, 0 add %fp, -48, %o0 ld [%fp-24], %o1 cmp %o1, 0 be L(L1) cmp %o1, 1 be L(L44) cmp %o1, 2 be L(L44) cmp %o1, 3 be L(L45) cmp %o1, 4 be L(L46) cmp %o1, 5 be L(L47) cmp %o1, 6 be L(L43) cmp %o1, 7 be L(L43) cmp %o1, 8 be L(L43) cmp %o1, 9 be L(L43) add %o1, -10, %o0 cmp %o0, 1 bgu L(L22) cmp %o1, 12 ld [%fp-40], %i0 b L(L1) ld [%fp-36], %i1 L(L22): be L(L48) cmp %o1, 13 be L(L49) cmp %o1, 14 be L(L43) cmp %o1, 15 bne L(L1) ld [%fp-48], %o0 andcc %o0, 16, %g0 be L(L33) andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne L(L1) ld [%fp-28], %i0 b L(L1) add %i7, 4, %i7 L(L33): be,a L(L1) add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be L(L50) cmp %o0, 2 be L(L51) cmp %o0, 4 bne,a L(L1) add %i7, 4, %i7 ld [%fp-28], %o0 b L(L1) ld [%o0], %i0 L(L51): ld [%fp-28], %o0 b L(L1) lduh [%o0], %i0 L(L50): ld [%fp-28], %o0 b L(L1) ldub [%o0], %i0 L(L43): b L(L1) ld [%fp-40], %i0 L(L49): b L(L1) ldd [%fp-40], %f0 L(L48): ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a L(L1) ld [%fp-40], %f0 ld [%fp-40], %f2 b L(L1) fstod %f2, %f0 L(L47): b L(L1) lduh [%fp-40], %i0 L(L46): b L(L1) ldsh [%fp-40], %i0 L(L45): b L(L1) ldub [%fp-40], %i0 L(L44): ldsb [%fp-40], %i0 L(L38): L(L1): nop ret restore L(Lfe1): FUNEND(vacall_receiver) #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-s390.c0000664000000000000000000001007514662613007013543 00000000000000/* vacall function for S/390 32-bit CPU */ /* * Copyright 1995-2021 Bruno Haible * Copyright 2000 Adam Fedor * Copyright 2001 Gerhard Tonn * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r0"); #endif register float farg1 __asm__("f0"); register float farg2 __asm__("f2"); register double darg1 __asm__("f0"); register double darg2 __asm__("f2"); register __varword iret __asm__("%r2"); register __varword iret2 __asm__("%r3"); register float fret __asm__("%f0"); register double dret __asm__("%f0"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword firstword) { __va_alist list; /* Move the arguments passed in registers to temp storage, since moving them to the stack would mess up the stack */ list.iarg[0] = word1; list.iarg[1] = word2; list.iarg[2] = word3; list.iarg[3] = word4; list.iarg[4] = word5; list.darg[1] = darg2; list.darg[0] = darg1; list.farg[1] = farg2; list.farg[0] = farg1; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&firstword; list.raddr = (void*)0; list.rtype = __VAvoid; list.ianum = 0; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } else if (list.rsize == 2*sizeof(__varword)) { iret = ((__varword *) list.raddr)[0]; iret2 = ((__varword *) list.raddr)[1]; } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-mips64.c0000664000000000000000000005671114662613007014176 00000000000000/* vacall function for mips CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifndef REENTRANT typedef void (*func_pointer)(va_alist); #else /* REENTRANT */ #define vacall_receiver callback_receiver typedef void (*func_pointer)(void*,va_alist); register struct { func_pointer vacall_function; void* arg; } * env __asm__("$2"); #endif register void* sp __asm__("$sp"); register __varword iarg0 __asm__("$4"); register __varword iarg1 __asm__("$5"); register __varword iarg2 __asm__("$6"); register __varword iarg3 __asm__("$7"); register __varword iarg4 __asm__("$8"); register __varword iarg5 __asm__("$9"); register __varword iarg6 __asm__("$10"); register __varword iarg7 __asm__("$11"); register float farg0 __asm__("$f12"); register float farg1 __asm__("$f13"); register float farg2 __asm__("$f14"); register float farg3 __asm__("$f15"); register float farg4 __asm__("$f16"); register float farg5 __asm__("$f17"); register float farg6 __asm__("$f18"); register float farg7 __asm__("$f19"); register double darg0 __asm__("$f12"); register double darg1 __asm__("$f13"); register double darg2 __asm__("$f14"); register double darg3 __asm__("$f15"); register double darg4 __asm__("$f16"); register double darg5 __asm__("$f17"); register double darg6 __asm__("$f18"); register double darg7 __asm__("$f19"); register __varword iret __asm__("$2"); register __varword iret2 __asm__("$3"); register float fret __asm__("$f0"); register float fret2 __asm__("$f2"); register double dret __asm__("$f0"); register double dret2 __asm__("$f2"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, retaddr} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* r4 */ __vaword word2; /* r5 */ __vaword word3; /* r6 */ __vaword word4; /* r7 */ __vaword word5; /* r8 */ __vaword word6; /* r9 */ __vaword word7; /* r10 */ __vaword word8; /* r11 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) { __va_alist list; list.darg[0] = darg0; list.darg[1] = darg1; list.darg[2] = darg2; list.darg[3] = darg3; list.darg[4] = darg4; list.darg[5] = darg5; list.darg[6] = darg6; list.darg[7] = darg7; list.farg[0] = farg0; list.farg[1] = farg1; list.farg[2] = farg2; list.farg[3] = farg3; list.farg[4] = farg4; list.farg[5] = farg5; list.farg[6] = farg6; list.farg[7] = farg7; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs; list.raddr = (void*)0; list.rtype = __VAvoid; list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.flags & __VA_GCC_STRUCT_RETURN) { /* gcc returns structs of size 1,2,4,8 in registers. */ if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } else if (list.rsize == sizeof(long)) { iret = *(unsigned long *) list.raddr; } } else { /* cc returns structs of size <= 16 in registers. */ /* Maybe this big if cascade could be replaced with * if (list.rsize > 0 && list.rsize <= 16) * __asm__ ("ldl $2,%0 ; ldr $2,%1" * : : "m" (((unsigned char *) list.raddr)[0]), * "m" (((unsigned char *) list.raddr)[7])); */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ if (list.rsize == 1) { #if defined(_MIPSEL) iret = (__varword)((unsigned char *) list.raddr)[0]; #else iret = (__varword)((unsigned char *) list.raddr)[0] << 56; #endif } else if (list.rsize == 2) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48); #endif } else if (list.rsize == 3) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40); #endif } else if (list.rsize == 4) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32); #endif } else if (list.rsize == 5) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24); #endif } else if (list.rsize == 6) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16); #endif } else if (list.rsize == 7) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8); #endif } else if (list.rsize >= 8 && list.rsize <= 16) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48) | ((__varword)((unsigned char *) list.raddr)[7] << 56); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8) | (__varword)((unsigned char *) list.raddr)[7]; #endif /* Maybe this big if cascade could be replaced with * if (list.rsize > 8 && list.rsize <= 16) * __asm__ ("ldl $3,%0 ; ldr $3,%1" * : : "m" (((unsigned char *) list.raddr)[8]), * "m" (((unsigned char *) list.raddr)[15])); */ if (list.rsize == 8) { } else if (list.rsize == 9) { #if defined(_MIPSEL) iret2 = (__varword)((unsigned char *) list.raddr)[8]; #else iret2 = (__varword)((unsigned char *) list.raddr)[8] << 56; #endif } else if (list.rsize == 10) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48); #endif } else if (list.rsize == 11) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40); #endif } else if (list.rsize == 12) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32); #endif } else if (list.rsize == 13) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24); #endif } else if (list.rsize == 14) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16); #endif } else if (list.rsize == 15) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8); #endif } else if (list.rsize == 16) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48) | ((__varword)((unsigned char *) list.raddr)[15] << 56); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8) | (__varword)((unsigned char *) list.raddr)[15]; #endif } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ #if defined(_MIPSEL) if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #else if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = - ((__varword)1 << (sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] & mask0) << (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) << (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*8-start_offset*8)); } } #endif #endif } if (list.flags & __VA_REGISTER_FLOATSTRUCT_RETURN) { if (list.rsize == sizeof(float)) { fret = *(float*)list.raddr; } else if (list.rsize == 2*sizeof(float)) { fret = *(float*)list.raddr; fret2 = *(float*)((char*)list.raddr + 4); } } if (list.flags & __VA_REGISTER_DOUBLESTRUCT_RETURN) { if (list.rsize == sizeof(double)) { dret = *(double*)list.raddr; } else if (list.rsize == 2*sizeof(double)) { dret = *(double*)list.raddr; dret2 = *(double*)((char*)list.raddr + 8); } } } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-ia64.c0000664000000000000000000003111014662613007013601 00000000000000/* vacall function for ia64 CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r15"); #endif register double farg1 __asm__("f8"); register double farg2 __asm__("f9"); register double farg3 __asm__("f10"); register double farg4 __asm__("f11"); register double farg5 __asm__("f12"); register double farg6 __asm__("f13"); register double farg7 __asm__("f14"); register double farg8 __asm__("f15"); register __vaword* sret __asm__("r8"); register __varword iret __asm__("r8"); register __varword iret2 __asm__("r9"); register __varword iret3 __asm__("r10"); register __varword iret4 __asm__("r11"); register float fret __asm__("f8"); register double dret __asm__("f8"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, retaddr} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* r32 */ __vaword word2; /* r33 */ __vaword word3; /* r34 */ __vaword word4; /* r35 */ __vaword word5; /* r36 */ __vaword word6; /* r37 */ __vaword word7; /* r38 */ __vaword word8; /* r39 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) { __va_alist list; /* Move the arguments passed in registers to their stack locations. */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs; list.saptr = (__vaword*)&gpargs; list.fanum = 0; list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = sret; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* Return structs of size <= 32 in registers. */ if (list.rsize > 0 && list.rsize <= 32) { #if 0 /* Unoptimized */ iret = (__varword)((unsigned char *) list.raddr)[0]; if (list.rsize >= 2) iret |= (__varword)((unsigned char *) list.raddr)[1] << 8; if (list.rsize >= 3) iret |= (__varword)((unsigned char *) list.raddr)[2] << 16; if (list.rsize >= 4) iret |= (__varword)((unsigned char *) list.raddr)[3] << 24; if (list.rsize >= 5) iret |= (__varword)((unsigned char *) list.raddr)[4] << 32; if (list.rsize >= 6) iret |= (__varword)((unsigned char *) list.raddr)[5] << 40; if (list.rsize >= 7) iret |= (__varword)((unsigned char *) list.raddr)[6] << 48; if (list.rsize >= 8) iret |= (__varword)((unsigned char *) list.raddr)[7] << 56; if (list.rsize >= 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; if (list.rsize >= 10) iret2 |= (__varword)((unsigned char *) list.raddr)[9] << 8; if (list.rsize >= 11) iret2 |= (__varword)((unsigned char *) list.raddr)[10] << 16; if (list.rsize >= 12) iret2 |= (__varword)((unsigned char *) list.raddr)[11] << 24; if (list.rsize >= 13) iret2 |= (__varword)((unsigned char *) list.raddr)[12] << 32; if (list.rsize >= 14) iret2 |= (__varword)((unsigned char *) list.raddr)[13] << 40; if (list.rsize >= 15) iret2 |= (__varword)((unsigned char *) list.raddr)[14] << 48; if (list.rsize >= 16) iret2 |= (__varword)((unsigned char *) list.raddr)[15] << 56; if (list.rsize >= 17) { iret3 = (__varword)((unsigned char *) list.raddr)[16]; if (list.rsize >= 18) iret3 |= (__varword)((unsigned char *) list.raddr)[17] << 8; if (list.rsize >= 19) iret3 |= (__varword)((unsigned char *) list.raddr)[18] << 16; if (list.rsize >= 20) iret3 |= (__varword)((unsigned char *) list.raddr)[19] << 24; if (list.rsize >= 21) iret3 |= (__varword)((unsigned char *) list.raddr)[20] << 32; if (list.rsize >= 22) iret3 |= (__varword)((unsigned char *) list.raddr)[21] << 40; if (list.rsize >= 23) iret3 |= (__varword)((unsigned char *) list.raddr)[22] << 48; if (list.rsize >= 24) iret3 |= (__varword)((unsigned char *) list.raddr)[23] << 56; if (list.rsize >= 25) { iret4 = (__varword)((unsigned char *) list.raddr)[24]; if (list.rsize >= 26) iret4 |= (__varword)((unsigned char *) list.raddr)[25] << 8; if (list.rsize >= 27) iret4 |= (__varword)((unsigned char *) list.raddr)[26] << 16; if (list.rsize >= 28) iret4 |= (__varword)((unsigned char *) list.raddr)[27] << 24; if (list.rsize >= 29) iret4 |= (__varword)((unsigned char *) list.raddr)[28] << 32; if (list.rsize >= 30) iret4 |= (__varword)((unsigned char *) list.raddr)[29] << 40; if (list.rsize >= 31) iret4 |= (__varword)((unsigned char *) list.raddr)[30] << 48; if (list.rsize >= 32) iret4 |= (__varword)((unsigned char *) list.raddr)[31] << 56; } } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 4*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 5*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else if (count <= 2*sizeof(__varword)) { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } else if (count <= 3*sizeof(__varword)) { /* Assign iret, iret2, iret3. */ if (end_offset <= 3*sizeof(__varword)) { /* 2*sizeof(__varword) < end_offset ≤ 3*sizeof(__varword) */ __varword mask2 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret3 = (wordaddr[2] & mask2) >> (start_offset*8); } else { /* 3*sizeof(__varword) < end_offset < 4*sizeof(__varword), start_offset > 0 */ __varword mask3 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__varword)*8-start_offset*8)); iret3 = (wordaddr[2] >> (start_offset*8)) | ((wordaddr[3] & mask3) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2, iret3, iret4. */ if (end_offset <= 4*sizeof(__varword)) { /* 3*sizeof(__varword) < end_offset ≤ 4*sizeof(__varword) */ __varword mask3 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret3 = (wordaddr[2] >> (start_offset*8)) | ((wordaddr[3] & mask3) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret4 = (wordaddr[3] & mask3) >> (start_offset*8); } else { /* 4*sizeof(__varword) < end_offset < 5*sizeof(__varword), start_offset > 0 */ __varword mask4 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | (wordaddr[2] << (sizeof(__varword)*8-start_offset*8)); iret3 = (wordaddr[2] >> (start_offset*8)) | (wordaddr[3] << (sizeof(__varword)*8-start_offset*8)); iret4 = (wordaddr[3] >> (start_offset*8)) | ((wordaddr[4] & mask4) << (sizeof(__varword)*8-start_offset*8)); } } #endif } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-powerpc-linux-macro.S0000664000000000000000000000477014665263075016756 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 li 11,0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 9,76(31) addi 0,31,184 lis 9,vacall_function@ha stw 3,52(31) lwz 9,vacall_function@l(9) addi 3,31,16 stw 5,60(31) mtctr 9 stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 0,32(31) stw 11,84(31) stw 4,56(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 11,16(31) stw 11,48(31) stw 11,36(31) stw 11,40(31) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 31,-4(11) mtlr 0 mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 10,0,0,30,31 rlwinm 6,0,0,0,29 add 7,10,9 bgt- 0,.L33 slwi 0,10,3 cmplwi 0,7,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 8,9,-1 bgt- 0,.L34 lwz 9,0(6) slwi 0,7,3 subfic 0,0,32 and 9,9,8 sraw 3,9,0 b .L1 .L34: lwz 0,0(6) slwi 9,7,3 lwz 11,4(6) subfic 10,9,64 and 0,0,8 addi 9,9,-32 slw 0,0,9 sraw 11,11,10 .L39: or 3,11,0 b .L1 .L33: slwi 0,10,3 cmplwi 0,7,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 5,9,-1 bgt- 0,.L37 lwz 8,0(6) slwi 11,7,2 addi 11,11,-16 lwz 10,4(6) and 8,8,5 slwi 9,7,3 subfic 9,9,64 slw 0,8,11 slw 0,0,11 sraw 10,10,9 or 4,0,10 sraw 3,8,9 b .L1 .L37: slwi 9,7,3 lwz 0,4(6) lwz 11,0(6) subfic 7,9,96 lwz 10,8(6) addi 9,9,-64 slw 8,0,9 and 11,11,5 sraw 10,10,7 slw 11,11,9 sraw 0,0,7 or 4,8,10 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size vacall_receiver, .-vacall_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/vacall-sparc.c0000664000000000000000000001122714662613007014155 00000000000000/* vacall function for sparc CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("%g2"); #endif register __vaword* fp __asm__("%fp"); /* our %fp, caller's %sp */ register __vaword* ret __asm__("%i7"); /* %i7+8 = return address */ register __varword iret __asm__("%i0"); register __varword iret2 __asm__("%i1"); register float fret __asm__("%f0"); /* %f0 */ register double dret __asm__("%f0"); /* %f0,%f1 */ void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword firstword) { __va_alist list; /* gcc-2.6.3 source says: When a parameter is passed in a register, * stack space is still allocated for it. */ /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-6] = word1; (&firstword)[-5] = word2; (&firstword)[-4] = word3; (&firstword)[-3] = word4; (&firstword)[-2] = word5; (&firstword)[-1] = word6; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 6); list.raddr = (void*)0; list.rtype = __VAvoid; list.structraddr = (void*)((&firstword)[-7]); /* = (void*) fp[16] */ /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong || list.rtype == __VAulonglong) { iret = ((__varword *) &list.tmp._longlong)[0]; iret2 = ((__varword *) &list.tmp._longlong)[1]; } else if (list.rtype == __VAfloat) { if (list.flags & __VA_SUNCC_FLOAT_RETURN) { dret = (double)list.tmp._float; } else { fret = list.tmp._float; } } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_SUNPROCC_STRUCT_RETURN) { /* Sun cc struct return convention. */ /* The desired struct return address was passed in fp[16], later on * list.raddr = list.structraddr = fp[16]. Now the result has * already been copied there. No need to copy the result once more. * The caller expects to receive the struct return address in %o0. */ iret = (long) list.raddr; if ((list.rsize & 0xfff) == ret[2]) ret++; /* skip the "unimp n" instruction at the return address */ /* else the "unimp n" instruction will cause a core dump */ } else { /* normal struct return convention */ if (list.flags & __VA_SMALL_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; goto done; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; goto done; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; goto done; } } ret++; /* skip the "unimp n" instruction at the return address */ done: ; } } } libffcall-2.5/vacall/vacall-mipsn32.c0000664000000000000000000005674314662613007014354 00000000000000/* vacall function for mips CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifndef REENTRANT typedef void (*func_pointer)(va_alist); #else /* REENTRANT */ #define vacall_receiver callback_receiver typedef void (*func_pointer)(void*,va_alist); register struct { func_pointer vacall_function; void* arg; } * env __asm__("$2"); #endif register void* sp __asm__("$sp"); register __varword iarg0 __asm__("$4"); register __varword iarg1 __asm__("$5"); register __varword iarg2 __asm__("$6"); register __varword iarg3 __asm__("$7"); register __varword iarg4 __asm__("$8"); register __varword iarg5 __asm__("$9"); register __varword iarg6 __asm__("$10"); register __varword iarg7 __asm__("$11"); register float farg0 __asm__("$f12"); register float farg1 __asm__("$f13"); register float farg2 __asm__("$f14"); register float farg3 __asm__("$f15"); register float farg4 __asm__("$f16"); register float farg5 __asm__("$f17"); register float farg6 __asm__("$f18"); register float farg7 __asm__("$f19"); register double darg0 __asm__("$f12"); register double darg1 __asm__("$f13"); register double darg2 __asm__("$f14"); register double darg3 __asm__("$f15"); register double darg4 __asm__("$f16"); register double darg5 __asm__("$f17"); register double darg6 __asm__("$f18"); register double darg7 __asm__("$f19"); register __varword iret __asm__("$2"); register __varword iret2 __asm__("$3"); register float fret __asm__("$f0"); register float fret2 __asm__("$f2"); register double dret __asm__("$f0"); register double dret2 __asm__("$f2"); /* The ABI requires that the first 8 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, retaddr} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* r4 */ __vaword word2; /* r5 */ __vaword word3; /* r6 */ __vaword word4; /* r7 */ __vaword word5; /* r8 */ __vaword word6; /* r9 */ __vaword word7; /* r10 */ __vaword word8; /* r11 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) { __va_alist list; list.darg[0] = darg0; list.darg[1] = darg1; list.darg[2] = darg2; list.darg[3] = darg3; list.darg[4] = darg4; list.darg[5] = darg5; list.darg[6] = darg6; list.darg[7] = darg7; list.farg[0] = farg0; list.farg[1] = farg1; list.farg[2] = farg2; list.farg[3] = farg3; list.farg[4] = farg4; list.farg[5] = farg5; list.farg[6] = farg6; list.farg[7] = farg7; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs; list.raddr = (void*)0; list.rtype = __VAvoid; list.anum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._longlong; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulonglong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.flags & __VA_GCC_STRUCT_RETURN) { /* gcc returns structs of size 1,2,4,8 in registers. */ if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } else if (list.rsize == sizeof(long long)) { iret = *(unsigned long long *) list.raddr; } } else { /* cc returns structs of size <= 16 in registers. */ /* Maybe this big if cascade could be replaced with * if (list.rsize > 0 && list.rsize <= 16) * __asm__ ("ldl $2,%0 ; ldr $2,%1" * : : "m" (((unsigned char *) list.raddr)[0]), * "m" (((unsigned char *) list.raddr)[7])); */ if (list.rsize > 0 && list.rsize <= 16) { #if 0 /* Unoptimized */ if (list.rsize == 1) { #if defined(_MIPSEL) iret = (__varword)((unsigned char *) list.raddr)[0]; #else iret = (__varword)((unsigned char *) list.raddr)[0] << 56; #endif } else if (list.rsize == 2) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48); #endif } else if (list.rsize == 3) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40); #endif } else if (list.rsize == 4) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32); #endif } else if (list.rsize == 5) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24); #endif } else if (list.rsize == 6) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16); #endif } else if (list.rsize == 7) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8); #endif } else if (list.rsize >= 8 && list.rsize <= 16) { #if defined(_MIPSEL) iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48) | ((__varword)((unsigned char *) list.raddr)[7] << 56); #else iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8) | (__varword)((unsigned char *) list.raddr)[7]; #endif /* Maybe this big if cascade could be replaced with * if (list.rsize > 8 && list.rsize <= 16) * __asm__ ("ldl $3,%0 ; ldr $3,%1" * : : "m" (((unsigned char *) list.raddr)[8]), * "m" (((unsigned char *) list.raddr)[15])); */ if (list.rsize == 8) { } else if (list.rsize == 9) { #if defined(_MIPSEL) iret2 = (__varword)((unsigned char *) list.raddr)[8]; #else iret2 = (__varword)((unsigned char *) list.raddr)[8] << 56; #endif } else if (list.rsize == 10) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48); #endif } else if (list.rsize == 11) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40); #endif } else if (list.rsize == 12) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32); #endif } else if (list.rsize == 13) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24); #endif } else if (list.rsize == 14) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16); #endif } else if (list.rsize == 15) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8); #endif } else if (list.rsize == 16) { #if defined(_MIPSEL) iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48) | ((__varword)((unsigned char *) list.raddr)[15] << 56); #else iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8) | (__varword)((unsigned char *) list.raddr)[15]; #endif } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ #if defined(_MIPSEL) if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #else if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = - ((__varword)1 << (sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] & mask0) << (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | ((wordaddr[1] & mask1) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) << (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = (wordaddr[0] << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*8-start_offset*8)); } } #endif #endif } if (list.flags & __VA_REGISTER_FLOATSTRUCT_RETURN) { if (list.rsize == sizeof(float)) { fret = *(float*)list.raddr; } else if (list.rsize == 2*sizeof(float)) { fret = *(float*)list.raddr; fret2 = *(float*)((char*)list.raddr + 4); } } if (list.flags & __VA_REGISTER_DOUBLESTRUCT_RETURN) { if (list.rsize == sizeof(double)) { dret = *(double*)list.raddr; } else if (list.rsize == 2*sizeof(double)) { dret = *(double*)list.raddr; dret2 = *(double*)((char*)list.raddr + 8); } } } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-x86_64-macro.S0000664000000000000000000003326514665263075015101 00000000000000#include "asm-x86_64.h" #if defined __OpenBSD__ || defined __HAIKU__ TEXT() P2ALIGN(4,15) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) L(FB2): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN1(push,q ,R(r12)) L(CFI2): INSN2(sub,q ,NUM(200), R(rsp)) L(CFI3): INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-48)) INSN2(lea,q ,X8 MEM_DISP(rbp,16), R(rcx)) INSN2(mov,q ,R(rdi),X8 MEM_DISP(rbp,-72)) INSN2(mov,q ,R(rsi),X8 MEM_DISP(rbp,-64)) INSN2S(movs,d ,R(xmm0),X8 MEM_DISP(rbp,-144)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-184)) INSN2(mov,q ,vacall_function@MEM_PCRELATIVE(C(GOTPCREL)), R(rcx)) INSN2S(movs,d ,R(xmm1),X8 MEM_DISP(rbp,-136)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(rbp,-56)) INSN2S(movs,d ,R(xmm2),X8 MEM_DISP(rbp,-128)) INSN2(lea,q ,X8 MEM_DISP(rbp,-208), R(rdi)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-40)) INSN2S(movs,d ,R(xmm3),X8 MEM_DISP(rbp,-120)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm4),X8 MEM_DISP(rbp,-112)) INSN2S(movs,d ,R(xmm5),X8 MEM_DISP(rbp,-104)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-208)) INSN2S(movs,d ,R(xmm6),X8 MEM_DISP(rbp,-96)) INSN2(mov,q ,NUM(0),X8 MEM_DISP(rbp,-176)) INSN2S(movs,d ,R(xmm7),X8 MEM_DISP(rbp,-88)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-168)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-80)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-152)) INSN1(call,_ ,INDIR(X8 MEM(rcx))) INSN2(mov,l ,X4 MEM_DISP(rbp,-168), R(ecx)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(41)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(3), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(4), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(5), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(6), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(7), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(8), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(9), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(10), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(11), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(12), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(13), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(14), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(15), R(ecx)) P2ALIGN(4,5) INSN1(jne,_ ,L(41)) INSN2(test,b ,NUM(4),X1 MEM_DISP(rbp,-207)) P2ALIGN(4,2) INSN1(je,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-160), R(rsi)) INSN2(lea,q ,X8 MEM_DISP(rsi,-1), R(rcx)) INSN2(cmp,q ,NUM(15), R(rcx)) INSN1(ja,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-176), R(rcx)) INSN2(mov,q ,R(rcx), R(r11)) INSN2(mov,q ,R(rcx), R(r8)) INSN2(and,l ,NUM(7), R(r8d)) INSN2(and,q ,NUM(-8), R(r11)) INSN2(cmp,q ,NUM(8), R(rsi)) INSN2(lea,q ,X8 MEM_INDEX(rsi,r8), R(r10)) INSN1(ja,_ ,L(35)) INSN2(cmp,q ,NUM(8), R(r10)) INSN1(ja,_ ,L(37)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,r10,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM(r11), R(rsi)) INSN2(mov,q ,R(rsi), R(rax)) INSN2(sar,q ,R(cl), R(rax)) P2ALIGN(4,7) L(41): INSN2(add,q ,NUM(200), R(rsp)) INSN1(pop,q ,R(r12)) leave ret P2ALIGN(4,7) L(42): INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-200),R(rax)) INSN2(add,q ,NUM(200), R(rsp)) INSN1(pop,q ,R(r12)) leave ret L(49): INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(48): INSN2MOVXQ(movz,b,X1 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(46): INSN2(mov,q ,X8 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(50): INSN2MOVXQ(movz,w,X2 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(51): INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(52): INSN2(mov,l ,X4 MEM_DISP(rbp,-200), R(eax)) INSN1(jmp,_ ,L(41)) L(53): INSN2S(movs,s ,X4 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(54): INSN2(movlp,d ,X8 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(35): INSN2(cmp,q ,NUM(16), R(r10)) INSN1(ja,_ ,L(39)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(r9d)) INSN2(mov,l ,NUM(32), R(edi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,4), R(rcx)) INSN2(mov,q ,X8 MEM(r11), R(r8)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM_DISP(r11,8), R(rsi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(mov,q ,R(r8), R(rax)) INSN2(mov,q ,R(rsi), R(r10)) INSN2(mov,q ,R(rsi), R(rdx)) INSN2(sal,q ,R(cl), R(r10)) INSN2(sal,q ,R(cl), R(r10)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(r10), R(rax)) INSN2(sar,q ,R(cl), R(rdx)) INSN1(jmp,_ ,L(41)) L(37): INSN2(mov,q ,X8 MEM(r11), R(rdi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(esi)) INSN2(sal,q ,NUM(3), R(r8)) INSN2(mov,l ,R(r8d), R(ecx)) INSN2(mov,l ,NUM(2), R(r10d)) INSN2(sar,q ,R(cl), R(rdi)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(mov,l ,NUM(64), R(esi)) INSN2(sal,q ,R(cl), R(r10)) INSN2(sub,l ,R(r8d), R(esi)) INSN2(mov,q ,R(rdi), R(rax)) INSN1(dec,q ,R(r10)) INSN2(and,q ,X8 MEM_DISP(r11,8), R(r10)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r10)) INSN2(or,q ,R(r10), R(rax)) INSN1(jmp,_ ,L(41)) L(39): INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,8), R(rcx)) INSN2(mov,q ,X8 MEM(r11), R(r12)) INSN2(mov,q ,X8 MEM_DISP(r11,8), R(r8)) INSN2(mov,l ,NUM(64), R(edi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(ecx), R(r9d)) INSN2(sar,q ,R(cl), R(r12)) INSN2(mov,q ,R(r8), R(rsi)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(mov,q ,R(r12), R(rax)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(rsi), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-129,r10,8), R(esi)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,NUM(2), R(r9d)) INSN2(mov,q ,R(r8), R(rdx)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r9)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(lea,q ,X8 MEM_DISP(r9,-1), R(rsi)) INSN2(and,q ,X8 MEM_DISP(r11,16), R(rsi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(or,q ,R(rsi), R(rdx)) INSN1(jmp,_ ,L(41)) L(FE2): FUNEND(vacall_receiver, .-vacall_receiver) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0x0 .byte 0x1 .string "zR" .uleb128 0x1 .sleb128 -8 .byte 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB2)-. .long L(FE2)-.LFB2 .uleb128 0x0 .byte 0x4 .long L(CFI0)-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI3)-.LCFI1 .byte 0x8c .uleb128 0x3 .align 8 L(EFDE1): #endif #else TEXT() P2ALIGN(4,15) GLOBL(C(vacall_receiver)) DECLARE_FUNCTION(vacall_receiver) FUNBEGIN(vacall_receiver) L(FB2): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN1(push,q ,R(r12)) L(CFI2): INSN2(sub,q ,NUM(200), R(rsp)) L(CFI3): INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-48)) INSN2(lea,q ,X8 MEM_DISP(rbp,16), R(rcx)) INSN2(mov,q ,R(rdi),X8 MEM_DISP(rbp,-72)) INSN2(mov,q ,R(rsi),X8 MEM_DISP(rbp,-64)) INSN2S(movs,d ,R(xmm0),X8 MEM_DISP(rbp,-144)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-184)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(rbp,-56)) INSN2S(movs,d ,R(xmm1),X8 MEM_DISP(rbp,-136)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-40)) INSN2S(movs,d ,R(xmm2),X8 MEM_DISP(rbp,-128)) INSN2(lea,q ,X8 MEM_DISP(rbp,-208), R(rdi)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm3),X8 MEM_DISP(rbp,-120)) INSN2S(movs,d ,R(xmm4),X8 MEM_DISP(rbp,-112)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-208)) INSN2S(movs,d ,R(xmm5),X8 MEM_DISP(rbp,-104)) INSN2(mov,q ,NUM(0),X8 MEM_DISP(rbp,-176)) INSN2S(movs,d ,R(xmm6),X8 MEM_DISP(rbp,-96)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-168)) INSN2S(movs,d ,R(xmm7),X8 MEM_DISP(rbp,-88)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-80)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-152)) INSN1(call,_ ,INDIR(X8 MEM_PCRELATIVE(C(vacall_function)))) INSN2(mov,l ,X4 MEM_DISP(rbp,-168), R(ecx)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(41)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(3), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(4), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(5), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(6), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(7), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(8), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(9), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(10), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(11), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(12), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(13), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(14), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(15), R(ecx)) P2ALIGN(4,5) INSN1(jne,_ ,L(41)) INSN2(test,b ,NUM(4),X1 MEM_DISP(rbp,-207)) P2ALIGN(4,2) INSN1(je,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-160), R(rsi)) INSN2(lea,q ,X8 MEM_DISP(rsi,-1), R(rcx)) INSN2(cmp,q ,NUM(15), R(rcx)) INSN1(ja,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-176), R(rcx)) INSN2(mov,q ,R(rcx), R(r11)) INSN2(mov,q ,R(rcx), R(r8)) INSN2(and,l ,NUM(7), R(r8d)) INSN2(and,q ,NUM(-8), R(r11)) INSN2(cmp,q ,NUM(8), R(rsi)) INSN2(lea,q ,X8 MEM_INDEX(rsi,r8), R(r10)) INSN1(ja,_ ,L(35)) INSN2(cmp,q ,NUM(8), R(r10)) INSN1(ja,_ ,L(37)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,r10,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM(r11), R(rsi)) INSN2(mov,q ,R(rsi), R(rax)) INSN2(sar,q ,R(cl), R(rax)) P2ALIGN(4,7) L(41): INSN2(add,q ,NUM(200), R(rsp)) INSN1(pop,q ,R(r12)) leave ret P2ALIGN(4,7) L(42): INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-200),R(rax)) INSN2(add,q ,NUM(200), R(rsp)) INSN1(pop,q ,R(r12)) leave ret L(49): INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(48): INSN2MOVXQ(movz,b,X1 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(46): INSN2(mov,q ,X8 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(50): INSN2MOVXQ(movz,w,X2 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(51): INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(52): INSN2(mov,l ,X4 MEM_DISP(rbp,-200), R(eax)) INSN1(jmp,_ ,L(41)) L(53): INSN2S(movs,s ,X4 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(54): INSN2(movlp,d ,X8 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(35): INSN2(cmp,q ,NUM(16), R(r10)) INSN1(ja,_ ,L(39)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(r9d)) INSN2(mov,l ,NUM(32), R(edi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,4), R(rcx)) INSN2(mov,q ,X8 MEM(r11), R(r8)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM_DISP(r11,8), R(rsi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(mov,q ,R(r8), R(rax)) INSN2(mov,q ,R(rsi), R(r10)) INSN2(mov,q ,R(rsi), R(rdx)) INSN2(sal,q ,R(cl), R(r10)) INSN2(sal,q ,R(cl), R(r10)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(r10), R(rax)) INSN2(sar,q ,R(cl), R(rdx)) INSN1(jmp,_ ,L(41)) L(37): INSN2(mov,q ,X8 MEM(r11), R(rdi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r10,8), R(esi)) INSN2(sal,q ,NUM(3), R(r8)) INSN2(mov,l ,R(r8d), R(ecx)) INSN2(mov,l ,NUM(2), R(r10d)) INSN2(sar,q ,R(cl), R(rdi)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(mov,l ,NUM(64), R(esi)) INSN2(sal,q ,R(cl), R(r10)) INSN2(sub,l ,R(r8d), R(esi)) INSN2(mov,q ,R(rdi), R(rax)) INSN1(dec,q ,R(r10)) INSN2(and,q ,X8 MEM_DISP(r11,8), R(r10)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r10)) INSN2(or,q ,R(r10), R(rax)) INSN1(jmp,_ ,L(41)) L(39): INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,8), R(rcx)) INSN2(mov,q ,X8 MEM(r11), R(r12)) INSN2(mov,q ,X8 MEM_DISP(r11,8), R(r8)) INSN2(mov,l ,NUM(64), R(edi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(ecx), R(r9d)) INSN2(sar,q ,R(cl), R(r12)) INSN2(mov,q ,R(r8), R(rsi)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(mov,q ,R(r12), R(rax)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(rsi), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-129,r10,8), R(esi)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,NUM(2), R(r9d)) INSN2(mov,q ,R(r8), R(rdx)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r9)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(lea,q ,X8 MEM_DISP(r9,-1), R(rsi)) INSN2(and,q ,X8 MEM_DISP(r11,16), R(rsi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(or,q ,R(rsi), R(rdx)) INSN1(jmp,_ ,L(41)) L(FE2): FUNEND(vacall_receiver, .-vacall_receiver) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0x0 .byte 0x1 .string "" .uleb128 0x1 .sleb128 -8 .byte 0x10 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .quad L(FB2) .quad L(FE2)-.LFB2 .byte 0x4 .long L(CFI0)-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI3)-.LCFI1 .byte 0x8c .uleb128 0x3 .align 8 L(EFDE1): #endif #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/Makefile.maint0000664000000000000000000000076013153072372014206 00000000000000# maintainer -*-Makefile-*- LN = ln -s RM = rm -f # ==================== Easily regeneratable files ==================== ROFF_MAN = groff -Tutf8 -mandoc all : vacall.man \ vacall-i386-msvc.c vacall.man : vacall.3 $(ROFF_MAN) vacall.3 > vacall.man vacall-i386-msvc.c : vacall-i386-macro.S (echo '#ifdef _MSC_VER' ; echo '#include "vacall.h"' ; echo '#endif' ; cat vacall-i386-macro.S) > vacall-i386-msvc.c totally-clean : force $(RM) vacall.man $(RM) vacall-i386-msvc.c force : libffcall-2.5/vacall/vacall-alpha.c0000664000000000000000000001166614662613007014141 00000000000000/* vacall function for alpha CPU */ /* * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("$1"); #endif register __varword arg1 __asm__("$16"); register __varword arg2 __asm__("$17"); register __varword arg3 __asm__("$18"); register __varword arg4 __asm__("$19"); register __varword arg5 __asm__("$20"); register __varword arg6 __asm__("$21"); register double farg1 __asm__("$f16"); register double farg2 __asm__("$f17"); register double farg3 __asm__("$f18"); register double farg4 __asm__("$f19"); register double farg5 __asm__("$f20"); register double farg6 __asm__("$f21"); register __varword iret __asm__("$0"); register __varword iret2 __asm__("$1"); register float fret __asm__("$f0"); register double dret __asm__("$f0"); /* The ABI requires that the first 6 general-purpose argument words are being passed in registers, even if these words belong to a struct. No room is allocated for these register words on the stack by the caller, but the callee allocates room for them - at the right place in the stack frame, that is, above the usual {fp, retaddr} combo - if and only if they are part of a larger struct that extends to the stack and the address of this struct is taken. */ struct gpargsequence { __vaword word1; /* $16 */ __vaword word2; /* $17 */ __vaword word3; /* $18 */ __vaword word4; /* $19 */ __vaword word5; /* $20 */ __vaword word6; /* $21 */ __vaword firststackword; }; #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (struct gpargsequence gpargs) { __va_alist list; /* Move the arguments passed in registers to their stack locations. */ list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)&gpargs; list.raddr = (void*)0; list.rtype = __VAvoid; list.memargptr = (long)&gpargs.firststackword; list.farg_offset = (long)&list.farg[0] - list.aptr; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { if (list.flags & __VA_REGISTER_STRUCT_RETURN) { if (list.rsize == sizeof(char)) { iret = *(unsigned char *) list.raddr; } else if (list.rsize == sizeof(short)) { iret = *(unsigned short *) list.raddr; } else if (list.rsize == sizeof(int)) { iret = *(unsigned int *) list.raddr; } else if (list.rsize == sizeof(long)) { iret = *(unsigned long *) list.raddr; } else if (list.rsize == 2*sizeof(__varword)) { iret = ((__varword *) list.raddr)[0]; iret2 = ((__varword *) list.raddr)[1]; } } } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-riscv32-ilp32d-linux.s0000664000000000000000000000436214665263077016625 00000000000000 .file "vacall-riscv32.c" .option nopic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 lui t1,%hi(vacall_function) lw t1,%lo(vacall_function)(t1) sw a0,-148(s0) add a0,s0,16 sw a7,12(s0) sw a1,-144(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a0,-168(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) add a0,s0,-184 sw zero,-152(s0) sw zero,-116(s0) jalr t1 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/vacall/vacall-m68k-sun.s0000664000000000000000000000362214665263072014463 00000000000000#NO_APP .text .even .globl _vacall_receiver _vacall_receiver: link a6,#-32 moveml #0x3030,sp@- clrl a6@(-32) lea a6@(8),a2 movel a2,a6@(-20) clrl a6@(-16) clrl a6@(-12) movel a1,a6@(-4) pea a6@(-32) movel _vacall_function,a2 jbsr a2@ addql #4,sp movel a6@(-12),a3 tstl a3 jeq L1 moveq #1,d2 cmpl a3,d2 jeq L46 moveq #2,d3 cmpl a3,d3 jeq L46 moveq #3,d2 cmpl a3,d2 jeq L47 moveq #4,d3 cmpl a3,d3 jeq L48 moveq #5,d2 cmpl a3,d2 jeq L49 moveq #6,d3 cmpl a3,d3 jeq L45 moveq #7,d2 cmpl a3,d2 jeq L45 moveq #8,d3 cmpl a3,d3 jeq L45 moveq #9,d2 cmpl a3,d2 jeq L45 lea a3@(-10),a2 moveq #1,d3 cmpl a2,d3 jcs L22 movel a6@(-28),d0 movel a6@(-24),d1 jra L1 .even L22: moveq #12,d2 cmpl a3,d2 jeq L50 moveq #13,d2 cmpl a3,d2 jeq L51 moveq #14,d3 cmpl a3,d3 jeq L52 moveq #15,d2 cmpl a3,d2 jne L1 btst #2,a6@(-30) jeq L1 movel a6@(-8),d2 moveq #1,d3 cmpl d2,d3 jeq L53 moveq #2,d3 cmpl d2,d3 jeq L54 moveq #4,d3 cmpl d2,d3 jeq L55 moveq #8,d3 cmpl d2,d3 jne L1 movel a6@(-16),a2 movel a2@,d0 movel a2@(4),d1 jra L1 .even L55: movel a6@(-16),a2 movel a2@,d0 jra L1 .even L54: movel a6@(-16),a2 clrl d0 movew a2@,d0 jra L1 .even L53: movel a6@(-16),a2 clrl d0 moveb a2@,d0 jra L1 .even L52: movel a6@(-28),d0 movel d0,a0 jra L1 .even L51: btst #6,a6@(-29) jeq L31 fmoved a6@(-28),fp0 jra L1 .even L31: movel a6@(-28),d0 movel a6@(-24),d1 jra L1 .even L50: movel a6@(-32),d2 btst #6,d2 jeq L25 fmoves a6@(-28),fp0 jra L1 .even L25: btst #5,d2 jeq L27 fmoves a6@(-28),fp1 fmoved fp1,sp@- movel sp@+,d0 movel sp@+,d1 jra L1 .even L27: movel a6@(-28),d0 jra L1 .even L45: movel a6@(-28),d0 jra L1 .even L49: clrl d0 movew a6@(-28),d0 jra L1 .even L48: movew a6@(-28),d0 extl d0 jra L1 .even L47: clrl d0 moveb a6@(-28),d0 jra L1 .even L46: moveb a6@(-28),d0 extbl d0 L1: moveml a6@(-48),#0xc0c unlk a6 rts libffcall-2.5/vacall/vacall-arm-old-linux-pic.s0000664000000000000000000000316214665263073016334 00000000000000 .file "vacall-arm.c" .text .align 2 .global vacall_receiver .type vacall_receiver,function vacall_receiver: @ args = 20, pretend = 16, frame = 32 @ frame_needed = 1, uses_anonymous_args = 0 mov ip, sp sub sp, sp, #-4294967280 stmfd sp!, {sl, fp, ip, lr, pc} sub fp, ip, #-4294967276 add ip, fp, #4 ldr sl, .L41 sub sp, sp, #32 stmia ip, {r0, r1, r2, r3} ldr r3, .L41+4 mov lr, #0 .L36: add sl, pc, sl ldr r2, [sl, r3] str ip, [fp, #-32] str lr, [fp, #-24] str lr, [fp, #-48] str lr, [fp, #-28] bic sp, sp, #7 sub r0, fp, #48 mov lr, pc ldr pc, [r2, #0] ldr r2, [fp, #-24] cmp r2, #0 beq .L1 cmp r2, #1 beq .L39 cmp r2, #2 ldreqsb r0, [fp, #-40] beq .L1 cmp r2, #3 beq .L39 cmp r2, #4 ldreqsh r0, [fp, #-40] beq .L1 cmp r2, #5 ldreqh r0, [fp, #-40] beq .L1 cmp r2, #6 beq .L38 cmp r2, #7 beq .L38 cmp r2, #8 beq .L38 cmp r2, #9 beq .L38 sub r3, r2, #10 cmp r3, #1 bls .L37 cmp r2, #12 ldreq r0, [fp, #-40] @ float beq .L1 cmp r2, #13 beq .L37 cmp r2, #14 beq .L38 cmp r2, #15 beq .L40 .L1: ldmea fp, {sl, fp, sp, pc} .L40: ldr r3, [fp, #-48] tst r3, #1024 beq .L1 ldr r3, [fp, #-20] cmp r3, #1 ldreq r3, [fp, #-28] ldreqb r0, [r3, #0] @ zero_extendqisi2 beq .L1 cmp r3, #2 ldreq r3, [fp, #-28] ldrne r3, [fp, #-28] ldreqh r0, [r3, #0] ldrne r0, [r3, #0] b .L1 .L38: ldr r0, [fp, #-40] b .L1 .L37: sub r0, fp, #40 ldmia r0, {r0, r1} @ phole ldm b .L1 .L39: ldrb r0, [fp, #-40] @ zero_extendqisi2 b .L1 .L42: .align 2 .L41: .word _GLOBAL_OFFSET_TABLE_-(.L36+8) .word vacall_function(GOT) .Lfe1: .size vacall_receiver,.Lfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-sparc-linux.s0000664000000000000000000000346014665263073015341 00000000000000 .file "vacall-sparc.c" .section ".text" .align 4 .global vacall_receiver .type vacall_receiver,#function .proc 020 vacall_receiver: !#PROLOGUE# 0 save %sp, -144, %sp !#PROLOGUE# 1 sethi %hi(vacall_function), %o0 ld [%o0+%lo(vacall_function)], %o2 st %i2, [%fp+76] add %fp, 68, %o0 ld [%fp+64], %o1 st %o0, [%fp-32] st %o1, [%fp-16] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] st %g0, [%fp-28] st %g0, [%fp-24] call %o2, 0 add %fp, -48, %o0 ld [%fp-24], %o1 cmp %o1, 0 be .LL1 cmp %o1, 1 be .LL44 cmp %o1, 2 be .LL44 cmp %o1, 3 be .LL45 cmp %o1, 4 be .LL46 cmp %o1, 5 be .LL47 cmp %o1, 6 be .LL43 cmp %o1, 7 be .LL43 cmp %o1, 8 be .LL43 cmp %o1, 9 be .LL43 add %o1, -10, %o0 cmp %o0, 1 bgu .LL22 cmp %o1, 12 ld [%fp-40], %i0 b .LL1 ld [%fp-36], %i1 .LL22: be .LL48 cmp %o1, 13 be .LL49 cmp %o1, 14 be .LL43 cmp %o1, 15 bne .LL1 ld [%fp-48], %o0 andcc %o0, 16, %g0 be .LL33 andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne .LL1 ld [%fp-28], %i0 b .LL1 add %i7, 4, %i7 .LL33: be,a .LL1 add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be .LL50 cmp %o0, 2 be .LL51 cmp %o0, 4 bne,a .LL1 add %i7, 4, %i7 ld [%fp-28], %o0 b .LL1 ld [%o0], %i0 .LL51: ld [%fp-28], %o0 b .LL1 lduh [%o0], %i0 .LL50: ld [%fp-28], %o0 b .LL1 ldub [%o0], %i0 .LL43: b .LL1 ld [%fp-40], %i0 .LL49: b .LL1 ldd [%fp-40], %f0 .LL48: ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a .LL1 ld [%fp-40], %f0 ld [%fp-40], %f2 b .LL1 fstod %f2, %f0 .LL47: b .LL1 lduh [%fp-40], %i0 .LL46: b .LL1 ldsh [%fp-40], %i0 .LL45: b .LL1 ldub [%fp-40], %i0 .LL44: ldsb [%fp-40], %i0 .LL38: .LL1: nop ret restore .LLfe1: .size vacall_receiver,.LLfe1-vacall_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/vacall/vacall-x86_64-linux.s0000664000000000000000000000767514665263075015205 00000000000000 .file "vacall-x86_64.c" .text .p2align 4,,15 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: .LFB2: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: pushq %r12 .LCFI2: subq $200, %rsp .LCFI3: movq %rcx, -48(%rbp) leaq 16(%rbp), %rcx movq %rdi, -72(%rbp) movq %rsi, -64(%rbp) movsd %xmm0, -144(%rbp) movq %rcx, -184(%rbp) movq %rdx, -56(%rbp) movsd %xmm1, -136(%rbp) movq %r8, -40(%rbp) movsd %xmm2, -128(%rbp) leaq -208(%rbp), %rdi movq %r9, -32(%rbp) movsd %xmm3, -120(%rbp) movsd %xmm4, -112(%rbp) movl $0, -208(%rbp) movsd %xmm5, -104(%rbp) movq $0, -176(%rbp) movsd %xmm6, -96(%rbp) movl $0, -168(%rbp) movsd %xmm7, -88(%rbp) movl $0, -80(%rbp) movl $0, -152(%rbp) call *vacall_function(%rip) movl -168(%rbp), %ecx testl %ecx, %ecx je .L41 cmpl $1, %ecx je .L42 cmpl $2, %ecx je .L42 cmpl $3, %ecx .p2align 4,,5 je .L48 cmpl $4, %ecx .p2align 4,,5 je .L49 cmpl $5, %ecx .p2align 4,,5 je .L50 cmpl $6, %ecx .p2align 4,,5 je .L51 cmpl $7, %ecx .p2align 4,,5 je .L52 cmpl $8, %ecx .p2align 4,,5 je .L46 cmpl $9, %ecx .p2align 4,,5 je .L46 cmpl $10, %ecx .p2align 4,,5 je .L46 cmpl $11, %ecx .p2align 4,,5 je .L46 cmpl $12, %ecx .p2align 4,,5 je .L53 cmpl $13, %ecx .p2align 4,,5 je .L54 cmpl $14, %ecx .p2align 4,,5 je .L46 cmpl $15, %ecx .p2align 4,,5 jne .L41 testb $4, -207(%rbp) .p2align 4,,2 je .L41 movq -160(%rbp), %rsi leaq -1(%rsi), %rcx cmpq $15, %rcx ja .L41 movq -176(%rbp), %rcx movq %rcx, %r11 movq %rcx, %r8 andl $7, %r8d andq $-8, %r11 cmpq $8, %rsi leaq (%rsi,%r8), %r10 ja .L35 cmpq $8, %r10 ja .L37 leal -1(,%r10,8), %ecx movl $2, %esi salq %cl, %rsi leal 0(,%r8,8), %ecx decq %rsi andq (%r11), %rsi movq %rsi, %rax sarq %cl, %rax .p2align 4,,7 .L41: addq $200, %rsp popq %r12 leave ret .p2align 4,,7 .L42: movsbq -200(%rbp),%rax addq $200, %rsp popq %r12 leave ret .L49: movswq -200(%rbp),%rax jmp .L41 .L48: movzbq -200(%rbp), %rax jmp .L41 .L46: movq -200(%rbp), %rax jmp .L41 .L50: movzwq -200(%rbp), %rax jmp .L41 .L51: movslq -200(%rbp),%rax jmp .L41 .L52: mov -200(%rbp), %eax jmp .L41 .L53: movss -200(%rbp), %xmm0 jmp .L41 .L54: movlpd -200(%rbp), %xmm0 jmp .L41 .L35: cmpq $16, %r10 ja .L39 leal -65(,%r10,8), %ecx movl $2, %esi leal 0(,%r8,8), %r9d movl $32, %edi salq %cl, %rsi leaq 0(,%r8,4), %rcx movq (%r11), %r8 decq %rsi andq 8(%r11), %rsi subl %ecx, %edi movl %r9d, %ecx sarq %cl, %r8 movl %edi, %ecx movq %r8, %rax movq %rsi, %r10 movq %rsi, %rdx salq %cl, %r10 salq %cl, %r10 movl %r9d, %ecx orq %r10, %rax sarq %cl, %rdx jmp .L41 .L37: movq (%r11), %rdi leal -65(,%r10,8), %esi salq $3, %r8 movl %r8d, %ecx movl $2, %r10d sarq %cl, %rdi movl %esi, %ecx movl $64, %esi salq %cl, %r10 subl %r8d, %esi movq %rdi, %rax decq %r10 andq 8(%r11), %r10 movl %esi, %ecx salq %cl, %r10 orq %r10, %rax jmp .L41 .L39: leaq 0(,%r8,8), %rcx movq (%r11), %r12 movq 8(%r11), %r8 movl $64, %edi subl %ecx, %edi movl %ecx, %r9d sarq %cl, %r12 movq %r8, %rsi movl %edi, %ecx salq %cl, %rsi movq %r12, %rax movl %r9d, %ecx orq %rsi, %rax leal -129(,%r10,8), %esi sarq %cl, %r8 movl $2, %r9d movq %r8, %rdx movl %esi, %ecx salq %cl, %r9 movl %edi, %ecx leaq -1(%r9), %rsi andq 16(%r11), %rsi salq %cl, %rsi orq %rsi, %rdx jmp .L41 .LFE2: .size vacall_receiver, .-vacall_receiver .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0x0 .byte 0x1 .string "" .uleb128 0x1 .sleb128 -8 .byte 0x10 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .quad .LFB2 .quad .LFE2-.LFB2 .byte 0x4 .long .LCFI0-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI3-.LCFI1 .byte 0x8c .uleb128 0x3 .align 8 .LEFDE1: .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/vacall/vacall-riscv64-lp64d-macro.S0000664000000000000000000001242514665263077016367 00000000000000#ifdef __PIC__ .file "vacall-riscv64.c" .option pic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 la t1,vacall_function ld t1,0(t1) sd a0,-200(s0) add a0,s0,16 sd a7,8(s0) sd a1,-192(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a0,-240(s0) sw zero,-264(s0) sd zero,-232(s0) add a0,s0,-264 sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) jalr t1 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s1,8 and t6,t5,7 add t2,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,t2,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s1,.L15 bgtu t2,s1,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s1,16 sra t4,t4,t3 ld t0,8(t5) bleu t2,s1,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size vacall_receiver, .-vacall_receiver #else .file "vacall-riscv64.c" .option nopic .text .align 1 .globl vacall_receiver .type vacall_receiver, @function vacall_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 lui t1,%hi(vacall_function) ld t1,%lo(vacall_function)(t1) sd a0,-200(s0) add a0,s0,16 sd a7,8(s0) sd a1,-192(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a0,-240(s0) sw zero,-264(s0) sd zero,-232(s0) add a0,s0,-264 sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) jalr t1 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s1,8 and t6,t5,7 add t2,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,t2,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s1,.L15 bgtu t2,s1,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s1,16 sra t4,t4,t3 ld t0,8(t5) bleu t2,s1,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size vacall_receiver, .-vacall_receiver #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/vacall/COPYING0000644000000000000000000004335713026317520012475 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/vacall/vacall-powerpc64.c0000664000000000000000000005117314662613007014702 00000000000000/* vacall function for powerpc64 CPU */ /* * Copyright 1995-2024 Bruno Haible * Copyright 2000 Adam Fedor * Copyright 2004 Paul Guyot * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "vacall-internal.h" #ifdef REENTRANT #define vacall_receiver callback_receiver register struct { void (*vacall_function) (void*,va_alist); void* arg; } * env __asm__("r11"); #endif register double farg1 __asm__("fr1"); register double farg2 __asm__("fr2"); register double farg3 __asm__("fr3"); register double farg4 __asm__("fr4"); register double farg5 __asm__("fr5"); register double farg6 __asm__("fr6"); register double farg7 __asm__("fr7"); register double farg8 __asm__("fr8"); register double farg9 __asm__("fr9"); register double farg10 __asm__("fr10"); register double farg11 __asm__("fr11"); register double farg12 __asm__("fr12"); register double farg13 __asm__("fr13"); register __varword iret __asm__("r3"); register __varword iret2 __asm__("r4"); register float fret __asm__("fr1"); register double dret __asm__("fr1"); #ifdef REENTRANT static #endif void /* the return type is variable, not void! */ vacall_receiver (__vaword word1, __vaword word2, __vaword word3, __vaword word4, __vaword word5, __vaword word6, __vaword word7, __vaword word8, __vaword firstword) { __va_alist list; /* When a parameter is passed in a register, * stack space is still allocated for it. */ /* Move the arguments passed in registers to their stack locations. */ (&firstword)[-8] = word1; (&firstword)[-7] = word2; (&firstword)[-6] = word3; (&firstword)[-5] = word4; (&firstword)[-4] = word5; (&firstword)[-3] = word6; (&firstword)[-2] = word7; (&firstword)[-1] = word8; list.farg[0] = farg1; list.farg[1] = farg2; list.farg[2] = farg3; list.farg[3] = farg4; list.farg[4] = farg5; list.farg[5] = farg6; list.farg[6] = farg7; list.farg[7] = farg8; list.farg[8] = farg9; list.farg[9] = farg10; list.farg[10] = farg11; list.farg[11] = farg12; list.farg[12] = farg13; /* Prepare the va_alist. */ list.flags = 0; list.aptr = (long)(&firstword - 8); list.raddr = (void*)0; list.rtype = __VAvoid; list.fanum = 0; /* Call vacall_function. The macros do all the rest. */ #ifndef REENTRANT (*vacall_function) (&list); #else /* REENTRANT */ (*env->vacall_function) (env->arg,&list); #endif /* Put return value into proper register. */ if (list.rtype == __VAvoid) { } else if (list.rtype == __VAchar) { iret = list.tmp._char; } else if (list.rtype == __VAschar) { iret = list.tmp._schar; } else if (list.rtype == __VAuchar) { iret = list.tmp._uchar; } else if (list.rtype == __VAshort) { iret = list.tmp._short; } else if (list.rtype == __VAushort) { iret = list.tmp._ushort; } else if (list.rtype == __VAint) { iret = list.tmp._int; } else if (list.rtype == __VAuint) { iret = list.tmp._uint; } else if (list.rtype == __VAlong) { iret = list.tmp._long; } else if (list.rtype == __VAulong) { iret = list.tmp._ulong; } else if (list.rtype == __VAlonglong) { iret = list.tmp._long; } else if (list.rtype == __VAulonglong) { iret = list.tmp._ulong; } else if (list.rtype == __VAfloat) { fret = list.tmp._float; } else if (list.rtype == __VAdouble) { dret = list.tmp._double; } else if (list.rtype == __VAvoidp) { iret = (long)list.tmp._ptr; } else if (list.rtype == __VAstruct) { #ifdef __powerpc64_elfv2__ if (list.flags & __VA_REGISTER_STRUCT_RETURN) { /* In the ELFv2 ABI, gcc returns structs of size <= 16 in registers. */ if (list.rsize > 0 && list.rsize <= 16) { #if defined(__LITTLE_ENDIAN__) #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = (__varword)((unsigned char *) list.raddr)[0]; } else if (list.rsize == 2) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8); } else if (list.rsize == 3) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16); } else if (list.rsize == 4) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24); } else if (list.rsize == 5) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32); } else if (list.rsize == 6) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40); } else if (list.rsize == 7) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48); } else if (list.rsize >= 8 && list.rsize <= 16) { iret = ((__varword)((unsigned char *) list.raddr)[0]) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 32) | ((__varword)((unsigned char *) list.raddr)[5] << 40) | ((__varword)((unsigned char *) list.raddr)[6] << 48) | ((__varword)((unsigned char *) list.raddr)[7] << 56); if (list.rsize == 8) { } else if (list.rsize == 9) { iret2 = (__varword)((unsigned char *) list.raddr)[8]; } else if (list.rsize == 10) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8); } else if (list.rsize == 11) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16); } else if (list.rsize == 12) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24); } else if (list.rsize == 13) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32); } else if (list.rsize == 14) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40); } else if (list.rsize == 15) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48); } else if (list.rsize == 16) { iret2 = ((__varword)((unsigned char *) list.raddr)[8]) | ((__varword)((unsigned char *) list.raddr)[9] << 8) | ((__varword)((unsigned char *) list.raddr)[10] << 16) | ((__varword)((unsigned char *) list.raddr)[11] << 24) | ((__varword)((unsigned char *) list.raddr)[12] << 32) | ((__varword)((unsigned char *) list.raddr)[13] << 40) | ((__varword)((unsigned char *) list.raddr)[14] << 48) | ((__varword)((unsigned char *) list.raddr)[15] << 56); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ __varword mask0 = ((__varword)2 << (end_offset*8-1)) - 1; iret = (wordaddr[0] & mask0) >> (start_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*8-start_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = ((__varword)2 << (end_offset*8-sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | ((wordaddr[1] & mask1) << (sizeof(__varword)*4-start_offset*4) << (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) >> (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = ((__varword)2 << (end_offset*8-2*sizeof(__varword)*8-1)) - 1; iret = (wordaddr[0] >> (start_offset*8)) | (wordaddr[1] << (sizeof(__varword)*8-start_offset*8)); iret2 = (wordaddr[1] >> (start_offset*8)) | ((wordaddr[2] & mask2) << (sizeof(__varword)*8-start_offset*8)); } } #endif #endif #if defined(__BIG_ENDIAN__) #if 0 /* Unoptimized */ if (list.rsize == 1) { iret = (__varword)((unsigned char *) list.raddr)[0]; } else if (list.rsize == 2) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 8) | ((__varword)((unsigned char *) list.raddr)[1]); } else if (list.rsize == 3) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 16) | ((__varword)((unsigned char *) list.raddr)[1] << 8) | ((__varword)((unsigned char *) list.raddr)[2]); } else if (list.rsize == 4) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 24) | ((__varword)((unsigned char *) list.raddr)[1] << 16) | ((__varword)((unsigned char *) list.raddr)[2] << 8) | ((__varword)((unsigned char *) list.raddr)[3]); } else if (list.rsize == 5) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 32) | ((__varword)((unsigned char *) list.raddr)[1] << 24) | ((__varword)((unsigned char *) list.raddr)[2] << 16) | ((__varword)((unsigned char *) list.raddr)[3] << 8) | ((__varword)((unsigned char *) list.raddr)[4]); } else if (list.rsize == 6) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 40) | ((__varword)((unsigned char *) list.raddr)[1] << 32) | ((__varword)((unsigned char *) list.raddr)[2] << 24) | ((__varword)((unsigned char *) list.raddr)[3] << 16) | ((__varword)((unsigned char *) list.raddr)[4] << 8) | ((__varword)((unsigned char *) list.raddr)[5]); } else if (list.rsize == 7) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 48) | ((__varword)((unsigned char *) list.raddr)[1] << 40) | ((__varword)((unsigned char *) list.raddr)[2] << 32) | ((__varword)((unsigned char *) list.raddr)[3] << 24) | ((__varword)((unsigned char *) list.raddr)[4] << 16) | ((__varword)((unsigned char *) list.raddr)[5] << 8) | ((__varword)((unsigned char *) list.raddr)[6]); } else if (list.rsize >= 8 && list.rsize <= 16) { iret = ((__varword)((unsigned char *) list.raddr)[0] << 56) | ((__varword)((unsigned char *) list.raddr)[1] << 48) | ((__varword)((unsigned char *) list.raddr)[2] << 40) | ((__varword)((unsigned char *) list.raddr)[3] << 32) | ((__varword)((unsigned char *) list.raddr)[4] << 24) | ((__varword)((unsigned char *) list.raddr)[5] << 16) | ((__varword)((unsigned char *) list.raddr)[6] << 8) | ((__varword)((unsigned char *) list.raddr)[7]); if (list.rsize == 8) { } else if (list.rsize == 9) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56); } else if (list.rsize == 10) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48); } else if (list.rsize == 11) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40); } else if (list.rsize == 12) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32); } else if (list.rsize == 13) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24); } else if (list.rsize == 14) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16); } else if (list.rsize == 15) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8); } else if (list.rsize == 16) { iret2 = ((__varword)((unsigned char *) list.raddr)[8] << 56) | ((__varword)((unsigned char *) list.raddr)[9] << 48) | ((__varword)((unsigned char *) list.raddr)[10] << 40) | ((__varword)((unsigned char *) list.raddr)[11] << 32) | ((__varword)((unsigned char *) list.raddr)[12] << 24) | ((__varword)((unsigned char *) list.raddr)[13] << 16) | ((__varword)((unsigned char *) list.raddr)[14] << 8) | ((__varword)((unsigned char *) list.raddr)[15]); } } #else /* Optimized: fewer conditional jumps, fewer memory accesses */ uintptr_t count = list.rsize; /* > 0, ≤ 2*sizeof(__varword) */ __varword* wordaddr = (__varword*)((uintptr_t)list.raddr & ~(uintptr_t)(sizeof(__varword)-1)); uintptr_t start_offset = (uintptr_t)list.raddr & (uintptr_t)(sizeof(__varword)-1); /* ≥ 0, < sizeof(__varword) */ uintptr_t end_offset = start_offset + count; /* > 0, < 3*sizeof(__varword) */ __varword mask0 = ((__varword)2 << (sizeof(__varword)*8-start_offset*8-1)) - 1; if (count <= sizeof(__varword)) { /* Assign iret. */ if (end_offset <= sizeof(__varword)) { /* 0 < end_offset ≤ sizeof(__varword) */ iret = (wordaddr[0] & mask0) >> (sizeof(__varword)*8-end_offset*8); } else { /* sizeof(__varword) < end_offset < 2*sizeof(__varword), start_offset > 0 */ iret = ((wordaddr[0] & mask0) << (end_offset*8-sizeof(__varword)*8)) | (wordaddr[1] >> (2*sizeof(__varword)*8-end_offset*8)); } } else { /* Assign iret, iret2. */ if (end_offset <= 2*sizeof(__varword)) { /* sizeof(__varword) < end_offset ≤ 2*sizeof(__varword) */ __varword mask1 = - ((__varword)1 << (2*sizeof(__varword)*8-end_offset*8)); iret = ((wordaddr[0] & mask0) << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] & mask1) << (start_offset*8); } else { /* 2*sizeof(__varword) < end_offset < 3*sizeof(__varword), start_offset > 0 */ __varword mask2 = - ((__varword)1 << (3*sizeof(__varword)*8-end_offset*8)); iret = ((wordaddr[0] & mask0) << (start_offset*8)) | (wordaddr[1] >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); iret2 = (wordaddr[1] << (start_offset*8)) | ((wordaddr[2] & mask2) >> (sizeof(__varword)*4-start_offset*4) >> (sizeof(__varword)*4-start_offset*4)); } } #endif #endif } } #endif } } #ifdef REENTRANT __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } #endif libffcall-2.5/vacall/vacall-armhf-eabi-linux-pic.s0000664000000000000000000000540514665263074016777 00000000000000 .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .file "vacall-armhf.c" .text .align 2 .global vacall_receiver .syntax unified .arm .fpu vfpv3-d16 .type vacall_receiver, %function vacall_receiver: @ args = 20, pretend = 16, frame = 176 @ frame_needed = 1, uses_anonymous_args = 0 sub sp, sp, #16 mov ip, #0 push {r4, r5, r6, fp, lr} add fp, sp, #16 ldr r4, .L32 ldr r5, .L32+4 add lr, fp, #4 .LPIC0: add r4, pc, r4 add r6, fp, #20 sub sp, sp, #180 stm lr, {r0, r1, r2, r3} vstr.32 s0, [fp, #-152] vstr.32 s1, [fp, #-148] vstr.32 s2, [fp, #-144] vstr.32 s3, [fp, #-140] vstr.32 s4, [fp, #-136] vstr.32 s5, [fp, #-132] vstr.32 s6, [fp, #-128] vstr.32 s7, [fp, #-124] vstr.32 s8, [fp, #-120] vstr.32 s9, [fp, #-116] vstr.32 s10, [fp, #-112] vstr.32 s11, [fp, #-108] vstr.32 s12, [fp, #-104] vstr.32 s13, [fp, #-100] vstr.32 s14, [fp, #-96] vstr.32 s15, [fp, #-92] vstr.64 d0, [fp, #-84] vstr.64 d1, [fp, #-76] vstr.64 d2, [fp, #-68] vstr.64 d3, [fp, #-60] vstr.64 d4, [fp, #-52] vstr.64 d5, [fp, #-44] vstr.64 d6, [fp, #-36] vstr.64 d7, [fp, #-28] str lr, [fp, #-164] str ip, [fp, #-196] str ip, [fp, #-160] str r6, [fp, #-180] str ip, [fp, #-156] str ip, [fp, #-176] strb ip, [fp, #-172] ldr r2, [r4, r5] mov r3, r4 sub r0, fp, #196 ldr r3, [r2] blx r3 ldrb r3, [fp, #-172] @ zero_extendqisi2 cmp r3, #0 beq .L1 cmp r3, #1 beq .L25 cmp r3, #2 ldrsbeq r0, [fp, #-188] beq .L1 cmp r3, #3 beq .L25 cmp r3, #4 ldrsheq r0, [fp, #-188] beq .L1 cmp r3, #5 ldrheq r0, [fp, #-188] beq .L1 cmp r3, #6 beq .L27 cmp r3, #7 beq .L27 cmp r3, #8 beq .L27 cmp r3, #9 beq .L27 sub r2, r3, #10 cmp r2, #1 bls .L29 cmp r3, #12 vldreq.32 s0, [fp, #-188] beq .L1 cmp r3, #13 beq .L30 cmp r3, #14 beq .L27 cmp r3, #15 bne .L1 ldr r3, [fp, #-196] tst r3, #1024 beq .L1 ldr r3, [fp, #-168] cmp r3, #1 beq .L31 cmp r3, #2 ldr r3, [fp, #-176] ldrheq r0, [r3] ldrne r0, [r3] .L1: sub sp, fp, #16 @ sp needed pop {r4, r5, r6, fp, lr} add sp, sp, #16 bx lr .L25: ldrb r0, [fp, #-188] @ zero_extendqisi2 sub sp, fp, #16 @ sp needed pop {r4, r5, r6, fp, lr} add sp, sp, #16 bx lr .L27: ldr r0, [fp, #-188] sub sp, fp, #16 @ sp needed pop {r4, r5, r6, fp, lr} add sp, sp, #16 bx lr .L30: vldr.64 d0, [fp, #-188] b .L1 .L29: ldr r0, [fp, #-188] ldr r1, [fp, #-184] b .L1 .L31: ldr r3, [fp, #-176] ldrb r0, [r3] @ zero_extendqisi2 b .L1 .L33: .align 2 .L32: .word _GLOBAL_OFFSET_TABLE_-(.LPIC0+8) .word vacall_function(GOT) .size vacall_receiver, .-vacall_receiver .ident "GCC: (GNU) 6.5.0" .section .note.GNU-stack,"",%progbits libffcall-2.5/ffcall-version.in.h0000664000000000000000000000202713347755317013677 00000000000000/* * Copyright 2009-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #if !defined(FFCALL_VERSION_H) /* Version number of libffcall (include files): (major<<8) + minor. */ #define LIBFFCALL_VERSION 0 #ifdef __cplusplus extern "C" { #endif /* Version number of libffcall (library): (major<<8) + minor. */ extern int ffcall_get_version (void); #ifdef __cplusplus } #endif #endif /* FFCALL_VERSION_H */ libffcall-2.5/NEWS0000664000000000000000000001773214665333523010712 00000000000000New in 2.5: * Added support for the following platforms: (Previously, a build on these platforms failed.) - loongarch64: Linux with lp64d ABI. - riscv64: Linux with musl libc. - hppa: Linux. - powerpc: FreeBSD, NetBSD. - powerpc64: FreeBSD. - powerpc64le: FreeBSD. - arm: Android. * Fixed support for the following platforms: (Previously, a build on these platforms appeared to succeed but was buggy.) - ia64: Linux. - arm64: OpenBSD. * Simplified the environmental requirements (the library no longer allocates a temporary file in /tmp) on the following platforms: - Linux. - macOS. - FreeBSD 13 and newer. - NetBSD 8 and newer. New in 2.4: * Added support for the following platforms: (Previously, a build on these platforms failed.) - arm64: macOS 11. - arm: FreeBSD 12. - sparc: Solaris 11 32-bit. New in 2.3: * Added support for the following platforms: (Previously, a build on these platforms failed.) - x86_64: FreeBSD 13, OpenBSD 6.5 and newer. - powerpc64: AIX 7 with xlclang compiler. * Fixed a couple of multithread-safety bugs in the trampoline and callback packages. New in 2.2: * Added support for the following platforms: (Previously, a build on these platforms failed.) - armv6 (Raspberry Pi): Linux. - hppa: Linux 32-bit. - riscv32: Linux with ilp32d ABI. - riscv64: Linux with lp64d ABI. * The build for the mips 32-bit ABI is now compatible with toolchains for the 'fpxx' ABI variant. The downside is that the mips1 architecture is no longer supported. * Fixed a bug regarding passing of more than 8 arguments on the following platforms: - arm64: Linux 64-bit. * Fixed a stack corruption bug on the following platforms: - hppa: HP-UX 32-bit. New in 2.1: * Added support for the following platforms: (Previously, a build on these platforms failed.) - arm: Linux with PIE-enabled gcc. - x86_64: Solaris 11.3. - OpenBSD 6.1. - HardenedBSD 10 and 11. * Fixed a bug regarding passing of pointers on the following platforms: - x86_64: Linux with x32 ABI: CC="gcc -mx32". * Fixed a crash in trampoline on the following platforms: - mips: Linux with CC="gcc -mabi=64", little endian. New in 2.0: * The package now installs a library libffcall.{a,so}. It contains the 'avcall' and 'callback' packages. The libraries libavcall.{a,so} and libcallback.{a,so} are still installed as well, but are deprecated. * The installed libraries are now installed as shared libraries by default (except for libvacall, which is still a static library only). * The installed shared libraries are now properly versioned. This means that when installing with --enable-shared, upgrading to a newer version of libffcall will not break existing binaries. * The installed include files are now platform independent. This means that you can now install libffcall for different ABIs on the same system, using the same --prefix option but different --exec-prefix options for each ABI. * API changes in : - The second argument of alloc_trampoline() is now a 'void**', rather than a 'void*'. - The return value of trampoline_variable() is now a 'void**', rather than a 'void*'. - The argument of trampoline_address(), trampoline_variable(), trampoline_data() is now a function pointer instead of a 'void*'. * API changes in : - The argument of callback_address(), callback_data() is now a function pointer instead of a 'void*'. * Fixed a bug regarding floating-point arguments followed by non-floating-point arguments on the following platforms: - arm: Linux 32-bit, with hardware floats. - powerpc: Linux 32-bit. - s390: Linux. * Fixed a bug regarding structure returns on the following platforms: - i386: FreeBSD. - i386: MinGW. - mips: old 32-bit ABI (Linux, IRIX). * Added support for the following platforms: (Previously, a build on these platforms failed.) - i386: MSVC 14. - x86_64: Cygwin. - x86_64: MinGW. - x86_64: MSVC 14. - hppa64: HP-UX 11. - m68k: Linux. * Verified support for the following platforms: (A build on these platforms worked and still works.) - i386: FreeBSD, NetBSD, OpenBSD, DragonFly BSD. - i386: Hurd. - x86_64: FreeBSD, NetBSD, OpenBSD. New in 1.13: * The license has been changed from GPLv2 to GPLv2+. * Added support for the following platforms: (Previously, a build on these platforms failed.) - x86_64: Mac OS X 64-bit. - x86_64: Solaris 64-bit. - x86_64: Linux with x32 ABI: CC="gcc -mx32". - arm: Linux 32-bit, without hardware floats. - arm64: Linux 64-bit. - s390x: Linux 64-bit. - powerpc: AIX 64-bit. - mips: IRIX 6.5 with CC="cc -32". - sparc: Solaris 64-bit. * Fixed support for the following platforms: (Previously, a build on these platforms appeared to succeed but was buggy.) - x86_64: Linux. - arm: Linux 32-bit, with hardware floats. - powerpc: Linux 64-bit. - mips: Linux with CC="gcc -mabi=32". - mips: Linux with CC="gcc -mabi=n32". - mips: Linux with CC="gcc -mabi=64". - mips: IRIX 6.5 with CC="gcc -mabi=n32". - s390: Linux. - sparc: Linux 64-bit. - ia64: Linux. - hppa: HP-UX 32-bit. * Verified support for the following platforms: (A build on these platforms worked and still works.) - i386: Linux, Solaris, Mac OS X. - powerpc: Linux 32-bit. - powerpc: AIX 32-bit. - powerpc: MacOS X. - mips: IRIX 6.5 with CC="cc -n32". - sparc: Solaris 32-bit. - sparc: Linux 32-bit: CC="gcc -m32". - alpha: Linux. * Support for a security feature: On Linux and FreeBSD platforms, linking with the libffcall libraries no longer causes the stack to become executable. New in 1.12: * Added ppc64le to the list of supported architectures. New in 1.11: * Header now define LIBFFCALL_VERSION (to 0x010B). * Better support for IA64 on Linux (kernel 2.6.16+ and gcc 4.1.0+). * Added ARM support from Jonathan Olson (debian 1.10-2). * Added MIPSel support from Thiemo Seufer (debian 1.10-2). * Added ARMel support from Max Lapan. New in 1.10: * Added support for PowerPC NetBSD. New in 1.9: * Added support for x86_64 (AMD64) Linux. * Added support for PowerPC MacOS X. New in 1.8: * Added support for IA64 Linux. New in 1.7: * Struct types containing elements other than int, long, long long, pointer are not supported any more. Passing them as arguments and results is too hairy. * Added support for PowerPC Linux. New in 1.6: * The avcall and callback packages are compiled as position-independent code, if CC="gcc -fPIC". * The avcall and callback packages are built as shared libraries, if the option "--enable-shared" is passed to configure. * The package can now be built with CC="gcc -x c++". * Improved RS6000/PowerPC support. * Improved support for gcc on Irix6 (-n32 ABI). * Added preliminary support for 64-bit SPARC. New in 1.5: * Added support for m68k Linux. New in 1.4: * Added support for the two new ABIs on Irix6 (-n32, -64). * A fix for DEC Alpha. New in 1.3.1: * Added support for Mingw32 on Win32. * Fixed a compilation problem in trampoline on m68k NetBSD. * Fixed an installation problem with clisp: When configured outside the source directory, callback.h would not be copied into the build directory. New in 1.3: * Added the callback package, a reentrant combination of vacall and trampoline. * The avcall and callback packages are multithread-safe. * Fixed bugs in trampoline on hppa and rs6000. * On hppa, added support for gcc-2.7.2, although its calling convention is different from gcc-2.6.3. New in 1.2.1: * Added support for MSVC5 on Win32. New in 1.2: * Support passing/returning values of type ‘long long’ and ‘unsigned long long’ on platforms which have these types. * Support for "stdcall" calling convention on i386. * Added support for Cygwin32 and MSVC4 on Win32. * Added support for EMX on OS/2. * Added support for m68k AmigaOS (Jörg Höhle). * Added support for m68k SunOS 4.0.3. * More reliable cache-flushing in trampoline. New in 1.1: * Added support for SUNWspro cc on Sparc Solaris. * Added support for AIX 4. * Added preliminary support for 64-bit MIPS. libffcall-2.5/README0000664000000000000000000000773714242541312011063 00000000000000libffcall - foreign function call libraries This is a library which can be used to build foreign function call interfaces in embedded interpreters. Installed libraries and header files: It installs a library libffcall.{a,so}; to link with it, use the compiler option '-lffcall'. It consists of two parts: * avcall - calling C functions with variable arguments. Its include file is . * callback - closures with variable arguments as first-class C functions. Its include file is . Additionally, you can determine the libffcall version by including . For backward compatibility with versions 1.x, libraries libavcall.{a,so} and libcallback.{a,so} are installed as well. But they are deprecated; use libffcall.{a,so} instead. Installation instructions: mkdir builddir cd builddir ../configure --cache-file=config.cache make make check make install Files in this package: Documentation: README this text COPYING free software license PLATFORMS list of supported platforms GNU Project: JOIN-GNU invitation to join the GNU project Source: avcall/* the avcall package (compiled into libffcall) vacall/* the vacall package Implements C functions accepting variable argument prototypes. This is a non-reentrant variant of part of 'callback'. *Not* compiled into libffcall. trampoline/* the trampoline package Implements closures as first-class C functions. This is a non-reentrant variant of part of 'callback'. *Not* compiled into libffcall. callback/* the callback package (compiled into libffcall) Building: configure configuration script configure.ac autoconf source for the configuration script m4/* auxiliary configuration scripts Makefile.in Makefile master Copyright notice: Copyright 1993-1995 Bill Triggs (original avcall) Copyright 1995-2021 Bruno Haible (everything) Copyright 1997 Jörg Höhle (m68k AmigaOS support) Copyright 2000 Adam Fedor (PowerPC MacOS support) Copyright 2001-2012 Sam Steingold (build infrastructure) Copyright 2001-2002 Gerhard Tonn (s390 support) Copyright 2004 Paul Guyot (PowerPC MacOS support) Copyright 2005 Thiemo Seufer (MIPS EL support) Copyright 2009 Max Lapan (ARM EL support) Copyright 2010 Valery Ushakov (SPARC64 improvements) This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . Distribution: git: $ git clone git://git.savannah.gnu.org/libffcall.git See https://savannah.gnu.org/git/?group=libffcall for more info. Bug reports: Report bugs - in the bug tracker at - or by email to . Homepage: https://www.gnu.org/software/libffcall/ libffcall-2.5/README-hacking0000664000000000000000000000465614265011573012470 00000000000000All you need to know when hacking (modifying) GNU libffcall or when building it off the git repository. Requirements ============ You will need reasonably recent versions of the build tools: * A C compiler. Such as GNU GCC. + Homepage: https://gcc.gnu.org/ * GNU automake 1.15 or newer + Homepage: https://www.gnu.org/software/automake/ * GNU autoconf 2.69 or newer + Homepage: https://www.gnu.org/software/autoconf/ * GNU m4 + Homepage: https://www.gnu.org/software/m4/ * GNU groff 1.17 or newer + Homepage: https://www.gnu.org/software/groff/ * Either an internet connection or a recent copy of GNU gnulib. + Homepage: https://www.gnu.org/software/gnulib/ * GNU tar (for creating distributable tarballs) + Homepage: https://www.gnu.org/software/tar/ And, of course, the packages listed in the DEPENDENCIES file. Cross-compilation tools ======================= The Makefile.devel has rules to regenerate some *.s and *.S files, using GCC cross-compiler builds. You find a table of these cross-compilers in the file cross-tools/cross.conf. To build all these cross-compilers, use the file cross-tools/cross-build.sh. See the comments at the top of cross-tools/cross-build.sh for how to use it. When done, copy the generated 'cross' script into your $PATH so that Makefile.devel will find it. Alternatively, if you are running Linux/x86_64, you can use a premade Docker image that contains these cross-compilers. The command to fetch and use it is: docker run --rm -t -i registry.gitlab.com/gnu-libffcall/ci-buildtools:ubuntu1604 Building off the git repository =============================== Access to the git repository is described at https://savannah.gnu.org/git/?group=libffcall After fetching the sources from the repository: 1. Create the cross-compilation tools, as described above. 2. Regenerate the *.s and *.S files, by running make -f Makefile.devel 3. Run ./autopull.sh ./autogen.sh 4. Then you can proceed with ./configure as usual. Each time you want to update the source, do not only "git pull". Instead do git pull && ./autopull.sh ./autogen.sh Continuous integration ====================== The package is built automatically, at regular intervals. You find the latest build results here: https://gitlab.com/gnu-libffcall/ci-distcheck/pipelines https://gitlab.com/gnu-libffcall/ci-distcheck/-/jobs?scope=finished libffcall-2.5/testcases.c0000664000000000000000000006202514060776405012347 00000000000000/* * Copyright 1993 Bill Triggs * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* This file defines test functions of selected signatures, that exercise dark corners of the various ABIs. */ #include FILE* out; #define uchar unsigned char #define ushort unsigned short #define uint unsigned int #define ulong unsigned long typedef struct { char x; } Char; typedef struct { short x; } Short; typedef struct { int x; } Int; typedef struct { long x; } Long; typedef struct { float x; } Float; typedef struct { double x; } Double; typedef struct { char c; float f; } A; typedef struct { double d; int i[3]; } B; typedef struct { long l1; long l2; } J; typedef struct { long l1; long l2; long l3; long l4; } K; typedef struct { long l1; long l2; long l3; long l4; long l5; long l6; } L; typedef struct { char x1; } Size1; typedef struct { char x1; char x2; } Size2; typedef struct { char x1; char x2; char x3; } Size3; typedef struct { char x1; char x2; char x3; char x4; } Size4; typedef struct { char x1; char x2; char x3; char x4; char x5; char x6; char x7; } Size7; typedef struct { char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8; } Size8; typedef struct { char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8; char x9; char x10; char x11; char x12; } Size12; typedef struct { char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8; char x9; char x10; char x11; char x12; char x13; char x14; char x15; } Size15; typedef struct { char x1; char x2; char x3; char x4; char x5; char x6; char x7; char x8; char x9; char x10; char x11; char x12; char x13; char x14; char x15; char x16; } Size16; typedef struct { char c[3]; } T; typedef struct { char c[33],c1; } X; char c1='a', c2=127, c3=(char)128, c4=(char)255, c5=-1; short s1=32767, s2=(short)32768, s3=3, s4=4, s5=5, s6=6, s7=7, s8=8, s9=9; int i1=1, i2=2, i3=3, i4=4, i5=5, i6=6, i7=7, i8=8, i9=9, i10=11, i11=12, i12=13, i13=14, i14=15, i15=16, i16=17, i17=18, i18=19, i19=20, i20=21, i21=22, i22=23, i23=24, i24=25, i25=26, i26=27, i27=28, i28=29, i29=30, i30=31, i31=32, i32=33; long l1=1, l2=2, l3=3, l4=4, l5=5, l6=6, l7=7, l8=8, l9=9; long long ll1 = 3875056143130689530LL; float f1=0.1, f2=0.2, f3=0.3, f4=0.4, f5=0.5, f6=0.6, f7=0.7, f8=0.8, f9=0.9, f10=1.1, f11=1.2, f12=1.3, f13=1.4, f14=1.5, f15=1.6, f16=1.7, f17=1.8, f18=1.9, f19=2.1, f20=2.2, f21=2.3, f22=2.4, f23=2.5, f24=2.6; double d1=0.1, d2=0.2, d3=0.3, d4=0.4, d5=0.5, d6=0.6, d7=0.7, d8=0.8, d9=0.9, d10=1.1, d11=1.2, d12=1.3, d13=1.4, d14=1.5, d15=1.6, d16=1.7, d17=1.8; uchar uc1='a', uc2=127, uc3=128, uc4=255, uc5=(uchar)-1; ushort us1=1, us2=2, us3=3, us4=4, us5=5, us6=6, us7=7, us8=8, us9=9; uint ui1=1, ui2=2, ui3=3, ui4=4, ui5=5, ui6=6, ui7=7, ui8=8, ui9=9; ulong ul1=1, ul2=2, ul3=3, ul4=4, ul5=5, ul6=6, ul7=7, ul8=8, ul9=9; char *str1="hello",str2[]="goodbye",*str3="still here?"; Char C1={'A'}, C2={'B'}, C3={'C'}, C4={'\377'}, C5={(char)(-1)}; Short S1={1}, S2={2}, S3={3}, S4={4}, S5={5}, S6={6}, S7={7}, S8={8}, S9={9}; Int I1={1}, I2={2}, I3={3}, I4={4}, I5={5}, I6={6}, I7={7}, I8={8}, I9={9}; Float F1={0.1}, F2={0.2}, F3={0.3}, F4={0.4}, F5={0.5}, F6={0.6}, F7={0.7}, F8={0.8}, F9={0.9}; Double D1={0.1}, D2={0.2}, D3={0.3}, D4={0.4}, D5={0.5}, D6={0.6}, D7={0.7}, D8={0.8}, D9={0.9}; A A1={'a',0.1},A2={'b',0.2},A3={'\377',0.3}; B B1={0.1,{1,2,3}},B2={0.2,{5,4,3}}; J J1={47,11},J2={73,55}; K K1={19,69,12,28}; L L1={561,1105,1729,2465,2821,6601}; /* A002997 */ Size1 Size1_1={'a'}; Size2 Size2_1={'a','b'}; Size3 Size3_1={'a','b','c'}; Size4 Size4_1={'a','b','c','d'}; Size7 Size7_1={'a','b','c','d','e','f','g'}; Size8 Size8_1={'a','b','c','d','e','f','g','h'}; Size12 Size12_1={'a','b','c','d','e','f','g','h','i','j','k','l'}; Size15 Size15_1={'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o'}; Size16 Size16_1={'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p'}; T T1={'t','h','e'},T2={'f','o','x'}; X X1={"abcdefghijklmnopqrstuvwxyzABCDEF",'G'}, X2={"123",'9'}, X3={"return-return-return",'R'}; /* void tests */ void v_v (void) { fprintf(out,"void f(void):\n"); fflush(out); } /* int tests */ int i_v (void) { int r=99; fprintf(out,"int f(void):"); fflush(out); return r; } int i_i (int a) { int r=a+1; fprintf(out,"int f(int):(%d)",a); fflush(out); return r; } int i_i2 (int a, int b) { int r=a+b; fprintf(out,"int f(2*int):(%d,%d)",a,b); fflush(out); return r; } int i_i4 (int a, int b, int c, int d) { int r=a+b+c+d; fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d); fflush(out); return r; } int i_i8 (int a, int b, int c, int d, int e, int f, int g, int h) { int r=a+b+c+d+e+f+g+h; fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h); fflush(out); return r; } int i_i16 (int a, int b, int c, int d, int e, int f, int g, int h, int i, int j, int k, int l, int m, int n, int o, int p) { int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); return r; } int i_i32 (int a, int b, int c, int d, int e, int f, int g, int h, int i, int j, int k, int l, int m, int n, int o, int p, int aa, int ab, int ac, int ad, int ae, int af, int ag, int ah, int ai, int aj, int ak, int al, int am, int an, int ao, int ap) { int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap; fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap); fflush(out); return r; } /* float tests */ float f_f (float a) { float r=a+1.0; fprintf(out,"float f(float):(%g)",a); fflush(out); return r; } float f_f2 (float a, float b) { float r=a+b; fprintf(out,"float f(2*float):(%g,%g)",a,b); fflush(out); return r; } float f_f4 (float a, float b, float c, float d) { float r=a+b+c+d; fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d); fflush(out); return r; } float f_f8 (float a, float b, float c, float d, float e, float f, float g, float h) { float r=a+b+c+d+e+f+g+h; fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); return r; } float f_f16 (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p) { float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); return r; } float f_f24 (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p, float q, float s, float t, float u, float v, float w, float x, float y) { float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y; fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y); fflush(out); return r; } /* double tests */ double d_d (double a) { double r=a+1.0; fprintf(out,"double f(double):(%g)",a); fflush(out); return r; } double d_d2 (double a, double b) { double r=a+b; fprintf(out,"double f(2*double):(%g,%g)",a,b); fflush(out); return r; } double d_d4 (double a, double b, double c, double d) { double r=a+b+c+d; fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d); fflush(out); return r; } double d_d8 (double a, double b, double c, double d, double e, double f, double g, double h) { double r=a+b+c+d+e+f+g+h; fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); return r; } double d_d16 (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, double n, double o, double p) { double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); return r; } /* pointer tests */ void* vp_vpdpcpsp (void* a, double* b, char* c, Int* d) { void* ret = (char*)b + 1; fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d); fflush(out); return ret; } /* mixed number tests */ uchar uc_ucsil (uchar a, ushort b, uint c, ulong d) { uchar r = (uchar)-1; fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d); fflush(out); return r; } double d_iidd (int a, int b, double c, double d) { double r = a+b+c+d; fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d); fflush(out); return r; } double d_iiidi (int a, int b, int c, double d, int e) { double r = a+b+c+d+e; fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e); fflush(out); return r; } double d_idid (int a, double b, int c, double d) { double r = a+b+c+d; fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d); fflush(out); return r; } double d_fdi (float a, double b, int c) { double r = a+b+c; fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c); fflush(out); return r; } ushort us_cdcd (char a, double b, char c, double d) { ushort r = (ushort)(int)(a + b + c + d); fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d); fflush(out); return r; } long long ll_iiilli (int a, int b, int c, long long d, int e) { long long r = (long long)(int)a+(long long)(int)b+(long long)(int)c+d+(long long)(int)e; fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e); fflush(out); return r; } long long ll_flli (float a, long long b, int c) { long long r = (long long)(int)a + b + (long long)c; fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c); fflush(out); return r; } float f_fi (float a, int z) { float r = a+z; fprintf(out,"float f(float,int):(%g,%d)",a,z); fflush(out); return r; } float f_f2i (float a, float b, int z) { float r = a+b+z; fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z); fflush(out); return r; } float f_f3i (float a, float b, float c, int z) { float r = a+b+c+z; fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); return r; } float f_f4i (float a, float b, float c, float d, int z) { float r = a+b+c+d+z; fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); return r; } float f_f7i (float a, float b, float c, float d, float e, float f, float g, int z) { float r = a+b+c+d+e+f+g+z; fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); return r; } float f_f8i (float a, float b, float c, float d, float e, float f, float g, float h, int z) { float r = a+b+c+d+e+f+g+h+z; fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); return r; } float f_f12i (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, int z) { float r = a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); return r; } float f_f13i (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, int z) { float r = a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); return r; } double d_di (double a, int z) { double r = a+z; fprintf(out,"double f(double,int):(%g,%d)",a,z); fflush(out); return r; } double d_d2i (double a, double b, int z) { double r = a+b+z; fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z); fflush(out); return r; } double d_d3i (double a, double b, double c, int z) { double r = a+b+c+z; fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); return r; } double d_d4i (double a, double b, double c, double d, int z) { double r = a+b+c+d+z; fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); return r; } double d_d7i (double a, double b, double c, double d, double e, double f, double g, int z) { double r = a+b+c+d+e+f+g+z; fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); return r; } double d_d8i (double a, double b, double c, double d, double e, double f, double g, double h, int z) { double r = a+b+c+d+e+f+g+h+z; fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); return r; } double d_d12i (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, int z) { double r = a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); return r; } double d_d13i (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, int z) { double r = a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); return r; } /* small structure return tests */ Size1 S1_v (void) { fprintf(out,"Size1 f(void):"); fflush(out); return Size1_1; } Size2 S2_v (void) { fprintf(out,"Size2 f(void):"); fflush(out); return Size2_1; } Size3 S3_v (void) { fprintf(out,"Size3 f(void):"); fflush(out); return Size3_1; } Size4 S4_v (void) { fprintf(out,"Size4 f(void):"); fflush(out); return Size4_1; } Size7 S7_v (void) { fprintf(out,"Size7 f(void):"); fflush(out); return Size7_1; } Size8 S8_v (void) { fprintf(out,"Size8 f(void):"); fflush(out); return Size8_1; } Size12 S12_v (void) { fprintf(out,"Size12 f(void):"); fflush(out); return Size12_1; } Size15 S15_v (void) { fprintf(out,"Size15 f(void):"); fflush(out); return Size15_1; } Size16 S16_v (void) { fprintf(out,"Size16 f(void):"); fflush(out); return Size16_1; } /* structure tests */ Int I_III (Int a, Int b, Int c) { Int r; r.x = a.x + b.x + c.x; fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x); fflush(out); return r; } Char C_CdC (Char a, double b, Char c) { Char r; r.x = (a.x + c.x)/2; fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x); fflush(out); return r; } Float F_Ffd (Float a, float b, double c) { Float r; r.x = a.x + b + c; fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); return r; } Double D_fDd (float a, Double b, double c) { Double r; r.x = a + b.x + c; fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c); fflush(out); return r; } Double D_Dfd (Double a, float b, double c) { Double r; r.x = a.x + b + c; fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); return r; } J J_JiJ (J a, int b, J c) { J r; r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2; fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2); fflush(out); return r; } T T_TcT (T a, char b, T c) { T r; r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2]; fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]); fflush(out); return r; } X X_BcdB (B a, char b, double c, B d) { static X xr={"return val",'R'}; X r; r = xr; r.c1 = b; fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})", a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]); fflush(out); return r; } /* Test for cases where some argument (especially structure, 'long long', or 'double') may be passed partially in general-purpose argument registers and partially on the stack. Different ABIs pass between 4 and 8 arguments (or none) in general-purpose argument registers. */ long l_l0J (J b, long c) { long r = b.l1 + b.l2 + c; fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c); fflush(out); return r; } long l_l1J (long a1, J b, long c) { long r = a1 + b.l1 + b.l2 + c; fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c); fflush(out); return r; } long l_l2J (long a1, long a2, J b, long c) { long r = a1 + a2 + b.l1 + b.l2 + c; fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c); fflush(out); return r; } long l_l3J (long a1, long a2, long a3, J b, long c) { long r = a1 + a2 + a3 + b.l1 + b.l2 + c; fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c); fflush(out); return r; } long l_l4J (long a1, long a2, long a3, long a4, J b, long c) { long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c; fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c); fflush(out); return r; } long l_l5J (long a1, long a2, long a3, long a4, long a5, J b, long c) { long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c; fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c); fflush(out); return r; } long l_l6J (long a1, long a2, long a3, long a4, long a5, long a6, J b, long c) { long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c; fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c); fflush(out); return r; } long l_l7J (long a1, long a2, long a3, long a4, long a5, long a6, long a7, J b, long c) { long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c; fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c); fflush(out); return r; } long l_l0K (K b, long c) { long r = b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l1K (long a1, K b, long c) { long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l2K (long a1, long a2, K b, long c) { long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l3K (long a1, long a2, long a3, K b, long c) { long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l4K (long a1, long a2, long a3, long a4, K b, long c) { long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l5K (long a1, long a2, long a3, long a4, long a5, K b, long c) { long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } long l_l6K (long a1, long a2, long a3, long a4, long a5, long a6, K b, long c) { long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c); fflush(out); return r; } /* These tests is crafted on the knowledge that for all known ABIs: * 17 > number of floating-point argument registers, * 3 < number of general-purpose argument registers < 3 + 6. */ float f_f17l3L (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p, float q, long s, long t, long u, L z) { float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); return r; } double d_d17l3L (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, double n, double o, double p, double q, long s, long t, long u, L z) { double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); return r; } long long ll_l2ll (long a1, long a2, long long b, long c) { long long r = (long long) (a1 + a2) + b + c; fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } long long ll_l3ll (long a1, long a2, long a3, long long b, long c) { long long r = (long long) (a1 + a2 + a3) + b + c; fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } long long ll_l4ll (long a1, long a2, long a3, long a4, long long b, long c) { long long r = (long long) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } long long ll_l5ll (long a1, long a2, long a3, long a4, long a5, long long b, long c) { long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } long long ll_l6ll (long a1, long a2, long a3, long a4, long a5, long a6, long long b, long c) { long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } long long ll_l7ll (long a1, long a2, long a3, long a4, long a5, long a6, long a7, long long b, long c) { long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); return r; } double d_l2d (long a1, long a2, double b, long c) { double r = (double) (a1 + a2) + b + c; fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c); fflush(out); return r; } double d_l3d (long a1, long a2, long a3, double b, long c) { double r = (double) (a1 + a2 + a3) + b + c; fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c); fflush(out); return r; } double d_l4d (long a1, long a2, long a3, long a4, double b, long c) { double r = (double) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c); fflush(out); return r; } double d_l5d (long a1, long a2, long a3, long a4, long a5, double b, long c) { double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c); fflush(out); return r; } double d_l6d (long a1, long a2, long a3, long a4, long a5, long a6, double b, long c) { double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c); fflush(out); return r; } double d_l7d (long a1, long a2, long a3, long a4, long a5, long a6, long a7, double b, long c) { double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c); fflush(out); return r; } /* This function is used to verify that structs larger than 2 words are really passed by value, not accidentally by reference. */ void v_clobber_K (K k) { k.l1 += 1; k.l2 += 10; k.l3 += 100; k.l4 += 1000; } libffcall-2.5/JOIN-GNU0000664000000000000000000000124014242540734011302 00000000000000Join the GNU Project ==================== GNU libffcall is part of the GNU Operating System, developed by the GNU Project. If you are the author of an awesome program and want to join us in writing Free (libre) Software, please consider making it an official GNU program and become a GNU Maintainer. Instructions on how to do this are here: https://www.gnu.org/help/evaluation We are looking forward to hacking with you! Don't have a program to contribute? Look at all the other ways to help: https://www.gnu.org/help/help.html And to learn more about Free (libre) Software in general, please read and share this page: https://gnu.org/philosophy/free-sw.html libffcall-2.5/configure.ac0000664000000000000000000001566214661170474012501 00000000000000dnl AUTOCONF configuration for LIBFFCALL dnl Copyright 1995-2024 Bruno Haible dnl Copyright 2003-2010 Sam Steingold dnl dnl This program is free software: you can redistribute it and/or modify dnl it under the terms of the GNU General Public License as published by dnl the Free Software Foundation; either version 2 of the License, or dnl (at your option) any later version. dnl dnl This program is distributed in the hope that it will be useful, dnl but WITHOUT ANY WARRANTY; without even the implied warranty of dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the dnl GNU General Public License for more details. dnl dnl You should have received a copy of the GNU General Public License dnl along with this program. If not, see . dnl AC_INIT([GNU libffcall],m4_normalize(m4_esyscmd([cat VERSION])),[https://savannah.gnu.org/projects/libffcall],[libffcall]) AC_CONFIG_AUX_DIR([build-aux]) AC_CONFIG_MACRO_DIRS([m4 gnulib-m4]) AM_INIT_AUTOMAKE([]) AC_CONFIG_SRCDIR([trampoline/trampoline.h]) AC_CONFIG_HEADERS([config.h]) AC_CONFIG_HEADERS([ffcall-version.h:ffcall-version.in.h]) AC_CONFIG_FILES([Makefile]) AC_CONFIG_FILES([gnulib-lib/Makefile]) AC_CONFIG_FILES([avcall/Makefile]) AC_CONFIG_FILES([vacall/Makefile]) AC_CONFIG_FILES([trampoline/Makefile]) AC_CONFIG_FILES([callback/Makefile]) AC_CONFIG_FILES([callback/vacall_r/Makefile]) AC_CONFIG_FILES([callback/trampoline_r/Makefile]) dnl Substitutable version number. changequote(,) sed_extract_major='/^[0-9]/{s/^\([0-9]*\).*/\1/p;q;} i\ 0 q ' sed_extract_minor='/^[0-9][0-9]*[.][0-9]/{s/^[0-9]*[.]\([0-9]*\).*/\1/p;q;} i\ 0 q ' changequote([,]) version_major=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_major"` version_minor=`echo "${PACKAGE_VERSION}" | sed -n -e "$sed_extract_minor"` HEXVERSION=`printf '0x%02X%02X' $version_major $version_minor` AC_DEFINE_UNQUOTED([LIBFFCALL_VERSION], [$HEXVERSION], [Version number: (major<<8) + minor]) AC_PROG_MAKE_SET dnl The libraries are built in C. AC_PROG_CC AC_PROG_CPP CL_CC_GCC CL_AS_UNDERSCORE dnl But some tests use C++. gl_PROG_ANSI_CXX([CXX], [ANSICXX]) if test "$CXX" != no; then IF_CXX='' else IF_CXX='# ' fi AC_SUBST([IF_CXX]) dnl For a 64-bit build on AIX, AC_PROG_RANLIB is not sufficient. gl_PROG_AR_RANLIB dnl The Makefiles have a few special rules for MSVC. AC_EGREP_CPP([MicrosoftCompiler], [ #ifdef _MSC_VER MicrosoftCompiler #endif ], [IF_MSVC='' IFNOT_MSVC='# ' ], [IF_MSVC='# ' IFNOT_MSVC='' ]) AC_SUBST([IF_MSVC]) AC_SUBST([IFNOT_MSVC]) AC_PROG_INSTALL CL_PROG_LN gl_EARLY gl_HOST_CPU_C_ABI if test ${HOST_CPU_C_ABI} = arm -o ${HOST_CPU_C_ABI} = armhf; then dnl On arm, there are two slightly different syntaxes for assembly language: dnl The "divided" syntax (standard since ca. 2000) and the "unified" syntax dnl (supported by GNU binutils since 2009). See dnl https://sourceware.org/binutils/docs/as/ARM_002dInstruction_002dSet.html . dnl Add a suffix, to distinguish dnl platforms which expect the pre-2009 "divided" syntax dnl from dnl platforms which can work with (or even require) the newer "unified" dnl syntax. dnl For example, FreeBSD 12/arm requires the "unified" syntax, since it dnl comes with clang 10 (which doesn't grok old "divided" syntax) and with dnl an old GNU as (which doesn't grok the '.fpu vfpv3-d16' pseudo-op). case "$host_os" in *eabi*) HOST_CPU_C_ABI="${HOST_CPU_C_ABI}-eabi" ;; *) HOST_CPU_C_ABI="${HOST_CPU_C_ABI}-old" ;; esac fi FFCALL_ENDIANNESS PACKAGE=libffcall LT_INIT([win32-dll]) dnl Checks for trampoline, trampoline_r. AC_CHECK_HEADERS([unistd.h]) gl_FUNC_MMAP_ANON FFCALL_CODEEXEC gl_CHECK_FUNCS_ANDROID([setmntent], [[#include #include ]]) dnl List of object files for trampoline, trampoline_r. CPU_OBJECTS='' if test ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64 -o ${HOST_CPU_C_ABI} = ia64; then CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' fi if test ${HOST_CPU_C_ABI} = powerpc; then case "${host_os}" in aix*) CPU_OBJECTS="$CPU_OBJECTS "'tramp-$(CPU).lo' ;; *) ;; esac fi if test ${HOST_CPU_C_ABI} = alpha -o ${HOST_CPU_C_ABI} = hppa -o ${HOST_CPU_C_ABI} = hppa64 -o ${HOST_CPU_C_ABI} = powerpc64-elfv2; then CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' fi if test ${HOST_CPU_C_ABI} = sparc -o ${HOST_CPU_C_ABI} = sparc64; then case "${host_os}" in solaris*) ;; *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;; esac fi if test ${HOST_CPU_C_ABI} = powerpc; then case "${host_os}" in aix*) ;; *) CPU_OBJECTS="$CPU_OBJECTS "'cache-$(CPU).lo' ;; esac fi AC_SUBST([CPU_OBJECTS]) case "${HOST_CPU_C_ABI}" in mips* | riscv*) AC_CHECK_HEADERS([sys/cachectl.h]) ;; esac dnl Work around GCC bug : dnl GCC, configured with --enable-default-pie on SPARC, miscompiles hand-written dnl .s files that happen to access global variables. The recommended workaround dnl is to use '#ifdef __PIC__' in the .s file; this works fine on 64-bit SPARC. dnl On 32-bit SPARC, however, the resulting executable is still broken. The dnl workaround here is to use -fno-pie. This option is available in gcc >= 3.4. WORKAROUND_BUG_81653='' if test ${HOST_CPU_C_ABI} = sparc && test -n "$GCC"; then gcc_version=`LC_ALL=C ${CC} -v 2>&1 | grep version | sed -n -e '$p' | sed -e 's/.*version //g' -e 's/gcc //'` case "$gcc_version" in 2.* | 3.[0-3]*) ;; *) WORKAROUND_BUG_81653='-fno-pie' ;; esac fi AC_SUBST([WORKAROUND_BUG_81653]) dnl Some parts of avcall and vacall need to interpret memory words as 'float' dnl or 'double' entities. This violates the strict type-based aliasing rules dnl of C. In other words, we still use C as a portable assembler, but now the dnl compilers want to outsmart us. There are two ways to tell them not to do dnl this: to use union types, or specific compiler options. I prefer to do it dnl through compiler options, because union types produce trouble with dnl alignments. if test -n "$GCC"; then DISABLE_TYPE_BASED_ALIASING='-fno-strict-aliasing' else case "$host_os" in aix*) dnl for xlc DISABLE_TYPE_BASED_ALIASING='-qalias=noansi' ;; *) AC_EGREP_CPP([yes], [#ifdef __SUNPRO_C yes #endif ], [dnl for SUNWspro cc DISABLE_TYPE_BASED_ALIASING='-xalias_level=weak' ], [DISABLE_TYPE_BASED_ALIASING='']) ;; esac fi AC_SUBST([DISABLE_TYPE_BASED_ALIASING]) gl_INIT dnl This piece of sed script replaces every line containing '@subdir@' dnl by several consecutive lines, each referencing one subdir. extrasub="$extrasub"' /@subdir@/{ h g s/@subdir@/gnulib-lib/g p g s/@subdir@/avcall/g p g s/@subdir@/vacall/g p g s/@subdir@/trampoline/g p g s/@subdir@/callback/g p d } ' dnl Likewise for the callback subdirectory. extrasub="$extrasub"' /@callback_subdir@/{ h g s/@callback_subdir@/vacall_r/g p g s/@callback_subdir@/trampoline_r/g p d } ' AC_OUTPUT libffcall-2.5/INSTALL.windows0000664000000000000000000002563714447301224012727 00000000000000Installation on Microsoft Windows: There are three ways to create binaries of this package for Microsoft Windows: 1) Native binaries, built using the mingw tool chain. 2) Native binaries, built using the MS Visual C/C++ tool chain. 3) Binaries for the Cygwin environment. =============================================================================== 1) Native binaries, built using the mingw tool chain. I recommend to use the Cygwin environment as the development environment (*) and mingw only as the target (runtime, deployment) environment. For this, you need to install * Cygwin (from https://cygwin.com/), * some packages available from the Cygwin package installer: make * the mingw cross-compilation tools and runtime package, available from the Cygwin package installer (setup-x86_64.exe): - for creating 32-bit binaries: packages mingw64-i686-gcc-core, mingw64-i686-gcc-g++, mingw64-i686-headers, mingw64-i686-runtime - for creating 64-bit binaries: packages mingw64-x86_64-gcc-core, mingw64-x86_64-gcc-g++, mingw64-x86_64-headers, mingw64-x86_64-runtime Building 32-bit binaries for mingw is achieved through the following preparation, configure, and build commands: PATH=/usr/local/mingw32/bin:/usr/i686-w64-mingw32/sys-root/mingw/bin:$PATH export PATH ./configure --host=i686-w64-mingw32 --prefix=/usr/local/mingw32 \ CC=i686-w64-mingw32-gcc \ CXX=i686-w64-mingw32-g++ \ CPPFLAGS="-I/usr/local/mingw32/include -Wall" \ LDFLAGS="-L/usr/local/mingw32/lib" make make check Building 64-bit binaries for mingw is achieved through the following preparation, configure, and build commands: PATH=/usr/local/mingw64/bin:/usr/x86_64-w64-mingw32/sys-root/mingw/bin:$PATH export PATH ./configure --host=x86_64-w64-mingw32 --prefix=/usr/local/mingw64 \ CC=x86_64-w64-mingw32-gcc \ CXX=x86_64-w64-mingw32-g++ \ CPPFLAGS="-I/usr/local/mingw64/include -Wall" \ LDFLAGS="-L/usr/local/mingw64/lib" make make check Installation: make install (*) Note: The MSYS2 environment as a development environment is *not* supported. This environment contains an ignoble and ignominious hack: In a program invocation, the program *by default* receives different arguments than the ones that the caller has passed. See . All program invocations in this environment are therefore unreliable. =============================================================================== 2) Native binaries, built using the MS Visual C/C++ tool chain. Note that binaries created with MSVC have a distribution constraint: They depend on a closed-source library ('msvcr90.dll' for MSVC 9.0, 'vcruntime140.dll' for MSVC 14.0, and so on) which is not normally part of a Windows installation. You cannot distribute 'vcruntime*.dll' with the binaries - this would be a violation of the GPL and of the Microsoft EULA. You can distribute the binaries without including 'vcruntime*.dll'. Users who don't have this library on their system will require to pull some files (api-ms-win*.dll) through the Windows Update mechanism, see https://support.microsoft.com/en-us/kb/2999226 . This recipe requires MS Visual C/C++ 9.0 or newer. You don't need the Visual Studio IDE, just the C/C++ tool chain. As of 2016, you can install the MS Visual C/C++ 14.0 tool chain from http://landinghub.visualstudio.com/visual-cpp-build-tools (it's the file visualcppbuildtools_full.exe). This recipe requires also a Cygwin environment (with 'bash', the common POSIX commands, and 'make') as a build environment. Building with 'nmake' is not supported. For this, you need to install * Cygwin (from https://cygwin.com/), * some packages available from the Cygwin package installer: make You also need the scripts 'ar-lib' and 'compile' from https://git.savannah.gnu.org/gitweb/?p=automake.git;a=blob_plain;f=lib/ar-lib;hb=HEAD https://git.savannah.gnu.org/gitweb/?p=automake.git;a=blob_plain;f=lib/compile;hb=HEAD respectively. They may also be included in this package, in directory 'build-aux/'. Save them; the instructions below assume that you stored them in $HOME/msvc/. Make them executable: chmod a+x ar-lib compile Start a bash (from Cygwin). Make sure that the MSVC tools ("cl" etc.) are found in PATH and the environment variables INCLUDE and LIB are set appropriately. In a typical MSVC 9.0 installation, it can be achieved by running C:\Program Files\Microsoft Visual Studio 9.0\Common7\Tools\vsvars32.bat In a typical MSVC 14.0 installation on Windows 10, it can be achieved - for creating 32-bit binaries: through the following bash commands: # Set environment variables for using MSVC 14, # for creating native 32-bit Windows executables. # Windows C library headers and libraries. WindowsCrtIncludeDir='C:\Program Files (x86)\Windows Kits\10\Include\10.0.10240.0\ucrt' WindowsCrtLibDir='C:\Program Files (x86)\Windows Kits\10\Lib\10.0.10240.0\ucrt\' INCLUDE="${WindowsCrtIncludeDir};$INCLUDE" LIB="${WindowsCrtLibDir}x86;$LIB" # Windows API headers and libraries. WindowsSdkIncludeDir='C:\Program Files (x86)\Windows Kits\8.1\Include\' WindowsSdkLibDir='C:\Program Files (x86)\Windows Kits\8.1\Lib\winv6.3\um\' INCLUDE="${WindowsSdkIncludeDir}um;${WindowsSdkIncludeDir}shared;$INCLUDE" LIB="${WindowsSdkLibDir}x86;$LIB" # Visual C++ tools, headers and libraries. VSINSTALLDIR='C:\Program Files (x86)\Microsoft Visual Studio 14.0' VCINSTALLDIR="${VSINSTALLDIR}"'\VC' PATH=`cygpath -u "${VCINSTALLDIR}"`/bin:"$PATH" INCLUDE="${VCINSTALLDIR}"'\include;'"${INCLUDE}" LIB="${VCINSTALLDIR}"'\lib;'"${LIB}" export INCLUDE LIB - for creating 64-bit binaries: through the following bash commands: # Set environment variables for using MSVC 14, # for creating native 64-bit Windows executables. # Windows C library headers and libraries. WindowsCrtIncludeDir='C:\Program Files (x86)\Windows Kits\10\Include\10.0.10240.0\ucrt' WindowsCrtLibDir='C:\Program Files (x86)\Windows Kits\10\Lib\10.0.10240.0\ucrt\' INCLUDE="${WindowsCrtIncludeDir};$INCLUDE" LIB="${WindowsCrtLibDir}x64;$LIB" # Windows API headers and libraries. WindowsSdkIncludeDir='C:\Program Files (x86)\Windows Kits\8.1\Include\' WindowsSdkLibDir='C:\Program Files (x86)\Windows Kits\8.1\Lib\winv6.3\um\' INCLUDE="${WindowsSdkIncludeDir}um;${WindowsSdkIncludeDir}shared;$INCLUDE" LIB="${WindowsSdkLibDir}x64;$LIB" # Visual C++ tools, headers and libraries. VSINSTALLDIR='C:\Program Files (x86)\Microsoft Visual Studio 14.0' VCINSTALLDIR="${VSINSTALLDIR}"'\VC' PATH=`cygpath -u "${VCINSTALLDIR}"`/bin/amd64:"$PATH" INCLUDE="${VCINSTALLDIR}"'\include;'"${INCLUDE}" LIB="${VCINSTALLDIR}"'\lib\amd64;'"${LIB}" export INCLUDE LIB Building 32-bit binaries with MSVC is achieved through the following preparation, configure, and build commands: PATH=/usr/local/msvc32/bin:$PATH export PATH win32_target=_WIN32_WINNT_WINXP # for MSVC 9.0 win32_target=_WIN32_WINNT_VISTA # possibly for MSVC >= 10.0 win32_target=_WIN32_WINNT_WIN7 # possibly for MSVC >= 10.0 win32_target=_WIN32_WINNT_WIN8 # possibly for MSVC >= 10.0 ./configure --host=i686-w64-mingw32 --prefix=/usr/local/msvc32 \ CC="$HOME/msvc/compile cl -nologo" \ CFLAGS="-MD" \ CXX="$HOME/msvc/compile cl -nologo" \ CXXFLAGS="-MD" \ CPPFLAGS="-D_WIN32_WINNT=$win32_target -I/usr/local/msvc32/include" \ LDFLAGS="-L/usr/local/msvc32/lib" \ LD="link" \ NM="dumpbin -symbols" \ STRIP=":" \ AR="$HOME/msvc/ar-lib lib" \ RANLIB=":" make make check Building 64-bit binaries with MSVC is achieved through the following preparation, configure, and build commands: PATH=/usr/local/msvc64/bin:$PATH export PATH win32_target=_WIN32_WINNT_WINXP # for MSVC 9.0 win32_target=_WIN32_WINNT_VISTA # possibly for MSVC >= 10.0 win32_target=_WIN32_WINNT_WIN7 # possibly for MSVC >= 10.0 win32_target=_WIN32_WINNT_WIN8 # possibly for MSVC >= 10.0 ./configure --host=x86_64-w64-mingw32 --prefix=/usr/local/msvc64 \ CC="$HOME/msvc/compile cl -nologo" \ CFLAGS="-MD" \ CXX="$HOME/msvc/compile cl -nologo" \ CXXFLAGS="-MD" \ CPPFLAGS="-D_WIN32_WINNT=$win32_target -I/usr/local/msvc64/include" \ LDFLAGS="-L/usr/local/msvc64/lib" \ LD="link" \ NM="dumpbin -symbols" \ STRIP=":" \ AR="$HOME/msvc/ar-lib lib" \ RANLIB=":" make make check Installation: make install =============================================================================== 3) Binaries for the Cygwin environment. The generic instructions in the INSTALL file apply. But here are more specific ones. You need to install * Cygwin (from https://cygwin.com/), * some packages available from the Cygwin package installer: make * the Cygwin [cross-]compilation tools package, available from the Cygwin package installer (setup-x86_64.exe): - for creating 32-bit binaries: packages cygwin32-gcc-core, cygwin32-gcc-g++, cygwin32 - for creating 64-bit binaries: packages gcc-core, gcc-g++ Building 32-bit binaries for Cygwin must be done in a directory *outside* the Cygwin /home and /usr hierarchies. It is achieved through the following preparation, configure, and build commands: PATH=/usr/local/cygwin32/bin:/usr/i686-pc-cygwin/sys-root/usr/bin:$PATH export PATH ./configure --host=i686-pc-cygwin --prefix=/usr/local/cygwin32 \ CC=i686-pc-cygwin-gcc \ CXX=i686-pc-cygwin-g++ \ CPPFLAGS="-I/usr/local/cygwin32/include -Wall" \ LDFLAGS="-L/usr/local/cygwin32/lib" make make check Building 64-bit binaries for Cygwin is achieved through the following preparation, configure, and build commands: PATH=/usr/local/cygwin64/bin:$PATH export PATH ./configure --host=x86_64-pc-cygwin --prefix=/usr/local/cygwin64 \ CC=x86_64-pc-cygwin-gcc \ CXX=x86_64-pc-cygwin-g++ \ CPPFLAGS="-I/usr/local/cygwin64/include -Wall" \ LDFLAGS="-L/usr/local/cygwin64/lib" make make check Installation: make install =============================================================================== libffcall-2.5/autogen.sh0000775000000000000000000000530614644220441012175 00000000000000#!/bin/sh # Convenience script for regenerating all easily autogeneratable files that are # omitted from the version control repository. In particular, this script # also regenerates all aclocal.m4, config.h.in, configure files with new # versions of autoconf, automake, or libtool. # # This script requires autoconf-2.70..2.72 and automake-1.11..1.17 in the PATH. # Copyright (C) 2016-2024 Bruno Haible. # # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . # Prerequisite (if not used from a released tarball): either # - the GNULIB_SRCDIR environment variable pointing to a gnulib checkout, or # - a preceding invocation of './autopull.sh'. # # Usage: ./autogen.sh [--skip-gnulib] # # Options: # --skip-gnulib Avoid fetching files from Gnulib. # This option is useful # - when you are working from a released tarball (possibly # with modifications), or # - as a speedup, if the set of gnulib modules did not # change since the last time you ran this script. skip_gnulib=false while :; do case "$1" in --skip-gnulib) skip_gnulib=true; shift;; *) break ;; esac done if test $skip_gnulib = false; then if test -n "$GNULIB_SRCDIR"; then test -d "$GNULIB_SRCDIR" || { echo "*** GNULIB_SRCDIR is set but does not point to an existing directory." 1>&2 exit 1 } else GNULIB_SRCDIR=`pwd`/gnulib test -d "$GNULIB_SRCDIR" || { echo "*** Subdirectory 'gnulib' does not yet exist. Use './gitsub.sh pull' to create it, or set the environment variable GNULIB_SRCDIR." 1>&2 exit 1 } fi # Now it should contain a gnulib-tool. GNULIB_TOOL="$GNULIB_SRCDIR/gnulib-tool" test -f "$GNULIB_TOOL" || { echo "*** gnulib-tool not found." 1>&2 exit 1 } make -f Makefile.maint \ gnulib-clean gnulib-m4/gnulib-cache.m4 gnulib-imported-files \ GNULIB_TOOL="$GNULIB_TOOL" fi # Copy files between directories. (cd callback/trampoline_r && make -f Makefile.maint copied-files) make -f Makefile.maint totally-clean all || exit $? echo "$0: done. Now you can run './configure'." libffcall-2.5/aclocal.m40000664000000000000000000014760414665326515012060 00000000000000# generated automatically by aclocal 1.17 -*- Autoconf -*- # Copyright (C) 1996-2024 Free Software Foundation, Inc. # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY, to the extent permitted by law; without # even the implied warranty of MERCHANTABILITY or FITNESS FOR A # PARTICULAR PURPOSE. m4_ifndef([AC_CONFIG_MACRO_DIRS], [m4_defun([_AM_CONFIG_MACRO_DIRS], [])m4_defun([AC_CONFIG_MACRO_DIRS], [_AM_CONFIG_MACRO_DIRS($@)])]) m4_ifndef([AC_AUTOCONF_VERSION], [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.72],, [m4_warning([this file was generated for autoconf 2.72. You have another version of autoconf. It may work, but is not guaranteed to. If you have problems, you may need to regenerate the build system entirely. To do so, use the procedure documented by the package, typically 'autoreconf'.])]) # Copyright (C) 2002-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_AUTOMAKE_VERSION(VERSION) # ---------------------------- # Automake X.Y traces this macro to ensure aclocal.m4 has been # generated from the m4 files accompanying Automake X.Y. # (This private macro should not be called outside this file.) AC_DEFUN([AM_AUTOMAKE_VERSION], [am__api_version='1.17' dnl Some users find AM_AUTOMAKE_VERSION and mistake it for a way to dnl require some minimum version. Point them to the right macro. m4_if([$1], [1.17], [], [AC_FATAL([Do not call $0, use AM_INIT_AUTOMAKE([$1]).])])dnl ]) # _AM_AUTOCONF_VERSION(VERSION) # ----------------------------- # aclocal traces this macro to find the Autoconf version. # This is a private macro too. Using m4_define simplifies # the logic in aclocal, which can simply ignore this definition. m4_define([_AM_AUTOCONF_VERSION], []) # AM_SET_CURRENT_AUTOMAKE_VERSION # ------------------------------- # Call AM_AUTOMAKE_VERSION and AM_AUTOMAKE_VERSION so they can be traced. # This function is AC_REQUIREd by AM_INIT_AUTOMAKE. AC_DEFUN([AM_SET_CURRENT_AUTOMAKE_VERSION], [AM_AUTOMAKE_VERSION([1.17])dnl m4_ifndef([AC_AUTOCONF_VERSION], [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl _AM_AUTOCONF_VERSION(m4_defn([AC_AUTOCONF_VERSION]))]) # AM_AUX_DIR_EXPAND -*- Autoconf -*- # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # For projects using AC_CONFIG_AUX_DIR([foo]), Autoconf sets # $ac_aux_dir to '$srcdir/foo'. In other projects, it is set to # '$srcdir', '$srcdir/..', or '$srcdir/../..'. # # Of course, Automake must honor this variable whenever it calls a # tool from the auxiliary directory. The problem is that $srcdir (and # therefore $ac_aux_dir as well) can be either absolute or relative, # depending on how configure is run. This is pretty annoying, since # it makes $ac_aux_dir quite unusable in subdirectories: in the top # source directory, any form will work fine, but in subdirectories a # relative path needs to be adjusted first. # # $ac_aux_dir/missing # fails when called from a subdirectory if $ac_aux_dir is relative # $top_srcdir/$ac_aux_dir/missing # fails if $ac_aux_dir is absolute, # fails when called from a subdirectory in a VPATH build with # a relative $ac_aux_dir # # The reason of the latter failure is that $top_srcdir and $ac_aux_dir # are both prefixed by $srcdir. In an in-source build this is usually # harmless because $srcdir is '.', but things will broke when you # start a VPATH build or use an absolute $srcdir. # # So we could use something similar to $top_srcdir/$ac_aux_dir/missing, # iff we strip the leading $srcdir from $ac_aux_dir. That would be: # am_aux_dir='\$(top_srcdir)/'`expr "$ac_aux_dir" : "$srcdir//*\(.*\)"` # and then we would define $MISSING as # MISSING="\${SHELL} $am_aux_dir/missing" # This will work as long as MISSING is not called from configure, because # unfortunately $(top_srcdir) has no meaning in configure. # However there are other variables, like CC, which are often used in # configure, and could therefore not use this "fixed" $ac_aux_dir. # # Another solution, used here, is to always expand $ac_aux_dir to an # absolute PATH. The drawback is that using absolute paths prevent a # configured tree to be moved without reconfiguration. AC_DEFUN([AM_AUX_DIR_EXPAND], [AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT])dnl # Expand $ac_aux_dir to an absolute path. am_aux_dir=`cd "$ac_aux_dir" && pwd` ]) # AM_COND_IF -*- Autoconf -*- # Copyright (C) 2008-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_COND_IF # _AM_COND_ELSE # _AM_COND_ENDIF # -------------- # These macros are only used for tracing. m4_define([_AM_COND_IF]) m4_define([_AM_COND_ELSE]) m4_define([_AM_COND_ENDIF]) # AM_COND_IF(COND, [IF-TRUE], [IF-FALSE]) # --------------------------------------- # If the shell condition COND is true, execute IF-TRUE, otherwise execute # IF-FALSE. Allow automake to learn about conditional instantiating macros # (the AC_CONFIG_FOOS). AC_DEFUN([AM_COND_IF], [m4_ifndef([_AM_COND_VALUE_$1], [m4_fatal([$0: no such condition "$1"])])dnl _AM_COND_IF([$1])dnl if test -z "$$1_TRUE"; then : m4_n([$2])[]dnl m4_ifval([$3], [_AM_COND_ELSE([$1])dnl else $3 ])dnl _AM_COND_ENDIF([$1])dnl fi[]dnl ]) # AM_CONDITIONAL -*- Autoconf -*- # Copyright (C) 1997-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_CONDITIONAL(NAME, SHELL-CONDITION) # ------------------------------------- # Define a conditional. AC_DEFUN([AM_CONDITIONAL], [AC_PREREQ([2.52])dnl m4_if([$1], [TRUE], [AC_FATAL([$0: invalid condition: $1])], [$1], [FALSE], [AC_FATAL([$0: invalid condition: $1])])dnl AC_SUBST([$1_TRUE])dnl AC_SUBST([$1_FALSE])dnl _AM_SUBST_NOTMAKE([$1_TRUE])dnl _AM_SUBST_NOTMAKE([$1_FALSE])dnl m4_define([_AM_COND_VALUE_$1], [$2])dnl if $2; then $1_TRUE= $1_FALSE='#' else $1_TRUE='#' $1_FALSE= fi AC_CONFIG_COMMANDS_PRE( [if test -z "${$1_TRUE}" && test -z "${$1_FALSE}"; then AC_MSG_ERROR([[conditional "$1" was never defined. Usually this means the macro was only invoked conditionally.]]) fi])]) # Copyright (C) 1999-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # There are a few dirty hacks below to avoid letting 'AC_PROG_CC' be # written in clear, in which case automake, when reading aclocal.m4, # will think it sees a *use*, and therefore will trigger all it's # C support machinery. Also note that it means that autoscan, seeing # CC etc. in the Makefile, will ask for an AC_PROG_CC use... # _AM_DEPENDENCIES(NAME) # ---------------------- # See how the compiler implements dependency checking. # NAME is "CC", "CXX", "OBJC", "OBJCXX", "UPC", or "GJC". # We try a few techniques and use that to set a single cache variable. # # We don't AC_REQUIRE the corresponding AC_PROG_CC since the latter was # modified to invoke _AM_DEPENDENCIES(CC); we would have a circular # dependency, and given that the user is not expected to run this macro, # just rely on AC_PROG_CC. AC_DEFUN([_AM_DEPENDENCIES], [AC_REQUIRE([AM_SET_DEPDIR])dnl AC_REQUIRE([AM_OUTPUT_DEPENDENCY_COMMANDS])dnl AC_REQUIRE([AM_MAKE_INCLUDE])dnl AC_REQUIRE([AM_DEP_TRACK])dnl m4_if([$1], [CC], [depcc="$CC" am_compiler_list=], [$1], [CXX], [depcc="$CXX" am_compiler_list=], [$1], [OBJC], [depcc="$OBJC" am_compiler_list='gcc3 gcc'], [$1], [OBJCXX], [depcc="$OBJCXX" am_compiler_list='gcc3 gcc'], [$1], [UPC], [depcc="$UPC" am_compiler_list=], [$1], [GCJ], [depcc="$GCJ" am_compiler_list='gcc3 gcc'], [depcc="$$1" am_compiler_list=]) AC_CACHE_CHECK([dependency style of $depcc], [am_cv_$1_dependencies_compiler_type], [if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then # We make a subdir and do the tests there. Otherwise we can end up # making bogus files that we don't know about and never remove. For # instance it was reported that on HP-UX the gcc test will end up # making a dummy file named 'D' -- because '-MD' means "put the output # in D". rm -rf conftest.dir mkdir conftest.dir # Copy depcomp to subdir because otherwise we won't find it if we're # using a relative directory. cp "$am_depcomp" conftest.dir cd conftest.dir # We will build objects and dependencies in a subdirectory because # it helps to detect inapplicable dependency modes. For instance # both Tru64's cc and ICC support -MD to output dependencies as a # side effect of compilation, but ICC will put the dependencies in # the current directory while Tru64 will put them in the object # directory. mkdir sub am_cv_$1_dependencies_compiler_type=none if test "$am_compiler_list" = ""; then am_compiler_list=`sed -n ['s/^#*\([a-zA-Z0-9]*\))$/\1/p'] < ./depcomp` fi am__universal=false m4_case([$1], [CC], [case " $depcc " in #( *\ -arch\ *\ -arch\ *) am__universal=true ;; esac], [CXX], [case " $depcc " in #( *\ -arch\ *\ -arch\ *) am__universal=true ;; esac]) for depmode in $am_compiler_list; do # Setup a source with many dependencies, because some compilers # like to wrap large dependency lists on column 80 (with \), and # we should not choose a depcomp mode which is confused by this. # # We need to recreate these files for each test, as the compiler may # overwrite some of them when testing with obscure command lines. # This happens at least with the AIX C compiler. : > sub/conftest.c for i in 1 2 3 4 5 6; do echo '#include "conftst'$i'.h"' >> sub/conftest.c # Using ": > sub/conftst$i.h" creates only sub/conftst1.h with # Solaris 10 /bin/sh. echo '/* dummy */' > sub/conftst$i.h done echo "${am__include} ${am__quote}sub/conftest.Po${am__quote}" > confmf # We check with '-c' and '-o' for the sake of the "dashmstdout" # mode. It turns out that the SunPro C++ compiler does not properly # handle '-M -o', and we need to detect this. Also, some Intel # versions had trouble with output in subdirs. am__obj=sub/conftest.${OBJEXT-o} am__minus_obj="-o $am__obj" case $depmode in gcc) # This depmode causes a compiler race in universal mode. test "$am__universal" = false || continue ;; nosideeffect) # After this tag, mechanisms are not by side-effect, so they'll # only be used when explicitly requested. if test "x$enable_dependency_tracking" = xyes; then continue else break fi ;; msvc7 | msvc7msys | msvisualcpp | msvcmsys) # This compiler won't grok '-c -o', but also, the minuso test has # not run yet. These depmodes are late enough in the game, and # so weak that their functioning should not be impacted. am__obj=conftest.${OBJEXT-o} am__minus_obj= ;; none) break ;; esac if depmode=$depmode \ source=sub/conftest.c object=$am__obj \ depfile=sub/conftest.Po tmpdepfile=sub/conftest.TPo \ $SHELL ./depcomp $depcc -c $am__minus_obj sub/conftest.c \ >/dev/null 2>conftest.err && grep sub/conftst1.h sub/conftest.Po > /dev/null 2>&1 && grep sub/conftst6.h sub/conftest.Po > /dev/null 2>&1 && grep $am__obj sub/conftest.Po > /dev/null 2>&1 && ${MAKE-make} -s -f confmf > /dev/null 2>&1; then # icc doesn't choke on unknown options, it will just issue warnings # or remarks (even with -Werror). So we grep stderr for any message # that says an option was ignored or not supported. # When given -MP, icc 7.0 and 7.1 complain thus: # icc: Command line warning: ignoring option '-M'; no argument required # The diagnosis changed in icc 8.0: # icc: Command line remark: option '-MP' not supported if (grep 'ignoring option' conftest.err || grep 'not supported' conftest.err) >/dev/null 2>&1; then :; else am_cv_$1_dependencies_compiler_type=$depmode break fi fi done cd .. rm -rf conftest.dir else am_cv_$1_dependencies_compiler_type=none fi ]) AC_SUBST([$1DEPMODE], [depmode=$am_cv_$1_dependencies_compiler_type]) AM_CONDITIONAL([am__fastdep$1], [ test "x$enable_dependency_tracking" != xno \ && test "$am_cv_$1_dependencies_compiler_type" = gcc3]) ]) # AM_SET_DEPDIR # ------------- # Choose a directory name for dependency files. # This macro is AC_REQUIREd in _AM_DEPENDENCIES. AC_DEFUN([AM_SET_DEPDIR], [AC_REQUIRE([AM_SET_LEADING_DOT])dnl AC_SUBST([DEPDIR], ["${am__leading_dot}deps"])dnl ]) # AM_DEP_TRACK # ------------ AC_DEFUN([AM_DEP_TRACK], [AC_ARG_ENABLE([dependency-tracking], [dnl AS_HELP_STRING( [--enable-dependency-tracking], [do not reject slow dependency extractors]) AS_HELP_STRING( [--disable-dependency-tracking], [speeds up one-time build])]) if test "x$enable_dependency_tracking" != xno; then am_depcomp="$ac_aux_dir/depcomp" AMDEPBACKSLASH='\' am__nodep='_no' fi AM_CONDITIONAL([AMDEP], [test "x$enable_dependency_tracking" != xno]) AC_SUBST([AMDEPBACKSLASH])dnl _AM_SUBST_NOTMAKE([AMDEPBACKSLASH])dnl AC_SUBST([am__nodep])dnl _AM_SUBST_NOTMAKE([am__nodep])dnl ]) # Generate code to set up dependency tracking. -*- Autoconf -*- # Copyright (C) 1999-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_OUTPUT_DEPENDENCY_COMMANDS # ------------------------------ AC_DEFUN([_AM_OUTPUT_DEPENDENCY_COMMANDS], [{ # Older Autoconf quotes --file arguments for eval, but not when files # are listed without --file. Let's play safe and only enable the eval # if we detect the quoting. # TODO: see whether this extra hack can be removed once we start # requiring Autoconf 2.70 or later. AS_CASE([$CONFIG_FILES], [*\'*], [eval set x "$CONFIG_FILES"], [*], [set x $CONFIG_FILES]) shift # Used to flag and report bootstrapping failures. am_rc=0 for am_mf do # Strip MF so we end up with the name of the file. am_mf=`AS_ECHO(["$am_mf"]) | sed -e 's/:.*$//'` # Check whether this is an Automake generated Makefile which includes # dependency-tracking related rules and includes. # Grep'ing the whole file directly is not great: AIX grep has a line # limit of 2048, but all sed's we know have understand at least 4000. sed -n 's,^am--depfiles:.*,X,p' "$am_mf" | grep X >/dev/null 2>&1 \ || continue am_dirpart=`AS_DIRNAME(["$am_mf"])` am_filepart=`AS_BASENAME(["$am_mf"])` AM_RUN_LOG([cd "$am_dirpart" \ && sed -e '/# am--include-marker/d' "$am_filepart" \ | $MAKE -f - am--depfiles]) || am_rc=$? done if test $am_rc -ne 0; then AC_MSG_FAILURE([Something went wrong bootstrapping makefile fragments for automatic dependency tracking. If GNU make was not used, consider re-running the configure script with MAKE="gmake" (or whatever is necessary). You can also try re-running configure with the '--disable-dependency-tracking' option to at least be able to build the package (albeit without support for automatic dependency tracking).]) fi AS_UNSET([am_dirpart]) AS_UNSET([am_filepart]) AS_UNSET([am_mf]) AS_UNSET([am_rc]) rm -f conftest-deps.mk } ])# _AM_OUTPUT_DEPENDENCY_COMMANDS # AM_OUTPUT_DEPENDENCY_COMMANDS # ----------------------------- # This macro should only be invoked once -- use via AC_REQUIRE. # # This code is only required when automatic dependency tracking is enabled. # This creates each '.Po' and '.Plo' makefile fragment that we'll need in # order to bootstrap the dependency handling code. AC_DEFUN([AM_OUTPUT_DEPENDENCY_COMMANDS], [AC_CONFIG_COMMANDS([depfiles], [test x"$AMDEP_TRUE" != x"" || _AM_OUTPUT_DEPENDENCY_COMMANDS], [AMDEP_TRUE="$AMDEP_TRUE" MAKE="${MAKE-make}"])]) # Do all the work for Automake. -*- Autoconf -*- # Copyright (C) 1996-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # This macro actually does too much. Some checks are only needed if # your package does certain things. But this isn't really a big deal. dnl Redefine AC_PROG_CC to automatically invoke _AM_PROG_CC_C_O. m4_define([AC_PROG_CC], m4_defn([AC_PROG_CC]) [_AM_PROG_CC_C_O ]) # AM_INIT_AUTOMAKE(PACKAGE, VERSION, [NO-DEFINE]) # AM_INIT_AUTOMAKE([OPTIONS]) # ----------------------------------------------- # The call with PACKAGE and VERSION arguments is the old style # call (pre autoconf-2.50), which is being phased out. PACKAGE # and VERSION should now be passed to AC_INIT and removed from # the call to AM_INIT_AUTOMAKE. # We support both call styles for the transition. After # the next Automake release, Autoconf can make the AC_INIT # arguments mandatory, and then we can depend on a new Autoconf # release and drop the old call support. AC_DEFUN([AM_INIT_AUTOMAKE], [AC_PREREQ([2.65])dnl m4_ifdef([_$0_ALREADY_INIT], [m4_fatal([$0 expanded multiple times ]m4_defn([_$0_ALREADY_INIT]))], [m4_define([_$0_ALREADY_INIT], m4_expansion_stack)])dnl dnl Autoconf wants to disallow AM_ names. We explicitly allow dnl the ones we care about. m4_pattern_allow([^AM_[A-Z]+FLAGS$])dnl AC_REQUIRE([AM_SET_CURRENT_AUTOMAKE_VERSION])dnl AC_REQUIRE([AC_PROG_INSTALL])dnl if test "`cd $srcdir && pwd`" != "`pwd`"; then # Use -I$(srcdir) only when $(srcdir) != ., so that make's output # is not polluted with repeated "-I." AC_SUBST([am__isrc], [' -I$(srcdir)'])_AM_SUBST_NOTMAKE([am__isrc])dnl # test to see if srcdir already configured if test -f $srcdir/config.status; then AC_MSG_ERROR([source directory already configured; run "make distclean" there first]) fi fi # test whether we have cygpath if test -z "$CYGPATH_W"; then if (cygpath --version) >/dev/null 2>/dev/null; then CYGPATH_W='cygpath -w' else CYGPATH_W=echo fi fi AC_SUBST([CYGPATH_W]) # Define the identity of the package. dnl Distinguish between old-style and new-style calls. m4_ifval([$2], [AC_DIAGNOSE([obsolete], [$0: two- and three-arguments forms are deprecated.]) m4_ifval([$3], [_AM_SET_OPTION([no-define])])dnl AC_SUBST([PACKAGE], [$1])dnl AC_SUBST([VERSION], [$2])], [_AM_SET_OPTIONS([$1])dnl dnl Diagnose old-style AC_INIT with new-style AM_AUTOMAKE_INIT. m4_if( m4_ifset([AC_PACKAGE_NAME], [ok]):m4_ifset([AC_PACKAGE_VERSION], [ok]), [ok:ok],, [m4_fatal([AC_INIT should be called with package and version arguments])])dnl AC_SUBST([PACKAGE], ['AC_PACKAGE_TARNAME'])dnl AC_SUBST([VERSION], ['AC_PACKAGE_VERSION'])])dnl _AM_IF_OPTION([no-define],, [AC_DEFINE_UNQUOTED([PACKAGE], ["$PACKAGE"], [Name of package]) AC_DEFINE_UNQUOTED([VERSION], ["$VERSION"], [Version number of package])])dnl # Some tools Automake needs. AC_REQUIRE([AM_SANITY_CHECK])dnl AC_REQUIRE([AC_ARG_PROGRAM])dnl AM_MISSING_PROG([ACLOCAL], [aclocal-${am__api_version}]) AM_MISSING_PROG([AUTOCONF], [autoconf]) AM_MISSING_PROG([AUTOMAKE], [automake-${am__api_version}]) AM_MISSING_PROG([AUTOHEADER], [autoheader]) AM_MISSING_PROG([MAKEINFO], [makeinfo]) AC_REQUIRE([AM_PROG_INSTALL_SH])dnl AC_REQUIRE([AM_PROG_INSTALL_STRIP])dnl AC_REQUIRE([AC_PROG_MKDIR_P])dnl # For better backward compatibility. To be removed once Automake 1.9.x # dies out for good. For more background, see: # # AC_SUBST([mkdir_p], ['$(MKDIR_P)']) # We need awk for the "check" target (and possibly the TAP driver). The # system "awk" is bad on some platforms. AC_REQUIRE([AC_PROG_AWK])dnl AC_REQUIRE([AC_PROG_MAKE_SET])dnl AC_REQUIRE([AM_SET_LEADING_DOT])dnl _AM_IF_OPTION([tar-ustar], [_AM_PROG_TAR([ustar])], [_AM_IF_OPTION([tar-pax], [_AM_PROG_TAR([pax])], [_AM_PROG_TAR([v7])])]) _AM_IF_OPTION([no-dependencies],, [AC_PROVIDE_IFELSE([AC_PROG_CC], [_AM_DEPENDENCIES([CC])], [m4_define([AC_PROG_CC], m4_defn([AC_PROG_CC])[_AM_DEPENDENCIES([CC])])])dnl AC_PROVIDE_IFELSE([AC_PROG_CXX], [_AM_DEPENDENCIES([CXX])], [m4_define([AC_PROG_CXX], m4_defn([AC_PROG_CXX])[_AM_DEPENDENCIES([CXX])])])dnl AC_PROVIDE_IFELSE([AC_PROG_OBJC], [_AM_DEPENDENCIES([OBJC])], [m4_define([AC_PROG_OBJC], m4_defn([AC_PROG_OBJC])[_AM_DEPENDENCIES([OBJC])])])dnl AC_PROVIDE_IFELSE([AC_PROG_OBJCXX], [_AM_DEPENDENCIES([OBJCXX])], [m4_define([AC_PROG_OBJCXX], m4_defn([AC_PROG_OBJCXX])[_AM_DEPENDENCIES([OBJCXX])])])dnl ]) # Variables for tags utilities; see am/tags.am if test -z "$CTAGS"; then CTAGS=ctags fi AC_SUBST([CTAGS]) if test -z "$ETAGS"; then ETAGS=etags fi AC_SUBST([ETAGS]) if test -z "$CSCOPE"; then CSCOPE=cscope fi AC_SUBST([CSCOPE]) AC_REQUIRE([_AM_SILENT_RULES])dnl dnl The testsuite driver may need to know about EXEEXT, so add the dnl 'am__EXEEXT' conditional if _AM_COMPILER_EXEEXT was seen. This dnl macro is hooked onto _AC_COMPILER_EXEEXT early, see below. AC_CONFIG_COMMANDS_PRE(dnl [m4_provide_if([_AM_COMPILER_EXEEXT], [AM_CONDITIONAL([am__EXEEXT], [test -n "$EXEEXT"])])])dnl AC_REQUIRE([_AM_PROG_RM_F]) AC_REQUIRE([_AM_PROG_XARGS_N]) dnl The trailing newline in this macro's definition is deliberate, for dnl backward compatibility and to allow trailing 'dnl'-style comments dnl after the AM_INIT_AUTOMAKE invocation. See automake bug#16841. ]) dnl Hook into '_AC_COMPILER_EXEEXT' early to learn its expansion. Do not dnl add the conditional right here, as _AC_COMPILER_EXEEXT may be further dnl mangled by Autoconf and run in a shell conditional statement. m4_define([_AC_COMPILER_EXEEXT], m4_defn([_AC_COMPILER_EXEEXT])[m4_provide([_AM_COMPILER_EXEEXT])]) # When config.status generates a header, we must update the stamp-h file. # This file resides in the same directory as the config header # that is generated. The stamp files are numbered to have different names. # Autoconf calls _AC_AM_CONFIG_HEADER_HOOK (when defined) in the # loop where config.status creates the headers, so we can generate # our stamp files there. AC_DEFUN([_AC_AM_CONFIG_HEADER_HOOK], [# Compute $1's index in $config_headers. _am_arg=$1 _am_stamp_count=1 for _am_header in $config_headers :; do case $_am_header in $_am_arg | $_am_arg:* ) break ;; * ) _am_stamp_count=`expr $_am_stamp_count + 1` ;; esac done echo "timestamp for $_am_arg" >`AS_DIRNAME(["$_am_arg"])`/stamp-h[]$_am_stamp_count]) # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_PROG_INSTALL_SH # ------------------ # Define $install_sh. AC_DEFUN([AM_PROG_INSTALL_SH], [AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl if test x"${install_sh+set}" != xset; then case $am_aux_dir in *\ * | *\ *) install_sh="\${SHELL} '$am_aux_dir/install-sh'" ;; *) install_sh="\${SHELL} $am_aux_dir/install-sh" esac fi AC_SUBST([install_sh])]) # Copyright (C) 2003-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # Check whether the underlying file-system supports filenames # with a leading dot. For instance MS-DOS doesn't. AC_DEFUN([AM_SET_LEADING_DOT], [rm -rf .tst 2>/dev/null mkdir .tst 2>/dev/null if test -d .tst; then am__leading_dot=. else am__leading_dot=_ fi rmdir .tst 2>/dev/null AC_SUBST([am__leading_dot])]) # Check to see how 'make' treats includes. -*- Autoconf -*- # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_MAKE_INCLUDE() # ----------------- # Check whether make has an 'include' directive that can support all # the idioms we need for our automatic dependency tracking code. AC_DEFUN([AM_MAKE_INCLUDE], [AC_MSG_CHECKING([whether ${MAKE-make} supports the include directive]) cat > confinc.mk << 'END' am__doit: @echo this is the am__doit target >confinc.out .PHONY: am__doit END am__include="#" am__quote= # BSD make does it like this. echo '.include "confinc.mk" # ignored' > confmf.BSD # Other make implementations (GNU, Solaris 10, AIX) do it like this. echo 'include confinc.mk # ignored' > confmf.GNU _am_result=no for s in GNU BSD; do AM_RUN_LOG([${MAKE-make} -f confmf.$s && cat confinc.out]) AS_CASE([$?:`cat confinc.out 2>/dev/null`], ['0:this is the am__doit target'], [AS_CASE([$s], [BSD], [am__include='.include' am__quote='"'], [am__include='include' am__quote=''])]) if test "$am__include" != "#"; then _am_result="yes ($s style)" break fi done rm -f confinc.* confmf.* AC_MSG_RESULT([${_am_result}]) AC_SUBST([am__include])]) AC_SUBST([am__quote])]) # Fake the existence of programs that GNU maintainers use. -*- Autoconf -*- # Copyright (C) 1997-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_MISSING_PROG(NAME, PROGRAM) # ------------------------------ AC_DEFUN([AM_MISSING_PROG], [AC_REQUIRE([AM_MISSING_HAS_RUN]) $1=${$1-"${am_missing_run}$2"} AC_SUBST($1)]) # AM_MISSING_HAS_RUN # ------------------ # Define MISSING if not defined so far and test if it is modern enough. # If it is, set am_missing_run to use it, otherwise, to nothing. AC_DEFUN([AM_MISSING_HAS_RUN], [AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl AC_REQUIRE_AUX_FILE([missing])dnl if test x"${MISSING+set}" != xset; then MISSING="\${SHELL} '$am_aux_dir/missing'" fi # Use eval to expand $SHELL if eval "$MISSING --is-lightweight"; then am_missing_run="$MISSING " else am_missing_run= AC_MSG_WARN(['missing' script is too old or missing]) fi ]) # Helper functions for option handling. -*- Autoconf -*- # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_MANGLE_OPTION(NAME) # ----------------------- AC_DEFUN([_AM_MANGLE_OPTION], [[_AM_OPTION_]m4_bpatsubst($1, [[^a-zA-Z0-9_]], [_])]) # _AM_SET_OPTION(NAME) # -------------------- # Set option NAME. Presently that only means defining a flag for this option. AC_DEFUN([_AM_SET_OPTION], [m4_define(_AM_MANGLE_OPTION([$1]), [1])]) # _AM_SET_OPTIONS(OPTIONS) # ------------------------ # OPTIONS is a space-separated list of Automake options. AC_DEFUN([_AM_SET_OPTIONS], [m4_foreach_w([_AM_Option], [$1], [_AM_SET_OPTION(_AM_Option)])]) # _AM_IF_OPTION(OPTION, IF-SET, [IF-NOT-SET]) # ------------------------------------------- # Execute IF-SET if OPTION is set, IF-NOT-SET otherwise. AC_DEFUN([_AM_IF_OPTION], [m4_ifset(_AM_MANGLE_OPTION([$1]), [$2], [$3])]) # Copyright (C) 1999-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_PROG_CC_C_O # --------------- # Like AC_PROG_CC_C_O, but changed for automake. We rewrite AC_PROG_CC # to automatically call this. AC_DEFUN([_AM_PROG_CC_C_O], [AC_REQUIRE([AM_AUX_DIR_EXPAND])dnl AC_REQUIRE_AUX_FILE([compile])dnl AC_LANG_PUSH([C])dnl AC_CACHE_CHECK( [whether $CC understands -c and -o together], [am_cv_prog_cc_c_o], [AC_LANG_CONFTEST([AC_LANG_PROGRAM([])]) # Make sure it works both with $CC and with simple cc. # Following AC_PROG_CC_C_O, we do the test twice because some # compilers refuse to overwrite an existing .o file with -o, # though they will create one. am_cv_prog_cc_c_o=yes for am_i in 1 2; do if AM_RUN_LOG([$CC -c conftest.$ac_ext -o conftest2.$ac_objext]) \ && test -f conftest2.$ac_objext; then : OK else am_cv_prog_cc_c_o=no break fi done rm -f core conftest* unset am_i]) if test "$am_cv_prog_cc_c_o" != yes; then # Losing compiler, so override with the script. # FIXME: It is wrong to rewrite CC. # But if we don't then we get into trouble of one sort or another. # A longer-term fix would be to have automake use am__CC in this case, # and then we could set am__CC="\$(top_srcdir)/compile \$(CC)" CC="$am_aux_dir/compile $CC" fi AC_LANG_POP([C])]) # For backward compatibility. AC_DEFUN_ONCE([AM_PROG_CC_C_O], [AC_REQUIRE([AC_PROG_CC])]) # Copyright (C) 2022-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_PROG_RM_F # --------------- # Check whether 'rm -f' without any arguments works. # https://bugs.gnu.org/10828 AC_DEFUN([_AM_PROG_RM_F], [am__rm_f_notfound= AS_IF([(rm -f && rm -fr && rm -rf) 2>/dev/null], [], [am__rm_f_notfound='""']) AC_SUBST(am__rm_f_notfound) ]) # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_RUN_LOG(COMMAND) # ------------------- # Run COMMAND, save the exit status in ac_status, and log it. # (This has been adapted from Autoconf's _AC_RUN_LOG macro.) AC_DEFUN([AM_RUN_LOG], [{ echo "$as_me:$LINENO: $1" >&AS_MESSAGE_LOG_FD ($1) >&AS_MESSAGE_LOG_FD 2>&AS_MESSAGE_LOG_FD ac_status=$? echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD (exit $ac_status); }]) # Check to make sure that the build environment is sane. -*- Autoconf -*- # Copyright (C) 1996-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_SLEEP_FRACTIONAL_SECONDS # ---------------------------- AC_DEFUN([_AM_SLEEP_FRACTIONAL_SECONDS], [dnl AC_CACHE_CHECK([whether sleep supports fractional seconds], am_cv_sleep_fractional_seconds, [dnl AS_IF([sleep 0.001 2>/dev/null], [am_cv_sleep_fractional_seconds=yes], [am_cv_sleep_fractional_seconds=no]) ])]) # _AM_FILESYSTEM_TIMESTAMP_RESOLUTION # ----------------------------------- # Determine the filesystem's resolution for file modification # timestamps. The coarsest we know of is FAT, with a resolution # of only two seconds, even with the most recent "exFAT" extensions. # The finest (e.g. ext4 with large inodes, XFS, ZFS) is one # nanosecond, matching clock_gettime. However, it is probably not # possible to delay execution of a shell script for less than one # millisecond, due to process creation overhead and scheduling # granularity, so we don't check for anything finer than that. (See below.) AC_DEFUN([_AM_FILESYSTEM_TIMESTAMP_RESOLUTION], [dnl AC_REQUIRE([_AM_SLEEP_FRACTIONAL_SECONDS]) AC_CACHE_CHECK([filesystem timestamp resolution], am_cv_filesystem_timestamp_resolution, [dnl # Default to the worst case. am_cv_filesystem_timestamp_resolution=2 # Only try to go finer than 1 sec if sleep can do it. # Don't try 1 sec, because if 0.01 sec and 0.1 sec don't work, # - 1 sec is not much of a win compared to 2 sec, and # - it takes 2 seconds to perform the test whether 1 sec works. # # Instead, just use the default 2s on platforms that have 1s resolution, # accept the extra 1s delay when using $sleep in the Automake tests, in # exchange for not incurring the 2s delay for running the test for all # packages. # am_try_resolutions= if test "$am_cv_sleep_fractional_seconds" = yes; then # Even a millisecond often causes a bunch of false positives, # so just try a hundredth of a second. The time saved between .001 and # .01 is not terribly consequential. am_try_resolutions="0.01 0.1 $am_try_resolutions" fi # In order to catch current-generation FAT out, we must *modify* files # that already exist; the *creation* timestamp is finer. Use names # that make ls -t sort them differently when they have equal # timestamps than when they have distinct timestamps, keeping # in mind that ls -t prints the *newest* file first. rm -f conftest.ts? : > conftest.ts1 : > conftest.ts2 : > conftest.ts3 # Make sure ls -t actually works. Do 'set' in a subshell so we don't # clobber the current shell's arguments. (Outer-level square brackets # are removed by m4; they're present so that m4 does not expand # ; be careful, easy to get confused.) if ( set X `[ls -t conftest.ts[12]]` && { test "$[]*" != "X conftest.ts1 conftest.ts2" || test "$[]*" != "X conftest.ts2 conftest.ts1"; } ); then :; else # If neither matched, then we have a broken ls. This can happen # if, for instance, CONFIG_SHELL is bash and it inherits a # broken ls alias from the environment. This has actually # happened. Such a system could not be considered "sane". _AS_ECHO_UNQUOTED( ["Bad output from ls -t: \"`[ls -t conftest.ts[12]]`\""], [AS_MESSAGE_LOG_FD]) AC_MSG_FAILURE([ls -t produces unexpected output. Make sure there is not a broken ls alias in your environment.]) fi for am_try_res in $am_try_resolutions; do # Any one fine-grained sleep might happen to cross the boundary # between two values of a coarser actual resolution, but if we do # two fine-grained sleeps in a row, at least one of them will fall # entirely within a coarse interval. echo alpha > conftest.ts1 sleep $am_try_res echo beta > conftest.ts2 sleep $am_try_res echo gamma > conftest.ts3 # We assume that 'ls -t' will make use of high-resolution # timestamps if the operating system supports them at all. if (set X `ls -t conftest.ts?` && test "$[]2" = conftest.ts3 && test "$[]3" = conftest.ts2 && test "$[]4" = conftest.ts1); then # # Ok, ls -t worked. If we're at a resolution of 1 second, we're done, # because we don't need to test make. make_ok=true if test $am_try_res != 1; then # But if we've succeeded so far with a subsecond resolution, we # have one more thing to check: make. It can happen that # everything else supports the subsecond mtimes, but make doesn't; # notably on macOS, which ships make 3.81 from 2006 (the last one # released under GPLv2). https://bugs.gnu.org/68808 # # We test $MAKE if it is defined in the environment, else "make". # It might get overridden later, but our hope is that in practice # it does not matter: it is the system "make" which is (by far) # the most likely to be broken, whereas if the user overrides it, # probably they did so with a better, or at least not worse, make. # https://lists.gnu.org/archive/html/automake/2024-06/msg00051.html # # Create a Makefile (real tab character here): rm -f conftest.mk echo 'conftest.ts1: conftest.ts2' >conftest.mk echo ' touch conftest.ts2' >>conftest.mk # # Now, running # touch conftest.ts1; touch conftest.ts2; make # should touch ts1 because ts2 is newer. This could happen by luck, # but most often, it will fail if make's support is insufficient. So # test for several consecutive successes. # # (We reuse conftest.ts[12] because we still want to modify existing # files, not create new ones, per above.) n=0 make=${MAKE-make} until test $n -eq 3; do echo one > conftest.ts1 sleep $am_try_res echo two > conftest.ts2 # ts2 should now be newer than ts1 if $make -f conftest.mk | grep 'up to date' >/dev/null; then make_ok=false break # out of $n loop fi n=`expr $n + 1` done fi # if $make_ok; then # Everything we know to check worked out, so call this resolution good. am_cv_filesystem_timestamp_resolution=$am_try_res break # out of $am_try_res loop fi # Otherwise, we'll go on to check the next resolution. fi done rm -f conftest.ts? # (end _am_filesystem_timestamp_resolution) ])]) # AM_SANITY_CHECK # --------------- AC_DEFUN([AM_SANITY_CHECK], [AC_REQUIRE([_AM_FILESYSTEM_TIMESTAMP_RESOLUTION]) # This check should not be cached, as it may vary across builds of # different projects. AC_MSG_CHECKING([whether build environment is sane]) # Reject unsafe characters in $srcdir or the absolute working directory # name. Accept space and tab only in the latter. am_lf=' ' case `pwd` in *[[\\\"\#\$\&\'\`$am_lf]]*) AC_MSG_ERROR([unsafe absolute working directory name]);; esac case $srcdir in *[[\\\"\#\$\&\'\`$am_lf\ \ ]]*) AC_MSG_ERROR([unsafe srcdir value: '$srcdir']);; esac # Do 'set' in a subshell so we don't clobber the current shell's # arguments. Must try -L first in case configure is actually a # symlink; some systems play weird games with the mod time of symlinks # (eg FreeBSD returns the mod time of the symlink's containing # directory). am_build_env_is_sane=no am_has_slept=no rm -f conftest.file for am_try in 1 2; do echo "timestamp, slept: $am_has_slept" > conftest.file if ( set X `ls -Lt "$srcdir/configure" conftest.file 2> /dev/null` if test "$[]*" = "X"; then # -L didn't work. set X `ls -t "$srcdir/configure" conftest.file` fi test "$[]2" = conftest.file ); then am_build_env_is_sane=yes break fi # Just in case. sleep "$am_cv_filesystem_timestamp_resolution" am_has_slept=yes done AC_MSG_RESULT([$am_build_env_is_sane]) if test "$am_build_env_is_sane" = no; then AC_MSG_ERROR([newly created file is older than distributed files! Check your system clock]) fi # If we didn't sleep, we still need to ensure time stamps of config.status and # generated files are strictly newer. am_sleep_pid= AS_IF([test -e conftest.file || grep 'slept: no' conftest.file >/dev/null 2>&1],, [dnl ( sleep "$am_cv_filesystem_timestamp_resolution" ) & am_sleep_pid=$! ]) AC_CONFIG_COMMANDS_PRE( [AC_MSG_CHECKING([that generated files are newer than configure]) if test -n "$am_sleep_pid"; then # Hide warnings about reused PIDs. wait $am_sleep_pid 2>/dev/null fi AC_MSG_RESULT([done])]) rm -f conftest.file ]) # Copyright (C) 2009-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_SILENT_RULES # ---------------- # Enable less verbose build rules support. AC_DEFUN([_AM_SILENT_RULES], [AM_DEFAULT_VERBOSITY=1 AC_ARG_ENABLE([silent-rules], [dnl AS_HELP_STRING( [--enable-silent-rules], [less verbose build output (undo: "make V=1")]) AS_HELP_STRING( [--disable-silent-rules], [verbose build output (undo: "make V=0")])dnl ]) dnl dnl A few 'make' implementations (e.g., NonStop OS and NextStep) dnl do not support nested variable expansions. dnl See automake bug#9928 and bug#10237. am_make=${MAKE-make} AC_CACHE_CHECK([whether $am_make supports nested variables], [am_cv_make_support_nested_variables], [if AS_ECHO([['TRUE=$(BAR$(V)) BAR0=false BAR1=true V=1 am__doit: @$(TRUE) .PHONY: am__doit']]) | $am_make -f - >/dev/null 2>&1; then am_cv_make_support_nested_variables=yes else am_cv_make_support_nested_variables=no fi]) AC_SUBST([AM_V])dnl AM_SUBST_NOTMAKE([AM_V])dnl AC_SUBST([AM_DEFAULT_V])dnl AM_SUBST_NOTMAKE([AM_DEFAULT_V])dnl AC_SUBST([AM_DEFAULT_VERBOSITY])dnl AM_BACKSLASH='\' AC_SUBST([AM_BACKSLASH])dnl _AM_SUBST_NOTMAKE([AM_BACKSLASH])dnl dnl Delay evaluation of AM_DEFAULT_VERBOSITY to the end to allow multiple calls dnl to AM_SILENT_RULES to change the default value. AC_CONFIG_COMMANDS_PRE([dnl case $enable_silent_rules in @%:@ ((( yes) AM_DEFAULT_VERBOSITY=0;; no) AM_DEFAULT_VERBOSITY=1;; esac if test $am_cv_make_support_nested_variables = yes; then dnl Using '$V' instead of '$(V)' breaks IRIX make. AM_V='$(V)' AM_DEFAULT_V='$(AM_DEFAULT_VERBOSITY)' else AM_V=$AM_DEFAULT_VERBOSITY AM_DEFAULT_V=$AM_DEFAULT_VERBOSITY fi ])dnl ]) # AM_SILENT_RULES([DEFAULT]) # -------------------------- # Set the default verbosity level to DEFAULT ("yes" being less verbose, "no" or # empty being verbose). AC_DEFUN([AM_SILENT_RULES], [AC_REQUIRE([_AM_SILENT_RULES]) AM_DEFAULT_VERBOSITY=m4_if([$1], [yes], [0], [1])]) # Copyright (C) 2001-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # AM_PROG_INSTALL_STRIP # --------------------- # One issue with vendor 'install' (even GNU) is that you can't # specify the program used to strip binaries. This is especially # annoying in cross-compiling environments, where the build's strip # is unlikely to handle the host's binaries. # Fortunately install-sh will honor a STRIPPROG variable, so we # always use install-sh in "make install-strip", and initialize # STRIPPROG with the value of the STRIP variable (set by the user). AC_DEFUN([AM_PROG_INSTALL_STRIP], [AC_REQUIRE([AM_PROG_INSTALL_SH])dnl # Installed binaries are usually stripped using 'strip' when the user # run "make install-strip". However 'strip' might not be the right # tool to use in cross-compilation environments, therefore Automake # will honor the 'STRIP' environment variable to overrule this program. dnl Don't test for $cross_compiling = yes, because it might be 'maybe'. if test "$cross_compiling" != no; then AC_CHECK_TOOL([STRIP], [strip], :) fi INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s" AC_SUBST([INSTALL_STRIP_PROGRAM])]) # Copyright (C) 2006-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_SUBST_NOTMAKE(VARIABLE) # --------------------------- # Prevent Automake from outputting VARIABLE = @VARIABLE@ in Makefile.in. # This macro is traced by Automake. AC_DEFUN([_AM_SUBST_NOTMAKE]) # AM_SUBST_NOTMAKE(VARIABLE) # -------------------------- # Public sister of _AM_SUBST_NOTMAKE. AC_DEFUN([AM_SUBST_NOTMAKE], [_AM_SUBST_NOTMAKE($@)]) # Check how to create a tarball. -*- Autoconf -*- # Copyright (C) 2004-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_PROG_TAR(FORMAT) # -------------------- # Check how to create a tarball in format FORMAT. # FORMAT should be one of 'v7', 'ustar', or 'pax'. # # Substitute a variable $(am__tar) that is a command # writing to stdout a FORMAT-tarball containing the directory # $tardir. # tardir=directory && $(am__tar) > result.tar # # Substitute a variable $(am__untar) that extract such # a tarball read from stdin. # $(am__untar) < result.tar # AC_DEFUN([_AM_PROG_TAR], [# Always define AMTAR for backward compatibility. Yes, it's still used # in the wild :-( We should find a proper way to deprecate it ... AC_SUBST([AMTAR], ['$${TAR-tar}']) # We'll loop over all known methods to create a tar archive until one works. _am_tools='gnutar m4_if([$1], [ustar], [plaintar]) pax cpio none' m4_if([$1], [v7], [am__tar='$${TAR-tar} chof - "$$tardir"' am__untar='$${TAR-tar} xf -'], [m4_case([$1], [ustar], [# The POSIX 1988 'ustar' format is defined with fixed-size fields. # There is notably a 21 bits limit for the UID and the GID. In fact, # the 'pax' utility can hang on bigger UID/GID (see automake bug#8343 # and bug#13588). am_max_uid=2097151 # 2^21 - 1 am_max_gid=$am_max_uid # The $UID and $GID variables are not portable, so we need to resort # to the POSIX-mandated id(1) utility. Errors in the 'id' calls # below are definitely unexpected, so allow the users to see them # (that is, avoid stderr redirection). am_uid=`id -u || echo unknown` am_gid=`id -g || echo unknown` AC_MSG_CHECKING([whether UID '$am_uid' is supported by ustar format]) if test x$am_uid = xunknown; then AC_MSG_WARN([ancient id detected; assuming current UID is ok, but dist-ustar might not work]) elif test $am_uid -le $am_max_uid; then AC_MSG_RESULT([yes]) else AC_MSG_RESULT([no]) _am_tools=none fi AC_MSG_CHECKING([whether GID '$am_gid' is supported by ustar format]) if test x$gm_gid = xunknown; then AC_MSG_WARN([ancient id detected; assuming current GID is ok, but dist-ustar might not work]) elif test $am_gid -le $am_max_gid; then AC_MSG_RESULT([yes]) else AC_MSG_RESULT([no]) _am_tools=none fi], [pax], [], [m4_fatal([Unknown tar format])]) AC_MSG_CHECKING([how to create a $1 tar archive]) # Go ahead even if we have the value already cached. We do so because we # need to set the values for the 'am__tar' and 'am__untar' variables. _am_tools=${am_cv_prog_tar_$1-$_am_tools} for _am_tool in $_am_tools; do case $_am_tool in gnutar) for _am_tar in tar gnutar gtar; do AM_RUN_LOG([$_am_tar --version]) && break done am__tar="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$$tardir"' am__tar_="$_am_tar --format=m4_if([$1], [pax], [posix], [$1]) -chf - "'"$tardir"' am__untar="$_am_tar -xf -" ;; plaintar) # Must skip GNU tar: if it does not support --format= it doesn't create # ustar tarball either. (tar --version) >/dev/null 2>&1 && continue am__tar='tar chf - "$$tardir"' am__tar_='tar chf - "$tardir"' am__untar='tar xf -' ;; pax) am__tar='pax -L -x $1 -w "$$tardir"' am__tar_='pax -L -x $1 -w "$tardir"' am__untar='pax -r' ;; cpio) am__tar='find "$$tardir" -print | cpio -o -H $1 -L' am__tar_='find "$tardir" -print | cpio -o -H $1 -L' am__untar='cpio -i -H $1 -d' ;; none) am__tar=false am__tar_=false am__untar=false ;; esac # If the value was cached, stop now. We just wanted to have am__tar # and am__untar set. test -n "${am_cv_prog_tar_$1}" && break # tar/untar a dummy directory, and stop if the command works. rm -rf conftest.dir mkdir conftest.dir echo GrepMe > conftest.dir/file AM_RUN_LOG([tardir=conftest.dir && eval $am__tar_ >conftest.tar]) rm -rf conftest.dir if test -s conftest.tar; then AM_RUN_LOG([$am__untar /dev/null 2>&1 && break fi done rm -rf conftest.dir AC_CACHE_VAL([am_cv_prog_tar_$1], [am_cv_prog_tar_$1=$_am_tool]) AC_MSG_RESULT([$am_cv_prog_tar_$1])]) AC_SUBST([am__tar]) AC_SUBST([am__untar]) ]) # _AM_PROG_TAR # Copyright (C) 2022-2024 Free Software Foundation, Inc. # # This file is free software; the Free Software Foundation # gives unlimited permission to copy and/or distribute it, # with or without modifications, as long as this notice is preserved. # _AM_PROG_XARGS_N # ---------------- # Check whether 'xargs -n' works. It should work everywhere, so the fallback # is not optimized at all as we never expect to use it. AC_DEFUN([_AM_PROG_XARGS_N], [AC_CACHE_CHECK([xargs -n works], am_cv_xargs_n_works, [dnl AS_IF([test "`echo 1 2 3 | xargs -n2 echo`" = "1 2 3"], [am_cv_xargs_n_works=yes], [am_cv_xargs_n_works=no])]) AS_IF([test "$am_cv_xargs_n_works" = yes], [am__xargs_n='xargs -n'], [dnl am__xargs_n='am__xargs_n () { shift; sed "s/ /\\n/g" | while read am__xargs_n_arg; do "$@" "$am__xargs_n_arg"; done; }' ])dnl AC_SUBST(am__xargs_n) ]) m4_include([gnulib-m4/00gnulib.m4]) m4_include([gnulib-m4/absolute-header.m4]) m4_include([gnulib-m4/alloca.m4]) m4_include([gnulib-m4/ansi-c++.m4]) m4_include([gnulib-m4/asm-underscore.m4]) m4_include([gnulib-m4/assert_h.m4]) m4_include([gnulib-m4/atomic-cas.m4]) m4_include([gnulib-m4/c-bool.m4]) m4_include([gnulib-m4/close.m4]) m4_include([gnulib-m4/codeset.m4]) m4_include([gnulib-m4/double-slash-root.m4]) m4_include([gnulib-m4/dup2.m4]) m4_include([gnulib-m4/eealloc.m4]) m4_include([gnulib-m4/errno_h.m4]) m4_include([gnulib-m4/error.m4]) m4_include([gnulib-m4/error_h.m4]) m4_include([gnulib-m4/extensions-aix.m4]) m4_include([gnulib-m4/extensions.m4]) m4_include([gnulib-m4/extern-inline.m4]) m4_include([gnulib-m4/fatal-signal.m4]) m4_include([gnulib-m4/fcntl-o.m4]) m4_include([gnulib-m4/fcntl.m4]) m4_include([gnulib-m4/fcntl_h.m4]) m4_include([gnulib-m4/fstat.m4]) m4_include([gnulib-m4/getdtablesize.m4]) m4_include([gnulib-m4/getpagesize.m4]) m4_include([gnulib-m4/getprogname.m4]) m4_include([gnulib-m4/gnulib-common.m4]) m4_include([gnulib-m4/gnulib-comp.m4]) m4_include([gnulib-m4/hasmntopt.m4]) m4_include([gnulib-m4/host-cpu-c-abi.m4]) m4_include([gnulib-m4/include_next.m4]) m4_include([gnulib-m4/largefile.m4]) m4_include([gnulib-m4/limits-h.m4]) m4_include([gnulib-m4/locale-en.m4]) m4_include([gnulib-m4/lock.m4]) m4_include([gnulib-m4/malloca.m4]) m4_include([gnulib-m4/mntent_h.m4]) m4_include([gnulib-m4/mode_t.m4]) m4_include([gnulib-m4/msvc-inval.m4]) m4_include([gnulib-m4/msvc-nothrow.m4]) m4_include([gnulib-m4/multiarch.m4]) m4_include([gnulib-m4/musl.m4]) m4_include([gnulib-m4/nocrash.m4]) m4_include([gnulib-m4/off64_t.m4]) m4_include([gnulib-m4/off_t.m4]) m4_include([gnulib-m4/once.m4]) m4_include([gnulib-m4/open-cloexec.m4]) m4_include([gnulib-m4/open-slash.m4]) m4_include([gnulib-m4/open.m4]) m4_include([gnulib-m4/pathmax.m4]) m4_include([gnulib-m4/pthread-once.m4]) m4_include([gnulib-m4/pthread-spin.m4]) m4_include([gnulib-m4/pthread_h.m4]) m4_include([gnulib-m4/pthread_rwlock_rdlock.m4]) m4_include([gnulib-m4/raise.m4]) m4_include([gnulib-m4/rmdir.m4]) m4_include([gnulib-m4/sched_h.m4]) m4_include([gnulib-m4/sig_atomic_t.m4]) m4_include([gnulib-m4/sigaction.m4]) m4_include([gnulib-m4/signal_h.m4]) m4_include([gnulib-m4/signalblocking.m4]) m4_include([gnulib-m4/size_max.m4]) m4_include([gnulib-m4/sparcv8+.m4]) m4_include([gnulib-m4/ssize_t.m4]) m4_include([gnulib-m4/stat-time.m4]) m4_include([gnulib-m4/stat.m4]) m4_include([gnulib-m4/stddef_h.m4]) m4_include([gnulib-m4/stdint.m4]) m4_include([gnulib-m4/stdio_h.m4]) m4_include([gnulib-m4/stdlib_h.m4]) m4_include([gnulib-m4/stdnoreturn.m4]) m4_include([gnulib-m4/strerror.m4]) m4_include([gnulib-m4/string_h.m4]) m4_include([gnulib-m4/sys_cdefs_h.m4]) m4_include([gnulib-m4/sys_socket_h.m4]) m4_include([gnulib-m4/sys_stat_h.m4]) m4_include([gnulib-m4/sys_types_h.m4]) m4_include([gnulib-m4/threadlib.m4]) m4_include([gnulib-m4/time_h.m4]) m4_include([gnulib-m4/unistd_h.m4]) m4_include([gnulib-m4/warn-on-use.m4]) m4_include([gnulib-m4/wint_t.m4]) m4_include([gnulib-m4/xsize.m4]) m4_include([gnulib-m4/zzgnulib.m4]) m4_include([m4/as-underscore.m4]) m4_include([m4/cc-gcc.m4]) m4_include([m4/codeexec.m4]) m4_include([m4/endianness.m4]) m4_include([m4/libtool.m4]) m4_include([m4/ln.m4]) m4_include([m4/ltoptions.m4]) m4_include([m4/ltsugar.m4]) m4_include([m4/ltversion.m4]) m4_include([m4/lt~obsolete.m4]) m4_include([m4/mmap-anon.m4]) libffcall-2.5/VERSION0000664000000000000000000000000414665326346011250 000000000000002.5 libffcall-2.5/PLATFORMS0000664000000000000000000000632214171044746011474 00000000000000Supported CPUs: (Put the GNU config.guess values here.) i386 i486-unknown-linux (gcc), i686-unknown-gnu0.9 (gcc), i386-unknown-sysv4.0 (gcc, /usr/bin/cc, /usr/ucb/cc), i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc), i486-unknown-sco3.2v4.2 (gcc, cc -Of), i486-unknown-os2emx (gcc), i386-pc-cygwin32 (gcc), i386-w64-mingw32 (gcc, MSVC 14), i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc), i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc), i586-pc-haiku (gcc-x86), i386-pc-minix (clang) m68k m68k-next-nextstep3 (cc), m68k-sun-sunos4.0 (cc), m68k-unknown-linux (gcc) mips mips-sgi-irix4.0.5 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix5.2 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix5.3 (gcc, cc -ansi, cc -D__STDC__, cc -cckr), mips-sgi-irix6.2 (cc -32), mips-sgi-irix6.4 (cc -32, cc -n32, cc -64), mips-sgi-irix6.5 (cc -32, cc -n32, gcc -mabi=n32), mips-unknown-linux (gcc -mabi=32), mips64-unknown-linux (gcc -mabi=n32, gcc -mabi=64) sparc sparc-sun-sunos4.1.1 (gcc, cc), sparc-sun-solaris2.3 (gcc) sparc-sun-solaris2.4 (gcc, cc), sparc-sun-solaris2.10 (gcc, cc), sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64), sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc), sparc-unknown-netbsdelf7.1 (gcc), sparc64-unknown-netbsd8.0 (gcc) alpha alpha-dec-osf3.0 (gcc, cc), alpha-dec-osf4.0 (gcc, cc), alphaev67-unknown-linux (gcc) hppa hppa1.0-hp-hpux8.00 (gcc, cc), hppa1.1-hp-hpux9.05 (cc), hppa1.1-hp-hpux10.01 (cc), hppa2.0-hp-hpux10.20 (cc +DA1.1), hppa2.0w-hp-hpux11.31 (cc), hppa-unknown-linux (gcc) hppa64 hppa64-hp-hpux11.31 (cc +DD64) arm armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc), armv7l-unknown-linux (gcc) arm64 aarch64-unknown-linux (gcc), aarch64-apple-darwin20.4.0 (cc) powerpc powerpc-ibm-aix4.1.4.0 (cc), powerpc-ibm-aix7.1.3.0 (xlc, gcc), powerpc-unknown-linux (gcc), powerpc-apple-darwin6.8 (gcc), powerpc-apple-darwin9.8.0 (gcc) powerpc64 powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"), powerpc64-unknown-linux (gcc -m64), powerpc64le-unknown-linux (gcc) ia64 ia64-unknown-linux (gcc) x86_64 x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32), x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64), x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14), x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc), x86_64-unknown-openbsd6.0 (gcc) s390 s390x-ibm-linux (gcc -m31) s390x s390x-ibm-linux (gcc) riscv32 riscv32-unknown-linux (gcc -mabi=ilp32d) riscv64 riscv64-unknown-linux (gcc -mabi=lp64d) loongarch64 loongarch64-unknown-linux (gcc) libffcall-2.5/callback/0000775000000000000000000000000014665334232012013 500000000000000libffcall-2.5/callback/minitests-c++.cc0000664000000000000000000000133213347755266014640 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "minitests.c" libffcall-2.5/callback/callback.h0000664000000000000000000000564214660710423013642 00000000000000/* * Copyright 1997-2023 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _CALLBACK_H #define _CALLBACK_H #include "ffcall-version.h" /* Defines the type 'va_alist' and the va_* macros. */ #include "vacall_r.h" #ifdef __cplusplus extern "C" { #endif /* This type denotes an opaque function pointer. You need to cast it to an actual function pointer type (with correct return type) before you can actually invoke it. */ #if defined __cplusplus || __STDC_VERSION__ >= 202300L typedef int (*callback_t) (...); #else typedef int (*callback_t) (); #endif /* A deprecated alias of this type. */ typedef callback_t __TR_function; /* This type denotes a callback implementation. DATA is the pointer that was passed to alloc_callback(). ALIST allows to iterate over the argument list. */ typedef void (*callback_function_t) (void* /* DATA */, va_alist /* ALIST */); /* Allocates a callback. It returns a function pointer whose signature depends on the behaviour of ADDRESS. When invoked, it passes DATA as first argument to ADDRESS and the actual arguments as a va_alist to ADDRESS. It returns the value passed to a va_return_* macro by ADDRESS. The callback has indefinite extent. It can be accessed until a call to free_callback(). */ extern callback_t alloc_callback (callback_function_t /* ADDRESS */, void* /* DATA */); /* Frees the memory used by a callback. CALLBACK must be the result of an alloc_callback() invocation. After this call, CALLBACK must not be used any more - neither invoked, not used as an argument to other functions. */ extern void free_callback (callback_t /* CALLBACK */); /* Tests whether a given pointer is a function pointer returned by alloc_callback(). Returns 1 for yes, 0 for no. If yes, it can be cast to callback_t. */ extern int is_callback (void* /* CALLBACK */); /* Returns the ADDRESS argument passed to the alloc_callback() invocation. CALLBACK must be the result of an alloc_callback() invocation. */ extern callback_function_t callback_address (callback_t /* CALLBACK */); /* Returns the DATA argument passed to the alloc_callback() invocation. CALLBACK must be the result of an alloc_callback() invocation. */ extern void* callback_data (callback_t /* CALLBACK */); #ifdef __cplusplus } #endif #endif /* _CALLBACK_H */ libffcall-2.5/callback/callback.30000664000000000000000000001653413136760230013555 00000000000000.\" Copyright (C) 1995-2017 Bruno Haible .\" .\" This manual is free documentation. It is dually licensed under the .\" GNU FDL and the GNU GPL. This means that you can redistribute this .\" manual under either of these two licenses, at your choice. .\" .\" This manual is covered by the GNU FDL. Permission is granted to copy, .\" distribute and/or modify this document under the terms of the .\" GNU Free Documentation License (FDL), either version 1.2 of the .\" License, or (at your option) any later version published by the .\" Free Software Foundation (FSF); with no Invariant Sections, with no .\" Front-Cover Text, and with no Back-Cover Texts. .\" A copy of the license is at . .\" .\" This manual is covered by the GNU GPL. You can redistribute it and/or .\" modify it under the terms of the GNU General Public License (GPL), either .\" version 2 of the License, or (at your option) any later version published .\" by the Free Software Foundation (FSF). .\" A copy of the license is at . .\" .TH CALLBACK 3 "1 January 2017" .SH NAME callback \- closures with variable arguments as first-class C functions .SH SYNOPSIS .B #include .LP .nf .BI "void " function " (void* " data ", va_alist " alist ")" .BI "{" .BI " va_start_" type "(" alist "[, " return_type "]);" .BI " " arg " = va_arg_" type "(" alist "[, " arg_type "]);" .BI " va_return_" type "(" alist "[[, " return_type "], " return_value "]);" .BI "}" .fi .LP .IB callback " = alloc_callback(" "&function" ", " data ");" .LP .BI "free_callback(" callback ");" .LP .nf .BI "is_callback(" callback ")" .BI "callback_address(" callback ")" .BI "callback_data(" callback ")" .fi .SH DESCRIPTION .LP These functions implement .I closures with variable arguments as first-class C functions. Closures as .I first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. Moreover, they can be called with variable arguments and can return variable return values. .IB callback " = alloc_callback(" "&function" ", " data ")" allocates a callback. When .I callback gets called, it arranges to call .IR function "," passing .I data as first argument and, as second argument, the entire sequence of arguments passed to .IR callback . Function calling conventions differ considerably on different machines, therefore the arguments are accessed and the result value is stored through the same macros as used by the .I vacall package, see below. The callbacks are functions with indefinite extent: .I callback is only deallocated when .BI free_callback( callback ) is called. .BI "is_callback(" callback ")" checks whether the C function .I callback was produced by a call to .IR alloc_callback . If this returns true, the arguments given to .I alloc_callback can be retrieved: .RS 4 .LP .BI "callback_address(" callback ")" returns .IR "&function" , .LP .BI "callback_data(" callback ")" returns .IR data . .RE .SH VACALL MACROS Within .IR function , the following macros can be used to walk through the argument list and specify a return value: .RS 0 .TP .BI "va_start_" type "(" alist "[, " return_type "]);" starts the walk through the argument list and specifies the return type. .TP .IB arg " = va_arg_" type "(" alist "[, " arg_type "]);" fetches the next argument from the argument list. .TP .BI "va_return_" type "(" alist "[[, " return_type "], " return_value "]);" ends the walk through the argument list and specifies the return value. .RE The .I type in .BI va_start_ type and .BI va_return_ type shall be one of .BR void ", " int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr or (for ANSI C calling conventions only) .BR char ", " schar ", " uchar ", " short ", " ushort ", " float , depending on the class of .IR return_type . The .I type specifiers in .BI va_start_ type and .BI va_return_ type must be the same. The .I return_type specifiers passed to .BI va_start_ type and .BI va_return_ type must be the same. The .I type in .BI va_arg_ type shall be one of .BR int ", " uint ", " long ", " ulong ", " longlong ", " ulonglong ", " double ", " struct ", " ptr or (for ANSI C calling conventions only) .BR char ", " schar ", " uchar ", " short ", " ushort ", " float , depending on the class of .IR arg_type . In .BI "va_start_struct(" alist ", " return_type ", " splittable ); the .I splittable flag specifies whether the struct .I return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), .I splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), .I splittable is ignored and assumed to be 0. There are some handy macros for this: .nf .BI "va_word_splittable_1 (" type1 ) .BI "va_word_splittable_2 (" type1 ", " type2 ) .BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 ) .BI "va_word_splittable_4 (" type1 ", " type2 ", " type3 ", " type4 ) .fi For a struct with three slots .nf .BI "struct { " "type1 id1" "; " "type2 id2" "; " "type3 id3" "; }" .fi you can specify .I splittable as .BI "va_word_splittable_3 (" type1 ", " type2 ", " type3 ) .RB . .SH NOTES Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the .I type values .BR char ", " schar ", " uchar ", " short ", " ushort ", " float . As prescribed by the default K&R C expression promotions, they have to use .B int instead of .BR char ", " schar ", " uchar ", " short ", " ushort and .B double instead of .BR float . The macros .BR va_start_longlong(\|) , .BR va_start_ulonglong(\|) , .BR va_return_longlong(\|) , .BR va_return_ulonglong(\|) , .B va_arg_longlong(\|) and .B va_arg_ulonglong(\|) work only if the C compiler has a working .B long long 64-bit integer type. The struct types used in .B va_start_struct(\|) and .B va_struct(\|) must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. .SH SEE ALSO .BR vacall (3), .BR trampoline (3). .SH BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns .B "struct { char a,b,c; }" in registers and .B "struct { char a[3]; }" in memory, although both types have the same size and the same alignment. The argument list can only be walked once. .SH NON-BUGS All information is passed in CPU registers and the stack. The .B callback package is therefore multithread-safe. .SH PORTING Porting .B callback consists in first porting the .B vacall and .B trampoline packages, then choosing a CPU register for passing the closure from .B trampoline to .BR vacall . This register is normally the register designated by STATIC_CHAIN_REGNUM in the gcc source, file .RI gcc-2.7.2/config/ cpu / cpu .h. .SH AUTHOR Bruno Haible .SH ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. libffcall-2.5/callback/Makefile.in0000664000000000000000000002012514665326260014002 00000000000000# Makefile for callback #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": # C compiler CC = @CC@ CFLAGS = @CFLAGS@ CPP = @CPP@ # C++ compiler CXX = @CXX@ CXXFLAGS = @CXXFLAGS@ # Both C and C++ compiler CPPFLAGS = @CPPFLAGS@ INCLUDES = -I. -I$(srcdir) -I.. -I$(srcdir)/.. -I$(srcdir)/vacall_r LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ # Libtool options for linking with the thread library. LTLIBTHREAD = @LTLIBTHREAD@ #### End of system configuration section. #### SHELL = /bin/sh # Needed by $(LIBTOOL). top_builddir = .. # Limit the set of exported symbols, on those platforms where libtool supports it. # Currently this excludes the symbols from gnulib modules. LIBCALLBACK_EXPORTED_SYMBOLS_REGEX = '^callback_|_callback$$|^trampoline_r_data0$$' # Before making a release, change this according to the libtool documentation, # section "Library interface versions". LIBCALLBACK_VERSION_INFO = 1:5:0 all : all-subdirs libcallback.la $(srcdir)/callback.3 $(srcdir)/callback.html all-subdirs : force cd @callback_subdir@ && $(MAKE) all callback-libapi.lo : $(srcdir)/callback-libapi.c $(srcdir)/callback.h $(srcdir)/trampoline_r/trampoline_r.h ../config.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) -I$(srcdir)/trampoline_r $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/callback-libapi.c callback-compat.lo : $(srcdir)/callback-compat.c ../config.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/callback-compat.c libcallback.la : vacall_r/libvacall.la trampoline_r/libtrampoline.la callback-libapi.lo callback-compat.lo $(LIBTOOL_LINK) $(CC) -o libcallback.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBCALLBACK_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBCALLBACK_VERSION_INFO) vacall_r/vacall.lo vacall_r/vacall-libapi.lo vacall_r/vacall-structcpy.lo trampoline_r/*.lo callback-libapi.lo callback-compat.lo ../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD) # Installs the library and include files only. Typically called with only # $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here. install-lib : all force cd vacall_r && $(MAKE) install-lib libdir='$(libdir)' includedir='$(includedir)' mkdir -p $(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libcallback.la $(libdir)/libcallback.la mkdir -p $(includedir) $(INSTALL_DATA) $(srcdir)/callback.h $(includedir)/callback.h install : force cd vacall_r && $(MAKE) install mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libcallback.la $(DESTDIR)$(libdir)/libcallback.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/callback.h $(DESTDIR)$(includedir)/callback.h mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 $(INSTALL_DATA) $(srcdir)/callback.3 $(DESTDIR)$(mandir)/man3/callback.3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) $(INSTALL_DATA) $(srcdir)/callback.html $(DESTDIR)$(htmldir)/callback.html installdirs : force cd vacall_r && $(MAKE) installdirs mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) uninstall : force cd vacall_r && $(MAKE) uninstall $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libcallback.la $(RM) $(DESTDIR)$(includedir)/callback.h $(RM) $(DESTDIR)$(mandir)/man3/callback.3 $(RM) $(DESTDIR)$(htmldir)/callback.html test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c test1 : test1.@OBJEXT@ libcallback.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libcallback.la $(LDFLAGS) -o test1 minitests.@OBJEXT@ : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/minitests.c minitests.s : $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/minitests.c minitests : minitests.@OBJEXT@ libcallback.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ minitests.@OBJEXT@ libcallback.la $(LDFLAGS) -o minitests minitests-c++.@OBJEXT@ : $(srcdir)/minitests-c++.cc $(srcdir)/minitests.c $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/minitests-c++.cc minitests-c++ : minitests-c++.@OBJEXT@ libcallback.la $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ minitests-c++.@OBJEXT@ libcallback.la $(LDFLAGS) -o minitests-c++ check-subdirs : force cd @callback_subdir@ && $(MAKE) check check : all check-subdirs test1 minitests ./test1 ./minitests > minitests.out LC_ALL=C uniq -u < minitests.out > minitests.output.$(HOST) test '!' -s minitests.output.$(HOST) @IF_CXX@ ./minitests-c++ > minitests-c++.out @IF_CXX@ LC_ALL=C uniq -u < minitests-c++.out > minitests-c++.output.$(HOST) @IF_CXX@ test '!' -s minitests-c++.output.$(HOST) @IF_CXX@check : minitests-c++ tests.@OBJEXT@ : $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/tests.c tests.s : $(srcdir)/tests.c $(srcdir)/callback.h $(srcdir)/vacall_r/vacall_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -S $(srcdir)/tests.c tests : tests.@OBJEXT@ libcallback.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ tests.@OBJEXT@ libcallback.la $(LDFLAGS) -o tests extracheck-subdirs : force cd @callback_subdir@ && $(MAKE) extracheck extracheck : all extracheck-subdirs tests ./tests > tests.out LC_ALL=C uniq -u < tests.out > tests.output.$(HOST) test '!' -s tests.output.$(HOST) MOSTLYCLEANDIRS = .libs _libs MOSTLYCLEANFILES = \ *.@OBJEXT@ *.lo core \ libcallback.* \ test1.@OBJEXT@ test1 \ minitests.@OBJEXT@ minitests.s minitests minitests.out \ minitests-c++.@OBJEXT@ minitests-c++ minitests-c++.out \ tests.@OBJEXT@ tests.s tests tests.out mostlyclean : force cd @callback_subdir@ && $(MAKE) mostlyclean $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) clean : force cd @callback_subdir@ && $(MAKE) clean $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) DISTCLEANFILES = \ Makefile \ minitests.output.* minitests-c++.output.* tests.output.* distclean : force cd @callback_subdir@ && if test -f Makefile; then $(MAKE) distclean; fi $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) $(RM) $(DISTCLEANFILES) maintainer-clean : force cd @callback_subdir@ && if test -f Makefile; then $(MAKE) maintainer-clean; fi $(RM) -r $(MOSTLYCLEANDIRS) $(RM) $(MOSTLYCLEANFILES) $(RM) $(DISTCLEANFILES) # List of source files (committed in version control). SOURCE_FILES = \ COPYING MIGRATION PLATFORMS README callback.3 callback.html elf-hack.txt \ Makefile.maint \ Makefile.in \ callback.h \ callback-libapi.c \ callback-compat.c \ test1.c \ minitests.c minitests-c++.cc \ tests.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ callback.man # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done test -d '$(distdir)'/@callback_subdir@ || mkdir '$(distdir)'/@callback_subdir@; cd @callback_subdir@ && $(MAKE) distdir distdir='$(distdir)'/@callback_subdir@ force : libffcall-2.5/callback/vacall_r/0000775000000000000000000000000014665334232013576 500000000000000libffcall-2.5/callback/vacall_r/vacall-s390-linux.s0000664000000000000000000000434414662617145017006 00000000000000 .file "vacall-s390.c" .text .align 4 .type callback_receiver,@function callback_receiver: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long 0 .LC1: .long 255 .LC2: .long 65535 .LC3: .long 1 .LTN0_0: lr %r1,%r0 lr %r14,%r15 ahi %r15,-184 lr %r11,%r15 lr %r9,%r0 l %r10,0(%r1) st %r14,0(%r15) la %r1,280(%r11) mvc 116(4,%r11),.LC0-.LT0_0(%r13) st %r2,132(%r11) st %r3,136(%r11) la %r3,96(%r11) st %r4,140(%r11) st %r5,144(%r11) st %r6,148(%r11) std %f2,176(%r11) std %f0,168(%r11) ste %f2,160(%r11) ste %f0,156(%r11) mvc 96(4,%r11),.LC0-.LT0_0(%r13) st %r1,112(%r11) mvc 120(4,%r11),.LC0-.LT0_0(%r13) mvc 128(4,%r11),.LC0-.LT0_0(%r13) mvc 152(4,%r11),.LC0-.LT0_0(%r13) l %r2,4(%r9) basr %r14,%r10 icm %r4,15,120(%r11) je .L1 chi %r4,1 je .L43 chi %r4,2 je .L44 chi %r4,3 je .L43 chi %r4,4 je .L45 chi %r4,5 je .L46 chi %r4,6 je .L40 chi %r4,7 je .L40 chi %r4,8 je .L40 chi %r4,9 je .L40 lr %r1,%r4 ahi %r1,-10 cl %r1,.LC3-.LT0_0(%r13) jh .L22 l %r2,104(%r11) l %r3,108(%r11) .L1: l %r4,240(%r11) lm %r6,%r15,208(%r11) br %r4 .L22: chi %r4,12 je .L47 chi %r4,13 je .L48 chi %r4,14 je .L40 chi %r4,15 jne .L1 tm 98(%r11),4 je .L1 l %r1,124(%r11) chi %r1,1 je .L49 chi %r1,2 je .L50 chi %r1,4 je .L51 chi %r1,8 jne .L1 l %r1,116(%r11) l %r3,4(%r1) .L39: l %r2,0(%r1) j .L1 .L51: l %r1,116(%r11) j .L39 .L50: l %r1,116(%r11) lh %r4,0(%r1) lr %r2,%r4 .L41: n %r2,.LC2-.LT0_0(%r13) j .L1 .L49: l %r1,116(%r11) ic %r4,0(%r1) lr %r2,%r4 .L42: n %r2,.LC1-.LT0_0(%r13) j .L1 .L40: l %r2,104(%r11) j .L1 .L48: ld %f0,104(%r11) j .L1 .L47: le %f0,104(%r11) j .L1 .L46: lh %r1,104(%r11) lr %r2,%r1 j .L41 .L45: lh %r2,104(%r11) j .L1 .L43: ic %r1,104(%r11) lr %r2,%r1 j .L42 .L44: icm %r1,8,104(%r11) lr %r2,%r1 sra %r2,24 j .L1 .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .align 4 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: stm %r11,%r13,44(%r15) bras %r13,.LTN1_0 .LT1_0: .LC4: .long callback_receiver-.LT1_0 .LTN1_0: l %r1,.LC4-.LT1_0(%r13) lr %r11,%r15 la %r2,0(%r13,%r1) lm %r11,%r13,44(%r11) br %r14 .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-arm64-macos-macro.S0000664000000000000000000000606114662617145020241 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) stp x29, x30, [sp, -256]! add x29, sp, 0 ldr x10, [x18] add x11, x29, 256 stp s0, s1, [x29, 156] stp s2, s3, [x29, 164] stp x0, x1, [x29, 88] stp s4, s5, [x29, 172] stp x11, xzr, [x29, 40] stp s6, s7, [x29, 180] str x8, [x29, 72] stp d0, d1, [x29, 192] stp x2, x3, [x29, 104] stp d2, d3, [x29, 208] stp x4, x5, [x29, 120] stp d4, d5, [x29, 224] stp x6, x7, [x29, 136] stp d6, d7, [x29, 240] str wzr, [x29, 24] add x1, x29, 24 str wzr, [x29, 56] ldr x0, [x18, 8] str wzr, [x29, 80] str wzr, [x29, 152] blr x10 ldr w9, [x29, 56] cbz w9, L(1) cmp w9, 1 beq L(25) cmp w9, 2 beq L(29) cmp w9, 3 beq L(25) cmp w9, 4 beq L(30) cmp w9, 5 beq L(31) cmp w9, 6 beq L(32) cmp w9, 7 beq L(33) and w10, w9, -3 cmp w10, 8 beq L(27) cmp w10, 9 beq L(27) cmp w9, 12 beq L(34) cmp w9, 13 beq L(35) cmp w9, 14 beq L(27) cmp w9, 15 bne L(1) ldr w9, [x29, 24] tbz x9, 10, L(1) ldr x9, [x29, 64] sub x10, x9, $1 cmp x10, 15 bhi L(1) ldr x11, [x29, 48] cmp x9, 8 and x10, x11, 7 and x11, x11, -8 add x9, x9, x10 bhi L(15) cmp x9, 8 lsl w9, w9, 3 bhi L(16) mov x12, 2 sub w9, w9, $1 lsl x9, x12, x9 ldr x11, [x11] sub x9, x9, $1 lsl w10, w10, 3 and x9, x9, x11 asr x0, x9, x10 L(1): ldp x29, x30, [sp], 256 ret .p2align 3 L(25): ldrb w0, [x29, 32] ldp x29, x30, [sp], 256 ret .p2align 3 L(27): ldr x0, [x29, 32] b L(1) .p2align 3 L(29): ldrsb x0, [x29, 32] b L(1) .p2align 3 L(30): ldrsh x0, [x29, 32] b L(1) .p2align 3 L(31): ldrh w0, [x29, 32] b L(1) .p2align 3 L(32): ldrsw x0, [x29, 32] b L(1) .p2align 3 L(33): ldr w0, [x29, 32] b L(1) L(34): ldr s0, [x29, 32] b L(1) L(35): ldr d0, [x29, 32] b L(1) L(15): cmp x9, 16 lsl w9, w9, 3 bls L(36) mov x13, 2 sub w9, w9, $129 ldp x14, x12, [x11, 8] lsl x9, x13, x9 lsl w15, w10, 3 sub x9, x9, $1 neg w10, w10, lsl 3 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 lsl x16, x14, x10 asr x11, x11, x15 asr x14, x14, x15 lsl x10, x9, x10 orr x0, x11, x16 orr x1, x10, x14 b L(1) L(16): mov w13, -8 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x9, x11 b L(1) L(36): mov w13, -4 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 32 and x9, x9, x12 asr x1, x9, x15 lsl x9, x9, x10 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x11, x9 b L(1) FUNEND(callback_receiver) .align 2 .p2align 3,,7 .global C(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) adrp x9, PAGE(C(callback_receiver)) add x0, x9, PAGEOFF(C(callback_receiver)) ret FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/callback/vacall_r/vacall-m68k.motorola.S0000664000000000000000000000553014662617144017530 00000000000000#include "asm-m68k.h" .text .align 2 DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) link.w %a6,#-32 movm.l #0x3030,-(%sp) clr.l -32(%a6) lea (8,%a6),%a2 move.l %a2,-20(%a6) clr.l -16(%a6) clr.l -12(%a6) move.l %a1,-4(%a6) pea -32(%a6) move.l 4(%a0),-(%sp) move.l (%a0),%a2 jsr (%a2) addq.l #8,%sp move.l -12(%a6),%a3 tst.l %a3 jbeq L(1) moveq.l #1,%d2 cmp.l %a3,%d2 jbeq L(46) moveq.l #2,%d3 cmp.l %a3,%d3 jbeq L(46) moveq.l #3,%d2 cmp.l %a3,%d2 jbeq L(47) moveq.l #4,%d3 cmp.l %a3,%d3 jbeq L(48) moveq.l #5,%d2 cmp.l %a3,%d2 jbeq L(49) moveq.l #6,%d3 cmp.l %a3,%d3 jbeq L(45) moveq.l #7,%d2 cmp.l %a3,%d2 jbeq L(45) moveq.l #8,%d3 cmp.l %a3,%d3 jbeq L(45) moveq.l #9,%d2 cmp.l %a3,%d2 jbeq L(45) lea (-10,%a3),%a2 moveq.l #1,%d3 cmp.l %a2,%d3 jbcs L(22) move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra L(1) .align 2 L(22): moveq.l #12,%d2 cmp.l %a3,%d2 jbeq L(50) moveq.l #13,%d2 cmp.l %a3,%d2 jbeq L(51) moveq.l #14,%d3 cmp.l %a3,%d3 jbeq L(52) moveq.l #15,%d2 cmp.l %a3,%d2 jbne L(1) btst #2,-30(%a6) jbeq L(1) move.l -8(%a6),%d2 moveq.l #1,%d3 cmp.l %d2,%d3 jbeq L(53) moveq.l #2,%d3 cmp.l %d2,%d3 jbeq L(54) moveq.l #4,%d3 cmp.l %d2,%d3 jbeq L(55) moveq.l #8,%d3 cmp.l %d2,%d3 jbne L(1) move.l -16(%a6),%a2 move.l (%a2),%d0 move.l 4(%a2),%d1 jbra L(1) .align 2 L(55): move.l -16(%a6),%a2 move.l (%a2),%d0 jbra L(1) .align 2 L(54): move.l -16(%a6),%a2 clr.l %d0 move.w (%a2),%d0 jbra L(1) .align 2 L(53): move.l -16(%a6),%a2 clr.l %d0 move.b (%a2),%d0 jbra L(1) .align 2 L(52): move.l -28(%a6),%d0 move.l %d0,%a0 jbra L(1) .align 2 L(51): btst #6,-29(%a6) jbeq L(31) fmove.d -28(%a6),%fp0 jbra L(1) .align 2 L(31): move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra L(1) .align 2 L(50): move.l -32(%a6),%d2 btst #6,%d2 jbeq L(25) fmove.s -28(%a6),%fp0 jbra L(1) .align 2 L(25): btst #5,%d2 jbeq L(27) fmove.s -28(%a6),%fp1 fmove.d %fp1,-(%sp) move.l (%sp)+,%d0 move.l (%sp)+,%d1 jbra L(1) .align 2 L(27): move.l -28(%a6),%d0 jbra L(1) .align 2 L(45): move.l -28(%a6),%d0 jbra L(1) .align 2 L(49): clr.l %d0 move.w -28(%a6),%d0 jbra L(1) .align 2 L(48): move.w -28(%a6),%d0 ext.l %d0 jbra L(1) .align 2 L(47): clr.l %d0 move.b -28(%a6),%d0 jbra L(1) .align 2 L(46): move.b -28(%a6),%d0 extb.l %d0 L(1): movm.l -48(%a6),#0xc0c unlk %a6 rts L(fe1): FUNEND(callback_receiver) .align 2 .globl C(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) link.w %a6,#0 move.l %a5,-(%sp) lea (%pc, _GLOBAL_OFFSET_TABLE_@GOTPC), %a5 move.l callback_receiver@GOT(%a5),%a0 move.l %a0,%d0 move.l (%sp)+,%a5 unlk %a6 rts L(fe2): FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-mips64eb-linux.s0000664000000000000000000001265114662617144017740 00000000000000 .file 1 "vacall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,272,$31 # vars= 160, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $fp,192($sp) move $fp,$sp sd $4,208($fp) ld $4,8($2) ld $25,0($2) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) move $5,$fp swc1 $f19,88($fp) sd $12,24($fp) sw $0,0($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L46 li $13,4 # 0x4 beq $12,$13,.L47 li $13,5 # 0x5 beq $12,$13,.L48 li $13,6 # 0x6 beq $12,$13,.L49 li $13,7 # 0x7 beq $12,$13,.L50 li $13,8 # 0x8 beq $12,$13,.L44 li $13,9 # 0x9 beq $12,$13,.L44 li $13,10 # 0xa beq $12,$13,.L44 li $13,11 # 0xb beq $12,$13,.L44 li $13,12 # 0xc beq $12,$13,.L51 li $13,13 # 0xd beq $12,$13,.L52 li $13,14 # 0xe beq $12,$13,.L44 li $13,15 # 0xf bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 # 0x1 beq $12,$13,.L53 li $13,2 # 0x2 beq $12,$13,.L54 li $13,4 # 0x4 beq $12,$13,.L55 li $13,8 # 0x8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $24,-8 # 0xfffffffffffffff8 sltu $25,$14,9 andi $15,$13,0x7 and $24,$13,$24 beq $25,$0,.L24 daddu $13,$14,$15 sltu $25,$13,9 sll $13,$13,0 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($24) sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $13,$24,$13 and $13,$13,$25 sll $15,$15,3 dsll $2,$13,$15 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $14,$13,.L56 li $13,8 # 0x8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 # 0x10 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $14,$12,.L60 li $12,16 # 0x10 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,0 ld $18,8($24) subu $13,$0,$13 move $16,$15 li $25,-1 # 0xffffffffffffffff subu $15,$0,$15 sll $13,$13,3 dsll $13,$25,$13 ld $17,0($24) sll $25,$15,2 addiu $24,$25,32 and $13,$13,$18 sll $15,$16,3 dsra $25,$13,$24 dsll $16,$17,$15 dsra $24,$25,$24 or $2,$16,$24 b .L23 dsll $3,$13,$15 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($24) subu $13,$0,$13 ld $16,8($24) ld $17,0($24) subu $25,$0,$15 sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $24,$24,$13 sll $25,$25,3 sll $15,$15,3 addiu $25,$25,64 and $13,$24,$18 dsra $13,$13,$25 dsll $24,$17,$15 dsra $17,$16,$25 dsll $15,$16,$15 or $2,$24,$17 b .L23 or $3,$13,$15 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($24) ld $25,0($24) sll $13,$13,3 li $24,-1 # 0xffffffffffffffff dsll $13,$24,$13 subu $24,$0,$15 and $13,$13,$16 sll $24,$24,3 sll $15,$15,3 dsra $13,$13,$24 dsll $15,$25,$15 b .L23 or $2,$13,$15 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,16,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) daddu $13,$13,$25 daddiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) daddiu $sp,$sp,-16 ld $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) daddiu $2,$12,%got_ofst(callback_receiver) j $31 daddiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/vacall-mipsel-macro.S0000664000000000000000000001021114662617144017470 00000000000000#include "asm-mips.h" .file 1 "vacall-mips.c" .text .align 2 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,104,$31 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) lw $25,0($2) sw $4,104($fp) lw $4,4($2) sw $5,108($fp) addiu $5,$fp,104 sw $5,40($fp) addiu $5,$fp,120 sw $5,56($fp) .cprestore 16 sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) addiu $5,$fp,24 jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,8,$31 .mask 0x40000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-8 sw $fp,4($sp) move $fp,$sp move $sp,$fp lw $fp,4($sp) la $2,callback_receiver .set noreorder .set nomacro j $31 addiu $sp,$sp,8 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-powerpc-macos.s0000664000000000000000000000550614662617145017733 00000000000000.text .align 2 _callback_receiver: mflr r0 stmw r29,-12(r1) stw r0,8(r1) li r29,0 stwu r1,-224(r1) mr r30,r1 addi r0,r30,248 stw r29,84(r30) stw r0,80(r30) lwz r0,0(r11) stw r3,248(r30) stw r4,252(r30) mtctr r0 stw r9,272(r30) addi r4,r30,64 stw r5,256(r30) stw r6,260(r30) stw r7,264(r30) stw r8,268(r30) stw r10,276(r30) stw r29,96(r30) stfd f1,100(r30) stfd f2,108(r30) stfd f3,116(r30) stfd f4,124(r30) stfd f5,132(r30) stfd f6,140(r30) stfd f7,148(r30) stfd f8,156(r30) stfd f9,164(r30) stfd f10,172(r30) stfd f11,180(r30) stfd f12,188(r30) stfd f13,196(r30) stw r29,64(r30) stw r29,88(r30) lwz r3,4(r11) bctrl lwz r9,88(r30) cmpwi cr0,r9,0 beq- cr0,L1 cmpwi cr0,r9,1 beq- cr0,L41 cmpwi cr0,r9,2 beq- cr0,L41 cmpwi cr0,r9,3 beq- cr0,L42 cmpwi cr0,r9,4 beq- cr0,L43 cmpwi cr0,r9,5 beq- cr0,L44 cmpwi cr0,r9,6 beq- cr0,L40 cmpwi cr0,r9,7 beq- cr0,L40 cmpwi cr0,r9,8 beq- cr0,L40 cmpwi cr0,r9,9 beq- cr0,L40 addi r0,r9,-10 cmplwi cr0,r0,1 bgt- cr0,L22 lwz r3,72(r30) lwz r4,76(r30) L1: lwz r1,0(r1) lwz r0,8(r1) lmw r29,-12(r1) mtlr r0 blr L22: cmpwi cr0,r9,12 beq- cr0,L45 cmpwi cr0,r9,13 beq- cr0,L46 cmpwi cr0,r9,14 beq- cr0,L40 cmpwi cr0,r9,15 bne+ cr0,L1 lwz r0,64(r30) andi. r9,r0,1024 beq- cr0,L1 lwz r9,92(r30) addi r0,r9,-1 cmplwi cr0,r0,7 bgt- cr0,L1 lwz r0,84(r30) cmplwi cr0,r9,4 rlwinm r8,r0,0,30,31 rlwinm r5,r0,0,0,29 add r6,r8,r9 bgt- cr0,L33 slwi r0,r8,3 cmplwi cr0,r6,4 subfic r0,r0,31 li r9,2 slw r9,r9,r0 addi r7,r9,-1 bgt- cr0,L34 lwz r9,0(r5) slwi r0,r6,3 subfic r0,r0,32 and r9,r9,r7 sraw r3,r9,r0 b L1 L34: lwz r0,0(r5) slwi r9,r6,3 lwz r10,4(r5) subfic r8,r9,64 and r0,r0,r7 addi r9,r9,-32 slw r0,r0,r9 sraw r10,r10,r8 L39: or r3,r10,r0 b L1 L33: slwi r0,r8,3 cmplwi cr0,r6,8 subfic r0,r0,31 li r9,2 slw r9,r9,r0 addi r29,r9,-1 bgt- cr0,L37 lwz r7,0(r5) slwi r10,r6,2 addi r10,r10,-16 lwz r8,4(r5) and r7,r7,r29 slwi r9,r6,3 subfic r9,r9,64 slw r0,r7,r10 slw r0,r0,r10 sraw r8,r8,r9 or r4,r0,r8 sraw r3,r7,r9 b L1 L37: slwi r9,r6,3 lwz r0,4(r5) lwz r10,0(r5) subfic r6,r9,96 lwz r8,8(r5) addi r9,r9,-64 slw r7,r0,r9 and r10,r10,r29 sraw r8,r8,r6 slw r10,r10,r9 sraw r0,r0,r6 or r4,r7,r8 b L39 L40: lwz r3,72(r30) b L1 L46: lfd f1,72(r30) b L1 L45: lfs f1,72(r30) b L1 L44: lhz r3,72(r30) b L1 L43: lha r3,72(r30) b L1 L42: lbz r3,72(r30) b L1 L41: lbz r0,72(r30) extsb r3,r0 b L1 .align 2 .globl _callback_get_receiver _callback_get_receiver: mflr r0 stmw r30,-8(r1) stw r0,8(r1) bcl 20,31,L1$pb L1$pb: stwu r1,-48(r1) mflr r31 addis r9,r31,ha16(L_callback_receiver$non_lazy_ptr-L1$pb) mr r30,r1 lwz r3,lo16(L_callback_receiver$non_lazy_ptr-L1$pb)(r9) lwz r1,0(r1) lwz r0,8(r1) lmw r30,-8(r1) mtlr r0 blr .data .align 2 L_callback_receiver$non_lazy_ptr: .long _callback_receiver libffcall-2.5/callback/vacall_r/vacall-alpha-macro.S0000664000000000000000000000616114662617145017276 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .ent callback_receiver callback_receiver: .frame $15,192,$26,48 .mask 0x4008000,-192 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $callback_receiver..ng: lda $30,-192($30) ldq $27,0($1) stq $15,8($30) mov $30,$15 lda $3,144($15) stq $26,0($30) .prologue 1 stq $31,48($15) lda $2,88($15) stq $16,144($15) subq $2,$3,$2 ldq $16,8($1) stq $17,152($15) lda $3,192($15) stq $2,80($15) lda $17,16($15) lda $2,144($15) stq $3,72($15) stq $18,160($15) stq $19,168($15) stq $20,176($15) stq $21,184($15) stt $f16,88($15) stt $f17,96($15) stt $f18,104($15) stt $f19,112($15) stt $f20,120($15) stt $f21,128($15) stl $31,16($15) stq $2,40($15) stl $31,56($15) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 ldl $2,56($15) beq $2,$L43 zapnot $2,15,$3 cmpeq $3,1,$2 bne $2,$L44 cmpeq $3,2,$2 bne $2,$L44 cmpeq $3,3,$2 bne $2,$L50 cmpeq $3,4,$2 bne $2,$L51 cmpeq $3,5,$2 bne $2,$L52 cmpeq $3,6,$2 bne $2,$L53 cmpeq $3,7,$2 bne $2,$L54 cmpeq $3,8,$2 bne $2,$L48 cmpeq $3,9,$2 bne $2,$L48 cmpeq $3,10,$2 bne $2,$L48 cmpeq $3,11,$2 bne $2,$L48 cmpeq $3,12,$2 bne $2,$L55 cmpeq $3,13,$2 bne $2,$L56 cmpeq $3,14,$2 bne $2,$L48 cmpeq $3,15,$2 beq $2,$L43 lda $2,1024($31) ldl $3,16($15) and $2,$3,$2 beq $2,$L43 ldq $3,64($15) cmpeq $3,1,$2 bne $2,$L57 cmpeq $3,2,$2 bne $2,$L58 cmpeq $3,4,$2 bne $2,$L59 cmpeq $3,8,$2 bne $2,$L60 cmpeq $3,16,$2 beq $2,$L43 ldq $2,48($15) ldq $1,8($2) ldq $0,0($2) .align 4 $L43: mov $15,$30 ldq $26,0($30) ldq $15,8($30) lda $30,192($30) ret $31,($26),1 .align 4 $L44: mov $15,$30 ldl $2,24($15) ldq $26,0($30) sll $2,56,$2 sra $2,56,$0 ldq $15,8($30) lda $30,192($30) ret $31,($26),1 $L51: ldl $2,24($15) sll $2,48,$2 sra $2,48,$0 br $31,$L43 $L50: ldl $2,24($15) bis $31,$31,$31 and $2,0xff,$0 br $31,$L43 $L48: ldq $0,24($15) br $31,$L43 $L52: ldl $2,24($15) bis $31,$31,$31 zapnot $2,3,$0 br $31,$L43 $L53: ldl $3,24($15) bis $31,$31,$31 mov $3,$0 br $31,$L43 $L54: ldl $2,24($15) bis $31,$31,$31 zapnot $2,15,$0 br $31,$L43 $L55: lds $f0,24($15) br $31,$L43 $L56: ldt $f0,24($15) br $31,$L43 $L57: ldq $3,48($15) ldq_u $2,0($3) extbl $2,$3,$0 br $31,$L43 $L58: ldq $3,48($15) ldq_u $2,0($3) extwl $2,$3,$0 br $31,$L43 $L60: ldq $2,48($15) bis $31,$31,$31 ldq $0,0($2) br $31,$L43 $L59: ldq $2,48($15) ldl $3,0($2) zapnot $3,15,$0 br $31,$L43 .end callback_receiver .align 2 .align 4 .globl callback_get_receiver .ent callback_get_receiver callback_get_receiver: .frame $15,16,$26,0 .mask 0x4008000,-16 ldah $29,0($27) !gpdisp!3 lda $29,0($29) !gpdisp!3 $callback_get_receiver..ng: lda $30,-16($30) ldah $2,callback_receiver($29) !gprelhigh stq $15,8($30) mov $30,$15 stq $26,0($30) .prologue 1 mov $15,$30 lda $0,callback_receiver($2) !gprellow ldq $26,0($30) ldq $15,8($30) lda $30,16($30) ret $31,($26),1 .end callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-powerpc64-aix.s0000664000000000000000000000506314662617145017562 00000000000000 .file "../../vacall/vacall-powerpc64.c" .csect .text[PR] .toc .csect .text[PR] .align 2 .align 4 .lglobl .callback_receiver .csect callback_receiver[DS],3 callback_receiver: .llong .callback_receiver, TOC[tc0], 0 .csect .text[PR] .callback_receiver: mflr 0 std 30,-16(1) std 31,-8(1) li 30,0 std 0,16(1) li 0,0 stdu 1,-304(1) ld 12,0(11) mr 31,1 std 9,400(31) addi 9,31,352 stfd 1,172(31) stw 0,152(31) stw 0,168(31) std 3,352(31) std 4,360(31) ld 3,8(11) std 5,368(31) addi 4,31,112 std 6,376(31) std 7,384(31) std 8,392(31) std 10,408(31) stfd 2,180(31) stfd 3,188(31) stfd 4,196(31) stfd 5,204(31) stfd 6,212(31) stfd 7,220(31) stfd 8,228(31) stfd 9,236(31) stfd 10,244(31) stfd 11,252(31) stfd 12,260(31) stfd 13,268(31) std 9,136(31) std 0,144(31) stw 30,112(31) std 2,40(1) ld 9,0(12) ld 11,16(12) mtctr 9 ld 2,8(12) bctrl ld 2,40(1) lwz 9,152(31) cmpdi 7,9,0 beq 7,L..1 cmplwi 7,9,1 beq 7,L..20 cmplwi 7,9,2 beq 7,L..23 cmplwi 7,9,3 beq 7,L..20 cmplwi 7,9,4 beq 7,L..24 cmplwi 7,9,5 beq 7,L..25 cmplwi 7,9,6 beq 7,L..26 cmplwi 7,9,7 beq 7,L..27 cmplwi 7,9,8 beq 7,L..21 cmplwi 7,9,9 beq 7,L..21 cmplwi 7,9,10 beq 7,L..21 cmplwi 7,9,11 beq 7,L..21 cmplwi 7,9,12 beq 7,L..28 cmplwi 7,9,13 beq 7,L..29 cmplwi 7,9,14 beq 7,L..21 L..1: addi 1,31,304 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .align 4 L..20: lbz 3,120(31) addi 1,31,304 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .align 4 L..23: lbz 9,120(31) extsb 3,9 b L..1 .align 4 L..21: ld 3,120(31) b L..1 .align 4 L..24: lha 3,120(31) b L..1 .align 4 L..25: lhz 3,120(31) b L..1 .align 4 L..26: lwa 3,120(31) b L..1 .align 4 L..28: lfs 1,120(31) b L..1 .align 4 L..27: lwz 3,120(31) b L..1 L..29: lfd 1,120(31) b L..1 LT..callback_receiver: .long 0 .byte 0,0,32,97,128,2,8,0 .long 0 .long LT..callback_receiver-.callback_receiver .short 17 .byte "callback_receiver" .byte 31 .align 2 .toc LC..0: .tc callback_receiver[TC],callback_receiver .csect .text[PR] .align 2 .align 4 .globl callback_get_receiver .globl .callback_get_receiver .csect callback_get_receiver[DS],3 callback_get_receiver: .llong .callback_get_receiver, TOC[tc0], 0 .csect .text[PR] .callback_get_receiver: std 31,-8(1) ld 3,LC..0(2) stdu 1,-64(1) mr 31,1 addi 1,31,64 ld 31,-8(1) blr LT..callback_get_receiver: .long 0 .byte 0,0,32,96,128,1,0,0 .long LT..callback_get_receiver-.callback_get_receiver .short 21 .byte "callback_get_receiver" .byte 31 .align 2 _section_.text: .csect .data[RW],4 .llong _section_.text libffcall-2.5/callback/vacall_r/vacall-powerpc-aix.s0000664000000000000000000000656714662617145017422 00000000000000 .file "../../vacall/vacall-powerpc.c" .toc .csect .text[PR] .align 2 .lglobl .callback_receiver .csect callback_receiver[DS] callback_receiver: .long .callback_receiver, TOC[tc0], 0 .csect .text[PR] .callback_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous mflr 0 stw 0,8(1) stw 28,-16(1) stw 29,-12(1) stw 31,-4(1) stwu 1,-216(1) mr 31,1 lwz 28,0(11) li 29,0 addi 0,31,240 stw 9,264(31) stw 3,240(31) stw 4,244(31) stw 5,248(31) stw 6,252(31) stw 7,256(31) stw 8,260(31) stw 10,268(31) stw 29,76(31) stfd 1,92(31) stfd 2,100(31) stfd 3,108(31) stfd 4,116(31) stfd 5,124(31) stfd 6,132(31) stfd 7,140(31) stfd 8,148(31) stfd 9,156(31) stfd 10,164(31) stfd 11,172(31) stfd 12,180(31) stfd 13,188(31) stw 0,72(31) stw 29,88(31) stw 29,56(31) stw 29,80(31) lwz 0,0(28) lwz 3,4(11) mtctr 0 addi 4,31,56 stw 2,20(1) lwz 11,8(28) lwz 2,4(28) bctrl lwz 2,20(1) lwz 9,80(31) cmpwi 0,9,0 beq- 0,L..1 cmpwi 0,9,1 beq- 0,L..40 cmpwi 0,9,2 beq- 0,L..41 cmpwi 0,9,3 beq- 0,L..40 cmpwi 0,9,4 beq- 0,L..42 cmpwi 0,9,5 beq- 0,L..43 cmpwi 0,9,6 beq- 0,L..39 cmpwi 0,9,7 beq- 0,L..39 cmpwi 0,9,8 beq- 0,L..39 cmpwi 0,9,9 beq- 0,L..39 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,L..22 lwz 3,64(31) lwz 4,68(31) L..1: lwz 1,0(1) lwz 0,8(1) lwz 28,-16(1) mtlr 0 lwz 29,-12(1) lwz 31,-4(1) blr L..22: cmpwi 0,9,12 beq- 0,L..44 cmpwi 0,9,13 beq- 0,L..45 cmpwi 0,9,14 beq- 0,L..39 cmpwi 0,9,15 bne+ 0,L..1 lwz 0,56(31) andi. 9,0,1024 beq- 0,L..1 lwz 9,84(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,L..1 cmplwi 0,9,4 lwz 0,76(31) rlwinm 8,0,0,30,31 rlwinm 6,0,0,0,29 add 5,8,9 bgt- 0,L..33 cmplwi 0,5,4 slwi 0,8,3 subfic 0,0,31 li 9,2 slw 9,9,0 addi 7,9,-1 bgt- 0,L..34 lwz 9,0(6) slwi 0,5,3 and 9,9,7 subfic 0,0,32 sraw 3,9,0 b L..1 L..34: lwz 0,0(6) slwi 9,5,3 lwz 10,4(6) subfic 8,9,64 and 0,0,7 addi 9,9,-32 slw 0,0,9 sraw 10,10,8 or 3,0,10 b L..1 L..33: cmplwi 0,5,8 slwi 0,8,3 subfic 0,0,31 li 9,2 slw 9,9,0 addi 29,9,-1 bgt- 0,L..37 lwz 7,0(6) slwi 10,5,2 and 7,7,29 addi 10,10,-16 lwz 8,4(6) slwi 9,5,3 subfic 9,9,64 slw 0,7,10 slw 0,0,10 sraw 8,8,9 or 4,0,8 sraw 3,7,9 b L..1 L..37: lwz 10,0(6) slwi 9,5,3 lwz 8,8(6) lwz 0,4(6) subfic 7,9,96 and 10,10,29 addi 9,9,-64 slw 6,0,9 sraw 8,8,7 slw 10,10,9 sraw 0,0,7 or 3,10,0 or 4,6,8 b L..1 L..39: lwz 3,64(31) b L..1 L..45: lfd 1,64(31) b L..1 L..44: lfs 1,64(31) b L..1 L..43: lhz 3,64(31) b L..1 L..42: lha 3,64(31) b L..1 L..40: lbz 3,64(31) b L..1 L..41: lbz 0,64(31) slwi 0,0,24 srawi 3,0,24 b L..1 LT..callback_receiver: .long 0 .byte 0,0,32,97,128,4,8,0 .long 0 .long LT..callback_receiver-.callback_receiver .short 17 .byte "callback_receiver" .byte 31 .align 2 .toc LC..0: .tc callback_receiver[TC],callback_receiver .csect .text[PR] .align 2 .globl callback_get_receiver .globl .callback_get_receiver .csect callback_get_receiver[DS] callback_get_receiver: .long .callback_get_receiver, TOC[tc0], 0 .csect .text[PR] .callback_get_receiver: stw 31,-4(1) stwu 1,-40(1) mr 31,1 lwz 1,0(1) lwz 3,LC..0(2) lwz 31,-4(1) blr LT..callback_get_receiver: .long 0 .byte 0,0,32,96,128,1,0,0 .long LT..callback_get_receiver-.callback_get_receiver .short 21 .byte "callback_get_receiver" .byte 31 .align 2 _section_.text: .csect .data[RW],3 .long _section_.text libffcall-2.5/callback/vacall_r/vacall-arm-eabi-macro.S0000664000000000000000000000455714662617145017675 00000000000000#include "asm-arm.h" .arch armv4t .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 2 .eabi_attribute 30, 2 .eabi_attribute 34, 0 .eabi_attribute 18, 4 .text .align 2 .syntax unified .arm .fpu softvfp .type callback_receiver, %function FUNBEGIN(callback_receiver) // Function supports interworking. // args = 28, pretend = 0, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 push {fp, lr} add fp, sp, $4 sub sp, sp, $32 mov r3, $0 ldr r2, [fp, $4] add ip, fp, $28 str r3, [fp, $-36] str r3, [fp, $-16] str r3, [fp, $-12] sub r1, fp, $36 ldr r3, [r2] ldr r0, [r2, $4] str ip, [fp, $-20] mov lr, pc bx r3 ldr r3, [fp, $-12] cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-28] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-28] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-28] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(28) cmp r3, $12 ldreq r0, [fp, $-28] // float beq L(1) cmp r3, $13 beq L(28) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-36] tst r3, $1024 beq L(1) ldr r3, [fp, $-8] cmp r3, $1 beq L(30) cmp r3, $2 ldr r3, [fp, $-16] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $4 // sp needed pop {fp, lr} bx lr L(25): ldrb r0, [fp, $-28] // zero_extendqisi2 sub sp, fp, $4 // sp needed pop {fp, lr} bx lr L(27): ldr r0, [fp, $-28] sub sp, fp, $4 // sp needed pop {fp, lr} bx lr L(28): sub r0, fp, $28 ldm r0, {r0, r1} b L(1) L(30): ldr r3, [fp, $-16] ldrb r0, [r3] // zero_extendqisi2 b L(1) FUNEND(callback_receiver) .align 2 .global C(callback_get_receiver) .syntax unified .arm .fpu softvfp .type callback_get_receiver, %function FUNBEGIN(callback_get_receiver) // Function supports interworking. // args = 0, pretend = 0, frame = 0 // frame_needed = 1, uses_anonymous_args = 0 // link register save eliminated. str fp, [sp, $-4]! ldr r0, L(33) add fp, sp, $0 L(PIC0): add r0, pc, r0 add sp, fp, $0 // sp needed ldr fp, [sp], $4 bx lr L(34): .align 2 L(33): .word callback_receiver-(L(PIC0)+8) FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/callback/vacall_r/vacall-powerpc-sysv4-macro.S0000664000000000000000000000605614662617145020761 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .type callback_receiver, @function callback_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 29,164(1) addi 0,31,184 li 29,0 stw 0,32(31) stw 29,36(31) lwz 0,0(11) stw 3,52(31) stw 4,56(31) mtctr 0 stw 9,76(31) addi 4,31,16 stw 30,168(1) stw 5,60(31) stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 29,84(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 29,16(31) stw 29,48(31) stw 29,40(31) lwz 3,4(11) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 29,-12(11) lwz 30,-8(11) mtlr 0 lwz 31,-4(11) mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 8,0,0,30,31 rlwinm 5,0,0,0,29 add 6,8,9 bgt- 0,.L33 slwi 0,8,3 cmplwi 0,6,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 7,9,-1 bgt- 0,.L34 lwz 9,0(5) slwi 0,6,3 subfic 0,0,32 and 9,9,7 sraw 3,9,0 b .L1 .L34: lwz 0,0(5) slwi 9,6,3 lwz 10,4(5) subfic 8,9,64 and 0,0,7 addi 9,9,-32 slw 0,0,9 sraw 10,10,8 .L39: or 3,10,0 b .L1 .L33: slwi 0,8,3 cmplwi 0,6,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 29,9,-1 bgt- 0,.L37 lwz 7,0(5) slwi 10,6,2 addi 10,10,-16 lwz 8,4(5) and 7,7,29 slwi 9,6,3 subfic 9,9,64 slw 0,7,10 slw 0,0,10 sraw 8,8,9 or 4,0,8 sraw 3,7,9 b .L1 .L37: slwi 9,6,3 lwz 0,4(5) lwz 10,0(5) subfic 6,9,96 lwz 8,8(5) addi 9,9,-64 slw 7,0,9 and 10,10,29 sraw 8,8,6 slw 10,10,9 sraw 0,0,6 or 4,7,8 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size callback_receiver, .-callback_receiver .section ".got2","aw" .LCTOC1 = .+32768 .section ".text" .section ".got2","aw" .LC0: .long callback_receiver .section ".text" .align 2 .globl callback_get_receiver .LCL1: .long .LCTOC1-.LCF1 .type callback_get_receiver, @function callback_get_receiver: stwu 1,-32(1) mflr 0 bcl 20,31,.LCF1 .LCF1: stw 30,24(1) mflr 30 stw 31,28(1) mr 31,1 stw 0,36(1) lwz 11,0(1) lwz 0,.LCL1-.LCF1(30) lwz 31,-4(11) add 30,0,30 lwz 0,4(11) lwz 3,.LC0-.LCTOC1(30) lwz 30,-8(11) mtlr 0 mr 1,11 blr .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-i386-macro.S0000664000000000000000000001044614662617144016702 00000000000000#include "asm-i386.h" TEXT() ALIGN(2) P2ALIGN(2,3) DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(edi)) INSN1(push,l ,R(esi)) INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(sub,l ,NUM(56), R(esp)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN1(push,l ,X4 MEM_DISP(ecx,4)) INSN1(call,_ ,INDIR(X4 MEM(ecx))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(esi)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(esi), R(esi)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(esi)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(2), R(esi)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(3), R(esi)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(4), R(esi)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(5), R(esi)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(6), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(7), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(8), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(9), R(esi)) INSN1(je,_ ,L(48)) INSN2(lea,l ,X4 MEM_DISP(esi,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(esi)) L(3): INSN2(and,l ,NUM(512), R(esi)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN1(pop,l ,R(edi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(esi)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(13), R(esi)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(14), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(15), R(esi)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(esi)) INSN2(test,l ,NUM(1024), R(esi)) INSN2(mov,l ,R(esi), R(edi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(57)) L(31): INSN2(and,l ,NUM(16), R(edi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN1(pop,l ,R(edi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(48): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(52): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(51): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(49): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(44): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(callback_receiver,L(fe1)-callback_receiver) ALIGN(2) P2ALIGN(2,3) GLOBL(C(callback_get_receiver)) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(ebx)) INSN1(call,_ ,L(59)) L(59): INSN1(pop,l ,R(ebx)) #ifdef __ELF__ INSN2(add,l ,NUM()_GLOBAL_OFFSET_TABLE_+[.-L(59)],R(ebx)) #endif #ifdef __ELF__ INSN2(lea,l ,callback_receiver@MEM_DISP(ebx,GOTOFF), R(eax)) #else INSN2(lea,l ,C(callback_receiver)-L(59)MEM(ebx), R(eax)) #endif INSN2(mov,l ,X4 MEM(esp), R(ebx)) leave ret L(fe2): FUNEND(callback_get_receiver,L(fe2)-callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-libapi.c0000664000000000000000000001101714662613023016355 00000000000000/* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include #include #include #include "vacall-internal.h" /* Room for returning structs according to the Sun C non-reentrant struct return convention. */ typedef union { __vaword room[__VA_ALIST_WORDS]; double align; } __va_struct_buffer_t; static __va_struct_buffer_t vacall_struct_buffer; static _Noreturn void vacall_error_type_mismatch (enum __VAtype start_type, enum __VAtype return_type) { /* If you see this, fix your code. */ fprintf (stderr, "vacall: va_start type %d and va_return type %d disagree.\n", (int)start_type, (int)return_type); abort(); } static _Noreturn void vacall_error_struct_too_large (unsigned int size) { /* If you see this, increase __VA_ALIST_WORDS: */ fprintf (stderr, "vacall: struct of size %u too large for Sun C struct return.\n", size); abort(); } void vacall_start (va_alist list, int rettype, int flags) { __va_start(list,rettype,flags); } void vacall_start_struct (va_alist list, size_t type_size, size_t type_align, int type_splittable, int flags) { __va_start_struct(list,type_size,type_align,type_splittable,flags); } char vacall_arg_char (va_alist list) { return _va_arg_char(list); } signed char vacall_arg_schar (va_alist list) { return _va_arg_schar(list); } unsigned char vacall_arg_uchar (va_alist list) { return _va_arg_uchar(list); } short vacall_arg_short (va_alist list) { return _va_arg_short(list); } unsigned short vacall_arg_ushort (va_alist list) { return _va_arg_ushort(list); } int vacall_arg_int (va_alist list) { return _va_arg_int(list); } unsigned int vacall_arg_uint (va_alist list) { return _va_arg_uint(list); } long vacall_arg_long (va_alist list) { return _va_arg_long(list); } unsigned long vacall_arg_ulong (va_alist list) { return _va_arg_ulong(list); } long long vacall_arg_longlong (va_alist list) { return _va_arg_longlong(list); } unsigned long long vacall_arg_ulonglong (va_alist list) { return _va_arg_ulonglong(list); } float vacall_arg_float (va_alist list) { return _va_arg_float(list); } double vacall_arg_double (va_alist list) { return _va_arg_double(list); } void* vacall_arg_ptr (va_alist list) { return _va_arg_ptr(list); } void* vacall_arg_struct (va_alist list, size_t type_size, size_t type_align) { return __va_arg_struct(list,type_size,type_align); } void vacall_return_void (va_alist list) { _va_return_void(list); } void vacall_return_char (va_alist list, char val) { _va_return_char(list,val); } void vacall_return_schar (va_alist list, signed char val) { _va_return_schar(list,val); } void vacall_return_uchar (va_alist list, unsigned char val) { _va_return_uchar(list,val); } void vacall_return_short (va_alist list, short val) { _va_return_short(list,val); } void vacall_return_ushort (va_alist list, unsigned short val) { _va_return_ushort(list,val); } void vacall_return_int (va_alist list, int val) { _va_return_int(list,val); } void vacall_return_uint (va_alist list, unsigned int val) { _va_return_uint(list,val); } void vacall_return_long (va_alist list, long val) { _va_return_long(list,val); } void vacall_return_ulong (va_alist list, unsigned long val) { _va_return_ulong(list,val); } void vacall_return_longlong (va_alist list, long long val) { _va_return_longlong(list,val); } void vacall_return_ulonglong (va_alist list, unsigned long long val) { _va_return_ulonglong(list,val); } void vacall_return_float (va_alist list, float val) { _va_return_float(list,val); } void vacall_return_double (va_alist list, double val) { _va_return_double(list,val); } void vacall_return_ptr (va_alist list, void* val) { _va_return_ptr(list,val); } void vacall_return_struct (va_alist list, size_t type_size, size_t type_align, const void* val_addr) { __va_return_struct(list,type_size,type_align,val_addr); } libffcall-2.5/callback/vacall_r/vacall-loongarch64-macro.S0000664000000000000000000000776214662617145020347 00000000000000 .file "vacall-loongarch64.c" .text .align 2 .type callback_receiver, @function callback_receiver: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-288 .cfi_def_cfa_offset 288 st.d $r1,$r3,264 st.d $r22,$r3,256 st.d $r23,$r3,248 .cfi_offset 1, -24 .cfi_offset 22, -32 .cfi_offset 23, -40 addi.d $r22,$r3,272 .cfi_def_cfa 22, 16 addi.d $r13,$r22,16 ldptr.d $r12,$r20,0 st.d $r11,$r22,8 st.d $r5,$r22,-192 st.d $r6,$r22,-184 st.d $r7,$r22,-176 st.d $r8,$r22,-168 st.d $r9,$r22,-160 st.d $r10,$r22,-152 st.d $r11,$r22,-144 fst.s $f0,$r22,-132 fst.s $f1,$r22,-128 fst.s $f2,$r22,-124 fst.s $f3,$r22,-120 fst.s $f4,$r22,-116 fst.s $f5,$r22,-112 fst.s $f6,$r22,-108 fst.s $f7,$r22,-104 fst.d $f0,$r22,-96 fst.d $f1,$r22,-88 fst.d $f2,$r22,-80 fst.d $f3,$r22,-72 fst.d $f4,$r22,-64 fst.d $f5,$r22,-56 fst.d $f6,$r22,-48 fst.d $f7,$r22,-40 st.d $r13,$r22,-240 st.d $r4,$r22,-200 st.w $r0,$r22,-264 st.d $r0,$r22,-232 ld.d $r4,$r20,8 st.w $r0,$r22,-224 st.w $r0,$r22,-208 st.w $r0,$r22,-136 addi.d $r5,$r22,-264 jirl $r1,$r12,0 ldptr.w $r12,$r22,-224 beqz $r12,.L1 addi.w $r13,$r0,15 # 0xf bgtu $r12,$r13,.L1 la.local $r13,.L4 slli.d $r12,$r12,3 ldx.d $r12,$r13,$r12 add.d $r13,$r13,$r12 jr $r13 .section .rodata .align 3 .align 2 .L4: .dword .L1-.L4 .dword .L15-.L4 .dword .L15-.L4 .dword .L14-.L4 .dword .L13-.L4 .dword .L12-.L4 .dword .L11-.L4 .dword .L10-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L7-.L4 .dword .L6-.L4 .dword .L5-.L4 .dword .L3-.L4 .text .L5: ld.d $r4,$r22,-256 .L1: ld.d $r1,$r3,264 .cfi_remember_state .cfi_restore 1 ld.d $r22,$r3,256 .cfi_restore 22 ld.d $r23,$r3,248 .cfi_restore 23 addi.d $r3,$r3,288 .cfi_def_cfa 3, 0 jr $r1 .L15: .cfi_restore_state ld.b $r4,$r22,-256 b .L1 .L10: ld.wu $r4,$r22,-256 b .L1 .L14: ld.bu $r4,$r22,-256 b .L1 .L13: ld.h $r4,$r22,-256 b .L1 .L12: ld.hu $r4,$r22,-256 b .L1 .L11: ldptr.w $r4,$r22,-256 b .L1 .L6: fld.d $f0,$r22,-256 b .L1 .L7: fld.s $f0,$r22,-256 b .L1 .L3: ldptr.w $r12,$r22,-264 andi $r12,$r12,1024 beqz $r12,.L1 ld.d $r12,$r22,-216 addi.w $r13,$r0,15 # 0xf addi.d $r14,$r12,-1 bgtu $r14,$r13,.L1 ld.d $r13,$r22,-232 addi.w $r15,$r0,-8 # 0xfffffffffffffff8 addi.w $r23,$r0,8 # 0x8 andi $r14,$r13,7 add.d $r16,$r12,$r14 and $r13,$r13,$r15 ldptr.d $r17,$r13,0 slli.w $r15,$r16,3 slli.w $r18,$r14,3 bgtu $r12,$r23,.L17 bgtu $r16,$r23,.L18 addi.w $r15,$r15,-1 addi.w $r4,$r0,2 # 0x2 sll.d $r4,$r4,$r15 addi.d $r4,$r4,-1 and $r4,$r4,$r17 sra.d $r4,$r4,$r18 b .L1 .L17: addi.w $r12,$r0,16 # 0x10 ld.d $r19,$r13,8 sra.d $r17,$r17,$r18 sub.d $r23,$r23,$r14 bgtu $r16,$r12,.L19 addi.w $r15,$r15,-65 addi.w $r5,$r0,2 # 0x2 sll.d $r5,$r5,$r15 addi.d $r5,$r5,-1 and $r5,$r5,$r19 slli.w $r23,$r23,2 sll.d $r4,$r5,$r23 sll.d $r4,$r4,$r23 or $r4,$r4,$r17 sra.d $r5,$r5,$r18 b .L1 .L18: ld.d $r16,$r13,8 addi.w $r15,$r15,-65 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r15 addi.d $r12,$r12,-1 sub.d $r13,$r23,$r14 and $r12,$r12,$r16 slli.w $r13,$r13,3 sll.d $r12,$r12,$r13 sra.d $r17,$r17,$r18 or $r4,$r12,$r17 b .L1 .L19: ld.d $r14,$r13,16 addi.w $r15,$r15,-129 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r15 addi.d $r12,$r12,-1 slli.w $r13,$r23,3 and $r12,$r12,$r14 sll.d $r4,$r19,$r13 sll.d $r12,$r12,$r13 sra.d $r19,$r19,$r18 or $r4,$r4,$r17 or $r5,$r12,$r19 b .L1 .cfi_endproc .LFE0: .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1 = . .cfi_startproc addi.d $r3,$r3,-16 .cfi_def_cfa_offset 16 st.d $r22,$r3,8 .cfi_offset 22, -8 addi.d $r22,$r3,16 .cfi_def_cfa 22, 0 ld.d $r22,$r3,8 .cfi_restore 22 la.local $r4,callback_receiver addi.d $r3,$r3,16 .cfi_def_cfa_register 3 jr $r1 .cfi_endproc .LFE1: .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-mipsn32eb-linux.s0000664000000000000000000001254114662617144020107 00000000000000 .file 1 "vacall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,256,$31 # vars= 144, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $fp,176($sp) move $fp,$sp sd $4,192($fp) lw $4,4($2) lw $25,0($2) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) move $5,$fp swc1 $f19,72($fp) sw $12,24($fp) sw $0,0($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L49 li $13,4 # 0x4 beq $12,$13,.L50 li $13,5 # 0x5 beq $12,$13,.L51 li $13,6 # 0x6 beq $12,$13,.L46 li $13,7 # 0x7 beq $12,$13,.L45 li $13,8 # 0x8 beq $12,$13,.L46 li $13,9 # 0x9 beq $12,$13,.L45 li $13,10 # 0xa beq $12,$13,.L47 li $13,11 # 0xb beq $12,$13,.L47 li $13,12 # 0xc beq $12,$13,.L52 li $13,13 # 0xd beq $12,$13,.L53 li $13,14 # 0xe beq $12,$13,.L46 li $13,15 # 0xf bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 # 0x1 beq $12,$13,.L54 li $13,2 # 0x2 beq $12,$13,.L55 li $13,4 # 0x4 beq $12,$13,.L56 li $13,8 # 0x8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($15) sll $13,$13,3 li $15,-1 # 0xffffffffffffffff dsll $13,$15,$13 and $13,$13,$25 sll $14,$14,3 dsll $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $24,$13,.L57 li $13,8 # 0x8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 # 0x10 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $24,$12,.L61 li $12,16 # 0x10 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 subu $13,$0,$13 ld $17,8($15) subu $16,$0,$14 li $25,-1 # 0xffffffffffffffff sll $13,$13,3 dsll $13,$25,$13 sll $25,$16,2 ld $16,0($15) and $13,$13,$17 addiu $15,$25,32 sll $14,$14,3 dsra $25,$13,$15 dsll $16,$16,$14 dsra $15,$25,$15 or $2,$16,$15 b .L23 dsll $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($15) ld $16,8($15) ld $17,0($15) subu $25,$0,$14 li $15,-1 # 0xffffffffffffffff sll $13,$13,3 sll $25,$25,3 dsll $13,$15,$13 sll $14,$14,3 addiu $15,$25,64 and $13,$13,$18 dsll $25,$17,$14 dsra $13,$13,$15 dsra $17,$16,$15 dsll $14,$16,$14 or $2,$25,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($15) ld $25,0($15) sll $13,$13,3 li $15,-1 # 0xffffffffffffffff dsll $13,$15,$13 subu $15,$0,$14 and $13,$13,$16 sll $15,$15,3 sll $14,$14,3 dsra $13,$13,$15 dsll $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,16,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) addu $13,$13,$25 addiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) addiu $sp,$sp,-16 lw $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) addiu $2,$12,%got_ofst(callback_receiver) j $31 addiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/vacall-powerpc-linux.s0000664000000000000000000000573614662617145017775 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .type callback_receiver, @function callback_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 29,164(1) addi 0,31,184 li 29,0 stw 0,32(31) stw 29,36(31) lwz 0,0(11) stw 3,52(31) stw 4,56(31) mtctr 0 stw 9,76(31) addi 4,31,16 stw 30,168(1) stw 5,60(31) stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 29,84(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 29,16(31) stw 29,48(31) stw 29,40(31) lwz 3,4(11) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 29,-12(11) lwz 30,-8(11) mtlr 0 lwz 31,-4(11) mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 8,0,0,30,31 rlwinm 5,0,0,0,29 add 6,8,9 bgt- 0,.L33 slwi 0,8,3 cmplwi 0,6,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 7,9,-1 bgt- 0,.L34 lwz 9,0(5) slwi 0,6,3 subfic 0,0,32 and 9,9,7 sraw 3,9,0 b .L1 .L34: lwz 0,0(5) slwi 9,6,3 lwz 10,4(5) subfic 8,9,64 and 0,0,7 addi 9,9,-32 slw 0,0,9 sraw 10,10,8 .L39: or 3,10,0 b .L1 .L33: slwi 0,8,3 cmplwi 0,6,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 29,9,-1 bgt- 0,.L37 lwz 7,0(5) slwi 10,6,2 addi 10,10,-16 lwz 8,4(5) and 7,7,29 slwi 9,6,3 subfic 9,9,64 slw 0,7,10 slw 0,0,10 sraw 8,8,9 or 4,0,8 sraw 3,7,9 b .L1 .L37: slwi 9,6,3 lwz 0,4(5) lwz 10,0(5) subfic 6,9,96 lwz 8,8(5) addi 9,9,-64 slw 7,0,9 and 10,10,29 sraw 8,8,6 slw 10,10,9 sraw 0,0,6 or 4,7,8 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size callback_receiver, .-callback_receiver .section ".got2","aw" .LCTOC1 = .+32768 .section ".text" .section ".got2","aw" .LC0: .long callback_receiver .section ".text" .align 2 .globl callback_get_receiver .LCL1: .long .LCTOC1-.LCF1 .type callback_get_receiver, @function callback_get_receiver: stwu 1,-32(1) mflr 0 bcl 20,31,.LCF1 .LCF1: stw 30,24(1) mflr 30 stw 31,28(1) mr 31,1 stw 0,36(1) lwz 11,0(1) lwz 0,.LCL1-.LCF1(30) lwz 31,-4(11) add 30,0,30 lwz 0,4(11) lwz 3,.LC0-.LCTOC1(30) lwz 30,-8(11) mtlr 0 mr 1,11 blr .size callback_get_receiver, .-callback_get_receiver .section .note.GNU-stack,"",@progbits .ident "GCC: (GNU) 3.3.6" libffcall-2.5/callback/vacall_r/vacall-riscv32-ilp32d-macro.S0000664000000000000000000000507114662617145020576 00000000000000 .file "vacall-riscv32.c" .option pic .text .align 1 .type callback_receiver, @function callback_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 sw a1,-144(s0) add a1,s0,16 lw t3,0(t2) sw a7,12(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a1,-168(s0) sw a0,-148(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) lw a0,4(t2) sw zero,-152(s0) sw zero,-116(s0) add a1,s0,-184 jalr t3 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size callback_receiver, .-callback_receiver .align 1 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: add sp,sp,-16 sw s0,12(sp) add s0,sp,16 lw s0,12(sp) lla a0,callback_receiver add sp,sp,16 jr ra .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-hppa64-macro.S0000664000000000000000000001073614662617145017316 00000000000000#include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(callback_receiver) DECLARE_FUNCTION(callback_receiver) DEF(callback_receiver) .PROC .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,384(%r30) std %r5,224(%r3) copy %r27,%r5 std %r9,192(%r3) std %r8,200(%r3) std %r7,208(%r3) std %r6,216(%r3) std %r4,232(%r3) std %r26,-64(%r29) std %r25,-56(%r29) std %r19,-8(%r29) std %r24,-48(%r29) std %r23,-40(%r29) std %r22,-32(%r29) std %r21,-24(%r29) std %r20,-16(%r29) fstw %fr4R,88(%r3) fstw %fr5R,92(%r3) fstw %fr6R,96(%r3) fstw %fr7R,100(%r3) fstw %fr8R,104(%r3) fstw %fr9R,108(%r3) fstw %fr10R,112(%r3) fstw %fr11R,116(%r3) fstd %fr10,168(%r3) ldo -64(%r29),%r2 ldo 16(%r3),%r25 std %r0,48(%r3) std %r2,40(%r3) std %r29,80(%r3) ldo -16(%r30),%r29 fstd %fr11,176(%r3) fstd %fr4,120(%r3) fstd %fr5,128(%r3) fstd %fr6,136(%r3) fstd %fr7,144(%r3) fstd %fr8,152(%r3) fstd %fr9,160(%r3) stw %r0,16(%r3) stw %r0,56(%r3) ldd 0(%r31),%r4 ldd 8(%r31),%r26 ldd 16(%r4),%r2 ldd 24(%r4),%r27 bve,l (%r2),%r2 nop ldw 56(%r3),%r2 cmpib,= 0,%r2,L(1) copy %r5,%r27 cmpib,=,n 1,%r2,L(43) cmpib,=,n 2,%r2,L(43) cmpib,=,n 3,%r2,L(44) cmpib,=,n 4,%r2,L(45) cmpib,=,n 5,%r2,L(46) cmpib,=,n 6,%r2,L(47) cmpib,=,n 7,%r2,L(41) cmpib,=,n 8,%r2,L(40) cmpib,=,n 10,%r2,L(40) cmpib,=,n 9,%r2,L(40) cmpib,=,n 11,%r2,L(40) cmpib,=,n 12,%r2,L(48) cmpib,=,n 13,%r2,L(49) cmpib,=,n 14,%r2,L(40) cmpib,= 15,%r2,L(50) ldw 16(%r3),%r2 DEF(L(1)) ldd -16(%r3),%r2 ldd 192(%r3),%r9 ldd 200(%r3),%r8 ldd 208(%r3),%r7 ldd 216(%r3),%r6 ldd 224(%r3),%r5 ldd 232(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 DEF(L(50)) extrd,u %r2,53+1-1,1,%r2 cmpib,= 0,%r2,L(1) ldd 48(%r3),%r28 ldd 48(%r3),%r2 ldd 64(%r3),%r4 extrd,u %r2,63,3,%r7 copy %r2,%r1 depdi 0,63,3,%r1 cmpib,*<< 8,%r4,L(32) add,l %r7,%r4,%r5 cmpib,*<< 8,%r5,L(33) depd,z %r5,60,61,%r2 subi 64,%r2,%r2 ldd 0(%r1),%r4 extrd,s %r2,63,32,%r2 mtsarcm %r2 depd,z %r7,60,61,%r5 depdi,z 1,%sar,64,%r2 mtsarcm %r5 sub %r0,%r2,%r2 and %r4,%r2,%r4 depd,z %r4,%sar,64,%r4 b L(1) copy %r4,%r28 DEF(L(33)) subi 128,%r2,%r2 depd,z %r7,60,61,%r4 extrd,s %r2,63,32,%r2 subi 64,%r4,%r6 mtsarcm %r2 subi 63,%r4,%r8 depdi,z 1,%sar,64,%r2 mtsar %r8 ldd 8(%r1),%r5 sub %r0,%r2,%r2 extrd,s %r6,63,32,%r6 ldd 0(%r1),%r4 subi 63,%r6,%r6 and %r5,%r2,%r5 depd,z %r4,%sar,64,%r4 mtsar %r6 extrd,s %r5,%sar,64,%r5 DEF(L(39)) b L(1) or %r5,%r4,%r28 DEF(L(32)) ldi 16,%r2 cmpb,*<< %r2,%r5,L(36) depd,z %r5,60,61,%r2 subi 128,%r2,%r2 depd,z %r7,61,62,%r4 extrd,s %r2,63,32,%r2 subi 32,%r4,%r4 mtsarcm %r2 extrd,s %r4,63,32,%r4 depdi,z 1,%sar,64,%r2 subi 63,%r4,%r8 ldd 8(%r1),%r5 sub %r0,%r2,%r2 mtsar %r8 ldd 0(%r1),%r6 and %r5,%r2,%r5 depd,z %r7,60,61,%r2 extrd,s %r5,%sar,64,%r4 subi 63,%r2,%r2 extrd,s %r4,%sar,64,%r4 mtsar %r2 depd,z %r5,%sar,64,%r5 depd,z %r6,%sar,64,%r6 copy %r5,%r29 b L(1) or %r6,%r4,%r28 DEF(L(36)) subi 192,%r2,%r2 depd,z %r7,60,61,%r4 extrd,s %r2,63,32,%r2 subi 64,%r4,%r7 mtsarcm %r2 subi 63,%r4,%r9 depdi,z 1,%sar,64,%r2 mtsar %r9 ldd 8(%r1),%r4 sub %r0,%r2,%r2 ldd 16(%r1),%r6 extrd,s %r7,63,32,%r7 subi 63,%r7,%r7 and %r6,%r2,%r6 ldd 0(%r1),%r5 depd,z %r4,%sar,64,%r2 mtsar %r7 extrd,s %r6,%sar,64,%r6 mtsar %r9 depd,z %r5,%sar,64,%r5 or %r2,%r6,%r29 mtsar %r7 b L(39) extrd,s %r4,%sar,64,%r4 DEF(L(40)) b L(1) ldd 24(%r3),%r28 DEF(L(49)) b L(40) fldd 24(%r3),%fr4 DEF(L(48)) fldw 24(%r3),%fr4R DEF(L(41)) ldw 24(%r3),%r2 DEF(L(42)) b L(1) copy %r2,%r28 DEF(L(47)) ldw 24(%r3),%r2 b L(1) extrd,s %r2,63,32,%r28 DEF(L(46)) b L(42) ldh 24(%r3),%r2 DEF(L(45)) ldh 24(%r3),%r2 b L(1) extrd,s %r2,63,16,%r28 DEF(L(44)) b L(42) ldb 24(%r3),%r2 DEF(L(43)) ldb 24(%r3),%r2 b L(1) extrd,s %r2,63,8,%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(callback_receiver) .data .align 8 DEF(L(C0)) .dword P%callback_receiver TEXT1() TEXT2() .align 8 GLOBL(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) DEF(callback_get_receiver) .PROC .CALLINFO FRAME=128,NO_CALLS,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 copy %r30,%r3 std,ma %r1,128(%r30) addil LT!L(C0),%r27 ldd RT!L(C0)(%r1),%r1 ldd 0(%r1),%r28 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 .EXIT .PROCEND DEF(L(fe2)) FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-m68k-linux.s0000664000000000000000000000527714662617144017102 00000000000000 .file "vacall-m68k.c" .text .align 2 .type callback_receiver,@function callback_receiver: link.w %a6,#-32 movm.l #0x3030,-(%sp) clr.l -32(%a6) lea (8,%a6),%a2 move.l %a2,-20(%a6) clr.l -16(%a6) clr.l -12(%a6) move.l %a1,-4(%a6) pea -32(%a6) move.l 4(%a0),-(%sp) move.l (%a0),%a2 jsr (%a2) addq.l #8,%sp move.l -12(%a6),%a3 tst.l %a3 jbeq .L1 moveq.l #1,%d2 cmp.l %a3,%d2 jbeq .L46 moveq.l #2,%d3 cmp.l %a3,%d3 jbeq .L46 moveq.l #3,%d2 cmp.l %a3,%d2 jbeq .L47 moveq.l #4,%d3 cmp.l %a3,%d3 jbeq .L48 moveq.l #5,%d2 cmp.l %a3,%d2 jbeq .L49 moveq.l #6,%d3 cmp.l %a3,%d3 jbeq .L45 moveq.l #7,%d2 cmp.l %a3,%d2 jbeq .L45 moveq.l #8,%d3 cmp.l %a3,%d3 jbeq .L45 moveq.l #9,%d2 cmp.l %a3,%d2 jbeq .L45 lea (-10,%a3),%a2 moveq.l #1,%d3 cmp.l %a2,%d3 jbcs .L22 move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra .L1 .align 2 .L22: moveq.l #12,%d2 cmp.l %a3,%d2 jbeq .L50 moveq.l #13,%d2 cmp.l %a3,%d2 jbeq .L51 moveq.l #14,%d3 cmp.l %a3,%d3 jbeq .L52 moveq.l #15,%d2 cmp.l %a3,%d2 jbne .L1 btst #2,-30(%a6) jbeq .L1 move.l -8(%a6),%d2 moveq.l #1,%d3 cmp.l %d2,%d3 jbeq .L53 moveq.l #2,%d3 cmp.l %d2,%d3 jbeq .L54 moveq.l #4,%d3 cmp.l %d2,%d3 jbeq .L55 moveq.l #8,%d3 cmp.l %d2,%d3 jbne .L1 move.l -16(%a6),%a2 move.l (%a2),%d0 move.l 4(%a2),%d1 jbra .L1 .align 2 .L55: move.l -16(%a6),%a2 move.l (%a2),%d0 jbra .L1 .align 2 .L54: move.l -16(%a6),%a2 clr.l %d0 move.w (%a2),%d0 jbra .L1 .align 2 .L53: move.l -16(%a6),%a2 clr.l %d0 move.b (%a2),%d0 jbra .L1 .align 2 .L52: move.l -28(%a6),%d0 move.l %d0,%a0 jbra .L1 .align 2 .L51: btst #6,-29(%a6) jbeq .L31 fmove.d -28(%a6),%fp0 jbra .L1 .align 2 .L31: move.l -28(%a6),%d0 move.l -24(%a6),%d1 jbra .L1 .align 2 .L50: move.l -32(%a6),%d2 btst #6,%d2 jbeq .L25 fmove.s -28(%a6),%fp0 jbra .L1 .align 2 .L25: btst #5,%d2 jbeq .L27 fmove.s -28(%a6),%fp1 fmove.d %fp1,-(%sp) move.l (%sp)+,%d0 move.l (%sp)+,%d1 jbra .L1 .align 2 .L27: move.l -28(%a6),%d0 jbra .L1 .align 2 .L45: move.l -28(%a6),%d0 jbra .L1 .align 2 .L49: clr.l %d0 move.w -28(%a6),%d0 jbra .L1 .align 2 .L48: move.w -28(%a6),%d0 ext.l %d0 jbra .L1 .align 2 .L47: clr.l %d0 move.b -28(%a6),%d0 jbra .L1 .align 2 .L46: move.b -28(%a6),%d0 extb.l %d0 .L1: movm.l -48(%a6),#0xc0c unlk %a6 rts .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .align 2 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: link.w %a6,#0 move.l %a5,-(%sp) lea (%pc, _GLOBAL_OFFSET_TABLE_@GOTPC), %a5 move.l callback_receiver@GOT(%a5),%a0 move.l %a0,%d0 move.l (%sp)+,%a5 unlk %a6 rts .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-arm64-macro.S0000664000000000000000000000606114662617145017141 00000000000000#include "asm-arm64.h" .cpu generic+fp+simd .text .align 2 .p2align 3,,7 DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) stp x29, x30, [sp, -256]! add x29, sp, 0 ldr x10, [x18] add x11, x29, 256 stp s0, s1, [x29, 156] stp s2, s3, [x29, 164] stp x0, x1, [x29, 88] stp s4, s5, [x29, 172] stp x11, xzr, [x29, 40] stp s6, s7, [x29, 180] str x8, [x29, 72] stp d0, d1, [x29, 192] stp x2, x3, [x29, 104] stp d2, d3, [x29, 208] stp x4, x5, [x29, 120] stp d4, d5, [x29, 224] stp x6, x7, [x29, 136] stp d6, d7, [x29, 240] str wzr, [x29, 16] add x1, x29, 16 str wzr, [x29, 56] ldr x0, [x18, 8] str wzr, [x29, 80] str wzr, [x29, 152] blr x10 ldr w9, [x29, 56] cbz w9, L(1) cmp w9, 1 beq L(25) cmp w9, 2 beq L(29) cmp w9, 3 beq L(25) cmp w9, 4 beq L(30) cmp w9, 5 beq L(31) cmp w9, 6 beq L(32) cmp w9, 7 beq L(33) and w10, w9, -3 cmp w10, 8 beq L(27) cmp w10, 9 beq L(27) cmp w9, 12 beq L(34) cmp w9, 13 beq L(35) cmp w9, 14 beq L(27) cmp w9, 15 bne L(1) ldr w9, [x29, 16] tbz x9, 10, L(1) ldr x9, [x29, 64] sub x10, x9, $1 cmp x10, 15 bhi L(1) ldr x11, [x29, 48] cmp x9, 8 and x10, x11, 7 and x11, x11, -8 add x9, x9, x10 bhi L(15) cmp x9, 8 lsl w9, w9, 3 bhi L(16) mov x12, 2 sub w9, w9, $1 lsl x9, x12, x9 ldr x11, [x11] sub x9, x9, $1 lsl w10, w10, 3 and x9, x9, x11 asr x0, x9, x10 L(1): ldp x29, x30, [sp], 256 ret .p2align 3 L(25): ldrb w0, [x29, 24] ldp x29, x30, [sp], 256 ret .p2align 3 L(27): ldr x0, [x29, 24] b L(1) .p2align 3 L(29): ldrsb x0, [x29, 24] b L(1) .p2align 3 L(30): ldrsh x0, [x29, 24] b L(1) .p2align 3 L(31): ldrh w0, [x29, 24] b L(1) .p2align 3 L(32): ldrsw x0, [x29, 24] b L(1) .p2align 3 L(33): ldr w0, [x29, 24] b L(1) L(34): ldr s0, [x29, 24] b L(1) L(35): ldr d0, [x29, 24] b L(1) L(15): cmp x9, 16 lsl w9, w9, 3 bls L(36) mov x13, 2 sub w9, w9, $129 ldp x14, x12, [x11, 8] lsl x9, x13, x9 lsl w15, w10, 3 sub x9, x9, $1 neg w10, w10, lsl 3 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 lsl x16, x14, x10 asr x11, x11, x15 asr x14, x14, x15 lsl x10, x9, x10 orr x0, x11, x16 orr x1, x10, x14 b L(1) L(16): mov w13, -8 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 64 and x9, x9, x12 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x9, x11 b L(1) L(36): mov w13, -4 mov x14, 2 sub w9, w9, $65 lsl w15, w10, 3 ldr x12, [x11, 8] lsl x9, x14, x9 mul w10, w13, w10 sub x9, x9, $1 ldr x11, [x11] add w10, w10, 32 and x9, x9, x12 asr x1, x9, x15 lsl x9, x9, x10 asr x11, x11, x15 lsl x9, x9, x10 orr x0, x11, x9 b L(1) FUNEND(callback_receiver) .align 2 .p2align 3,,7 .global C(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) adrp x9, PAGE(C(callback_receiver)) add x0, x9, PAGEOFF(C(callback_receiver)) ret FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/callback/vacall_r/vacall_r.h0000664000000000000000000005712614662613237015467 00000000000000/* * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _VACALL_R_H #define _VACALL_R_H #include #include "ffcall-abi.h" /* Use a consistent prefix for all symbols in libcallback. */ #define vacall_start callback_start #define vacall_start_struct callback_start_struct #define vacall_arg_char callback_arg_char #define vacall_arg_schar callback_arg_schar #define vacall_arg_uchar callback_arg_uchar #define vacall_arg_short callback_arg_short #define vacall_arg_ushort callback_arg_ushort #define vacall_arg_int callback_arg_int #define vacall_arg_uint callback_arg_uint #define vacall_arg_long callback_arg_long #define vacall_arg_ulong callback_arg_ulong #define vacall_arg_longlong callback_arg_longlong #define vacall_arg_ulonglong callback_arg_ulonglong #define vacall_arg_float callback_arg_float #define vacall_arg_double callback_arg_double #define vacall_arg_ptr callback_arg_ptr #define vacall_arg_struct callback_arg_struct #define vacall_return_void callback_return_void #define vacall_return_char callback_return_char #define vacall_return_schar callback_return_schar #define vacall_return_uchar callback_return_uchar #define vacall_return_short callback_return_short #define vacall_return_ushort callback_return_ushort #define vacall_return_int callback_return_int #define vacall_return_uint callback_return_uint #define vacall_return_long callback_return_long #define vacall_return_ulong callback_return_ulong #define vacall_return_longlong callback_return_longlong #define vacall_return_ulonglong callback_return_ulonglong #define vacall_return_float callback_return_float #define vacall_return_double callback_return_double #define vacall_return_ptr callback_return_ptr #define vacall_return_struct callback_return_struct #define vacall_error_type_mismatch callback_error_type_mismatch #define vacall_error_struct_too_large callback_error_struct_too_large #define vacall_structcpy callback_structcpy #define vacall_struct_buffer callback_struct_buffer /* Determine whether the current ABI is LLP64 ('long' = 32-bit, 'long long' = 'void*' = 64-bit). */ #if defined(__x86_64__) && defined(_WIN32) && !defined(__CYGWIN__) #define __VA_LLP64 1 #endif /* Determine the alignment of a type at compile time. */ #if defined(__GNUC__) || defined(__IBM__ALIGNOF__) #define __VA_alignof __alignof__ #elif defined(__cplusplus) template struct __VA_alignof_helper { char __slot1; type __slot2; }; #define __VA_alignof(type) offsetof (__VA_alignof_helper, __slot2) #elif defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) /* SGI compiler */ #define __VA_alignof __builtin_alignof #else #define __VA_offsetof(type,ident) ((unsigned long)&(((type*)0)->ident)) #define __VA_alignof(type) __VA_offsetof(struct { char __slot1; type __slot2; }, __slot2) #endif #ifdef __cplusplus extern "C" { #endif /* __vaword represents a single word that can be pushed on the stack. * __varword represents a general-purpose register. */ #if defined(__arm64__) && defined(__APPLE__) && defined(__MACH__) typedef int __vaword; typedef long __varword; #elif defined(__mipsn32__) || defined(__x86_64_x32__) || defined(__VA_LLP64) typedef long long __vaword; typedef long long __varword; #else typedef long __vaword; typedef long __varword; #endif /* C builtin types. */ enum __VAtype { __VAvoid, __VAchar, __VAschar, __VAuchar, __VAshort, __VAushort, __VAint, __VAuint, __VAlong, __VAulong, __VAlonglong, __VAulonglong, __VAfloat, __VAdouble, __VAvoidp, __VAstruct }; enum __VA_alist_flags { /* how to return structs */ /* There are basically 3 ways to return structs: * a. The called function returns a pointer to static data. Not reentrant. * Not supported any more. * b. The caller passes the return structure address in a dedicated register * or as a first (or last), invisible argument. The called function stores * its result there. * c. Like b, and the called function also returns the return structure * address in the return value register. (This is not very distinguishable * from b.) * Independently of this, * r. small structures (<= 4 or <= 8 bytes) may be returned in the return * value register(s), or * m. even small structures are passed in memory. */ /* gcc-2.6.3 employs the following strategy: * - If PCC_STATIC_STRUCT_RETURN is defined in the machine description * it uses method a, else method c. * - If flag_pcc_struct_return is set (either by -fpcc-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 1 in the machine description) * it uses method m, else (either by -freg-struct-return or if * DEFAULT_PCC_STRUCT_RETURN is defined to 0 in the machine description) * method r. */ __VA_SMALL_STRUCT_RETURN = 1<<1, /* r: special case for small structs */ __VA_GCC_STRUCT_RETURN = 1<<2, /* consider 8 byte structs as small */ #if defined(__sparc__) && !defined(__sparc64__) __VA_SUNCC_STRUCT_RETURN = 1<<3, __VA_SUNPROCC_STRUCT_RETURN = 1<<4, #else __VA_SUNCC_STRUCT_RETURN = 0, __VA_SUNPROCC_STRUCT_RETURN = 0, #endif #if defined(__i386__) __VA_MSVC_STRUCT_RETURN = 1<<4, #endif /* the default way to return structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another struct returning convention, * just #define __VA_STRUCT_RETURN ... * before or after #including . */ #ifndef __VA_STRUCT_RETURN __VA_STRUCT_RETURN = #if defined(__sparc__) && !defined(__sparc64__) && defined(__sun) && (defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* SUNWspro cc or CC */ __VA_SUNPROCC_STRUCT_RETURN, #else #if (defined(__i386__) && (defined(_WIN32) || defined(__CYGWIN__) || (defined(__MACH__) && defined(__APPLE__)) || defined(__FreeBSD__) || defined(__DragonFly__) || defined(__OpenBSD__))) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__hppa__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || (defined(__powerpc__) && !defined(__powerpc64__) && (defined(__FreeBSD__) || defined(__DragonFly__) || defined(__NetBSD__))) || defined(__powerpc64_elfv2__) || defined(__ia64__) || defined(__x86_64__) || defined(__riscv32__) || defined(__riscv64__) || defined(__loongarch64__) __VA_SMALL_STRUCT_RETURN | #endif #if defined(__GNUC__) && !((defined(__mipsn32__) || defined(__mips64__)) && ((__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3))) __VA_GCC_STRUCT_RETURN | #endif #if defined(__i386__) && defined(_WIN32) && !defined(__CYGWIN__) /* native Windows */ __VA_MSVC_STRUCT_RETURN | #endif 0, #endif #endif /* how to return floats */ #if defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__)) __VA_SUNCC_FLOAT_RETURN = 1<<5, #endif #if defined(__m68k__) __VA_FREG_FLOAT_RETURN = 1<<6, #endif /* the default way to return floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float returning convention, * just #define __VA_FLOAT_RETURN ... * before or after #including . */ #ifndef __VA_FLOAT_RETURN #if (defined(__m68k__) || (defined(__sparc__) && !defined(__sparc64__))) && !defined(__GNUC__) && defined(__sun) && !(defined(__SUNPRO_C) || defined(__SUNPRO_CC)) /* Sun cc or CC */ __VA_FLOAT_RETURN = __VA_SUNCC_FLOAT_RETURN, #elif defined(__m68k__) __VA_FLOAT_RETURN = __VA_FREG_FLOAT_RETURN, #else __VA_FLOAT_RETURN = 0, #endif #endif /* how to pass structs */ #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) __VA_SGICC_STRUCT_ARGS = 1<<7, #endif #if defined(__powerpc__) || defined(__powerpc64__) __VA_AIXCC_STRUCT_ARGS = 1<<7, #endif #if defined(__ia64__) __VA_OLDGCC_STRUCT_ARGS = 1<<7, #endif /* the default way to pass structs */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another structs passing convention, * just #define __VA_STRUCT_ARGS ... * before or after #including . */ #ifndef __VA_STRUCT_ARGS #if (defined(__mips__) && !defined(__mipsn32__) && !defined(__mips64__)) && !defined(__GNUC__) /* SGI mips cc */ __VA_STRUCT_ARGS = __VA_SGICC_STRUCT_ARGS, #else #if (defined(__mipsn32__) || defined(__mips64__)) && (!defined(__GNUC__) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4) || (__GNUC__ > 3)) /* SGI mips cc or gcc >= 3.4 */ __VA_STRUCT_ARGS = __VA_SGICC_STRUCT_ARGS, #else #if defined(__powerpc__) && !defined(__powerpc64__) && defined(_AIX) && !defined(__GNUC__) /* AIX 32-bit cc, xlc */ __VA_STRUCT_ARGS = __VA_AIXCC_STRUCT_ARGS, #else #if defined(__powerpc64__) && defined(_AIX) /* AIX 64-bit cc, xlc, gcc, xlclang */ __VA_STRUCT_ARGS = __VA_AIXCC_STRUCT_ARGS, #else #if defined(__ia64__) && !(defined(__GNUC__) && (__GNUC__ >= 3)) __VA_STRUCT_ARGS = __VA_OLDGCC_STRUCT_ARGS, #else __VA_STRUCT_ARGS = 0, #endif #endif #endif #endif #endif #endif /* how to pass floats */ /* ANSI C compilers and GNU gcc pass floats as floats. * K&R C compilers pass floats as doubles. We don't support them any more. */ #if defined(__powerpc64__) __VA_AIXCC_FLOAT_ARGS = 1<<8, /* pass floats in the low 4 bytes of an 8-bytes word */ #endif /* the default way to pass floats */ /* This choice here is based on the assumption that the function you are * going to call has been compiled with the same compiler you are using to * include this file. * If you want to call functions with another float passing convention, * just #define __VA_FLOAT_ARGS ... * before or after #including . */ #ifndef __VA_FLOAT_ARGS #if defined(__powerpc64__) && defined(_AIX) && (defined(__ibmxl__) || !defined(__GNUC__)) /* AIX 64-bit xlc, xlclang */ __VA_FLOAT_ARGS = __VA_AIXCC_FLOAT_ARGS, #else __VA_FLOAT_ARGS = 0, #endif #endif /* how to pass and return small integer arguments */ __VA_ANSI_INTEGERS = 0, /* no promotions */ __VA_TRADITIONAL_INTEGERS = 0, /* promote [u]char, [u]short to [u]int */ /* Fortunately these two methods are compatible. Our macros work with both. */ /* stack cleanup policy */ __VA_CDECL_CLEANUP = 0, /* caller pops args after return */ __VA_STDCALL_CLEANUP = 1<<9, /* callee pops args before return */ /* currently only supported on __i386__ */ #ifndef __VA_CLEANUP __VA_CLEANUP = __VA_CDECL_CLEANUP, #endif /* These are for internal use only */ #if defined(__i386__) || defined(__m68k__) || defined(__mipsn32__) || defined(__mips64__) || defined(__sparc64__) || defined(__alpha__) || defined(__hppa64__) || defined(__arm__) || defined(__armhf__) || defined(__arm64__) || defined(__powerpc__) || defined(__powerpc64__) || defined(__ia64__) || defined(__x86_64__) || (defined(__s390__) && !defined(__s390x__)) || defined(__riscv64__) || defined(__loongarch64__) __VA_REGISTER_STRUCT_RETURN = 1<<10, #endif #if defined(__mipsn32__) || defined(__mips64__) __VA_REGISTER_FLOATSTRUCT_RETURN = 1<<11, __VA_REGISTER_DOUBLESTRUCT_RETURN = 1<<12, #endif __VA_flag_for_broken_compilers_that_dont_like_trailing_commas }; /* * Definition of the ‘va_alist’ type. */ struct vacall_alist /* GNU clisp pokes in internals of the alist! */ #ifdef LISPFUN { /* some va_... macros need these flags */ int flags; #if defined(__i386__) || defined(__arm__) || defined(__armhf__) || (defined(__powerpc__) && !defined(__powerpc64__) && defined(__MACH__) && defined(__APPLE__)) __vaword filler1; #endif /* temporary storage for return value */ union { char _char; signed char _schar; unsigned char _uchar; short _short; unsigned short _ushort; int _int; unsigned int _uint; long _long; unsigned long _ulong; long long _longlong; unsigned long long _ulonglong; float _float; double _double; void* _ptr; } tmp; } #endif ; typedef struct vacall_alist * va_alist; /* * Definition of the va_start_xxx macros. */ #define __VA_START_FLAGS \ __VA_STRUCT_RETURN | __VA_FLOAT_RETURN | __VA_STRUCT_ARGS | __VA_FLOAT_ARGS | __VA_CLEANUP extern void vacall_start (va_alist /* LIST */, int /* RETTYPE */, int /* FLAGS */); #define va_start_void(LIST) vacall_start(LIST,__VAvoid, __VA_START_FLAGS) #define va_start_char(LIST) vacall_start(LIST,__VAchar, __VA_START_FLAGS) #define va_start_schar(LIST) vacall_start(LIST,__VAschar, __VA_START_FLAGS) #define va_start_uchar(LIST) vacall_start(LIST,__VAuchar, __VA_START_FLAGS) #define va_start_short(LIST) vacall_start(LIST,__VAshort, __VA_START_FLAGS) #define va_start_ushort(LIST) vacall_start(LIST,__VAushort, __VA_START_FLAGS) #define va_start_int(LIST) vacall_start(LIST,__VAint, __VA_START_FLAGS) #define va_start_uint(LIST) vacall_start(LIST,__VAuint, __VA_START_FLAGS) #define va_start_long(LIST) vacall_start(LIST,__VAlong, __VA_START_FLAGS) #define va_start_ulong(LIST) vacall_start(LIST,__VAulong, __VA_START_FLAGS) #define va_start_longlong(LIST) vacall_start(LIST,__VAlonglong, __VA_START_FLAGS) #define va_start_ulonglong(LIST) vacall_start(LIST,__VAulonglong,__VA_START_FLAGS) #define va_start_float(LIST) vacall_start(LIST,__VAfloat, __VA_START_FLAGS) #define va_start_double(LIST) vacall_start(LIST,__VAdouble, __VA_START_FLAGS) #define va_start_ptr(LIST,TYPE) vacall_start(LIST,__VAvoidp, __VA_START_FLAGS) /* * va_start_struct: Preparing structure return. */ extern void vacall_start_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, int /* TYPE_SPLITTABLE */, int /* FLAGS */); #define va_start_struct(LIST,TYPE,TYPE_SPLITTABLE) \ _va_start_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),TYPE_SPLITTABLE) /* _va_start_struct() is like va_start_struct(), except that you pass * the type's size and alignment instead of the type itself. * Undocumented, but used by GNU clisp. */ #define _va_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE) \ vacall_start_struct(LIST,TYPE_SIZE,TYPE_ALIGN,TYPE_SPLITTABLE,__VA_START_FLAGS) /* * Definition of the va_arg_xxx macros. */ extern char vacall_arg_char (va_alist /* LIST */); extern signed char vacall_arg_schar (va_alist /* LIST */); extern unsigned char vacall_arg_uchar (va_alist /* LIST */); extern short vacall_arg_short (va_alist /* LIST */); extern unsigned short vacall_arg_ushort (va_alist /* LIST */); extern int vacall_arg_int (va_alist /* LIST */); extern unsigned int vacall_arg_uint (va_alist /* LIST */); extern long vacall_arg_long (va_alist /* LIST */); extern unsigned long vacall_arg_ulong (va_alist /* LIST */); #define va_arg_char(LIST) vacall_arg_char(LIST) #define va_arg_schar(LIST) vacall_arg_schar(LIST) #define va_arg_uchar(LIST) vacall_arg_uchar(LIST) #define va_arg_short(LIST) vacall_arg_short(LIST) #define va_arg_ushort(LIST) vacall_arg_ushort(LIST) #define va_arg_int(LIST) vacall_arg_int(LIST) #define va_arg_uint(LIST) vacall_arg_uint(LIST) #define va_arg_long(LIST) vacall_arg_long(LIST) #define va_arg_ulong(LIST) vacall_arg_ulong(LIST) extern long long vacall_arg_longlong (va_alist /* LIST */); extern unsigned long long vacall_arg_ulonglong (va_alist /* LIST */); #define va_arg_longlong(LIST) vacall_arg_longlong(LIST) #define va_arg_ulonglong(LIST) vacall_arg_ulonglong(LIST) /* Floating point arguments. */ extern float vacall_arg_float (va_alist /* LIST */); extern double vacall_arg_double (va_alist /* LIST */); #define va_arg_float(LIST) vacall_arg_float(LIST) #define va_arg_double(LIST) vacall_arg_double(LIST) /* Pointer arguments. */ extern void* vacall_arg_ptr (va_alist /* LIST */); #define va_arg_ptr(LIST,TYPE) ((TYPE)vacall_arg_ptr(LIST)) /* Structure arguments. */ extern void* vacall_arg_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */); #define va_arg_struct(LIST,TYPE) \ *(TYPE*)vacall_arg_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE)) /* _va_arg_struct() is like va_arg_struct(), except that you pass the type's * size and alignment instead of the type and get the value's address instead * of the value itself. * Undocumented, but used by GNU clisp. */ #define _va_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) \ vacall_arg_struct(LIST,TYPE_SIZE,TYPE_ALIGN) /* * Definition of the va_return_xxx macros. */ extern void vacall_return_void (va_alist /* LIST */); #define va_return_void(LIST) vacall_return_void(LIST) extern void vacall_return_char (va_alist /* LIST */, char /* VAL */); extern void vacall_return_schar (va_alist /* LIST */, signed char /* VAL */); extern void vacall_return_uchar (va_alist /* LIST */, unsigned char /* VAL */); extern void vacall_return_short (va_alist /* LIST */, short /* VAL */); extern void vacall_return_ushort (va_alist /* LIST */, unsigned short /* VAL */); extern void vacall_return_int (va_alist /* LIST */, int /* VAL */); extern void vacall_return_uint (va_alist /* LIST */, unsigned int /* VAL */); extern void vacall_return_long (va_alist /* LIST */, long /* VAL */); extern void vacall_return_ulong (va_alist /* LIST */, unsigned long /* VAL */); #define va_return_char(LIST,VAL) vacall_return_char(LIST,VAL) #define va_return_schar(LIST,VAL) vacall_return_schar(LIST,VAL) #define va_return_uchar(LIST,VAL) vacall_return_uchar(LIST,VAL) #define va_return_short(LIST,VAL) vacall_return_short(LIST,VAL) #define va_return_ushort(LIST,VAL) vacall_return_ushort(LIST,VAL) #define va_return_int(LIST,VAL) vacall_return_int(LIST,VAL) #define va_return_uint(LIST,VAL) vacall_return_uint(LIST,VAL) #define va_return_long(LIST,VAL) vacall_return_long(LIST,VAL) #define va_return_ulong(LIST,VAL) vacall_return_ulong(LIST,VAL) extern void vacall_return_longlong (va_alist /* LIST */, long long /* VAL */); extern void vacall_return_ulonglong (va_alist /* LIST */, unsigned long long /* VAL */); #define va_return_longlong(LIST,VAL) vacall_return_longlong(LIST,VAL) #define va_return_ulonglong(LIST,VAL) vacall_return_ulonglong(LIST,VAL) extern void vacall_return_float (va_alist /* LIST */, float /* VAL */); extern void vacall_return_double (va_alist /* LIST */, double /* VAL */); #define va_return_float(LIST,VAL) vacall_return_float(LIST,VAL) #define va_return_double(LIST,VAL) vacall_return_double(LIST,VAL) extern void vacall_return_ptr (va_alist /* LIST */, void* /* VAL */); #define va_return_ptr(LIST,TYPE,VAL) vacall_return_ptr(LIST,(void*)(TYPE)(VAL)) extern void vacall_return_struct (va_alist /* LIST */, size_t /* TYPE_SIZE */, size_t /* TYPE_ALIGN */, const void* /* VAL_ADDR */); #define va_return_struct(LIST,TYPE,VAL) \ _va_return_struct(LIST,sizeof(TYPE),__VA_alignof(TYPE),&(VAL)) /* Undocumented, but used by GNU clisp. */ #define _va_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) \ vacall_return_struct(LIST,TYPE_SIZE,TYPE_ALIGN,VAL_ADDR) /* Determine whether a struct type is word-splittable, i.e. whether each of * its components fit into a register. * The entire computation is done at compile time. */ #define va_word_splittable_1(slot1) \ (__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) #define va_word_splittable_2(slot1,slot2) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ ) #define va_word_splittable_3(slot1,slot2,slot3) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \ ) #define va_word_splittable_4(slot1,slot2,slot3,slot4) \ ((__va_offset1(slot1)/sizeof(__vaword) == (__va_offset1(slot1)+sizeof(slot1)-1)/sizeof(__vaword)) \ && (__va_offset2(slot1,slot2)/sizeof(__vaword) == (__va_offset2(slot1,slot2)+sizeof(slot2)-1)/sizeof(__vaword)) \ && (__va_offset3(slot1,slot2,slot3)/sizeof(__vaword) == (__va_offset3(slot1,slot2,slot3)+sizeof(slot3)-1)/sizeof(__vaword)) \ && (__va_offset4(slot1,slot2,slot3,slot4)/sizeof(__vaword) == (__va_offset4(slot1,slot2,slot3,slot4)+sizeof(slot4)-1)/sizeof(__vaword)) \ ) #define __va_offset1(slot1) \ 0 #define __va_offset2(slot1,slot2) \ ((__va_offset1(slot1)+sizeof(slot1)+__VA_alignof(slot2)-1) & -(long)__VA_alignof(slot2)) #define __va_offset3(slot1,slot2,slot3) \ ((__va_offset2(slot1,slot2)+sizeof(slot2)+__VA_alignof(slot3)-1) & -(long)__VA_alignof(slot3)) #define __va_offset4(slot1,slot2,slot3,slot4) \ ((__va_offset3(slot1,slot2,slot3)+sizeof(slot3)+__VA_alignof(slot4)-1) & -(long)__VA_alignof(slot4)) /* * Miscellaneous declarations. */ #if defined(__sparc__) || defined(__sparc64__) /* On SPARC, PIC compiled code crashes when used outside of a shared library. Therefore, don't use the callback_get_receiver indirection on this platform. */ extern #ifdef __cplusplus "C" #endif void callback_receiver (); /* Actually it takes arguments and returns values! */ #define callback_get_receiver() (&callback_receiver) #else /* A fake type for callback_receiver. Actually it takes arguments and returns values. */ typedef void (*__vacall_r_t) (void); /* This function returns the address of callback_receiver. callback_receiver is not a global symbol, because on ELF platforms, functions with global visibility cannot accept additional arguments in registers. See elf-hack.txt for more details. */ extern #ifdef __cplusplus "C" #endif __vacall_r_t callback_get_receiver (void); #endif #ifdef __cplusplus } #endif #endif /* _VACALL_R_H */ libffcall-2.5/callback/vacall_r/vacall-mipseb-linux.s0000664000000000000000000001060414662617144017562 00000000000000 .file 1 "vacall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,104,$31 # vars= 72, regs= 2/0, args= 16, gp= 8 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) lw $25,0($2) sw $4,104($fp) lw $4,4($2) sw $5,108($fp) addiu $5,$fp,104 sw $5,40($fp) addiu $5,$fp,120 sw $5,56($fp) .cprestore 16 sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) addiu $5,$fp,24 jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 # 0x1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 # 0x1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 # 0x2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,8,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-8 sw $fp,4($sp) move $fp,$sp move $sp,$fp lw $fp,4($sp) la $2,callback_receiver .set noreorder .set nomacro j $31 addiu $sp,$sp,8 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/vacall-sparc64-macro.S0000664000000000000000000001311314662617145017466 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(callback_receiver) DECLARE_FUNCTION(callback_receiver) .proc 020 FUNBEGIN(callback_receiver) .register %g2, $scratch .register %g3, $scratch save %sp, -448, %sp stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] st %f23, [%fp+1879] add %fp, 2175, %g2 stx %g0, [%fp+1807] st %f25, [%fp+1883] st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] st %g0, [%fp+1815] st %g0, [%fp+1831] ldx [%g5+8], %o0 stx %g2, [%fp+1799] ldx [%g5], %g3 call %g3, 0 add %fp, 1775, %o1 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, L(L61) cmp %g1, 1 be,pn %icc, L(L50) cmp %g1, 2 be,pn %icc, L(L50) cmp %g1, 3 be,pn %icc, L(L53) cmp %g1, 4 be,pn %icc, L(L54) cmp %g1, 5 be,pn %icc, L(L55) cmp %g1, 6 be,pn %icc, L(L56) cmp %g1, 7 be,pn %icc, L(L57) cmp %g1, 8 be,pn %icc, L(L51) cmp %g1, 9 be,pn %icc, L(L51) cmp %g1, 10 be,pn %icc, L(L51) cmp %g1, 11 be,pn %icc, L(L51) cmp %g1, 12 be,pn %icc, L(L58) cmp %g1, 13 be,pn %icc, L(L59) cmp %g1, 14 be,pn %icc, L(L51) cmp %g1, 15 bne,pt %icc, L(L61) lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, L(L61) ldx [%fp+1823], %o5 add %o5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, L(L61) ldx [%fp+1807], %g1 cmp %o5, 8 and %g1, 7, %o1 and %g1, -8, %l1 bgu,pt %xcc, L(L35) add %o5, %o1, %g2 cmp %g2, 8 bgu,pt %xcc, L(L37) sllx %o1, 3, %g4 sllx %g2, 3, %g2 ldx [%l1], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 L(L47): ldx [%l1], %g1 sllx %g1, %o3, %g1 ldx [%l1+8], %g4 ldx [%l1+16], %o5 sllx %g4, %o3, %o0 sllx %o5, %o3, %o7 ldx [%l1+24], %o4 sllx %g2, 3, %o2 sllx %o4, %o3, %l0 ldx [%l1+32], %o1 sub %g0, %o2, %o2 mov 64, %g3 sub %g3, %o3, %g3 srax %g4, %g3, %g4 srax %o5, %g3, %o5 or %g1, %g4, %i0 srax %o4, %g3, %o4 mov -1, %g1 or %o0, %o5, %i1 sllx %g1, %o2, %g1 or %o7, %o4, %i2 and %g1, %o1, %g1 srax %g1, %g3, %g1 or %l0, %g1, %i3 L(L61): return %i7+8 nop L(L50): ldsb [%fp+1783], %i0 return %i7+8 nop L(L54): ldsh [%fp+1783], %i0 return %i7+8 nop L(L53): ldub [%fp+1783], %i0 return %i7+8 nop L(L51): ldx [%fp+1783], %i0 return %i7+8 nop L(L55): lduh [%fp+1783], %i0 return %i7+8 nop L(L56): ldsw [%fp+1783], %i0 return %i7+8 nop L(L57): lduw [%fp+1783], %i0 return %i7+8 nop L(L58): ld [%fp+1783], %f0 return %i7+8 nop L(L59): ldd [%fp+1783], %f0 return %i7+8 nop L(L35): cmp %o5, 16 bgu,pt %xcc, L(L39) cmp %o5, 24 cmp %g2, 16 bgu,pt %xcc, L(L41) sllx %o1, 3, %o4 sllx %g2, 3, %g3 ldx [%l1+8], %g2 sll %o1, 3, %o5 sllx %o1, 2, %o4 sub %g0, %g3, %g3 ldx [%l1], %g4 mov -1, %g1 sllx %g4, %o5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %o5, %i1 sub %g2, %o4, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 L(L37): sllx %g2, 3, %g3 ldx [%l1+8], %o5 sub %g0, %g3, %g3 sub %g0, %g4, %o4 ldx [%l1], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %o5, %g1 srax %g1, %o4, %g1 return %i7+8 or %g2, %g1, %o0 L(L39): bgu,pt %xcc, L(L43) cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, L(L45) sllx %o1, 3, %o3 sllx %o1, 2, %g1 sll %o1, 3, %o5 sllx %g2, 3, %o4 ldx [%l1+8], %g3 ldx [%l1+16], %o3 sllx %g3, %o5, %o2 sub %g0, %o4, %o4 mov 32, %g4 ldx [%l1], %g2 sub %g4, %g1, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o4, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o2, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L41): sllx %g2, 3, %o5 ldx [%l1+8], %g3 ldx [%l1+16], %o3 sllx %g3, %o4, %o2 sub %g0, %o5, %o5 mov 64, %g4 ldx [%l1], %g2 sub %g4, %o4, %g4 sllx %g2, %o4, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o3, %g1 srax %g1, %g4, %g1 or %o2, %g1, %i1 return %i7+8 or %g2, %g3, %o0 L(L45): ldx [%l1], %g1 sllx %g1, %o3, %g1 ldx [%l1+8], %g3 ldx [%l1+16], %g4 sllx %g3, %o3, %o2 sllx %g4, %o3, %o0 sllx %g2, 3, %o4 ldx [%l1+24], %o1 sub %g0, %o4, %o4 mov 64, %o5 sub %o5, %o3, %o5 srax %g3, %o5, %g3 srax %g4, %o5, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %o4, %g1 and %g1, %o1, %g1 srax %g1, %o5, %g1 or %o0, %g1, %i2 return %i7+8 nop L(L43): bgu,pt %xcc, L(L47) sllx %o1, 3, %o3 sll %o1, 3, %o4 ldx [%l1], %g1 sllx %g1, %o4, %g1 sllx %o1, 2, %o3 sllx %g2, 3, %o5 ldx [%l1+8], %g3 ldx [%l1+16], %g4 sllx %g3, %o4, %o1 sllx %g4, %o4, %o0 ldx [%l1+24], %o2 sub %g0, %o5, %o5 mov 32, %g2 sub %g2, %o3, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o1, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 sllx %g1, %o4, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o0, %g1, %i2 return %i7+8 nop FUNEND(callback_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-mipsn32el-linux.s0000664000000000000000000001257114662617144020124 00000000000000 .file 1 "vacall-mipsn32.c" .section .mdebug.abiN32 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,256,$31 # vars= 144, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $fp,176($sp) move $fp,$sp sd $4,192($fp) lw $4,4($2) lw $25,0($2) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) move $5,$fp swc1 $f19,72($fp) sw $12,24($fp) sw $0,0($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L49 li $13,4 # 0x4 beq $12,$13,.L50 li $13,5 # 0x5 beq $12,$13,.L51 li $13,6 # 0x6 beq $12,$13,.L46 li $13,7 # 0x7 beq $12,$13,.L45 li $13,8 # 0x8 beq $12,$13,.L46 li $13,9 # 0x9 beq $12,$13,.L45 li $13,10 # 0xa beq $12,$13,.L47 li $13,11 # 0xb beq $12,$13,.L47 li $13,12 # 0xc beq $12,$13,.L52 li $13,13 # 0xd beq $12,$13,.L53 li $13,14 # 0xe beq $12,$13,.L46 li $13,15 # 0xf bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 # 0x1 beq $12,$13,.L54 li $13,2 # 0x2 beq $12,$13,.L55 li $13,4 # 0x4 beq $12,$13,.L56 li $13,8 # 0x8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 sll $13,$13,3 ld $25,0($15) addiu $13,$13,-1 li $15,2 # 0x2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $14,$14,3 dsra $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $24,$13,.L57 li $13,8 # 0x8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 # 0x10 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $24,$12,.L61 li $12,16 # 0x10 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,3 ld $17,8($15) li $25,2 # 0x2 addiu $13,$13,-65 dsll $13,$25,$13 subu $25,$0,$14 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $14,$14,3 dsll $25,$13,$15 dsra $16,$16,$14 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $16,8($15) ld $17,0($15) addiu $13,$13,-129 ld $18,16($15) li $15,2 # 0x2 subu $25,$0,$14 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $14,$14,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$14 dsll $17,$16,$25 dsra $14,$16,$14 or $2,$15,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: li $25,2 # 0x2 addiu $13,$13,-65 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$14 and $15,$13,$17 sll $14,$14,3 sll $13,$16,3 dsll $13,$15,$13 dsra $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,16,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) addu $13,$13,$25 addiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) addiu $sp,$sp,-16 lw $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) addiu $2,$12,%got_ofst(callback_receiver) j $31 addiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/Makefile.devel0000664000000000000000000004637014662151573016270 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! THISFILE = Makefile.devel LN = ln -s RM = rm -f # ============ Rules that require cross-compilation tools ============ GCC = gcc GCCFLAGS = -I../.. -I../../dummy -O2 -fno-omit-frame-pointer -fPIC -DREENTRANT SED = sed CROSS_TOOL = cross precompiled : \ vacall-i386-macro.S \ vacall-m68k.mit.S vacall-m68k.motorola.S \ vacall-mipseb-macro.S vacall-mipsel-macro.S vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S vacall-mips64eb-macro.S vacall-mips64el-macro.S \ vacall-sparc-macro.S vacall-sparc64-macro.S \ vacall-alpha-macro.S \ vacall-hppa-macro.S vacall-hppa64-macro.S \ vacall-arm-old-macro.S vacall-arm-eabi-macro.S vacall-armhf-eabi-macro.S \ vacall-arm64-macro.S vacall-arm64-macos-macro.S \ vacall-powerpc-aix.s vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S vacall-powerpc-macos.s vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \ vacall-ia64-macro.S \ vacall-x86_64-macro.S vacall-x86_64-x32-linux.s vacall-x86_64-windows-macro.S \ vacall-s390-macro.S vacall-s390x-macro.S \ vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-macro.S \ vacall-loongarch64-macro.S vacall-i386-linux.s : ../../vacall/vacall-i386.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) i386-linux gcc -V 3.1 $(GCCFLAGS) -D__i386__ -S ../../vacall/vacall-i386.c -I../../vacall -I. -o vacall-i386-linux.s vacall-i386-macro.S : vacall-i386-linux.s ../../common/asm-i386.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-i386.h"' ; sed -e '/\.align.*,0x90$$/d' < vacall-i386-linux.s | ../../common/asm-i386.sh ; cat ../../common/noexecstack.h) > vacall-i386-macro.S vacall-m68k-linux.s : ../../vacall/vacall-m68k.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) m68k-linux gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S ../../vacall/vacall-m68k.c -I../../vacall -I. -o vacall-m68k-linux.s vacall-m68k-sun.s : ../../vacall/vacall-m68k.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) m68k-sun gcc -V 3.1 $(GCCFLAGS) -D__m68k__ -S ../../vacall/vacall-m68k.c -I../../vacall -I. -o vacall-m68k-sun.s vacall-m68k.mit.S : vacall-m68k-sun.s ../../common/asm-m68k.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../../common/asm-m68k.sh mit < vacall-m68k-sun.s ; cat ../../common/noexecstack.h) > vacall-m68k.mit.S vacall-m68k.motorola.S : vacall-m68k-linux.s ../../common/asm-m68k.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-m68k.h"' ; ../../common/asm-m68k.sh motorola < vacall-m68k-linux.s ; cat ../../common/noexecstack.h) > vacall-m68k.motorola.S vacall-mipseb-linux.s : ../../vacall/vacall-mips.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) # For references to symbols: -mno-explicit-relocs ensures a syntax that the IRIX assembler understands. $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -meb -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S ../../vacall/vacall-mips.c -I../../vacall -I. -o vacall-mipseb-linux.s vacall-mipseb-macro.S : vacall-mipseb-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipseb-linux.s) > vacall-mipseb-macro.S vacall-mipsel-linux.s : ../../vacall/vacall-mips.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=32 -mfpxx -march=mips2 -mel -mno-explicit-relocs $(GCCFLAGS) -D__mips__ -S ../../vacall/vacall-mips.c -I../../vacall -I. -o vacall-mipsel-linux.s vacall-mipsel-macro.S : vacall-mipsel-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsel-linux.s) > vacall-mipsel-macro.S vacall-mipsn32eb-linux.s : ../../vacall/vacall-mipsn32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -meb $(GCCFLAGS) -D__mipsn32__ -S ../../vacall/vacall-mipsn32.c -I../../vacall -I. -o vacall-mipsn32eb-linux.s vacall-mipsn32eb-macro.S : vacall-mipsn32eb-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsn32eb-linux.s) > vacall-mipsn32eb-macro.S vacall-mipsn32el-linux.s : ../../vacall/vacall-mipsn32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=n32 -mel $(GCCFLAGS) -D__mipsn32__ -S ../../vacall/vacall-mipsn32.c -I../../vacall -I. -o vacall-mipsn32el-linux.s vacall-mipsn32el-macro.S : vacall-mipsn32el-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mipsn32el-linux.s) > vacall-mipsn32el-macro.S vacall-mips64eb-linux.s : ../../vacall/vacall-mips64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -meb $(GCCFLAGS) -D__mips64__ -S ../../vacall/vacall-mips64.c -I../../vacall -I. -o vacall-mips64eb-linux.s vacall-mips64eb-macro.S : vacall-mips64eb-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mips64eb-linux.s) > vacall-mips64eb-macro.S vacall-mips64el-linux.s : ../../vacall/vacall-mips64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) mips64-linux gcc-5.4.0 -mabi=64 -mel $(GCCFLAGS) -D__mips64__ -S ../../vacall/vacall-mips64.c -I../../vacall -I. -o vacall-mips64el-linux.s vacall-mips64el-macro.S : vacall-mips64el-linux.s ../../common/asm-mips.sh $(THISFILE) (echo '#include "asm-mips.h"' ; ../../common/asm-mips.sh < vacall-mips64el-linux.s) > vacall-mips64el-macro.S vacall-sparc-linux.s : ../../vacall/vacall-sparc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S ../../vacall/vacall-sparc.c -I../../vacall -I. -o vacall-sparc-linux.s vacall-sparc-macro.S : vacall-sparc-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < vacall-sparc-linux.s ; cat ../../common/noexecstack.h) > vacall-sparc-macro.S vacall-sparc64-linux.s : ../../vacall/vacall-sparc64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S ../../vacall/vacall-sparc64.c -I../../vacall -I. -o vacall-sparc64-linux.s vacall-sparc64-macro.S : vacall-sparc64-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < vacall-sparc64-linux.s ; cat ../../common/noexecstack.h) > vacall-sparc64-macro.S vacall-alpha-linux.s : ../../vacall/vacall-alpha.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S ../../vacall/vacall-alpha.c -I../../vacall -I. -o vacall-alpha-linux.s vacall-alpha-macro.S : vacall-alpha-linux.s ../../common/asm-alpha.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-alpha.sh < vacall-alpha-linux.s ; cat ../../common/noexecstack.h) > vacall-alpha-macro.S vacall-hppa-linux.s : ../../vacall/vacall-hppa.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S ../../vacall/vacall-hppa.c -I../../vacall -I. -o vacall-hppa-linux.s vacall-hppa-macro.S : vacall-hppa-linux.s ../../common/asm-hppa.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa.h"' ; ../../common/asm-hppa.sh < vacall-hppa-linux.s ; cat ../../common/noexecstack.h) > vacall-hppa-macro.S vacall-hppa64-linux.s : ../../vacall/vacall-hppa64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S ../../vacall/vacall-hppa64.c -I../../vacall -I. -o vacall-hppa64-linux.s vacall-hppa64-macro.S : vacall-hppa64-linux.s ../../common/asm-hppa64.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa64.h"' ; ../../common/asm-hppa64.sh < vacall-hppa64-linux.s ; cat ../../common/noexecstack.h) > vacall-hppa64-macro.S vacall-arm-old-macro.S : ../../vacall/vacall-arm.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) arm-linux gcc -V 3.1 -mlittle-endian $(GCCFLAGS) -D__arm__ -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armel.s $(CROSS_TOOL) arm-linux gcc -V 3.1 -mbig-endian $(GCCFLAGS) -D__arm__ -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armeb.s cmp vacall-armel.s vacall-armeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-armel.s ; cat ../../common/noexecstack-arm.h) > vacall-arm-old-macro.S $(RM) vacall-armel.s vacall-armeb.s vacall-arm-eabi-macro.S : ../../vacall/vacall-arm.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armel.s $(CROSS_TOOL) arm-linux-gnueabi gcc-6.5.0 -march=armv4t -mabi=aapcs -mfloat-abi=soft -fno-short-enums -masm-syntax-unified -mbig-endian $(GCCFLAGS) -S ../../vacall/vacall-arm.c -I../../vacall -I. -o vacall-armeb.s cmp vacall-armel.s vacall-armeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-armel.s ; cat ../../common/noexecstack-arm.h) > vacall-arm-eabi-macro.S $(RM) vacall-armel.s vacall-armeb.s vacall-armhf-eabi-macro.S : ../../vacall/vacall-armhf.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm.sh ../../common/noexecstack-arm.h $(THISFILE) # The option -mabi=aapcs ensures an 8-bytes-aligned stack pointer. $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mlittle-endian $(GCCFLAGS) -D__armhf__ -S ../../vacall/vacall-armhf.c -I../../vacall -I. -o vacall-armhfel.s $(CROSS_TOOL) armv7l-linux-gnueabihf gcc-6.5.0 -march=armv6 -mabi=aapcs -mfloat-abi=hard -masm-syntax-unified -mbig-endian $(GCCFLAGS) -D__armhf__ -S ../../vacall/vacall-armhf.c -I../../vacall -I. -o vacall-armhfeb.s cmp vacall-armhfel.s vacall-armhfeb.s > /dev/null (echo '#include "asm-arm.h"' ; ../../common/asm-arm.sh < vacall-armhfel.s ; cat ../../common/noexecstack-arm.h) > vacall-armhf-eabi-macro.S $(RM) vacall-armhfel.s vacall-armhfeb.s vacall-arm64-macro.S : ../../vacall/vacall-arm64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm64.sh ../../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -S ../../vacall/vacall-arm64.c -I../../vacall -I. -o vacall-arm64el.s $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mbig-endian $(GCCFLAGS) -D__arm64__ -S ../../vacall/vacall-arm64.c -I../../vacall -I. -o vacall-arm64eb.s cmp vacall-arm64el.s vacall-arm64eb.s > /dev/null (echo '#include "asm-arm64.h"' ; ../../common/asm-arm64.sh < vacall-arm64el.s ; cat ../../common/noexecstack-arm.h) > vacall-arm64-macro.S $(RM) vacall-arm64el.s vacall-arm64eb.s vacall-arm64-macos-macro.S : ../../vacall/vacall-arm64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-arm64.sh ../../common/noexecstack-arm.h $(THISFILE) $(CROSS_TOOL) aarch64-linux gcc-5.4.0 -mlittle-endian $(GCCFLAGS) -D__arm64__ -D__APPLE__ -D__MACH__ -S ../../vacall/vacall-arm64.c -I../../vacall -I. -o vacall-arm64-macos.s (echo '#include "asm-arm64.h"' ; ../../common/asm-arm64.sh < vacall-arm64-macos.s ; cat ../../common/noexecstack-arm.h) > vacall-arm64-macos-macro.S $(RM) vacall-arm64-macos.s vacall-powerpc-aix.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) rs6000-aix gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-aix.s vacall-powerpc-linux.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-linux.s vacall-powerpc-linux-macro.S : vacall-powerpc-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-powerpc.sh < vacall-powerpc-linux.s ; cat ../../common/noexecstack.h) > vacall-powerpc-linux-macro.S vacall-powerpc-sysv4-macro.S : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-sysv4.s (../../common/asm-powerpc.sh < vacall-powerpc-sysv4.s ; cat ../../common/noexecstack.h) > vacall-powerpc-sysv4-macro.S $(RM) vacall-powerpc-sysv4.s vacall-powerpc-macos.s : ../../vacall/vacall-powerpc.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S ../../vacall/vacall-powerpc.c -I../../vacall -I. -o vacall-powerpc-macos.s vacall-powerpc64-aix.s : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) rs6000-aix6.1 gcc-5.4.0 -maix64 $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-aix.s vacall-powerpc64-linux.S : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv1 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-linux-be.s cmp vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s > /dev/null (../../common/asm-powerpc.sh < vacall-powerpc64-linux-be.s ; cat ../../common/noexecstack.h) > vacall-powerpc64-linux.S $(RM) vacall-powerpc64-linux-le.s vacall-powerpc64-linux-be.s vacall-powerpc64-elfv2-linux.S : ../../vacall/vacall-powerpc64.c ../../vacall/vacall-internal.h vacall_r.h ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-elfv2-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -D__powerpc64_elfv2__ -S ../../vacall/vacall-powerpc64.c -I../../vacall -I. -o vacall-powerpc64-elfv2-linux-be.s (echo '#ifdef __LITTLE_ENDIAN__' ; ../../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-le.s ; echo '#else' ; ../../common/asm-powerpc.sh < vacall-powerpc64-elfv2-linux-be.s ; echo '#endif' ; cat ../../common/noexecstack.h) > vacall-powerpc64-elfv2-linux.S $(RM) vacall-powerpc64-elfv2-linux-le.s vacall-powerpc64-elfv2-linux-be.s vacall-ia64-linux.s : ../../vacall/vacall-ia64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) ia64-linux gcc -V 4.0.1 $(GCCFLAGS) -D__ia64__ -S ../../vacall/vacall-ia64.c -I../../vacall -I. -o vacall-ia64-linux.s vacall-ia64-macro.S : vacall-ia64-linux.s ../../common/noexecstack.h $(THISFILE) cat vacall-ia64-linux.s ../../common/noexecstack.h > vacall-ia64-macro.S vacall-x86_64-linux.s : ../../vacall/vacall-x86_64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-4.0.2 $(GCCFLAGS) -D__x86_64__ -S ../../vacall/vacall-x86_64.c -I../../vacall -I. -o vacall-x86_64-linux.s vacall-x86_64-macro.S : vacall-x86_64-linux.s ../../common/asm-x86_64.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; ../../common/asm-x86_64.sh < vacall-x86_64-linux.s ; cat ../../common/noexecstack.h) > vacall-x86_64-macro.S vacall-x86_64-x32-linux.s : ../../vacall/vacall-x86_64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(GCCFLAGS) -D__x86_64__ -D__x86_64_x32__ -S ../../vacall/vacall-x86_64.c -I../../vacall -I. -o vacall-x86_64-x32-linux.s vacall-x86_64-windows.s : ../../vacall/vacall-x86_64-windows.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mabi=ms $(GCCFLAGS) -fno-reorder-blocks-and-partition -D__x86_64__ -D_WIN32 -S ../../vacall/vacall-x86_64-windows.c -I../../vacall -I. -o vacall-x86_64-windows.s vacall-x86_64-windows-macro.S : vacall-x86_64-windows.s ../../common/asm-x86_64.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-x86_64.h"' ; ../../common/asm-x86_64.sh < vacall-x86_64-windows.s ; cat ../../common/noexecstack.h) > vacall-x86_64-windows-macro.S vacall-s390-linux.s : ../../vacall/vacall-s390.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) s390-linux gcc -V 3.1 $(GCCFLAGS) -D__s390__ -S ../../vacall/vacall-s390.c -I../../vacall -I. -o vacall-s390-linux.s vacall-s390-macro.S : vacall-s390-linux.s ../../common/asm-s390.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-s390.sh < vacall-s390-linux.s ; cat ../../common/noexecstack.h) > vacall-s390-macro.S vacall-s390x-linux.s : ../../vacall/vacall-s390x.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(GCCFLAGS) -D__s390x__ -S ../../vacall/vacall-s390x.c -I../../vacall -I. -o vacall-s390x-linux.s vacall-s390x-macro.S : vacall-s390x-linux.s ../../common/asm-s390.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-s390.sh < vacall-s390x-linux.s ; cat ../../common/noexecstack.h) > vacall-s390x-macro.S vacall-riscv32-ilp32d-linux.s : ../../vacall/vacall-riscv32.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv32__ -S ../../vacall/vacall-riscv32.c -I../../vacall -I. -o vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-macro.S : vacall-riscv32-ilp32d-linux.s ../../common/asm-riscv.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-riscv.sh < vacall-riscv32-ilp32d-linux.s ; cat ../../common/noexecstack.h) > vacall-riscv32-ilp32d-macro.S vacall-riscv64-lp64d-linux.s : ../../vacall/vacall-riscv64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(GCCFLAGS) -D__riscv64__ -S ../../vacall/vacall-riscv64.c -I../../vacall -I. -o vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-macro.S : vacall-riscv64-lp64d-linux.s ../../common/asm-riscv.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-riscv.sh < vacall-riscv64-lp64d-linux.s ; cat ../../common/noexecstack.h) > vacall-riscv64-lp64d-macro.S vacall-loongarch64-linux.s : ../../vacall/vacall-loongarch64.c ../../vacall/vacall-internal.h vacall_r.h $(THISFILE) $(CROSS_TOOL) loongarch64-linux gcc-12.1.0 $(GCCFLAGS) -D__loongarch64__ -S ../../vacall/vacall-loongarch64.c -I../../vacall -I. -o vacall-loongarch64-linux.s vacall-loongarch64-macro.S : vacall-loongarch64-linux.s ../../common/asm-loongarch.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-loongarch.sh < vacall-loongarch64-linux.s ; cat ../../common/noexecstack.h) > vacall-loongarch64-macro.S libffcall-2.5/callback/vacall_r/vacall-i386-msvc.c0000664000000000000000000001067214665326517016576 00000000000000#ifdef _MSC_VER #include "vacall_r.h" #endif #include "asm-i386.h" TEXT() ALIGN(2) P2ALIGN(2,3) DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) INSN1(push,l ,R(ebp)) INSN2(mov,l ,R(esp), R(ebp)) INSN1(push,l ,R(edi)) INSN1(push,l ,R(esi)) INSN2(lea,l ,X4 MEM_DISP(ebp,8), R(edx)) INSN2(sub,l ,NUM(56), R(esp)) INSN2(mov,l ,R(edx),X4 MEM_DISP(ebp,-40)) INSN2(lea,l ,X4 MEM_DISP(ebp,-56), R(edx)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-56)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-36)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(ebp,-32)) INSN2(mov,l ,R(ebx),X4 MEM_DISP(ebp,-24)) INSN1(push,l ,R(edx)) INSN1(push,l ,X4 MEM_DISP(ecx,4)) INSN1(call,_ ,INDIR(X4 MEM(ecx))) INSN2(mov,l ,X4 MEM_DISP(ebp,-32), R(esi)) INSN2(add,l ,NUM(16), R(esp)) INSN2(test,l ,R(esi), R(esi)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(1), R(esi)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(2), R(esi)) INSN1(je,_ ,L(44)) INSN2(cmp,l ,NUM(3), R(esi)) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(4), R(esi)) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(5), R(esi)) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(6), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(7), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(8), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(9), R(esi)) INSN1(je,_ ,L(48)) INSN2(lea,l ,X4 MEM_DISP(esi,-10), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(ja,_ ,L(22)) INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN2(mov,l ,X4 MEM_DISP(ebp,-44),R(edx)) L(33): P2ALIGN(2,3) L(43): INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(esi)) L(3): INSN2(and,l ,NUM(512), R(esi)) INSN1(je,_ ,L(1)) INSN2(mov,l ,X4 MEM_DISP(ebp,0),R(ecx)) INSN2(mov,l ,X4 MEM_DISP(ebp,-40), R(esp)) INSN1(jmp,_ ,INDIR(R(ecx))) L(1): INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN1(pop,l ,R(edi)) leave ret L(22): INSN2(cmp,l ,NUM(12), R(esi)) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(13), R(esi)) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(14), R(esi)) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(15), R(esi)) INSN1(jne,_ ,L(43)) INSN2(mov,l ,X4 MEM_DISP(ebp,-56), R(esi)) INSN2(test,l ,NUM(1024), R(esi)) INSN2(mov,l ,R(esi), R(edi)) INSN1(je,_ ,L(31)) INSN2(mov,l ,X4 MEM_DISP(ebp,-28), R(edx)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(55)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(56)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(57)) L(31): INSN2(and,l ,NUM(16), R(edi)) INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(eax)) INSN1(jne,_ ,L(3)) INSN2(lea,l ,X4 MEM_DISP(ebp,-8), R(esp)) INSN1(pop,l ,R(esi)) INSN1(pop,l ,R(edi)) leave ret NUM(4) INSN1(jmp,_ ,L(3)) L(57): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN2(mov,l ,X4 MEM_DISP(edx,4),R(edx)) INSN1(jmp,_ ,L(3)) L(56): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2(mov,l ,X4 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(55): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,w,X2 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) L(54): INSN2(mov,l ,X4 MEM_DISP(ebp,-36), R(edx)) INSN2MOVXL(movz,b,X1 MEM(edx), R(eax)) INSN1(jmp,_ ,L(3)) P2ALIGN(2,3) L(48): INSN2(mov,l ,X4 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(53): INSN1(fld,l ,X8 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) L(52): INSN1(fld,s ,X4 MEM_DISP(ebp,-48)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(51): INSN2MOVXL(movz,w,X2 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) L(50): INSN2MOVXL(movs,w,X2 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(49): INSN2MOVXL(movz,b,X1 MEM_DISP(ebp,-48), R(eax)) INSN1(jmp,_ ,L(43)) P2ALIGN(2,3) L(44): INSN2MOVXL(movs,b,X1 MEM_DISP(ebp,-48),R(eax)) INSN1(jmp,_ ,L(43)) L(fe1): FUNEND(callback_receiver,L(fe1)-callback_receiver) /* Implementation of callback_get_receiver */ /* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } libffcall-2.5/callback/vacall_r/vacall-s390x-macro.S0000664000000000000000000000464714662617145017106 00000000000000 .file "vacall-s390x.c" .text .align 8 .type callback_receiver, @function callback_receiver: .LFB0: .cfi_startproc stmg %r10,%r15,80(%r15) .cfi_offset 10, -80 .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 aghi %r15,-320 .cfi_def_cfa_offset 480 lgr %r11,%r15 .cfi_def_cfa_register 11 lgr %r1,%r0 lhi %r14,0 stg %r2,224(%r11) lg %r10,0(%r1) st %r14,160(%r11) la %r14,480(%r11) stg %r14,184(%r11) lghi %r14,0 stg %r3,232(%r11) lg %r2,8(%r1) stg %r4,240(%r11) stg %r5,248(%r11) stg %r6,256(%r11) ste %f0,268(%r11) ste %f2,272(%r11) ste %f4,276(%r11) ste %f6,280(%r11) std %f0,288(%r11) std %f2,296(%r11) std %f4,304(%r11) std %f6,312(%r11) stg %r14,192(%r11) st %r14,200(%r11) st %r14,216(%r11) st %r14,264(%r11) la %r3,160(%r11) basr %r14,%r10 icm %r1,15,200(%r11) je .L1 chi %r1,1 je .L18 chi %r1,2 je .L21 chi %r1,3 je .L18 chi %r1,4 je .L22 chi %r1,5 je .L23 chi %r1,6 je .L24 chi %r1,7 je .L25 lr %r10,%r1 nill %r10,65533 chi %r10,8 je .L19 chi %r10,9 je .L19 chi %r1,12 je .L26 chi %r1,13 je .L27 chi %r1,14 je .L19 .L1: lg %r4,432(%r11) lmg %r10,%r15,400(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_restore 10 .cfi_def_cfa 15, 160 br %r4 .L18: .cfi_restore_state lg %r4,432(%r11) llgc %r2,168(%r11) lmg %r10,%r15,400(%r11) .cfi_remember_state .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L21: .cfi_restore_state icmh %r2,8,168(%r11) srag %r2,%r2,56 j .L1 .L19: lg %r2,168(%r11) j .L1 .L22: lgh %r2,168(%r11) j .L1 .L23: llgh %r2,168(%r11) j .L1 .L24: lgf %r2,168(%r11) j .L1 .L26: le %f0,168(%r11) j .L1 .L25: llgf %r2,168(%r11) j .L1 .L27: ld %f0,168(%r11) j .L1 .cfi_endproc .LFE0: .size callback_receiver, .-callback_receiver .align 8 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1: .cfi_startproc stg %r11,88(%r15) .cfi_offset 11, -72 lgr %r11,%r15 .cfi_def_cfa_register 11 larl %r2,callback_receiver lg %r11,88(%r11) .cfi_restore 11 .cfi_def_cfa_register 15 br %r14 .cfi_endproc .LFE1: .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/Makefile.in0000664000000000000000000003773014661167533015601 00000000000000# Makefile for vacall #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ OS = @host_os@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": CC = @CC@ CFLAGS = @CFLAGS@ CPPFLAGS = @CPPFLAGS@ CPP = @CPP@ INCLUDES = -I. -I$(srcdir) -I$(srcdir)/../../vacall -I../.. -I$(srcdir)/../.. INCLUDES_WITH_GNULIB = $(INCLUDES) -I../../gnulib-lib -I$(srcdir)/../../gnulib-lib ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi` LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ MV = mv LN = @LN@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ #### End of system configuration section. #### SHELL = /bin/sh # Needed by $(LIBTOOL). top_builddir = ../.. OBJECTS = vacall.lo vacall-libapi.lo vacall-structcpy.lo all : $(OBJECTS) libvacall.la vacall.lo : vacall-$(CPU).lo $(RM) vacall.lo vacall.@OBJEXT@ $(LN) vacall-$(CPU).lo vacall.lo if test -f vacall-$(CPU).@OBJEXT@; then $(LN) vacall-$(CPU).@OBJEXT@ vacall.@OBJEXT@; fi @IFNOT_MSVC@vacall-i386.lo : vacall-i386.s @IFNOT_MSVC@ $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-i386.s @IFNOT_MSVC@vacall-i386.s : $(srcdir)/vacall-i386-macro.S @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common - < $(srcdir)/vacall-i386-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-i386.s @IF_MSVC@vacall-i386.lo : $(srcdir)/vacall-i386-msvc.c @IF_MSVC@ $(LIBTOOL_COMPILE) $(CC) $(INCLUDES) -I$(srcdir)/../../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-i386-msvc.c -o vacall-i386.lo vacall-sparc.lo : vacall-sparc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-sparc.s vacall-sparc.s : $(srcdir)/vacall-sparc-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/vacall-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc.s vacall-sparc64.lo : vacall-sparc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-sparc64.s vacall-sparc64.s : $(srcdir)/vacall-sparc64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/vacall-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > vacall-sparc64.s vacall-m68k.lo : vacall-m68k.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-m68k.s vacall-m68k.s : $(srcdir)/vacall-m68k.mit.S $(srcdir)/vacall-m68k.motorola.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-m68k.motorola.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' | if test @AS_UNDERSCORE@ = true; then sed -e 's/\$$//g'; else sed -e 's/\$$/%/g'; fi > vacall-m68k.s vacall-mips.lo : vacall-mips.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mips.s vacall-mips.s : $(srcdir)/vacall-mips@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mips@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips.s vacall-mipsn32.lo : vacall-mipsn32.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mipsn32.s vacall-mipsn32.s : $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mipsn32@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mipsn32.s vacall-mips64.lo : vacall-mips64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-mips64.s vacall-mips64.s : $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-mips64@ENDIANNESS@-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-mips64.s vacall-alpha.lo : vacall-alpha.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-alpha.s vacall-alpha.s : $(srcdir)/vacall-alpha-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-alpha.s vacall-hppa.lo : vacall-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-hppa.s vacall-hppa.s : $(srcdir)/vacall-hppa-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa.s vacall-hppa64.lo : vacall-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-hppa64.s vacall-hppa64.s : $(srcdir)/vacall-hppa64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > vacall-hppa64.s vacall-arm-old.lo : vacall-arm-old.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-arm-old.s vacall-arm-old.s : $(srcdir)/vacall-arm-old-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-arm-old-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm-old.s vacall-arm-eabi.lo : vacall-arm-eabi.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-arm-eabi.s vacall-arm-eabi.s : $(srcdir)/vacall-arm-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-arm-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm-eabi.s vacall-armhf-eabi.lo : vacall-armhf-eabi.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-armhf-eabi.s vacall-armhf-eabi.s : $(srcdir)/vacall-armhf-eabi-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/vacall-armhf-eabi-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-armhf-eabi.s vacall-arm64.lo : vacall-arm64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-arm64.s vacall-arm64.s : $(srcdir)/vacall-arm64-macro.S $(srcdir)/vacall-arm64-macos-macro.S case "$(OS)" in \ macos* | darwin*) input=vacall-arm64-macos-macro.S ;; \ *) input=vacall-arm64-macro.S ;; \ esac; \ $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common $(srcdir)/$${input} | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-arm64.s vacall-powerpc.lo : vacall-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc.s vacall-powerpc.s : $(srcdir)/vacall-powerpc-aix.s $(srcdir)/vacall-powerpc-linux-macro.S $(srcdir)/vacall-powerpc-macos.s $(srcdir)/vacall-powerpc-sysv4-macro.S case "$(OS)" in \ aix*) syntax=aix;; \ linux* | netbsd* | openbsd*) syntax=linux;; \ macos* | darwin*) syntax=macos;; \ *) syntax=sysv4;; \ esac; \ case $${syntax} in \ linux | netbsd | sysv4) \ $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//,@,g' -e 's,\$$,#,g' > vacall-powerpc.s || exit 1 ;; \ macos) \ grep -v '\.machine' $(srcdir)/vacall-powerpc-$${syntax}.s > vacall-powerpc.s || exit 1 ;; \ *) \ cp $(srcdir)/vacall-powerpc-$${syntax}.s vacall-powerpc.s || exit 1 ;; \ esac vacall-powerpc64.lo : vacall-powerpc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc64.s vacall-powerpc64.s : $(srcdir)/vacall-powerpc64-aix.s $(srcdir)/vacall-powerpc64-linux.S case "$(OS)" in \ aix*) syntax=aix;; \ *) syntax=linux;; \ esac; \ case $${syntax} in \ linux) \ $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-$${syntax}.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64.s || exit 1 ;; \ *) \ cp $(srcdir)/vacall-powerpc64-$${syntax}.s vacall-powerpc64.s || exit 1 ;; \ esac vacall-powerpc64-elfv2.lo : vacall-powerpc64-elfv2.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-powerpc64-elfv2.s vacall-powerpc64-elfv2.s : $(srcdir)/vacall-powerpc64-elfv2-linux.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-powerpc64-elfv2-linux.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-powerpc64-elfv2.s vacall-ia64.lo : vacall-ia64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-ia64.s vacall-ia64.s : $(srcdir)/vacall-ia64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-ia64.s @IFNOT_MSVC@vacall-x86_64.lo : vacall-x86_64.s @IFNOT_MSVC@ $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-x86_64.s @IFNOT_MSVC@vacall-x86_64.s : $(srcdir)/vacall-x86_64-macro.S $(srcdir)/vacall-x86_64-windows-macro.S @IFNOT_MSVC@ case "$(OS)" in \ @IFNOT_MSVC@ cygwin* | mingw*) variant='-windows';; \ @IFNOT_MSVC@ *) variant='';; \ @IFNOT_MSVC@ esac; \ @IFNOT_MSVC@ $(CPP) $(ASPFLAGS) -I$(srcdir) -I$(srcdir)/../../common - < $(srcdir)/vacall-x86_64$${variant}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,@ ,@,g' -e 's,//.*$$,,' -e 's/##//g' > vacall-x86_64.s @IF_MSVC@vacall-x86_64.lo : vacall-x86_64.asm vacall-libapi.lo @IF_MSVC@ ml64 -c -nologo vacall-x86_64.asm @IF_MSVC@ mkdir -p .libs; cp vacall-x86_64.@OBJEXT@ .libs/vacall-x86_64.@OBJEXT@ @IF_MSVC@ sed -e 's/vacall-libapi/vacall-x86_64/g' < vacall-libapi.lo > vacall-x86_64.lo @IF_MSVC@vacall-x86_64.asm : $(srcdir)/vacall-x86_64-windows-macro.S @IF_MSVC@ { $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/vacall-x86_64-windows-macro.S | grep -v '^#'; echo 'END'; } > vacall-x86_64.asm vacall-x86_64-x32.lo : vacall-x86_64-x32.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-x86_64-x32.s vacall-x86_64-x32.s : $(srcdir)/vacall-x86_64-x32-linux.s cp $(srcdir)/vacall-x86_64-x32-linux.s vacall-x86_64-x32.s vacall-s390.lo : vacall-s390.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-s390.s vacall-s390.s : $(srcdir)/vacall-s390-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390.s vacall-s390x.lo : vacall-s390x.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-s390x.s vacall-s390x.s : $(srcdir)/vacall-s390x-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-s390x-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-s390x.s vacall-riscv32-ilp32d.lo : vacall-riscv32-ilp32d.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-riscv32-ilp32d.s vacall-riscv32-ilp32d.s : $(srcdir)/vacall-riscv32-ilp32d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv32-ilp32d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.lo : vacall-riscv64-lp64d.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-riscv64-lp64d.s vacall-riscv64-lp64d.s : $(srcdir)/vacall-riscv64-lp64d-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-riscv64-lp64d-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-riscv64-lp64d.s vacall-loongarch64.lo : vacall-loongarch64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c vacall-loongarch64.s vacall-loongarch64.s : $(srcdir)/vacall-loongarch64-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/vacall-loongarch64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > vacall-loongarch64.s vacall-libapi.lo : $(srcdir)/vacall-libapi.c $(srcdir)/../../vacall/vacall-internal.h $(srcdir)/vacall_r.h ../../config.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) @DISABLE_TYPE_BASED_ALIASING@ -DREENTRANT -c $(srcdir)/vacall-libapi.c vacall-structcpy.lo : $(srcdir)/vacall-structcpy.c $(srcdir)/../../common/structcpy.c $(LIBTOOL_COMPILE) $(CC) -I$(srcdir)/../../common $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/vacall-structcpy.c libvacall.la : $(OBJECTS) $(LIBTOOL_LINK) $(CC) -o libvacall.la -rpath $(libdir) -no-undefined $(OBJECTS) $(LDFLAGS) # Installs the library and include files only. Typically called with only # $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here. install-lib : all force mkdir -p $(includedir) $(INSTALL_DATA) $(srcdir)/vacall_r.h $(includedir)/vacall_r.h install : all force mkdir -p $(DESTDIR)$(prefix) # mkdir -p $(DESTDIR)$(exec_prefix) # mkdir -p $(DESTDIR)$(libdir) # $(LIBTOOL_INSTALL) $(INSTALL_DATA) libvacall.la $(DESTDIR)$(libdir)/libvacall.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/vacall_r.h $(DESTDIR)$(includedir)/vacall_r.h # mkdir -p $(DESTDIR)$(mandir) # mkdir -p $(DESTDIR)$(mandir)/man3 # $(INSTALL_DATA) $(srcdir)/vacall_r.3 $(DESTDIR)$(mandir)/man3/vacall_r.3 # mkdir -p $(DESTDIR)$(datadir) # mkdir -p $(DESTDIR)$(htmldir) # $(INSTALL_DATA) $(srcdir)/vacall_r.html $(DESTDIR)$(htmldir)/vacall_r.html installdirs : force mkdir -p $(DESTDIR)$(prefix) # mkdir -p $(DESTDIR)$(exec_prefix) # mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) # mkdir -p $(DESTDIR)$(mandir) # mkdir -p $(DESTDIR)$(mandir)/man3 # mkdir -p $(DESTDIR)$(datadir) # mkdir -p $(DESTDIR)$(htmldir) uninstall : force # $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libvacall.la $(RM) $(DESTDIR)$(includedir)/vacall_r.h # $(RM) $(DESTDIR)$(mandir)/man3/vacall_r.3 # $(RM) $(DESTDIR)$(htmldir)/vacall_r.html check : all extracheck : all mostlyclean : clean clean : force $(RM) *.@OBJEXT@ *.lo *.a libvacall.* core $(RM) vacall-i386.s vacall-sparc.s vacall-sparc64.s vacall-m68k.s vacall-mips.s vacall-mipsn32.s vacall-mips64.s vacall-alpha.s vacall-hppa.s vacall-hppa64.s vacall-arm-old.s vacall-arm-eabi.s vacall-armhf-eabi.s vacall-arm64.s vacall-powerpc.s vacall-powerpc64.s vacall-powerpc64-elfv2.s vacall-ia64.s vacall-x86_64.s vacall-x86_64.asm vacall-x86_64-x32.s vacall-s390.s vacall-s390x.s vacall-riscv32-ilp32d.s vacall-riscv64-lp64d.s vacall-loongarch64.s $(RM) -r .libs _libs distclean : clean $(RM) Makefile maintainer-clean : distclean # List of source files (committed in version control or generated by Makefile.devel). SOURCE_FILES = \ COPYING \ README \ Makefile.devel \ Makefile.maint \ Makefile.in \ vacall_r.h \ get_receiver.c \ vacall-alpha-linux.s vacall-alpha-macro.S \ vacall-arm-old-macro.S vacall-arm-eabi-macro.S \ vacall-armhf-eabi-macro.S \ vacall-arm64-macro.S vacall-arm64-macos-macro.S \ vacall-hppa-linux.s vacall-hppa-macro.S \ vacall-hppa64-linux.s vacall-hppa64-macro.S \ vacall-i386-linux.s vacall-i386-macro.S \ vacall-ia64-linux.s vacall-ia64-macro.S \ vacall-loongarch64-linux.s vacall-loongarch64-macro.S \ vacall-m68k-linux.s vacall-m68k-sun.s vacall-m68k.mit.S vacall-m68k.motorola.S \ vacall-mipseb-linux.s vacall-mipsel-linux.s vacall-mipseb-macro.S vacall-mipsel-macro.S \ vacall-mipsn32eb-linux.s vacall-mipsn32el-linux.s vacall-mipsn32eb-macro.S vacall-mipsn32el-macro.S \ vacall-mips64eb-linux.s vacall-mips64el-linux.s vacall-mips64eb-macro.S vacall-mips64el-macro.S \ vacall-powerpc-aix.s \ vacall-powerpc-linux.s vacall-powerpc-linux-macro.S \ vacall-powerpc-macos.s \ vacall-powerpc-sysv4-macro.S \ vacall-powerpc64-aix.s vacall-powerpc64-linux.S vacall-powerpc64-elfv2-linux.S \ vacall-riscv32-ilp32d-linux.s vacall-riscv32-ilp32d-macro.S \ vacall-riscv64-lp64d-linux.s vacall-riscv64-lp64d-macro.S \ vacall-s390-linux.s vacall-s390-macro.S \ vacall-s390x-linux.s vacall-s390x-macro.S \ vacall-sparc-linux.s vacall-sparc-macro.S \ vacall-sparc64-linux.s vacall-sparc64-macro.S \ vacall-x86_64-linux.s vacall-x86_64-macro.S vacall-x86_64-x32-linux.s \ vacall-x86_64-windows.s vacall-x86_64-windows-macro.S \ vacall-libapi.c \ vacall-structcpy.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ vacall-i386-msvc.c # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done force : libffcall-2.5/callback/vacall_r/vacall-s390-macro.S0000664000000000000000000000453514662617145016712 00000000000000 .file "vacall-s390.c" .text .align 4 .type callback_receiver,@function callback_receiver: stm %r6,%r15,24(%r15) bras %r13,.LTN0_0 .LT0_0: .LC0: .long 0 .LC1: .long 255 .LC2: .long 65535 .LC3: .long 1 .LTN0_0: lr %r1,%r0 lr %r14,%r15 ahi %r15,-184 lr %r11,%r15 lr %r9,%r0 l %r10,0(%r1) st %r14,0(%r15) la %r1,280(%r11) mvc 116(4,%r11),.LC0-.LT0_0(%r13) st %r2,132(%r11) st %r3,136(%r11) la %r3,96(%r11) st %r4,140(%r11) st %r5,144(%r11) st %r6,148(%r11) std %f2,176(%r11) std %f0,168(%r11) ste %f2,160(%r11) ste %f0,156(%r11) mvc 96(4,%r11),.LC0-.LT0_0(%r13) st %r1,112(%r11) mvc 120(4,%r11),.LC0-.LT0_0(%r13) mvc 128(4,%r11),.LC0-.LT0_0(%r13) mvc 152(4,%r11),.LC0-.LT0_0(%r13) l %r2,4(%r9) basr %r14,%r10 icm %r4,15,120(%r11) je .L1 chi %r4,1 je .L43 chi %r4,2 je .L44 chi %r4,3 je .L43 chi %r4,4 je .L45 chi %r4,5 je .L46 chi %r4,6 je .L40 chi %r4,7 je .L40 chi %r4,8 je .L40 chi %r4,9 je .L40 lr %r1,%r4 ahi %r1,-10 cl %r1,.LC3-.LT0_0(%r13) jh .L22 l %r2,104(%r11) l %r3,108(%r11) .L1: l %r4,240(%r11) lm %r6,%r15,208(%r11) br %r4 .L22: chi %r4,12 je .L47 chi %r4,13 je .L48 chi %r4,14 je .L40 chi %r4,15 jne .L1 tm 98(%r11),4 je .L1 l %r1,124(%r11) chi %r1,1 je .L49 chi %r1,2 je .L50 chi %r1,4 je .L51 chi %r1,8 jne .L1 l %r1,116(%r11) l %r3,4(%r1) .L39: l %r2,0(%r1) j .L1 .L51: l %r1,116(%r11) j .L39 .L50: l %r1,116(%r11) lh %r4,0(%r1) lr %r2,%r4 .L41: n %r2,.LC2-.LT0_0(%r13) j .L1 .L49: l %r1,116(%r11) ic %r4,0(%r1) lr %r2,%r4 .L42: n %r2,.LC1-.LT0_0(%r13) j .L1 .L40: l %r2,104(%r11) j .L1 .L48: ld %f0,104(%r11) j .L1 .L47: le %f0,104(%r11) j .L1 .L46: lh %r1,104(%r11) lr %r2,%r1 j .L41 .L45: lh %r2,104(%r11) j .L1 .L43: ic %r1,104(%r11) lr %r2,%r1 j .L42 .L44: icm %r1,8,104(%r11) lr %r2,%r1 sra %r2,24 j .L1 .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .align 4 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: stm %r11,%r13,44(%r15) bras %r13,.LTN1_0 .LT1_0: .LC4: .long callback_receiver-.LT1_0 .LTN1_0: l %r1,.LC4-.LT1_0(%r13) lr %r11,%r15 la %r2,0(%r13,%r1) lm %r11,%r13,44(%r11) br %r14 .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-ia64-macro.S0000664000000000000000000002506714662617145016762 00000000000000 .file "vacall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .proc callback_receiver# callback_receiver: .prologue 14, 42 .spill 48 .mmb .save ar.pfs, r43 alloc r43 = ar.pfs, 8, 6, 2, 0 .vframe r44 mov r44 = r12 nop 0 .mmi adds r12 = -208, r12 adds r18 = 8, r15 mov r45 = r1 ;; .mmi adds r16 = -48, r44 adds r14 = -136, r44 adds r17 = -48, r44 .mmi adds r40 = -152, r44 adds r47 = -192, r44 adds r41 = -160, r44 ;; .mmb st8 [r14] = r8 adds r14 = -32, r44 nop 0 .mfi st8 [r16] = r32, 8 nop 0 .save rp, r42 mov r42 = b0 .body ;; .mfi st8 [r14] = r34 nop 0 adds r14 = -24, r44 .mmb st8 [r16] = r33 ld8 r16 = [r15] nop 0 ;; .mmi nop 0 st8 [r14] = r35 adds r14 = -16, r44 .mmi st8 [r41] = r0 ;; st8 [r14] = r36 adds r14 = -8, r44 .mmb st4 [r40] = r0 ld8 r46 = [r18] nop 0 ;; .mmi nop 0 st8 [r14] = r37 adds r14 = 8, r44 .mmi st8 [r44] = r38 ;; st8 [r14] = r39 adds r14 = -112, r44 .mmi st4 [r47] = r0 ;; stfd [r14] = f8 nop 0 .mmi adds r14 = -104, r44 ;; stfd [r14] = f9 adds r14 = -96, r44 ;; .mfi stfd [r14] = f10 nop 0 adds r14 = -88, r44 .mmi nop 0 ;; stfd [r14] = f11 nop 0 .mmi adds r14 = -80, r44 ;; stfd [r14] = f12 adds r14 = -72, r44 ;; .mfi stfd [r14] = f13 nop 0 adds r14 = -64, r44 .mmi nop 0 ;; stfd [r14] = f14 nop 0 .mmi adds r14 = -56, r44 ;; stfd [r14] = f15 adds r14 = -168, r44 ;; .mii st8 [r14] = r17 adds r14 = -128, r44 ;; nop 0 .mii st8 [r14] = r17 adds r14 = -120, r44 ;; nop 0 .mmb st4 [r14] = r0 ld8 r14 = [r16], 8 nop 0 ;; .mib nop 0 mov b6 = r14 nop 0 .mbb ld8 r1 = [r16] nop 0 br.call.sptk.many b0 = b6 ;; .mmb mov r1 = r45 ld4 r40 = [r40] nop 0 ;; .mfb cmp4.eq p6, p7 = 0, r40 nop 0 (p6) br.cond.dpnt .L49 ;; .mfb cmp4.ne p6, p7 = 1, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mfb cmp4.ne p6, p7 = 2, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mii nop 0 cmp4.ne p6, p7 = 3, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld1 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 4, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r44 ;; (p7) ld2 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt2 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 5, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld2 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 6, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r44 ;; (p7) ld4 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt4 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 7, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld4 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 8, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 9, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 10, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 11, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mii nop 0 cmp4.ne p6, p7 = 12, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ldfs f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 13, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ldfd f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 14, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mib nop 0 cmp4.ne p6, p7 = 15, r40 (p6) br.cond.dptk .L49 .mii nop 0 adds r16 = -192, r44 ;; nop 0 .mmi ld4 r14 = [r16] ;; nop 0 tbit.z p6, p7 = r14, 10 .mfb adds r14 = -144, r44 nop 0 (p6) br.cond.dpnt .L49 ;; .mmi ld8 r22 = [r14] ;; adds r14 = -1, r22 nop 0 ;; .mib nop 0 cmp.ltu p6, p7 = 31, r14 (p6) br.cond.dpnt .L49 .mmi ld8 r14 = [r41] ;; and r21 = 7, r14 and r24 = -8, r14 .mii nop 0 cmp.ltu p6, p7 = 8, r22 ;; nop 0 .mfb add r14 = r22, r21 nop 0 (p6) br.cond.dptk .L35 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r14 (p6) br.cond.dptk .L37 .mfi shladd r16 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r17 = [r24] shladd r18 = r21, 3, r0 ;; adds r16 = -1, r16 ;; .mii nop 0 sxt4 r16 = r16 ;; shl r14 = r14, r16 ;; .mmi adds r14 = -1, r14 ;; and r14 = r17, r14 nop 0 .mmi nop 0 ;; nop 0 shr r8 = r14, r18 .L49: .mii nop 0 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 1 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L50: .body .copy_state 1 .mii nop 0 adds r14 = -184, r44 ;; nop 0 .mii ld1 r14 = [r14] nop 0 ;; sxt1 r8 = r14 .mii nop 0 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 2 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L54: .body .copy_state 2 .mmb nop 0 adds r14 = -184, r44 nop 0 ;; .mii ld8 r8 = [r14] mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 3 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L35: .body .copy_state 3 .mib nop 0 cmp.ltu p6, p7 = 16, r22 (p6) br.cond.dptk .L39 ;; .mib nop 0 cmp.ltu p6, p7 = 16, r14 (p6) br.cond.dptk .L41 .mmi shladd r16 = r14, 3, r0 adds r14 = 8, r24 shladd r17 = r21, 2, r0 .mmb shladd r19 = r21, 3, r0 ld8 r18 = [r24] nop 0 ;; .mfi ld8 r20 = [r14] nop 0 addl r14 = 2, r0 .mii adds r16 = -65, r16 sub r17 = 32, r17 ;; sxt4 r16 = r16 .mii nop 0 sxt4 r17 = r17 shr r18 = r18, r19 ;; .mii nop 0 shl r14 = r14, r16 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r20, r14 ;; shl r16 = r14, r17 .mii nop 0 shr r9 = r14, r19 ;; shl r16 = r16, r17 ;; .mii or r8 = r16, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 4 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L37: .body .copy_state 4 .mfi shladd r16 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r18 = [r24], 8 shladd r19 = r21, 3, r0 ;; adds r16 = -65, r16 .mii ld8 r20 = [r24] sub r17 = 64, r19 ;; sxt4 r16 = r16 .mii nop 0 sxt4 r17 = r17 ;; shl r14 = r14, r16 .mii nop 0 shr r18 = r18, r19 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r20, r14 ;; shl r14 = r14, r17 ;; .mii or r8 = r14, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 5 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L39: .body .copy_state 5 .mib nop 0 cmp.ltu p6, p7 = 24, r22 (p6) br.cond.dptk .L43 ;; .mib nop 0 cmp.ltu p6, p7 = 24, r14 (p6) br.cond.dptk .L45 .mmi shladd r16 = r14, 3, r0 adds r14 = 8, r24 shladd r17 = r21, 2, r0 .mmb shladd r20 = r21, 3, r0 ld8 r19 = [r24], 16 nop 0 ;; .mmi ld8 r18 = [r14] addl r14 = 2, r0 adds r16 = -65, r16 .mmb sub r17 = 32, r17 ld8 r21 = [r24] nop 0 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r17 = r17 .mii nop 0 shr r19 = r19, r20 ;; shl r14 = r14, r16 .mii nop 0 shl r16 = r18, r17 shr r18 = r18, r20 ;; .mii nop 0 shl r16 = r16, r17 adds r14 = -1, r14 ;; .mii and r14 = r21, r14 or r8 = r16, r19 ;; shl r16 = r14, r17 .mii nop 0 shr r10 = r14, r20 ;; shl r16 = r16, r17 ;; .mii or r9 = r16, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 6 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L41: .body .copy_state 6 .mfi shladd r17 = r14, 3, r0 nop 0 adds r14 = 8, r24 .mfi ld8 r19 = [r24], 16 nop 0 shladd r16 = r21, 3, r0 ;; .mmi ld8 r18 = [r14] addl r14 = 2, r0 adds r17 = -129, r17 .mmi ld8 r21 = [r24] mov r20 = r16 sub r16 = 64, r16 ;; .mii nop 0 sxt4 r17 = r17 sxt4 r16 = r16 ;; .mii nop 0 shl r14 = r14, r17 shr r19 = r19, r20 .mii nop 0 shl r17 = r18, r16 shr r18 = r18, r20 ;; .mmi adds r14 = -1, r14 ;; and r14 = r21, r14 or r8 = r17, r19 ;; .mib nop 0 shl r14 = r14, r16 nop 0 ;; .mii or r9 = r14, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 7 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mmi shladd r17 = r14, 3, r0 adds r14 = 24, r24 shladd r16 = r21, 3, r0 .mmi adds r19 = 8, r24 ld8 r21 = [r24] adds r20 = 16, r24 ;; .mmi ld8 r23 = [r14] addl r14 = 2, r0 adds r17 = -129, r17 .mmi mov r18 = r16 ld8 r19 = [r19] sub r16 = 64, r16 ;; .mib nop 0 sxt4 r17 = r17 nop 0 .mii ld8 r20 = [r20] sxt4 r16 = r16 ;; shl r14 = r14, r17 .mii nop 0 shr r22 = r20, r18 shl r17 = r19, r16 .mii nop 0 shr r21 = r21, r18 shr r19 = r19, r18 .mii nop 0 shl r20 = r20, r16 ;; nop 0 .mmi adds r14 = -1, r14 ;; and r14 = r23, r14 or r8 = r17, r21 .mii nop 0 or r9 = r20, r19 ;; shl r14 = r14, r16 ;; .mii or r10 = r14, r22 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 8 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L43: .body .copy_state 8 .mib nop 0 cmp.ltu p6, p7 = 32, r14 (p6) br.cond.dptk .L47 .mmi adds r16 = 24, r24 shladd r14 = r14, 3, r0 adds r18 = 8, r24 .mmi shladd r17 = r21, 2, r0 adds r19 = 16, r24 shladd r21 = r21, 3, r0 ;; .mmi nop 0 ld8 r23 = [r16] addl r16 = 2, r0 .mmi adds r14 = -65, r14 ld8 r20 = [r18] sub r17 = 32, r17 ;; .mii nop 0 sxt4 r14 = r14 sxt4 r17 = r17 .mmb ld8 r22 = [r19] ld8 r19 = [r24] nop 0 ;; .mii nop 0 shl r16 = r16, r14 shl r14 = r20, r17 .mii nop 0 shr r19 = r19, r21 shl r18 = r22, r17 ;; .mii nop 0 shl r14 = r14, r17 shr r20 = r20, r21 .mii adds r16 = -1, r16 shl r18 = r18, r17 shr r22 = r22, r21 ;; .mmi nop 0 and r16 = r23, r16 or r8 = r14, r19 .mmi or r9 = r18, r20 ;; nop 0 shl r14 = r16, r17 .mii nop 0 shr r11 = r16, r21 ;; shl r14 = r14, r17 ;; .mii or r10 = r14, r22 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 9 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L47: .body .copy_state 9 .mmb shladd r17 = r14, 3, r0 adds r14 = 32, r24 nop 0 .mmi adds r19 = 8, r24 adds r20 = 16, r24 shladd r16 = r21, 3, r0 ;; .mfi ld8 r23 = [r14] nop 0 adds r14 = 24, r24 .mmi ld8 r21 = [r19] adds r17 = -129, r17 mov r18 = r16 .mfi ld8 r19 = [r20] nop 0 sub r16 = 64, r16 ;; .mmi ld8 r20 = [r14] addl r14 = 2, r0 sxt4 r17 = r17 .mii nop 0 sxt4 r16 = r16 ;; shl r22 = r21, r16 .mii nop 0 shr r21 = r21, r18 shl r14 = r14, r17 .mii ld8 r17 = [r24] shr r24 = r20, r18 shl r20 = r20, r16 ;; .mii nop 0 shr r17 = r17, r18 shr r18 = r19, r18 .mii adds r14 = -1, r14 shl r19 = r19, r16 ;; and r14 = r23, r14 .mmi nop 0 or r8 = r22, r17 or r10 = r20, r18 .mii nop 0 or r9 = r19, r21 ;; shl r14 = r14, r16 ;; .mii or r11 = r14, r24 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .restore sp mov r12 = r44 br.ret.sptk.many b0 .endp callback_receiver# .align 16 .global callback_get_receiver# .proc callback_get_receiver# callback_get_receiver: .prologue 2, 2 .mfi .vframe r2 mov r2 = r12 .body nop 0 addl r8 = @ltoff(@fptr(callback_receiver#)), gp ;; .mib ld8 r8 = [r8] .restore sp mov r12 = r2 br.ret.sptk.many b0 .endp callback_get_receiver# .ident "GCC: (GNU) 4.0.1" #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-mips64eb-macro.S0000664000000000000000000001204214662617144017634 00000000000000#include "asm-mips.h" .file 1 "vacall-mips64.c" .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,272,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $fp,192($sp) move $fp,$sp sd $4,208($fp) ld $4,8($2) ld $25,0($2) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) move $5,$fp swc1 $f19,88($fp) sd $12,24($fp) sw $0,0($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L46 li $13,4 beq $12,$13,.L47 li $13,5 beq $12,$13,.L48 li $13,6 beq $12,$13,.L49 li $13,7 beq $12,$13,.L50 li $13,8 beq $12,$13,.L44 li $13,9 beq $12,$13,.L44 li $13,10 beq $12,$13,.L44 li $13,11 beq $12,$13,.L44 li $13,12 beq $12,$13,.L51 li $13,13 beq $12,$13,.L52 li $13,14 beq $12,$13,.L44 li $13,15 bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 beq $12,$13,.L53 li $13,2 beq $12,$13,.L54 li $13,4 beq $12,$13,.L55 li $13,8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $24,-8 sltu $25,$14,9 andi $15,$13,0x7 and $24,$13,$24 beq $25,$0,.L24 daddu $13,$14,$15 sltu $25,$13,9 sll $13,$13,0 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($24) sll $13,$13,3 li $24,-1 dsll $13,$24,$13 and $13,$13,$25 sll $15,$15,3 dsll $2,$13,$15 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $14,$13,.L56 li $13,8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $14,$12,.L60 li $12,16 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,0 ld $18,8($24) subu $13,$0,$13 move $16,$15 li $25,-1 subu $15,$0,$15 sll $13,$13,3 dsll $13,$25,$13 ld $17,0($24) sll $25,$15,2 addiu $24,$25,32 and $13,$13,$18 sll $15,$16,3 dsra $25,$13,$24 dsll $16,$17,$15 dsra $24,$25,$24 or $2,$16,$24 b .L23 dsll $3,$13,$15 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($24) subu $13,$0,$13 ld $16,8($24) ld $17,0($24) subu $25,$0,$15 sll $13,$13,3 li $24,-1 dsll $24,$24,$13 sll $25,$25,3 sll $15,$15,3 addiu $25,$25,64 and $13,$24,$18 dsra $13,$13,$25 dsll $24,$17,$15 dsra $17,$16,$25 dsll $15,$16,$15 or $2,$24,$17 b .L23 or $3,$13,$15 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($24) ld $25,0($24) sll $13,$13,3 li $24,-1 dsll $13,$24,$13 subu $24,$0,$15 and $13,$13,$16 sll $24,$24,3 sll $15,$15,3 dsra $13,$13,$24 dsll $15,$25,$15 b .L23 or $2,$13,$15 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,16,$31 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) daddu $13,$13,$25 daddiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) daddiu $sp,$sp,-16 ld $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) daddiu $2,$12,%got_ofst(callback_receiver) j $31 daddiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-mips64el-macro.S0000664000000000000000000001217314662617145017654 00000000000000#include "asm-mips.h" .file 1 "vacall-mips64.c" .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,272,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $fp,192($sp) move $fp,$sp sd $4,208($fp) ld $4,8($2) ld $25,0($2) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) move $5,$fp swc1 $f19,88($fp) sd $12,24($fp) sw $0,0($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L46 li $13,4 beq $12,$13,.L47 li $13,5 beq $12,$13,.L48 li $13,6 beq $12,$13,.L49 li $13,7 beq $12,$13,.L50 li $13,8 beq $12,$13,.L44 li $13,9 beq $12,$13,.L44 li $13,10 beq $12,$13,.L44 li $13,11 beq $12,$13,.L44 li $13,12 beq $12,$13,.L51 li $13,13 beq $12,$13,.L52 li $13,14 beq $12,$13,.L44 li $13,15 bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 beq $12,$13,.L53 li $13,2 beq $12,$13,.L54 li $13,4 beq $12,$13,.L55 li $13,8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $15,-8 sltu $25,$14,9 andi $24,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 daddu $13,$14,$24 sltu $25,$13,9 beq $25,$0,.L25 dsll $13,$13,3 daddiu $13,$13,-1 ld $25,0($15) sll $13,$13,0 li $15,2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $24,$24,3 dsra $2,$13,$24 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $14,$13,.L56 li $13,8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $14,$12,.L60 li $12,16 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 dsll $13,$13,3 daddiu $13,$13,-65 ld $17,8($15) li $25,2 sll $13,$13,0 dsll $13,$25,$13 subu $25,$0,$24 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $24,$24,3 dsll $25,$13,$15 dsra $16,$16,$24 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$24 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: daddiu $13,$13,-129 ld $16,8($15) ld $17,0($15) sll $13,$13,0 ld $18,16($15) li $15,2 subu $25,$0,$24 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $24,$24,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$24 dsll $17,$16,$25 dsra $24,$16,$24 or $2,$15,$17 b .L23 or $3,$13,$24 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: daddiu $13,$13,-65 li $25,2 sll $13,$13,0 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$24 and $15,$13,$17 sll $24,$24,3 sll $13,$16,3 dsll $13,$15,$13 dsra $24,$25,$24 b .L23 or $2,$13,$24 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,16,$31 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) daddu $13,$13,$25 daddiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) daddiu $sp,$sp,-16 ld $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) daddiu $2,$12,%got_ofst(callback_receiver) j $31 daddiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-s390x-linux.s0000664000000000000000000000452714662617145017201 00000000000000 .file "vacall-s390x.c" .text .align 8 .type callback_receiver, @function callback_receiver: .LFB0: .cfi_startproc stmg %r10,%r15,80(%r15) .cfi_offset 10, -80 .cfi_offset 11, -72 .cfi_offset 12, -64 .cfi_offset 13, -56 .cfi_offset 14, -48 .cfi_offset 15, -40 aghi %r15,-320 .cfi_def_cfa_offset 480 lgr %r11,%r15 .cfi_def_cfa_register 11 lgr %r1,%r0 lhi %r14,0 stg %r2,224(%r11) lg %r10,0(%r1) st %r14,160(%r11) la %r14,480(%r11) stg %r14,184(%r11) lghi %r14,0 stg %r3,232(%r11) lg %r2,8(%r1) stg %r4,240(%r11) stg %r5,248(%r11) stg %r6,256(%r11) ste %f0,268(%r11) ste %f2,272(%r11) ste %f4,276(%r11) ste %f6,280(%r11) std %f0,288(%r11) std %f2,296(%r11) std %f4,304(%r11) std %f6,312(%r11) stg %r14,192(%r11) st %r14,200(%r11) st %r14,216(%r11) st %r14,264(%r11) la %r3,160(%r11) basr %r14,%r10 icm %r1,15,200(%r11) je .L1 chi %r1,1 je .L18 chi %r1,2 je .L21 chi %r1,3 je .L18 chi %r1,4 je .L22 chi %r1,5 je .L23 chi %r1,6 je .L24 chi %r1,7 je .L25 lr %r10,%r1 nill %r10,65533 chi %r10,8 je .L19 chi %r10,9 je .L19 chi %r1,12 je .L26 chi %r1,13 je .L27 chi %r1,14 je .L19 .L1: lg %r4,432(%r11) lmg %r10,%r15,400(%r11) .cfi_remember_state .cfi_restore 15 .cfi_restore 14 .cfi_restore 13 .cfi_restore 12 .cfi_restore 11 .cfi_restore 10 .cfi_def_cfa 15, 160 br %r4 .L18: .cfi_restore_state lg %r4,432(%r11) llgc %r2,168(%r11) lmg %r10,%r15,400(%r11) .cfi_remember_state .cfi_restore 10 .cfi_restore 11 .cfi_restore 12 .cfi_restore 13 .cfi_restore 14 .cfi_restore 15 .cfi_def_cfa 15, 160 br %r4 .L21: .cfi_restore_state icmh %r2,8,168(%r11) srag %r2,%r2,56 j .L1 .L19: lg %r2,168(%r11) j .L1 .L22: lgh %r2,168(%r11) j .L1 .L23: llgh %r2,168(%r11) j .L1 .L24: lgf %r2,168(%r11) j .L1 .L26: le %f0,168(%r11) j .L1 .L25: llgf %r2,168(%r11) j .L1 .L27: ld %f0,168(%r11) j .L1 .cfi_endproc .LFE0: .size callback_receiver, .-callback_receiver .align 8 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1: .cfi_startproc stg %r11,88(%r15) .cfi_offset 11, -72 lgr %r11,%r15 .cfi_def_cfa_register 11 larl %r2,callback_receiver lg %r11,88(%r11) .cfi_restore 11 .cfi_def_cfa_register 15 br %r14 .cfi_endproc .LFE1: .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-ia64-linux.s0000664000000000000000000002464514662617145017061 00000000000000 .file "vacall-ia64.c" .pred.safe_across_calls p1-p5,p16-p63 .text .align 16 .proc callback_receiver# callback_receiver: .prologue 14, 42 .spill 48 .mmb .save ar.pfs, r43 alloc r43 = ar.pfs, 8, 6, 2, 0 .vframe r44 mov r44 = r12 nop 0 .mmi adds r12 = -208, r12 adds r18 = 8, r15 mov r45 = r1 ;; .mmi adds r16 = -48, r44 adds r14 = -136, r44 adds r17 = -48, r44 .mmi adds r40 = -152, r44 adds r47 = -192, r44 adds r41 = -160, r44 ;; .mmb st8 [r14] = r8 adds r14 = -32, r44 nop 0 .mfi st8 [r16] = r32, 8 nop 0 .save rp, r42 mov r42 = b0 .body ;; .mfi st8 [r14] = r34 nop 0 adds r14 = -24, r44 .mmb st8 [r16] = r33 ld8 r16 = [r15] nop 0 ;; .mmi nop 0 st8 [r14] = r35 adds r14 = -16, r44 .mmi st8 [r41] = r0 ;; st8 [r14] = r36 adds r14 = -8, r44 .mmb st4 [r40] = r0 ld8 r46 = [r18] nop 0 ;; .mmi nop 0 st8 [r14] = r37 adds r14 = 8, r44 .mmi st8 [r44] = r38 ;; st8 [r14] = r39 adds r14 = -112, r44 .mmi st4 [r47] = r0 ;; stfd [r14] = f8 nop 0 .mmi adds r14 = -104, r44 ;; stfd [r14] = f9 adds r14 = -96, r44 ;; .mfi stfd [r14] = f10 nop 0 adds r14 = -88, r44 .mmi nop 0 ;; stfd [r14] = f11 nop 0 .mmi adds r14 = -80, r44 ;; stfd [r14] = f12 adds r14 = -72, r44 ;; .mfi stfd [r14] = f13 nop 0 adds r14 = -64, r44 .mmi nop 0 ;; stfd [r14] = f14 nop 0 .mmi adds r14 = -56, r44 ;; stfd [r14] = f15 adds r14 = -168, r44 ;; .mii st8 [r14] = r17 adds r14 = -128, r44 ;; nop 0 .mii st8 [r14] = r17 adds r14 = -120, r44 ;; nop 0 .mmb st4 [r14] = r0 ld8 r14 = [r16], 8 nop 0 ;; .mib nop 0 mov b6 = r14 nop 0 .mbb ld8 r1 = [r16] nop 0 br.call.sptk.many b0 = b6 ;; .mmb mov r1 = r45 ld4 r40 = [r40] nop 0 ;; .mfb cmp4.eq p6, p7 = 0, r40 nop 0 (p6) br.cond.dpnt .L49 ;; .mfb cmp4.ne p6, p7 = 1, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mfb cmp4.ne p6, p7 = 2, r40 nop 0 (p7) br.cond.dpnt .L50 ;; .mii nop 0 cmp4.ne p6, p7 = 3, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld1 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 4, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r44 ;; (p7) ld2 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt2 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 5, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld2 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 6, r40 ;; nop 0 .mmi (p7) adds r14 = -184, r44 ;; (p7) ld4 r14 = [r14] nop 0 ;; .mib nop 0 (p7) sxt4 r8 = r14 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 7, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ld4 r8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 8, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 9, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 10, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mfb cmp4.ne p6, p7 = 11, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mii nop 0 cmp4.ne p6, p7 = 12, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ldfs f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mii nop 0 cmp4.ne p6, p7 = 13, r40 ;; (p7) adds r14 = -184, r44 ;; .mfb (p7) ldfd f8 = [r14] nop 0 (p7) br.cond.dpnt .L49 .mfb cmp4.ne p6, p7 = 14, r40 nop 0 (p7) br.cond.dpnt .L54 ;; .mib nop 0 cmp4.ne p6, p7 = 15, r40 (p6) br.cond.dptk .L49 .mii nop 0 adds r16 = -192, r44 ;; nop 0 .mmi ld4 r14 = [r16] ;; nop 0 tbit.z p6, p7 = r14, 10 .mfb adds r14 = -144, r44 nop 0 (p6) br.cond.dpnt .L49 ;; .mmi ld8 r22 = [r14] ;; adds r14 = -1, r22 nop 0 ;; .mib nop 0 cmp.ltu p6, p7 = 31, r14 (p6) br.cond.dpnt .L49 .mmi ld8 r14 = [r41] ;; and r21 = 7, r14 and r24 = -8, r14 .mii nop 0 cmp.ltu p6, p7 = 8, r22 ;; nop 0 .mfb add r14 = r22, r21 nop 0 (p6) br.cond.dptk .L35 ;; .mib nop 0 cmp.ltu p6, p7 = 8, r14 (p6) br.cond.dptk .L37 .mfi shladd r16 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r17 = [r24] shladd r18 = r21, 3, r0 ;; adds r16 = -1, r16 ;; .mii nop 0 sxt4 r16 = r16 ;; shl r14 = r14, r16 ;; .mmi adds r14 = -1, r14 ;; and r14 = r17, r14 nop 0 .mmi nop 0 ;; nop 0 shr r8 = r14, r18 .L49: .mii nop 0 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 1 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L50: .body .copy_state 1 .mii nop 0 adds r14 = -184, r44 ;; nop 0 .mii ld1 r14 = [r14] nop 0 ;; sxt1 r8 = r14 .mii nop 0 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 2 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L54: .body .copy_state 2 .mmb nop 0 adds r14 = -184, r44 nop 0 ;; .mii ld8 r8 = [r14] mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 3 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L35: .body .copy_state 3 .mib nop 0 cmp.ltu p6, p7 = 16, r22 (p6) br.cond.dptk .L39 ;; .mib nop 0 cmp.ltu p6, p7 = 16, r14 (p6) br.cond.dptk .L41 .mmi shladd r16 = r14, 3, r0 adds r14 = 8, r24 shladd r17 = r21, 2, r0 .mmb shladd r19 = r21, 3, r0 ld8 r18 = [r24] nop 0 ;; .mfi ld8 r20 = [r14] nop 0 addl r14 = 2, r0 .mii adds r16 = -65, r16 sub r17 = 32, r17 ;; sxt4 r16 = r16 .mii nop 0 sxt4 r17 = r17 shr r18 = r18, r19 ;; .mii nop 0 shl r14 = r14, r16 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r20, r14 ;; shl r16 = r14, r17 .mii nop 0 shr r9 = r14, r19 ;; shl r16 = r16, r17 ;; .mii or r8 = r16, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 4 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L37: .body .copy_state 4 .mfi shladd r16 = r14, 3, r0 nop 0 addl r14 = 2, r0 .mii ld8 r18 = [r24], 8 shladd r19 = r21, 3, r0 ;; adds r16 = -65, r16 .mii ld8 r20 = [r24] sub r17 = 64, r19 ;; sxt4 r16 = r16 .mii nop 0 sxt4 r17 = r17 ;; shl r14 = r14, r16 .mii nop 0 shr r18 = r18, r19 ;; adds r14 = -1, r14 ;; .mii nop 0 and r14 = r20, r14 ;; shl r14 = r14, r17 ;; .mii or r8 = r14, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 5 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L39: .body .copy_state 5 .mib nop 0 cmp.ltu p6, p7 = 24, r22 (p6) br.cond.dptk .L43 ;; .mib nop 0 cmp.ltu p6, p7 = 24, r14 (p6) br.cond.dptk .L45 .mmi shladd r16 = r14, 3, r0 adds r14 = 8, r24 shladd r17 = r21, 2, r0 .mmb shladd r20 = r21, 3, r0 ld8 r19 = [r24], 16 nop 0 ;; .mmi ld8 r18 = [r14] addl r14 = 2, r0 adds r16 = -65, r16 .mmb sub r17 = 32, r17 ld8 r21 = [r24] nop 0 ;; .mii nop 0 sxt4 r16 = r16 sxt4 r17 = r17 .mii nop 0 shr r19 = r19, r20 ;; shl r14 = r14, r16 .mii nop 0 shl r16 = r18, r17 shr r18 = r18, r20 ;; .mii nop 0 shl r16 = r16, r17 adds r14 = -1, r14 ;; .mii and r14 = r21, r14 or r8 = r16, r19 ;; shl r16 = r14, r17 .mii nop 0 shr r10 = r14, r20 ;; shl r16 = r16, r17 ;; .mii or r9 = r16, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 6 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L41: .body .copy_state 6 .mfi shladd r17 = r14, 3, r0 nop 0 adds r14 = 8, r24 .mfi ld8 r19 = [r24], 16 nop 0 shladd r16 = r21, 3, r0 ;; .mmi ld8 r18 = [r14] addl r14 = 2, r0 adds r17 = -129, r17 .mmi ld8 r21 = [r24] mov r20 = r16 sub r16 = 64, r16 ;; .mii nop 0 sxt4 r17 = r17 sxt4 r16 = r16 ;; .mii nop 0 shl r14 = r14, r17 shr r19 = r19, r20 .mii nop 0 shl r17 = r18, r16 shr r18 = r18, r20 ;; .mmi adds r14 = -1, r14 ;; and r14 = r21, r14 or r8 = r17, r19 ;; .mib nop 0 shl r14 = r14, r16 nop 0 ;; .mii or r9 = r14, r18 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 7 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L45: .body .copy_state 7 .mmi shladd r17 = r14, 3, r0 adds r14 = 24, r24 shladd r16 = r21, 3, r0 .mmi adds r19 = 8, r24 ld8 r21 = [r24] adds r20 = 16, r24 ;; .mmi ld8 r23 = [r14] addl r14 = 2, r0 adds r17 = -129, r17 .mmi mov r18 = r16 ld8 r19 = [r19] sub r16 = 64, r16 ;; .mib nop 0 sxt4 r17 = r17 nop 0 .mii ld8 r20 = [r20] sxt4 r16 = r16 ;; shl r14 = r14, r17 .mii nop 0 shr r22 = r20, r18 shl r17 = r19, r16 .mii nop 0 shr r21 = r21, r18 shr r19 = r19, r18 .mii nop 0 shl r20 = r20, r16 ;; nop 0 .mmi adds r14 = -1, r14 ;; and r14 = r23, r14 or r8 = r17, r21 .mii nop 0 or r9 = r20, r19 ;; shl r14 = r14, r16 ;; .mii or r10 = r14, r22 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 8 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L43: .body .copy_state 8 .mib nop 0 cmp.ltu p6, p7 = 32, r14 (p6) br.cond.dptk .L47 .mmi adds r16 = 24, r24 shladd r14 = r14, 3, r0 adds r18 = 8, r24 .mmi shladd r17 = r21, 2, r0 adds r19 = 16, r24 shladd r21 = r21, 3, r0 ;; .mmi nop 0 ld8 r23 = [r16] addl r16 = 2, r0 .mmi adds r14 = -65, r14 ld8 r20 = [r18] sub r17 = 32, r17 ;; .mii nop 0 sxt4 r14 = r14 sxt4 r17 = r17 .mmb ld8 r22 = [r19] ld8 r19 = [r24] nop 0 ;; .mii nop 0 shl r16 = r16, r14 shl r14 = r20, r17 .mii nop 0 shr r19 = r19, r21 shl r18 = r22, r17 ;; .mii nop 0 shl r14 = r14, r17 shr r20 = r20, r21 .mii adds r16 = -1, r16 shl r18 = r18, r17 shr r22 = r22, r21 ;; .mmi nop 0 and r16 = r23, r16 or r8 = r14, r19 .mmi or r9 = r18, r20 ;; nop 0 shl r14 = r16, r17 .mii nop 0 shr r11 = r16, r21 ;; shl r14 = r14, r17 ;; .mii or r10 = r14, r22 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .label_state 9 .restore sp mov r12 = r44 br.ret.sptk.many b0 .L47: .body .copy_state 9 .mmb shladd r17 = r14, 3, r0 adds r14 = 32, r24 nop 0 .mmi adds r19 = 8, r24 adds r20 = 16, r24 shladd r16 = r21, 3, r0 ;; .mfi ld8 r23 = [r14] nop 0 adds r14 = 24, r24 .mmi ld8 r21 = [r19] adds r17 = -129, r17 mov r18 = r16 .mfi ld8 r19 = [r20] nop 0 sub r16 = 64, r16 ;; .mmi ld8 r20 = [r14] addl r14 = 2, r0 sxt4 r17 = r17 .mii nop 0 sxt4 r16 = r16 ;; shl r22 = r21, r16 .mii nop 0 shr r21 = r21, r18 shl r14 = r14, r17 .mii ld8 r17 = [r24] shr r24 = r20, r18 shl r20 = r20, r16 ;; .mii nop 0 shr r17 = r17, r18 shr r18 = r19, r18 .mii adds r14 = -1, r14 shl r19 = r19, r16 ;; and r14 = r23, r14 .mmi nop 0 or r8 = r22, r17 or r10 = r20, r18 .mii nop 0 or r9 = r19, r21 ;; shl r14 = r14, r16 ;; .mii or r11 = r14, r24 mov ar.pfs = r43 mov b0 = r42 .mib nop 0 .restore sp mov r12 = r44 br.ret.sptk.many b0 .endp callback_receiver# .align 16 .global callback_get_receiver# .proc callback_get_receiver# callback_get_receiver: .prologue 2, 2 .mfi .vframe r2 mov r2 = r12 .body nop 0 addl r8 = @ltoff(@fptr(callback_receiver#)), gp ;; .mib ld8 r8 = [r8] .restore sp mov r12 = r2 br.ret.sptk.many b0 .endp callback_get_receiver# .ident "GCC: (GNU) 4.0.1" libffcall-2.5/callback/vacall_r/vacall-x86_64-x32-linux.s0000664000000000000000000001207414662617145017657 00000000000000 .file "vacall-x86_64.c" .section .text.unlikely,"ax",@progbits .LCOLDB0: .text .LHOTB0: .p2align 4,,15 .type callback_receiver, @function callback_receiver: .LFB0: pushq %rbp .LCFI0: movl %esp, %ebp .LCFI1: pushq %r14 pushq %r12 subl $176, %esp .LCFI2: movq %rdi, -72(%ebp) leal 16(%rbp), %edi movq %rcx, -48(%ebp) movl (%r10d), %ecx movsd %xmm0, -144(%ebp) movl %edi, -168(%ebp) movl 4(%r10d), %edi movsd %xmm1, -136(%ebp) movq %rsi, -64(%ebp) movsd %xmm2, -128(%ebp) leal -192(%rbp), %esi movq %rdx, -56(%ebp) movsd %xmm3, -120(%ebp) movq %r8, -40(%ebp) movsd %xmm4, -112(%ebp) movq %r9, -32(%ebp) movsd %xmm5, -104(%ebp) movsd %xmm6, -96(%ebp) movl $0, -192(%ebp) movsd %xmm7, -88(%ebp) movl $0, -164(%ebp) movl $0, -160(%ebp) movl $0, -80(%ebp) movl $0, -152(%ebp) call *%rcx movl -160(%ebp), %ecx testl %ecx, %ecx je .L1 cmpl $1, %ecx je .L27 cmpl $2, %ecx je .L27 cmpl $3, %ecx je .L33 cmpl $4, %ecx je .L34 cmpl $5, %ecx je .L35 cmpl $6, %ecx je .L28 cmpl $7, %ecx je .L30 cmpl $8, %ecx je .L28 cmpl $9, %ecx je .L30 cmpl $10, %ecx je .L31 cmpl $11, %ecx je .L31 cmpl $12, %ecx je .L36 cmpl $13, %ecx je .L37 cmpl $14, %ecx je .L30 cmpl $15, %ecx jne .L1 testb $4, -191(%ebp) je .L1 movl -156(%ebp), %ecx leal -1(%rcx), %esi cmpl $15, %esi ja .L1 movl -164(%ebp), %esi movl %esi, %edi andl $7, %esi andl $-8, %edi cmpl $8, %ecx leal (%rcx,%rsi), %r11d ja .L17 cmpl $8, %r11d ja .L18 leal -1(,%r11,8), %ecx movl $2, %r8d salq %cl, %r8 movq %r8, %rcx subq $1, %rcx andq (%edi), %rcx movq %rcx, %rdi leal 0(,%rsi,8), %ecx sarq %cl, %rdi movq %rdi, %rax .L1: addl $176, %esp popq %r12 popq %r14 popq %rbp .LCFI3: ret .p2align 4,,10 .p2align 3 .L27: .LCFI4: movsbq -184(%ebp), %rax addl $176, %esp popq %r12 popq %r14 popq %rbp .LCFI5: ret .p2align 4,,10 .p2align 3 .L28: .LCFI6: movslq -184(%ebp), %rax jmp .L1 .p2align 4,,10 .p2align 3 .L33: movzbl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L34: movswq -184(%ebp), %rax jmp .L1 .p2align 4,,10 .p2align 3 .L30: movl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L35: movzwl -184(%ebp), %eax jmp .L1 .p2align 4,,10 .p2align 3 .L36: movss -184(%ebp), %xmm0 jmp .L1 .p2align 4,,10 .p2align 3 .L31: movq -184(%ebp), %rax jmp .L1 .L37: movsd -184(%ebp), %xmm0 jmp .L1 .L17: cmpl $16, %r11d leal 0(,%rsi,8), %r9d jbe .L38 negl %esi movq 8(%edi), %r8 movl %r9d, %ecx leal 64(,%rsi,8), %r12d movq (%edi), %rsi movq %r8, %r14 sarq %cl, %rsi movl %r12d, %ecx salq %cl, %r14 leal -129(,%r11,8), %ecx orq %r14, %rsi movq %rsi, %rax movl $2, %esi salq %cl, %rsi movl %r12d, %ecx subq $1, %rsi andq 16(%edi), %rsi salq %cl, %rsi movl %r9d, %ecx sarq %cl, %r8 orq %r8, %rsi movq %rsi, %rdx jmp .L1 .L18: leal -65(,%r11,8), %ecx movl $2, %r8d salq %cl, %r8 movl %esi, %ecx subq $1, %r8 andq 8(%edi), %r8 negl %ecx leal 64(,%rcx,8), %ecx movq (%edi), %rdi salq %cl, %r8 leal 0(,%rsi,8), %ecx sarq %cl, %rdi orq %rdi, %r8 movq %r8, %rax jmp .L1 .L38: leal -65(,%r11,8), %ecx movl $2, %r8d movq (%edi), %r11 imull $-4, %esi, %esi salq %cl, %r8 movl %r9d, %ecx subq $1, %r8 andq 8(%edi), %r8 sarq %cl, %r11 addl $32, %esi movl %esi, %ecx movq %r8, %rdi salq %cl, %rdi salq %cl, %rdi movl %r9d, %ecx orq %rdi, %r11 sarq %cl, %r8 movq %r11, %rax movq %r8, %rdx jmp .L1 .LFE0: .size callback_receiver, .-callback_receiver .section .text.unlikely .LCOLDE0: .text .LHOTE0: .section .text.unlikely .LCOLDB1: .text .LHOTB1: .p2align 4,,15 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1: pushq %rbp .LCFI7: leal callback_receiver(%rip), %eax movl %esp, %ebp .LCFI8: popq %rbp .LCFI9: ret .LFE1: .size callback_get_receiver, .-callback_get_receiver .section .text.unlikely .LCOLDE1: .text .LHOTE1: .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 4 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0-. .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0x8e .uleb128 0x3 .byte 0x8c .uleb128 0x4 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xb .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xa .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xb .align 4 .LEFDE1: .LSFDE3: .long .LEFDE3-.LASFDE3 .LASFDE3: .long .LASFDE3-.Lframe1 .long .LFB1-. .long .LFE1-.LFB1 .uleb128 0 .byte 0x4 .long .LCFI7-.LFB1 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI8-.LCFI7 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI9-.LCFI8 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 4 .LEFDE3: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-mipseb-macro.S0000664000000000000000000001021114662617144017456 00000000000000#include "asm-mips.h" .file 1 "vacall-mips.c" .text .align 2 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,104,$31 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) lw $25,0($2) sw $4,104($fp) lw $4,4($2) sw $5,108($fp) addiu $5,$fp,104 sw $5,40($fp) addiu $5,$fp,120 sw $5,56($fp) .cprestore 16 sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) addiu $5,$fp,24 jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,8,$31 .mask 0x40000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-8 sw $fp,4($sp) move $fp,$sp move $sp,$fp lw $fp,4($sp) la $2,callback_receiver .set noreorder .set nomacro j $31 addiu $sp,$sp,8 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-arm-old-macro.S0000664000000000000000000000437714662617145017553 00000000000000#include "asm-arm.h" .text .align 2 DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) // args = 28, pretend = 0, frame = 32 // frame_needed = 1, uses_anonymous_args = 0 mov ip, sp stmfd sp!, {r4, fp, ip, lr, pc} mov r2, $0 sub fp, ip, $-4294967292 sub sp, sp, $32 ldr r4, [fp, $4] str r2, [fp, $-28] add r3, fp, $28 str r2, [fp, $-24] str r2, [fp, $-48] str r3, [fp, $-32] bic sp, sp, $7 ldr r0, [r4, $4] sub r1, fp, $48 mov lr, pc ldr pc, [r4, $0] ldr r2, [fp, $-24] cmp r2, $0 ldmeqea fp, {r4, fp, sp, pc} cmp r2, $1 beq L(36) cmp r2, $2 ldreqsb r0, [fp, $-40] ldmeqea fp, {r4, fp, sp, pc} cmp r2, $3 beq L(36) cmp r2, $4 ldreqsh r0, [fp, $-40] ldmeqea fp, {r4, fp, sp, pc} cmp r2, $5 ldreqh r0, [fp, $-40] ldmeqea fp, {r4, fp, sp, pc} cmp r2, $6 beq L(40) cmp r2, $7 beq L(40) cmp r2, $8 beq L(40) cmp r2, $9 beq L(40) sub r3, r2, $10 cmp r3, $1 bls L(41) cmp r2, $12 ldreq r0, [fp, $-40] // float ldmeqea fp, {r4, fp, sp, pc} cmp r2, $13 beq L(41) cmp r2, $14 beq L(40) cmp r2, $15 ldmneea fp, {r4, fp, sp, pc} ldr r3, [fp, $-48] tst r3, $1024 ldmeqea fp, {r4, fp, sp, pc} ldr r3, [fp, $-20] cmp r3, $1 ldreq r3, [fp, $-28] ldreqb r0, [r3, $0] // zero_extendqisi2 ldmeqea fp, {r4, fp, sp, pc} cmp r3, $2 ldreq r3, [fp, $-28] ldrne r3, [fp, $-28] ldreqh r0, [r3, $0] ldrne r0, [r3, $0] ldmea fp, {r4, fp, sp, pc} L(40): ldr r0, [fp, $-40] ldmea fp, {r4, fp, sp, pc} L(41): sub r0, fp, $40 ldmia r0, {r0, r1} // phole ldm ldmea fp, {r4, fp, sp, pc} L(36): ldrb r0, [fp, $-40] // zero_extendqisi2 ldmea fp, {r4, fp, sp, pc} L(fe1): FUNEND(callback_receiver) .align 2 .global C(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) // args = 0, pretend = 0, frame = 0 // frame_needed = 1, uses_anonymous_args = 0 mov ip, sp stmfd sp!, {sl, fp, ip, lr, pc} ldr sl, L(44) ldr r3, L(44)+4 L(43): add sl, pc, sl sub fp, ip, $-4294967292 add r0, sl, r3 ldmea fp, {sl, fp, sp, pc} L(45): .align 2 L(44): .word _GLOBAL_OFFSET_TABLE_-(L(43)+8) .word callback_receiver(GOTOFF) L(fe2): FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/callback/vacall_r/README0000644000000000000000000000056113026317517014373 00000000000000This directory contains a reentrant version of the vacall package. Instead of using a global variable for the function to be called, a pointer is passed in a special CPU register, pointing to: - a function code pointer in the first word, - a data word in the second word, to be passed before the va_alist. The include file is renamed to . libffcall-2.5/callback/vacall_r/vacall-x86_64-windows-macro.S0000664000000000000000000001677214662617145020650 00000000000000#include "asm-x86_64.h" TEXT() P2ALIGN(4,15) DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) L(FB0): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN2(sub,q ,NUM(144), R(rsp)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,16)) INSN2(lea,q ,X8 MEM_DISP(rbp,16), R(rcx)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(rbp,24)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,32)) INSN2(lea,q ,X8 MEM_DISP(rbp,-112), R(rdx)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,40)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-88)) INSN2S(movs,s ,R(xmm0),X4 MEM_DISP(rbp,-52)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-112)) INSN2S(movs,s ,R(xmm1),X4 MEM_DISP(rbp,-48)) INSN2(mov,q ,NUM(0),X8 MEM_DISP(rbp,-80)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-72)) INSN2S(movs,s ,R(xmm2),X4 MEM_DISP(rbp,-44)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-56)) INSN2S(movs,s ,R(xmm3),X4 MEM_DISP(rbp,-40)) INSN2(mov,q ,X8 MEM_DISP(r10,8), R(rcx)) INSN2S(movs,d ,R(xmm0),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm1),X8 MEM_DISP(rbp,-24)) INSN2S(movs,d ,R(xmm2),X8 MEM_DISP(rbp,-16)) INSN2S(movs,d ,R(xmm3),X8 MEM_DISP(rbp,-8)) INSN1(call,_ ,INDIR(X8 MEM(r10))) INSN2(mov,l ,X4 MEM_DISP(rbp,-72), R(edx)) INSN2(test,l ,R(edx), R(edx)) INSN1(je,_ ,L(1)) INSN2(cmp,l ,NUM(1), R(edx)) INSN1(je,_ ,L(34)) INSN2(cmp,l ,NUM(2), R(edx)) INSN1(je,_ ,L(34)) INSN2(cmp,l ,NUM(3), R(edx)) INSN1(je,_ ,L(37)) INSN2(cmp,l ,NUM(4), R(edx)) INSN1(je,_ ,L(38)) INSN2(cmp,l ,NUM(5), R(edx)) INSN1(je,_ ,L(39)) INSN2(cmp,l ,NUM(6), R(edx)) INSN1(je,_ ,L(40)) INSN2(cmp,l ,NUM(7), R(edx)) INSN1(je,_ ,L(41)) INSN2(cmp,l ,NUM(8), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(9), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(10), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(11), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(12), R(edx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(13), R(edx)) INSN1(je,_ ,L(43)) INSN2(cmp,l ,NUM(14), R(edx)) INSN1(je,_ ,L(35)) INSN2(cmp,l ,NUM(15), R(edx)) INSN1(jne,_ ,L(1)) INSN2(test,b ,NUM(4),X1 MEM_DISP(rbp,-111)) INSN1(je,_ ,L(17)) INSN2(mov,q ,X8 MEM_DISP(rbp,-64), R(rdx)) INSN2(lea,q ,X8 MEM_DISP(rdx,-4), R(rcx)) INSN2(test,q ,NUM(-5), R(rcx)) INSN1(je,_ ,L(20)) INSN2(lea,q ,X8 MEM_DISP(rdx,-1), R(rcx)) INSN2(cmp,q ,NUM(1), R(rcx)) INSN1(ja,_ ,L(1)) L(20): INSN2(mov,q ,X8 MEM_DISP(rbp,-80), R(r8)) INSN2(mov,q ,R(r8), R(r9)) INSN2(and,l ,NUM(7), R(r8d)) INSN2(add,q ,R(r8), R(rdx)) INSN2(and,q ,NUM(-8), R(r9)) INSN2(cmp,q ,NUM(8), R(rdx)) INSN1(ja,_ ,L(19)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,rdx,8), R(ecx)) INSN2(mov,l ,NUM(2), R(edx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN2(sub,q ,NUM(1), R(rdx)) INSN2(and,q ,X8 MEM(r9), R(rdx)) INSN2(sar,q ,R(cl), R(rdx)) INSN2(mov,q ,R(rdx), R(rax)) L(1): leave L(CFI2): ret P2ALIGN(4,10) P2ALIGN(3,7) L(34): L(CFI3): INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-104), R(rax)) leave L(CFI4): ret P2ALIGN(4,10) P2ALIGN(3,7) L(35): L(CFI5): INSN2(mov,q ,X8 MEM_DISP(rbp,-104), R(rax)) leave L(CFI6): ret P2ALIGN(4,10) P2ALIGN(3,7) L(37): L(CFI7): INSN2MOVXL(movz,b,X1 MEM_DISP(rbp,-104), R(eax)) leave L(CFI8): ret P2ALIGN(4,10) P2ALIGN(3,7) L(38): L(CFI9): INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-104), R(rax)) leave L(CFI10): ret P2ALIGN(4,10) P2ALIGN(3,7) L(39): L(CFI11): INSN2MOVXL(movz,w,X2 MEM_DISP(rbp,-104), R(eax)) leave L(CFI12): ret P2ALIGN(4,10) P2ALIGN(3,7) L(40): L(CFI13): INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-104), R(rax)) leave L(CFI14): ret P2ALIGN(4,10) P2ALIGN(3,7) L(42): L(CFI15): INSN2S(movs,s ,X4 MEM_DISP(rbp,-104), R(xmm0)) leave L(CFI16): ret P2ALIGN(4,10) P2ALIGN(3,7) L(41): L(CFI17): INSN2(mov,l ,X4 MEM_DISP(rbp,-104), R(eax)) leave L(CFI18): ret L(43): L(CFI19): INSN2S(movs,d ,X8 MEM_DISP(rbp,-104), R(xmm0)) leave L(CFI20): ret L(17): L(CFI21): INSN2(mov,q ,X8 MEM_DISP(rbp,-80), R(rax)) leave L(CFI22): ret L(19): L(CFI23): INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,rdx,8), R(ecx)) INSN2(mov,l ,NUM(2), R(edx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(mov,l ,R(r8d), R(ecx)) INSN2(sub,q ,NUM(1), R(rdx)) INSN2(and,q ,X8 MEM_DISP(r9,8), R(rdx)) INSN1(neg,l ,R(ecx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(64,rcx,8), R(ecx)) INSN2(sal,q ,R(cl), R(rdx)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN2(mov,q ,X8 MEM(r9), R(r8)) leave L(CFI24): INSN2(sar,q ,R(cl), R(r8)) INSN2(or,q ,R(r8), R(rdx)) INSN2(mov,q ,R(rdx), R(rax)) ret L(FE0): FUNEND(callback_receiver, .-callback_receiver) P2ALIGN(4,15) GLOBL(C(callback_get_receiver)) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) L(FB1): INSN1(push,q ,R(rbp)) L(CFI25): INSN2(lea,q ,ADDR_PCRELATIVE(C(callback_receiver)), R(rax)) INSN2(mov,q ,R(rsp), R(rbp)) L(CFI26): INSN1(pop,q ,R(rbp)) L(CFI27): ret L(FE1): FUNEND(callback_get_receiver, .-callback_get_receiver) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB0)-. .long L(FE0)-.LFB0 .uleb128 0 .byte 0x4 .long L(CFI0)-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI2)-.LCFI1 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI3)-.LCFI2 .byte 0xb .byte 0x4 .long L(CFI4)-.LCFI3 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI5)-.LCFI4 .byte 0xb .byte 0x4 .long L(CFI6)-.LCFI5 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI7)-.LCFI6 .byte 0xb .byte 0x4 .long L(CFI8)-.LCFI7 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI9)-.LCFI8 .byte 0xb .byte 0x4 .long L(CFI10)-.LCFI9 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI11)-.LCFI10 .byte 0xb .byte 0x4 .long L(CFI12)-.LCFI11 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI13)-.LCFI12 .byte 0xb .byte 0x4 .long L(CFI14)-.LCFI13 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI15)-.LCFI14 .byte 0xb .byte 0x4 .long L(CFI16)-.LCFI15 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI17)-.LCFI16 .byte 0xb .byte 0x4 .long L(CFI18)-.LCFI17 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI19)-.LCFI18 .byte 0xb .byte 0x4 .long L(CFI20)-.LCFI19 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI21)-.LCFI20 .byte 0xb .byte 0x4 .long L(CFI22)-.LCFI21 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long L(CFI23)-.LCFI22 .byte 0xb .byte 0x4 .long L(CFI24)-.LCFI23 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 L(EFDE1): L(SFDE3): .long L(EFDE3)-.LASFDE3 L(ASFDE3): .long L(ASFDE3)-.Lframe1 .long L(FB1)-. .long L(FE1)-.LFB1 .uleb128 0 .byte 0x4 .long L(CFI25)-.LFB1 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI26)-.LCFI25 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI27)-.LCFI26 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 L(EFDE3): #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-mips64el-linux.s0000664000000000000000000001270614662617145017754 00000000000000 .file 1 "vacall-mips64.c" .section .mdebug.abi64 .previous .nan legacy .module fp=64 .module oddspreg .abicalls .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,272,$31 # vars= 160, regs= 6/0, args= 0, gp= 0 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro daddiu $sp,$sp,-272 sd $fp,192($sp) move $fp,$sp sd $4,208($fp) ld $4,8($2) ld $25,0($2) daddiu $12,$fp,208 sd $31,200($sp) sd $18,176($sp) sd $17,168($sp) sd $16,160($sp) sd $5,216($fp) sd $6,224($fp) sd $7,232($fp) sd $8,240($fp) sd $9,248($fp) sd $10,256($fp) sd $11,264($fp) sdc1 $f12,96($fp) sdc1 $f13,104($fp) sdc1 $f14,112($fp) sdc1 $f15,120($fp) sdc1 $f16,128($fp) sdc1 $f17,136($fp) sdc1 $f18,144($fp) sdc1 $f19,152($fp) swc1 $f12,60($fp) swc1 $f13,64($fp) swc1 $f14,68($fp) swc1 $f15,72($fp) swc1 $f16,76($fp) swc1 $f17,80($fp) swc1 $f18,84($fp) move $5,$fp swc1 $f19,88($fp) sd $12,24($fp) sw $0,0($fp) sd $0,32($fp) sw $0,40($fp) jalr $25 sw $0,56($fp) lw $12,40($fp) beq $12,$0,.L1 li $13,1 # 0x1 beq $12,$13,.L43 li $13,2 # 0x2 beq $12,$13,.L43 li $13,3 # 0x3 beq $12,$13,.L46 li $13,4 # 0x4 beq $12,$13,.L47 li $13,5 # 0x5 beq $12,$13,.L48 li $13,6 # 0x6 beq $12,$13,.L49 li $13,7 # 0x7 beq $12,$13,.L50 li $13,8 # 0x8 beq $12,$13,.L44 li $13,9 # 0x9 beq $12,$13,.L44 li $13,10 # 0xa beq $12,$13,.L44 li $13,11 # 0xb beq $12,$13,.L44 li $13,12 # 0xc beq $12,$13,.L51 li $13,13 # 0xd beq $12,$13,.L52 li $13,14 # 0xe beq $12,$13,.L44 li $13,15 # 0xf bnel $12,$13,.L58 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 ld $14,48($fp) ld $12,48($fp) li $13,1 # 0x1 beq $12,$13,.L53 li $13,2 # 0x2 beq $12,$13,.L54 li $13,4 # 0x4 beq $12,$13,.L55 li $13,8 # 0x8 bnel $12,$13,.L58 move $sp,$fp ld $12,32($fp) ld $2,0($12) .L1: move $sp,$fp .L58: ld $31,200($sp) ld $fp,192($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) j $31 daddiu $sp,$sp,272 .align 3 .L43: move $sp,$fp ld $31,200($sp) ld $18,176($sp) ld $17,168($sp) ld $16,160($sp) lb $2,8($fp) ld $fp,192($sp) j $31 daddiu $sp,$sp,272 .align 3 .L44: b .L1 ld $2,8($fp) .align 3 .L46: b .L1 lbu $2,8($fp) .align 3 .L47: b .L1 lh $2,8($fp) .align 3 .L48: b .L1 lhu $2,8($fp) .align 3 .L49: b .L1 lw $2,8($fp) .align 3 .L51: b .L1 lwc1 $f0,8($fp) .align 3 .L50: b .L1 lwu $2,8($fp) .L52: b .L1 ldc1 $f0,8($fp) .L19: daddiu $13,$14,-1 sltu $13,$13,16 beql $13,$0,.L59 andi $13,$12,0x800 ld $13,32($fp) li $15,-8 # 0xfffffffffffffff8 sltu $25,$14,9 andi $24,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 daddu $13,$14,$24 sltu $25,$13,9 beq $25,$0,.L25 dsll $13,$13,3 daddiu $13,$13,-1 ld $25,0($15) sll $13,$13,0 li $15,2 # 0x2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $24,$24,3 dsra $2,$13,$24 .L23: andi $13,$12,0x800 .L59: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 # 0x4 beq $14,$13,.L56 li $13,8 # 0x8 beql $14,$13,.L57 ld $13,32($fp) andi $12,$12,0x1000 beql $12,$0,.L58 move $sp,$fp li $12,16 # 0x10 .L60: bnel $14,$12,.L58 move $sp,$fp ld $12,32($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 # 0x8 bne $14,$12,.L60 li $12,16 # 0x10 ld $13,32($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 dsll $13,$13,3 daddiu $13,$13,-65 ld $17,8($15) li $25,2 # 0x2 sll $13,$13,0 dsll $13,$25,$13 subu $25,$0,$24 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $24,$24,3 dsll $25,$13,$15 dsra $16,$16,$24 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$24 .L53: ld $12,32($fp) b .L1 lbu $2,0($12) .L54: ld $12,32($fp) b .L1 lhu $2,0($12) .L26: daddiu $13,$13,-129 ld $16,8($15) ld $17,0($15) sll $13,$13,0 ld $18,16($15) li $15,2 # 0x2 subu $25,$0,$24 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $24,$24,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$24 dsll $17,$16,$25 dsra $24,$16,$24 or $2,$15,$17 b .L23 or $3,$13,$24 .L56: ld $12,32($fp) b .L1 lwc1 $f0,0($12) .L55: ld $12,32($fp) b .L1 lwu $2,0($12) .L25: daddiu $13,$13,-65 li $25,2 # 0x2 sll $13,$13,0 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$24 and $15,$13,$17 sll $24,$24,3 sll $13,$16,3 dsll $13,$15,$13 dsra $24,$25,$24 b .L23 or $2,$13,$24 .L57: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,16,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) daddu $13,$13,$25 daddiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) daddiu $sp,$sp,-16 ld $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) daddiu $2,$12,%got_ofst(callback_receiver) j $31 daddiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/vacall-mipsn32el-macro.S0000664000000000000000000001205514662617144020023 00000000000000#include "asm-mips.h" .file 1 "vacall-mipsn32.c" .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,256,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $fp,176($sp) move $fp,$sp sd $4,192($fp) lw $4,4($2) lw $25,0($2) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) move $5,$fp swc1 $f19,72($fp) sw $12,24($fp) sw $0,0($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L49 li $13,4 beq $12,$13,.L50 li $13,5 beq $12,$13,.L51 li $13,6 beq $12,$13,.L46 li $13,7 beq $12,$13,.L45 li $13,8 beq $12,$13,.L46 li $13,9 beq $12,$13,.L45 li $13,10 beq $12,$13,.L47 li $13,11 beq $12,$13,.L47 li $13,12 beq $12,$13,.L52 li $13,13 beq $12,$13,.L53 li $13,14 beq $12,$13,.L46 li $13,15 bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 beq $12,$13,.L54 li $13,2 beq $12,$13,.L55 li $13,4 beq $12,$13,.L56 li $13,8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 sll $13,$13,3 ld $25,0($15) addiu $13,$13,-1 li $15,2 dsll $13,$15,$13 daddiu $13,$13,-1 and $13,$13,$25 sll $14,$14,3 dsra $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $24,$13,.L57 li $13,8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $24,$12,.L61 li $12,16 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 sll $13,$13,3 ld $17,8($15) li $25,2 addiu $13,$13,-65 dsll $13,$25,$13 subu $25,$0,$14 sll $25,$25,2 ld $16,0($15) daddiu $13,$13,-1 addiu $15,$25,32 and $13,$13,$17 sll $14,$14,3 dsll $25,$13,$15 dsra $16,$16,$14 dsll $15,$25,$15 or $2,$16,$15 b .L23 dsra $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $16,8($15) ld $17,0($15) addiu $13,$13,-129 ld $18,16($15) li $15,2 subu $25,$0,$14 dsll $15,$15,$13 daddiu $15,$15,-1 sll $25,$25,3 sll $14,$14,3 addiu $25,$25,64 and $13,$15,$18 dsll $13,$13,$25 dsra $15,$17,$14 dsll $17,$16,$25 dsra $14,$16,$14 or $2,$15,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: li $25,2 addiu $13,$13,-65 ld $17,8($15) dsll $13,$25,$13 ld $25,0($15) daddiu $13,$13,-1 subu $16,$0,$14 and $15,$13,$17 sll $14,$14,3 sll $13,$16,3 dsll $13,$15,$13 dsra $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,16,$31 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) addu $13,$13,$25 addiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) addiu $sp,$sp,-16 lw $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) addiu $2,$12,%got_ofst(callback_receiver) j $31 addiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-i386-linux.s0000664000000000000000000000457514662617144017006 00000000000000 .file "vacall-i386.c" .text .align 2 .p2align 2,,3 .type callback_receiver,@function callback_receiver: pushl %ebp movl %esp, %ebp pushl %edi pushl %esi leal 8(%ebp), %edx subl $56, %esp movl %edx, -40(%ebp) leal -56(%ebp), %edx movl $0, -56(%ebp) movl $0, -36(%ebp) movl $0, -32(%ebp) movl %ebx, -24(%ebp) pushl %edx pushl 4(%ecx) call *(%ecx) movl -32(%ebp), %esi addl $16, %esp testl %esi, %esi je .L43 cmpl $1, %esi je .L44 cmpl $2, %esi je .L44 cmpl $3, %esi je .L49 cmpl $4, %esi je .L50 cmpl $5, %esi je .L51 cmpl $6, %esi je .L48 cmpl $7, %esi je .L48 cmpl $8, %esi je .L48 cmpl $9, %esi je .L48 leal -10(%esi), %edx cmpl $1, %edx ja .L22 movl -48(%ebp), %eax #APP movl -44(%ebp),%edx .L33: .p2align 2,,3 #NO_APP .L43: movl -56(%ebp), %esi .L3: andl $512, %esi je .L1 #APP movl 0(%ebp),%ecx #NO_APP movl -40(%ebp), %esp #APP jmp *%ecx #NO_APP .L1: leal -8(%ebp), %esp popl %esi popl %edi leave ret .L22: cmpl $12, %esi je .L52 cmpl $13, %esi je .L53 cmpl $14, %esi je .L48 cmpl $15, %esi jne .L43 movl -56(%ebp), %esi testl $1024, %esi movl %esi, %edi je .L31 movl -28(%ebp), %edx cmpl $1, %edx je .L54 cmpl $2, %edx je .L55 cmpl $4, %edx je .L56 cmpl $8, %edx je .L57 .L31: andl $16, %edi movl -36(%ebp), %eax jne .L3 #APP leal -8(%ebp), %esp popl %esi popl %edi leave ret $4 #NO_APP jmp .L3 .L57: movl -36(%ebp), %edx movl (%edx), %eax #APP movl 4(%edx),%edx #NO_APP jmp .L3 .L56: movl -36(%ebp), %edx movl (%edx), %eax jmp .L3 .L55: movl -36(%ebp), %edx movzwl (%edx), %eax jmp .L3 .L54: movl -36(%ebp), %edx movzbl (%edx), %eax jmp .L3 .p2align 2,,3 .L48: movl -48(%ebp), %eax jmp .L43 .L53: #APP fldl -48(%ebp) #NO_APP jmp .L43 .L52: #APP flds -48(%ebp) #NO_APP jmp .L43 .p2align 2,,3 .L51: movzwl -48(%ebp), %eax jmp .L43 .L50: movswl -48(%ebp),%eax jmp .L43 .L49: movzbl -48(%ebp), %eax jmp .L43 .p2align 2,,3 .L44: movsbl -48(%ebp),%eax jmp .L43 .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .align 2 .p2align 2,,3 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: pushl %ebp movl %esp, %ebp pushl %ebx call .L59 .L59: popl %ebx addl $_GLOBAL_OFFSET_TABLE_+[.-.L59], %ebx leal callback_receiver@GOTOFF(%ebx), %eax movl (%esp), %ebx leave ret .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-powerpc64-elfv2-linux.S0000664000000000000000000001531514662617145021115 00000000000000#ifdef __LITTLE_ENDIAN__ .file "vacall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .type callback_receiver, @function callback_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry callback_receiver,.-callback_receiver mflr 0 std 30,-16(1) std 31,-8(1) std 0,16(1) stdu 1,-224(1) li 0,0 ld 30,0(11) mr 31,1 std 3,256(31) std 4,264(31) addi 4,31,32 ld 3,8(11) std 9,304(31) mtctr 30 li 9,0 std 5,272(31) std 6,280(31) std 7,288(31) std 8,296(31) stw 9,32(31) std 10,312(31) stfd 1,96(31) stfd 2,104(31) mr 12,30 addi 9,31,256 stfd 3,112(31) stfd 4,120(31) stfd 5,128(31) stfd 6,136(31) std 9,56(31) stfd 7,144(31) stfd 8,152(31) stfd 9,160(31) stfd 10,168(31) stfd 11,176(31) stfd 12,184(31) stfd 13,192(31) std 0,64(31) stw 0,72(31) stw 0,88(31) std 2,24(1) bctrl ld 2,24(1) lwz 9,72(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L27 cmplwi 7,9,2 beq 7,.L30 cmplwi 7,9,3 beq 7,.L27 cmplwi 7,9,4 beq 7,.L31 cmplwi 7,9,5 beq 7,.L32 cmplwi 7,9,6 beq 7,.L33 cmplwi 7,9,7 beq 7,.L34 cmplwi 7,9,8 beq 7,.L28 cmplwi 7,9,9 beq 7,.L28 cmplwi 7,9,10 beq 7,.L28 cmplwi 7,9,11 beq 7,.L28 cmplwi 7,9,12 beq 7,.L35 cmplwi 7,9,13 beq 7,.L36 cmplwi 7,9,14 beq 7,.L28 cmplwi 7,9,15 bne 7,.L1 lwz 9,32(31) rldicl. 10,9,54,63 beq 0,.L1 ld 9,80(31) addi 10,9,-1 cmpldi 7,10,15 bgt 7,.L1 ld 8,64(31) cmpldi 7,9,8 rldicl 10,8,0,61 rldicr 8,8,0,60 add 9,9,10 bgt 7,.L17 cmpldi 7,9,8 slwi 9,9,3 bgt 7,.L18 ld 7,0(8) addi 9,9,-1 li 8,2 slwi 10,10,3 sld 9,8,9 addi 9,9,-1 and 9,9,7 srad 3,9,10 .L1: addi 1,31,224 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L27: addi 1,31,224 lbz 3,40(31) ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L30: lbz 9,40(31) extsb 3,9 b .L1 .p2align 4,,15 .L28: ld 3,40(31) b .L1 .p2align 4,,15 .L31: lha 3,40(31) b .L1 .p2align 4,,15 .L32: lhz 3,40(31) b .L1 .p2align 4,,15 .L33: lwa 3,40(31) b .L1 .p2align 4,,15 .L35: lfs 1,40(31) b .L1 .p2align 4,,15 .L34: lwz 3,40(31) b .L1 .L36: lfd 1,40(31) b .L1 .L17: cmpldi 7,9,16 rldicl 10,10,0,32 slwi 9,9,3 ble 7,.L37 li 7,2 addi 9,9,-129 ld 0,16(8) ld 5,0(8) mulli 6,10,-8 sld 9,7,9 ld 7,8(8) addi 8,9,-1 slwi 9,10,3 addi 6,6,64 and 10,8,0 srad 8,5,9 sld 5,7,6 srad 9,7,9 sld 10,10,6 or 3,8,5 or 4,10,9 b .L1 .L18: rldicl 10,10,0,32 li 7,2 ld 6,8(8) ld 8,0(8) addi 9,9,-65 sld 9,7,9 mulli 7,10,-8 slwi 10,10,3 addi 9,9,-1 srad 10,8,10 and 9,9,6 addi 7,7,64 sld 9,9,7 or 3,9,10 b .L1 .L37: li 7,2 addi 9,9,-65 ld 5,8(8) ld 6,0(8) sld 9,7,9 mulli 7,10,-4 addi 9,9,-1 addi 7,7,32 and 8,9,5 slwi 9,10,3 sld 10,8,7 srad 6,6,9 srad 4,8,9 sld 7,10,7 or 3,6,7 b .L1 .long 0 .byte 0,0,0,1,128,2,0,0 .size callback_receiver,.-callback_receiver .align 2 .p2align 4,,15 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry callback_get_receiver,.-callback_get_receiver std 31,-8(1) stdu 1,-48(1) addis 3,2,callback_receiver@toc@ha addi 3,3,callback_receiver@toc@l mr 31,1 addi 1,31,48 ld 31,-8(1) blr .long 0 .byte 0,0,0,0,128,1,0,0 .size callback_get_receiver,.-callback_get_receiver #else .file "vacall-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .type callback_receiver, @function callback_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry callback_receiver,.-callback_receiver mflr 0 std 30,-16(1) std 31,-8(1) std 0,16(1) stdu 1,-224(1) li 0,0 ld 30,0(11) mr 31,1 std 3,256(31) std 4,264(31) addi 4,31,32 ld 3,8(11) std 9,304(31) mtctr 30 li 9,0 std 5,272(31) std 6,280(31) std 7,288(31) std 8,296(31) stw 9,32(31) std 10,312(31) stfd 1,96(31) stfd 2,104(31) mr 12,30 addi 9,31,256 stfd 3,112(31) stfd 4,120(31) stfd 5,128(31) stfd 6,136(31) std 9,56(31) stfd 7,144(31) stfd 8,152(31) stfd 9,160(31) stfd 10,168(31) stfd 11,176(31) stfd 12,184(31) stfd 13,192(31) std 0,64(31) stw 0,72(31) stw 0,88(31) std 2,24(1) bctrl ld 2,24(1) lwz 9,72(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L27 cmplwi 7,9,2 beq 7,.L30 cmplwi 7,9,3 beq 7,.L27 cmplwi 7,9,4 beq 7,.L31 cmplwi 7,9,5 beq 7,.L32 cmplwi 7,9,6 beq 7,.L33 cmplwi 7,9,7 beq 7,.L34 cmplwi 7,9,8 beq 7,.L28 cmplwi 7,9,9 beq 7,.L28 cmplwi 7,9,10 beq 7,.L28 cmplwi 7,9,11 beq 7,.L28 cmplwi 7,9,12 beq 7,.L35 cmplwi 7,9,13 beq 7,.L36 cmplwi 7,9,14 beq 7,.L28 cmplwi 7,9,15 bne 7,.L1 lwz 9,32(31) rldicl. 10,9,54,63 beq 0,.L1 ld 7,80(31) addi 10,7,-1 cmpldi 7,10,15 bgt 7,.L1 ld 8,64(31) cmpldi 7,7,8 rldicl 9,8,0,61 rldicr 8,8,0,60 rldicl 6,9,0,32 add 9,7,9 mulli 10,6,-8 addi 7,10,63 li 10,2 sld 10,10,7 addi 10,10,-1 bgt 7,.L17 cmpldi 7,9,8 bgt 7,.L18 ld 8,0(8) mulli 9,9,-8 and 10,10,8 addi 9,9,64 srad 3,10,9 .L1: addi 1,31,224 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L27: addi 1,31,224 lbz 3,40(31) ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L30: lbz 9,40(31) extsb 3,9 b .L1 .p2align 4,,15 .L28: ld 3,40(31) b .L1 .p2align 4,,15 .L31: lha 3,40(31) b .L1 .p2align 4,,15 .L32: lhz 3,40(31) b .L1 .p2align 4,,15 .L33: lwa 3,40(31) b .L1 .p2align 4,,15 .L35: lfs 1,40(31) b .L1 .p2align 4,,15 .L34: lwz 3,40(31) b .L1 .L36: lfd 1,40(31) b .L1 .L17: cmpldi 7,9,16 ble 7,.L37 mulli 9,9,-8 ld 5,8(8) ld 0,0(8) mulli 7,6,-4 ld 30,16(8) li 8,-1 addi 9,9,192 slwi 6,6,3 addi 7,7,32 sld 8,8,9 and 9,10,0 srad 0,5,7 and 8,8,30 sld 9,9,6 sld 6,5,6 srad 10,8,7 srad 8,0,7 srad 10,10,7 or 3,9,8 or 4,10,6 b .L1 .L18: rldicl 9,9,0,32 ld 7,0(8) ld 8,8(8) mulli 6,9,-8 slwi 9,9,3 and 10,10,7 addi 9,9,-64 addi 7,6,128 sld 9,10,9 srad 10,8,7 or 3,9,10 b .L1 .L37: ld 0,8(8) mulli 7,6,-4 ld 8,0(8) mulli 9,9,-8 slwi 6,6,3 addi 7,7,32 and 10,10,8 addi 9,9,128 li 8,-1 srad 5,0,7 sld 10,10,6 sld 9,8,9 srad 7,5,7 and 9,9,0 or 3,10,7 sld 4,9,6 b .L1 .long 0 .byte 0,0,0,1,128,2,0,0 .size callback_receiver,.-callback_receiver .align 2 .p2align 4,,15 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: 0: addis 2,12,.TOC.-0b@ha addi 2,2,.TOC.-0b@l .localentry callback_get_receiver,.-callback_get_receiver std 31,-8(1) stdu 1,-48(1) addis 3,2,callback_receiver@toc@ha addi 3,3,callback_receiver@toc@l mr 31,1 addi 1,31,48 ld 31,-8(1) blr .long 0 .byte 0,0,0,0,128,1,0,0 .size callback_get_receiver,.-callback_get_receiver #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-powerpc64-linux.S0000664000000000000000000000474614662617145020107 00000000000000 .file "vacall-powerpc64.c" .machine power4 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .section ".opd","aw" .align 3 callback_receiver: .quad .L.callback_receiver,.TOC.@tocbase,0 .previous .type callback_receiver, @function .L.callback_receiver: mflr 0 std 30,-16(1) std 31,-8(1) li 30,0 std 0,16(1) stdu 1,-304(1) li 0,0 mr 31,1 ld 12,0(11) std 9,400(31) addi 9,31,352 stw 0,152(31) stw 0,168(31) std 3,352(31) std 4,360(31) ld 3,8(11) std 5,368(31) std 6,376(31) addi 4,31,112 std 7,384(31) std 8,392(31) std 10,408(31) stfd 1,176(31) stfd 2,184(31) stfd 3,192(31) stfd 4,200(31) stfd 5,208(31) stfd 6,216(31) stfd 7,224(31) stfd 8,232(31) stfd 9,240(31) stfd 10,248(31) stfd 11,256(31) stfd 12,264(31) stfd 13,272(31) std 9,136(31) std 0,144(31) stw 30,112(31) std 2,40(1) ld 9,0(12) ld 11,16(12) mtctr 9 ld 2,8(12) bctrl ld 2,40(1) lwz 9,152(31) cmpdi 7,9,0 beq 7,.L1 cmplwi 7,9,1 beq 7,.L20 cmplwi 7,9,2 beq 7,.L23 cmplwi 7,9,3 beq 7,.L20 cmplwi 7,9,4 beq 7,.L24 cmplwi 7,9,5 beq 7,.L25 cmplwi 7,9,6 beq 7,.L26 cmplwi 7,9,7 beq 7,.L27 cmplwi 7,9,8 beq 7,.L21 cmplwi 7,9,9 beq 7,.L21 cmplwi 7,9,10 beq 7,.L21 cmplwi 7,9,11 beq 7,.L21 cmplwi 7,9,12 beq 7,.L28 cmplwi 7,9,13 beq 7,.L29 cmplwi 7,9,14 beq 7,.L21 .L1: addi 1,31,304 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L20: lbz 3,120(31) addi 1,31,304 ld 0,16(1) ld 30,-16(1) ld 31,-8(1) mtlr 0 blr .p2align 4,,15 .L23: lbz 9,120(31) extsb 3,9 b .L1 .p2align 4,,15 .L21: ld 3,120(31) b .L1 .p2align 4,,15 .L24: lha 3,120(31) b .L1 .p2align 4,,15 .L25: lhz 3,120(31) b .L1 .p2align 4,,15 .L26: lwa 3,120(31) b .L1 .p2align 4,,15 .L28: lfs 1,120(31) b .L1 .p2align 4,,15 .L27: lwz 3,120(31) b .L1 .L29: lfd 1,120(31) b .L1 .long 0 .byte 0,0,0,1,128,2,0,0 .size callback_receiver,.-.L.callback_receiver .align 2 .p2align 4,,15 .globl callback_get_receiver .section ".opd","aw" .align 3 callback_get_receiver: .quad .L.callback_get_receiver,.TOC.@tocbase,0 .previous .type callback_get_receiver, @function .L.callback_get_receiver: std 31,-8(1) stdu 1,-64(1) addis 3,2,callback_receiver@toc@ha addi 3,3,callback_receiver@toc@l mr 31,1 addi 1,31,64 ld 31,-8(1) blr .long 0 .byte 0,0,0,0,128,1,0,0 .size callback_get_receiver,.-.L.callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-x86_64-windows.s0000664000000000000000000001256314662617145017603 00000000000000 .file "vacall-x86_64-windows.c" .text .p2align 4,,15 .type callback_receiver, @function callback_receiver: .LFB0: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: subq $144, %rsp movq %rcx, 16(%rbp) leaq 16(%rbp), %rcx movq %rdx, 24(%rbp) movq %r8, 32(%rbp) leaq -112(%rbp), %rdx movq %r9, 40(%rbp) movq %rcx, -88(%rbp) movss %xmm0, -52(%rbp) movl $0, -112(%rbp) movss %xmm1, -48(%rbp) movq $0, -80(%rbp) movl $0, -72(%rbp) movss %xmm2, -44(%rbp) movl $0, -56(%rbp) movss %xmm3, -40(%rbp) movq 8(%r10), %rcx movsd %xmm0, -32(%rbp) movsd %xmm1, -24(%rbp) movsd %xmm2, -16(%rbp) movsd %xmm3, -8(%rbp) call *(%r10) movl -72(%rbp), %edx testl %edx, %edx je .L1 cmpl $1, %edx je .L34 cmpl $2, %edx je .L34 cmpl $3, %edx je .L37 cmpl $4, %edx je .L38 cmpl $5, %edx je .L39 cmpl $6, %edx je .L40 cmpl $7, %edx je .L41 cmpl $8, %edx je .L35 cmpl $9, %edx je .L35 cmpl $10, %edx je .L35 cmpl $11, %edx je .L35 cmpl $12, %edx je .L42 cmpl $13, %edx je .L43 cmpl $14, %edx je .L35 cmpl $15, %edx jne .L1 testb $4, -111(%rbp) je .L17 movq -64(%rbp), %rdx leaq -4(%rdx), %rcx testq $-5, %rcx je .L20 leaq -1(%rdx), %rcx cmpq $1, %rcx ja .L1 .L20: movq -80(%rbp), %r8 movq %r8, %r9 andl $7, %r8d addq %r8, %rdx andq $-8, %r9 cmpq $8, %rdx ja .L19 leal -1(,%rdx,8), %ecx movl $2, %edx salq %cl, %rdx leal 0(,%r8,8), %ecx subq $1, %rdx andq (%r9), %rdx sarq %cl, %rdx movq %rdx, %rax .L1: leave .LCFI2: ret .p2align 4,,10 .p2align 3 .L34: .LCFI3: movsbq -104(%rbp), %rax leave .LCFI4: ret .p2align 4,,10 .p2align 3 .L35: .LCFI5: movq -104(%rbp), %rax leave .LCFI6: ret .p2align 4,,10 .p2align 3 .L37: .LCFI7: movzbl -104(%rbp), %eax leave .LCFI8: ret .p2align 4,,10 .p2align 3 .L38: .LCFI9: movswq -104(%rbp), %rax leave .LCFI10: ret .p2align 4,,10 .p2align 3 .L39: .LCFI11: movzwl -104(%rbp), %eax leave .LCFI12: ret .p2align 4,,10 .p2align 3 .L40: .LCFI13: movslq -104(%rbp), %rax leave .LCFI14: ret .p2align 4,,10 .p2align 3 .L42: .LCFI15: movss -104(%rbp), %xmm0 leave .LCFI16: ret .p2align 4,,10 .p2align 3 .L41: .LCFI17: movl -104(%rbp), %eax leave .LCFI18: ret .L43: .LCFI19: movsd -104(%rbp), %xmm0 leave .LCFI20: ret .L17: .LCFI21: movq -80(%rbp), %rax leave .LCFI22: ret .L19: .LCFI23: leal -65(,%rdx,8), %ecx movl $2, %edx salq %cl, %rdx movl %r8d, %ecx subq $1, %rdx andq 8(%r9), %rdx negl %ecx leal 64(,%rcx,8), %ecx salq %cl, %rdx leal 0(,%r8,8), %ecx movq (%r9), %r8 leave .LCFI24: sarq %cl, %r8 orq %r8, %rdx movq %rdx, %rax ret .LFE0: .size callback_receiver, .-callback_receiver .p2align 4,,15 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1: pushq %rbp .LCFI25: leaq callback_receiver(%rip), %rax movq %rsp, %rbp .LCFI26: popq %rbp .LCFI27: ret .LFE1: .size callback_get_receiver, .-callback_get_receiver .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0 .byte 0x3 .string "zR" .uleb128 0x1 .sleb128 -8 .uleb128 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB0-. .long .LFE0-.LFB0 .uleb128 0 .byte 0x4 .long .LCFI0-.LFB0 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI2-.LCFI1 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI3-.LCFI2 .byte 0xb .byte 0x4 .long .LCFI4-.LCFI3 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI5-.LCFI4 .byte 0xb .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI7-.LCFI6 .byte 0xb .byte 0x4 .long .LCFI8-.LCFI7 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI9-.LCFI8 .byte 0xb .byte 0x4 .long .LCFI10-.LCFI9 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI11-.LCFI10 .byte 0xb .byte 0x4 .long .LCFI12-.LCFI11 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI13-.LCFI12 .byte 0xb .byte 0x4 .long .LCFI14-.LCFI13 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI15-.LCFI14 .byte 0xb .byte 0x4 .long .LCFI16-.LCFI15 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI17-.LCFI16 .byte 0xb .byte 0x4 .long .LCFI18-.LCFI17 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI19-.LCFI18 .byte 0xb .byte 0x4 .long .LCFI20-.LCFI19 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI21-.LCFI20 .byte 0xb .byte 0x4 .long .LCFI22-.LCFI21 .byte 0xa .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x4 .long .LCFI23-.LCFI22 .byte 0xb .byte 0x4 .long .LCFI24-.LCFI23 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 .LEFDE1: .LSFDE3: .long .LEFDE3-.LASFDE3 .LASFDE3: .long .LASFDE3-.Lframe1 .long .LFB1-. .long .LFE1-.LFB1 .uleb128 0 .byte 0x4 .long .LCFI25-.LFB1 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI26-.LCFI25 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI27-.LCFI26 .byte 0xc6 .byte 0xc .uleb128 0x7 .uleb128 0x8 .align 8 .LEFDE3: .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-sparc64-linux.s0000664000000000000000000001271714662617145017575 00000000000000 .file "vacall-sparc64.c" .section ".text" .align 4 .global callback_receiver .type callback_receiver, #function .proc 020 callback_receiver: .register %g2, #scratch .register %g3, #scratch save %sp, -448, %sp stx %i0, [%fp+2175] stx %i1, [%fp+2183] stx %i2, [%fp+2191] stx %i3, [%fp+2199] stx %i4, [%fp+2207] stx %i5, [%fp+2215] std %f0, [%fp+1903] std %f2, [%fp+1911] std %f4, [%fp+1919] std %f6, [%fp+1927] std %f8, [%fp+1935] std %f10, [%fp+1943] std %f12, [%fp+1951] std %f14, [%fp+1959] std %f16, [%fp+1967] std %f18, [%fp+1975] std %f20, [%fp+1983] std %f22, [%fp+1991] std %f24, [%fp+1999] std %f26, [%fp+2007] std %f28, [%fp+2015] std %f30, [%fp+2023] st %f1, [%fp+1835] st %f3, [%fp+1839] st %f5, [%fp+1843] st %f7, [%fp+1847] st %f9, [%fp+1851] st %f11, [%fp+1855] st %f13, [%fp+1859] st %f15, [%fp+1863] st %f17, [%fp+1867] st %f19, [%fp+1871] st %f21, [%fp+1875] st %f23, [%fp+1879] add %fp, 2175, %g2 stx %g0, [%fp+1807] st %f25, [%fp+1883] st %f27, [%fp+1887] st %f29, [%fp+1891] st %f31, [%fp+1895] st %g0, [%fp+1775] st %g0, [%fp+1815] st %g0, [%fp+1831] ldx [%g5+8], %o0 stx %g2, [%fp+1799] ldx [%g5], %g3 call %g3, 0 add %fp, 1775, %o1 lduw [%fp+1815], %g1 cmp %g1, 0 be,pn %icc, .LL61 cmp %g1, 1 be,pn %icc, .LL50 cmp %g1, 2 be,pn %icc, .LL50 cmp %g1, 3 be,pn %icc, .LL53 cmp %g1, 4 be,pn %icc, .LL54 cmp %g1, 5 be,pn %icc, .LL55 cmp %g1, 6 be,pn %icc, .LL56 cmp %g1, 7 be,pn %icc, .LL57 cmp %g1, 8 be,pn %icc, .LL51 cmp %g1, 9 be,pn %icc, .LL51 cmp %g1, 10 be,pn %icc, .LL51 cmp %g1, 11 be,pn %icc, .LL51 cmp %g1, 12 be,pn %icc, .LL58 cmp %g1, 13 be,pn %icc, .LL59 cmp %g1, 14 be,pn %icc, .LL51 cmp %g1, 15 bne,pt %icc, .LL61 lduw [%fp+1775], %g1 andcc %g1, 1024, %g0 be,pn %xcc, .LL61 ldx [%fp+1823], %o5 add %o5, -1, %g1 cmp %g1, 31 bgu,pn %xcc, .LL61 ldx [%fp+1807], %g1 cmp %o5, 8 and %g1, 7, %o1 and %g1, -8, %l1 bgu,pt %xcc, .LL35 add %o5, %o1, %g2 cmp %g2, 8 bgu,pt %xcc, .LL37 sllx %o1, 3, %g4 sllx %g2, 3, %g2 ldx [%l1], %g3 sub %g0, %g2, %g2 mov -1, %g1 sllx %g1, %g2, %g1 and %g1, %g3, %g1 return %i7+8 sllx %g1, %g4, %o0 .LL47: ldx [%l1], %g1 sllx %g1, %o3, %g1 ldx [%l1+8], %g4 ldx [%l1+16], %o5 sllx %g4, %o3, %o0 sllx %o5, %o3, %o7 ldx [%l1+24], %o4 sllx %g2, 3, %o2 sllx %o4, %o3, %l0 ldx [%l1+32], %o1 sub %g0, %o2, %o2 mov 64, %g3 sub %g3, %o3, %g3 srax %g4, %g3, %g4 srax %o5, %g3, %o5 or %g1, %g4, %i0 srax %o4, %g3, %o4 mov -1, %g1 or %o0, %o5, %i1 sllx %g1, %o2, %g1 or %o7, %o4, %i2 and %g1, %o1, %g1 srax %g1, %g3, %g1 or %l0, %g1, %i3 .LL61: return %i7+8 nop .LL50: ldsb [%fp+1783], %i0 return %i7+8 nop .LL54: ldsh [%fp+1783], %i0 return %i7+8 nop .LL53: ldub [%fp+1783], %i0 return %i7+8 nop .LL51: ldx [%fp+1783], %i0 return %i7+8 nop .LL55: lduh [%fp+1783], %i0 return %i7+8 nop .LL56: ldsw [%fp+1783], %i0 return %i7+8 nop .LL57: lduw [%fp+1783], %i0 return %i7+8 nop .LL58: ld [%fp+1783], %f0 return %i7+8 nop .LL59: ldd [%fp+1783], %f0 return %i7+8 nop .LL35: cmp %o5, 16 bgu,pt %xcc, .LL39 cmp %o5, 24 cmp %g2, 16 bgu,pt %xcc, .LL41 sllx %o1, 3, %o4 sllx %g2, 3, %g3 ldx [%l1+8], %g2 sll %o1, 3, %o5 sllx %o1, 2, %o4 sub %g0, %g3, %g3 ldx [%l1], %g4 mov -1, %g1 sllx %g4, %o5, %g4 sllx %g1, %g3, %g1 and %g1, %g2, %g1 mov 32, %g2 sllx %g1, %o5, %i1 sub %g2, %o4, %g2 srax %g1, %g2, %g1 srax %g1, %g2, %g1 return %i7+8 or %g4, %g1, %o0 .LL37: sllx %g2, 3, %g3 ldx [%l1+8], %o5 sub %g0, %g3, %g3 sub %g0, %g4, %o4 ldx [%l1], %g2 mov -1, %g1 sllx %g2, %g4, %g2 sllx %g1, %g3, %g1 and %g1, %o5, %g1 srax %g1, %o4, %g1 return %i7+8 or %g2, %g1, %o0 .LL39: bgu,pt %xcc, .LL43 cmp %g2, 32 cmp %g2, 24 bgu,pt %xcc, .LL45 sllx %o1, 3, %o3 sllx %o1, 2, %g1 sll %o1, 3, %o5 sllx %g2, 3, %o4 ldx [%l1+8], %g3 ldx [%l1+16], %o3 sllx %g3, %o5, %o2 sub %g0, %o4, %o4 mov 32, %g4 ldx [%l1], %g2 sub %g4, %g1, %g4 sllx %g2, %o5, %g2 srax %g3, %g4, %g3 mov -1, %g1 srax %g3, %g4, %g3 sllx %g1, %o4, %g1 and %g1, %o3, %g1 sllx %g1, %o5, %i2 srax %g1, %g4, %g1 srax %g1, %g4, %g1 or %o2, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL41: sllx %g2, 3, %o5 ldx [%l1+8], %g3 ldx [%l1+16], %o3 sllx %g3, %o4, %o2 sub %g0, %o5, %o5 mov 64, %g4 ldx [%l1], %g2 sub %g4, %o4, %g4 sllx %g2, %o4, %g2 srax %g3, %g4, %g3 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o3, %g1 srax %g1, %g4, %g1 or %o2, %g1, %i1 return %i7+8 or %g2, %g3, %o0 .LL45: ldx [%l1], %g1 sllx %g1, %o3, %g1 ldx [%l1+8], %g3 ldx [%l1+16], %g4 sllx %g3, %o3, %o2 sllx %g4, %o3, %o0 sllx %g2, 3, %o4 ldx [%l1+24], %o1 sub %g0, %o4, %o4 mov 64, %o5 sub %o5, %o3, %o5 srax %g3, %o5, %g3 srax %g4, %o5, %g4 or %g1, %g3, %i0 or %o2, %g4, %i1 mov -1, %g1 sllx %g1, %o4, %g1 and %g1, %o1, %g1 srax %g1, %o5, %g1 or %o0, %g1, %i2 return %i7+8 nop .LL43: bgu,pt %xcc, .LL47 sllx %o1, 3, %o3 sll %o1, 3, %o4 ldx [%l1], %g1 sllx %g1, %o4, %g1 sllx %o1, 2, %o3 sllx %g2, 3, %o5 ldx [%l1+8], %g3 ldx [%l1+16], %g4 sllx %g3, %o4, %o1 sllx %g4, %o4, %o0 ldx [%l1+24], %o2 sub %g0, %o5, %o5 mov 32, %g2 sub %g2, %o3, %g2 srax %g3, %g2, %g3 srax %g4, %g2, %g4 srax %g3, %g2, %g3 srax %g4, %g2, %g4 or %g1, %g3, %i0 or %o1, %g4, %i1 mov -1, %g1 sllx %g1, %o5, %g1 and %g1, %o2, %g1 sllx %g1, %o4, %i3 srax %g1, %g2, %g1 srax %g1, %g2, %g1 or %o0, %g1, %i2 return %i7+8 nop .size callback_receiver, .-callback_receiver .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/callback/vacall_r/vacall-m68k.mit.S0000664000000000000000000000513114662617144016462 00000000000000#include "asm-m68k.h" .text .even FUNBEGIN(callback_receiver) link $a6,#-32 moveml #0x3030,$sp@- clrl $a6@(-32) lea $a6@(8),$a2 movel $a2,$a6@(-20) clrl $a6@(-16) clrl $a6@(-12) movel $a1,$a6@(-4) pea $a6@(-32) movel $a0@(4),$sp@- movel $a0@,$a2 jsr $a2@ addql #8,$sp movel $a6@(-12),$a3 tstl $a3 jeq L(1) moveq #1,$d2 cmpl $a3,$d2 jeq L(46) moveq #2,$d3 cmpl $a3,$d3 jeq L(46) moveq #3,$d2 cmpl $a3,$d2 jeq L(47) moveq #4,$d3 cmpl $a3,$d3 jeq L(48) moveq #5,$d2 cmpl $a3,$d2 jeq L(49) moveq #6,$d3 cmpl $a3,$d3 jeq L(45) moveq #7,$d2 cmpl $a3,$d2 jeq L(45) moveq #8,$d3 cmpl $a3,$d3 jeq L(45) moveq #9,$d2 cmpl $a3,$d2 jeq L(45) lea $a3@(-10),$a2 moveq #1,$d3 cmpl $a2,$d3 jcs L(22) movel $a6@(-28),$d0 movel $a6@(-24),$d1 jra L(1) .even L(22): moveq #12,$d2 cmpl $a3,$d2 jeq L(50) moveq #13,$d2 cmpl $a3,$d2 jeq L(51) moveq #14,$d3 cmpl $a3,$d3 jeq L(52) moveq #15,$d2 cmpl $a3,$d2 jne L(1) btst #2,$a6@(-30) jeq L(1) movel $a6@(-8),$d2 moveq #1,$d3 cmpl $d2,$d3 jeq L(53) moveq #2,$d3 cmpl $d2,$d3 jeq L(54) moveq #4,$d3 cmpl $d2,$d3 jeq L(55) moveq #8,$d3 cmpl $d2,$d3 jne L(1) movel $a6@(-16),$a2 movel $a2@,$d0 movel $a2@(4),$d1 jra L(1) .even L(55): movel $a6@(-16),$a2 movel $a2@,$d0 jra L(1) .even L(54): movel $a6@(-16),$a2 clrl $d0 movew $a2@,$d0 jra L(1) .even L(53): movel $a6@(-16),$a2 clrl $d0 moveb $a2@,$d0 jra L(1) .even L(52): movel $a6@(-28),$d0 movel $d0,$a0 jra L(1) .even L(51): btst #6,$a6@(-29) jeq L(31) fmoved $a6@(-28),$fp0 jra L(1) .even L(31): movel $a6@(-28),$d0 movel $a6@(-24),$d1 jra L(1) .even L(50): movel $a6@(-32),$d2 btst #6,$d2 jeq L(25) fmoves $a6@(-28),$fp0 jra L(1) .even L(25): btst #5,$d2 jeq L(27) fmoves $a6@(-28),$fp1 fmoved $fp1,$sp@- movel $sp@+,$d0 movel $sp@+,$d1 jra L(1) .even L(27): movel $a6@(-28),$d0 jra L(1) .even L(45): movel $a6@(-28),$d0 jra L(1) .even L(49): clrl $d0 movew $a6@(-28),$d0 jra L(1) .even L(48): movew $a6@(-28),$d0 extl $d0 jra L(1) .even L(47): clrl $d0 moveb $a6@(-28),$d0 jra L(1) .even L(46): moveb $a6@(-28),$d0 extbl $d0 L(1): moveml $a6@(-48),#0xc0c unlk $a6 rts .even .globl C(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) link $a6,#0 movel $a5,$sp@- movel #C(_GLOBAL_OFFSET_TABLE_), $a5 lea $pc@(0,$a5:l),$a5 movel $a5@(C(callback_receiver):l),$d0 movel $sp@+,$a5 unlk $a6 rts FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-riscv64-lp64d-linux.s0000664000000000000000000000554614662617145020544 00000000000000 .file "vacall-riscv64.c" .option pic .text .align 1 .type callback_receiver, @function callback_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 sd s2,240(sp) sd a1,-192(s0) add a1,s0,16 ld t3,0(t2) sd a7,8(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a1,-240(s0) sd a0,-200(s0) sw zero,-264(s0) ld a0,8(t2) sd zero,-232(s0) sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) add a1,s0,-264 jalr t3 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s2,8 and t6,t5,7 add s1,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,s1,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s2,.L15 bgtu s1,s2,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s2,16 sra t4,t4,t3 ld t0,8(t5) bleu s1,s2,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size callback_receiver, .-callback_receiver .align 1 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: add sp,sp,-16 sd s0,8(sp) add s0,sp,16 ld s0,8(sp) lla a0,callback_receiver add sp,sp,16 jr ra .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/callback/vacall_r/vacall-hppa64-linux.s0000664000000000000000000001037014662617145017406 00000000000000 .LEVEL 2.0w .text .align 8 .globl callback_receiver .type callback_receiver,@function callback_receiver: .PROC .CALLINFO FRAME=384,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=9 .ENTRY copy %r3,%r1 std %r2,-16(%r30) copy %r30,%r3 std,ma %r1,384(%r30) std %r5,224(%r3) copy %r27,%r5 std %r9,192(%r3) std %r8,200(%r3) std %r7,208(%r3) std %r6,216(%r3) std %r4,232(%r3) std %r26,-64(%r29) std %r25,-56(%r29) std %r19,-8(%r29) std %r24,-48(%r29) std %r23,-40(%r29) std %r22,-32(%r29) std %r21,-24(%r29) std %r20,-16(%r29) #APP fstw %fr4R,88(%r3) fstw %fr5R,92(%r3) fstw %fr6R,96(%r3) fstw %fr7R,100(%r3) fstw %fr8R,104(%r3) fstw %fr9R,108(%r3) fstw %fr10R,112(%r3) fstw %fr11R,116(%r3) #NO_APP fstd %fr10,168(%r3) ldo -64(%r29),%r2 ldo 16(%r3),%r25 std %r0,48(%r3) std %r2,40(%r3) std %r29,80(%r3) ldo -16(%r30),%r29 fstd %fr11,176(%r3) fstd %fr4,120(%r3) fstd %fr5,128(%r3) fstd %fr6,136(%r3) fstd %fr7,144(%r3) fstd %fr8,152(%r3) fstd %fr9,160(%r3) stw %r0,16(%r3) stw %r0,56(%r3) ldd 0(%r31),%r4 ldd 8(%r31),%r26 ldd 16(%r4),%r2 ldd 24(%r4),%r27 bve,l (%r2),%r2 nop ldw 56(%r3),%r2 cmpib,= 0,%r2,.L1 copy %r5,%r27 cmpib,=,n 1,%r2,.L43 cmpib,=,n 2,%r2,.L43 cmpib,=,n 3,%r2,.L44 cmpib,=,n 4,%r2,.L45 cmpib,=,n 5,%r2,.L46 cmpib,=,n 6,%r2,.L47 cmpib,=,n 7,%r2,.L41 cmpib,=,n 8,%r2,.L40 cmpib,=,n 10,%r2,.L40 cmpib,=,n 9,%r2,.L40 cmpib,=,n 11,%r2,.L40 cmpib,=,n 12,%r2,.L48 cmpib,=,n 13,%r2,.L49 cmpib,=,n 14,%r2,.L40 cmpib,= 15,%r2,.L50 ldw 16(%r3),%r2 .L1: ldd -16(%r3),%r2 ldd 192(%r3),%r9 ldd 200(%r3),%r8 ldd 208(%r3),%r7 ldd 216(%r3),%r6 ldd 224(%r3),%r5 ldd 232(%r3),%r4 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 .L50: extrd,u %r2,53+1-1,1,%r2 cmpib,= 0,%r2,.L1 ldd 48(%r3),%r28 ldd 48(%r3),%r2 ldd 64(%r3),%r4 extrd,u %r2,63,3,%r7 copy %r2,%r1 depdi 0,63,3,%r1 cmpib,*<< 8,%r4,.L32 add,l %r7,%r4,%r5 cmpib,*<< 8,%r5,.L33 depd,z %r5,60,61,%r2 subi 64,%r2,%r2 ldd 0(%r1),%r4 extrd,s %r2,63,32,%r2 mtsarcm %r2 depd,z %r7,60,61,%r5 depdi,z 1,%sar,64,%r2 mtsarcm %r5 sub %r0,%r2,%r2 and %r4,%r2,%r4 depd,z %r4,%sar,64,%r4 b .L1 copy %r4,%r28 .L33: subi 128,%r2,%r2 depd,z %r7,60,61,%r4 extrd,s %r2,63,32,%r2 subi 64,%r4,%r6 mtsarcm %r2 subi 63,%r4,%r8 depdi,z 1,%sar,64,%r2 mtsar %r8 ldd 8(%r1),%r5 sub %r0,%r2,%r2 extrd,s %r6,63,32,%r6 ldd 0(%r1),%r4 subi 63,%r6,%r6 and %r5,%r2,%r5 depd,z %r4,%sar,64,%r4 mtsar %r6 extrd,s %r5,%sar,64,%r5 .L39: b .L1 or %r5,%r4,%r28 .L32: ldi 16,%r2 cmpb,*<< %r2,%r5,.L36 depd,z %r5,60,61,%r2 subi 128,%r2,%r2 depd,z %r7,61,62,%r4 extrd,s %r2,63,32,%r2 subi 32,%r4,%r4 mtsarcm %r2 extrd,s %r4,63,32,%r4 depdi,z 1,%sar,64,%r2 subi 63,%r4,%r8 ldd 8(%r1),%r5 sub %r0,%r2,%r2 mtsar %r8 ldd 0(%r1),%r6 and %r5,%r2,%r5 depd,z %r7,60,61,%r2 extrd,s %r5,%sar,64,%r4 subi 63,%r2,%r2 extrd,s %r4,%sar,64,%r4 mtsar %r2 depd,z %r5,%sar,64,%r5 depd,z %r6,%sar,64,%r6 copy %r5,%r29 b .L1 or %r6,%r4,%r28 .L36: subi 192,%r2,%r2 depd,z %r7,60,61,%r4 extrd,s %r2,63,32,%r2 subi 64,%r4,%r7 mtsarcm %r2 subi 63,%r4,%r9 depdi,z 1,%sar,64,%r2 mtsar %r9 ldd 8(%r1),%r4 sub %r0,%r2,%r2 ldd 16(%r1),%r6 extrd,s %r7,63,32,%r7 subi 63,%r7,%r7 and %r6,%r2,%r6 ldd 0(%r1),%r5 depd,z %r4,%sar,64,%r2 mtsar %r7 extrd,s %r6,%sar,64,%r6 mtsar %r9 depd,z %r5,%sar,64,%r5 or %r2,%r6,%r29 mtsar %r7 b .L39 extrd,s %r4,%sar,64,%r4 .L40: b .L1 ldd 24(%r3),%r28 .L49: b .L40 fldd 24(%r3),%fr4 .L48: #APP fldw 24(%r3),%fr4R #NO_APP .L41: ldw 24(%r3),%r2 .L42: b .L1 copy %r2,%r28 .L47: ldw 24(%r3),%r2 b .L1 extrd,s %r2,63,32,%r28 .L46: b .L42 ldh 24(%r3),%r2 .L45: ldh 24(%r3),%r2 b .L1 extrd,s %r2,63,16,%r28 .L44: b .L42 ldb 24(%r3),%r2 .L43: ldb 24(%r3),%r2 b .L1 extrd,s %r2,63,8,%r28 .EXIT .PROCEND .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .data .align 8 .LC0: .dword P%callback_receiver .text .align 8 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: .PROC .CALLINFO FRAME=128,NO_CALLS,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 copy %r30,%r3 std,ma %r1,128(%r30) addil LT'.LC0,%r27 ldd RT'.LC0(%r1),%r1 ldd 0(%r1),%r28 ldo 64(%r3),%r30 bve (%r2) ldd,mb -64(%r30),%r3 .EXIT .PROCEND .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-mipsn32eb-macro.S0000664000000000000000000001173114662617144020011 00000000000000#include "asm-mips.h" .file 1 "vacall-mipsn32.c" .text .align 2 .align 3 .set nomips16 .set nomicromips .ent callback_receiver DECLARE_FUNCTION(callback_receiver) callback_receiver: .frame $fp,256,$31 .mask 0xd0070000,-72 .fmask 0x00000000,0 .set noreorder .set nomacro addiu $sp,$sp,-256 sd $fp,176($sp) move $fp,$sp sd $4,192($fp) lw $4,4($2) lw $25,0($2) addiu $12,$fp,192 sd $31,184($sp) sd $18,160($sp) sd $17,152($sp) sd $16,144($sp) sd $5,200($fp) sd $6,208($fp) sd $7,216($fp) sd $8,224($fp) sd $9,232($fp) sd $10,240($fp) sd $11,248($fp) sdc1 $f12,80($fp) sdc1 $f13,88($fp) sdc1 $f14,96($fp) sdc1 $f15,104($fp) sdc1 $f16,112($fp) sdc1 $f17,120($fp) sdc1 $f18,128($fp) sdc1 $f19,136($fp) swc1 $f12,44($fp) swc1 $f13,48($fp) swc1 $f14,52($fp) swc1 $f15,56($fp) swc1 $f16,60($fp) swc1 $f17,64($fp) swc1 $f18,68($fp) move $5,$fp swc1 $f19,72($fp) sw $12,24($fp) sw $0,0($fp) sw $0,28($fp) sw $0,32($fp) jalr $25 sw $0,40($fp) lw $12,32($fp) beq $12,$0,.L1 li $13,1 beq $12,$13,.L43 li $13,2 beq $12,$13,.L43 li $13,3 beq $12,$13,.L49 li $13,4 beq $12,$13,.L50 li $13,5 beq $12,$13,.L51 li $13,6 beq $12,$13,.L46 li $13,7 beq $12,$13,.L45 li $13,8 beq $12,$13,.L46 li $13,9 beq $12,$13,.L45 li $13,10 beq $12,$13,.L47 li $13,11 beq $12,$13,.L47 li $13,12 beq $12,$13,.L52 li $13,13 beq $12,$13,.L53 li $13,14 beq $12,$13,.L46 li $13,15 bnel $12,$13,.L59 move $sp,$fp lw $12,0($fp) andi $13,$12,0x400 beq $13,$0,.L1 andi $13,$12,0x4 beq $13,$0,.L19 lw $24,36($fp) lw $12,36($fp) li $13,1 beq $12,$13,.L54 li $13,2 beq $12,$13,.L55 li $13,4 beq $12,$13,.L56 li $13,8 bnel $12,$13,.L59 move $sp,$fp lw $12,28($fp) ld $2,0($12) .L1: move $sp,$fp .L59: ld $31,184($sp) ld $fp,176($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) j $31 addiu $sp,$sp,256 .align 3 .L43: move $sp,$fp ld $31,184($sp) ld $18,160($sp) ld $17,152($sp) ld $16,144($sp) lb $2,8($fp) ld $fp,176($sp) j $31 addiu $sp,$sp,256 .align 3 .L46: b .L1 lw $2,8($fp) .align 3 .L49: b .L1 lbu $2,8($fp) .align 3 .L50: b .L1 lh $2,8($fp) .align 3 .L45: b .L1 lwu $2,8($fp) .align 3 .L51: b .L1 lhu $2,8($fp) .align 3 .L52: b .L1 lwc1 $f0,8($fp) .align 3 .L47: b .L1 ld $2,8($fp) .L53: b .L1 ldc1 $f0,8($fp) .L19: addiu $13,$24,-1 sltu $13,$13,16 beql $13,$0,.L60 andi $13,$12,0x800 lw $13,28($fp) li $15,-8 sltu $25,$24,9 andi $14,$13,0x7 and $15,$13,$15 beq $25,$0,.L24 addu $13,$24,$14 sltu $25,$13,9 beq $25,$0,.L25 subu $13,$0,$13 ld $25,0($15) sll $13,$13,3 li $15,-1 dsll $13,$15,$13 and $13,$13,$25 sll $14,$14,3 dsll $2,$13,$14 .L23: andi $13,$12,0x800 .L60: beql $13,$0,.L27 andi $12,$12,0x1000 li $13,4 beq $24,$13,.L57 li $13,8 beql $24,$13,.L58 lw $13,28($fp) andi $12,$12,0x1000 beql $12,$0,.L59 move $sp,$fp li $12,16 .L61: bnel $24,$12,.L59 move $sp,$fp lw $12,28($fp) ldc1 $f0,0($12) b .L1 ldc1 $f2,8($12) .L27: beq $12,$0,.L1 li $12,8 bne $24,$12,.L61 li $12,16 lw $13,28($fp) b .L1 ldc1 $f0,0($13) .L24: sltu $25,$13,17 beq $25,$0,.L26 subu $13,$0,$13 ld $17,8($15) subu $16,$0,$14 li $25,-1 sll $13,$13,3 dsll $13,$25,$13 sll $25,$16,2 ld $16,0($15) and $13,$13,$17 addiu $15,$25,32 sll $14,$14,3 dsra $25,$13,$15 dsll $16,$16,$14 dsra $15,$25,$15 or $2,$16,$15 b .L23 dsll $3,$13,$14 .L54: lw $12,28($fp) b .L1 lbu $2,0($12) .L55: lw $12,28($fp) b .L1 lhu $2,0($12) .L26: ld $18,16($15) ld $16,8($15) ld $17,0($15) subu $25,$0,$14 li $15,-1 sll $13,$13,3 sll $25,$25,3 dsll $13,$15,$13 sll $14,$14,3 addiu $15,$25,64 and $13,$13,$18 dsll $25,$17,$14 dsra $13,$13,$15 dsra $17,$16,$15 dsll $14,$16,$14 or $2,$25,$17 b .L23 or $3,$13,$14 .L57: lw $12,28($fp) b .L1 lwc1 $f0,0($12) .L56: lw $12,28($fp) b .L1 lwu $2,0($12) .L25: ld $16,8($15) ld $25,0($15) sll $13,$13,3 li $15,-1 dsll $13,$15,$13 subu $15,$0,$14 and $13,$13,$16 sll $15,$15,3 sll $14,$14,3 dsra $13,$13,$15 dsll $14,$25,$14 b .L23 or $2,$13,$14 .L58: andi $12,$12,0x1000 lwc1 $f0,0($13) beq $12,$0,.L1 lwc1 $f2,4($13) b .L1 ldc1 $f0,0($13) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .align 3 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver DECLARE_FUNCTION(callback_get_receiver) callback_get_receiver: .frame $fp,16,$31 .mask 0x40000000,-8 .fmask 0x00000000,0 .set noreorder .set nomacro lui $13,%hi(%neg(%gp_rel(callback_get_receiver))) addu $13,$13,$25 addiu $13,$13,%lo(%neg(%gp_rel(callback_get_receiver))) addiu $sp,$sp,-16 lw $12,%got_page(callback_receiver)($13) sd $fp,8($sp) move $fp,$sp move $sp,$fp ld $fp,8($sp) addiu $2,$12,%got_ofst(callback_receiver) j $31 addiu $sp,$sp,16 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver libffcall-2.5/callback/vacall_r/vacall-armhf-eabi-macro.S0000664000000000000000000000620314662617145020201 00000000000000#include "asm-arm.h" .arch armv6 .eabi_attribute 28, 1 .eabi_attribute 20, 1 .eabi_attribute 21, 1 .eabi_attribute 23, 3 .eabi_attribute 24, 1 .eabi_attribute 25, 1 .eabi_attribute 26, 1 .eabi_attribute 30, 2 .eabi_attribute 34, 1 .eabi_attribute 18, 4 .text .align 2 .global C(callback_receiver) .syntax unified .arm .fpu vfpv3-d16 .type callback_receiver, %function FUNBEGIN(callback_receiver) // args = 28, pretend = 0, frame = 176 // frame_needed = 1, uses_anonymous_args = 0 push {fp, lr} add fp, sp, $4 sub sp, sp, $176 ldr r2, [fp, $4] mov r3, $0 add lr, fp, $28 add ip, fp, $44 vstr.32 s0, [fp, $-136] vstr.32 s1, [fp, $-132] vstr.32 s2, [fp, $-128] vstr.32 s3, [fp, $-124] vstr.32 s4, [fp, $-120] vstr.32 s5, [fp, $-116] vstr.32 s6, [fp, $-112] vstr.32 s7, [fp, $-108] vstr.32 s8, [fp, $-104] vstr.32 s9, [fp, $-100] vstr.32 s10, [fp, $-96] vstr.32 s11, [fp, $-92] vstr.32 s12, [fp, $-88] vstr.32 s13, [fp, $-84] vstr.32 s14, [fp, $-80] vstr.32 s15, [fp, $-76] vstr.64 d0, [fp, $-68] vstr.64 d1, [fp, $-60] vstr.64 d2, [fp, $-52] vstr.64 d3, [fp, $-44] vstr.64 d4, [fp, $-36] vstr.64 d5, [fp, $-28] vstr.64 d6, [fp, $-20] vstr.64 d7, [fp, $-12] str r3, [fp, $-180] str r3, [fp, $-144] str r3, [fp, $-140] str r3, [fp, $-160] strb r3, [fp, $-156] sub r1, fp, $180 str lr, [fp, $-148] ldr r3, [r2] str ip, [fp, $-164] ldr r0, [r2, $4] blx r3 ldrb r3, [fp, $-156] // zero_extendqisi2 cmp r3, $0 beq L(1) cmp r3, $1 beq L(25) cmp r3, $2 ldrsbeq r0, [fp, $-172] beq L(1) cmp r3, $3 beq L(25) cmp r3, $4 ldrsheq r0, [fp, $-172] beq L(1) cmp r3, $5 ldrheq r0, [fp, $-172] beq L(1) cmp r3, $6 beq L(27) cmp r3, $7 beq L(27) cmp r3, $8 beq L(27) cmp r3, $9 beq L(27) sub r2, r3, $10 cmp r2, $1 bls L(29) cmp r3, $12 vldreq.32 s0, [fp, $-172] beq L(1) cmp r3, $13 beq L(30) cmp r3, $14 beq L(27) cmp r3, $15 bne L(1) ldr r3, [fp, $-180] tst r3, $1024 beq L(1) ldr r3, [fp, $-152] cmp r3, $1 beq L(31) cmp r3, $2 ldr r3, [fp, $-160] ldrheq r0, [r3] ldrne r0, [r3] L(1): sub sp, fp, $4 // sp needed pop {fp, pc} L(25): ldrb r0, [fp, $-172] // zero_extendqisi2 sub sp, fp, $4 // sp needed pop {fp, pc} L(27): ldr r0, [fp, $-172] sub sp, fp, $4 // sp needed pop {fp, pc} L(30): vldr.64 d0, [fp, $-172] b L(1) L(29): ldr r0, [fp, $-172] ldr r1, [fp, $-168] b L(1) L(31): ldr r3, [fp, $-160] ldrb r0, [r3] // zero_extendqisi2 b L(1) FUNEND(callback_receiver) .align 2 .global C(callback_get_receiver) .syntax unified .arm .fpu vfpv3-d16 .type callback_get_receiver, %function FUNBEGIN(callback_get_receiver) // args = 0, pretend = 0, frame = 0 // frame_needed = 1, uses_anonymous_args = 0 // link register save eliminated. ldr r3, L(34) ldr r2, L(34)+4 L(PIC0): add r3, pc, r3 str fp, [sp, $-4]! add fp, sp, $0 ldr r3, [r3, r2] mov r0, r3 add sp, fp, $0 // sp needed ldr fp, [sp], $4 bx lr L(35): .align 2 L(34): .word _GLOBAL_OFFSET_TABLE_-(L(PIC0)+8) .word callback_receiver(GOT) FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",%progbits #endif libffcall-2.5/callback/vacall_r/vacall-alpha-linux.s0000664000000000000000000000604114662617145017371 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .ent callback_receiver callback_receiver: .frame $15,192,$26,48 .mask 0x4008000,-192 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $callback_receiver..ng: lda $30,-192($30) ldq $27,0($1) stq $15,8($30) mov $30,$15 lda $3,144($15) stq $26,0($30) .prologue 1 stq $31,48($15) lda $2,88($15) stq $16,144($15) subq $2,$3,$2 ldq $16,8($1) stq $17,152($15) lda $3,192($15) stq $2,80($15) lda $17,16($15) lda $2,144($15) stq $3,72($15) stq $18,160($15) stq $19,168($15) stq $20,176($15) stq $21,184($15) stt $f16,88($15) stt $f17,96($15) stt $f18,104($15) stt $f19,112($15) stt $f20,120($15) stt $f21,128($15) stl $31,16($15) stq $2,40($15) stl $31,56($15) jsr $26,($27),0 ldah $29,0($26) !gpdisp!2 lda $29,0($29) !gpdisp!2 ldl $2,56($15) beq $2,$L43 zapnot $2,15,$3 cmpeq $3,1,$2 bne $2,$L44 cmpeq $3,2,$2 bne $2,$L44 cmpeq $3,3,$2 bne $2,$L50 cmpeq $3,4,$2 bne $2,$L51 cmpeq $3,5,$2 bne $2,$L52 cmpeq $3,6,$2 bne $2,$L53 cmpeq $3,7,$2 bne $2,$L54 cmpeq $3,8,$2 bne $2,$L48 cmpeq $3,9,$2 bne $2,$L48 cmpeq $3,10,$2 bne $2,$L48 cmpeq $3,11,$2 bne $2,$L48 cmpeq $3,12,$2 bne $2,$L55 cmpeq $3,13,$2 bne $2,$L56 cmpeq $3,14,$2 bne $2,$L48 cmpeq $3,15,$2 beq $2,$L43 lda $2,1024($31) ldl $3,16($15) and $2,$3,$2 beq $2,$L43 ldq $3,64($15) cmpeq $3,1,$2 bne $2,$L57 cmpeq $3,2,$2 bne $2,$L58 cmpeq $3,4,$2 bne $2,$L59 cmpeq $3,8,$2 bne $2,$L60 cmpeq $3,16,$2 beq $2,$L43 ldq $2,48($15) ldq $1,8($2) ldq $0,0($2) .align 4 $L43: mov $15,$30 ldq $26,0($30) ldq $15,8($30) lda $30,192($30) ret $31,($26),1 .align 4 $L44: mov $15,$30 ldl $2,24($15) ldq $26,0($30) sll $2,56,$2 sra $2,56,$0 ldq $15,8($30) lda $30,192($30) ret $31,($26),1 $L51: ldl $2,24($15) sll $2,48,$2 sra $2,48,$0 br $31,$L43 $L50: ldl $2,24($15) bis $31,$31,$31 and $2,0xff,$0 br $31,$L43 $L48: ldq $0,24($15) br $31,$L43 $L52: ldl $2,24($15) bis $31,$31,$31 zapnot $2,3,$0 br $31,$L43 $L53: ldl $3,24($15) bis $31,$31,$31 mov $3,$0 br $31,$L43 $L54: ldl $2,24($15) bis $31,$31,$31 zapnot $2,15,$0 br $31,$L43 $L55: lds $f0,24($15) br $31,$L43 $L56: ldt $f0,24($15) br $31,$L43 $L57: ldq $3,48($15) ldq_u $2,0($3) extbl $2,$3,$0 br $31,$L43 $L58: ldq $3,48($15) ldq_u $2,0($3) extwl $2,$3,$0 br $31,$L43 $L60: ldq $2,48($15) bis $31,$31,$31 ldq $0,0($2) br $31,$L43 $L59: ldq $2,48($15) ldl $3,0($2) zapnot $3,15,$0 br $31,$L43 .end callback_receiver .align 2 .align 4 .globl callback_get_receiver .ent callback_get_receiver callback_get_receiver: .frame $15,16,$26,0 .mask 0x4008000,-16 ldah $29,0($27) !gpdisp!3 lda $29,0($29) !gpdisp!3 $callback_get_receiver..ng: lda $30,-16($30) ldah $2,callback_receiver($29) !gprelhigh stq $15,8($30) mov $30,$15 stq $26,0($30) .prologue 1 mov $15,$30 lda $0,callback_receiver($2) !gprellow ldq $26,0($30) ldq $15,8($30) lda $30,16($30) ret $31,($26),1 .end callback_get_receiver .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-hppa-macro.S0000664000000000000000000000772614662617145017151 00000000000000#include "asm-hppa.h" .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 DECLARE_FUNCTION(callback_receiver) DEF(callback_receiver) .PROC .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,192(%r30) ldo -32(%r3),%r2 ldo 16(%r3),%r21 ldo 88(%r3),%r20 stw %r5,96(%r3) sub %r21,%r2,%r31 copy %r19,%r5 stw %r4,100(%r3) ldo 80(%r31),%r4 ldo 64(%r31),%r31 stw %r19,-32(%r30) stw %r25,-40(%r3) copy %r21,%r25 ldo 80(%r3),%r21 fstds %fr5,0(%r20) ldo 76(%r3),%r20 fstws %fr4L,0(%r20) ldo 68(%r3),%r20 stw %r0,36(%r3) stw %r28,48(%r3) fstds %fr7,0(%r21) ldo 72(%r3),%r21 fstws %fr5L,0(%r21) ldo 64(%r3),%r21 fstws %fr6L,0(%r20) ldo -48(%r3),%r20 stw %r26,-36(%r3) fstws %fr7L,0(%r21) ldw 0(%r29),%r22 stw %r20,52(%r3) stw %r31,56(%r3) stw %r4,60(%r3) stw %r24,-44(%r3) stw %r23,-48(%r3) stw %r0,16(%r3) stw %r2,32(%r3) stw %r0,40(%r3) ldw 4(%r29),%r26 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 40(%r3),%r21 comib,= 0,%r21,L(1) copy %r5,%r19 comib,= 1,%r21,L(48) ldb 24(%r3),%r20 comib,=,n 2,%r21,L(48) comib,=,n 3,%r21,L(43) comib,=,n 4,%r21,L(44) comib,=,n 5,%r21,L(45) comib,=,n 6,%r21,L(41) comib,=,n 7,%r21,L(41) comib,=,n 8,%r21,L(41) comib,= 9,%r21,L(41) ldo -10(%r21),%r20 comib,<<,n 1,%r20,L(22) ldw 24(%r3),%r28 DEF(L(40)) ldw 28(%r3),%r29 DEF(L(1)) ldw -20(%r3),%r2 DEF(L(49)) DEF(L(50)) ldw 96(%r3),%r5 ldw 100(%r3),%r4 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 DEF(L(22)) comib,= 12,%r21,L(46) ldo 24(%r3),%r20 comib,=,n 13,%r21,L(47) comib,=,n 14,%r21,L(1) ldw 24(%r3),%r28 comib,<> 15,%r21,L(49) ldw -20(%r3),%r2 ldw 16(%r3),%r20 bb,>= %r20,30,L(49) ldw 44(%r3),%r4 ldo -1(%r4),%r20 comib,<< 7,%r20,L(50) ldw 36(%r3),%r20 extru %r20,31,2,%r31 copy %r20,%r2 depi 0,31,2,%r2 comib,<< 4,%r4,L(33) addl %r31,%r4,%r5 zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 4,%r5,L(34) ldo -1(%r20),%r31 ldw 0(%r2),%r20 zdep %r5,28,29,%r21 ldo -1(%r21),%r21 and %r20,%r31,%r20 mtsar %r21 vextrs %r20,32,%r20 movb,tr %r20,%r28,L(49) ldw -20(%r3),%r2 DEF(L(34)) ldw 0(%r2),%r20 zdep %r5,28,29,%r22 ldw 4(%r2),%r21 and %r20,%r31,%r20 ldo -33(%r22),%r2 subi 63,%r22,%r22 mtsar %r22 zvdep %r20,32,%r20 mtsar %r2 vextrs %r21,32,%r21 DEF(L(39)) b L(1) or %r21,%r20,%r28 DEF(L(33)) zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 8,%r5,L(37) ldo -1(%r20),%r4 ldw 0(%r2),%r22 zdep %r5,29,30,%r20 and %r22,%r4,%r22 ldw 4(%r2),%r31 subi 47,%r20,%r4 zdep %r5,28,29,%r20 mtsar %r4 ldo -33(%r20),%r20 zvdep %r22,32,%r21 zvdep %r21,32,%r21 mtsar %r20 vextrs %r31,32,%r31 vextrs %r22,32,%r22 movb,tr %r22,%r28,L(1) or %r21,%r31,%r29 DEF(L(37)) ldw 0(%r2),%r21 zdep %r5,28,29,%r31 ldw 8(%r2),%r22 and %r21,%r4,%r21 ldo -65(%r31),%r4 ldw 4(%r2),%r20 mtsar %r4 subi 95,%r31,%r2 vextrs %r22,32,%r22 mtsar %r2 zvdep %r20,32,%r31 zvdep %r21,32,%r21 or %r31,%r22,%r29 mtsar %r4 b L(39) vextrs %r20,32,%r20 DEF(L(41)) b L(1) ldw 24(%r3),%r28 DEF(L(47)) ldw 24(%r3),%r28 b L(40) fldds 0(%r20),%fr4 DEF(L(46)) ldw 24(%r3),%r28 b L(1) fldws 0(%r20),%fr4L DEF(L(45)) b L(1) ldh 24(%r3),%r28 DEF(L(44)) ldh 24(%r3),%r20 b L(1) extrs %r20,31,16,%r28 DEF(L(43)) b L(1) ldb 24(%r3),%r28 DEF(L(48)) b L(1) extrs %r20,31,8,%r28 .EXIT .PROCEND DEF(L(fe1)) FUNEND(callback_receiver) .data .align 4 DEF(L(C0)) .word P%callback_receiver TEXT1() TEXT2() .align 4 GLOBL(callback_get_receiver) DECLARE_FUNCTION(callback_get_receiver) DEF(callback_get_receiver) .PROC .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 copy %r30,%r3 stwm %r1,64(%r30) addil LT!L(C0),%r19 stw %r19,-32(%r30) ldw RT!L(C0)(%r1),%r1 ldw 0(%r1),%r28 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 .EXIT .PROCEND DEF(L(fe2)) FUNEND(callback_get_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-loongarch64-linux.s0000664000000000000000000000764314662617145020443 00000000000000 .file "vacall-loongarch64.c" .text .align 2 .type callback_receiver, @function callback_receiver: .LFB0 = . .cfi_startproc addi.d $r3,$r3,-288 .cfi_def_cfa_offset 288 st.d $r1,$r3,264 st.d $r22,$r3,256 st.d $r23,$r3,248 .cfi_offset 1, -24 .cfi_offset 22, -32 .cfi_offset 23, -40 addi.d $r22,$r3,272 .cfi_def_cfa 22, 16 addi.d $r13,$r22,16 ldptr.d $r12,$r20,0 st.d $r11,$r22,8 st.d $r5,$r22,-192 st.d $r6,$r22,-184 st.d $r7,$r22,-176 st.d $r8,$r22,-168 st.d $r9,$r22,-160 st.d $r10,$r22,-152 st.d $r11,$r22,-144 fst.s $f0,$r22,-132 fst.s $f1,$r22,-128 fst.s $f2,$r22,-124 fst.s $f3,$r22,-120 fst.s $f4,$r22,-116 fst.s $f5,$r22,-112 fst.s $f6,$r22,-108 fst.s $f7,$r22,-104 fst.d $f0,$r22,-96 fst.d $f1,$r22,-88 fst.d $f2,$r22,-80 fst.d $f3,$r22,-72 fst.d $f4,$r22,-64 fst.d $f5,$r22,-56 fst.d $f6,$r22,-48 fst.d $f7,$r22,-40 st.d $r13,$r22,-240 st.d $r4,$r22,-200 st.w $r0,$r22,-264 st.d $r0,$r22,-232 ld.d $r4,$r20,8 st.w $r0,$r22,-224 st.w $r0,$r22,-208 st.w $r0,$r22,-136 addi.d $r5,$r22,-264 jirl $r1,$r12,0 ldptr.w $r12,$r22,-224 beqz $r12,.L1 addi.w $r13,$r0,15 # 0xf bgtu $r12,$r13,.L1 la.local $r13,.L4 slli.d $r12,$r12,3 ldx.d $r12,$r13,$r12 add.d $r13,$r13,$r12 jr $r13 .section .rodata .align 3 .align 2 .L4: .dword .L1-.L4 .dword .L15-.L4 .dword .L15-.L4 .dword .L14-.L4 .dword .L13-.L4 .dword .L12-.L4 .dword .L11-.L4 .dword .L10-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L5-.L4 .dword .L7-.L4 .dword .L6-.L4 .dword .L5-.L4 .dword .L3-.L4 .text .L5: ld.d $r4,$r22,-256 .L1: ld.d $r1,$r3,264 .cfi_remember_state .cfi_restore 1 ld.d $r22,$r3,256 .cfi_restore 22 ld.d $r23,$r3,248 .cfi_restore 23 addi.d $r3,$r3,288 .cfi_def_cfa 3, 0 jr $r1 .L15: .cfi_restore_state ld.b $r4,$r22,-256 b .L1 .L10: ld.wu $r4,$r22,-256 b .L1 .L14: ld.bu $r4,$r22,-256 b .L1 .L13: ld.h $r4,$r22,-256 b .L1 .L12: ld.hu $r4,$r22,-256 b .L1 .L11: ldptr.w $r4,$r22,-256 b .L1 .L6: fld.d $f0,$r22,-256 b .L1 .L7: fld.s $f0,$r22,-256 b .L1 .L3: ldptr.w $r12,$r22,-264 andi $r12,$r12,1024 beqz $r12,.L1 ld.d $r12,$r22,-216 addi.w $r13,$r0,15 # 0xf addi.d $r14,$r12,-1 bgtu $r14,$r13,.L1 ld.d $r13,$r22,-232 addi.w $r15,$r0,-8 # 0xfffffffffffffff8 addi.w $r23,$r0,8 # 0x8 andi $r14,$r13,7 add.d $r16,$r12,$r14 and $r13,$r13,$r15 ldptr.d $r17,$r13,0 slli.w $r15,$r16,3 slli.w $r18,$r14,3 bgtu $r12,$r23,.L17 bgtu $r16,$r23,.L18 addi.w $r15,$r15,-1 addi.w $r4,$r0,2 # 0x2 sll.d $r4,$r4,$r15 addi.d $r4,$r4,-1 and $r4,$r4,$r17 sra.d $r4,$r4,$r18 b .L1 .L17: addi.w $r12,$r0,16 # 0x10 ld.d $r19,$r13,8 sra.d $r17,$r17,$r18 sub.d $r23,$r23,$r14 bgtu $r16,$r12,.L19 addi.w $r15,$r15,-65 addi.w $r5,$r0,2 # 0x2 sll.d $r5,$r5,$r15 addi.d $r5,$r5,-1 and $r5,$r5,$r19 slli.w $r23,$r23,2 sll.d $r4,$r5,$r23 sll.d $r4,$r4,$r23 or $r4,$r4,$r17 sra.d $r5,$r5,$r18 b .L1 .L18: ld.d $r16,$r13,8 addi.w $r15,$r15,-65 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r15 addi.d $r12,$r12,-1 sub.d $r13,$r23,$r14 and $r12,$r12,$r16 slli.w $r13,$r13,3 sll.d $r12,$r12,$r13 sra.d $r17,$r17,$r18 or $r4,$r12,$r17 b .L1 .L19: ld.d $r14,$r13,16 addi.w $r15,$r15,-129 addi.w $r12,$r0,2 # 0x2 sll.d $r12,$r12,$r15 addi.d $r12,$r12,-1 slli.w $r13,$r23,3 and $r12,$r12,$r14 sll.d $r4,$r19,$r13 sll.d $r12,$r12,$r13 sra.d $r19,$r19,$r18 or $r4,$r4,$r17 or $r5,$r12,$r19 b .L1 .cfi_endproc .LFE0: .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB1 = . .cfi_startproc addi.d $r3,$r3,-16 .cfi_def_cfa_offset 16 st.d $r22,$r3,8 .cfi_offset 22, -8 addi.d $r22,$r3,16 .cfi_def_cfa 22, 0 ld.d $r22,$r3,8 .cfi_restore 22 la.local $r4,callback_receiver addi.d $r3,$r3,16 .cfi_def_cfa_register 3 jr $r1 .cfi_endproc .LFE1: .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 12.1.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-structcpy.c0000664000000000000000000000142614662613023017160 00000000000000/* copy structs */ /* * Copyright 2016 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define __structcpy callback_structcpy #include "structcpy.c" libffcall-2.5/callback/vacall_r/vacall-mipsel-linux.s0000664000000000000000000001060414662617144017574 00000000000000 .file 1 "vacall-mips.c" .section .mdebug.abi32 .previous .nan legacy .module fp=xx .module nooddspreg .abicalls .text .align 2 .set nomips16 .set nomicromips .ent callback_receiver .type callback_receiver, @function callback_receiver: .frame $fp,104,$31 # vars= 72, regs= 2/0, args= 16, gp= 8 .mask 0xc0000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-104 sw $fp,96($sp) move $fp,$sp sw $31,100($sp) lw $25,0($2) sw $4,104($fp) lw $4,4($2) sw $5,108($fp) addiu $5,$fp,104 sw $5,40($fp) addiu $5,$fp,120 sw $5,56($fp) .cprestore 16 sw $6,112($fp) sw $7,116($fp) sdc1 $f12,80($fp) sdc1 $f14,88($fp) swc1 $f12,68($fp) swc1 $f14,72($fp) sw $0,24($fp) sw $0,44($fp) sw $0,48($fp) sw $0,60($fp) sw $0,64($fp) addiu $5,$fp,24 jal $25 lw $4,48($fp) .set noreorder .set nomacro beq $4,$0,$L1 li $5,1 # 0x1 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,2 # 0x2 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L23 li $5,3 # 0x3 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L29 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L30 li $5,5 # 0x5 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L31 li $5,6 # 0x6 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,7 # 0x7 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,8 # 0x8 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,9 # 0x9 .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 addiu $5,$4,-10 .set macro .set reorder sltu $5,$5,2 .set noreorder .set nomacro bne $5,$0,$L32 li $5,12 # 0xc .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L33 li $5,13 # 0xd .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L34 li $5,14 # 0xe .set macro .set reorder .set noreorder .set nomacro beq $4,$5,$L27 li $5,15 # 0xf .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,24($fp) andi $4,$4,0x2 .set noreorder .set nomacro beql $4,$0,$L38 lw $2,44($fp) .set macro .set reorder lw $4,52($fp) li $5,1 # 0x1 .set noreorder .set nomacro beql $4,$5,$L35 lw $4,44($fp) .set macro .set reorder li $5,2 # 0x2 .set noreorder .set nomacro beq $4,$5,$L36 li $5,4 # 0x4 .set macro .set reorder .set noreorder .set nomacro bnel $4,$5,$L37 move $sp,$fp .set macro .set reorder lw $4,44($fp) lw $2,0($4) $L1: $L38: move $sp,$fp $L37: lw $31,100($sp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L23: move $sp,$fp lw $31,100($sp) lb $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L27: move $sp,$fp lw $31,100($sp) lw $2,32($fp) lw $fp,96($sp) .set noreorder .set nomacro j $31 addiu $sp,$sp,104 .set macro .set reorder $L29: .set noreorder .set nomacro b $L1 lbu $2,32($fp) .set macro .set reorder $L30: .set noreorder .set nomacro b $L1 lh $2,32($fp) .set macro .set reorder $L31: .set noreorder .set nomacro b $L1 lhu $2,32($fp) .set macro .set reorder $L34: .set noreorder .set nomacro b $L1 ldc1 $f0,32($fp) .set macro .set reorder $L32: lw $2,32($fp) .set noreorder .set nomacro b $L1 lw $3,36($fp) .set macro .set reorder $L33: .set noreorder .set nomacro b $L1 lwc1 $f0,32($fp) .set macro .set reorder $L35: .set noreorder .set nomacro b $L1 lbu $2,0($4) .set macro .set reorder $L36: lw $4,44($fp) .set noreorder .set nomacro b $L1 lhu $2,0($4) .set macro .set reorder .end callback_receiver .size callback_receiver, .-callback_receiver .align 2 .globl callback_get_receiver .set nomips16 .set nomicromips .ent callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .frame $fp,8,$31 # vars= 0, regs= 1/0, args= 0, gp= 0 .mask 0x40000000,-4 .fmask 0x00000000,0 .set noreorder .cpload $25 .set reorder addiu $sp,$sp,-8 sw $fp,4($sp) move $fp,$sp move $sp,$fp lw $fp,4($sp) la $2,callback_receiver .set noreorder .set nomacro j $31 addiu $sp,$sp,8 .set macro .set reorder .end callback_get_receiver .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 5.4.0" libffcall-2.5/callback/vacall_r/vacall-hppa-linux.s0000664000000000000000000000727414662617145017245 00000000000000 .LEVEL 1.1 .text .align 4 .type callback_receiver,@function callback_receiver: .PROC .CALLINFO FRAME=192,CALLS,SAVE_RP,SAVE_SP,ENTRY_GR=5 .ENTRY copy %r3,%r1 stw %r2,-20(%r30) copy %r30,%r3 stwm %r1,192(%r30) ldo -32(%r3),%r2 ldo 16(%r3),%r21 ldo 88(%r3),%r20 stw %r5,96(%r3) sub %r21,%r2,%r31 copy %r19,%r5 stw %r4,100(%r3) ldo 80(%r31),%r4 ldo 64(%r31),%r31 stw %r19,-32(%r30) stw %r25,-40(%r3) copy %r21,%r25 ldo 80(%r3),%r21 fstds %fr5,0(%r20) ldo 76(%r3),%r20 fstws %fr4L,0(%r20) ldo 68(%r3),%r20 stw %r0,36(%r3) stw %r28,48(%r3) fstds %fr7,0(%r21) ldo 72(%r3),%r21 fstws %fr5L,0(%r21) ldo 64(%r3),%r21 fstws %fr6L,0(%r20) ldo -48(%r3),%r20 stw %r26,-36(%r3) fstws %fr7L,0(%r21) ldw 0(%r29),%r22 stw %r20,52(%r3) stw %r31,56(%r3) stw %r4,60(%r3) stw %r24,-44(%r3) stw %r23,-48(%r3) stw %r0,16(%r3) stw %r2,32(%r3) stw %r0,40(%r3) ldw 4(%r29),%r26 .CALL ARGW0=GR bl $$dyncall,%r31 copy %r31,%r2 ldw 40(%r3),%r21 comib,= 0,%r21,.L1 copy %r5,%r19 comib,= 1,%r21,.L48 ldb 24(%r3),%r20 comib,=,n 2,%r21,.L48 comib,=,n 3,%r21,.L43 comib,=,n 4,%r21,.L44 comib,=,n 5,%r21,.L45 comib,=,n 6,%r21,.L41 comib,=,n 7,%r21,.L41 comib,=,n 8,%r21,.L41 comib,= 9,%r21,.L41 ldo -10(%r21),%r20 comib,<<,n 1,%r20,.L22 ldw 24(%r3),%r28 .L40: ldw 28(%r3),%r29 .L1: ldw -20(%r3),%r2 .L49: .L50: ldw 96(%r3),%r5 ldw 100(%r3),%r4 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 .L22: comib,= 12,%r21,.L46 ldo 24(%r3),%r20 comib,=,n 13,%r21,.L47 comib,=,n 14,%r21,.L1 ldw 24(%r3),%r28 comib,<> 15,%r21,.L49 ldw -20(%r3),%r2 ldw 16(%r3),%r20 bb,>= %r20,30,.L49 ldw 44(%r3),%r4 ldo -1(%r4),%r20 comib,<< 7,%r20,.L50 ldw 36(%r3),%r20 extru %r20,31,2,%r31 copy %r20,%r2 depi 0,31,2,%r2 comib,<< 4,%r4,.L33 addl %r31,%r4,%r5 zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 4,%r5,.L34 ldo -1(%r20),%r31 ldw 0(%r2),%r20 zdep %r5,28,29,%r21 ldo -1(%r21),%r21 and %r20,%r31,%r20 mtsar %r21 vextrs %r20,32,%r20 movb,tr %r20,%r28,.L49 ldw -20(%r3),%r2 .L34: ldw 0(%r2),%r20 zdep %r5,28,29,%r22 ldw 4(%r2),%r21 and %r20,%r31,%r20 ldo -33(%r22),%r2 subi 63,%r22,%r22 mtsar %r22 zvdep %r20,32,%r20 mtsar %r2 vextrs %r21,32,%r21 .L39: b .L1 or %r21,%r20,%r28 .L33: zdep %r31,28,29,%r31 mtsar %r31 zvdepi 2,32,%r20 comib,<< 8,%r5,.L37 ldo -1(%r20),%r4 ldw 0(%r2),%r22 zdep %r5,29,30,%r20 and %r22,%r4,%r22 ldw 4(%r2),%r31 subi 47,%r20,%r4 zdep %r5,28,29,%r20 mtsar %r4 ldo -33(%r20),%r20 zvdep %r22,32,%r21 zvdep %r21,32,%r21 mtsar %r20 vextrs %r31,32,%r31 vextrs %r22,32,%r22 movb,tr %r22,%r28,.L1 or %r21,%r31,%r29 .L37: ldw 0(%r2),%r21 zdep %r5,28,29,%r31 ldw 8(%r2),%r22 and %r21,%r4,%r21 ldo -65(%r31),%r4 ldw 4(%r2),%r20 mtsar %r4 subi 95,%r31,%r2 vextrs %r22,32,%r22 mtsar %r2 zvdep %r20,32,%r31 zvdep %r21,32,%r21 or %r31,%r22,%r29 mtsar %r4 b .L39 vextrs %r20,32,%r20 .L41: b .L1 ldw 24(%r3),%r28 .L47: ldw 24(%r3),%r28 b .L40 fldds 0(%r20),%fr4 .L46: ldw 24(%r3),%r28 b .L1 fldws 0(%r20),%fr4L .L45: b .L1 ldh 24(%r3),%r28 .L44: ldh 24(%r3),%r20 b .L1 extrs %r20,31,16,%r28 .L43: b .L1 ldb 24(%r3),%r28 .L48: b .L1 extrs %r20,31,8,%r28 .EXIT .PROCEND .Lfe1: .size callback_receiver,.Lfe1-callback_receiver .data .align 4 .LC0: .word P%callback_receiver .text .align 4 .globl callback_get_receiver .type callback_get_receiver,@function callback_get_receiver: .PROC .CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3 .ENTRY copy %r3,%r1 copy %r30,%r3 stwm %r1,64(%r30) addil LT'.LC0,%r19 stw %r19,-32(%r30) ldw RT'.LC0(%r1),%r1 ldw 0(%r1),%r28 ldo 64(%r3),%r30 bv %r0(%r2) ldwm -64(%r30),%r3 .EXIT .PROCEND .Lfe2: .size callback_get_receiver,.Lfe2-callback_get_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-sparc-macro.S0000664000000000000000000000364414662617145017324 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(callback_receiver) DECLARE_FUNCTION(callback_receiver) .proc 020 FUNBEGIN(callback_receiver) !$PROLOGUE$ 0 save %sp, -144, %sp ld [%fp+64], %o0 add %fp, 68, %o1 st %g0, [%fp-28] st %o0, [%fp-16] st %o1, [%fp-32] ld [%g2+4], %o0 add %fp, -48, %o1 ld [%g2], %o2 st %i2, [%fp+76] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] call %o2, 0 st %g0, [%fp-24] ld [%fp-24], %o1 cmp %o1, 0 be L(L1) cmp %o1, 1 be L(L44) cmp %o1, 2 be L(L44) cmp %o1, 3 be L(L45) cmp %o1, 4 be L(L46) cmp %o1, 5 be L(L47) cmp %o1, 6 be L(L43) cmp %o1, 7 be L(L43) cmp %o1, 8 be L(L43) cmp %o1, 9 be L(L43) add %o1, -10, %o0 cmp %o0, 1 bgu L(L22) cmp %o1, 12 ld [%fp-40], %i0 b L(L1) ld [%fp-36], %i1 L(L22): be L(L48) cmp %o1, 13 be L(L49) cmp %o1, 14 be L(L43) cmp %o1, 15 bne L(L1) ld [%fp-48], %o0 andcc %o0, 16, %g0 be L(L33) andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne L(L1) ld [%fp-28], %i0 b L(L1) add %i7, 4, %i7 L(L33): be,a L(L1) add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be L(L50) cmp %o0, 2 be L(L51) cmp %o0, 4 bne,a L(L1) add %i7, 4, %i7 ld [%fp-28], %o0 b L(L1) ld [%o0], %i0 L(L51): ld [%fp-28], %o0 b L(L1) lduh [%o0], %i0 L(L50): ld [%fp-28], %o0 b L(L1) ldub [%o0], %i0 L(L43): b L(L1) ld [%fp-40], %i0 L(L49): b L(L1) ldd [%fp-40], %f0 L(L48): ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a L(L1) ld [%fp-40], %f0 ld [%fp-40], %f2 b L(L1) fstod %f2, %f0 L(L47): b L(L1) lduh [%fp-40], %i0 L(L46): b L(L1) ldsh [%fp-40], %i0 L(L45): b L(L1) ldub [%fp-40], %i0 L(L44): ldsb [%fp-40], %i0 L(L38): L(L1): nop ret restore L(Lfe1): FUNEND(callback_receiver) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-powerpc-linux-macro.S0000664000000000000000000000605614662617145021030 00000000000000 .file "vacall-powerpc.c" .section ".text" .align 2 .type callback_receiver, @function callback_receiver: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-176(1) mflr 0 stw 0,180(1) stw 31,172(1) mr 31,1 stw 29,164(1) addi 0,31,184 li 29,0 stw 0,32(31) stw 29,36(31) lwz 0,0(11) stw 3,52(31) stw 4,56(31) mtctr 0 stw 9,76(31) addi 4,31,16 stw 30,168(1) stw 5,60(31) stw 6,64(31) stw 7,68(31) stw 8,72(31) stw 10,80(31) stw 29,84(31) stfd 1,88(31) stfd 2,96(31) stfd 3,104(31) stfd 4,112(31) stfd 5,120(31) stfd 6,128(31) stfd 7,136(31) stfd 8,144(31) stw 29,16(31) stw 29,48(31) stw 29,40(31) lwz 3,4(11) bctrl lwz 9,40(31) cmpwi 0,9,0 beq- 0,.L1 cmpwi 0,9,1 beq- 0,.L41 cmpwi 0,9,2 beq- 0,.L42 cmpwi 0,9,3 beq- 0,.L41 cmpwi 0,9,4 beq- 0,.L43 cmpwi 0,9,5 beq- 0,.L44 cmpwi 0,9,6 beq- 0,.L40 cmpwi 0,9,7 beq- 0,.L40 cmpwi 0,9,8 beq- 0,.L40 cmpwi 0,9,9 beq- 0,.L40 addi 0,9,-10 cmplwi 0,0,1 bgt- 0,.L22 lwz 3,24(31) lwz 4,28(31) .L1: lwz 11,0(1) lwz 0,4(11) lwz 29,-12(11) lwz 30,-8(11) mtlr 0 lwz 31,-4(11) mr 1,11 blr .L22: cmpwi 0,9,12 beq- 0,.L45 cmpwi 0,9,13 beq- 0,.L46 cmpwi 0,9,14 beq- 0,.L40 cmpwi 0,9,15 bne+ 0,.L1 lwz 0,16(31) andi. 9,0,1024 beq- 0,.L1 lwz 9,44(31) addi 0,9,-1 cmplwi 0,0,7 bgt- 0,.L1 lwz 0,36(31) cmplwi 0,9,4 rlwinm 8,0,0,30,31 rlwinm 5,0,0,0,29 add 6,8,9 bgt- 0,.L33 slwi 0,8,3 cmplwi 0,6,4 subfic 0,0,31 li 9,2 slw 9,9,0 addi 7,9,-1 bgt- 0,.L34 lwz 9,0(5) slwi 0,6,3 subfic 0,0,32 and 9,9,7 sraw 3,9,0 b .L1 .L34: lwz 0,0(5) slwi 9,6,3 lwz 10,4(5) subfic 8,9,64 and 0,0,7 addi 9,9,-32 slw 0,0,9 sraw 10,10,8 .L39: or 3,10,0 b .L1 .L33: slwi 0,8,3 cmplwi 0,6,8 subfic 0,0,31 li 9,2 slw 9,9,0 addi 29,9,-1 bgt- 0,.L37 lwz 7,0(5) slwi 10,6,2 addi 10,10,-16 lwz 8,4(5) and 7,7,29 slwi 9,6,3 subfic 9,9,64 slw 0,7,10 slw 0,0,10 sraw 8,8,9 or 4,0,8 sraw 3,7,9 b .L1 .L37: slwi 9,6,3 lwz 0,4(5) lwz 10,0(5) subfic 6,9,96 lwz 8,8(5) addi 9,9,-64 slw 7,0,9 and 10,10,29 sraw 8,8,6 slw 10,10,9 sraw 0,0,6 or 4,7,8 b .L39 .L40: lwz 3,24(31) b .L1 .L46: lfd 1,24(31) b .L1 .L45: lfs 1,24(31) b .L1 .L44: lhz 3,24(31) b .L1 .L43: lha 3,24(31) b .L1 .L41: lbz 3,24(31) b .L1 .L42: lbz 0,24(31) slwi 0,0,24 srawi 3,0,24 b .L1 .size callback_receiver, .-callback_receiver .section ".got2","aw" .LCTOC1 = .+32768 .section ".text" .section ".got2","aw" .LC0: .long callback_receiver .section ".text" .align 2 .globl callback_get_receiver .LCL1: .long .LCTOC1-.LCF1 .type callback_get_receiver, @function callback_get_receiver: stwu 1,-32(1) mflr 0 bcl 20,31,.LCF1 .LCF1: stw 30,24(1) mflr 30 stw 31,28(1) mr 31,1 stw 0,36(1) lwz 11,0(1) lwz 0,.LCL1-.LCF1(30) lwz 31,-4(11) add 30,0,30 lwz 0,4(11) lwz 3,.LC0-.LCTOC1(30) lwz 30,-8(11) mtlr 0 mr 1,11 blr .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/vacall-x86_64-macro.S0000664000000000000000000001714414662617145017152 00000000000000#include "asm-x86_64.h" TEXT() P2ALIGN(4,15) DECLARE_FUNCTION(callback_receiver) FUNBEGIN(callback_receiver) L(FB2): INSN1(push,q ,R(rbp)) L(CFI0): INSN2(mov,q ,R(rsp), R(rbp)) L(CFI1): INSN1(push,q ,R(r13)) L(CFI2): INSN1(push,q ,R(r12)) L(CFI3): INSN2(sub,q ,NUM(192), R(rsp)) L(CFI4): INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-48)) INSN2(lea,q ,X8 MEM_DISP(rbp,16), R(rcx)) INSN2(mov,q ,R(rdi),X8 MEM_DISP(rbp,-72)) INSN2(mov,q ,R(rsi),X8 MEM_DISP(rbp,-64)) INSN2S(movs,d ,R(xmm0),X8 MEM_DISP(rbp,-144)) INSN2(mov,q ,R(rcx),X8 MEM_DISP(rbp,-184)) INSN2(mov,q ,NUM(0),X8 MEM_DISP(rbp,-176)) INSN2S(movs,d ,R(xmm1),X8 MEM_DISP(rbp,-136)) INSN2(mov,q ,R(rdx),X8 MEM_DISP(rbp,-56)) INSN2S(movs,d ,R(xmm2),X8 MEM_DISP(rbp,-128)) INSN2(lea,q ,X8 MEM_DISP(rbp,-208), R(rsi)) INSN2(mov,q ,R(r8),X8 MEM_DISP(rbp,-40)) INSN2S(movs,d ,R(xmm3),X8 MEM_DISP(rbp,-120)) INSN2(mov,q ,R(r9),X8 MEM_DISP(rbp,-32)) INSN2S(movs,d ,R(xmm4),X8 MEM_DISP(rbp,-112)) INSN2S(movs,d ,R(xmm5),X8 MEM_DISP(rbp,-104)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-208)) INSN2S(movs,d ,R(xmm6),X8 MEM_DISP(rbp,-96)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-168)) INSN2S(movs,d ,R(xmm7),X8 MEM_DISP(rbp,-88)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-80)) INSN2(mov,l ,NUM(0),X4 MEM_DISP(rbp,-152)) INSN2(mov,q ,X8 MEM_DISP(r10,8), R(rdi)) INSN1(call,_ ,INDIR(X8 MEM(r10))) INSN2(mov,l ,X4 MEM_DISP(rbp,-168), R(ecx)) INSN2(test,l ,R(ecx), R(ecx)) INSN1(je,_ ,L(41)) INSN2(cmp,l ,NUM(1), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(2), R(ecx)) INSN1(je,_ ,L(42)) INSN2(cmp,l ,NUM(3), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(48)) INSN2(cmp,l ,NUM(4), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(49)) INSN2(cmp,l ,NUM(5), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(50)) INSN2(cmp,l ,NUM(6), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(51)) INSN2(cmp,l ,NUM(7), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(52)) INSN2(cmp,l ,NUM(8), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(9), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(10), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(11), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(12), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(53)) INSN2(cmp,l ,NUM(13), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(54)) INSN2(cmp,l ,NUM(14), R(ecx)) P2ALIGN(4,5) INSN1(je,_ ,L(46)) INSN2(cmp,l ,NUM(15), R(ecx)) P2ALIGN(4,5) INSN1(jne,_ ,L(41)) INSN2(test,b ,NUM(4),X1 MEM_DISP(rbp,-207)) P2ALIGN(4,2) INSN1(je,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-160), R(rsi)) INSN2(lea,q ,X8 MEM_DISP(rsi,-1), R(rcx)) INSN2(cmp,q ,NUM(15), R(rcx)) INSN1(ja,_ ,L(41)) INSN2(mov,q ,X8 MEM_DISP(rbp,-176), R(rcx)) INSN2(mov,q ,R(rcx), R(r12)) INSN2(mov,q ,R(rcx), R(r8)) INSN2(and,l ,NUM(7), R(r8d)) INSN2(and,q ,NUM(-8), R(r12)) INSN2(cmp,q ,NUM(8), R(rsi)) INSN2(lea,q ,X8 MEM_INDEX(rsi,r8), R(r11)) INSN1(ja,_ ,L(35)) INSN2(cmp,q ,NUM(8), R(r11)) INSN1(ja,_ ,L(37)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-1,r11,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(ecx)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM(r12), R(rsi)) INSN2(mov,q ,R(rsi), R(rax)) INSN2(sar,q ,R(cl), R(rax)) P2ALIGN(4,7) L(41): INSN2(add,q ,NUM(192), R(rsp)) INSN1(pop,q ,R(r12)) INSN1(pop,q ,R(r13)) leave ret P2ALIGN(4,7) L(42): INSN2MOVXQ(movs,b,X1 MEM_DISP(rbp,-200),R(rax)) INSN2(add,q ,NUM(192), R(rsp)) INSN1(pop,q ,R(r12)) INSN1(pop,q ,R(r13)) leave ret L(49): INSN2MOVXQ(movs,w,X2 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(48): INSN2MOVXQ(movz,b,X1 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(46): INSN2(mov,q ,X8 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(50): INSN2MOVXQ(movz,w,X2 MEM_DISP(rbp,-200), R(rax)) INSN1(jmp,_ ,L(41)) L(51): INSN2MOVXLQ(movs,l,X4 MEM_DISP(rbp,-200),R(rax)) INSN1(jmp,_ ,L(41)) L(52): INSN2(mov,l ,X4 MEM_DISP(rbp,-200), R(eax)) INSN1(jmp,_ ,L(41)) L(53): INSN2S(movs,s ,X4 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(54): INSN2(movlp,d ,X8 MEM_DISP(rbp,-200), R(xmm0)) INSN1(jmp,_ ,L(41)) L(35): INSN2(cmp,q ,NUM(16), R(r11)) INSN1(ja,_ ,L(39)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(ecx)) INSN2(mov,l ,NUM(2), R(esi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(0,r8,8), R(r9d)) INSN2(mov,l ,NUM(32), R(edi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,4), R(rcx)) INSN2(mov,q ,X8 MEM(r12), R(r8)) INSN1(dec,q ,R(rsi)) INSN2(and,q ,X8 MEM_DISP(r12,8), R(rsi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(mov,q ,R(r8), R(rax)) INSN2(mov,q ,R(rsi), R(r11)) INSN2(mov,q ,R(rsi), R(rdx)) INSN2(sal,q ,R(cl), R(r11)) INSN2(sal,q ,R(cl), R(r11)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(r11), R(rax)) INSN2(sar,q ,R(cl), R(rdx)) INSN1(jmp,_ ,L(41)) L(37): INSN2(mov,q ,X8 MEM(r12), R(rdi)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-65,r11,8), R(esi)) INSN2(sal,q ,NUM(3), R(r8)) INSN2(mov,l ,R(r8d), R(ecx)) INSN2(mov,l ,NUM(2), R(r11d)) INSN2(sar,q ,R(cl), R(rdi)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(mov,l ,NUM(64), R(esi)) INSN2(sal,q ,R(cl), R(r11)) INSN2(sub,l ,R(r8d), R(esi)) INSN2(mov,q ,R(rdi), R(rax)) INSN1(dec,q ,R(r11)) INSN2(and,q ,X8 MEM_DISP(r12,8), R(r11)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r11)) INSN2(or,q ,R(r11), R(rax)) INSN1(jmp,_ ,L(41)) L(39): INSN2(lea,q ,X8 MEM_DISP_SHINDEX0(0,r8,8), R(rcx)) INSN2(mov,q ,X8 MEM(r12), R(r13)) INSN2(mov,q ,X8 MEM_DISP(r12,8), R(r8)) INSN2(mov,l ,NUM(64), R(edi)) INSN2(sub,l ,R(ecx), R(edi)) INSN2(mov,l ,R(ecx), R(r9d)) INSN2(sar,q ,R(cl), R(r13)) INSN2(mov,q ,R(r8), R(rsi)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(mov,q ,R(r13), R(rax)) INSN2(mov,l ,R(r9d), R(ecx)) INSN2(or,q ,R(rsi), R(rax)) INSN2(lea,l ,X4 MEM_DISP_SHINDEX0(-129,r11,8), R(esi)) INSN2(sar,q ,R(cl), R(r8)) INSN2(mov,l ,NUM(2), R(r9d)) INSN2(mov,q ,R(r8), R(rdx)) INSN2(mov,l ,R(esi), R(ecx)) INSN2(sal,q ,R(cl), R(r9)) INSN2(mov,l ,R(edi), R(ecx)) INSN2(lea,q ,X8 MEM_DISP(r9,-1), R(rsi)) INSN2(and,q ,X8 MEM_DISP(r12,16), R(rsi)) INSN2(sal,q ,R(cl), R(rsi)) INSN2(or,q ,R(rsi), R(rdx)) INSN1(jmp,_ ,L(41)) L(FE2): FUNEND(callback_receiver, .-callback_receiver) P2ALIGN(4,15) GLOBL(C(callback_get_receiver)) DECLARE_FUNCTION(callback_get_receiver) FUNBEGIN(callback_get_receiver) L(FB3): INSN1(push,q ,R(rbp)) L(CFI5): INSN2(lea,q ,ADDR_PCRELATIVE(C(callback_receiver)), R(rax)) INSN2(mov,q ,R(rsp), R(rbp)) L(CFI6): leave ret L(FE3): FUNEND(callback_get_receiver, .-callback_get_receiver) #if !(defined __sun || (defined __APPLE__ && defined __MACH__) || (defined _WIN32 || defined __CYGWIN__)) .section EH_FRAME_SECTION L(frame1): .long L(ECIE1)-.LSCIE1 L(SCIE1): .long 0x0 .byte 0x1 .string "zR" .uleb128 0x1 .sleb128 -8 .byte 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 L(ECIE1): L(SFDE1): .long L(EFDE1)-.LASFDE1 L(ASFDE1): .long L(ASFDE1)-.Lframe1 .long L(FB2)-. .long L(FE2)-.LFB2 .uleb128 0x0 .byte 0x4 .long L(CFI0)-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI1)-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long L(CFI4)-.LCFI1 .byte 0x8c .uleb128 0x4 .byte 0x8d .uleb128 0x3 .align 8 L(EFDE1): L(SFDE3): .long L(EFDE3)-.LASFDE3 L(ASFDE3): .long L(ASFDE3)-.Lframe1 .long L(FB3)-. .long L(FE3)-.LFB3 .uleb128 0x0 .byte 0x4 .long L(CFI5)-.LFB3 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long L(CFI6)-.LCFI5 .byte 0xd .uleb128 0x6 .align 8 L(EFDE3): #endif #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/Makefile.maint0000664000000000000000000000065313153072372016264 00000000000000# maintainer -*-Makefile-*- LN = ln -s RM = rm -f # ==================== Easily regeneratable files ==================== all : vacall-i386-msvc.c vacall-i386-msvc.c : vacall-i386-macro.S (echo '#ifdef _MSC_VER' ; echo '#include "vacall_r.h"' ; echo '#endif' ; sed -e '/FUNEND(callback_receiver,/q' < vacall-i386-macro.S ; cat get_receiver.c) > vacall-i386-msvc.c totally-clean : force $(RM) vacall-i386-msvc.c force : libffcall-2.5/callback/vacall_r/vacall-riscv32-ilp32d-linux.s0000664000000000000000000000470214662617145020674 00000000000000 .file "vacall-riscv32.c" .option pic .text .align 1 .type callback_receiver, @function callback_receiver: add sp,sp,-208 sw ra,188(sp) sw s0,184(sp) add s0,sp,192 sw a1,-144(s0) add a1,s0,16 lw t3,0(t2) sw a7,12(s0) sw a2,-140(s0) sw a3,-136(s0) sw a4,-132(s0) sw a5,-128(s0) sw a6,-124(s0) sw a7,-120(s0) fsw fa0,-112(s0) fsw fa1,-108(s0) fsw fa2,-104(s0) fsw fa3,-100(s0) fsw fa4,-96(s0) fsw fa5,-92(s0) fsw fa6,-88(s0) fsw fa7,-84(s0) fsd fa0,-80(s0) fsd fa1,-72(s0) fsd fa2,-64(s0) fsd fa3,-56(s0) fsd fa4,-48(s0) fsd fa5,-40(s0) fsd fa6,-32(s0) fsd fa7,-24(s0) sw a1,-168(s0) sw a0,-148(s0) sw zero,-184(s0) sw zero,-164(s0) sw zero,-160(s0) lw a0,4(t2) sw zero,-152(s0) sw zero,-116(s0) add a1,s0,-184 jalr t3 lw t1,-160(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L22 li t3,2 beq t1,t3,.L25 li t3,3 beq t1,t3,.L22 li t3,4 beq t1,t3,.L26 li t3,5 beq t1,t3,.L27 li t3,6 beq t1,t3,.L23 li t3,7 beq t1,t3,.L23 li t3,8 beq t1,t3,.L23 li t3,9 beq t1,t3,.L23 add t3,t1,-10 li t4,1 bleu t3,t4,.L28 li t3,12 beq t1,t3,.L29 li t3,13 beq t1,t3,.L30 li t3,14 beq t1,t3,.L23 li t3,15 bne t1,t3,.L1 lw t1,-184(s0) and t1,t1,2 beqz t1,.L1 lw t3,-156(s0) li t1,7 add t5,t3,-1 bgtu t5,t1,.L1 lw t1,-164(s0) lbu t5,0(t1) mv a0,t5 beq t3,t4,.L1 lbu t4,1(t1) li t6,2 sll t4,t4,8 or t5,t4,t5 mv a0,t5 beq t3,t6,.L1 lbu t4,2(t1) li t6,3 sll t4,t4,16 or t4,t4,t5 mv a0,t4 beq t3,t6,.L1 lbu a0,3(t1) li t5,4 sll a0,a0,24 or a0,a0,t4 beq t3,t5,.L1 lbu t5,4(t1) li t4,5 mv a1,t5 beq t3,t4,.L1 lbu t4,5(t1) li t6,6 sll t4,t4,8 or t5,t4,t5 mv a1,t5 beq t3,t6,.L1 lbu t4,6(t1) li t6,8 sll t4,t4,16 or t4,t4,t5 mv a1,t4 bne t3,t6,.L1 lbu a1,7(t1) sll a1,a1,24 or a1,a1,t4 .L1: lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L22: lbu a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L23: lw a0,-176(s0) j .L1 .L25: lb a0,-176(s0) lw ra,188(sp) lw s0,184(sp) add sp,sp,208 jr ra .L26: lh a0,-176(s0) j .L1 .L27: lhu a0,-176(s0) j .L1 .L28: lw a0,-176(s0) lw a1,-172(s0) j .L1 .L29: flw fa0,-176(s0) j .L1 .L30: fld fa0,-176(s0) j .L1 .size callback_receiver, .-callback_receiver .align 1 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: add sp,sp,-16 sw s0,12(sp) add s0,sp,16 lw s0,12(sp) lla a0,callback_receiver add sp,sp,16 jr ra .size callback_get_receiver, .-callback_get_receiver .ident "GCC: (GNU) 7.3.0" libffcall-2.5/callback/vacall_r/vacall-m68k-sun.s0000664000000000000000000000412114662617144016533 00000000000000#NO_APP .text .even _callback_receiver: link a6,#-32 moveml #0x3030,sp@- clrl a6@(-32) lea a6@(8),a2 movel a2,a6@(-20) clrl a6@(-16) clrl a6@(-12) movel a1,a6@(-4) pea a6@(-32) movel a0@(4),sp@- movel a0@,a2 jsr a2@ addql #8,sp movel a6@(-12),a3 tstl a3 jeq L1 moveq #1,d2 cmpl a3,d2 jeq L46 moveq #2,d3 cmpl a3,d3 jeq L46 moveq #3,d2 cmpl a3,d2 jeq L47 moveq #4,d3 cmpl a3,d3 jeq L48 moveq #5,d2 cmpl a3,d2 jeq L49 moveq #6,d3 cmpl a3,d3 jeq L45 moveq #7,d2 cmpl a3,d2 jeq L45 moveq #8,d3 cmpl a3,d3 jeq L45 moveq #9,d2 cmpl a3,d2 jeq L45 lea a3@(-10),a2 moveq #1,d3 cmpl a2,d3 jcs L22 movel a6@(-28),d0 movel a6@(-24),d1 jra L1 .even L22: moveq #12,d2 cmpl a3,d2 jeq L50 moveq #13,d2 cmpl a3,d2 jeq L51 moveq #14,d3 cmpl a3,d3 jeq L52 moveq #15,d2 cmpl a3,d2 jne L1 btst #2,a6@(-30) jeq L1 movel a6@(-8),d2 moveq #1,d3 cmpl d2,d3 jeq L53 moveq #2,d3 cmpl d2,d3 jeq L54 moveq #4,d3 cmpl d2,d3 jeq L55 moveq #8,d3 cmpl d2,d3 jne L1 movel a6@(-16),a2 movel a2@,d0 movel a2@(4),d1 jra L1 .even L55: movel a6@(-16),a2 movel a2@,d0 jra L1 .even L54: movel a6@(-16),a2 clrl d0 movew a2@,d0 jra L1 .even L53: movel a6@(-16),a2 clrl d0 moveb a2@,d0 jra L1 .even L52: movel a6@(-28),d0 movel d0,a0 jra L1 .even L51: btst #6,a6@(-29) jeq L31 fmoved a6@(-28),fp0 jra L1 .even L31: movel a6@(-28),d0 movel a6@(-24),d1 jra L1 .even L50: movel a6@(-32),d2 btst #6,d2 jeq L25 fmoves a6@(-28),fp0 jra L1 .even L25: btst #5,d2 jeq L27 fmoves a6@(-28),fp1 fmoved fp1,sp@- movel sp@+,d0 movel sp@+,d1 jra L1 .even L27: movel a6@(-28),d0 jra L1 .even L45: movel a6@(-28),d0 jra L1 .even L49: clrl d0 movew a6@(-28),d0 jra L1 .even L48: movew a6@(-28),d0 extl d0 jra L1 .even L47: clrl d0 moveb a6@(-28),d0 jra L1 .even L46: moveb a6@(-28),d0 extbl d0 L1: moveml a6@(-48),#0xc0c unlk a6 rts .even .globl _callback_get_receiver _callback_get_receiver: link a6,#0 movel a5,sp@- movel #__GLOBAL_OFFSET_TABLE_, a5 lea pc@(0,a5:l),a5 movel a5@(_callback_receiver:l),d0 movel sp@+,a5 unlk a6 rts libffcall-2.5/callback/vacall_r/vacall-sparc-linux.s0000664000000000000000000000340614662617145017416 00000000000000 .file "vacall-sparc.c" .section ".text" .align 4 .global callback_receiver .type callback_receiver,#function .proc 020 callback_receiver: !#PROLOGUE# 0 save %sp, -144, %sp ld [%fp+64], %o0 add %fp, 68, %o1 st %g0, [%fp-28] st %o0, [%fp-16] st %o1, [%fp-32] ld [%g2+4], %o0 add %fp, -48, %o1 ld [%g2], %o2 st %i2, [%fp+76] st %i3, [%fp+80] st %i4, [%fp+84] st %i5, [%fp+88] st %i0, [%fp+68] st %i1, [%fp+72] st %g0, [%fp-48] call %o2, 0 st %g0, [%fp-24] ld [%fp-24], %o1 cmp %o1, 0 be .LL1 cmp %o1, 1 be .LL44 cmp %o1, 2 be .LL44 cmp %o1, 3 be .LL45 cmp %o1, 4 be .LL46 cmp %o1, 5 be .LL47 cmp %o1, 6 be .LL43 cmp %o1, 7 be .LL43 cmp %o1, 8 be .LL43 cmp %o1, 9 be .LL43 add %o1, -10, %o0 cmp %o0, 1 bgu .LL22 cmp %o1, 12 ld [%fp-40], %i0 b .LL1 ld [%fp-36], %i1 .LL22: be .LL48 cmp %o1, 13 be .LL49 cmp %o1, 14 be .LL43 cmp %o1, 15 bne .LL1 ld [%fp-48], %o0 andcc %o0, 16, %g0 be .LL33 andcc %o0, 2, %g0 ld [%fp-20], %o0 ld [%i7+8], %o1 and %o0, 4095, %o0 cmp %o0, %o1 bne .LL1 ld [%fp-28], %i0 b .LL1 add %i7, 4, %i7 .LL33: be,a .LL1 add %i7, 4, %i7 ld [%fp-20], %o0 cmp %o0, 1 be .LL50 cmp %o0, 2 be .LL51 cmp %o0, 4 bne,a .LL1 add %i7, 4, %i7 ld [%fp-28], %o0 b .LL1 ld [%o0], %i0 .LL51: ld [%fp-28], %o0 b .LL1 lduh [%o0], %i0 .LL50: ld [%fp-28], %o0 b .LL1 ldub [%o0], %i0 .LL43: b .LL1 ld [%fp-40], %i0 .LL49: b .LL1 ldd [%fp-40], %f0 .LL48: ld [%fp-48], %o0 andcc %o0, 32, %g0 be,a .LL1 ld [%fp-40], %f0 ld [%fp-40], %f2 b .LL1 fstod %f2, %f0 .LL47: b .LL1 lduh [%fp-40], %i0 .LL46: b .LL1 ldsh [%fp-40], %i0 .LL45: b .LL1 ldub [%fp-40], %i0 .LL44: ldsb [%fp-40], %i0 .LL38: .LL1: nop ret restore .LLfe1: .size callback_receiver,.LLfe1-callback_receiver .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/vacall_r/vacall-x86_64-linux.s0000664000000000000000000001110314662617145017235 00000000000000 .file "vacall-x86_64.c" .text .p2align 4,,15 .type callback_receiver, @function callback_receiver: .LFB2: pushq %rbp .LCFI0: movq %rsp, %rbp .LCFI1: pushq %r13 .LCFI2: pushq %r12 .LCFI3: subq $192, %rsp .LCFI4: movq %rcx, -48(%rbp) leaq 16(%rbp), %rcx movq %rdi, -72(%rbp) movq %rsi, -64(%rbp) movsd %xmm0, -144(%rbp) movq %rcx, -184(%rbp) movq $0, -176(%rbp) movsd %xmm1, -136(%rbp) movq %rdx, -56(%rbp) movsd %xmm2, -128(%rbp) leaq -208(%rbp), %rsi movq %r8, -40(%rbp) movsd %xmm3, -120(%rbp) movq %r9, -32(%rbp) movsd %xmm4, -112(%rbp) movsd %xmm5, -104(%rbp) movl $0, -208(%rbp) movsd %xmm6, -96(%rbp) movl $0, -168(%rbp) movsd %xmm7, -88(%rbp) movl $0, -80(%rbp) movl $0, -152(%rbp) movq 8(%r10), %rdi call *(%r10) movl -168(%rbp), %ecx testl %ecx, %ecx je .L41 cmpl $1, %ecx je .L42 cmpl $2, %ecx je .L42 cmpl $3, %ecx .p2align 4,,5 je .L48 cmpl $4, %ecx .p2align 4,,5 je .L49 cmpl $5, %ecx .p2align 4,,5 je .L50 cmpl $6, %ecx .p2align 4,,5 je .L51 cmpl $7, %ecx .p2align 4,,5 je .L52 cmpl $8, %ecx .p2align 4,,5 je .L46 cmpl $9, %ecx .p2align 4,,5 je .L46 cmpl $10, %ecx .p2align 4,,5 je .L46 cmpl $11, %ecx .p2align 4,,5 je .L46 cmpl $12, %ecx .p2align 4,,5 je .L53 cmpl $13, %ecx .p2align 4,,5 je .L54 cmpl $14, %ecx .p2align 4,,5 je .L46 cmpl $15, %ecx .p2align 4,,5 jne .L41 testb $4, -207(%rbp) .p2align 4,,2 je .L41 movq -160(%rbp), %rsi leaq -1(%rsi), %rcx cmpq $15, %rcx ja .L41 movq -176(%rbp), %rcx movq %rcx, %r12 movq %rcx, %r8 andl $7, %r8d andq $-8, %r12 cmpq $8, %rsi leaq (%rsi,%r8), %r11 ja .L35 cmpq $8, %r11 ja .L37 leal -1(,%r11,8), %ecx movl $2, %esi salq %cl, %rsi leal 0(,%r8,8), %ecx decq %rsi andq (%r12), %rsi movq %rsi, %rax sarq %cl, %rax .p2align 4,,7 .L41: addq $192, %rsp popq %r12 popq %r13 leave ret .p2align 4,,7 .L42: movsbq -200(%rbp),%rax addq $192, %rsp popq %r12 popq %r13 leave ret .L49: movswq -200(%rbp),%rax jmp .L41 .L48: movzbq -200(%rbp), %rax jmp .L41 .L46: movq -200(%rbp), %rax jmp .L41 .L50: movzwq -200(%rbp), %rax jmp .L41 .L51: movslq -200(%rbp),%rax jmp .L41 .L52: mov -200(%rbp), %eax jmp .L41 .L53: movss -200(%rbp), %xmm0 jmp .L41 .L54: movlpd -200(%rbp), %xmm0 jmp .L41 .L35: cmpq $16, %r11 ja .L39 leal -65(,%r11,8), %ecx movl $2, %esi leal 0(,%r8,8), %r9d movl $32, %edi salq %cl, %rsi leaq 0(,%r8,4), %rcx movq (%r12), %r8 decq %rsi andq 8(%r12), %rsi subl %ecx, %edi movl %r9d, %ecx sarq %cl, %r8 movl %edi, %ecx movq %r8, %rax movq %rsi, %r11 movq %rsi, %rdx salq %cl, %r11 salq %cl, %r11 movl %r9d, %ecx orq %r11, %rax sarq %cl, %rdx jmp .L41 .L37: movq (%r12), %rdi leal -65(,%r11,8), %esi salq $3, %r8 movl %r8d, %ecx movl $2, %r11d sarq %cl, %rdi movl %esi, %ecx movl $64, %esi salq %cl, %r11 subl %r8d, %esi movq %rdi, %rax decq %r11 andq 8(%r12), %r11 movl %esi, %ecx salq %cl, %r11 orq %r11, %rax jmp .L41 .L39: leaq 0(,%r8,8), %rcx movq (%r12), %r13 movq 8(%r12), %r8 movl $64, %edi subl %ecx, %edi movl %ecx, %r9d sarq %cl, %r13 movq %r8, %rsi movl %edi, %ecx salq %cl, %rsi movq %r13, %rax movl %r9d, %ecx orq %rsi, %rax leal -129(,%r11,8), %esi sarq %cl, %r8 movl $2, %r9d movq %r8, %rdx movl %esi, %ecx salq %cl, %r9 movl %edi, %ecx leaq -1(%r9), %rsi andq 16(%r12), %rsi salq %cl, %rsi orq %rsi, %rdx jmp .L41 .LFE2: .size callback_receiver, .-callback_receiver .p2align 4,,15 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: .LFB3: pushq %rbp .LCFI5: leaq callback_receiver(%rip), %rax movq %rsp, %rbp .LCFI6: leave ret .LFE3: .size callback_get_receiver, .-callback_get_receiver .section .eh_frame,"a",@progbits .Lframe1: .long .LECIE1-.LSCIE1 .LSCIE1: .long 0x0 .byte 0x1 .string "zR" .uleb128 0x1 .sleb128 -8 .byte 0x10 .uleb128 0x1 .byte 0x1b .byte 0xc .uleb128 0x7 .uleb128 0x8 .byte 0x90 .uleb128 0x1 .align 8 .LECIE1: .LSFDE1: .long .LEFDE1-.LASFDE1 .LASFDE1: .long .LASFDE1-.Lframe1 .long .LFB2-. .long .LFE2-.LFB2 .uleb128 0x0 .byte 0x4 .long .LCFI0-.LFB2 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI1-.LCFI0 .byte 0xd .uleb128 0x6 .byte 0x4 .long .LCFI4-.LCFI1 .byte 0x8c .uleb128 0x4 .byte 0x8d .uleb128 0x3 .align 8 .LEFDE1: .LSFDE3: .long .LEFDE3-.LASFDE3 .LASFDE3: .long .LASFDE3-.Lframe1 .long .LFB3-. .long .LFE3-.LFB3 .uleb128 0x0 .byte 0x4 .long .LCFI5-.LFB3 .byte 0xe .uleb128 0x10 .byte 0x86 .uleb128 0x2 .byte 0x4 .long .LCFI6-.LCFI5 .byte 0xd .uleb128 0x6 .align 8 .LEFDE3: .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/vacall_r/vacall-riscv64-lp64d-macro.S0000664000000000000000000000573514662617145020446 00000000000000 .file "vacall-riscv64.c" .option pic .text .align 1 .type callback_receiver, @function callback_receiver: add sp,sp,-288 sd ra,264(sp) sd s0,256(sp) sd s1,248(sp) add s0,sp,272 sd s2,240(sp) sd a1,-192(s0) add a1,s0,16 ld t3,0(t2) sd a7,8(s0) sd a2,-184(s0) sd a3,-176(s0) sd a4,-168(s0) sd a5,-160(s0) sd a6,-152(s0) sd a7,-144(s0) fsw fa0,-132(s0) fsw fa1,-128(s0) fsw fa2,-124(s0) fsw fa3,-120(s0) fsw fa4,-116(s0) fsw fa5,-112(s0) fsw fa6,-108(s0) fsw fa7,-104(s0) fsd fa0,-96(s0) fsd fa1,-88(s0) fsd fa2,-80(s0) fsd fa3,-72(s0) fsd fa4,-64(s0) fsd fa5,-56(s0) fsd fa6,-48(s0) fsd fa7,-40(s0) sd a1,-240(s0) sd a0,-200(s0) sw zero,-264(s0) ld a0,8(t2) sd zero,-232(s0) sw zero,-224(s0) sw zero,-208(s0) sw zero,-136(s0) add a1,s0,-264 jalr t3 lw t1,-224(s0) beqz t1,.L1 li t3,1 beq t1,t3,.L25 li t3,2 beq t1,t3,.L29 li t3,3 beq t1,t3,.L25 li t3,4 beq t1,t3,.L30 li t3,5 beq t1,t3,.L31 li t3,6 beq t1,t3,.L32 li t3,7 beq t1,t3,.L33 and t3,t1,-3 li t4,8 beq t3,t4,.L27 li t4,9 beq t3,t4,.L27 li t3,12 beq t1,t3,.L34 li t3,13 beq t1,t3,.L35 li t3,14 beq t1,t3,.L27 li t3,15 bne t1,t3,.L1 lw t3,-264(s0) and t3,t3,1024 beqz t3,.L1 ld t0,-216(s0) add t3,t0,-1 bgtu t3,t1,.L1 ld t5,-232(s0) li s2,8 and t6,t5,7 add s1,t0,t6 and t5,t5,-8 sext.w t6,t6 sllw t1,s1,3 ld t4,0(t5) sll t3,t6,3 bgtu t0,s2,.L15 bgtu s1,s2,.L16 addw t1,t1,-1 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t4 sra a0,a0,t3 .L1: ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L25: lbu a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L29: lb a0,-256(s0) ld ra,264(sp) ld s0,256(sp) ld s1,248(sp) ld s2,240(sp) add sp,sp,288 jr ra .L30: lh a0,-256(s0) j .L1 .L33: lwu a0,-256(s0) j .L1 .L31: lhu a0,-256(s0) j .L1 .L27: ld a0,-256(s0) j .L1 .L32: lw a0,-256(s0) j .L1 .L34: flw fa0,-256(s0) j .L1 .L35: fld fa0,-256(s0) j .L1 .L15: li s2,16 sra t4,t4,t3 ld t0,8(t5) bleu s1,s2,.L36 li a1,-8 mulw t6,a1,t6 addw t1,t1,-129 ld a0,16(t5) li a1,2 sll a1,a1,t1 add a1,a1,-1 and a1,a1,a0 sra t3,t0,t3 addw t1,t6,64 sll a0,t0,t1 sll a1,a1,t1 or a0,a0,t4 or a1,a1,t3 j .L1 .L16: li a0,-8 mulw t6,a0,t6 addw t1,t1,-65 ld t5,8(t5) li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t5 sra t4,t4,t3 sll a0,a0,t6 or a0,a0,t4 j .L1 .L36: li a1,-4 mulw t6,a1,t6 addw t1,t1,-65 li a0,2 sll a0,a0,t1 add a0,a0,-1 and a0,a0,t0 sra a1,a0,t3 addw t1,t6,32 sll a0,a0,t1 sll a0,a0,t1 or a0,a0,t4 j .L1 .size callback_receiver, .-callback_receiver .align 1 .globl callback_get_receiver .type callback_get_receiver, @function callback_get_receiver: add sp,sp,-16 sd s0,8(sp) add s0,sp,16 ld s0,8(sp) lla a0,callback_receiver add sp,sp,16 jr ra .size callback_get_receiver, .-callback_get_receiver #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/vacall_r/get_receiver.c0000664000000000000000000000152214662613023016320 00000000000000/* Implementation of callback_get_receiver */ /* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ __vacall_r_t callback_get_receiver (void) { return (__vacall_r_t)(void*)&callback_receiver; } libffcall-2.5/callback/vacall_r/COPYING0000644000000000000000000004335713026317517014560 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/callback/callback-compat.c0000664000000000000000000000156113347755264015127 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include /* A dummy symbol, so that GNU clisp's autoconfiguration recognizes this library. */ void trampoline_r_data0 (void) { abort(); } libffcall-2.5/callback/test1.c0000664000000000000000000000257413347755267013162 00000000000000/* Trampoline test */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" /* Define __${host_cpu}__ */ #include #include #include "callback.h" #define MAGIC1 0x9db9af42 #define MAGIC2 0xa2f9d045 #define MAGIC3 0x7aff3cb4 int f (int x) { return x + MAGIC3; } void vf (void* data, va_alist alist) { if (data != (void*)MAGIC1) { printf("wrong data\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int r = f(a); va_return_int(alist, r); }} int main () { callback_t cf = alloc_callback(&vf, (void*)MAGIC1); if ((*cf)(MAGIC2) == MAGIC2+MAGIC3) { free_callback(cf); printf("Works, test1 passed.\n"); exit(0); } else { printf("Doesn't work!\n"); exit(1); } } libffcall-2.5/callback/trampoline_r/0000775000000000000000000000000014665334232014506 500000000000000libffcall-2.5/callback/trampoline_r/trampoline.c0000664000000000000000000020146214664204576016757 00000000000000/* Trampoline construction */ /* * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include "trampoline_r.h" #if defined(__hppa__) && !defined(__hppa64__) #if 0 #define __hppaold__ /* Old trampoline, real machine code. */ #else #define __hppanew__ /* New trampoline, just a closure. */ #endif #endif #if defined(__hppa64__) #if 0 #define __hppa64old__ /* Old trampoline, real machine code. */ #else #define __hppa64new__ /* New trampoline, just a closure. */ #endif #endif #if defined(__powerpc__) && !defined(__powerpc64__) #if !defined(_AIX) #define __powerpcsysv4__ /* SysV.4 ABI, real machine code. */ #else #define __powerpcaix__ /* AIX ABI, just a closure. */ #endif #endif #if defined(__powerpc64__) && !defined(__powerpc64_elfv2__) #define __powerpc64aix__ /* AIX ABI, just a closure. */ #endif #if defined(__hppanew__) || defined(__hppa64new__) /* * A function pointer is a biased pointer to a data area whose first word * (hppa) or third word (hppa64) contains the actual address of the function. */ extern void tramp_r (); /* trampoline prototype */ /* We don't need to take any special measures to make the code executable * since the actual instructions are in the text segment. */ #ifndef CODE_EXECUTABLE #define CODE_EXECUTABLE #endif #endif #if defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__) /* * A function pointer is a pointer to a data area whose first word contains * the actual address of the function. */ extern void (*tramp_r) (); /* trampoline prototype */ /* We don't need to take any special measures to make the code executable * since the actual instructions are in the text segment. */ #ifndef CODE_EXECUTABLE #define CODE_EXECUTABLE #endif #endif #ifndef CODE_EXECUTABLE /* Linux, Hurd, macOS, *BSD, IRIX, Solaris, Cygwin, native Windows */ /* How do we make the trampoline's code executable? */ #if HAVE_WORKING_MPROTECT /* Linux, Hurd, macOS, *BSD, IRIX, Solaris, Cygwin */ #if HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC > 0 /* Hurd, macOS, *BSD except HardenedBSD, IRIX, Solaris, Cygwin */ /* mprotect() [or equivalent] the malloc'ed area. */ #define EXECUTABLE_VIA_MALLOC_THEN_MPROTECT #elif HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC > 0 /* mprotect() [or equivalent] the mmap'ed area. */ #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT #elif HAVE_MMAP_SHARED_MACOS_CAN_EXEC /* macOS >= 10.4 */ #define EXECUTABLE_VIA_MMAP_SHARED_MACOS #elif HAVE_MMAP_SHARED_NETBSD_CAN_EXEC /* NetBSD >= 8.0 */ #define EXECUTABLE_VIA_MMAP_SHARED_NETBSD #elif HAVE_MMAP_SHARED_MEMFD_CAN_EXEC /* Linux >= 3.17, FreeBSD >= 13.0 */ #define EXECUTABLE_VIA_MMAP_SHARED_MEMFD #elif defined __ANDROID__ && HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC < 0 /* Linux */ /* On Android, SELinux is controlling what is allowed, see . Using memfd_create() might violate the Android API level. Using malloc()/mmap() then mprotect PROT_WRITE|PROT_EXEC might be blocked by SELinux. Using a temporary file with separate memory mappings would depend on finding an appropriate writable directory. It's a dilemma. Let's hope that mmap() then mprotect works. */ #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT #elif HAVE_MMAP_SHARED_POSIX_CAN_EXEC /* Linux, HardenedBSD */ #define EXECUTABLE_VIA_MMAP_SHARED_POSIX #else #error "Don't know how to make memory pages executable." #endif #else /* native Windows, very old Linux */ #if HAVE_MMAP_ANONYMOUS /* very old Linux */ /* Use an mmap'ed page. */ #define EXECUTABLE_VIA_MMAP #else #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */ #define EXECUTABLE_VIA_VIRTUALALLOC #else ?? #endif #endif #endif #endif #include /* declares fprintf() */ #include #include /* declares abort(), malloc(), free() */ #ifdef HAVE_UNISTD_H #include /* declares getpagesize() */ #endif /* Define intptr_t, uintptr_t. */ #include /* Declare getpagesize(). */ /* On HP-UX, getpagesize exists, but it is not declared in even if the compiler options -D_HPUX_SOURCE -D_XOPEN_SOURCE=600 are used. */ #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mprotect(). */ #if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) #include #include #endif /* Declare mmap() and, if present, mremap() or memfd_create(). */ #if defined(EXECUTABLE_VIA_MMAP) || defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) #include #include #endif /* Declare mach_vm_remap. */ #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) #include /* Declaring it ourselves is easier than including . */ extern #ifdef __cplusplus "C" #endif kern_return_t mach_vm_remap (vm_map_t target_task, mach_vm_address_t *target_address, /* in/out */ mach_vm_size_t size, mach_vm_offset_t mask, int flags, vm_map_t src_task, mach_vm_address_t src_address, boolean_t copy, vm_prot_t *cur_protection, /* out */ vm_prot_t *max_protection, /* out */ vm_inherit_t inheritance); #endif #if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Declare open(). */ # include # include # include /* For finding an appropriate location for the temporary file. */ # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) # include # include # include # endif # if defined(__OpenBSD__) # include # include # endif # include #endif /* Declare VirtualAlloc(), GetSystemInfo. */ #ifdef EXECUTABLE_VIA_VIRTUALALLOC #define WIN32_LEAN_AND_MEAN #define WIN32_EXTRA_LEAN #include #endif /* Some old mmap() implementations require the flag MAP_VARIABLE whenever you pass an addr == NULL. */ #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif /* Support for instruction cache flush. */ #if defined _WIN32 && !defined __CYGWIN__ # define WIN32_LEAN_AND_MEAN # define WIN32_EXTRA_LEAN # include #elif defined __APPLE__ && defined __MACH__ # include #elif defined _AIX # include #elif defined __sgi # include #else #ifdef __i386__ #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */ #define WIN32_LEAN_AND_MEAN #define WIN32_EXTRA_LEAN #include #endif #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__riscv32__) || defined(__riscv64__) #ifdef HAVE_SYS_CACHECTL_H /* IRIX, Linux */ #include #if defined(__riscv64__) && !defined(__GLIBC__) /* musl libc lacks a declaration of this function. */ extern int __riscv_flush_icache (void *start, void *end, unsigned long flags); #endif #else #ifdef __OpenBSD__ #include #endif #endif #endif /* Inline assembly function for instruction cache flush. */ #if defined(__sparc__) || defined(__sparc64__) extern void __TR_clear_cache_2 (char* first_addr, char* last_addr); #endif #if defined(__alpha__) extern void __TR_clear_cache (void); #endif #if defined(__hppaold__) || defined(__hppa64old__) extern void __TR_clear_cache (char* first_addr, char* last_addr); #endif #if defined(__powerpcsysv4__) || defined(__powerpc64_elfv2__) extern void __TR_clear_cache_2 (char* first_addr); #endif #endif /* Support for multithread-safe coding. */ #include "glthread/lock.h" #if defined(__APPLE__) && defined(__MACH__) /* only needed on macOS */ #define KEEP_TEMP_FILE_VISIBLE /* Support for temporary files that are cleaned up automatically. */ #include "clean-temp-simple.h" #endif /* Support for testing the protection of a memory range. */ #include "vma-prot.h" #if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Opens a file descriptor and attempts to make it non-inheritable. */ static int open_noinherit (const char *filename, int flags, int mode) { # if O_CLOEXEC return open (filename, flags | O_CLOEXEC, mode); # else int fd = open (filename, flags, mode); # ifdef F_SETFD if (fd >= 0) { int flags = fcntl (fd, F_GETFD, 0); if (flags >= 0) fcntl (fd, F_SETFD, flags | FD_CLOEXEC); } # endif return fd; # endif } /* Finding an appropriate location for the temporary file. */ # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) static int is_usable_mount(const struct statfs *fsp, const char *dir) { unsigned int fs_type = fsp->f_type; if (fs_type == 0xef53 /* ext2, ext3, ext4 */ || fs_type == 0x58465342 /* xfs */ || fs_type == 0x3153464a /* IBM jfs */ || fs_type == 0x9123683e /* btrfs */ || fs_type == 0x4d44 /* vfat */ || fs_type == 0x2011bab0 /* exfat */ || fs_type == 0x00011954 || fs_type == 0x19540119 /* BSD ufs */ || fs_type == 0x858458f6 /* ramfs */ || fs_type == 0x01021994 /* tmpfs */) /* A local, possibly writable file system. */ /* Older Linux (glibc < 2.13) has no f_flags in 'struct statfs'. */ # if !(__GLIBC__ == 2 && __GLIBC_MINOR__ < 13) if ((fsp->f_flags & (ST_RDONLY | ST_NOEXEC)) == 0) # endif /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } static int is_usable_mntent(const struct mntent *me, const char *dir) { const char *me_type = me->mnt_type; if (strcmp (me_type, "ext2") == 0 /* ext2 */ || strcmp (me_type, "ext3") == 0 /* ext3 */ || strcmp (me_type, "ext4") == 0 /* ext4 */ || strcmp (me_type, "xfs") == 0 /* xfs */ || strcmp (me_type, "jfs") == 0 /* IBM jfs */ || strcmp (me_type, "btrfs") == 0 /* btrfs */ || strcmp (me_type, "vfat") == 0 /* vfat */ || strcmp (me_type, "exfat") == 0 /* exfat */ || strcmp (me_type, "ufs") == 0 /* BSD ufs */ || strcmp (me_type, "ramfs") == 0 /* ramfs */ || strcmp (me_type, "tmpfs") == 0 /* tmpfs */) //? /* A local, possibly writable file system. */ if (!hasmntopt (me, "ro") && !hasmntopt (me, "noexec")) /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } # endif # if defined(__OpenBSD__) static int is_usable_mount(const struct statfs *fsp, const char *dir) { const char *fs_type = fsp->f_fstypename; /* For the full list of file systems, look at /usr/share/man/man8/mount_*. */ if (strcmp (fs_type, "ffs") == 0 || strcmp (fs_type, "tmpfs") == 0 || strcmp (fs_type, "ext2fs") == 0 || strcmp (fs_type, "ntfs") == 0 || strcmp (fs_type, "msdos") == 0) /* This should imply (fsp->f_flags & MNT_LOCAL) != 0. */ /* A local, possibly writable file system. */ if ((fsp->f_flags & (MNT_RDONLY | MNT_NOEXEC)) == 0) /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } # endif # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) || defined(__OpenBSD__) /* Return the name of some directory, hopefully - with rwx permissions for the current user, - on a local (not network-backed) file system, - without mount options that prevent PROT_EXEC mappings. */ static const char * local_rwx_tmp_dir (void) { { /* Try /tmp first. */ const char *dir = "/tmp"; struct statfs fs; if (statfs (dir, &fs) == 0 && is_usable_mount (&fs, dir)) /* This directory should work. */ return dir; } # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) { FILE *fp = setmntent (MOUNTED, "r"); if (fp != NULL) { struct mntent mntent_buf; char buf[1000]; struct mntent *me; while ((me = getmntent_r (fp, &mntent_buf, buf, sizeof (buf))) != NULL) { const char *dir = me->mnt_dir; if (is_usable_mntent (me, dir)) { /* This directory should work. */ dir = strdup (dir); if (dir != NULL) { endmntent (fp); return dir; } } } endmntent (fp); } } # endif # if defined(__OpenBSD__) { struct statfs *fsp; int entries = getmntinfo (&fsp, MNT_NOWAIT); if (entries >= 0) for (; entries-- > 0; fsp++) { const char *dir = fsp->f_mntonname; if (is_usable_mount (fsp, dir)) { /* This directory should work. */ dir = strdup (dir); if (dir != NULL) return dir; } } } # endif { /* Try $TMPDIR last. */ const char *dir = getenv("TMPDIR"); if (dir != NULL && dir[0] == '/') { struct statfs fs; if (statfs (dir, &fs) == 0 && is_usable_mount (&fs, dir)) /* This directory should work. */ return dir; } } /* This will probably not work... */ return "/tmp"; } # endif #endif /* Length and alignment of trampoline */ #ifdef __i386__ #define TRAMP_LENGTH 12 #define TRAMP_ALIGN 16 /* 4 for a i386, 16 for a i486 */ #endif #ifdef __m68k__ #define TRAMP_LENGTH 14 #define TRAMP_ALIGN 16 #endif #if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__) #define TRAMP_LENGTH 24 #define TRAMP_ALIGN 4 #endif #ifdef __mips64old__ #define TRAMP_LENGTH 56 #define TRAMP_ALIGN 4 #endif #ifdef __mips64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #if defined(__sparc__) && !defined(__sparc64__) #define TRAMP_LENGTH 16 #define TRAMP_ALIGN 16 #endif #ifdef __sparc64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 16 #endif #ifdef __alpha__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifdef __hppaold__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 16 #endif #ifdef __hppanew__ #define TRAMP_LENGTH 16 #define TRAMP_ALIGN 16 #define TRAMP_BIAS 2 #endif #ifdef __hppa64old__ #define TRAMP_LENGTH 80 #define TRAMP_ALIGN 8 #define TRAMP_BIAS 48 #endif #ifdef __hppa64new__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #if defined(__arm__) || defined(__armhf__) #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 4 #endif #ifdef __arm64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifdef __powerpcsysv4__ #define TRAMP_LENGTH 24 #define TRAMP_ALIGN 4 #endif #ifdef __powerpcaix__ #define TRAMP_LENGTH 20 #define TRAMP_ALIGN 4 #endif #ifdef __powerpc64_elfv2__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifdef __powerpc64aix__ #define TRAMP_LENGTH 40 #define TRAMP_ALIGN 8 #endif #ifdef __ia64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 16 #endif #ifdef __x86_64__ #ifdef __x86_64_x32__ #define TRAMP_LENGTH 13 #define TRAMP_ALIGN 4 #else #define TRAMP_LENGTH 22 #define TRAMP_ALIGN 16 #endif #endif #if defined(__s390__) && !defined(__s390x__) #define TRAMP_LENGTH 20 #define TRAMP_ALIGN 4 #endif #ifdef __s390x__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifdef __riscv32__ #define TRAMP_LENGTH 24 #define TRAMP_ALIGN 4 #endif #ifdef __riscv64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifdef __loongarch64__ #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 8 #endif #ifndef TRAMP_BIAS #define TRAMP_BIAS 0 #endif #define TRAMP_TOTAL_LENGTH (TRAMP_LENGTH + 2*sizeof(void*)) #if !defined(CODE_EXECUTABLE) static long pagesize = 0; #endif #if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX)) /* Variables needed for obtaining memory pages via mmap(). */ static int file_fd; static long file_length; /* Initialization of these variables. */ static void for_mmap_init (void) { #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) { char filename[100]; sprintf(filename, "trampdata-%d-%ld", getpid (), random ()); file_fd = memfd_create (filename, MFD_CLOEXEC); if (file_fd < 0) { fprintf(stderr,"trampoline: Cannot allocate RAM at %s!\n",filename); abort(); } } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) { # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) || defined(__OpenBSD__) const char *tmpdir = local_rwx_tmp_dir(); # else const char *tmpdir = "/tmp"; # endif int pid = getpid (); long int r = random (); /* The sprintf below may produce up to 11 bytes for %d and up to 21 bytes for %ld. */ char *filename = (char *) malloc (strlen(tmpdir)+1+10+11+1+21+1); if (filename == NULL) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } sprintf(filename, "%s/trampdata-%d-%ld", tmpdir, pid, r); #if defined(KEEP_TEMP_FILE_VISIBLE) if (register_temporary_file(filename) < 0) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } #endif file_fd = open_noinherit (filename, O_CREAT | O_RDWR | O_TRUNC, 0700); if (file_fd < 0) { #if defined(KEEP_TEMP_FILE_VISIBLE) unregister_temporary_file(filename); #endif fprintf(stderr,"trampoline: Cannot open %s!\n",filename); abort(); } #if !defined(KEEP_TEMP_FILE_VISIBLE) /* Remove the file from the file system as soon as possible, to make sure there is no leftover after this process terminates or crashes. On macOS 11.2, this does not work: It would make the mmap call below, with arguments PROT_READ|PROT_EXEC and MAP_SHARED, fail. */ unlink(filename); #endif } #endif file_length = 0; } /* Once-only initializer for these variables. */ gl_once_define(static, for_mmap_once) #endif #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) /* AIX doesn't support mprotect() in malloc'ed memory. Must get pages of * memory with execute permission via mmap(). Then keep a free list of * free trampolines. */ static char* freelist = NULL; /* Lock that protects the freelist from simultaneous access from multiple threads. */ gl_lock_define_initialized(static, freelist_lock) #endif __TR_function alloc_trampoline_r (__TR_function address, void* data0, void* data1) { char* function; char* function_x; char* data; #if !defined(CODE_EXECUTABLE) /* First, get the page size once and for all. */ if (!pagesize) { #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Use a once-only initializer here, since simultaneous execution of for_mmap_init() in multiple threads must be avoided. */ gl_once (for_mmap_once, for_mmap_init); #endif /* Simultaneous execution of this initialization in multiple threads is OK. */ #if defined(EXECUTABLE_VIA_VIRTUALALLOC) /* GetSystemInfo */ SYSTEM_INFO info; GetSystemInfo(&info); pagesize = info.dwPageSize; #else pagesize = getpagesize(); #endif } #endif /* 1. Allocate room */ #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) gl_lock_lock(freelist_lock); if (freelist == NULL) { /* Get a new page. */ char* page; char* page_end; #ifdef EXECUTABLE_VIA_VIRTUALALLOC /* VirtualAlloc */ page = VirtualAlloc(NULL,pagesize,MEM_COMMIT,PAGE_EXECUTE_READWRITE); if (page == NULL) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_end = page + pagesize; #else #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) char* page_x; #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) /* Allocate one more page. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_PRIVATE|MAP_ANON,-1,0); if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } { vm_map_t self = mach_task_self (); mach_vm_address_t target_address = 0; vm_prot_t cur_prot; vm_prot_t max_prot; kern_return_t ret = mach_vm_remap (self, &target_address, pagesize, 0, VM_FLAGS_ANYWHERE, self, (mach_vm_address_t) (unsigned long) page, FALSE, &cur_prot, &max_prot, VM_INHERIT_NONE); if (ret != KERN_SUCCESS) { fprintf(stderr,"trampoline: mach_vm_remap failed!\n"); abort(); } page_x = (char *) (unsigned long) target_address; } if (mprotect(page_x,pagesize,PROT_READ|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: mprotect after mach_vm_remap failed!\n"); abort(); } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) /* Allocate one more page. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE|PROT_MPROTECT(PROT_READ|PROT_WRITE|PROT_EXEC),MAP_PRIVATE|MAP_ANON,-1,0); if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_x = (char*)mremap(page,pagesize,NULL,pagesize,MAP_REMAPDUP); if (page_x == (char*)(-1)) { fprintf(stderr,"trampoline: mremap failed!\n"); abort(); } if (mprotect(page_x,pagesize,PROT_READ|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: mprotect after mremap failed!\n"); abort(); } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Extend the file by one page. */ long new_file_length = file_length + pagesize; if (ftruncate(file_fd,new_file_length) < 0) { fprintf(stderr,"trampoline: Cannot extend backing file!\n"); abort(); } /* Create separate mappings for writing and for executing. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_SHARED,file_fd,file_length); page_x = (char*)mmap(NULL,pagesize,PROT_READ|PROT_EXEC,MAP_SHARED,file_fd,file_length); if (page == (char*)(-1) || page_x == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } file_length = new_file_length; #endif page_end = page + pagesize; /* Link the two pages together. */ ((intptr_t*)page)[0] = page_x - page; page = (char*)(((uintptr_t)page + sizeof(intptr_t) + TRAMP_ALIGN-1) & -TRAMP_ALIGN); #else #ifdef EXECUTABLE_VIA_MMAP_THEN_MPROTECT /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */ page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #endif #ifdef EXECUTABLE_VIA_MMAP /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */ page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #endif if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_end = page + pagesize; #endif #endif /* Fill it with free trampolines. */ { char** last = &freelist; while (page+TRAMP_TOTAL_LENGTH <= page_end) { *last = page; last = (char**)page; page = (char*)(((uintptr_t)page + TRAMP_TOTAL_LENGTH + TRAMP_ALIGN-1) & -TRAMP_ALIGN); } *last = NULL; } } function = freelist; freelist = *(char**)freelist; gl_lock_unlock(freelist_lock); #else { char* room = (char*) malloc(sizeof(void*) + TRAMP_TOTAL_LENGTH + TRAMP_ALIGN-1); if (!room) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } function = (char*)(((uintptr_t)room + sizeof(void*) + TRAMP_ALIGN-1) & -TRAMP_ALIGN); ((char**)function)[-1] = room; /* backpointer for free_trampoline() */ } #endif /* Set memory protection to "executable". */ #if !defined(CODE_EXECUTABLE) #if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT) /* Call mprotect on the pages that contain the range. */ { uintptr_t start_addr = (uintptr_t) function; uintptr_t end_addr = (uintptr_t) (function + TRAMP_LENGTH); start_addr = start_addr & -pagesize; end_addr = (end_addr + pagesize-1) & -pagesize; {uintptr_t len = end_addr - start_addr; if (mprotect((void*)start_addr, len, PROT_READ|PROT_WRITE|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: cannot make memory executable\n"); abort(); } }} #endif #endif #if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX)) /* Find the executable address corresponding to the writable address. */ { uintptr_t page = (uintptr_t) function & -(intptr_t)pagesize; function_x = function + ((intptr_t*)page)[0]; } #else function_x = function; #endif /* 2. Fill out the trampoline */ data = function + TRAMP_LENGTH; /* Knowing that data = function + TRAMP_LENGTH, we could certainly optimize * the trampolines a little bit more, using PC relative addressing modes. * But I doubt it's really worth it. */ #ifdef __i386__ /* function: * movl $,%ecx B9 * jmp

E9
- * here: * nop 90 * nop 90 */ *(char *) (function + 0) = 0xB9; *(long *) (function + 1) = (long) data; *(char *) (function + 5) = 0xE9; *(long *) (function + 6) = (long) address - (long) (function_x + 10); *(short *) (function +10) = 0x9090; /* nop nop, for alignment */ #define is_tramp(function) \ *(unsigned char *) (function + 0) == 0xB9 && \ *(unsigned char *) (function + 5) == 0xE9 #define tramp_address(function) \ *(long *) (function + 6) + (long) (function + 10) #define tramp_data(function) \ *(long *) (function + 1) #endif #ifdef __m68k__ /* function: * movel #,a0 20 7C * jmp
4E F9
* nop 4E 71 */ *(short *) (function + 0) = 0x207C; *(long *) (function + 2) = (long) data; *(short *) (function + 6) = 0x4EF9; *(long *) (function + 8) = (long) address; *(short *) (function +12) = 0x4E71; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x207C && \ *(unsigned short *) (function + 6) == 0x4EF9 && \ *(unsigned short *) (function +12) == 0x4E71 #define tramp_address(function) \ *(long *) (function + 8) #define tramp_data(function) \ *(long *) (function + 2) #endif #if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__) /* function: * lw $2,16($25) 8F 22 00 10 * lw $25,20($25) 8F 39 00 14 * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 * .word * .word
*/ *(unsigned int *) (function + 0) = 0x8F220010; *(unsigned int *) (function + 4) = 0x8F390014; *(unsigned int *) (function + 8) = 0x03200009; *(unsigned int *) (function +12) = 0x00000000; *(unsigned int *) (function +16) = (unsigned int) data; *(unsigned int *) (function +20) = (unsigned int) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x8F220010 && \ *(unsigned int *) (function + 4) == 0x8F390014 && \ *(unsigned int *) (function + 8) == 0x03200009 && \ *(unsigned int *) (function +12) == 0x00000000 #define tramp_address(function) \ *(unsigned int *) (function +20) #define tramp_data(function) \ *(unsigned int *) (function +16) #endif #ifdef __mips64old__ /* function: * dli $2, 3C 02 hi16(hi32()) * 34 42 lo16(hi32()) * 00 02 14 38 * 34 42 hi16(lo32()) * 00 02 14 38 * 34 42 lo16(lo32()) * dli $25,
3C 19 hi16(hi32(
)) * 37 39 lo16(hi32(
)) * 00 19 CC 38 * 37 39 hi16(lo32(
)) * 00 19 CC 38 * 37 39 lo16(lo32(
)) * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 */ /* What about big endian / little endian ?? */ *(short *) (function + 0) = 0x3C02; *(short *) (function + 2) = (unsigned long) data >> 48; *(short *) (function + 4) = 0x3442; *(short *) (function + 6) = ((unsigned long) data >> 32) & 0xffff; *(int *) (function + 8) = 0x00021438; *(short *) (function +12) = 0x3442; *(short *) (function +14) = ((unsigned long) data >> 16) & 0xffff; *(int *) (function +16) = 0x00021438; *(short *) (function +20) = 0x3442; *(short *) (function +22) = (unsigned long) data & 0xffff; *(short *) (function +24) = 0x3C19; *(short *) (function +26) = (unsigned long) address >> 48; *(short *) (function +28) = 0x3739; *(short *) (function +30) = ((unsigned long) address >> 32) & 0xffff; *(int *) (function +32) = 0x0019CC38; *(short *) (function +36) = 0x3739; *(short *) (function +38) = ((unsigned long) address >> 16) & 0xffff; *(int *) (function +40) = 0x0019CC38; *(short *) (function +44) = 0x3739; *(short *) (function +46) = (unsigned long) address & 0xffff; *(int *) (function +48) = 0x03200009; *(int *) (function +52) = 0x00000000; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x3C02 && \ *(unsigned short *) (function + 4) == 0x3442 && \ *(unsigned int *) (function + 8) == 0x00021438 && \ *(unsigned short *) (function +12) == 0x3442 && \ *(unsigned int *) (function +16) == 0x00021438 && \ *(unsigned short *) (function +20) == 0x3442 && \ *(unsigned short *) (function +24) == 0x3C19 && \ *(unsigned short *) (function +28) == 0x3739 && \ *(unsigned int *) (function +32) == 0x0019CC38 && \ *(unsigned short *) (function +36) == 0x3739 && \ *(unsigned int *) (function +40) == 0x0019CC38 && \ *(unsigned short *) (function +44) == 0x3739 && \ *(unsigned int *) (function +48) == 0x03200009 && \ *(unsigned int *) (function +52) == 0x00000000 #define hilo(word3,word2,word1,word0) \ (((unsigned long) (word3) << 48) | ((unsigned long) (word2) << 32) | \ ((unsigned long) (word1) << 16) | (unsigned long) (word0)) #define tramp_address(function) \ hilo(*(unsigned short *) (function +26), \ *(unsigned short *) (function +30), \ *(unsigned short *) (function +38), \ *(unsigned short *) (function +46)) #define tramp_data(function) \ hilo(*(unsigned short *) (function + 2), \ *(unsigned short *) (function + 6), \ *(unsigned short *) (function +14), \ *(unsigned short *) (function +22)) #endif #ifdef __mips64__ /* function: * ld $2,16($25) DF 22 00 10 * ld $25,24($25) DF 39 00 18 * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 * .dword * .dword
*/ *(unsigned int *) (function + 0) = 0xDF220010; *(unsigned int *) (function + 4) = 0xDF390018; *(unsigned int *) (function + 8) = 0x03200009; *(unsigned int *) (function +12) = 0x00000000; *(unsigned long *) (function +16) = (unsigned long) data; *(unsigned long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xDF220010 && \ *(unsigned int *) (function + 4) == 0xDF390018 && \ *(unsigned int *) (function + 8) == 0x03200009 && \ *(unsigned int *) (function +12) == 0x00000000 #define tramp_address(function) \ *(unsigned long *) (function +24) #define tramp_data(function) \ *(unsigned long *) (function +16) #endif #if defined(__sparc__) && !defined(__sparc64__) /* function: * sethi %hi(),%g2 05000000 | ( >> 10) * sethi %hi(
),%g1 03000000 | (
>> 10) * jmp %g1+%lo(
) 81C06000 | (
& 0x3ff) * or %g2,%lo(),%g2 8410A000 | ( & 0x3ff) */ #define hi(word) ((unsigned long) (word) >> 10) #define lo(word) ((unsigned long) (word) & 0x3ff) *(long *) (function + 0) = 0x05000000 | hi(data); *(long *) (function + 4) = 0x03000000 | hi(address); *(long *) (function + 8) = 0x81C06000 | lo(address); *(long *) (function +12) = 0x8410A000 | lo(data); #define is_tramp(function) \ (*(long *) (function + 0) & 0xffc00000) == 0x05000000 && \ (*(long *) (function + 4) & 0xffc00000) == 0x03000000 && \ (*(long *) (function + 8) & 0xfffffc00) == 0x81C06000 && \ (*(long *) (function +12) & 0xfffffc00) == 0x8410A000 #define hilo(hiword,loword) (((hiword) << 10) | ((loword) & 0x3ff)) #define tramp_address(function) \ hilo(*(long *) (function + 4), *(long *) (function + 8)) #define tramp_data(function) \ hilo(*(long *) (function + 0), *(long *) (function +12)) #endif #ifdef __sparc64__ /* function: * rd %pc,%g1 83414000 * ldx [%g1+24],%g2 C4586018 * jmp %g2 81C08000 * ldx [%g1+16],%g5 CA586010 * .long high32() >> 32 * .long low32() & 0xffffffff * .long high32(
)
>> 32 * .long low32(
)
& 0xffffffff */ *(int *) (function + 0) = 0x83414000; *(int *) (function + 4) = 0xC4586018; *(int *) (function + 8) = 0x81C08000; *(int *) (function +12) = 0xCA586010; *(long *) (function +16) = (long) data; *(long *) (function +24) = (long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(int *) (function + 0) == 0x83414000 && \ *(int *) (function + 4) == 0xC4586018 && \ *(int *) (function + 8) == 0x81C08000 && \ *(int *) (function +12) == 0xCA586010 #define tramp_address(function) \ *(long *) (function +24) #define tramp_data(function) \ *(long *) (function +16) #endif #ifdef __alpha__ /* function: * br $1,function..ng 00 00 20 C0 * function..ng: * ldq $27,20($1) 14 00 61 A7 * ldq $1,12($1) 0C 00 21 A4 * jmp $31,($27),0 00 00 FB 6B * .quad * .quad
*/ { static int code [4] = { 0xC0200000, 0xA7610014, 0xA421000C, 0x6BFB0000 }; int i; for (i=0; i<4; i++) { ((int *) function)[i] = code[i]; } ((long *) function)[2] = (long) data; ((long *) function)[3] = (long) address; } #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ ((int *) function)[0] == 0xC0200000 && \ ((int *) function)[1] == 0xA7610014 && \ ((int *) function)[2] == 0xA421000C && \ ((int *) function)[3] == 0x6BFB0000 #define tramp_address(function) \ ((long *) function)[3] #define tramp_data(function) \ ((long *) function)[2] #endif #ifdef __hppaold__ /* function: * ldil L',%r29 23A00000 | hi() * ldil L'
,%r21 22A00000 | hi(
) * ldo R'(%r29),%r29 37BD0000 | lo() * ldo R'
(%r21),%r21 36B50000 | lo(
) * bb,>=,n %r21,30,function2 C7D5C012 * depi 0,31,2,%r21 D6A01C1E * ldw 4(0,%r21),%r19 4AB30008 * ldw 0(0,%r21),%r21 4AB50000 * function2: * ldsid (0,%r21),%r1 02A010A1 * mtsp %r1,%sr0 00011820 * be,n 0(%sr0,%r21) E2A00002 * nop 08000240 */ /* When decoding a 21-bit argument in an instruction, the hppa performs * the following bit manipulation: * assemble21: x[20]...x[0] * --> x[0] x[11]...x[1] x[15]..x[14] x[20]...x[16] x[13]..x[12] * When encoding a 21-bit argument into an instruction, we need the * to perform the reverse permutation: * permute21: y[20]...y[0] * --> y[6]...y[2] y[8]..y[7] y[1]..y[0] y[19]...y[9] y[20] */ #define assemble21(x) \ ((((x) & 0x1) << 20) | (((x) & 0xFFE) << 8) | \ (((x) & 0xC000) >> 7) | (((x) & 0x1F0000) >> 14) | (((x) & 0x3000) >> 12)) #define permute21(y) \ ((((y) & 0x7C) << 14) | (((y) & 0x180) << 7) | (((y) & 0x3) << 12) | \ (((y) & 0xFFE00) >> 8) | (((y) & 0x100000) >> 20)) #define hi(word) permute21((unsigned long) (word) >> 11) #define lo(word) (((unsigned long) (word) & 0x7FF) << 1) *(long *) (function + 0) = 0x23A00000 | hi(data); *(long *) (function + 4) = 0x22A00000 | hi(address); *(long *) (function + 8) = 0x37BD0000 | lo(data); *(long *) (function +12) = 0x36B50000 | lo(address); *(long *) (function +16) = 0xC7D5C012; *(long *) (function +20) = 0xD6A01C1E; *(long *) (function +24) = 0x4AB30008; *(long *) (function +28) = 0x4AB50000; *(long *) (function +32) = 0x02A010A1; *(long *) (function +36) = 0x00011820; *(long *) (function +40) = 0xE2A00002; *(long *) (function +44) = 0x08000240; #define is_tramp(function) \ ((long) function & 3) == 0 && \ (*(long *) (function + 0) & 0xffe00000) == 0x23A00000 && \ (*(long *) (function + 4) & 0xffe00000) == 0x22A00000 && \ (*(long *) (function + 8) & 0xfffff000) == 0x37BD0000 && \ (*(long *) (function +12) & 0xfffff000) == 0x36B50000 && \ *(long *) (function +16) == 0xC7D5C012 && \ *(long *) (function +20) == 0xD6A01C1E && \ *(long *) (function +24) == 0x4AB30008 && \ *(long *) (function +28) == 0x4AB50000 && \ *(long *) (function +32) == 0x02A010A1 && \ *(long *) (function +36) == 0x00011820 && \ *(long *) (function +40) == 0xE2A00002 && \ *(long *) (function +44) == 0x08000240 #define hilo(hiword,loword) \ ((assemble21((unsigned long) (hiword)) << 11) | \ (((unsigned long) (loword) & 0xFFE) >> 1) \ ) #define tramp_address(function) \ hilo(*(long *) (function + 4), *(long *) (function +12)) #define tramp_data(function) \ hilo(*(long *) (function + 0), *(long *) (function + 8)) #endif #ifdef __hppanew__ /* function: * .long tramp_r * .long closure * closure: * .long * .long
*/ { /* The 'volatile' below works around GCC bug . */ void* volatile tramp_r_address = &tramp_r; *(long *) (function + 0) = ((long *) ((char*)tramp_r_address-2))[0]; *(long *) (function + 4) = (long) (function + 8); *(long *) (function + 8) = (long) data; *(long *) (function +12) = (long) address; } #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) ((char*)tramp_r_address-2))[0] #define tramp_address(function) \ ((long *) function)[3] #define tramp_data(function) \ ((long *) function)[2] #endif #ifdef __hppa64old__ /* function: * mfia %r27 000014BB * ldd 32(%r27),%r31 537F0040 * ldd 40(%r27),%r27 537B0050 * ldd 16(%r27),%r1 53610020 * ldd 24(%r27),%r27 537B0030 * bve (%r1) E820D000 * nop 08000240 * .align 8 * .dword * .dword
* function_pointer: * .dword 0 * .dword 0 * .dword function * .dword 0 */ *(int *) (function + 0) = 0x000014BB; *(int *) (function + 4) = 0x537F0040; *(int *) (function + 8) = 0x537B0050; *(int *) (function +12) = 0x53610020; *(int *) (function +16) = 0x537B0030; *(int *) (function +20) = 0xE820D000; *(int *) (function +24) = 0x08000240; *(long *) (function +32) = (long)data; *(long *) (function +40) = (long)address; *(long *) (function +48) = (long)0; *(long *) (function +56) = (long)0; *(long *) (function +64) = (long)function; *(long *) (function +72) = (long)0; #define TRAMP_CODE_LENGTH 28 #define is_tramp(function) \ *(int *) (function + 0) == 0x000014BB && \ *(int *) (function + 4) == 0x537F0040 && \ *(int *) (function + 8) == 0x537B0050 && \ *(int *) (function +12) == 0x53610020 && \ *(int *) (function +16) == 0x537B0030 && \ *(int *) (function +20) == 0xE820D000 && \ *(int *) (function +24) == 0x08000240 #define tramp_address(function) \ (*(unsigned long *) (function +40)) #define tramp_data(function) \ (*(unsigned long *) (function +32)) #endif #ifdef __hppa64new__ /* function: * .dword 0 * .dword 0 * .dword tramp * .dword closure * closure: * .dword * .dword
*/ *(long *) (function + 0) = 0; *(long *) (function + 8) = 0; *(long *) (function +16) = ((long *) (void*) &tramp_r)[2]; *(long *) (function +24) = (long) (function + 32); *(long *) (function +32) = (long) data; *(long *) (function +40) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[2] == ((long *) (void*) &tramp_r)[2] && \ ((long *) function)[3] == (long) (function + 32) #define tramp_address(function) \ ((long *) function)[5] #define tramp_data(function) \ ((long *) function)[4] #endif #if defined(__arm__) || defined(__armhf__) /* function: * mov ip,sp E1A0C00D * stmdb sp!,{r0,r1,r2,r3} E92D000F * stmfd sp!,{fp,ip,lr,pc} E92DD800 * sub fp,ip,#20 E24CB014 * sub sp,sp,#8 E24DD008 * ldr ip,[pc,#12] E59FC00C @ Get * str ip,[sp,#0] E58DC000 @ Put on stack * mov lr,pc E1A0E00F @ Prepare call (put return address in lr) * ldr pc,[pc,#4] E59FF004 @ Call
with the same args in registers * ldmea fp,{fp,sp,pc} E91BA800 @ Restore fp and sp, and return to return address. * _data: * .word * _address: * .word
*/ { ((long *) function)[0] = 0xE1A0C00D; ((long *) function)[1] = 0xE92D000F; ((long *) function)[2] = 0xE92DD800; ((long *) function)[3] = 0xE24CB014; ((long *) function)[4] = 0xE24DD008; ((long *) function)[5] = 0xE59FC00C; ((long *) function)[6] = 0xE58DC000; ((long *) function)[7] = 0xE1A0E00F; ((long *) function)[8] = 0xE59FF004; ((long *) function)[9] = 0xE91BA800; ((long *) function)[10] = (long) data; ((long *) function)[11] = (long) address; } #define TRAMP_CODE_LENGTH 40 #define is_tramp(function) \ ((long *) function)[0] == 0xE1A0C00D && \ ((long *) function)[1] == 0xE92D000F && \ ((long *) function)[2] == 0xE92DD800 && \ ((long *) function)[3] == 0xE24CB014 && \ ((long *) function)[4] == 0xE24DD008 && \ ((long *) function)[5] == 0xE59FC00C && \ ((long *) function)[6] == 0xE58DC000 && \ ((long *) function)[7] == 0xE1A0E00F && \ ((long *) function)[8] == 0xE59FF004 && \ ((long *) function)[9] == 0xE91BA800 #define tramp_address(function) \ ((long *) function)[11] #define tramp_data(function) \ ((long *) function)[10] #endif #ifdef __arm64__ /* function: * ldr x17,.+24 580000D1 * ldr x18,.+12 58000072 * br x17 D61F0220 * nop D503201F * .xword * .xword
*/ *(int *) (function + 0) = 0x580000D1; *(int *) (function + 4) = 0x58000072; *(int *) (function + 8) = 0xD61F0220; *(int *) (function +12) = 0xD503201F; *(long *) (function +16) = (unsigned long) data; *(long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x580000D1 && \ *(unsigned int *) (function + 4) == 0x58000072 && \ *(unsigned int *) (function + 8) == 0xD61F0220 && \ *(unsigned int *) (function +12) == 0xD503201F #define tramp_address(function) \ (*(unsigned long *) (function +24)) #define tramp_data(function) \ (*(unsigned long *) (function +16)) #endif #ifdef __powerpcsysv4__ /* function: * {liu|lis} 11,hi16() 3D 60 hi16() * {oril|ori} 11,11,lo16() 61 6B lo16() * {liu|lis} 0,hi16(
) 3C 00 hi16(
) * {oril|ori} 0,0,lo16(
) 60 00 lo16(
) * mtctr 0 7C 09 03 A6 * bctr 4E 80 04 20 */ *(short *) (function + 0) = 0x3D60; *(short *) (function + 2) = (unsigned long) data >> 16; *(short *) (function + 4) = 0x616B; *(short *) (function + 6) = (unsigned long) data & 0xffff; *(short *) (function + 8) = 0x3C00; *(short *) (function +10) = (unsigned long) address >> 16; *(short *) (function +12) = 0x6000; *(short *) (function +14) = (unsigned long) address & 0xffff; *(long *) (function +16) = 0x7C0903A6; *(long *) (function +20) = 0x4E800420; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x3D60 && \ *(unsigned short *) (function + 4) == 0x616B && \ *(unsigned short *) (function + 8) == 0x3C00 && \ *(unsigned short *) (function +12) == 0x6000 && \ *(unsigned long *) (function +16) == 0x7C0903A6 && \ *(unsigned long *) (function +20) == 0x4E800420 #define hilo(hiword,loword) \ (((unsigned long) (hiword) << 16) | (unsigned long) (loword)) #define tramp_address(function) \ hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14)) #define tramp_data(function) \ hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6)) #endif #ifdef __powerpcaix__ /* function: * .long .tramp_r * .long .mytoc * .long 0 * .mytoc: * .long * .long
*/ *(long *) (function + 0) = ((long *) &tramp_r)[0]; *(long *) (function + 4) = (long) (function + 12); *(long *) (function + 8) = 0; *(long *) (function +12) = (long) data; *(long *) (function +16) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) &tramp_r)[0] #define tramp_address(function) \ ((long *) function)[4] #define tramp_data(function) \ ((long *) function)[3] #endif #ifdef __powerpc64_elfv2__ /* function: * ld 11,16(12) 10 00 6C E9 * ld 12,24(12) 18 00 8C E9 * mtctr 12 A6 03 89 7D * bctr 20 04 80 4E * .quad * .quad
*/ *(int *) (function + 0) = 0xE96C0010; *(int *) (function + 4) = 0xE98C0018; *(int *) (function + 8) = 0x7D8903A6; *(int *) (function +12) = 0x4E800420; *(long *) (function +16) = (unsigned long) data; *(long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xE96C0010 && \ *(unsigned int *) (function + 4) == 0xE98C0018 && \ *(unsigned int *) (function + 8) == 0x7D8903A6 && \ *(unsigned int *) (function +12) == 0x4E800420 #define tramp_address(function) \ (*(unsigned long *) (function +24)) #define tramp_data(function) \ (*(unsigned long *) (function +16)) #endif #ifdef __powerpc64aix__ /* function: * .quad .tramp_r * .quad .mytoc * .quad 0 * .mytoc: * .quad * .quad
*/ *(long *) (function + 0) = ((long *) &tramp_r)[0]; *(long *) (function + 8) = (long) (function + 24); *(long *) (function +16) = 0; *(long *) (function +24) = (long) data; *(long *) (function +32) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) &tramp_r)[0] #define tramp_address(function) \ ((long *) function)[4] #define tramp_data(function) \ ((long *) function)[3] #endif #ifdef __ia64__ /* function: * data8 tramp_r * data8 closure * closure: * data8
* data8 */ *(long *) (function + 0) = (long) &tramp_r; *(long *) (function + 8) = (long) (function + 16); *(long *) (function +16) = (long) address; *(long *) (function +24) = (long) data; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == (long) &tramp_r && \ ((long *) function)[1] == (long) (function + 16) #define tramp_address(function) \ ((long *) function)[2] #define tramp_data(function) \ ((long *) function)[3] #endif #ifdef __x86_64__ #ifdef __x86_64_x32__ /* function: * movl $,%r10d 41 BA * movl $
,%rax B8
* jmp *%rax FF E0 */ *(int *) (function + 0) = ((unsigned long) data << 16) | 0xBA41; *(int *) (function + 4) = ((unsigned long) address << 24) | 0xB80000 | ((unsigned long) data >> 16); *(int *) (function + 8) = 0xFF000000 | ((unsigned long) address >> 8); *(int *) (function +12) = 0xE0; #define is_tramp(function) \ (*(unsigned long *) (function + 0) & 0x0000FFFF) == 0xBA41 && \ (*(unsigned long *) (function + 4) & 0x00FF0000) == 0xB80000 && \ (*(unsigned long *) (function + 8) & 0xFF000000) == 0xFF000000 && \ *(unsigned char *) (function +12) == 0xE0 #define tramp_address(function) \ ((*(unsigned long *) (function + 4) >> 24) | \ (*(unsigned long *) (function + 8) << 8)) #define tramp_data(function) \ ((*(unsigned long *) (function + 0) >> 16) | \ (*(unsigned long *) (function + 4) << 16)) #else /* function: * movabsq $,%r10 49 BA * movabsq $
,%rax 48 B8
* jmp *%rax FF E0 */ *(short *) (function + 0) = 0xBA49; *(short *) (function + 2) = (unsigned long long) data & 0xffff; *(int *) (function + 4) = ((unsigned long long) data >> 16) & 0xffffffff; *(short *) (function + 8) = ((unsigned long long) data >> 48) & 0xffff; *(short *) (function +10) = 0xB848; *(int *) (function +12) = (unsigned long long) address & 0xffffffff; *(int *) (function +16) = ((unsigned long long) address >> 32) & 0xffffffff; *(short *) (function +20) = 0xE0FF; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0xBA49 && \ *(unsigned short *) (function +10) == 0xB848 && \ *(unsigned short *) (function +20) == 0xE0FF #define hilo(hiword,loword) \ (((unsigned long long) (hiword) << 32) | (unsigned long long) (loword)) #define himidlo(hishort,midword,loshort) \ (((unsigned long long) (hishort) << 48) | (unsigned long long) (midword) << 16 \ | (unsigned long long) (loshort)) #define tramp_address(function) \ hilo(*(unsigned int *) (function +16), *(unsigned int *) (function +12)) #define tramp_data(function) \ himidlo(*(unsigned short *) (function + 8), \ *(unsigned int *) (function + 4), \ *(unsigned short *) (function + 2)) #endif #endif #if defined(__s390__) && !defined(__s390x__) /* function: * bras %r1,.L1 A7150002 * .L1: * lm %r0,%r1,data-.L1(%r1) 98011008 * br %r1 07F1 * nop 0707 * data: .long * address: .long
*/ *(int *) (function + 0) = 0xA7150002; *(int *) (function + 4) = 0x98011008; *(int *) (function + 8) = 0x07F10707; *(int *) (function +12) = (unsigned int) data; *(int *) (function +16) = (unsigned int) address; #define TRAMP_CODE_LENGTH 12 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xA7150002 && \ *(unsigned int *) (function + 4) == 0x98011008 && \ *(unsigned int *) (function + 8) == 0x07F10707 #define tramp_address(function) \ *(unsigned int *) (function +16) #define tramp_data(function) \ *(unsigned int *) (function +12) #endif #ifdef __s390x__ /* function: * larl %r1,.L1 C01000000003 * .L1: * lmg %r0,%r1,data-.L1(%r1) EB01100A0004 * br %r1 07F1 * nop 0707 * data: .quad * address: .quad
*/ *(int *) (function + 0) = 0xC0100000; *(int *) (function + 4) = 0x0003EB01; *(int *) (function + 8) = 0x100A0004; *(int *) (function +12) = 0x07F10707; *(long *) (function +16) = (unsigned long) data; *(long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xC0100000 && \ *(unsigned int *) (function + 4) == 0x0003EB01 && \ *(unsigned int *) (function + 8) == 0x100A0004 && \ *(unsigned int *) (function +12) == 0x07F10707 #define tramp_address(function) \ (*(unsigned long *) (function +24)) #define tramp_data(function) \ (*(unsigned long *) (function +16)) #endif #ifdef __riscv32__ /* function: * auipc t0,0 00000297 * lw t1,20(t0) 0142A303 * lw t2,16(t0) 0102A383 * jr t1 00030067 * data: .quad * address: .quad
*/ *(int *) (function + 0) = 0x00000297; *(int *) (function + 4) = 0x0142A303; *(int *) (function + 8) = 0x0102A383; *(int *) (function +12) = 0x00030067; *(int *) (function +16) = (unsigned int) data; *(int *) (function +24) = (unsigned int) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x00000297 && \ *(unsigned int *) (function + 4) == 0x0142A303 && \ *(unsigned int *) (function + 8) == 0x0102A383 && \ *(unsigned int *) (function +12) == 0x00030067 #define tramp_address(function) \ (*(unsigned int *) (function +20)) #define tramp_data(function) \ (*(unsigned int *) (function +16)) #endif #ifdef __riscv64__ /* function: * auipc t0,0 00000297 * ld t1,24(t0) 0182B303 * ld t2,16(t0) 0102B383 * jr t1 00030067 * data: .quad * address: .quad
*/ *(int *) (function + 0) = 0x00000297; *(int *) (function + 4) = 0x0182B303; *(int *) (function + 8) = 0x0102B383; *(int *) (function +12) = 0x00030067; *(long *) (function +16) = (unsigned long) data; *(long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x00000297 && \ *(unsigned int *) (function + 4) == 0x0182B303 && \ *(unsigned int *) (function + 8) == 0x0102B383 && \ *(unsigned int *) (function +12) == 0x00030067 #define tramp_address(function) \ (*(unsigned long *) (function +24)) #define tramp_data(function) \ (*(unsigned long *) (function +16)) #endif #ifdef __loongarch64__ /* function: * pcaddu12i $r12,0 1C00000C * ld.d $r20,$r12,16 28C04194 * ld.d $r12,$r12,24 28C0618C * jirl $r0,$r12,0 4C000180 * .dword * .dword
*/ *(unsigned int *) (function + 0) = 0x1C00000C; *(unsigned int *) (function + 4) = 0x28C04194; *(unsigned int *) (function + 8) = 0x28C0618C; *(unsigned int *) (function +12) = 0x4C000180; *(unsigned long *) (function +16) = (unsigned long) data; *(unsigned long *) (function +24) = (unsigned long) address; #define TRAMP_CODE_LENGTH 16 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x1C00000C && \ *(unsigned int *) (function + 4) == 0x28C04194 && \ *(unsigned int *) (function + 8) == 0x28C0618C && \ *(unsigned int *) (function +12) == 0x4C000180 #define tramp_address(function) \ *(unsigned long *) (function +24) #define tramp_data(function) \ *(unsigned long *) (function +16) #endif /* * data: * * */ *(void* *) (data + 0*sizeof(void*)) = data0; *(void* *) (data + 1*sizeof(void*)) = data1; /* 3. Flush instruction cache */ /* We need this because some CPUs have separate data cache and instruction * cache. The freshly built trampoline is visible to the data cache, but not * maybe not to the instruction cache. This is hairy. */ /* TRAMP_CODE_LENGTH = length of the machine instructions. */ #ifndef TRAMP_CODE_LENGTH #define TRAMP_CODE_LENGTH TRAMP_LENGTH #endif #if !(defined(__hppanew__) || defined(__hppa64new__) || defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__)) /* Only needed if we really set up machine instructions. */ /* Use the operating system provided function, when available. */ #if defined _WIN32 && !defined __CYGWIN__ /* Native Windows. FlushInstructionCache */ HANDLE process = GetCurrentProcess (); while (!FlushInstructionCache (process, function_x, TRAMP_CODE_LENGTH)) ; #elif defined __APPLE__ && defined __MACH__ /* macOS */ sys_icache_invalidate (function_x, TRAMP_CODE_LENGTH); #elif defined _AIX /* AIX. */ _sync_cache_range (function_x, TRAMP_CODE_LENGTH); #elif defined __sgi /* IRIX. */ cacheflush (function_x, TRAMP_CODE_LENGTH, ICACHE); #elif defined __sun /* Solaris. */ extern void sync_instruction_memory (char *, size_t); sync_instruction_memory (function_x, TRAMP_CODE_LENGTH); #else /* No operating system provided function. Dispatch according to the CPU. */ #ifdef __i386__ #if defined(_WIN32) while (!FlushInstructionCache(GetCurrentProcess(),function_x,TRAMP_CODE_LENGTH)) continue; #endif #endif #ifdef __m68k__ #if defined(__NetBSD__) && defined(__GNUC__) { register uintptr_t _beg __asm__ ("%a1") = (uintptr_t) function_x; register uintptr_t _len __asm__ ("%d1") = TRAMP_CODE_LENGTH; __asm__ __volatile__ ( "move%.l %#0x80000004,%/d0\n\t" /* CC_EXTPURGE | C_IPURGE */ "trap #12" /* kernel call ‘cachectl’ */ : : "a" (_beg), "d" (_len) : "%a0", "%a1", "%d0", "%d1" /* call-used registers */ ); } #endif #if defined(__linux__) && defined(__GNUC__) { register uintptr_t _beg __asm__ ("%d1") = (uintptr_t) function_x; register uintptr_t _len __asm__ ("%d4") = TRAMP_CODE_LENGTH + 32; __asm__ __volatile__ ( "move%.l %#123,%/d0\n\t" "move%.l %#1,%/d2\n\t" "move%.l %#3,%/d3\n\t" "trap %#0" : : "d" (_beg), "d" (_len) : "%d0", "%d2", "%d3" ); } #endif #if defined(AUX) && defined(__GNUC__) /* sysm68k(105, addr, scope, cache, len) */ __asm__ __volatile__ ( "move%.l %1,%/sp@-\n\t" "move%.l %#3,%/sp@-\n\t" "move%.l %#1,%/sp@-\n\t" "move%.l %0,%/sp@-\n\t" "move%.l %#105,%/sp@-\n\t" "move%.l %#0,%/sp@-\n\t" "move%.l %#38,%/sp@-\n\t" "trap %#0\n\t" "add%.l %#24,%/sp" : : "r" (function_x), "g" ((int)TRAMP_CODE_LENGTH) : "%d0" ); #endif #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) cacheflush(function_x,TRAMP_CODE_LENGTH,ICACHE); /* gforth-0.3.0 uses BCACHE instead of ICACHE. Why?? */ #endif #if defined(__sparc__) || defined(__sparc64__) /* This assumes that the trampoline fits in at most two cache lines. */ __TR_clear_cache_2(function_x,function_x+TRAMP_CODE_LENGTH-1); #endif #ifdef __alpha__ __TR_clear_cache(); #endif #if defined(__hppa__) || defined(__hppa64__) /* This assumes that the trampoline fits in at most two cache lines. */ __TR_clear_cache(function_x,function_x+TRAMP_CODE_LENGTH-1); #endif #if defined(__arm__) || defined(__armhf__) || defined(__arm64__) /* On ARM, cache flushing can only be done through a system call. GCC implements it for Linux with EABI, through an "swi 0" with code 0xf0002. For other systems, it may be an "swi 0x9f0002", an "swi 0xf00000", or similar. */ /* On ARM64, cache flushing is done through special instructions, and the length of the cache lines must be determined at runtime. See gcc/libgcc/config/aarch64/sync-cache.c. */ #if defined(__GNUC__) /* Use the GCC built-in. */ __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH)); #else #error "Don't know how to implement clear_cache on this platform." #endif #endif #if defined(__powerpc__) || defined(__powerpc64__) __TR_clear_cache_2(function_x); #endif #if defined(__riscv32__) || defined(__riscv64__) #if defined(__linux__) /* Use the libc function. */ __riscv_flush_icache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH),0); #elif defined(__GNUC__) __asm__ __volatile__ ("fence.i"); #endif #endif #if defined(__loongarch64__) /* Use the GCC built-in. It expands to 'ibar 0'. */ __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH)); #endif #endif #endif /* 4. Return. */ return (__TR_function) (function_x + TRAMP_BIAS); } void free_trampoline_r (__TR_function function) { #if TRAMP_BIAS function = (__TR_function)((char*)function - TRAMP_BIAS); #endif #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Find the writable address corresponding to the executable address. */ { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize; function -= ((intptr_t*)page_x)[0]; } #endif gl_lock_lock(freelist_lock); *(char**)function = freelist; freelist = (char*)function; gl_lock_unlock(freelist_lock); /* It is probably not worth calling munmap() for entirely freed pages. */ #else free(((char**)function)[-1]); #endif } int is_trampoline_r (void* function) { #if defined(is_tramp) && defined(tramp_data) #ifdef __hppanew__ /* The 'volatile' below works around GCC bug . */ void* volatile tramp_r_address = &tramp_r; if (!(((uintptr_t)function & 3) == (TRAMP_BIAS & 3))) return 0; #endif #ifdef __OpenBSD__ /* OpenBSD mmaps code VMAs with protection PROT_EXEC, not PROT_READ|PROT_EXEC. Therefore is_tramp may crash if given the address of a normal function. Seen on OpenBSD 7.5/arm64. */ int prot = get_vma_prot (function, 1); if (prot != -1 && (prot & VMA_PROT_READ) == 0) /* Memory of the given function is not readable. Therefore it cannot be a trampoline. */ return 0; #endif if (is_tramp(((char*)function - TRAMP_BIAS))) { char* function_w; #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Find the writable address corresponding to the executable address. */ { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize; function_w = function - ((intptr_t*)page_x)[0]; } #else function_w = function; #endif return (tramp_data(((char*)function - TRAMP_BIAS))) == (uintptr_t)((char*)function_w - TRAMP_BIAS + TRAMP_LENGTH); } return 0; #else abort(); #endif } __TR_function trampoline_r_address (__TR_function function) { #ifdef tramp_address return (__TR_function)(tramp_address(((char*)function - TRAMP_BIAS))); #else abort(); #endif } void* trampoline_r_data0 (__TR_function function) { #ifdef tramp_data return ((void**)((char*)function-TRAMP_BIAS+TRAMP_LENGTH))[0]; #else abort(); #endif } void* trampoline_r_data1 (__TR_function function) { #ifdef tramp_data return ((void**)((char*)function-TRAMP_BIAS+TRAMP_LENGTH))[1]; #else abort(); #endif } libffcall-2.5/callback/trampoline_r/cache-alpha-macro.S0000664000000000000000000000066014662617145020005 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl __TR_clear_cache .ent __TR_clear_cache $__TR_clear_cache..ng: __TR_clear_cache: .frame $30,0,$26,0 .prologue 0 .set macro call_pal 0x86 .set nomacro ret $31,($26),1 .end __TR_clear_cache #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/cache-powerpc64.c0000664000000000000000000000240314664204174017463 00000000000000/* Instruction cache flushing for powerpc64, not the AIX ABI */ /* * Copyright 1997-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache_2 (char* first_addr) { /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */ /* The number of asm statements here depends on the value of TRAMP_LENGTH-2*8 for __powerpc64_elfv2__. */ asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12)); asm volatile ("sync; isync"); } libffcall-2.5/callback/trampoline_r/cache-sparc64-macro.S0000664000000000000000000000057214662617145020204 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(__TR_clear_cache_2) DECLARE_FUNCTION(__TR_clear_cache_2) .proc 020 FUNBEGIN(__TR_clear_cache_2) iflush %o0+0;iflush %o0+8 jmp %o7+8 nop FUNEND(__TR_clear_cache_2) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/tramp-hppa-macro.S0000664000000000000000000000250713347755274017737 00000000000000; Trampoline for hppa CPU ; Copyright 1997-2017 Bruno Haible ; ; This program is free software: you can redistribute it and/or modify ; it under the terms of the GNU General Public License as published by ; the Free Software Foundation; either version 2 of the License, or ; (at your option) any later version. ; ; This program is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ; GNU General Public License for more details. ; ; You should have received a copy of the GNU General Public License ; along with this program. If not, see . ; Available registers: %r1, %r19, %r20, %r21, %r22, %r29, %r31. .code .IMPORT $global$,DATA .IMPORT $$dyncall,MILLICODE .code .align 4 .EXPORT tramp_r,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR .label tramp_r .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY ; The closure pointer is already in register %r19. ; Move into register %r29 ldw 0(0,%r19),%r29 ; Move
into register %r21. ldw 4(0,%r19),%r21 ; Jump to it. bb,>=,n %r21,30,tramp_r_2 depi 0,31,2,%r21 ldw 4(0,%r21),%r19 ldw 0(0,%r21),%r21 .label tramp_r_2 ldsid (0,%r21),%r1 mtsp %r1,%sr0 be,n 0(%sr0,%r21) nop .EXIT .PROCEND #include "noexecstack.h" libffcall-2.5/callback/trampoline_r/tramp-hppa64-macro.S0000664000000000000000000000254513347755274020113 00000000000000; Trampoline for hppa64 CPU ; Copyright 2017 Bruno Haible ; ; This program is free software: you can redistribute it and/or modify ; it under the terms of the GNU General Public License as published by ; the Free Software Foundation; either version 2 of the License, or ; (at your option) any later version. ; ; This program is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ; GNU General Public License for more details. ; ; You should have received a copy of the GNU General Public License ; along with this program. If not, see . ; Available registers: %r1, %r27, %r31. ; %r27 has a fixed meaning at function calls: pic_base (a.k.a. gp or dp). ; %r31 has a fixed meaning as millicode return pointer (mrp). #include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(tramp_r) DECLARE_FUNCTION(tramp_r) DEF(tramp_r) .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY ; The closure pointer is already in register %r27. ; Move into register %r31. ldd 0(%r27),%r31 ; get ; Jump to . ldd 8(%r27),%r27 ; get ldd 16(%r27),%r1 ldd 24(%r27),%r27 bve (%r1) ; jump to nop .EXIT .PROCEND DEF(L(fe1)) FUNEND(tramp_r) #include "noexecstack.h" libffcall-2.5/callback/trampoline_r/cache-powerpc64-elfv2-linux.s0000664000000000000000000000133314664204344021654 00000000000000 .file "cache-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl __TR_clear_cache_2 .type __TR_clear_cache_2, @function __TR_clear_cache_2: #APP # 25 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 #NO_APP addi 9,3,4 #APP # 26 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 9,3,8 #APP # 27 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 3,3,12 #APP # 28 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 # 29 "cache-powerpc64.c" 1 sync; isync # 0 "" 2 #NO_APP blr .long 0 .byte 0,0,0,0,0,0,0,0 .size __TR_clear_cache_2,.-__TR_clear_cache_2 .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/trampoline_r/tramp-powerpc64-aix.S0000664000000000000000000000324713347755300020310 00000000000000/* Trampoline for powerpc64 CPU with AIX calling convention */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r0, r11, r12. */ /* However, r0 is special in that it cannot be used as a base register. */ .machine "ppc64" #ifdef _AIX .rename H.4.NO_SYMBOL{PR},"" .lglobl H.4.NO_SYMBOL{PR} .globl .tramp_r .csect H.4.NO_SYMBOL{PR},7 #else .globl tramp_r .globl .tramp_r tramp_r: .quad .tramp_r #endif .tramp_r: /* Move into register r11 */ ld 11,0(2) /* get */ /* Get */ ld 12,8(2) /* * gcc-2.6.3 source says: * A function pointer is a pointer to a data area whose first word contains * the actual address of the function, whose second word contains a pointer * to its TOC, and whose third word contains a value to place in the static * chain register (r11). But we have already placed our information in r11. */ /* ld 11,16(12) pass static chain in r11 */ ld 2,8(12) /* pass TOC in r2 */ ld 0,0(12) /* actual code address */ mtctr 0 bctr #include "noexecstack.h" libffcall-2.5/callback/trampoline_r/cache-hppa-macro.S0000664000000000000000000000114214662617145017644 00000000000000#include "asm-hppa.h" .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 GLOBL(__TR_clear_cache) DECLARE_FUNCTION(__TR_clear_cache) DEF(__TR_clear_cache) .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r20 ldsid (0,%r26),%r26 mtsp %r26,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r20,%sr0 nop nop nop nop nop nop bv,n %r0(%r2) .EXIT .PROCEND DEF(L(fe1)) FUNEND(__TR_clear_cache) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/cache-powerpc-macos.s0000664000000000000000000000044014664204344020427 00000000000000.text .align 2 .globl ___TR_clear_cache_2 ___TR_clear_cache_2: icbi 0,r3; dcbf 0,r3 addi r0,r3,4 icbi 0,r0; dcbf 0,r0 addi r9,r3,8 icbi 0,r9; dcbf 0,r9 addi r0,r3,12 icbi 0,r0; dcbf 0,r0 addi r9,r3,16 icbi 0,r9; dcbf 0,r9 addi r3,r3,20 icbi 0,r3; dcbf 0,r3 sync; isync blr libffcall-2.5/callback/trampoline_r/Makefile.devel0000664000000000000000000002231714236066414017167 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! THISFILE = Makefile.devel RM = rm -f # ============ Rules that require cross-compilation tools ============ GCC = gcc GCCFLAGS = -O2 -fomit-frame-pointer -fPIC CPP = $(GCC) -E CROSS_TOOL = cross precompiled : \ cache-sparc-macro.S cache-sparc64-macro.S \ cache-alpha-macro.S \ cache-hppa-macro.S cache-hppa64-macro.S \ cache-powerpc-linux-macro.S cache-powerpc-macos.s \ cache-powerpc64-elfv2-macro.S cache-sparc-linux.s : cache-sparc.c $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S cache-sparc.c -o cache-sparc-linux.s cache-sparc-macro.S : cache-sparc-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < cache-sparc-linux.s ; cat ../../common/noexecstack.h) > cache-sparc-macro.S cache-sparc64-linux.s : cache-sparc.c $(THISFILE) $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S cache-sparc.c -o cache-sparc64-linux.s cache-sparc64-macro.S : cache-sparc64-linux.s ../../common/asm-sparc.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../../common/asm-sparc.sh < cache-sparc64-linux.s ; cat ../../common/noexecstack.h) > cache-sparc64-macro.S cache-alpha-linux.s : cache-alpha.c $(THISFILE) $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S cache-alpha.c -o cache-alpha-linux.s cache-alpha-macro.S : cache-alpha-linux.s ../../common/asm-alpha.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-alpha.sh < cache-alpha-linux.s ; cat ../../common/noexecstack.h) > cache-alpha-macro.S cache-hppa-linux.s : cache-hppa.c $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S cache-hppa.c -o cache-hppa-linux.s cache-hppa-macro.S : cache-hppa-linux.s ../../common/asm-hppa.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa.h"' ; ../../common/asm-hppa.sh < cache-hppa-linux.s ; cat ../../common/noexecstack.h) > cache-hppa-macro.S cache-hppa64-linux.s : cache-hppa.c $(THISFILE) $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S cache-hppa.c -o cache-hppa64-linux.s cache-hppa64-macro.S : cache-hppa64-linux.s ../../common/asm-hppa64.sh ../../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa64.h"' ; ../../common/asm-hppa64.sh < cache-hppa64-linux.s ; cat ../../common/noexecstack.h) > cache-hppa64-macro.S cache-powerpc-linux.s : cache-powerpc.c $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-linux.s cache-powerpc-linux-macro.S : cache-powerpc-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-powerpc.sh < cache-powerpc-linux.s ; cat ../../common/noexecstack.h) > cache-powerpc-linux-macro.S cache-powerpc-macos.s : cache-powerpc.c $(THISFILE) $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-macos.s cache-powerpc64-elfv2-linux.s : cache-powerpc64.c $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-be.s cmp cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux-be.s > /dev/null mv cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux.s $(RM) cache-powerpc64-elfv2-linux-be.s cache-powerpc64-elfv2-macro.S : cache-powerpc64-elfv2-linux.s ../../common/asm-powerpc.sh ../../common/noexecstack.h $(THISFILE) (../../common/asm-powerpc.sh < cache-powerpc64-elfv2-linux.s ; cat ../../common/noexecstack.h) > cache-powerpc64-elfv2-macro.S # --------------- Older rules --------------- OLDGCCFLAGS = -O2 -fomit-frame-pointer ASPREFIX = /usr1/gnu/lib proto-precompiled : proto-i386.s proto-m68k.s proto-mips.s proto-mipsn32.s proto-mips64.s proto-sparc.s proto-sparc64.s proto-alpha.s proto-hppa.s proto-hppa64.s proto-arm.s proto-arm64.s proto-powerpc-aix.s proto-powerpc-sysv4.s proto-powerpc-macos.s proto-powerpc64-aix.s proto-powerpc64-elfv2.s proto-ia64.c proto-x86_64.c proto-x86_64-x32.s proto-s390.s proto-s390x.s proto-riscv32.s proto-riscv64.s proto-loongarch64.s proto-i386.s : proto.c $(GCC) -V 2.7.2 -b i486-linuxaout $(OLDGCCFLAGS) -D__i386__ -S proto.c -o $@ proto-m68k.s : proto.c $(GCC) -V egcs-2.91.57 -b m68k-sun $(OLDGCCFLAGS) -D__m68k__ -S proto.c -o $@ proto-mips.s : proto.c $(GCC) -V 2.95.2 -b mips-sgi $(OLDGCCFLAGS) -D__mips__ -S proto.c -o $@ -mabicalls proto-mipsn32.s : proto.c $(GCC) -V 2.95.2 -b mips-sgi-irix6 $(OLDGCCFLAGS) -D__mipsn32__ -S proto.c -o $@ -mabicalls proto-mips64.s : proto64.c $(GCC) -V 2.95.2 -b mips-sgi -mips3 -mlong64 $(OLDGCCFLAGS) -D__mips64__ -S proto64.c -o $@ -mabicalls proto-sparc.s : proto.c $(GCC) -V 2.95.2 -b sparc-sun $(OLDGCCFLAGS) -D__sparc__ -S proto.c -o $@ proto-sparc64.s : proto64.c sparc64-linux-gcc -V 2.95.2 -b sparc64-linux $(OLDGCCFLAGS) -D__sparc64__ -S proto64.c -o $@ proto-alpha.s : proto64.c $(GCC) -V 2.7.2 -b alpha-dec-osf $(OLDGCCFLAGS) -D__alpha__ -S proto64.c -o $@ proto-hppa.s : proto.c $(GCC) -V 2.6.3 -b hppa1.0-hpux $(OLDGCCFLAGS) -D__hppa__ -S proto.c -o $@ proto-hppa64.s : proto64.c $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__hppa64__ -S proto64.c -o $@ proto-arm.s : proto.c $(CROSS_TOOL) arm-linux gcc -V 3.1 $(OLDGCCFLAGS) -fno-omit-frame-pointer -D__arm__ -S proto.c -o $@ proto-arm64.s : proto64.c $(CROSS_TOOL) aarch64-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__arm64__ -S proto64.c -o $@ proto-powerpc-aix.s : proto.c $(GCC) -V 2.95.2 -b rs6000 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc-sysv4.s : proto.c $(GCC) -V 2.95.2 -b ppc-linux -mno-power -mno-power2 -mno-powerpc $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc-macos.s : proto.c $(GCC) -V 3.3.2 -b powerpc-darwin $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc64-aix.s : proto64.c $(CROSS_TOOL) powerpc64-linux gcc $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@ proto-powerpc64-elfv2.s : proto64.c $(CROSS_TOOL) powerpc64le-linux gcc -mabi=elfv2 $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@ proto-ia64.s : proto64.c $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(OLDGCCFLAGS) -D__ia64__ -S proto64.c -o $@ proto-x86_64.s : proto64.c $(GCC) -V 3.2.2 -b x86_64-suse-linux $(OLDGCCFLAGS) -D__x86_64__ -S proto64.c -o $@ proto-x86_64-x32.s : proto.c $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(OLDGCCFLAGS) -fno-asynchronous-unwind-tables -D__x86_64__ -D__x86_64_x32__ -S proto.c -o $@ proto-s390.s : proto.c $(CROSS_TOOL) s390-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__s390__ -S proto.c -o $@ proto-s390x.s : proto64.c $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__s390x__ -S proto64.c -o $@ proto-riscv32.s : proto.c $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv32__ -S proto.c -o $@ proto-riscv64.s : proto64.c $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv64__ -S proto64.c -o $@ proto-loongarch64.s : proto64.c $(CROSS_TOOL) loongarch64-linux gcc-12.1.0 $(OLDGCCFLAGS) -D__loongarch64__ -S proto64.c -o $@ tramp-i386.o : tramp-i386.s $(ASPREFIX)/i486-linux/bin/as tramp-i386.s -o $@ tramp-m68k.o : tramp-m68k.s $(ASPREFIX)/m68k-linux/bin/as tramp-m68k.s -o $@ tramp-mips.o : tramp-mips.s $(ASPREFIX)/mips-linux/bin/as tramp-mips.s -o $@ tramp-mips64.o : tramp-mips64.s $(ASPREFIX)/mips-linux/bin/as -mips64 -mabi=64 tramp-mips64.s -o $@ tramp-sparc.o : tramp-sparc.s $(ASPREFIX)/sparc-sun/bin/as tramp-sparc.s -o $@ tramp-sparc64.o : tramp-sparc64.s $(ASPREFIX)/sparc64-linux/bin/as tramp-sparc64.s -o $@ tramp-alpha.o : tramp-alpha.s $(ASPREFIX)/alpha-linux/bin/as tramp-alpha.s -o $@ tramp-hppa.o : tramp-hppa.s $(ASPREFIX)/hppa1.0-hpux/bin/as tramp-hppa.s -o $@ tramp-hppa64.o : tramp-hppa64.s $(CROSS_TOOL) hppa64-linux as tramp-hppa64.s -o $@ tramp-arm.o : tramp-arm.s $(CROSS_TOOL) arm-linux as tramp-arm.s -o $@ tramp-arm64.o : tramp-arm64.s $(CROSS_TOOL) aarch64-linux as tramp-arm64.s -o $@ tramp-powerpc-old.o : tramp-powerpc-old.s $(ASPREFIX)/rs6000/bin/as tramp-powerpc-old.s -o $@ tramp-powerpc-sysv4.o : tramp-powerpc-sysv4.s $(ASPREFIX)/ppc-linux/bin/as tramp-powerpc-sysv4.s -o $@ tramp-powerpc64-elfv2.o : tramp-powerpc64-elfv2.s $(CROSS_TOOL) powerpc64le-linux as tramp-powerpc64-elfv2.s -o $@ tramp-ia64.o : tramp-ia64.s /nue/usr/ia64-hp-linux/bin/as tramp-ia64.s -o $@ tramp-x86_64.o : tramp-x86_64.s $(ASPREFIX)/x86_64-linux/bin/as tramp-x86_64.s -o $@ tramp-x86_64-x32.o : tramp-x86_64-x32.s $(CROSS_TOOL) x86_64-linux as tramp-x86_64-x32.s -o $@ tramp-s390.o : tramp-s390.s $(CROSS_TOOL) s390-linux as tramp-s390.s -o $@ tramp-s390x.o : tramp-s390x.s $(CROSS_TOOL) s390x-linux as tramp-s390x.s -o $@ tramp-riscv32.o : tramp-riscv32.s $(CROSS_TOOL) riscv32-linux as tramp-riscv32.s -o $@ tramp-riscv64.o : tramp-riscv64.s $(CROSS_TOOL) riscv64-linux as tramp-riscv64.s -o $@ tramp-loongarch64.o : tramp-loongarch64.s $(CROSS_TOOL) loongarch64-linux as tramp-loongarch64.s -o $@ libffcall-2.5/callback/trampoline_r/Makefile.in0000664000000000000000000002244713155007160016472 00000000000000# Makefile for trampoline #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ OS = @host_os@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": CC = @CC@ CFLAGS = @CFLAGS@ CPPFLAGS = @CPPFLAGS@ CPP = @CPP@ INCLUDES = -I. -I$(srcdir) -I../.. -I$(srcdir)/../.. INCLUDES_WITH_GNULIB = $(INCLUDES) -I../../gnulib-lib -I$(srcdir)/../../gnulib-lib ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi` LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ # Libtool options for linking with the thread library. LTLIBTHREAD = @LTLIBTHREAD@ #### End of system configuration section. #### SHELL = /bin/sh # Needed by $(LIBTOOL). top_builddir = ../.. OBJECTS = trampoline.lo @CPU_OBJECTS@ all : $(OBJECTS) libtrampoline.la $(srcdir)/trampoline_r.3 $(srcdir)/trampoline_r.html trampoline.lo : $(srcdir)/trampoline.c $(srcdir)/trampoline_r.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/trampoline.c tramp-hppa.lo : tramp-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa.s tramp-hppa.s : $(srcdir)/tramp-hppa-macro.S $(srcdir)/../../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa.s tramp-hppa64.lo : tramp-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa64.s tramp-hppa64.s : $(srcdir)/tramp-hppa64-macro.S $(srcdir)/../../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa64.s tramp-powerpc.lo : tramp-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc.s tramp-powerpc.s : $(srcdir)/tramp-powerpc-aix.S $(CPP) $(srcdir)/tramp-powerpc-aix.S > tramp-powerpc.s tramp-powerpc64.lo : tramp-powerpc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc64.s tramp-powerpc64.s : $(srcdir)/tramp-powerpc64-aix.S $(srcdir)/../../common/noexecstack.h $(CPP) -I$(srcdir)/../../common $(srcdir)/tramp-powerpc64-aix.S > tramp-powerpc64.s tramp-ia64.lo : tramp-ia64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-ia64.s tramp-ia64.s : $(srcdir)/tramp-ia64-macro.S $(srcdir)/../../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/tramp-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > tramp-ia64.s cache-sparc.lo : cache-sparc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc.s cache-sparc.s : $(srcdir)/cache-sparc-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/cache-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc.s cache-sparc64.lo : cache-sparc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc64.s cache-sparc64.s : $(srcdir)/cache-sparc64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common - < $(srcdir)/cache-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc64.s cache-alpha.lo : cache-alpha.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-alpha.s cache-alpha.s : $(srcdir)/cache-alpha-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/cache-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-alpha.s cache-hppa.lo : cache-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa.s cache-hppa.s : $(srcdir)/cache-hppa-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/cache-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa.s cache-hppa64.lo : cache-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa64.s cache-hppa64.s : $(srcdir)/cache-hppa64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../../common $(srcdir)/cache-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa64.s cache-powerpc.lo : cache-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc.s cache-powerpc.s : $(srcdir)/cache-powerpc-linux-macro.S $(srcdir)/cache-powerpc-macos.s case "$(OS)" in \ macos* | darwin*) syntax=macos;; \ *) syntax=linux;; \ esac; \ case $${syntax} in \ macos) \ grep -v '\.machine' $(srcdir)/cache-powerpc-$${syntax}.s > cache-powerpc.s || exit 1 ;; \ linux) \ $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc.s || exit 1 ;; \ *) \ cp $(srcdir)/cache-powerpc-$${syntax}.s cache-powerpc.s || exit 1 ;; \ esac cache-powerpc64-elfv2.lo : cache-powerpc64-elfv2.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc64-elfv2.s cache-powerpc64-elfv2.s : $(srcdir)/cache-powerpc64-elfv2-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc64-elfv2-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc64-elfv2.s libtrampoline.la : $(OBJECTS) ../../gnulib-lib/libgnu.la $(LIBTOOL_LINK) $(CC) -o libtrampoline.la -rpath $(libdir) -no-undefined $(OBJECTS) ../../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD) # Installs the library and include files only. Typically called with only # $(libdir) and $(includedir) - don't use $(prefix) and $(exec_prefix) here. install-lib : all force mkdir -p $(includedir) $(INSTALL_DATA) $(srcdir)/trampoline_r.h $(includedir)/trampoline_r.h install : all force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) # mkdir -p $(DESTDIR)$(libdir) # $(LIBTOOL_INSTALL) $(INSTALL_DATA) libtrampoline.la $(DESTDIR)$(libdir)/libtrampoline.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/trampoline_r.h $(DESTDIR)$(includedir)/trampoline_r.h mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 $(INSTALL_DATA) $(srcdir)/trampoline_r.3 $(DESTDIR)$(mandir)/man3/trampoline_r.3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) $(INSTALL_DATA) $(srcdir)/trampoline_r.html $(DESTDIR)$(htmldir)/trampoline_r.html installdirs : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) # mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) uninstall : force # $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libtrampoline.la $(RM) $(DESTDIR)$(includedir)/trampoline_r.h $(RM) $(DESTDIR)$(mandir)/man3/trampoline_r.3 $(RM) $(DESTDIR)$(htmldir)/trampoline_r.html test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/trampoline_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c test1 : test1.@OBJEXT@ libtrampoline.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test1 test2.@OBJEXT@ : $(srcdir)/test2.c $(srcdir)/trampoline_r.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test2.c test2 : test2.@OBJEXT@ libtrampoline.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test2.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2 check1 : all test1 ./test1 check : all test1 test2 ./test1 ./test2 touch tests.passed.$(HOST) extracheck : check mostlyclean : clean clean : force $(RM) $(OBJECTS) `echo $(OBJECTS) | sed -e 's/\.lo/.@OBJEXT@/g'` tramp-hppa.s tramp-hppa64.s tramp-powerpc.s tramp-powerpc64.s tramp-ia64.s cache-sparc.s cache-sparc64.s cache-alpha.s cache-hppa.s cache-hppa64.s cache-powerpc.s cache-powerpc64-elfv2.s libtrampoline.* core $(RM) -r .libs _libs $(RM) test1.@OBJEXT@ test1 test2.@OBJEXT@ test2 distclean : clean $(RM) Makefile tests.passed.* maintainer-clean : distclean # List of source files (committed in version control or generated by Makefile.devel). SOURCE_FILES = \ COPYING \ PORTING README trampoline_r.3 trampoline_r.html \ Makefile.devel \ Makefile.maint \ Makefile.in \ trampoline_r.h \ trampoline.c \ tramp-hppa-macro.S \ tramp-hppa64-macro.S \ tramp-powerpc-aix.S \ tramp-powerpc64-aix.S \ tramp-ia64-macro.S \ cache.c \ cache-alpha.c cache-alpha-linux.s cache-alpha-macro.S \ cache-hppa.c cache-hppa-linux.s cache-hppa-macro.S cache-hppa64-linux.s cache-hppa64-macro.S \ cache-powerpc.c cache-powerpc-linux.s cache-powerpc-linux-macro.S cache-powerpc-macos.s \ cache-powerpc64.c cache-powerpc64-elfv2-linux.s cache-powerpc64-elfv2-macro.S \ cache-sparc.c cache-sparc-linux.s cache-sparc-macro.S cache-sparc64-linux.s cache-sparc64-macro.S \ test1.c \ test2.c # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ trampoline_r.man # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done force : libffcall-2.5/callback/trampoline_r/cache-sparc64-linux.s0000664000000000000000000000044614662617145020302 00000000000000 .file "cache-sparc.c" .section ".text" .align 4 .global __TR_clear_cache_2 .type __TR_clear_cache_2, #function .proc 020 __TR_clear_cache_2: iflush %o0+0;iflush %o0+8 jmp %o7+8 nop .size __TR_clear_cache_2, .-__TR_clear_cache_2 .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/callback/trampoline_r/tramp-powerpc-aix.S0000664000000000000000000000313513347755301020133 00000000000000/* Trampoline for powerpc CPU with AIX calling convention */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r0, r11, r12. */ /* However, r0 is special in that it cannot be used as a base register. */ .globl tramp_r .globl .tramp_r .csect tramp_r[DS] tramp_r: .long .tramp_r, 0, 0 .csect .text[PR] .tramp_r: /* Move into register r11 */ lwz 11,0(2) /* get */ /* Get */ lwz 12,4(2) /* * gcc-2.6.3 source says: * A function pointer is a pointer to a data area whose first word contains * the actual address of the function, whose second word contains a pointer * to its TOC, and whose third word contains a value to place in the static * chain register (r11). But we have already placed our information in r11. */ /* lwz 11,8(12) pass static chain in r11 */ lwz 2,4(12) /* pass TOC in r2 */ lwz 0,0(12) /* actual code address */ mtctr 0 bctr _section_.text: .csect .data[RW] .long _section_.text libffcall-2.5/callback/trampoline_r/cache-powerpc.c0000664000000000000000000000256714664204140017315 00000000000000/* Instruction cache flushing for powerpc, not on AIX */ /* * Copyright 1997-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache_2 (char* first_addr) { /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */ /* The number of asm statements here depends on the value of TRAMP_LENGTH for __powerpcsysv4__. */ asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20)); asm volatile ("sync; isync"); } libffcall-2.5/callback/trampoline_r/trampoline_r.man0000664000000000000000000000565214665326517017635 00000000000000TRAMPOLINE(3) Library Functions Manual TRAMPOLINE(3) NAME trampoline - closures as first-class C functions SYNOPSIS #include  function = alloc_trampoline_r(address, data0, data1); free_trampoline_r(function); is_trampoline_r(function) trampoline_r_address(function) trampoline_r_data0(function) trampoline_r_data1(function) DESCRIPTION These functions implement closures as first-class C functions. A clo‐ sure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. function = alloc_trampoline_r(address, data0, data1) allocates a closure. When function gets called, it stores in a special "lexical chain register" a pointer to a storage area containing data0 in its first word and data1 in its second word and calls the C function at address. The function at address is responsible for fetching data0 and data1 off the pointer. Note that the "lexical chain register" is a call-used register, i.e. is clobbered by function calls. This is much like gcc's local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while trampoline provides functions with indefinite extent: function is only deallocated when free_trampoline_r(function) is called. is_trampoline_r(function) checks whether the C function function was produced by a call to alloc_trampoline_r. If this returns true, the arguments given to alloc_trampoline_r can be retrieved: trampoline_r_address(function) returns address, trampoline_r_data0(function) returns data0, trampoline_r_data1(function) returns data1. SEE ALSO trampoline(3), gcc(1), stdarg(3) PORTING The way gcc builds local functions is described in the gcc source, file gcc-2.6.3/config/cpu/cpu.h. AUTHOR Bruno Haible ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. 1 January 2017 TRAMPOLINE(3) libffcall-2.5/callback/trampoline_r/test1.c0000664000000000000000000000543114662613035015633 00000000000000/* Trampoline test */ /* * Copyright 1995-2023 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include "trampoline_r.h" #include "ffcall-abi.h" /* Define __${host_cpu}__ */ /* Set when we can check that the env register is being passed correctly. */ #if defined __GNUC__ && !defined __clang__ && !defined(__arm__) #define CHECK_ENV_REGISTER #endif #define MAGIC1 0x9db9af42 #define MAGIC2 0x614a13c9 #define MAGIC3 0x7aff3cb4 #define MAGIC4 0xa2f9d045 #if defined __cplusplus || __STDC_VERSION__ >= 202300L typedef int (*function)(...); #else typedef int (*function)(); #endif int f (int x) { #ifdef CHECK_ENV_REGISTER #ifdef __i386__ register void* env __asm__("%ecx"); #endif #ifdef __m68k__ register void* env __asm__("a0"); #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) register void* env __asm__("$2"); #endif #if defined(__sparc__) && !defined(__sparc64__) register void* env __asm__("%g2"); #endif #ifdef __sparc64__ register void* env __asm__("%g5"); #endif #ifdef __alpha__ register void* env __asm__("$1"); #endif #if defined(__hppa__) && !defined(__hppa64__) register void* env __asm__("%r29"); #endif #ifdef __hppa64__ register void* env __asm__("%r31"); #endif #ifdef __arm64__ register void* env __asm__("x18"); #endif #ifdef __powerpc__ register void* env __asm__("r11"); #endif #ifdef __ia64__ register void* env __asm__("r15"); #endif #ifdef __x86_64__ register void* env __asm__("r10"); #endif #if defined(__s390__) || defined(__s390x__) register void* env __asm__("r0"); #endif #if defined(__riscv32__) || defined(__riscv64__) register void* env __asm__("t2"); #endif #ifdef __loongarch64__ register void* env __asm__("r20"); #endif return x + (int)(long)((void**)env)[1] + (int)(long)((void**)env)[0] + MAGIC3; #else return x + MAGIC3; #endif } int main () { function cf = alloc_trampoline_r((function)&f, (void*)MAGIC1, (void*)MAGIC2); #ifdef CHECK_ENV_REGISTER if ((*cf)(MAGIC4) == MAGIC1+MAGIC2+MAGIC3+MAGIC4) #else if ((*cf)(MAGIC4) == MAGIC3+MAGIC4) #endif { free_trampoline_r(cf); printf("Works, test1 passed.\n"); exit(0); } else { printf("Doesn't work!\n"); exit(1); } } libffcall-2.5/callback/trampoline_r/cache-sparc-macro.S0000664000000000000000000000062114662617145020025 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(__TR_clear_cache_2) DECLARE_FUNCTION(__TR_clear_cache_2) .proc 020 FUNBEGIN(__TR_clear_cache_2) !$PROLOGUE$ 0 iflush %o0+0;iflush %o0+8 nop retl nop L(Lfe1): FUNEND(__TR_clear_cache_2) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/README0000644000000000000000000000102013026317517015272 00000000000000This directory contains a reentrant version of the trampoline package. Instead of clobbering a global variable, a pointer to data0,data1,... is passed to the called function in a special CPU register. The number of supported data words (data0,data1) is arbitrary; 3 or 4 or more would work as well if trampoline.c was modified appropriately. Two words are needed, however, for passing closures through vacall_r without an additional malloc() call per closure. The include file is renamed to . libffcall-2.5/callback/trampoline_r/trampoline_r.30000664000000000000000000000644413136760230017206 00000000000000.\" Copyright (C) 1995-2017 Bruno Haible .\" .\" This manual is free documentation. It is dually licensed under the .\" GNU FDL and the GNU GPL. This means that you can redistribute this .\" manual under either of these two licenses, at your choice. .\" .\" This manual is covered by the GNU FDL. Permission is granted to copy, .\" distribute and/or modify this document under the terms of the .\" GNU Free Documentation License (FDL), either version 1.2 of the .\" License, or (at your option) any later version published by the .\" Free Software Foundation (FSF); with no Invariant Sections, with no .\" Front-Cover Text, and with no Back-Cover Texts. .\" A copy of the license is at . .\" .\" This manual is covered by the GNU GPL. You can redistribute it and/or .\" modify it under the terms of the GNU General Public License (GPL), either .\" version 2 of the License, or (at your option) any later version published .\" by the Free Software Foundation (FSF). .\" A copy of the license is at . .\" .TH TRAMPOLINE 3 "1 January 2017" .SH NAME trampoline \- closures as first-class C functions .SH SYNOPSIS .B #include .LP .B function = alloc_trampoline_r(address, data0, data1); .LP .B free_trampoline_r(function); .LP .nf .B is_trampoline_r(function) .B trampoline_r_address(function) .B trampoline_r_data0(function) .B trampoline_r_data1(function) .fi .SH DESCRIPTION .LP These functions implement .I closures as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. Closures as .I first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. .IB function " = alloc_trampoline_r(" address ", " data0 ", " data1 ")" allocates a closure. When .I function gets called, it stores in a special "lexical chain register" a pointer to a storage area containing .I data0 in its first word and .I data1 in its second word and calls the C function at .IR address . The function at .I address is responsible for fetching .I data0 and .I data1 off the pointer. Note that the "lexical chain register" is a call-used register, i.e. is clobbered by function calls. This is much like .BR gcc "'s" local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while .I trampoline provides functions with indefinite extent: .I function is only deallocated when .BI free_trampoline_r( function ) is called. .BI "is_trampoline_r(" function ")" checks whether the C function .I function was produced by a call to .IR alloc_trampoline_r . If this returns true, the arguments given to .I alloc_trampoline_r can be retrieved: .RS 4 .LP .BI "trampoline_r_address(" function ")" returns .IR address , .LP .BI "trampoline_r_data0(" function ")" returns .IR data0 , .LP .BI "trampoline_r_data1(" function ")" returns .IR data1 . .RE .SH SEE ALSO .BR trampoline (3), .BR gcc (1), .BR stdarg (3) .SH PORTING The way .B gcc builds local functions is described in the gcc source, file .RI gcc-2.6.3/config/ cpu / cpu .h. .SH AUTHOR Bruno Haible .SH ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. libffcall-2.5/callback/trampoline_r/test2.c0000664000000000000000000000324214662613035015632 00000000000000/* Trampoline accessor test */ /* * Copyright 1995-2023 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include "trampoline_r.h" #if defined __cplusplus || __STDC_VERSION__ >= 202300L typedef int (*function)(...); #else typedef int (*function)(); #endif int f (int x) { return x; } #define MAGIC1 0x9db9af42 #define MAGIC2 0x614a13c9 int main () { function cf = alloc_trampoline_r((function)&f, (void*)MAGIC1, (void*)MAGIC2); if (is_trampoline_r((void*)&main)) { printf("is_trampoline_r(&main) returns true!\n"); exit(1); } if (!is_trampoline_r((void*)cf)) { printf("is_trampoline_r() returns false!\n"); exit(1); } if (trampoline_r_address(cf) != (function)&f) { printf("trampoline_r_address() doesn't work!\n"); exit(1); } if (trampoline_r_data0(cf) != (void*)MAGIC1) { printf("trampoline_r_data0() doesn't work!\n"); exit(1); } if (trampoline_r_data1(cf) != (void*)MAGIC2) { printf("trampoline_r_data1() doesn't work!\n"); exit(1); } printf("test2 passed.\n"); exit(0); } libffcall-2.5/callback/trampoline_r/trampoline_r.h0000664000000000000000000000314414660710411017264 00000000000000/* * Copyright 1995-2023 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _TRAMPOLINE_R_H #define _TRAMPOLINE_R_H /* Use a consistent prefix for all symbols in libcallback. */ #define alloc_trampoline_r callback_trampoline_alloc #define free_trampoline_r callback_trampoline_free #define is_trampoline_r callback_trampoline_is #define trampoline_r_address callback_trampoline_address #define trampoline_r_data0 callback_trampoline_data0 #define trampoline_r_data1 callback_trampoline_data1 #if defined __cplusplus || __STDC_VERSION__ >= 202300L typedef int (*__TR_function) (...); #else typedef int (*__TR_function) (); #endif extern __TR_function alloc_trampoline_r (__TR_function, void*, void*); extern void free_trampoline_r (__TR_function); extern int is_trampoline_r (void*); extern __TR_function trampoline_r_address (__TR_function); extern void* trampoline_r_data0 (__TR_function); extern void* trampoline_r_data1 (__TR_function); #endif /* _TRAMPOLINE_R_H */ libffcall-2.5/callback/trampoline_r/cache-hppa64-linux.s0000664000000000000000000000075414662617145020124 00000000000000 .LEVEL 2.0w .text .align 8 .globl __TR_clear_cache .type __TR_clear_cache,@function __TR_clear_cache: .PROC .CALLINFO FRAME=128,NO_CALLS .ENTRY ldo 128(%r30),%r30 #APP fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r31 ldsid (0,%r26),%r28 mtsp %r28,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r31,%sr0 nop nop nop nop nop nop #NO_APP bve (%r2) ldo -128(%r30),%r30 .EXIT .PROCEND .Lfe1: .size __TR_clear_cache,.Lfe1-__TR_clear_cache .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/trampoline_r/cache-powerpc-linux.s0000664000000000000000000000122214664204344020463 00000000000000 .file "cache-powerpc.c" .section ".text" .align 2 .globl __TR_clear_cache_2 .type __TR_clear_cache_2, @function __TR_clear_cache_2: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-32(1) #APP icbi 0,3; dcbf 0,3 #NO_APP addi 0,3,4 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 9,3,8 #APP icbi 0,9; dcbf 0,9 #NO_APP addi 0,3,12 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 9,3,16 #APP icbi 0,9; dcbf 0,9 #NO_APP addi 3,3,20 #APP icbi 0,3; dcbf 0,3 sync; isync #NO_APP addi 1,1,32 blr .size __TR_clear_cache_2, .-__TR_clear_cache_2 .section .note.GNU-stack,"",@progbits .ident "GCC: (GNU) 3.3.6" libffcall-2.5/callback/trampoline_r/cache-hppa-linux.s0000664000000000000000000000070414662617145017745 00000000000000 .LEVEL 1.1 .text .align 4 .globl __TR_clear_cache .type __TR_clear_cache,@function __TR_clear_cache: .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY #APP fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r20 ldsid (0,%r26),%r26 mtsp %r26,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r20,%sr0 nop nop nop nop nop nop #NO_APP bv,n %r0(%r2) .EXIT .PROCEND .Lfe1: .size __TR_clear_cache,.Lfe1-__TR_clear_cache .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/trampoline_r/cache-sparc.c0000664000000000000000000000205314662613035016741 00000000000000/* Instruction cache flushing for sparc */ /* * Copyright 1996-1999 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* * This assumes that the range [first_addr..last_addr] lies in at most two * cache lines. */ void __TR_clear_cache_2 (char* first_addr, char* last_addr) { asm volatile ("iflush %0+0;" /* the +0 is needed by gas, says gforth-0.3.0 */ "iflush %0+8" : : "r" (first_addr)); } libffcall-2.5/callback/trampoline_r/cache-alpha.c0000664000000000000000000000157214662613035016723 00000000000000/* Instruction cache flushing for alpha */ /* * Copyright 1997 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache (void) { /* Taken from gforth-0.3.0. */ asm volatile ("call_pal 0x86"); /* imb (instruction-memory barrier) */ } libffcall-2.5/callback/trampoline_r/cache-hppa64-macro.S0000664000000000000000000000115714662617145020024 00000000000000#include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(__TR_clear_cache) DECLARE_FUNCTION(__TR_clear_cache) DEF(__TR_clear_cache) .PROC .CALLINFO FRAME=128,NO_CALLS .ENTRY ldo 128(%r30),%r30 fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r31 ldsid (0,%r26),%r28 mtsp %r28,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r31,%sr0 nop nop nop nop nop nop bve (%r2) ldo -128(%r30),%r30 .EXIT .PROCEND DEF(L(fe1)) FUNEND(__TR_clear_cache) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/tramp-ia64-macro.S0000664000000000000000000000226313347755276017553 00000000000000/* Trampoline for ia64 CPU */ /* * Copyright 2001-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r14 ... r31, r9 ... r11, r2 ... r3. */ .text .align 16 .global tramp_r# .proc tramp_r# tramp_r: /* The closure pointer is already in register r1. */ ld8 r14 = [r1] /* Move
into register r14. */ adds r15 = 8, r1 ;; ld8 r15 = [r15] /* Move into register r15. */ /* Jump to r14. */ ld8 r17 = [r14] adds r16 = 8, r14 ;; ld8 r1 = [r16] mov b6 = r17 ;; br b6 ;; .endp tramp_r# #include "noexecstack.h" libffcall-2.5/callback/trampoline_r/cache-alpha-linux.s0000664000000000000000000000054014662617145020100 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl __TR_clear_cache .ent __TR_clear_cache $__TR_clear_cache..ng: __TR_clear_cache: .frame $30,0,$26,0 .prologue 0 .set macro call_pal 0x86 .set nomacro ret $31,($26),1 .end __TR_clear_cache .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/callback/trampoline_r/PORTING0000644000000000000000000000701013031471342015455 00000000000000The list of CPUs and platforms TRAMPOLINE has been ported to can be found at the top of file trampoline.c. To port TRAMPOLINE to a new platform, three issues may have to be resolved: A. a new CPU - how to build the trampoline? B. a new OS - how to make code in malloc'ed memory executable? C. a new CPU or OS - how to flush the instruction cache? A. a new CPU - how to build the trampoline? The trampoline is a short sequence of machine instructions which puts the constant into , then jumps to
. The only registers that are allowed to be modified are call-used registers. No stack manipulations are allowed since the trampoline has to pass its arguments along to the function at
. 1. To find out which instructions are available for "move"/"store" and "jump", compile proto.c for your CPU: make -f Makefile.devel proto-${CPU}.s or gcc -O2 -fomit-frame-pointer -S proto.c -o proto-${CPU}.s 2. Write down the instructions for the trampoline in a file tramp-${CPU}.s, using constants for , ,
. Assemble it: gcc -c tramp-${CPU}.s Verify that the jump actually goes to
. (Beware: Some CPUs have program-counter relative jumps.) gdb tramp-${CPU}.o disassemble tramp 3. Take a hex dump of tramp-${CPU}.o hexdump -e '"%06.6_ax " 16/1 " %02X" "\n"' < tramp-${CPU}.o or od -tx1 -Ax < tramp-${CPU}.o or od -x +x < tramp-${CPU}.o Look out for the magic numbers you used for , and
. 4. Write the code which builds up a trampoline in memory, in trampoline.c. 5. Try it: make make check1 6. Write the is_tramp() macro and the tramp_xxx() accessor macros in trampoline.c. 7. Try it: make make check B. a new OS - how to make code in malloc'ed memory executable? ‘configure’ will find out whether code stored in malloc'ed memory is executable, or whether virtual memory protections have to be set in order to allow this. (The test is pretty simple: it copies a small function to malloc'ed memory and tries to executed it. The test could also fail because the compiler produced non-position-independent code or because of alignment issues.) To set virtual memory protections on a page of memory, your system should provide the mprotect() and getpagesize() functions. If it does not, find a substitute. C. a new CPU or OS - how to flush the instruction cache? CPUs which have separate data and instruction caches need to flush (part of) the instruction cache when alloc_trampoline() is called. (There may have been an old trampoline at the same location, and the instruction cache is not updated when the new trampoline is built. The effect can be that when the new trampoline is called, the old one will still be executed.) To flush the instruction cache, some CPUs have special instruction which can be put into gcc "asm" statements. On some CPUs these instructions are privileged, you therefore need to call some system or library function. On other CPUs, the only way to flush the instruction cache is to execute a long sequence of "nop" or "jump" instructions. This is hairy. When you are done with porting to a new platform, or even if TRAMPOLINE passes the "make check" out of the box without modifications, please report your results to the author of TRAMPOLINE, for inclusion in the next release. libffcall-2.5/callback/trampoline_r/cache-powerpc64-elfv2-macro.S0000664000000000000000000000136714664204344021565 00000000000000 .file "cache-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl __TR_clear_cache_2 .type __TR_clear_cache_2, @function __TR_clear_cache_2: # 25 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 addi 9,3,4 # 26 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 9,3,8 # 27 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 3,3,12 # 28 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 # 29 "cache-powerpc64.c" 1 sync; isync # 0 "" 2 blr .long 0 .byte 0,0,0,0,0,0,0,0 .size __TR_clear_cache_2,.-__TR_clear_cache_2 #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/cache-sparc-linux.s0000664000000000000000000000044114662617145020123 00000000000000 .file "cache-sparc.c" .section ".text" .align 4 .global __TR_clear_cache_2 .type __TR_clear_cache_2,#function .proc 020 __TR_clear_cache_2: !#PROLOGUE# 0 iflush %o0+0;iflush %o0+8 nop retl nop .LLfe1: .size __TR_clear_cache_2,.LLfe1-__TR_clear_cache_2 .ident "GCC: (GNU) 3.1" libffcall-2.5/callback/trampoline_r/Makefile.maint0000664000000000000000000000077113153072372017175 00000000000000# maintainer -*-Makefile-*- RM = rm -f # ==================== Easily regeneratable files ==================== ROFF_MAN = groff -Tutf8 -mandoc all : trampoline_r.man trampoline_r.man : trampoline_r.3 $(ROFF_MAN) trampoline_r.3 > trampoline_r.man totally-clean : force $(RM) trampoline_r.man # Files copied from other directories COPIED_FILES = \ PORTING \ cache.c \ cache-alpha.c \ cache-hppa.c copied-files : $(COPIED_FILES) $(COPIED_FILES) : % : ../../trampoline/% cp $< $@ force : libffcall-2.5/callback/trampoline_r/cache.c0000664000000000000000000001057214664201460015635 00000000000000/* This file is derived from gcc-2.6.3/libgcc2.c, section L_clear_cache */ /* Copyright (C) 1989-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* Clear part of an instruction cache. */ /* Our emphasis here is _not_ to clear as few cache lines as possible * or with as few machine instructions as possible, but to do it _right_. */ /* This code is apparently untested!! */ /* This is from Andreas Stolcke . */ #if defined(__mips__) || defined(__mips64__) #include #define CLEAR_INSN_CACHE(BEG, END) \ cacheflush (BEG, END - BEG, BCACHE) #endif void __TR_clear_cache (char *beg, char *end) { #ifdef CLEAR_INSN_CACHE CLEAR_INSN_CACHE (beg, end); #else #ifdef INSN_CACHE_SIZE /* This is actually dead code!! */ #define INSN_CACHE_PLANE_SIZE (INSN_CACHE_SIZE / INSN_CACHE_DEPTH) static char array[INSN_CACHE_SIZE + INSN_CACHE_PLANE_SIZE + INSN_CACHE_LINE_WIDTH]; static int initialized = 0; int offset; void *start_addr; void *end_addr; typedef (*function_ptr) (); #if (INSN_CACHE_SIZE / INSN_CACHE_LINE_WIDTH) < 16 /* It's cheaper to clear the whole cache. Put in a series of jump instructions so that calling the beginning of the cache will clear the whole thing. */ if (! initialized) { int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH); int end_ptr = ptr + INSN_CACHE_SIZE; while (ptr < end_ptr) { *(INSTRUCTION_TYPE *)ptr = JUMP_AHEAD_INSTRUCTION + INSN_CACHE_LINE_WIDTH; ptr += INSN_CACHE_LINE_WIDTH; } *(INSTRUCTION_TYPE *)(ptr - INSN_CACHE_LINE_WIDTH) = RETURN_INSTRUCTION; initialized = 1; } /* Call the beginning of the sequence. */ (((function_ptr) (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH)) ()); #else /* Cache is large. */ if (! initialized) { int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH); while (ptr < (int) array + sizeof array) { *(INSTRUCTION_TYPE *)ptr = RETURN_INSTRUCTION; ptr += INSN_CACHE_LINE_WIDTH; } initialized = 1; } /* Find the location in array that occupies the same cache line as BEG. */ offset = ((int) beg & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1); start_addr = (((int) (array + INSN_CACHE_PLANE_SIZE - 1) & -INSN_CACHE_PLANE_SIZE) + offset); /* Compute the cache alignment of the place to stop clearing. */ #if 0 /* This is not needed for gcc's purposes. */ /* If the block to clear is bigger than a cache plane, we clear the entire cache, and OFFSET is already correct. */ if (end < beg + INSN_CACHE_PLANE_SIZE) #endif offset = (((int) (end + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1)); #if INSN_CACHE_DEPTH > 1 end_addr = (start_addr & -INSN_CACHE_PLANE_SIZE) + offset; if (end_addr <= start_addr) end_addr += INSN_CACHE_PLANE_SIZE; for (plane = 0; plane < INSN_CACHE_DEPTH; plane++) { int addr = start_addr + plane * INSN_CACHE_PLANE_SIZE; int stop = end_addr + plane * INSN_CACHE_PLANE_SIZE; while (addr != stop) { /* Call the return instruction at ADDR. */ ((function_ptr) addr) (); addr += INSN_CACHE_LINE_WIDTH; } } #else /* just one plane */ do { /* Call the return instruction at START_ADDR. */ ((function_ptr) start_addr) (); start_addr += INSN_CACHE_LINE_WIDTH; } while ((start_addr % INSN_CACHE_SIZE) != offset); #endif /* just one plane */ #endif /* Cache is large */ #endif /* Cache exists */ #endif /* CLEAR_INSN_CACHE */ } libffcall-2.5/callback/trampoline_r/trampoline_r.html0000664000000000000000000001111113136760230017773 00000000000000 TRAMPOLINE_R manual page

TRAMPOLINE_R manual page

Name

 trampoline_r - closures as first-class C functions

Synopsis

 
#include <trampoline_r.h>
function = alloc_trampoline_r(address, data0, data1);
free_trampoline_r(function);
is_trampoline_r(function)
trampoline_r_address(function)
trampoline_r_data0(function)
trampoline_r_data1(function)

Description

 These functions implement closures as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called.

Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. function = alloc_trampoline_r(address, data0, data1) allocates a closure. When function gets called, it stores in a special "lexical chain register" a pointer to a storage area containing data0 in its first word and data1 in its second word and calls the C function at address. The function at address is responsible for fetching data0 and data1 off the pointer. Note that the "lexical chain register" is a call-used register, i.e. is clobbered by function calls.

This is much like gcc's local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while trampoline provides functions with indefinite extent: function is only deallocated when free_trampoline_r(function) is called.

is_trampoline_r(function) checks whether the C function function was produced by a call to alloc_trampoline_r. If this returns true, the arguments given to alloc_trampoline_r can be retrieved:

  • trampoline_r_address(function) returns address,
  • trampoline_r_data0(function) returns data0,
  • trampoline_r_data1(function) returns data1.

See also

 trampoline(3), gcc(1), stdarg(3)

Porting

 The way gcc builds local functions is described in the gcc source, file gcc-2.6.3/config/cpu/cpu.h.

Author

 Bruno Haible <bruno@clisp.org>

Acknowledgements

 Many ideas were cribbed from the gcc source.

TRAMPOLINE_R manual page
Bruno Haible <bruno@clisp.org>

Last modified: 1 January 2017. libffcall-2.5/callback/trampoline_r/cache-powerpc-linux-macro.S0000664000000000000000000000122414664204344021524 00000000000000 .file "cache-powerpc.c" .section ".text" .align 2 .globl __TR_clear_cache_2 .type __TR_clear_cache_2, @function __TR_clear_cache_2: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-32(1) icbi 0,3; dcbf 0,3 addi 0,3,4 icbi 0,0; dcbf 0,0 addi 9,3,8 icbi 0,9; dcbf 0,9 addi 0,3,12 icbi 0,0; dcbf 0,0 addi 9,3,16 icbi 0,9; dcbf 0,9 addi 3,3,20 icbi 0,3; dcbf 0,3 sync; isync addi 1,1,32 blr .size __TR_clear_cache_2, .-__TR_clear_cache_2 #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/callback/trampoline_r/COPYING0000644000000000000000000004335713026317516015467 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/callback/trampoline_r/cache-hppa.c0000664000000000000000000000414514662613035016565 00000000000000/* Instruction cache flushing for hppa */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifdef __hppa64__ /* Tell GCC not to clobber the registers that are call-saved in the HP C calling convention. */ register long arg0 __asm__("r26"); register long arg1 __asm__("r25"); register long arg2 __asm__("r24"); register long arg3 __asm__("r23"); register long arg4 __asm__("r22"); register long arg5 __asm__("r21"); register long arg6 __asm__("r20"); register long arg7 __asm__("r19"); #endif /* * This assumes that the range [first_addr..last_addr] lies in at most two * cache lines. */ void __TR_clear_cache (char* first_addr, char* last_addr) { register int tmp1; register int tmp2; /* Flush the relevant data cache lines. (Yes, this is needed. I tried it.) */ asm volatile ("fdc 0(0,%0)" "\n\t" "fdc 0(0,%1)" "\n\t" "sync" : : "r" (first_addr), "r" (last_addr) ); /* Flush the relevant instruction cache lines. */ asm volatile ("mfsp %%sr0,%1" "\n\t" "ldsid (0,%4),%0" "\n\t" "mtsp %0,%%sr0" "\n\t" "fic 0(%%sr0,%2)" "\n\t" "fic 0(%%sr0,%3)" "\n\t" "sync" "\n\t" "mtsp %1,%%sr0" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" : "=r" (tmp1), "=r" (tmp2) : "r" (first_addr), "r" (last_addr), "r" (first_addr) ); } libffcall-2.5/callback/README0000664000000000000000000000400413347755266012623 00000000000000callback - closures with variable arguments as first-class C functions This library implements closures with variable arguments and variable return values as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. This library is especially suited to the implementation of call-back functions in embedded interpreters. Installation instructions: Configure the parent directory. Then: cd callback make make check make install Files in this package: Documentation: README this text COPYING free software license PLATFORMS list of supported platforms MIGRATION migration guide from vacall+trampoline callback.3 manual page in Unix man format callback.man manual page callback.html manual page in HTML format Source: callback.h include file tests.c test program vacall_r/* a reentrant version of the vacall package trampoline_r/* a reentrant version of the trampoline package Building: Makefile.in Makefile master Porting: Makefile.devel developer's Makefile call-used-registers.txt table of call-used registers on different CPUs Copyright notice: Copyright 1995-2017 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . libffcall-2.5/callback/callback-libapi.c0000664000000000000000000000315513347755265015106 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #define __TR_function obsolete__TR_function #include "callback.h" #undef __TR_function #include "trampoline_r.h" /* This is the implementation of the library API. The symbols that the linker sees are all prefixed with 'callback_', to avoid potential collisions with other libraries. */ callback_t alloc_callback (callback_function_t address, void* data) { return alloc_trampoline_r((__TR_function)callback_get_receiver(),(void*)address,data); } void free_callback (callback_t callback) { free_trampoline_r (callback); } int is_callback (void* callback) { return is_trampoline_r(callback) && trampoline_r_address((__TR_function)callback) == (__TR_function)callback_get_receiver(); } callback_function_t callback_address (callback_t callback) { return (callback_function_t)trampoline_r_data0(callback); } void* callback_data (callback_t callback) { return trampoline_r_data1(callback); } libffcall-2.5/callback/MIGRATION0000664000000000000000000000553013136760230013203 00000000000000Migration Guide =============== When switching from vacall+trampoline to callback, you need to make the following changes to your code: vacall+trampoline callback ----------------- -------- -- Include files -- #include "vacall/vacall.h" #include "callback/callback.h" #include "trampoline/trampoline.h" -- Variable declarations -- static void* trampvar; -- Callback declaration -- static void static void mycallback (va_alist args) mycallback (void* data, va_alist args) { { void* data = trampvar; ... ... -- Initialization -- vacall_function = &mycallback; -- Allocating a callback -- void* trampoline = void* trampoline = alloc_trampoline( alloc_callback(&mycallback,data); (__TR_function)&vacall, &trampvar, data); -- Testing for a callback -- if if (is_trampoline(address) (is_callback(address) && (trampoline_address(address) && (callback_address(address) == (__TR_function)&vacall) == &mycallback) && (trampoline_variable(address) ) == &trampvar) ) void* data = trampoline_data(address); void* data = callback_data(address); -- Deallocating a callback -- free_trampoline(address); free_callback(address); -- Libraries -- libvacall.a libtrampoline.a libcallback.a ================================================================================ Copyright (C) 1995-1998 Bruno Haible This manual is free documentation. It is dually licensed under the GNU FDL and the GNU GPL. This means that you can redistribute this manual under either of these two licenses, at your choice. This manual is covered by the GNU FDL. Permission is granted to copy, distribute and/or modify this document under the terms of the GNU Free Documentation License (FDL), either version 1.2 of the License, or (at your option) any later version published by the Free Software Foundation (FSF); with no Invariant Sections, with no Front-Cover Text, and with no Back-Cover Texts. A copy of the license is at . This manual is covered by the GNU GPL. You can redistribute it and/or modify it under the terms of the GNU General Public License (GPL), either version 2 of the License, or (at your option) any later version published by the Free Software Foundation (FSF). A copy of the license is at . libffcall-2.5/callback/callback.man0000664000000000000000000002125414665326517014177 00000000000000CALLBACK(3) Library Functions Manual CALLBACK(3) NAME callback - closures with variable arguments as first-class C functions SYNOPSIS #include  void function (void* data, va_alist alist) { va_start_type(alist[, return_type]); arg = va_arg_type(alist[, arg_type]); va_return_type(alist[[, return_type], return_value]); } callback = alloc_callback(&function, data); free_callback(callback); is_callback(callback) callback_address(callback) callback_data(callback) DESCRIPTION These functions implement closures with variable arguments as first- class C functions. Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. Moreover, they can be called with variable arguments and can return variable return values. callback = alloc_callback(&function, data) allocates a callback. When callback gets called, it arranges to call function, passing data as first argument and, as second argument, the entire sequence of argu‐ ments passed to callback. Function calling conventions differ considerably on different machines, therefore the arguments are accessed and the result value is stored through the same macros as used by the vacall package, see below. The callbacks are functions with indefinite extent: callback is only deallocated when free_callback(callback) is called. is_callback(callback) checks whether the C function callback was pro‐ duced by a call to alloc_callback. If this returns true, the arguments given to alloc_callback can be retrieved: callback_address(callback) returns &function, callback_data(callback) returns data. VACALL MACROS Within function, the following macros can be used to walk through the argument list and specify a return value: va_start_type(alist[, return_type]); starts the walk through the argument list and specifies the return type. arg = va_arg_type(alist[, arg_type]); fetches the next argument from the argument list. va_return_type(alist[[, return_type], return_value]); ends the walk through the argument list and specifies the return value. The type in va_start_type and va_return_type shall be one of void, int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of return_type. The type specifiers in va_start_type and va_return_type must be the same. The return_type specifiers passed to va_start_type and va_return_type must be the same. The type in va_arg_type shall be one of int, uint, long, ulong, long‐ long, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of arg_type. In va_start_struct(alist, return_type, splittable); the splittable flag specifies whether the struct return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: va_word_splittable_1 (type1) va_word_splittable_2 (type1, type2) va_word_splittable_3 (type1, type2, type3) va_word_splittable_4 (type1, type2, type3, type4) For a struct with three slots struct { type1 id1; type2 id2; type3 id3; } you can specify splittable as va_word_splittable_3 (type1, type2, type3) . NOTES Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the type values char, schar, uchar, short, ushort, float. As pre‐ scribed by the default K&R C expression promotions, they have to use int instead of char, schar, uchar, short, ushort and double instead of float. The macros va_start_longlong(), va_start_ulonglong(), va_return_long‐ long(), va_return_ulonglong(), va_arg_longlong() and va_arg_ulonglong() work only if the C compiler has a working long long 64-bit integer type. The struct types used in va_start_struct() and va_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported. SEE ALSO vacall(3), trampoline(3). BUGS The current implementations have been tested on a selection of common cases but there are probably still many bugs. There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments. The decision whether a struct is to be returned in registers or in mem‐ ory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in regis‐ ters and struct { char a[3]; } in memory, although both types have the same size and the same alignment. The argument list can only be walked once. NON-BUGS All information is passed in CPU registers and the stack. The callback package is therefore multithread-safe. PORTING Porting callback consists in first porting the vacall and trampoline packages, then choosing a CPU register for passing the closure from trampoline to vacall. This register is normally the register desig‐ nated by STATIC_CHAIN_REGNUM in the gcc source, file gcc-2.7.2/con‐ fig/cpu/cpu.h. AUTHOR Bruno Haible ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. 1 January 2017 CALLBACK(3) libffcall-2.5/callback/minitests.c0000664000000000000000000000136613347755265014135 00000000000000/* * Copyright 1999-2001 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #define SKIP_EXTRA_STRUCTS #include "tests.c" libffcall-2.5/callback/PLATFORMS0000664000000000000000000000513414171044775013232 00000000000000Supported CPUs: (Put the GNU config.guess values here.) i386 i486-pc-linux (gcc), i686-unknown-gnu0.9 (gcc), i386-pc-solaris2.6 (gcc), i386-pc-solaris2.10 (gcc, cc), i386-w64-mingw32 (gcc, MSVC 14), i586-unknown-freebsd11.0 (cc), i386-unknown-dragonfly3.8 (gcc), i386-unknown-netbsdelf7.0 (gcc), i386-unknown-openbsd6.0 (gcc), i586-pc-haiku (gcc-x86), i386-pc-minix (clang) m68k m68k-unknown-linux (gcc) mips mips-sgi-irix5.3 (gcc), mips-sgi-irix6.4 (cc -32, -n32, -64), mips-sgi-irix6.5 (cc -32, -n32, gcc -mabi=n32), mips-unknown-linux (gcc -mabi=32), mips64-unknown-linux (gcc -mabi=n32, gcc -mabi=64) sparc sparc-sun-sunos4.1.3_U1 (gcc), sparc-sun-solaris2.4 (gcc), sparc-sun-solaris2.10 (gcc, cc), sparc64-sun-solaris2.10 (gcc -m64, cc -xarch=generic64), sparc-unknown-linux (gcc), sparc64-unknown-linux (gcc), sparc-unknown-netbsdelf7.1 (gcc), sparc64-unknown-netbsd8.0 (gcc) alpha alpha-dec-osf3.2 (gcc), alpha-dec-osf4.0 (gcc, cc), alphaev67-unknown-linux (gcc) hppa hppa1.1-hp-hpux9.05 (cc), hppa1.1-hp-hpux10.01 (cc), hppa2.0-hp-hpux10.20 (cc +DA1.1), hppa2.0w-hp-hpux11.31 (cc), hppa-unknown-linux (gcc) hppa64 hppa64-hp-hpux11.31 (cc +DD64) arm armv5tejl-unknown-linux (gcc), armv6l-unknown-linux (gcc), armv7l-unknown-linux (gcc) arm64 aarch64-unknown-linux (gcc), aarch64-apple-darwin20.4.0 (cc) powerpc powerpc-ibm-aix7.1.3.0 (xlc, gcc), powerpc-unknown-linux (gcc), powerpc-apple-darwin6.8 (gcc), powerpc-apple-darwin9.8.0 (gcc) powerpc64 powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"), powerpc64-unknown-linux (gcc -m64), powerpc64le-unknown-linux (gcc) ia64 ia64-unknown-linux (gcc) x86_64 x86_64-suse-linux (gcc), x86_64-unknown-linux (gcc -mx32), x86_64-pc-solaris2.10 (gcc -m64, cc -xarch=generic64), x86_64-pc-cygwin (gcc), x86_64-w64-mingw32 (gcc, MSVC 14), x86_64-unknown-freebsd11.0 (cc), x86_64-unknown-netbsd7.0 (gcc), x86_64-unknown-openbsd6.0 (gcc) s390 s390x-ibm-linux (gcc -m31) s390x s390x-ibm-linux (gcc) riscv32 riscv32-unknown-linux (gcc -mabi=ilp32d) riscv64 riscv64-unknown-linux (gcc -mabi=lp64d) loongarch64 loongarch64-unknown-linux (gcc) libffcall-2.5/callback/tests.c0000664000000000000000000024102314060776405013244 00000000000000/* Some random tests for vacall. */ /* * Copyright 1993 Bill Triggs * Copyright 1995-2021 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include #include "callback.h" #include "testcases.c" #if defined(__m68k__) && defined(__GNUC__) /* "gcc-2.6.3 -freg-struct-return" returns T = struct { char c[3]; } (which * has size 4 !) in memory, in contrast to struct { char a,b,c; } and * struct { char c[4]; } and struct { char a,b,c,d; } which have the same * size and the same alignment but are returned in registers. I don't know why. */ #define SKIP_T #endif #if defined(__sparc__) && defined(__sun) && defined(__SUNPRO_C) /* SUNWspro cc */ /* SunPRO cc miscompiles the simulator function for X_BcdB: d.i[1] is * temporarily stored in %l2 and put onto the stack from %l2, but in between * the copy of X has used %l2 as a counter without saving and restoring its * value. */ #define SKIP_X #endif #if defined(__mipsn32__) && !defined(__GNUC__) /* The X test crashes for an unknown reason. */ #define SKIP_X #endif /* These functions simulate the behaviour of the functions defined in testcases.c. */ /* void tests */ void v_v_simulator (void* data, va_alist alist) { if (data != (void*)&v_v) { fprintf(out,"wrong data for v_v\n"); exit(1); } va_start_void(alist); fprintf(out,"void f(void):\n"); fflush(out); va_return_void(alist); } /* int tests */ void i_v_simulator (void* data, va_alist alist) { if (data != (void*)&i_v) { fprintf(out,"wrong data for i_v\n"); exit(1); } va_start_int(alist); {int r=99; fprintf(out,"int f(void):"); fflush(out); va_return_int(alist, r); }} void i_i_simulator (void* data, va_alist alist) { if (data != (void*)&i_i) { fprintf(out,"wrong data for i_i\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int r=a+1; fprintf(out,"int f(int):(%d)",a); fflush(out); va_return_int(alist, r); }} void i_i2_simulator (void* data, va_alist alist) { if (data != (void*)&i_i2) { fprintf(out,"wrong data for i_i2\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int r=a+b; fprintf(out,"int f(2*int):(%d,%d)",a,b); fflush(out); va_return_int(alist, r); }} void i_i4_simulator (void* data, va_alist alist) { if (data != (void*)&i_i4) { fprintf(out,"wrong data for i_i4\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int r=a+b+c+d; fprintf(out,"int f(4*int):(%d,%d,%d,%d)",a,b,c,d); fflush(out); va_return_int(alist, r); }} void i_i8_simulator (void* data, va_alist alist) { if (data != (void*)&i_i8) { fprintf(out,"wrong data for i_i8\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int r=a+b+c+d+e+f+g+h; fprintf(out,"int f(8*int):(%d,%d,%d,%d,%d,%d,%d,%d)",a,b,c,d,e,f,g,h); fflush(out); va_return_int(alist, r); }} void i_i16_simulator (void* data, va_alist alist) { if (data != (void*)&i_i16) { fprintf(out,"wrong data for i_i16\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int i = va_arg_int(alist); int j = va_arg_int(alist); int k = va_arg_int(alist); int l = va_arg_int(alist); int m = va_arg_int(alist); int n = va_arg_int(alist); int o = va_arg_int(alist); int p = va_arg_int(alist); int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"int f(16*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_int(alist, r); }} void i_i32_simulator (void* data, va_alist alist) { if (data != (void*)&i_i32) { fprintf(out,"wrong data for i_i32\n"); exit(1); } va_start_int(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); int d = va_arg_int(alist); int e = va_arg_int(alist); int f = va_arg_int(alist); int g = va_arg_int(alist); int h = va_arg_int(alist); int i = va_arg_int(alist); int j = va_arg_int(alist); int k = va_arg_int(alist); int l = va_arg_int(alist); int m = va_arg_int(alist); int n = va_arg_int(alist); int o = va_arg_int(alist); int p = va_arg_int(alist); int aa = va_arg_int(alist); int ab = va_arg_int(alist); int ac = va_arg_int(alist); int ad = va_arg_int(alist); int ae = va_arg_int(alist); int af = va_arg_int(alist); int ag = va_arg_int(alist); int ah = va_arg_int(alist); int ai = va_arg_int(alist); int aj = va_arg_int(alist); int ak = va_arg_int(alist); int al = va_arg_int(alist); int am = va_arg_int(alist); int an = va_arg_int(alist); int ao = va_arg_int(alist); int ap = va_arg_int(alist); int r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+aa+ab+ac+ad+ae+af+ag+ah+ai+aj+ak+al+am+an+ao+ap; fprintf(out,"int f(32*int):(%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d)", a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,aa,ab,ac,ad,ae,af,ag,ah,ai,aj,ak,al,am,an,ao,ap); fflush(out); va_return_int(alist, r); }} /* float tests */ void f_f_simulator (void* data, va_alist alist) { if (data != (void*)&f_f) { fprintf(out,"wrong data for f_f\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float r=a+1.0; fprintf(out,"float f(float):(%g)",a); fflush(out); va_return_float(alist, r); }} void f_f2_simulator (void* data, va_alist alist) { if (data != (void*)&f_f2) { fprintf(out,"wrong data for f_f2\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float r=a+b; fprintf(out,"float f(2*float):(%g,%g)",a,b); fflush(out); va_return_float(alist, r); }} void f_f4_simulator (void* data, va_alist alist) { if (data != (void*)&f_f4) { fprintf(out,"wrong data for f_f4\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float r=a+b+c+d; fprintf(out,"float f(4*float):(%g,%g,%g,%g)",a,b,c,d); fflush(out); va_return_float(alist, r); }} void f_f8_simulator (void* data, va_alist alist) { if (data != (void*)&f_f8) { fprintf(out,"wrong data for f_f8\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float r=a+b+c+d+e+f+g+h; fprintf(out,"float f(8*float):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); va_return_float(alist, r); }} void f_f16_simulator (void* data, va_alist alist) { if (data != (void*)&f_f16) { fprintf(out,"wrong data for f_f16\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"float f(16*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_float(alist, r); }} void f_f24_simulator (void* data, va_alist alist) { if (data != (void*)&f_f24) { fprintf(out,"wrong data for f_f24\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float q = va_arg_float(alist); float s = va_arg_float(alist); float t = va_arg_float(alist); float u = va_arg_float(alist); float v = va_arg_float(alist); float w = va_arg_float(alist); float x = va_arg_float(alist); float y = va_arg_float(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+v+w+x+y; fprintf(out,"float f(24*float):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,v,w,x,y); fflush(out); va_return_float(alist, r); }} /* double tests */ void d_d_simulator (void* data, va_alist alist) { if (data != (void*)&d_d) { fprintf(out,"wrong data for d_d\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double r=a+1.0; fprintf(out,"double f(double):(%g)",a); fflush(out); va_return_double(alist, r); }} void d_d2_simulator (void* data, va_alist alist) { if (data != (void*)&d_d2) { fprintf(out,"wrong data for d_d2\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double r=a+b; fprintf(out,"double f(2*double):(%g,%g)",a,b); fflush(out); va_return_double(alist, r); }} void d_d4_simulator (void* data, va_alist alist) { if (data != (void*)&d_d4) { fprintf(out,"wrong data for d_d4\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(4*double):(%g,%g,%g,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} void d_d8_simulator (void* data, va_alist alist) { if (data != (void*)&d_d8) { fprintf(out,"wrong data for d_d8\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double r=a+b+c+d+e+f+g+h; fprintf(out,"double f(8*double):(%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h); fflush(out); va_return_double(alist, r); }} void d_d16_simulator (void* data, va_alist alist) { if (data != (void*)&d_d16) { fprintf(out,"wrong data for d_d16\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); double n = va_arg_double(alist); double o = va_arg_double(alist); double p = va_arg_double(alist); double r=a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p; fprintf(out,"double f(16*double):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p); fflush(out); va_return_double(alist, r); }} /* pointer tests */ void vp_vpdpcpsp_simulator (void* data, va_alist alist) { if (data != (void*)&vp_vpdpcpsp) { fprintf(out,"wrong data for vp_vpdpcpsp\n"); exit(1); } va_start_ptr(alist, void*); {void* a = va_arg_ptr(alist, void*); double* b = va_arg_ptr(alist, double*); char* c = va_arg_ptr(alist, char*); Int* d = va_arg_ptr(alist, Int*); void* ret = (char*)b + 1; fprintf(out,"void* f(void*,double*,char*,Int*):(0x%p,0x%p,0x%p,0x%p)",a,b,c,d); fflush(out); va_return_ptr(alist, void*, ret); }} /* mixed number tests */ void uc_ucsil_simulator (void* data, va_alist alist) { if (data != (void*)&uc_ucsil) { fprintf(out,"wrong data for uc_ucsil\n"); exit(1); } va_start_uchar(alist); {uchar a = va_arg_uchar(alist); ushort b = va_arg_ushort(alist); uint c = va_arg_uint(alist); ulong d = va_arg_ulong(alist); uchar r = (uchar)-1; fprintf(out,"uchar f(uchar,ushort,uint,ulong):(%u,%u,%u,%lu)",a,b,c,d); fflush(out); va_return_uchar(alist, r); }} void d_iidd_simulator (void* data, va_alist alist) { if (data != (void*)&d_iidd) { fprintf(out,"wrong data for d_iidd\n"); exit(1); } va_start_double(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(int,int,double,double):(%d,%d,%g,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} void d_iiidi_simulator (void* data, va_alist alist) { if (data != (void*)&d_iiidi) { fprintf(out,"wrong data for d_iiidi\n"); exit(1); } va_start_double(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); double d = va_arg_double(alist); int e = va_arg_int(alist); double r=a+b+c+d+e; fprintf(out,"double f(int,int,int,double,int):(%d,%d,%d,%g,%d)",a,b,c,d,e); fflush(out); va_return_double(alist, r); }} void d_idid_simulator (void* data, va_alist alist) { if (data != (void*)&d_idid) { fprintf(out,"wrong data for d_idid\n"); exit(1); } va_start_double(alist); {int a = va_arg_int(alist); double b = va_arg_double(alist); int c = va_arg_int(alist); double d = va_arg_double(alist); double r=a+b+c+d; fprintf(out,"double f(int,double,int,double):(%d,%g,%d,%g)",a,b,c,d); fflush(out); va_return_double(alist, r); }} void d_fdi_simulator (void* data, va_alist alist) { if (data != (void*)&d_fdi) { fprintf(out,"wrong data for d_fdi\n"); exit(1); } va_start_double(alist); {float a = va_arg_float(alist); double b = va_arg_double(alist); int c = va_arg_int(alist); double r=a+b+c; fprintf(out,"double f(float,double,int):(%g,%g,%d)",a,b,c); fflush(out); va_return_double(alist, r); }} void us_cdcd_simulator (void* data, va_alist alist) { if (data != (void*)&us_cdcd) { fprintf(out,"wrong data for us_cdcd\n"); exit(1); } va_start_ushort(alist); {char a = va_arg_char(alist); double b = va_arg_double(alist); char c = va_arg_char(alist); double d = va_arg_double(alist); ushort r = (ushort)(int)(a + b + c + d); fprintf(out,"ushort f(char,double,char,double):('%c',%g,'%c',%g)",a,b,c,d); fflush(out); va_return_ushort(alist, r); }} void ll_iiilli_simulator (void* data, va_alist alist) { if (data != (void*)&ll_iiilli) { fprintf(out,"wrong data for ll_iiilli\n"); exit(1); } va_start_longlong(alist); {int a = va_arg_int(alist); int b = va_arg_int(alist); int c = va_arg_int(alist); long long d = va_arg_longlong(alist); int e = va_arg_int(alist); long long r = (long long)(int)a + (long long)(int)b + (long long)(int)c + d + (long long)e; fprintf(out,"long long f(int,int,int,long long,int):(%d,%d,%d,0x%lx%08lx,%d)",a,b,c,(long)(d>>32),(long)(d&0xffffffff),e); fflush(out); va_return_longlong(alist, r); }} void ll_flli_simulator (void* data, va_alist alist) { if (data != (void*)&ll_flli) { fprintf(out,"wrong data for ll_flli\n"); exit(1); } va_start_longlong(alist); {float a = va_arg_float(alist); long long b = va_arg_longlong(alist); int c = va_arg_int(alist); long long r = (long long)(int)a + b + (long long)c; fprintf(out,"long long f(float,long long,int):(%g,0x%lx%08lx,0x%lx)",a,(long)(b>>32),(long)(b&0xffffffff),(long)c); fflush(out); va_return_longlong(alist, r); }} void f_fi_simulator (void* data, va_alist alist) { if (data != (void*)&f_fi) { fprintf(out,"wrong data for f_fi\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); int z = va_arg_int(alist); float r=a+z; fprintf(out,"float f(float,int):(%g,%d)",a,z); fflush(out); va_return_float(alist, r); }} void f_f2i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f2i) { fprintf(out,"wrong data for f_f2i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+z; fprintf(out,"float f(2*float,int):(%g,%g,%d)",a,b,z); fflush(out); va_return_float(alist, r); }} void f_f3i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f3i) { fprintf(out,"wrong data for f_f3i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+z; fprintf(out,"float f(3*float,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); va_return_float(alist, r); }} void f_f4i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f4i) { fprintf(out,"wrong data for f_f4i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+d+z; fprintf(out,"float f(4*float,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); va_return_float(alist, r); }} void f_f7i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f7i) { fprintf(out,"wrong data for f_f7i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+d+e+f+g+z; fprintf(out,"float f(7*float,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); va_return_float(alist, r); }} void f_f8i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f8i) { fprintf(out,"wrong data for f_f8i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+d+e+f+g+h+z; fprintf(out,"float f(8*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); va_return_float(alist, r); }} void f_f12i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f12i) { fprintf(out,"wrong data for f_f12i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"float f(12*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); va_return_float(alist, r); }} void f_f13i_simulator (void* data, va_alist alist) { if (data != (void*)&f_f13i) { fprintf(out,"wrong data for f_f13i\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); int z = va_arg_int(alist); float r=a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"float f(13*float,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); va_return_float(alist, r); }} void d_di_simulator (void* data, va_alist alist) { if (data != (void*)&d_di) { fprintf(out,"wrong data for d_di\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); int z = va_arg_int(alist); double r=a+z; fprintf(out,"double f(double,int):(%g,%d)",a,z); fflush(out); va_return_double(alist, r); }} void d_d2i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d2i) { fprintf(out,"wrong data for d_d2i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+z; fprintf(out,"double f(2*double,int):(%g,%g,%d)",a,b,z); fflush(out); va_return_double(alist, r); }} void d_d3i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d3i) { fprintf(out,"wrong data for d_d3i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+z; fprintf(out,"double f(3*double,int):(%g,%g,%g,%d)",a,b,c,z); fflush(out); va_return_double(alist, r); }} void d_d4i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d4i) { fprintf(out,"wrong data for d_d4i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+d+z; fprintf(out,"double f(4*double,int):(%g,%g,%g,%g,%d)",a,b,c,d,z); fflush(out); va_return_double(alist, r); }} void d_d7i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d7i) { fprintf(out,"wrong data for d_d7i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+d+e+f+g+z; fprintf(out,"double f(7*double,int):(%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,z); fflush(out); va_return_double(alist, r); }} void d_d8i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d8i) { fprintf(out,"wrong data for d_d8i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+d+e+f+g+h+z; fprintf(out,"double f(8*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,z); fflush(out); va_return_double(alist, r); }} void d_d12i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d12i) { fprintf(out,"wrong data for d_d12i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+d+e+f+g+h+i+j+k+l+z; fprintf(out,"double f(12*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,z); fflush(out); va_return_double(alist, r); }} void d_d13i_simulator (void* data, va_alist alist) { if (data != (void*)&d_d13i) { fprintf(out,"wrong data for d_d13i\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); int z = va_arg_int(alist); double r=a+b+c+d+e+f+g+h+i+j+k+l+m+z; fprintf(out,"double f(13*double,int):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%d)",a,b,c,d,e,f,g,h,i,j,k,l,m,z); fflush(out); va_return_double(alist, r); }} /* small structure return tests */ void S1_v_simulator (void* data, va_alist alist) { if (data != (void*)&S1_v) { fprintf(out,"wrong data for S1_v\n"); exit(1); } {Size1 r; va_start_struct(alist, Size1, 1); r = Size1_1; fprintf(out,"Size1 f(void):"); fflush(out); va_return_struct(alist, Size1, r); }} void S2_v_simulator (void* data, va_alist alist) { if (data != (void*)&S2_v) { fprintf(out,"wrong data for S2_v\n"); exit(1); } {Size2 r; va_start_struct(alist, Size2, 1); r = Size2_1; fprintf(out,"Size2 f(void):"); fflush(out); va_return_struct(alist, Size2, r); }} void S3_v_simulator (void* data, va_alist alist) { if (data != (void*)&S3_v) { fprintf(out,"wrong data for S3_v\n"); exit(1); } {Size3 r; va_start_struct(alist, Size3, 1); r = Size3_1; fprintf(out,"Size3 f(void):"); fflush(out); va_return_struct(alist, Size3, r); }} void S4_v_simulator (void* data, va_alist alist) { if (data != (void*)&S4_v) { fprintf(out,"wrong data for S4_v\n"); exit(1); } {Size4 r; va_start_struct(alist, Size4, 1); r = Size4_1; fprintf(out,"Size4 f(void):"); fflush(out); va_return_struct(alist, Size4, r); }} void S7_v_simulator (void* data, va_alist alist) { if (data != (void*)&S7_v) { fprintf(out,"wrong data for S7_v\n"); exit(1); } {Size7 r; va_start_struct(alist, Size7, 1); r = Size7_1; fprintf(out,"Size7 f(void):"); fflush(out); va_return_struct(alist, Size7, r); }} void S8_v_simulator (void* data, va_alist alist) { if (data != (void*)&S8_v) { fprintf(out,"wrong data for S8_v\n"); exit(1); } {Size8 r; va_start_struct(alist, Size8, 1); r = Size8_1; fprintf(out,"Size8 f(void):"); fflush(out); va_return_struct(alist, Size8, r); }} void S12_v_simulator (void* data, va_alist alist) { if (data != (void*)&S12_v) { fprintf(out,"wrong data for S12_v\n"); exit(1); } {Size12 r; va_start_struct(alist, Size12, 1); r = Size12_1; fprintf(out,"Size12 f(void):"); fflush(out); va_return_struct(alist, Size12, r); }} void S15_v_simulator (void* data, va_alist alist) { if (data != (void*)&S15_v) { fprintf(out,"wrong data for S15_v\n"); exit(1); } {Size15 r; va_start_struct(alist, Size15, 1); r = Size15_1; fprintf(out,"Size15 f(void):"); fflush(out); va_return_struct(alist, Size15, r); }} void S16_v_simulator (void* data, va_alist alist) { if (data != (void*)&S16_v) { fprintf(out,"wrong data for S16_v\n"); exit(1); } {Size16 r; va_start_struct(alist, Size16, 1); r = Size16_1; fprintf(out,"Size16 f(void):"); fflush(out); va_return_struct(alist, Size16, r); }} /* structure tests */ void I_III_simulator (void* data, va_alist alist) { if (data != (void*)&I_III) { fprintf(out,"wrong data for I_III\n"); exit(1); } {Int a; Int b; Int c; Int r; va_start_struct(alist, Int, 1); a = va_arg_struct(alist, Int); b = va_arg_struct(alist, Int); c = va_arg_struct(alist, Int); r.x = a.x + b.x + c.x; fprintf(out,"Int f(Int,Int,Int):({%d},{%d},{%d})",a.x,b.x,c.x); fflush(out); va_return_struct(alist, Int, r); }} #ifndef SKIP_EXTRA_STRUCTS void C_CdC_simulator (void* data, va_alist alist) { if (data != (void*)&C_CdC) { fprintf(out,"wrong data for C_CdC\n"); exit(1); } {Char a; double b; Char c; Char r; va_start_struct(alist, Char, 1); a = va_arg_struct(alist, Char); b = va_arg_double(alist); c = va_arg_struct(alist, Char); r.x = (a.x + c.x)/2; fprintf(out,"Char f(Char,double,Char):({'%c'},%g,{'%c'})",a.x,b,c.x); fflush(out); va_return_struct(alist, Char, r); }} void F_Ffd_simulator (void* data, va_alist alist) { if (data != (void*)&F_Ffd) { fprintf(out,"wrong data for F_Ffd\n"); exit(1); } {Float a; float b; double c; Float r; va_start_struct(alist, Float, va_word_splittable_1(float)); a = va_arg_struct(alist, Float); b = va_arg_float(alist); c = va_arg_double(alist); r.x = a.x + b + c; fprintf(out,"Float f(Float,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); va_return_struct(alist, Float, r); }} void D_fDd_simulator (void* data, va_alist alist) { if (data != (void*)&D_fDd) { fprintf(out,"wrong data for D_fDd\n"); exit(1); } {float a; Double b; double c; Double r; va_start_struct(alist, Double, va_word_splittable_1(double)); a = va_arg_float(alist); b = va_arg_struct(alist, Double); c = va_arg_double(alist); r.x = a + b.x + c; fprintf(out,"Double f(float,Double,double):(%g,{%g},%g)",a,b.x,c); fflush(out); va_return_struct(alist, Double, r); }} void D_Dfd_simulator (void* data, va_alist alist) { if (data != (void*)&D_Dfd) { fprintf(out,"wrong data for D_Dfd\n"); exit(1); } {Double a; float b; double c; Double r; va_start_struct(alist, Double, va_word_splittable_1(double)); a = va_arg_struct(alist, Double); b = va_arg_float(alist); c = va_arg_double(alist); r.x = a.x + b + c; fprintf(out,"Double f(Double,float,double):({%g},%g,%g)",a.x,b,c); fflush(out); va_return_struct(alist, Double, r); }} #endif void J_JiJ_simulator (void* data, va_alist alist) { if (data != (void*)&J_JiJ) { fprintf(out,"wrong data for J_JiJ\n"); exit(1); } {J a; int b; J c; J r; va_start_struct(alist, J, va_word_splittable_2(long,long)); a = va_arg_struct(alist, J); b = va_arg_int(alist); c = va_arg_struct(alist, J); r.l1 = a.l1+c.l1; r.l2 = a.l2+b+c.l2; fprintf(out,"J f(J,int,J):({%ld,%ld},%d,{%ld,%ld})",a.l1,a.l2,b,c.l1,c.l2); fflush(out); va_return_struct(alist, J, r); }} #ifndef SKIP_EXTRA_STRUCTS void T_TcT_simulator (void* data, va_alist alist) { if (data != (void*)&T_TcT) { fprintf(out,"wrong data for T_TcT\n"); exit(1); } {T a; char b; T c; T r; va_start_struct(alist, T, 1); a = va_arg_struct(alist, T); b = va_arg_char(alist); c = va_arg_struct(alist, T); r.c[0]='b'; r.c[1]=c.c[1]; r.c[2]=c.c[2]; fprintf(out,"T f(T,char,T):({\"%c%c%c\"},'%c',{\"%c%c%c\"})",a.c[0],a.c[1],a.c[2],b,c.c[0],c.c[1],c.c[2]); fflush(out); va_return_struct(alist, T, r); }} void X_BcdB_simulator (void* data, va_alist alist) { if (data != (void*)&X_BcdB) { fprintf(out,"wrong data for X_BcdB\n"); exit(1); } {B a; char b; double c; B d; static X xr={"return val",'R'}; X r; va_start_struct(alist, X, 0); a = va_arg_struct(alist, B); b = va_arg_char(alist); c = va_arg_double(alist); d = va_arg_struct(alist, B); r = xr; r.c1 = b; fprintf(out,"X f(B,char,double,B):({%g,{%d,%d,%d}},'%c',%g,{%g,{%d,%d,%d}})", a.d,a.i[0],a.i[1],a.i[2],b,c,d.d,d.i[0],d.i[1],d.i[2]); fflush(out); va_return_struct(alist, X, r); }} #endif /* gpargs boundary tests */ void l_l0J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l0J) { fprintf(out,"wrong data for l_l0J\n"); exit(1); } va_start_long(alist); {J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = b.l1 + b.l2 + c; fprintf(out,"long f(J,long):(%ld,%ld,%ld)",b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l1J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l1J) { fprintf(out,"wrong data for l_l1J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + b.l1 + b.l2 + c; fprintf(out,"long f(long,J,long):(%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l2J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l2J) { fprintf(out,"wrong data for l_l2J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + b.l1 + b.l2 + c; fprintf(out,"long f(2*long,J,long):(%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l3J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l3J) { fprintf(out,"wrong data for l_l3J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + b.l1 + b.l2 + c; fprintf(out,"long f(3*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l4J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l4J) { fprintf(out,"wrong data for l_l4J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + c; fprintf(out,"long f(4*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l5J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l5J) { fprintf(out,"wrong data for l_l5J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + c; fprintf(out,"long f(5*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l6J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l6J) { fprintf(out,"wrong data for l_l6J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + c; fprintf(out,"long f(6*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l7J_simulator (void* data, va_alist alist) { if (data != (void*)&l_l7J) { fprintf(out,"wrong data for l_l7J\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); J b = va_arg_struct(alist, J); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + a7 + b.l1 + b.l2 + c; fprintf(out,"long f(7*long,J,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,a7,b.l1,b.l2,c); fflush(out); va_return_long(alist, r); }} void l_l0K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l0K) { fprintf(out,"wrong data for l_l0K\n"); exit(1); } va_start_long(alist); {K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(K,long):(%ld,%ld,%ld,%ld,%ld)",b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l1K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l1K) { fprintf(out,"wrong data for l_l1K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld)",a1,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l2K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l2K) { fprintf(out,"wrong data for l_l2K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(2*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l3K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l3K) { fprintf(out,"wrong data for l_l3K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(3*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l4K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l4K) { fprintf(out,"wrong data for l_l4K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(4*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l5K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l5K) { fprintf(out,"wrong data for l_l5K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(5*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void l_l6K_simulator (void* data, va_alist alist) { if (data != (void*)&l_l6K) { fprintf(out,"wrong data for l_l6K\n"); exit(1); } va_start_long(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); K b = va_arg_struct(alist, K); long c = va_arg_long(alist); long r = a1 + a2 + a3 + a4 + a5 + a6 + b.l1 + b.l2 + b.l3 + b.l4 + c; fprintf(out,"long f(6*long,K,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a1,a2,a3,a4,a5,a6,b.l1,b.l2,b.l3,b.l4,c); fflush(out); va_return_long(alist, r); }} void f_f17l3L_simulator (void* data, va_alist alist) { if (data != (void*)&f_f17l3L) { fprintf(out,"wrong data for f_f17l3L\n"); exit(1); } va_start_float(alist); {float a = va_arg_float(alist); float b = va_arg_float(alist); float c = va_arg_float(alist); float d = va_arg_float(alist); float e = va_arg_float(alist); float f = va_arg_float(alist); float g = va_arg_float(alist); float h = va_arg_float(alist); float i = va_arg_float(alist); float j = va_arg_float(alist); float k = va_arg_float(alist); float l = va_arg_float(alist); float m = va_arg_float(alist); float n = va_arg_float(alist); float o = va_arg_float(alist); float p = va_arg_float(alist); float q = va_arg_float(alist); long s = va_arg_long(alist); long t = va_arg_long(alist); long u = va_arg_long(alist); L z = va_arg_struct(alist, L); float r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"float f(17*float,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); va_return_float(alist, r); }} void d_d17l3L_simulator (void* data, va_alist alist) { if (data != (void*)&d_d17l3L) { fprintf(out,"wrong data for d_d17l3L\n"); exit(1); } va_start_double(alist); {double a = va_arg_double(alist); double b = va_arg_double(alist); double c = va_arg_double(alist); double d = va_arg_double(alist); double e = va_arg_double(alist); double f = va_arg_double(alist); double g = va_arg_double(alist); double h = va_arg_double(alist); double i = va_arg_double(alist); double j = va_arg_double(alist); double k = va_arg_double(alist); double l = va_arg_double(alist); double m = va_arg_double(alist); double n = va_arg_double(alist); double o = va_arg_double(alist); double p = va_arg_double(alist); double q = va_arg_double(alist); long s = va_arg_long(alist); long t = va_arg_long(alist); long u = va_arg_long(alist); L z = va_arg_struct(alist, L); double r = a+b+c+d+e+f+g+h+i+j+k+l+m+n+o+p+q+s+t+u+z.l1+z.l2+z.l3+z.l4+z.l5+z.l6; fprintf(out,"double f(17*double,3*int,L):(%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%g,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld,%ld)",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,s,t,u,z.l1,z.l2,z.l3,z.l4,z.l5,z.l6); fflush(out); va_return_double(alist, r); }} void ll_l2ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l2ll) { fprintf(out,"wrong data for ll_l2ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2) + b + c; fprintf(out,"long long f(2*long,long long,long):(%ld,%ld,0x%lx%08lx,%ld)",a1,a2,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void ll_l3ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l3ll) { fprintf(out,"wrong data for ll_l3ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3) + b + c; fprintf(out,"long long f(3*long,long long,long):(%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void ll_l4ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l4ll) { fprintf(out,"wrong data for ll_l4ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"long long f(4*long,long long,long):(%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void ll_l5ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l5ll) { fprintf(out,"wrong data for ll_l5ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"long long f(5*long,long long,long):(%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void ll_l6ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l6ll) { fprintf(out,"wrong data for ll_l6ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"long long f(6*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void ll_l7ll_simulator (void* data, va_alist alist) { if (data != (void*)&ll_l7ll) { fprintf(out,"wrong data for ll_l7ll\n"); exit(1); } va_start_longlong(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); long long b = va_arg_longlong(alist); long c = va_arg_long(alist); long long r = (long long) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"long long f(7*long,long long,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,0x%lx%08lx,%ld)",a1,a2,a3,a4,a5,a6,a7,(long)(b>>32),(long)(b&0xffffffff),c); fflush(out); va_return_longlong(alist, r); }} void d_l2d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l2d) { fprintf(out,"wrong data for d_l2d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2) + b + c; fprintf(out,"double f(2*long,double,long):(%ld,%ld,%g,%ld)",a1,a2,b,c); fflush(out); va_return_double(alist, r); }} void d_l3d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l3d) { fprintf(out,"wrong data for d_l3d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3) + b + c; fprintf(out,"double f(3*long,double,long):(%ld,%ld,%ld,%g,%ld)",a1,a2,a3,b,c); fflush(out); va_return_double(alist, r); }} void d_l4d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l4d) { fprintf(out,"wrong data for d_l4d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4) + b + c; fprintf(out,"double f(4*long,double,long):(%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,b,c); fflush(out); va_return_double(alist, r); }} void d_l5d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l5d) { fprintf(out,"wrong data for d_l5d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5) + b + c; fprintf(out,"double f(5*long,double,long):(%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,b,c); fflush(out); va_return_double(alist, r); }} void d_l6d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l6d) { fprintf(out,"wrong data for d_l6d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5 + a6) + b + c; fprintf(out,"double f(6*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,b,c); fflush(out); va_return_double(alist, r); }} void d_l7d_simulator (void* data, va_alist alist) { if (data != (void*)&d_l7d) { fprintf(out,"wrong data for d_l7d\n"); exit(1); } va_start_double(alist); {long a1 = va_arg_long(alist); long a2 = va_arg_long(alist); long a3 = va_arg_long(alist); long a4 = va_arg_long(alist); long a5 = va_arg_long(alist); long a6 = va_arg_long(alist); long a7 = va_arg_long(alist); double b = va_arg_double(alist); long c = va_arg_long(alist); double r = (double) (a1 + a2 + a3 + a4 + a5 + a6 + a7) + b + c; fprintf(out,"double f(7*long,double,long):(%ld,%ld,%ld,%ld,%ld,%ld,%ld,%g,%ld)",a1,a2,a3,a4,a5,a6,a7,b,c); fflush(out); va_return_double(alist, r); }} void v_clobber_K_simulator (void* data, va_alist alist) { if (data != (void*)&v_clobber_K) { fprintf(out,"wrong data for v_clobber_K\n"); exit(1); } va_start_void(alist); {K k = va_arg_struct(alist, K); k.l1 += 1; k.l2 += 10; k.l3 += 100; k.l4 += 1000; va_return_void(alist); }} /* * The way we run these tests - first call the function directly, then * through vacall() - there is the danger that arguments or results seem * to be passed correctly, but what we are seeing are in fact the vestiges * (traces) or the previous call. This may seriously fake the test. * Avoid this by clearing the registers between the first and the second call. */ long clear_traces_i (long a, long b, long c, long d, long e, long f, long g, long h, long i, long j, long k, long l, long m, long n, long o, long p) { return 0; } float clear_traces_f (float a, float b, float c, float d, float e, float f, float g, float h, float i, float j, float k, float l, float m, float n, float o, float p) { return 0.0; } double clear_traces_d (double a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k, double l, double m, double n, double o, double p) { return 0.0; } J clear_traces_J (void) { J j; j.l1 = j.l2 = 0; return j; } void clear_traces (void) { clear_traces_i(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0); clear_traces_f(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_d(0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0); clear_traces_J(); } int main (void) { callback_t callback; out = stdout; /* void tests */ v_v(); clear_traces(); callback = alloc_callback(&v_v_simulator,(void*)&v_v); ((void (*) (void)) callback) (); /* int tests */ { int ir; ir = i_v(); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_v_simulator,(void*)&i_v); ir = ((int (*) (void)) callback) (); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i(i1); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i_simulator,(void*)&i_i); ir = ((int (*) (int)) callback) (i1); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i2(i1,i2); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i2_simulator,(void*)&i_i2); ir = ((int (*) (int,int)) callback) (i1,i2); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i4(i1,i2,i3,i4); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i4_simulator,(void*)&i_i4); ir = ((int (*) (int,int,int,int)) callback) (i1,i2,i3,i4); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i8(i1,i2,i3,i4,i5,i6,i7,i8); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i8_simulator,(void*)&i_i8); ir = ((int (*) (int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i16(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i16_simulator,(void*)&i_i16); ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16); fprintf(out,"->%d\n",ir); fflush(out); ir = i_i32(i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32); fprintf(out,"->%d\n",ir); fflush(out); ir = 0; clear_traces(); callback = alloc_callback(&i_i32_simulator,(void*)&i_i32); ir = ((int (*) (int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int)) callback) (i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,i18,i19,i20,i21,i22,i23,i24,i25,i26,i27,i28,i29,i30,i31,i32); fprintf(out,"->%d\n",ir); fflush(out); } /* float tests */ { float fr; fr = f_f(f1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f_simulator,(void*)&f_f); fr = ((float (*) (float)) callback) (f1); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2(f1,f2); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f2_simulator,(void*)&f_f2); fr = ((float (*) (float,float)) callback) (f1,f2); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4(f1,f2,f3,f4); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f4_simulator,(void*)&f_f4); fr = ((float (*) (float,float,float,float)) callback) (f1,f2,f3,f4); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8(f1,f2,f3,f4,f5,f6,f7,f8); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f8_simulator,(void*)&f_f8); fr = ((float (*) (float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f16(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f16_simulator,(void*)&f_f16); fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f24(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f24_simulator,(void*)&f_f24); fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24); fprintf(out,"->%g\n",fr); fflush(out); } /* double tests */ { double dr; dr = d_d(d1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d_simulator,(void*)&d_d); dr = ((double (*) (double)) callback) (d1); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2(d1,d2); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d2_simulator,(void*)&d_d2); dr = ((double (*) (double,double)) callback) (d1,d2); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4(d1,d2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d4_simulator,(void*)&d_d4); dr = ((double (*) (double,double,double,double)) callback) (d1,d2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8(d1,d2,d3,d4,d5,d6,d7,d8); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d8_simulator,(void*)&d_d8); dr = ((double (*) (double,double,double,double,double,double,double,double)) callback) (d1,d2,d3,d4,d5,d6,d7,d8); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d16(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d16_simulator,(void*)&d_d16); dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16); fprintf(out,"->%g\n",dr); fflush(out); } /* pointer tests */ { void* vpr; vpr = vp_vpdpcpsp(&uc1,&d2,str3,&I4); fprintf(out,"->0x%p\n",vpr); fflush(out); vpr = 0; clear_traces(); callback = alloc_callback(&vp_vpdpcpsp_simulator,(void*)&vp_vpdpcpsp); vpr = ((void* (*) (void*,double*,char*,Int*)) callback) (&uc1,&d2,str3,&I4); fprintf(out,"->0x%p\n",vpr); fflush(out); } /* mixed number tests */ { uchar ucr; ushort usr; float fr; double dr; long long llr; ucr = uc_ucsil(uc1,us2,ui3,ul4); fprintf(out,"->%u\n",ucr); fflush(out); ucr = 0; clear_traces(); callback = alloc_callback(&uc_ucsil_simulator,(void*)&uc_ucsil); ucr = ((uchar (*) (uchar,ushort,uint,ulong)) callback) (uc1,us2,ui3,ul4); fprintf(out,"->%u\n",ucr); fflush(out); dr = d_iidd(i1,i2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_iidd_simulator,(void*)&d_iidd); dr = ((double (*) (int,int,double,double)) callback) (i1,i2,d3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_iiidi(i1,i2,i3,d4,i5); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_iiidi_simulator,(void*)&d_iiidi); dr = ((double (*) (int,int,int,double,int)) callback) (i1,i2,i3,d4,i5); fprintf(out,"->%g\n",dr); fflush(out); dr = d_idid(i1,d2,i3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_idid_simulator,(void*)&d_idid); dr = ((double (*) (int,double,int,double)) callback) (i1,d2,i3,d4); fprintf(out,"->%g\n",dr); fflush(out); dr = d_fdi(f1,d2,i3); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_fdi_simulator,(void*)&d_fdi); dr = ((double (*) (float,double,int)) callback) (f1,d2,i3); fprintf(out,"->%g\n",dr); fflush(out); usr = us_cdcd(c1,d2,c3,d4); fprintf(out,"->%u\n",usr); fflush(out); usr = 0; clear_traces(); callback = alloc_callback(&us_cdcd_simulator,(void*)&us_cdcd); usr = ((ushort (*) (char,double,char,double)) callback) (c1,d2,c3,d4); fprintf(out,"->%u\n",usr); fflush(out); llr = ll_iiilli(i1,i2,i3,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_iiilli_simulator,(void*)&ll_iiilli); llr = ((long long (*) (int,int,int,long long,int)) callback) (i1,i2,i3,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_flli(f13,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_flli_simulator,(void*)&ll_flli); llr = ((long long (*) (float,long long,int)) callback) (f13,ll1,i13); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); fr = f_fi(f1,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_fi_simulator,(void*)&f_fi); fr = ((float (*) (float,int)) callback) (f1,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f2i(f1,f2,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f2i_simulator,(void*)&f_f2i); fr = ((float (*) (float,float,int)) callback) (f1,f2,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f3i(f1,f2,f3,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f3i_simulator,(void*)&f_f3i); fr = ((float (*) (float,float,float,int)) callback) (f1,f2,f3,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f4i(f1,f2,f3,f4,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f4i_simulator,(void*)&f_f4i); fr = ((float (*) (float,float,float,float,int)) callback) (f1,f2,f3,f4,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f7i(f1,f2,f3,f4,f5,f6,f7,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f7i_simulator,(void*)&f_f7i); fr = ((float (*) (float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f8i(f1,f2,f3,f4,f5,f6,f7,f8,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f8i_simulator,(void*)&f_f8i); fr = ((float (*) (float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f12i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f12i_simulator,(void*)&f_f12i); fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = f_f13i(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f13i_simulator,(void*)&f_f13i); fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,int)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,i9); fprintf(out,"->%g\n",fr); fflush(out); dr = d_di(d1,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_di_simulator,(void*)&d_di); dr = ((double (*) (double,int)) callback) (d1,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d2i(d1,d2,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d2i_simulator,(void*)&d_d2i); dr = ((double (*) (double,double,int)) callback) (d1,d2,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d3i(d1,d2,d3,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d3i_simulator,(void*)&d_d3i); dr = ((double (*) (double,double,double,int)) callback) (d1,d2,d3,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d4i(d1,d2,d3,d4,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d4i_simulator,(void*)&d_d4i); dr = ((double (*) (double,double,double,double,int)) callback) (d1,d2,d3,d4,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d7i(d1,d2,d3,d4,d5,d6,d7,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d7i_simulator,(void*)&d_d7i); dr = ((double (*) (double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d8i(d1,d2,d3,d4,d5,d6,d7,d8,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d8i_simulator,(void*)&d_d8i); dr = ((double (*) (double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d12i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d12i_simulator,(void*)&d_d12i); dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_d13i(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d13i_simulator,(void*)&d_d13i); dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,int)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,i9); fprintf(out,"->%g\n",dr); fflush(out); } /* small structure return tests */ { Size1 r = S1_v(); fprintf(out,"->{%c}\n",r.x1); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S1_v_simulator,(void*)&S1_v); r = ((Size1 (*) (void)) callback) (); fprintf(out,"->{%c}\n",r.x1); fflush(out); } { Size2 r = S2_v(); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S2_v_simulator,(void*)&S2_v); r = ((Size2 (*) (void)) callback) (); fprintf(out,"->{%c%c}\n",r.x1,r.x2); fflush(out); } { Size3 r = S3_v(); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S3_v_simulator,(void*)&S3_v); r = ((Size3 (*) (void)) callback) (); fprintf(out,"->{%c%c%c}\n",r.x1,r.x2,r.x3); fflush(out); } { Size4 r = S4_v(); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S4_v_simulator,(void*)&S4_v); r = ((Size4 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4); fflush(out); } { Size7 r = S7_v(); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S7_v_simulator,(void*)&S7_v); r = ((Size7 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7); fflush(out); } { Size8 r = S8_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S8_v_simulator,(void*)&S8_v); r = ((Size8 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8); fflush(out); } { Size12 r = S12_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S12_v_simulator,(void*)&S12_v); r = ((Size12 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12); fflush(out); } { Size15 r = S15_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S15_v_simulator,(void*)&S15_v); r = ((Size15 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15); fflush(out); } { Size16 r = S16_v(); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); memset(&r,0,sizeof(r)); clear_traces(); callback = alloc_callback(&S16_v_simulator,(void*)&S16_v); r = ((Size16 (*) (void)) callback) (); fprintf(out,"->{%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c}\n",r.x1,r.x2,r.x3,r.x4,r.x5,r.x6,r.x7,r.x8,r.x9,r.x10,r.x11,r.x12,r.x13,r.x14,r.x15,r.x16); fflush(out); } /* structure tests */ { Int Ir; Char Cr; Float Fr; Double Dr; J Jr; T Tr; X Xr; Ir = I_III(I1,I2,I3); fprintf(out,"->{%d}\n",Ir.x); fflush(out); Ir.x = 0; clear_traces(); callback = alloc_callback(&I_III_simulator,(void*)&I_III); Ir = ((Int (*) (Int,Int,Int)) callback) (I1,I2,I3); fprintf(out,"->{%d}\n",Ir.x); fflush(out); #ifndef SKIP_EXTRA_STRUCTS Cr = C_CdC(C1,d2,C3); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Cr.x = '\0'; clear_traces(); callback = alloc_callback(&C_CdC_simulator,(void*)&C_CdC); Cr = ((Char (*) (Char,double,Char)) callback) (C1,d2,C3); fprintf(out,"->{'%c'}\n",Cr.x); fflush(out); Fr = F_Ffd(F1,f2,d3); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Fr.x = 0.0; clear_traces(); callback = alloc_callback(&F_Ffd_simulator,(void*)&F_Ffd); Fr = ((Float (*) (Float,float,double)) callback) (F1,f2,d3); fprintf(out,"->{%g}\n",Fr.x); fflush(out); Dr = D_fDd(f1,D2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); callback = alloc_callback(&D_fDd_simulator,(void*)&D_fDd); Dr = ((Double (*) (float,Double,double)) callback) (f1,D2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr = D_Dfd(D1,f2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); Dr.x = 0.0; clear_traces(); callback = alloc_callback(&D_Dfd_simulator,(void*)&D_Dfd); Dr = ((Double (*) (Double,float,double)) callback) (D1,f2,d3); fprintf(out,"->{%g}\n",Dr.x); fflush(out); #endif Jr = J_JiJ(J1,i2,J2); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); Jr.l1 = Jr.l2 = 0; clear_traces(); callback = alloc_callback(&J_JiJ_simulator,(void*)&J_JiJ); Jr = ((J (*) (J,int,J)) callback) (J1,i2,J2); fprintf(out,"->{%ld,%ld}\n",Jr.l1,Jr.l2); fflush(out); #ifndef SKIP_EXTRA_STRUCTS #ifndef SKIP_T Tr = T_TcT(T1,' ',T2); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); Tr.c[0] = Tr.c[1] = Tr.c[2] = 0; clear_traces(); callback = alloc_callback(&T_TcT_simulator,(void*)&T_TcT); Tr = ((T (*) (T,char,T)) callback) (T1,' ',T2); fprintf(out,"->{\"%c%c%c\"}\n",Tr.c[0],Tr.c[1],Tr.c[2]); fflush(out); #endif #ifndef SKIP_X Xr = X_BcdB(B1,c2,d3,B2); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); Xr.c[0]=Xr.c1='\0'; clear_traces(); callback = alloc_callback(&X_BcdB_simulator,(void*)&X_BcdB); Xr = ((X (*) (B,char,double,B)) callback) (B1,c2,d3,B2); fprintf(out,"->{\"%s\",'%c'}\n",Xr.c,Xr.c1); fflush(out); #endif #endif } /* gpargs boundary tests */ { long lr; long long llr; float fr; double dr; lr = l_l0J(J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l0J_simulator,(void*)l_l0J); lr = ((long (*) (J,long)) callback) (J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1J(l1,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l1J_simulator,(void*)l_l1J); lr = ((long (*) (long,J,long)) callback) (l1,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2J(l1,l2,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l2J_simulator,(void*)l_l2J); lr = ((long (*) (long,long,J,long)) callback) (l1,l2,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3J(l1,l2,l3,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l3J_simulator,(void*)l_l3J); lr = ((long (*) (long,long,long,J,long)) callback) (l1,l2,l3,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4J(l1,l2,l3,l4,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l4J_simulator,(void*)l_l4J); lr = ((long (*) (long,long,long,long,J,long)) callback) (l1,l2,l3,l4,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5J(l1,l2,l3,l4,l5,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l5J_simulator,(void*)l_l5J); lr = ((long (*) (long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6J(l1,l2,l3,l4,l5,l6,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l6J_simulator,(void*)l_l6J); lr = ((long (*) (long,long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,l6,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l7J(l1,l2,l3,l4,l5,l6,l7,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l7J_simulator,(void*)l_l7J); lr = ((long (*) (long,long,long,long,long,long,long,J,long)) callback) (l1,l2,l3,l4,l5,l6,l7,J1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l0K(K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l0K_simulator,(void*)l_l0K); lr = ((long (*) (K,long)) callback) (K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l1K(l1,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l1K_simulator,(void*)l_l1K); lr = ((long (*) (long,K,long)) callback) (l1,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l2K(l1,l2,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l2K_simulator,(void*)l_l2K); lr = ((long (*) (long,long,K,long)) callback) (l1,l2,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l3K(l1,l2,l3,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l3K_simulator,(void*)l_l3K); lr = ((long (*) (long,long,long,K,long)) callback) (l1,l2,l3,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l4K(l1,l2,l3,l4,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l4K_simulator,(void*)l_l4K); lr = ((long (*) (long,long,long,long,K,long)) callback) (l1,l2,l3,l4,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l5K(l1,l2,l3,l4,l5,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l5K_simulator,(void*)l_l5K); lr = ((long (*) (long,long,long,long,long,K,long)) callback) (l1,l2,l3,l4,l5,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = l_l6K(l1,l2,l3,l4,l5,l6,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); lr = 0; clear_traces(); callback = alloc_callback(&l_l6K_simulator,(void*)l_l6K); lr = ((long (*) (long,long,long,long,long,long,K,long)) callback) (l1,l2,l3,l4,l5,l6,K1,l9); fprintf(out,"->%ld\n",lr); fflush(out); fr = f_f17l3L(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1); fprintf(out,"->%g\n",fr); fflush(out); fr = 0.0; clear_traces(); callback = alloc_callback(&f_f17l3L_simulator,(void*)&f_f17l3L); fr = ((float (*) (float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,float,long,long,long,L)) callback) (f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,l6,l7,l8,L1); fprintf(out,"->%g\n",fr); fflush(out); dr = d_d17l3L(d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_d17l3L_simulator,(void*)&d_d17l3L); dr = ((double (*) (double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,double,long,long,long,L)) callback) (d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16,d17,l6,l7,l8,L1); fprintf(out,"->%g\n",dr); fflush(out); llr = ll_l2ll(l1,l2,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l2ll_simulator,(void*)ll_l2ll); llr = ((long long (*) (long,long,long long,long)) callback) (l1,l2,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l3ll(l1,l2,l3,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l3ll_simulator,(void*)ll_l3ll); llr = ((long long (*) (long,long,long,long long,long)) callback) (l1,l2,l3,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l4ll(l1,l2,l3,l4,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l4ll_simulator,(void*)ll_l4ll); llr = ((long long (*) (long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l5ll(l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l5ll_simulator,(void*)ll_l5ll); llr = ((long long (*) (long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l6ll(l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l6ll_simulator,(void*)ll_l6ll); llr = ((long long (*) (long,long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = ll_l7ll(l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); llr = 0; clear_traces(); callback = alloc_callback(&ll_l7ll_simulator,(void*)ll_l7ll); llr = ((long long (*) (long,long,long,long,long,long,long,long long,long)) callback) (l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->0x%lx%08lx\n",(long)(llr>>32),(long)(llr&0xffffffff)); fflush(out); dr = d_l2d(l1,l2,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l2d_simulator,(void*)d_l2d); dr = ((double (*) (long,long,double,long)) callback) (l1,l2,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l3d(l1,l2,l3,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l3d_simulator,(void*)d_l3d); dr = ((double (*) (long,long,long,double,long)) callback) (l1,l2,l3,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l4d(l1,l2,l3,l4,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l4d_simulator,(void*)d_l4d); dr = ((double (*) (long,long,long,long,double,long)) callback) (l1,l2,l3,l4,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l5d(l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l5d_simulator,(void*)d_l5d); dr = ((double (*) (long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l6d(l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l6d_simulator,(void*)d_l6d); dr = ((double (*) (long,long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,l6,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = d_l7d(l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); dr = 0.0; clear_traces(); callback = alloc_callback(&d_l7d_simulator,(void*)d_l7d); dr = ((double (*) (long,long,long,long,long,long,long,double,long)) callback) (l1,l2,l3,l4,l5,l6,l7,ll1,l9); fprintf(out,"->%g\n",dr); fflush(out); } /* by-value tests */ /* This test is trivial, since a copy of k is allocated on the callee's stack. But anyway... */ { K k; k.l1 = l1; k.l2 = l2; k.l3 = l3; k.l4 = l4; fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); clear_traces(); callback = alloc_callback(&v_clobber_K_simulator,(void*)v_clobber_K); ((void (*) (K)) callback) (k); fprintf(out,"by_value:%ld,%ld,%ld,%ld\n",k.l1,k.l2,k.l3,k.l4); fflush(out); } exit(0); } libffcall-2.5/callback/Makefile.maint0000664000000000000000000000134013153072372014473 00000000000000# maintainer -*-Makefile-*- SHELL = /bin/sh MAKE = make # ==================== Easily regeneratable files ==================== ROFF_MAN = groff -Tutf8 -mandoc all : callback.man \ vacall_r/vacall-i386-msvc.c \ trampoline_r/trampoline_r.man callback.man : callback.3 $(ROFF_MAN) callback.3 > callback.man vacall_r/vacall-i386-msvc.c : vacall_r/vacall-i386-macro.S cd vacall_r && $(MAKE) -f Makefile.maint vacall-i386-msvc.c trampoline_r/trampoline_r.man : trampoline_r/trampoline_r.3 cd trampoline_r && $(MAKE) -f Makefile.maint trampoline_r.man totally-clean : force $(RM) callback.man cd vacall_r && $(MAKE) -f Makefile.maint totally-clean cd trampoline_r && $(MAKE) -f Makefile.maint totally-clean force : libffcall-2.5/callback/callback.html0000664000000000000000000002420713136760230014353 00000000000000 CALLBACK manual page

CALLBACK manual page

Name

 callback - closures with variable arguments as first-class C functions

Synopsis

 
#include <callback.h>


void function (void* data, va_alist alist)
{
  va_start_type(alist[, return_type]);
  arg = va_arg_type(alist[, arg_type]);
  va_return_type(alist[[, return_type], return_value]);
}


callback = alloc_callback(&function, data);


free_callback(callback);


is_callback(callback)
callback_address(callback)
callback_data(callback)

Description

 These functions implement closures with variable arguments as first-class C functions.

Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. Moreover, they can be called with variable arguments and can return variable return values.

callback = alloc_callback(&function, data) allocates a callback. When callback gets called, it arranges to call function, passing data as first argument and, as second argument, the entire sequence of arguments passed to callback.

Function calling conventions differ considerably on different machines, therefore the arguments are accessed and the result value is stored through the same macros as used by the vacall package, see below.

The callbacks are functions with indefinite extent: callback is only deallocated when free_callback(callback) is called.

is_callback(callback) checks whether the C function callback was produced by a call to alloc_callback. If this returns true, the arguments given to alloc_callback can be retrieved:

  • callback_address(callback) returns &function,
  • callback_data(callback) returns data.

VACALL macros

 Within function, the following macros can be used to walk through the argument list and specify a return value: 

va_start_type(alist[, return_type]);
starts the walk through the argument list and specifies the return type. 

arg = va_arg_type(alist[, arg_type]);
fetches the next argument from the argument list. 

va_return_type(alist[[, return_type], return_value]);
ends the walk through the argument list and specifies the return value.

The type in va_start_type and va_return_type shall be one of void, int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of return_type.

The type specifiers in va_start_type and va_return_type must be the same. The return_type specifiers passed to va_start_type and va_return_type must be the same.

The type in va_arg_type shall be one of int, uint, long, ulong, longlong, ulonglong, double, struct, ptr or (for ANSI C calling conventions only) char, schar, uchar, short, ushort, float, depending on the class of arg_type.

In va_start_struct(alist, return_type, splittable); the splittable flag specifies whether the struct return_type can be returned in registers such that every struct field fits entirely in a single register. This needs to be specified for structs of size 2*sizeof(long). For structs of size <= sizeof(long), splittable is ignored and assumed to be 1. For structs of size > 2*sizeof(long), splittable is ignored and assumed to be 0. There are some handy macros for this: 

va_word_splittable_1 (type1)
va_word_splittable_2 (type1, type2)
va_word_splittable_3 (type1, type2, type3)
va_word_splittable_4 (type1, type2, type3, type4)
For a struct with three slots 
struct { type1 id1; type2 id2; type3 id3; }
you can specify splittable as va_word_splittable_3 (type1, type2, type3).

Notes
  1. Functions which want to emulate Kernighan & Ritchie style functions (i.e., in ANSI C, functions without a typed argument list) cannot use the type values char, schar, uchar, short, ushort, float. As prescribed by the default K&R C expression promotions, they have to use int instead of char, schar, uchar, short, ushort and double instead of float.

  2. The macros va_start_longlong(), va_start_ulonglong(), va_return_longlong(), va_return_ulonglong(), va_arg_longlong() and va_arg_ulonglong() work only if the C compiler has a working long long 64-bit integer type.

  3. The struct types used in va_start_struct() and va_struct() must only contain (signed or unsigned) int, long, long long or pointer fields. Struct types containing (signed or unsigned) char, short, float, double or other structs are not supported.

See also

 vacall(3), trampoline(3).

Bugs

 The current implementations have been tested on a selection of common cases but there are probably still many bugs.

There are typically built-in limits on the size of the argument-list, which may also include the size of any structure arguments.

The decision whether a struct is to be returned in registers or in memory considers only the struct's size and alignment. This is inaccurate: for example, gcc on m68k-next returns struct { char a,b,c; } in registers and struct { char a[3]; } in memory, although both types have the same size and the same alignment.

The argument list can only be walked once.

Non-Bugs

All information is passed in CPU registers and the stack. The callback package is therefore multithread-safe.

Porting

 Porting callback consists in first porting the vacall and trampoline packages, then choosing a CPU register for passing the closure from trampoline to vacall. This register is normally the register designated by STATIC_CHAIN_REGNUM in the gcc source, file gcc-2.7.2/config/cpu/cpu.h.

Author

 Bruno Haible <bruno@clisp.org>

Acknowledgements

 Many ideas were cribbed from the gcc source.

CALLBACK manual page
Bruno Haible <bruno@clisp.org>

Last modified: 1 January 2017. libffcall-2.5/callback/elf-hack.txt0000664000000000000000000000527613146127475014162 00000000000000Workaround against the ELF symbol resolving routine =================================================== On Solaris 2.6 / i386, when the function being jumped to is an external symbol of a shared library, the jump actually points to an ELF indirect jump: jmp *PTR where PTR initially contains the address of some resolving routine which will replace the PTR contents with the actual code address of the function and then jump to the function. Unfortunately, this resolving routine clobbers all three registers: %eax, %edx, %ecx. But %ecx is the register in which we pass the env_t (that points to function and data) to callback_receiver. The same effect is also seen on Linux / x86_64, where r10 is clobbered by the resolving routine (called '_dl_runtime_resolve' in glibc). See https://savannah.gnu.org/bugs/?32466 . The same thing can happen on all platforms that support ELF, since the lexical closure register is always a call-used register (see file call-used-registers.txt). On i386 (and m68k), it would be possible to solve this by passing the env_t as an extra argument on the stack and restore it to the lexical closure register at the beginning of callback_receiver. But this approach becomes too complex for the other CPUs. It is not possible to make a first call to callback_receiver to "straighten things out", because during this first call the lexical closure register gets clobbered and callback_receiver then invokes undefined behaviour. It may be possible to fix this, on some platforms, - by use of "ld -r" to combine object files, so that the code in trampoline_r.o can access callback_receiver directly, or - by use of symbol visibility control, so that callback_receiver is not an external symbol of the shared library any more, or - by an appropriate use of dlsym(). But this is highly platform dependent (linker, compiler, libc) and there may be some platforms for which none of these approaches works. A workaround that was implemented in January 2017 was to 1) modify trampoline_r so that it produces a trampoline that pushes the env_t on the stack (preserving correct stack alignment) instead of putting it in the lexical closure register, 2) insert a couple of instructions at the beginning of callback_receiver that pops this value off the stack and puts in in the lexical closure register. An even simpler workaround is to make callback_receiver a static function, so that the ELF linker does not even see it. Instead introduce a function callback_get_receiver that returns &callback_receiver. This function is global, but since it has a normal calling convention, the ELF symbol resolving routine does not cause trouble the first time callback_get_receiver() is invoked. libffcall-2.5/callback/COPYING0000644000000000000000000004335713026317516012774 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/gnulib-m4/0000775000000000000000000000000014665334231012054 500000000000000libffcall-2.5/gnulib-m4/limits-h.m40000664000000000000000000000334514631432055013765 00000000000000# limits-h.m4 # serial 1 dnl Copyright 2016-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Check whether limits.h has needed features. dnl From Paul Eggert. AC_DEFUN_ONCE([gl_LIMITS_H], [ gl_CHECK_NEXT_HEADERS([limits.h]) AC_CACHE_CHECK([whether limits.h has WORD_BIT, BOOL_WIDTH etc.], [gl_cv_header_limits_width], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#ifndef __STDC_WANT_IEC_60559_BFP_EXT__ #define __STDC_WANT_IEC_60559_BFP_EXT__ 1 #endif #include long long llm = LLONG_MAX; int wb = WORD_BIT; int ullw = ULLONG_WIDTH; int bw = BOOL_WIDTH; int bm = BOOL_MAX; int mblm = MB_LEN_MAX; ]])], [gl_cv_header_limits_width=yes], [gl_cv_header_limits_width=no])]) GL_GENERATE_LIMITS_H=true AS_IF([test "$gl_cv_header_limits_width" = yes], [AC_CACHE_CHECK([whether limits.h has SSIZE_MAX], [gl_cv_header_limits_ssize_max], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#include #ifndef SSIZE_MAX #error "SSIZE_MAX is not defined" #endif ]])], [gl_cv_header_limits_ssize_max=yes], [gl_cv_header_limits_ssize_max=no])]) if test "$gl_cv_header_limits_ssize_max" = yes; then GL_GENERATE_LIMITS_H=false fi]) ]) dnl Unconditionally enables the replacement of . AC_DEFUN([gl_REPLACE_LIMITS_H], [ AC_REQUIRE([gl_LIMITS_H]) GL_GENERATE_LIMITS_H=true ]) libffcall-2.5/gnulib-m4/mntent_h.m40000664000000000000000000000426614660662607014070 00000000000000# mntent_h.m4 # serial 2 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_MNTENT_H], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_MNTENT_H_DEFAULTS]) AC_CHECK_HEADERS_ONCE([mntent.h]) dnl For now, we provide a wrapper only if the system already has dnl a . if test $ac_cv_header_mntent_h = yes; then GL_GENERATE_MNTENT_H=true gl_CHECK_NEXT_HEADERS([mntent.h]) else GL_GENERATE_MNTENT_H=false fi dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[#include ]], [hasmntopt]) ]) # gl_MNTENT_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_MNTENT_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_MNTENT_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_MNTENT_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_MNTENT_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_HASMNTOPT]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_MNTENT_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_MNTENT_H_DEFAULTS]) ]) AC_DEFUN([gl_MNTENT_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_HASMNTOPT=1; AC_SUBST([HAVE_HASMNTOPT]) HAVE_SETMNTENT=1; AC_SUBST([HAVE_SETMNTENT]) REPLACE_HASMNTOPT=0; AC_SUBST([REPLACE_HASMNTOPT]) ]) libffcall-2.5/gnulib-m4/ssize_t.m40000664000000000000000000000261414631432055013715 00000000000000# ssize_t.m4 # serial 6 dnl Copyright (C) 2001-2003, 2006, 2010-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Define ssize_t if it does not already exist. AC_DEFUN([gt_TYPE_SSIZE_T], [ AC_CACHE_CHECK([for ssize_t], [gl_cv_ssize_t], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[int x = sizeof (ssize_t *) + sizeof (ssize_t); return !x;]])], [gl_cv_ssize_t=yes], [gl_cv_ssize_t=no])]) if test $gl_cv_ssize_t = no; then dnl On 64-bit native Windows, ssize_t needs to be defined as 'long long', dnl for consistency with the 64-bit size_t. AC_CACHE_CHECK([whether size_t is wider than 'long'], [gl_cv_size_t_large], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include typedef int array [2 * (sizeof (size_t) > sizeof (long)) - 1]; ]])], [gl_cv_size_t_large=yes], [gl_cv_size_t_large=no])]) if test $gl_cv_size_t_large = yes; then gl_def_ssize_t='long long' else gl_def_ssize_t='long' fi AC_DEFINE_UNQUOTED([ssize_t], [$gl_def_ssize_t], [Define as a signed type of the same size as size_t.]) fi ]) libffcall-2.5/gnulib-m4/xsize.m40000664000000000000000000000063014631432055013373 00000000000000# xsize.m4 # serial 5 dnl Copyright (C) 2003-2004, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_XSIZE], [ dnl Prerequisites of lib/xsize.h. AC_REQUIRE([gl_SIZE_MAX]) AC_CHECK_HEADERS([stdint.h]) ]) libffcall-2.5/gnulib-m4/eealloc.m40000664000000000000000000000167114631432055013643 00000000000000# eealloc.m4 # serial 3 dnl Copyright (C) 2003, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_EEALLOC], [ AC_REQUIRE([gl_EEMALLOC]) AC_REQUIRE([gl_EEREALLOC]) ]) AC_DEFUN([gl_EEMALLOC], [ _AC_FUNC_MALLOC_IF( [gl_cv_func_malloc_0_nonnull=1], [gl_cv_func_malloc_0_nonnull=0]) AC_DEFINE_UNQUOTED([MALLOC_0_IS_NONNULL], [$gl_cv_func_malloc_0_nonnull], [If malloc(0) is != NULL, define this to 1. Otherwise define this to 0.]) ]) AC_DEFUN([gl_EEREALLOC], [ _AC_FUNC_REALLOC_IF( [gl_cv_func_realloc_0_nonnull=1], [gl_cv_func_realloc_0_nonnull=0]) AC_DEFINE_UNQUOTED([REALLOC_0_IS_NONNULL], [$gl_cv_func_realloc_0_nonnull], [If realloc(NULL,0) is != NULL, define this to 1. Otherwise define this to 0.]) ]) libffcall-2.5/gnulib-m4/rmdir.m40000664000000000000000000000407214631432055013352 00000000000000# rmdir.m4 # serial 19 dnl Copyright (C) 2002, 2005, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_RMDIR], [ AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles dnl Detect cygwin 1.5.x bug. AC_CHECK_HEADERS_ONCE([unistd.h]) AC_CACHE_CHECK([whether rmdir works], [gl_cv_func_rmdir_works], [mkdir conftest.dir touch conftest.file AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include #include #if HAVE_UNISTD_H # include #else /* on Windows with MSVC */ # include #endif ]GL_MDA_DEFINES], [[int result = 0; if (!rmdir ("conftest.file/")) result |= 1; else if (errno != ENOTDIR) result |= 2; if (!rmdir ("conftest.dir/./")) result |= 4; return result; ]])], [gl_cv_func_rmdir_works=yes], [gl_cv_func_rmdir_works=no], [case "$host_os" in # Guess yes on Linux systems. linux-* | linux) gl_cv_func_rmdir_works="guessing yes" ;; # Guess yes on systems that emulate the Linux system calls. midipix*) gl_cv_func_rmdir_works="guessing yes" ;; # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_rmdir_works="guessing yes" ;; # Guess no on native Windows. mingw* | windows*) gl_cv_func_rmdir_works="guessing no" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_rmdir_works="$gl_cross_guess_normal" ;; esac ]) rm -rf conftest.dir conftest.file]) case "$gl_cv_func_rmdir_works" in *yes) ;; *) REPLACE_RMDIR=1 ;; esac ]) libffcall-2.5/gnulib-m4/sig_atomic_t.m40000664000000000000000000000110514631432055014670 00000000000000# sig_atomic_t.m4 # serial 3 dnl Copyright (C) 2003, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gt_TYPE_SIG_ATOMIC_T], [ AC_CHECK_TYPES([sig_atomic_t], , [AC_DEFINE([sig_atomic_t], [int], [Define as an integer type suitable for memory locations that can be accessed atomically even in the presence of asynchronous signals.])], [#include ]) ]) libffcall-2.5/gnulib-m4/extensions-aix.m40000664000000000000000000000226714657156076015235 00000000000000# extensions-aix.m4 # serial 1 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # On AIX, most extensions are already enabled through the _ALL_SOURCE macro, # defined by gl_USE_SYSTEM_EXTENSIONS. gl_USE_AIX_EXTENSIONS additionally # activates more GNU and Linux-like behaviours, affecting # - the time_t type, # - errno values in : ENOTEMPTY # - functions in : malloc calloc realloc valloc # # - functions in : strerror_r (returns 'char *', like glibc) # - functions in : scandir, alphasort, readdir_r # - functions in : gethostbyname_r gethostbyaddr_r # - declarations in : sbrk # and a couple of secondary header files. AC_DEFUN_ONCE([gl_USE_AIX_EXTENSIONS], [ AC_DEFINE([_LINUX_SOURCE_COMPAT], [1], [Define so that AIX headers are more compatible with GNU/Linux.]) ]) libffcall-2.5/gnulib-m4/mmap-anon.m40000664000000000000000000000375114663230755014133 00000000000000# mmap-anon.m4 # serial 12 dnl Copyright (C) 2005, 2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Detect how mmap can be used to create anonymous (not file-backed) memory # mappings. # - On Linux, AIX, OSF/1, Solaris, Cygwin, Interix, Haiku, both MAP_ANONYMOUS # and MAP_ANON exist and have the same value. # - On HP-UX, only MAP_ANONYMOUS exists. # - On Mac OS X, FreeBSD, NetBSD, OpenBSD, Minix, only MAP_ANON exists. # - On IRIX, neither exists, and a file descriptor opened to /dev/zero must be # used. AC_DEFUN_ONCE([gl_FUNC_MMAP_ANON], [ dnl Persuade glibc to define MAP_ANONYMOUS. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) # Check for mmap(). Don't use AC_FUNC_MMAP, because it checks too much: it # fails on HP-UX 11, because MAP_FIXED mappings do not work. But this is # irrelevant for anonymous mappings. AC_CHECK_FUNC([mmap], [gl_have_mmap=yes], [gl_have_mmap=no]) # Try to allow MAP_ANONYMOUS. gl_have_mmap_anonymous=no if test $gl_have_mmap = yes; then AC_MSG_CHECKING([for MAP_ANONYMOUS]) AC_EGREP_CPP([I cannot identify this map], [ #include #ifdef MAP_ANONYMOUS I cannot identify this map #endif ], [gl_have_mmap_anonymous=yes]) if test $gl_have_mmap_anonymous != yes; then AC_EGREP_CPP([I cannot identify this map], [ #include #ifdef MAP_ANON I cannot identify this map #endif ], [AC_DEFINE([MAP_ANONYMOUS], [MAP_ANON], [Define to a substitute value for mmap()'s MAP_ANONYMOUS flag.]) gl_have_mmap_anonymous=yes]) fi AC_MSG_RESULT([$gl_have_mmap_anonymous]) if test $gl_have_mmap_anonymous = yes; then AC_DEFINE([HAVE_MAP_ANONYMOUS], [1], [Define to 1 if mmap()'s MAP_ANONYMOUS flag is available after including config.h and .]) fi fi ]) libffcall-2.5/gnulib-m4/getprogname.m40000664000000000000000000000356014631432055014546 00000000000000# getprogname.m4 # serial 8 dnl Copyright (C) 2016-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Check for getprogname or replacements for it AC_DEFUN([gl_FUNC_GETPROGNAME], [ AC_REQUIRE([gl_STDLIB_H_DEFAULTS]) AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) gl_CHECK_FUNCS_ANDROID([getprogname], [[#include ]]) if test $ac_cv_func_getprogname = no; then HAVE_GETPROGNAME=0 case "$gl_cv_onwards_func_getprogname" in future*) REPLACE_GETPROGNAME=1 ;; esac fi AC_CHECK_DECLS([program_invocation_name], [], [HAVE_DECL_PROGRAM_INVOCATION_NAME=0], [[#include ]]) ]) AC_DEFUN([gl_PREREQ_GETPROGNAME], [ AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_CHECK_FUNCS_ONCE([getexecname]) ac_found=0 AC_CHECK_DECLS([program_invocation_name], [ac_found=1], [], [#include ]) AC_CHECK_DECLS([program_invocation_short_name], [ac_found=1], [], [#include ]) AC_CHECK_DECLS([__argv], [ac_found=1], [], [#include ]) # Incur the cost of this test only if none of the above worked. if test $ac_found = 0; then # On OpenBSD 5.1, using the global __progname variable appears to be # the only way to implement getprogname. AC_CACHE_CHECK([whether __progname is defined in default libraries], [gl_cv_var___progname], [ gl_cv_var___progname= AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[extern char *__progname;]], [[return *__progname;]] )], [gl_cv_var___progname=yes] ) ] ) if test "$gl_cv_var___progname" = yes; then AC_DEFINE([HAVE_VAR___PROGNAME], 1, [Define if you have a global __progname variable]) fi fi ]) libffcall-2.5/gnulib-m4/signal_h.m40000664000000000000000000000761314657156076014043 00000000000000# signal_h.m4 # serial 23 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_SIGNAL_H], [ AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) AC_REQUIRE([gl_CHECK_TYPE_SIGSET_T]) gl_NEXT_HEADERS([signal.h]) # AIX declares sig_atomic_t to already include volatile, and C89 compilers # then choke on 'volatile sig_atomic_t'. C99 requires that it compile. AC_CHECK_TYPE([volatile sig_atomic_t], [], [HAVE_TYPE_VOLATILE_SIG_ATOMIC_T=0], [[ #include ]]) dnl Ensure the type pid_t gets defined. AC_REQUIRE([AC_TYPE_PID_T]) AC_REQUIRE([AC_TYPE_UID_T]) dnl Persuade glibc to define sighandler_t. AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) AC_CHECK_TYPE([sighandler_t], [], [HAVE_SIGHANDLER_T=0], [[ #include ]]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[#include ]], [sig2str str2sig pthread_sigmask sigaction sigaddset sigdelset sigemptyset sigfillset sigismember sigpending sigprocmask]) AC_REQUIRE([AC_C_RESTRICT]) ]) AC_DEFUN([gl_CHECK_TYPE_SIGSET_T], [ AC_CHECK_TYPES([sigset_t], [gl_cv_type_sigset_t=yes], [gl_cv_type_sigset_t=no], [[ #include /* Mingw defines sigset_t not in , but in . */ #include ]]) if test $gl_cv_type_sigset_t != yes; then HAVE_SIGSET_T=0 fi ]) # gl_SIGNAL_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_SIGNAL_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_SIGNAL_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_SIGNAL_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_SIGNAL_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_SIGMASK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RAISE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIG2STR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIGNAL_H_SIGPIPE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIGPROCMASK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIGACTION]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_SIGNAL_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) ]) AC_DEFUN([gl_SIGNAL_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_POSIX_SIGNALBLOCKING=1; AC_SUBST([HAVE_POSIX_SIGNALBLOCKING]) HAVE_PTHREAD_SIGMASK=1; AC_SUBST([HAVE_PTHREAD_SIGMASK]) HAVE_RAISE=1; AC_SUBST([HAVE_RAISE]) HAVE_SIG2STR=1; AC_SUBST([HAVE_SIG2STR]) HAVE_SIGSET_T=1; AC_SUBST([HAVE_SIGSET_T]) HAVE_SIGINFO_T=1; AC_SUBST([HAVE_SIGINFO_T]) HAVE_SIGACTION=1; AC_SUBST([HAVE_SIGACTION]) HAVE_STR2SIG=1; AC_SUBST([HAVE_STR2SIG]) HAVE_STRUCT_SIGACTION_SA_SIGACTION=1; AC_SUBST([HAVE_STRUCT_SIGACTION_SA_SIGACTION]) HAVE_TYPE_VOLATILE_SIG_ATOMIC_T=1; AC_SUBST([HAVE_TYPE_VOLATILE_SIG_ATOMIC_T]) HAVE_SIGHANDLER_T=1; AC_SUBST([HAVE_SIGHANDLER_T]) REPLACE_PTHREAD_SIGMASK=0; AC_SUBST([REPLACE_PTHREAD_SIGMASK]) REPLACE_RAISE=0; AC_SUBST([REPLACE_RAISE]) ]) libffcall-2.5/gnulib-m4/fstat.m40000664000000000000000000000216114631432055013353 00000000000000# fstat.m4 # serial 10 dnl Copyright (C) 2011-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_FSTAT], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_SYS_STAT_H_DEFAULTS]) case "$host_os" in darwin* | mingw* | windows* | solaris*) dnl macOS and Solaris stat can return a negative tv_nsec. dnl On MinGW, the original stat() returns st_atime, st_mtime, dnl st_ctime values that are affected by the time zone. REPLACE_FSTAT=1 ;; esac dnl Replace fstat() for supporting the gnulib-defined open() on directories. m4_ifdef([gl_FUNC_FCHDIR], [ gl_TEST_FCHDIR if test $HAVE_FCHDIR = 0; then case "$gl_cv_func_open_directory_works" in *yes) ;; *) REPLACE_FSTAT=1 ;; esac fi ]) ]) # Prerequisites of lib/fstat.c and lib/stat-w32.c. AC_DEFUN([gl_PREREQ_FSTAT], [ AC_REQUIRE([gl_SYS_STAT_H]) AC_REQUIRE([gl_PREREQ_STAT_W32]) : ]) libffcall-2.5/gnulib-m4/locale-en.m40000664000000000000000000001311514665266362014107 00000000000000# locale-en.m4 # serial 1 dnl Copyright (C) 2003-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Determine the name of an English (or American English) locale with dnl UTF-8 encoding. AC_DEFUN_ONCE([gt_LOCALE_EN_UTF8], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([AM_LANGINFO_CODESET]) AC_CACHE_CHECK([for an english Unicode locale], [gt_cv_locale_en_utf8], [ case "$host_os" in *-musl* | midipix*) dnl On musl libc, all kinds of ll_CC.UTF-8 locales exist, even without dnl any locale file on disk. But they are effectively equivalent to the dnl C.UTF-8 locale, except for locale categories (such as LC_MESSSAGES) dnl for which localizations (.mo files) have been installed. gt_cv_locale_en_utf8=en_US.UTF-8 ;; *) AC_LANG_CONFTEST([AC_LANG_SOURCE([[ #include #include #if HAVE_LANGINFO_CODESET # include #endif #include #include struct tm t; char buf[16]; int main () { /* On BeOS and Haiku, locales are not implemented in libc. Rather, libintl imitates locale dependent behaviour by looking at the environment variables, and all locales use the UTF-8 encoding. */ #if !(defined __BEOS__ || defined __HAIKU__) /* Check whether the given locale name is recognized by the system. */ # if defined _WIN32 && !defined __CYGWIN__ /* On native Windows, setlocale(category, "") looks at the system settings, not at the environment variables. Also, when an encoding suffix such as ".65001" or ".54936" is specified, it succeeds but sets the LC_CTYPE category of the locale to "C". */ if (setlocale (LC_ALL, getenv ("LC_ALL")) == NULL || strcmp (setlocale (LC_CTYPE, NULL), "C") == 0) return 1; # else if (setlocale (LC_ALL, "") == NULL) return 1; # endif /* Check whether nl_langinfo(CODESET) is "UTF-8" or equivalent. */ # if HAVE_LANGINFO_CODESET { const char *cs = nl_langinfo (CODESET); if (!(strcmp (cs, "UTF-8") == 0 || strcmp (cs, "UTF8") == 0 || strcmp (cs, "utf-8") == 0 || strcmp (cs, "utf8") == 0)) return 1; } # endif # ifdef __CYGWIN__ /* On Cygwin, avoid locale names without encoding suffix, because the locale_charset() function relies on the encoding suffix. Note that LC_ALL is set on the command line. */ if (strchr (getenv ("LC_ALL"), '.') == NULL) return 1; # endif /* Check the third month name. */ t.tm_year = 1975 - 1900; t.tm_mon = 3 - 1; t.tm_mday = 24; if (strftime (buf, sizeof (buf), "%B", &t) < 5 || strcmp (buf, "March") != 0) return 1; #endif #if !defined __BIONIC__ /* Bionic libc's 'struct lconv' is just a dummy. */ /* Check whether the decimal separator is a dot. */ if (localeconv () ->decimal_point[0] != '.') return 1; #endif return 0; } ]])]) if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then case "$host_os" in # Handle native Windows specially, because there setlocale() interprets # "ar" or "ara" as "Arabic" or "Arabic_Saudi Arabia.1256", # "en" or "eng" as "English" or "English_United States.1252", # "fr" or "fra" as "French" or "French_France.1252", # "ge"(!) or "deu"(!) as "German" or "German_Germany.1252", # "ja" or "jpn" as "Japanese" or "Japanese_Japan.932", # and similar. mingw* | windows*) # Test for the hypothetical native Windows locale name. if (LC_ALL='English_United States.65001' LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8='English_United States.65001' else # None found. gt_cv_locale_en_utf8=none fi ;; *) # Setting LC_ALL is not enough. Need to set LC_TIME to empty, because # otherwise on Mac OS X 10.3.5 the LC_TIME=C from the beginning of the # configure script would override the LC_ALL setting. Likewise for # LC_CTYPE, which is also set at the beginning of the configure script. # Test for the locale name with explicit encoding suffix first # (this is necessary on Haiku). if (LC_ALL=en_US.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en_US.UTF-8 else # Test for the locale name without encoding suffix. if (LC_ALL=en_US LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en_US else # Test for the Solaris 10 locale name. if (LC_ALL=en.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_en_utf8=en.UTF-8 else # None found. gt_cv_locale_en_utf8=none fi fi fi ;; esac fi rm -fr conftest* ;; esac ]) LOCALE_EN_UTF8="$gt_cv_locale_en_utf8" case "$LOCALE_EN_UTF8" in #( '' | *[[\"\$\'*@<:@]]*) dnl The empty value occurs when the conftest.c program above could not dnl be compiled. The other values might cause trouble with sh or make. AC_MSG_WARN([invalid locale "$LOCALE_EN_UTF8"; assuming "none"]) LOCALE_EN_UTF8=none;; esac AC_SUBST([LOCALE_EN_UTF8]) ]) libffcall-2.5/gnulib-m4/ansi-c++.m40000664000000000000000000001213014631432055013527 00000000000000# ansi-c++.m4 # serial 13 dnl Copyright (C) 2002-2003, 2005, 2010-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. # Sets CXX_CHOICE to 'yes' or 'no', depending on the preferred use of C++. # The default is 'yes'. If the configure.ac contains a definition of the # macro gl_CXX_CHOICE_DEFAULT_NO, then the default is 'no'. In both cases, # the user can change the value by passing the option --disable-cxx or # --enable-cxx, respectively. AC_DEFUN([gl_CXX_CHOICE], [ AC_MSG_CHECKING([whether to use C++]) dnl Plus signs are supported in AC_ARG_ENABLE starting with autoconf-2.66. m4_version_prereq([2.66], [m4_ifdef([gl_CXX_CHOICE_DEFAULT_NO], [AC_ARG_ENABLE([c++], [ --enable-c++ also build C++ sources], [CXX_CHOICE="$enableval"], [CXX_CHOICE=no])], [AC_ARG_ENABLE([c++], [ --disable-c++ do not build C++ sources], [CXX_CHOICE="$enableval"], [CXX_CHOICE=yes])])], [m4_ifdef([gl_CXX_CHOICE_DEFAULT_NO], [AC_ARG_ENABLE([cxx], [ --enable-cxx also build C++ sources], [CXX_CHOICE="$enableval"], [CXX_CHOICE=no])], [AC_ARG_ENABLE([cxx], [ --disable-cxx do not build C++ sources], [CXX_CHOICE="$enableval"], [CXX_CHOICE=yes])])]) AC_MSG_RESULT([$CXX_CHOICE]) AC_SUBST([CXX_CHOICE]) ]) # gl_PROG_ANSI_CXX([ANSICXX_VARIABLE], [ANSICXX_CONDITIONAL]) # Sets ANSICXX_VARIABLE to the name of a sufficiently ANSI C++ compliant # compiler, or to "no" if none is found. # Defines the Automake condition ANSICXX_CONDITIONAL to true if such a compiler # was found, or to false if not. AC_DEFUN([gl_PROG_ANSI_CXX], [ AC_REQUIRE([gl_CXX_CHOICE]) m4_if([$1], [CXX], [], [gl_saved_CXX="$CXX"]) if test "$CXX_CHOICE" = no; then CXX=no fi if test -z "$CXX"; then if test -n "$CCC"; then CXX="$CCC" else AC_CHECK_TOOLS([CXX], [g++ c++ gpp aCC CC cxx cc++ cl FCC KCC RCC xlC_r xlC], [:]) fi fi if test "$CXX" != no; then dnl Use a modified version of AC_PROG_CXX_WORKS that does not exit dnl upon failure. AC_MSG_CHECKING([whether the C++ compiler ($CXX $CXXFLAGS $LDFLAGS) works]) AC_LANG_PUSH([C++]) AC_ARG_VAR([CXX], [C++ compiler command]) AC_ARG_VAR([CXXFLAGS], [C++ compiler flags]) echo 'int main () { return 0; }' > conftest.$ac_ext if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_works=yes if (./conftest; exit) 2>/dev/null; then gl_cv_prog_ansicxx_cross=no else gl_cv_prog_ansicxx_cross=yes fi else gl_cv_prog_ansicxx_works=no fi rm -fr conftest* AC_LANG_POP([C++]) AC_MSG_RESULT([$gl_cv_prog_ansicxx_works]) if test $gl_cv_prog_ansicxx_works = no; then CXX=no else dnl Test for namespaces. dnl We don't bother supporting pre-ANSI-C++ compilers. AC_MSG_CHECKING([whether the C++ compiler supports namespaces]) AC_LANG_PUSH([C++]) cat < conftest.$ac_ext #include namespace test { using namespace std; } std::ostream* ptr; int main () { return 0; } EOF if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then gl_cv_prog_ansicxx_namespaces=yes else gl_cv_prog_ansicxx_namespaces=no fi rm -fr conftest* AC_LANG_POP([C++]) AC_MSG_RESULT([$gl_cv_prog_ansicxx_namespaces]) if test $gl_cv_prog_ansicxx_namespaces = no; then CXX=no fi fi fi m4_if([$1], [CXX], [], [$1="$CXX" CXX="$gl_saved_CXX"]) AC_SUBST([$1]) AM_CONDITIONAL([$2], [test "$$1" != no]) if test "$$1" != no; then dnl This macro invocation resolves an automake error: dnl /usr/local/share/automake-1.11/am/depend2.am: am__fastdepCXX does not appear in AM_CONDITIONAL dnl /usr/local/share/automake-1.11/am/depend2.am: The usual way to define 'am__fastdepCXX' is to add 'AC_PROG_CXX' dnl /usr/local/share/automake-1.11/am/depend2.am: to 'configure.ac' and run 'aclocal' and 'autoconf' again. _AM_DEPENDENCIES([CXX]) dnl Determine a good default for the CXXFLAGS variable. AC_LANG_PUSH([C++]) _AC_LANG_COMPILER_GNU if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi _AC_PROG_CXX_G AC_LANG_POP([C++]) else AM_CONDITIONAL([am__fastdepCXX], [false]) fi ]) # gl_ANSI_CXX # Sets CXX to the name of a sufficiently ANSI C++ compliant compiler, or to # "no" if none is found. # Defines the Automake condition ANSICXX to true if such a compiler was found, # or to false if not. AC_DEFUN([gl_ANSI_CXX], [ gl_PROG_ANSI_CXX([CXX], [ANSICXX]) dnl This line is needed in order to avoid trouble with Autoconf. It makes dnl sure that Autoconf does not insert expansions of AC_PROG_CXX at random dnl places. See . m4_provide([AC_PROG_CXX]) ]) libffcall-2.5/gnulib-m4/stat-time.m40000664000000000000000000000611614631432055014145 00000000000000# stat-time.m4 # serial 1 dnl Copyright (C) 1998-1999, 2001, 2003, 2005-2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Checks for stat-related time functions. dnl From Paul Eggert. # st_atim.tv_nsec - Linux, Solaris, Cygwin # st_atimespec.tv_nsec - FreeBSD, NetBSD, if ! defined _POSIX_SOURCE # st_atimensec - FreeBSD, NetBSD, if defined _POSIX_SOURCE # st_atim.st__tim.tv_nsec - UnixWare (at least 2.1.2 through 7.1) # st_birthtimespec - FreeBSD, NetBSD (hidden on OpenBSD 3.9, anyway) # st_birthtim - Cygwin 1.7.0+ AC_DEFUN([gl_STAT_TIME], [ AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_CHECK_HEADERS_ONCE([sys/time.h]) AC_CHECK_MEMBERS([struct stat.st_atim.tv_nsec], [AC_CACHE_CHECK([whether struct stat.st_atim is of type struct timespec], [ac_cv_typeof_struct_stat_st_atim_is_struct_timespec], [AC_COMPILE_IFELSE([AC_LANG_PROGRAM( [[ #include #include #if HAVE_SYS_TIME_H # include #endif #include struct timespec ts; struct stat st; ]], [[ st.st_atim = ts; ]])], [ac_cv_typeof_struct_stat_st_atim_is_struct_timespec=yes], [ac_cv_typeof_struct_stat_st_atim_is_struct_timespec=no])]) if test $ac_cv_typeof_struct_stat_st_atim_is_struct_timespec = yes; then AC_DEFINE([TYPEOF_STRUCT_STAT_ST_ATIM_IS_STRUCT_TIMESPEC], [1], [Define to 1 if the type of the st_atim member of a struct stat is struct timespec.]) fi], [AC_CHECK_MEMBERS([struct stat.st_atimespec.tv_nsec], [], [AC_CHECK_MEMBERS([struct stat.st_atimensec], [], [AC_CHECK_MEMBERS([struct stat.st_atim.st__tim.tv_nsec], [], [], [#include #include ])], [#include #include ])], [#include #include ])], [#include #include ]) ]) # Check for st_birthtime, a feature from UFS2 (FreeBSD, NetBSD, OpenBSD, etc.) # and NTFS (Cygwin). # There was a time when this field was named st_createtime (21 June # 2002 to 16 July 2002) But that window is very small and applied only # to development code, so systems still using that configuration are # not supported. See revisions 1.10 and 1.11 of FreeBSD's # src/sys/ufs/ufs/dinode.h. # AC_DEFUN([gl_STAT_BIRTHTIME], [ AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_CHECK_HEADERS_ONCE([sys/time.h]) AC_CHECK_MEMBERS([struct stat.st_birthtimespec.tv_nsec], [], [AC_CHECK_MEMBERS([struct stat.st_birthtimensec], [], [AC_CHECK_MEMBERS([struct stat.st_birthtim.tv_nsec], [], [], [#include #include ])], [#include #include ])], [#include #include ]) ]) libffcall-2.5/gnulib-m4/c-bool.m40000664000000000000000000000340714631432055013411 00000000000000# c-bool.m4 # serial 1 dnl Copyright 2022-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Check for bool that conforms to C2023. AC_DEFUN([gl_C_BOOL], [ AC_CACHE_CHECK([for bool, true, false], [gl_cv_c_bool], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE([[ #if true == false #error "true == false" #endif extern bool b; bool b = true == false;]])], [gl_cv_c_bool=yes], [gl_cv_c_bool=no])]) if test "$gl_cv_c_bool" = yes; then AC_DEFINE([HAVE_C_BOOL], [1], [Define to 1 if bool, true and false work as per C2023.]) fi AC_CHECK_HEADERS_ONCE([stdbool.h]) dnl The "zz" puts this toward config.h's end, to avoid potential dnl collisions with other definitions. dnl If 'bool', 'true' and 'false' do not work, arrange for them to work. dnl In C, this means including if it is not already included. dnl However, if the preprocessor mistakenly treats 'true' as 0, dnl define it to a bool expression equal to 1; this is needed in dnl Sun C++ 5.11 (Oracle Solaris Studio 12.2, 2010) and older. AH_VERBATIM([zzbool], [#ifndef HAVE_C_BOOL # if !defined __cplusplus && !defined __bool_true_false_are_defined # if HAVE_STDBOOL_H # include # else # if defined __SUNPRO_C # error " is not usable with this configuration. To make it usable, add -D_STDC_C99= to $CC." # else # error " does not exist on this platform. Use gnulib module 'stdbool-c99' instead of gnulib module 'stdbool'." # endif # endif # endif # if !true # define true (!false) # endif #endif]) ]) libffcall-2.5/gnulib-m4/open.m40000664000000000000000000000300214631432055013166 00000000000000# open.m4 # serial 16 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_OPEN], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_PREPROC_O_CLOEXEC]) case "$host_os" in mingw* | windows* | pw*) REPLACE_OPEN=1 ;; *) dnl open("foo/") should not create a file when the file name has a dnl trailing slash. FreeBSD only has the problem on symlinks. AC_CHECK_FUNCS_ONCE([lstat]) if test "$gl_cv_macro_O_CLOEXEC" != yes; then REPLACE_OPEN=1 fi gl_OPEN_TRAILING_SLASH_BUG case "$gl_cv_func_open_slash" in *no) REPLACE_OPEN=1 ;; esac ;; esac dnl Replace open() for supporting the gnulib-defined fchdir() function, dnl to keep fchdir's bookkeeping up-to-date. m4_ifdef([gl_FUNC_FCHDIR], [ if test $REPLACE_OPEN = 0; then gl_TEST_FCHDIR if test $HAVE_FCHDIR = 0; then REPLACE_OPEN=1 fi fi ]) dnl Replace open() for supporting the gnulib-defined O_NONBLOCK flag. m4_ifdef([gl_NONBLOCKING_IO], [ if test $REPLACE_OPEN = 0; then gl_NONBLOCKING_IO if test $gl_cv_have_open_O_NONBLOCK != yes; then REPLACE_OPEN=1 fi fi ]) ]) # Prerequisites of lib/open.c. AC_DEFUN([gl_PREREQ_OPEN], [ AC_REQUIRE([gl_PROMOTED_TYPE_MODE_T]) : ]) libffcall-2.5/gnulib-m4/sys_socket_h.m40000664000000000000000000001633514631432055014737 00000000000000# sys_socket_h.m4 # serial 29 dnl Copyright (C) 2005-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Simon Josefsson. AC_DEFUN_ONCE([gl_SYS_SOCKET_H], [ AC_REQUIRE([gl_SYS_SOCKET_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl On OSF/1, the functions recv(), send(), recvfrom(), sendto() have dnl old-style declarations (with return type 'int' instead of 'ssize_t') dnl unless _POSIX_PII_SOCKET is defined. case "$host_os" in osf*) AC_DEFINE([_POSIX_PII_SOCKET], [1], [Define to 1 in order to get the POSIX compatible declarations of socket functions.]) ;; esac GL_GENERATE_SYS_SOCKET_H=false AC_CACHE_CHECK([whether is self-contained], [gl_cv_header_sys_socket_h_selfcontained], [ AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#include ]], [[]])], [gl_cv_header_sys_socket_h_selfcontained=yes], [gl_cv_header_sys_socket_h_selfcontained=no]) ]) if test $gl_cv_header_sys_socket_h_selfcontained = yes; then dnl If the shutdown function exists, should define dnl SHUT_RD, SHUT_WR, SHUT_RDWR. AC_CHECK_FUNCS([shutdown]) if test $ac_cv_func_shutdown = yes; then AC_CACHE_CHECK([whether defines the SHUT_* macros], [gl_cv_header_sys_socket_h_shut], [ AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[#include ]], [[int a[] = { SHUT_RD, SHUT_WR, SHUT_RDWR };]])], [gl_cv_header_sys_socket_h_shut=yes], [gl_cv_header_sys_socket_h_shut=no]) ]) if test $gl_cv_header_sys_socket_h_shut = no; then GL_GENERATE_SYS_SOCKET_H=true fi fi fi # We need to check for ws2tcpip.h now. gl_PREREQ_SYS_H_SOCKET AC_CHECK_TYPES([struct sockaddr_storage, sa_family_t],,,[ /* sys/types.h is not needed according to POSIX, but the sys/socket.h in i386-unknown-freebsd4.10 and powerpc-apple-darwin5.5 required it. */ #include #ifdef HAVE_SYS_SOCKET_H #include #endif #ifdef HAVE_WS2TCPIP_H #include #endif ]) if test $ac_cv_type_struct_sockaddr_storage = no; then HAVE_STRUCT_SOCKADDR_STORAGE=0 fi if test $ac_cv_type_sa_family_t = no; then HAVE_SA_FAMILY_T=0 fi if test $ac_cv_type_struct_sockaddr_storage != no; then AC_CHECK_MEMBERS([struct sockaddr_storage.ss_family], [], [HAVE_STRUCT_SOCKADDR_STORAGE_SS_FAMILY=0], [#include #ifdef HAVE_SYS_SOCKET_H #include #endif #ifdef HAVE_WS2TCPIP_H #include #endif ]) fi if test $HAVE_STRUCT_SOCKADDR_STORAGE = 0 || test $HAVE_SA_FAMILY_T = 0 \ || test $HAVE_STRUCT_SOCKADDR_STORAGE_SS_FAMILY = 0; then GL_GENERATE_SYS_SOCKET_H=true fi gl_PREREQ_SYS_H_WINSOCK2 dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[ /* Some systems require prerequisite headers. */ #include #include ]], [socket connect accept bind getpeername getsockname getsockopt listen recv send recvfrom sendto setsockopt shutdown accept4]) AC_REQUIRE([AC_C_RESTRICT]) ]) AC_DEFUN([gl_PREREQ_SYS_H_SOCKET], [ dnl Check prerequisites of the replacement. AC_REQUIRE([gl_CHECK_SOCKET_HEADERS]) gl_CHECK_NEXT_HEADERS([sys/socket.h]) if test $ac_cv_header_sys_socket_h = yes; then HAVE_SYS_SOCKET_H=1 else HAVE_SYS_SOCKET_H=0 fi AC_SUBST([HAVE_SYS_SOCKET_H]) gl_PREREQ_SYS_H_WS2TCPIP ]) # Common prerequisites of the replacement and of the # replacement. # Sets and substitutes HAVE_WINSOCK2_H. AC_DEFUN([gl_PREREQ_SYS_H_WINSOCK2], [ m4_ifdef([gl_UNISTD_H_DEFAULTS], [AC_REQUIRE([gl_UNISTD_H_DEFAULTS])]) m4_ifdef([gl_SYS_IOCTL_H_DEFAULTS], [AC_REQUIRE([gl_SYS_IOCTL_H_DEFAULTS])]) AC_CHECK_HEADERS_ONCE([sys/socket.h]) if test $ac_cv_header_sys_socket_h != yes; then dnl We cannot use AC_CHECK_HEADERS_ONCE here, because that would make dnl the check for those headers unconditional; yet cygwin reports dnl that the headers are present but cannot be compiled (since on dnl cygwin, all socket information should come from sys/socket.h). AC_CHECK_HEADERS([winsock2.h]) fi if test "$ac_cv_header_winsock2_h" = yes; then HAVE_WINSOCK2_H=1 UNISTD_H_HAVE_WINSOCK2_H=1 SYS_IOCTL_H_HAVE_WINSOCK2_H=1 else HAVE_WINSOCK2_H=0 fi AC_SUBST([HAVE_WINSOCK2_H]) ]) # Common prerequisites of the replacement and of the # replacement. # Sets and substitutes HAVE_WS2TCPIP_H. AC_DEFUN([gl_PREREQ_SYS_H_WS2TCPIP], [ AC_REQUIRE([gl_CHECK_SOCKET_HEADERS]) if test $ac_cv_header_sys_socket_h = yes; then HAVE_WS2TCPIP_H=0 else if test $ac_cv_header_ws2tcpip_h = yes; then HAVE_WS2TCPIP_H=1 else HAVE_WS2TCPIP_H=0 fi fi AC_SUBST([HAVE_WS2TCPIP_H]) ]) # gl_SYS_SOCKET_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_SYS_SOCKET_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_SYS_SOCKET_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_SYS_SOCKET_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_SYS_SOCKET_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SOCKET]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CONNECT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ACCEPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_BIND]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETPEERNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETSOCKNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETSOCKOPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LISTEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RECV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SEND]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RECVFROM]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SENDTO]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SETSOCKOPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SHUTDOWN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ACCEPT4]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_SYS_SOCKET_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_SYS_SOCKET_H_DEFAULTS]) ]) AC_DEFUN([gl_SYS_SOCKET_H_DEFAULTS], [ HAVE_STRUCT_SOCKADDR_STORAGE=1; AC_SUBST([HAVE_STRUCT_SOCKADDR_STORAGE]) HAVE_STRUCT_SOCKADDR_STORAGE_SS_FAMILY=1; AC_SUBST([HAVE_STRUCT_SOCKADDR_STORAGE_SS_FAMILY]) HAVE_SA_FAMILY_T=1; AC_SUBST([HAVE_SA_FAMILY_T]) HAVE_ACCEPT4=1; AC_SUBST([HAVE_ACCEPT4]) ]) libffcall-2.5/gnulib-m4/multiarch.m40000664000000000000000000000422214631432055014222 00000000000000# multiarch.m4 # serial 9 dnl Copyright (C) 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Determine whether the compiler is or may be producing universal binaries. # # On Mac OS X 10.5 and later systems, the user can create libraries and # executables that work on multiple system types--known as "fat" or # "universal" binaries--by specifying multiple '-arch' options to the # compiler but only a single '-arch' option to the preprocessor. Like # this: # # ./configure CC="gcc -arch i386 -arch x86_64 -arch ppc -arch ppc64" \ # CXX="g++ -arch i386 -arch x86_64 -arch ppc -arch ppc64" \ # CPP="gcc -E" CXXCPP="g++ -E" # # Detect this situation and set APPLE_UNIVERSAL_BUILD accordingly. AC_DEFUN_ONCE([gl_MULTIARCH], [ dnl Code similar to autoconf-2.63 AC_C_BIGENDIAN. AC_CACHE_CHECK([whether the compiler produces multi-arch binaries], [gl_cv_c_multiarch], [gl_cv_c_multiarch=no AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#ifndef __APPLE_CC__ not a universal capable compiler #endif typedef int dummy; ]])], [ dnl Check for potential -arch flags. It is not universal unless dnl there are at least two -arch flags with different values. arch= prev= for word in ${CC} ${CFLAGS} ${CPPFLAGS} ${LDFLAGS}; do if test -n "$prev"; then case $word in i?86 | x86_64 | ppc | ppc64 | arm | arm64) if test -z "$arch" || test "$arch" = "$word"; then arch="$word" else gl_cv_c_multiarch=yes fi ;; esac prev= else if test "x$word" = "x-arch"; then prev=arch fi fi done ]) ]) if test $gl_cv_c_multiarch = yes; then APPLE_UNIVERSAL_BUILD=1 else APPLE_UNIVERSAL_BUILD=0 fi AC_SUBST([APPLE_UNIVERSAL_BUILD]) ]) libffcall-2.5/gnulib-m4/gnulib-tool.m40000664000000000000000000000316614664171733014504 00000000000000# gnulib-tool.m4 # serial 5 dnl Copyright (C) 2004-2005, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl The following macros need not be invoked explicitly. dnl Invoking them does nothing except to declare default arguments dnl for "gnulib-tool --import". dnl Usage: gl_LOCAL_DIR([DIR]) AC_DEFUN([gl_LOCAL_DIR], []) dnl Usage: gl_MODULES([module1 module2 ...]) AC_DEFUN([gl_MODULES], []) dnl Usage: gl_AVOID([module1 module2 ...]) AC_DEFUN([gl_AVOID], []) dnl Usage: gl_SOURCE_BASE([DIR]) AC_DEFUN([gl_SOURCE_BASE], []) dnl Usage: gl_M4_BASE([DIR]) AC_DEFUN([gl_M4_BASE], []) dnl Usage: gl_PO_BASE([DIR]) AC_DEFUN([gl_PO_BASE], []) dnl Usage: gl_DOC_BASE([DIR]) AC_DEFUN([gl_DOC_BASE], []) dnl Usage: gl_TESTS_BASE([DIR]) AC_DEFUN([gl_TESTS_BASE], []) dnl Usage: gl_WITH_TESTS AC_DEFUN([gl_WITH_TESTS], []) dnl Usage: gl_LIB([LIBNAME]) AC_DEFUN([gl_LIB], []) dnl Usage: gl_LGPL or gl_LGPL([VERSION]) AC_DEFUN([gl_LGPL], []) dnl Usage: gl_GPL([VERSION]) AC_DEFUN([gl_GPL], []) dnl Usage: gl_MAKEFILE_NAME([FILENAME]) AC_DEFUN([gl_MAKEFILE_NAME], []) dnl Usage: gl_TESTS_MAKEFILE_NAME([FILENAME]) AC_DEFUN([gl_TESTS_MAKEFILE_NAME], []) dnl Usage: gl_AUTOMAKE_SUBDIR AC_DEFUN([gl_AUTOMAKE_SUBDIR], []) dnl Usage: gl_LIBTOOL AC_DEFUN([gl_LIBTOOL], []) dnl Usage: gl_MACRO_PREFIX([PREFIX]) AC_DEFUN([gl_MACRO_PREFIX], []) dnl Usage: gl_PO_DOMAIN([DOMAIN]) AC_DEFUN([gl_PO_DOMAIN], []) dnl Usage: gl_VC_FILES([BOOLEAN]) AC_DEFUN([gl_VC_FILES], []) libffcall-2.5/gnulib-m4/std-gnu11.m40000664000000000000000000006012214657156076013774 00000000000000# std-gnu11.m4 # serial 2 # Prefer GNU C11 and C++11 to earlier versions. -*- coding: utf-8 -*- # The std-gnu23 module, which defines _AC_C_C23_OPTIONS, supersedes us. m4_ifndef([_AC_C_C23_OPTIONS], [ # This implementation is taken from GNU Autoconf lib/autoconf/c.m4 # commit 017d5ddd82854911f0119691d91ea8a1438824d6 # dated Sun Apr 3 13:57:17 2016 -0700 # This implementation will be obsolete once we can assume Autoconf 2.70 # or later is installed everywhere a Gnulib program might be developed. m4_version_prereq([2.70], [], [ # Copyright (C) 2001-2024 Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . # Written by David MacKenzie, with help from # Akim Demaille, Paul Eggert, # François Pinard, Karl Berry, Richard Pixley, Ian Lance Taylor, # Roland McGrath, Noah Friedman, david d zuhn, and many others. # AC_PROG_CC([COMPILER ...]) # -------------------------- # COMPILER ... is a space separated list of C compilers to search for. # This just gives the user an opportunity to specify an alternative # search list for the C compiler. AC_DEFUN([AC_PROG_CC], [AC_LANG_PUSH(C)dnl AC_ARG_VAR([CC], [C compiler command])dnl AC_ARG_VAR([CFLAGS], [C compiler flags])dnl _AC_ARG_VAR_LDFLAGS()dnl _AC_ARG_VAR_LIBS()dnl _AC_ARG_VAR_CPPFLAGS()dnl m4_ifval([$1], [AC_CHECK_TOOLS(CC, [$1])], [AC_CHECK_TOOL(CC, gcc) if test -z "$CC"; then dnl Here we want: dnl AC_CHECK_TOOL(CC, cc) dnl but without the check for a tool without the prefix. dnl Until the check is removed from there, copy the code: if test -n "$ac_tool_prefix"; then AC_CHECK_PROG(CC, [${ac_tool_prefix}cc], [${ac_tool_prefix}cc]) fi fi if test -z "$CC"; then AC_CHECK_PROG(CC, cc, cc, , , /usr/ucb/cc) fi if test -z "$CC"; then AC_CHECK_TOOLS(CC, cl.exe) fi if test -z "$CC"; then AC_CHECK_TOOL(CC, clang) fi ]) test -z "$CC" && AC_MSG_FAILURE([no acceptable C compiler found in \$PATH]) # Provide some information about the compiler. _AS_ECHO_LOG([checking for _AC_LANG compiler version]) set X $ac_compile ac_compiler=$[2] for ac_option in --version -v -V -qversion -version; do _AC_DO_LIMIT([$ac_compiler $ac_option >&AS_MESSAGE_LOG_FD]) done m4_expand_once([_AC_COMPILER_EXEEXT])[]dnl m4_expand_once([_AC_COMPILER_OBJEXT])[]dnl _AC_LANG_COMPILER_GNU if test $ac_compiler_gnu = yes; then GCC=yes else GCC= fi _AC_PROG_CC_G dnl dnl Set ac_prog_cc_stdc to the supported C version. dnl Also set the documented variable ac_cv_prog_cc_stdc; dnl its name was chosen when it was cached, but it is no longer cached. _AC_PROG_CC_C11([ac_prog_cc_stdc=c11 ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c11], [_AC_PROG_CC_C99([ac_prog_cc_stdc=c99 ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c99], [_AC_PROG_CC_C89([ac_prog_cc_stdc=c89 ac_cv_prog_cc_stdc=$ac_cv_prog_cc_c89], [ac_prog_cc_stdc=no ac_cv_prog_cc_stdc=no])])]) dnl AC_LANG_POP(C)dnl ])# AC_PROG_CC # AC_PROG_CXX([LIST-OF-COMPILERS]) # -------------------------------- # LIST-OF-COMPILERS is a space separated list of C++ compilers to search # for (if not specified, a default list is used). This just gives the # user an opportunity to specify an alternative search list for the C++ # compiler. # aCC HP-UX C++ compiler much better than `CC', so test before. # FCC Fujitsu C++ compiler # KCC KAI C++ compiler # RCC Rational C++ # xlC_r AIX C Set++ (with support for reentrant code) # xlC AIX C Set++ AC_DEFUN([AC_PROG_CXX], [AC_LANG_PUSH(C++)dnl AC_ARG_VAR([CXX], [C++ compiler command])dnl AC_ARG_VAR([CXXFLAGS], [C++ compiler flags])dnl _AC_ARG_VAR_LDFLAGS()dnl _AC_ARG_VAR_LIBS()dnl _AC_ARG_VAR_CPPFLAGS()dnl _AC_ARG_VAR_PRECIOUS([CCC])dnl if test -z "$CXX"; then if test -n "$CCC"; then CXX=$CCC else AC_CHECK_TOOLS(CXX, [m4_default([$1], [g++ c++ gpp aCC CC cxx cc++ cl.exe FCC KCC RCC xlC_r xlC clang++])], g++) fi fi # Provide some information about the compiler. _AS_ECHO_LOG([checking for _AC_LANG compiler version]) set X $ac_compile ac_compiler=$[2] for ac_option in --version -v -V -qversion; do _AC_DO_LIMIT([$ac_compiler $ac_option >&AS_MESSAGE_LOG_FD]) done m4_expand_once([_AC_COMPILER_EXEEXT])[]dnl m4_expand_once([_AC_COMPILER_OBJEXT])[]dnl _AC_LANG_COMPILER_GNU if test $ac_compiler_gnu = yes; then GXX=yes else GXX= fi _AC_PROG_CXX_G _AC_PROG_CXX_CXX11([ac_prog_cxx_stdcxx=cxx11 ac_cv_prog_cxx_stdcxx=$ac_cv_prog_cxx_cxx11 ac_cv_prog_cxx_cxx98=$ac_cv_prog_cxx_cxx11], [_AC_PROG_CXX_CXX98([ac_prog_cxx_stdcxx=cxx98 ac_cv_prog_cxx_stdcxx=$ac_cv_prog_cxx_cxx98], [ac_prog_cxx_stdcxx=no ac_cv_prog_cxx_stdcxx=no])]) AC_LANG_POP(C++)dnl ])# AC_PROG_CXX # _AC_C_STD_TRY(STANDARD, TEST-PROLOGUE, TEST-BODY, OPTION-LIST, # ACTION-IF-AVAILABLE, ACTION-IF-UNAVAILABLE) # -------------------------------------------------------------- # Check whether the C compiler accepts features of STANDARD (e.g `c89', `c99') # by trying to compile a program of TEST-PROLOGUE and TEST-BODY. If this fails, # try again with each compiler option in the space-separated OPTION-LIST; if one # helps, append it to CC. If eventually successful, run ACTION-IF-AVAILABLE, # else ACTION-IF-UNAVAILABLE. AC_DEFUN([_AC_C_STD_TRY], [AC_MSG_CHECKING([for $CC option to enable ]m4_translit($1, [c], [C])[ features]) AC_CACHE_VAL(ac_cv_prog_cc_$1, [ac_cv_prog_cc_$1=no ac_save_CC=$CC AC_LANG_CONFTEST([AC_LANG_PROGRAM([$2], [$3])]) for ac_arg in '' $4 do CC="$ac_save_CC $ac_arg" _AC_COMPILE_IFELSE([], [ac_cv_prog_cc_$1=$ac_arg]) test "x$ac_cv_prog_cc_$1" != "xno" && break done rm -f conftest.$ac_ext CC=$ac_save_CC ])# AC_CACHE_VAL ac_prog_cc_stdc_options= case "x$ac_cv_prog_cc_$1" in x) AC_MSG_RESULT([none needed]) ;; xno) AC_MSG_RESULT([unsupported]) ;; *) ac_prog_cc_stdc_options=" $ac_cv_prog_cc_$1" CC=$CC$ac_prog_cc_stdc_options AC_MSG_RESULT([$ac_cv_prog_cc_$1]) ;; esac AS_IF([test "x$ac_cv_prog_cc_$1" != xno], [$5], [$6]) ])# _AC_C_STD_TRY # _AC_C_C99_TEST_HEADER # --------------------- # A C header suitable for testing for C99. AC_DEFUN([_AC_C_C99_TEST_HEADER], [[#include #include #include #include #include #include // Check varargs macros. These examples are taken from C99 6.10.3.5. #define debug(...) fprintf (stderr, __VA_ARGS__) #define showlist(...) puts (#__VA_ARGS__) #define report(test,...) ((test) ? puts (#test) : printf (__VA_ARGS__)) static void test_varargs_macros (void) { int x = 1234; int y = 5678; debug ("Flag"); debug ("X = %d\n", x); showlist (The first, second, and third items.); report (x>y, "x is %d but y is %d", x, y); } // Check long long types. #define BIG64 18446744073709551615ull #define BIG32 4294967295ul #define BIG_OK (BIG64 / BIG32 == 4294967297ull && BIG64 % BIG32 == 0) #if !BIG_OK your preprocessor is broken; #endif #if BIG_OK #else your preprocessor is broken; #endif static long long int bignum = -9223372036854775807LL; static unsigned long long int ubignum = BIG64; struct incomplete_array { int datasize; double data[]; }; struct named_init { int number; const wchar_t *name; double average; }; typedef const char *ccp; static inline int test_restrict (ccp restrict text) { // See if C++-style comments work. // Iterate through items via the restricted pointer. // Also check for declarations in for loops. for (unsigned int i = 0; *(text+i) != '\0'; ++i) continue; return 0; } // Check varargs and va_copy. static bool test_varargs (const char *format, ...) { va_list args; va_start (args, format); va_list args_copy; va_copy (args_copy, args); const char *str = ""; int number = 0; float fnumber = 0; while (*format) { switch (*format++) { case 's': // string str = va_arg (args_copy, const char *); break; case 'd': // int number = va_arg (args_copy, int); break; case 'f': // float fnumber = va_arg (args_copy, double); break; default: break; } } va_end (args_copy); va_end (args); return *str && number && fnumber; }]])# _AC_C_C99_TEST_HEADER # _AC_C_C99_TEST_BODY # ------------------- # A C body suitable for testing for C99, assuming the corresponding header. AC_DEFUN([_AC_C_C99_TEST_BODY], [[ // Check bool. _Bool success = false; // Check restrict. if (test_restrict ("String literal") == 0) success = true; char *restrict newvar = "Another string"; // Check varargs. success &= test_varargs ("s, d' f .", "string", 65, 34.234); test_varargs_macros (); // Check flexible array members. struct incomplete_array *ia = malloc (sizeof (struct incomplete_array) + (sizeof (double) * 10)); ia->datasize = 10; for (int i = 0; i < ia->datasize; ++i) ia->data[i] = i * 1.234; // Check named initializers. struct named_init ni = { .number = 34, .name = L"Test wide string", .average = 543.34343, }; ni.number = 58; int dynamic_array[ni.number]; dynamic_array[ni.number - 1] = 543; // work around unused variable warnings return (!success || bignum == 0LL || ubignum == 0uLL || newvar[0] == 'x' || dynamic_array[ni.number - 1] != 543); ]]) # _AC_PROG_CC_C99 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE]) # ---------------------------------------------------------------- # If the C compiler is not in ISO C99 mode by default, try to add an # option to output variable CC to make it so. This macro tries # various options that select ISO C99 on some system or another. It # considers the compiler to be in ISO C99 mode if it handles _Bool, # // comments, flexible array members, inline, long long int, mixed # code and declarations, named initialization of structs, restrict, # va_copy, varargs macros, variable declarations in for loops and # variable length arrays. AC_DEFUN([_AC_PROG_CC_C99], [_AC_C_STD_TRY([c99], [_AC_C_C99_TEST_HEADER], [_AC_C_C99_TEST_BODY], dnl Try dnl GCC -std=gnu99 (unused restrictive modes: -std=c99 -std=iso9899:1999) dnl IBM XL C -qlanglvl=extc1x (V12.1; does not pass C11 test) dnl IBM XL C -qlanglvl=extc99 dnl (pre-V12.1; unused restrictive mode: -qlanglvl=stdc99) dnl HP cc -AC99 dnl Intel ICC -std=c99, -c99 (deprecated) dnl IRIX -c99 dnl Solaris -D_STDC_C99= dnl cc's -xc99 option uses linker magic to define the external dnl symbol __xpg4 as if by "int __xpg4 = 1;", which enables C99 dnl behavior for C library functions. This is not wanted here, dnl because it means that a single module compiled with -xc99 dnl alters C runtime behavior for the entire program, not for dnl just the module. Instead, define the (private) symbol dnl _STDC_C99, which suppresses a bogus failure in . dnl The resulting compiler passes the test case here, and that's dnl good enough. For more, please see the thread starting at: dnl https://lists.gnu.org/r/autoconf/2010-12/msg00059.html dnl Tru64 -c99 dnl with extended modes being tried first. [[-std=gnu99 -std=c99 -c99 -AC99 -D_STDC_C99= -qlanglvl=extc1x -qlanglvl=extc99]], [$1], [$2])[]dnl ])# _AC_PROG_CC_C99 # _AC_PROG_CC_C11 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE]) # ---------------------------------------------------------------- # If the C compiler is not in ISO C11 mode by default, try to add an # option to output variable CC to make it so. This macro tries # various options that select ISO C11 on some system or another. It # considers the compiler to be in ISO C11 mode if it handles _Alignas, # _Alignof, _Noreturn, _Static_assert, UTF-8 string literals, # duplicate typedefs, and anonymous structures and unions. AC_DEFUN([_AC_PROG_CC_C11], [_AC_C_STD_TRY([c11], [_AC_C_C99_TEST_HEADER[ // Check _Alignas. char _Alignas (double) aligned_as_double; char _Alignas (0) no_special_alignment; extern char aligned_as_int; char _Alignas (0) _Alignas (int) aligned_as_int; // Check _Alignof. enum { int_alignment = _Alignof (int), int_array_alignment = _Alignof (int[100]), char_alignment = _Alignof (char) }; _Static_assert (0 < -_Alignof (int), "_Alignof is signed"); // Check _Noreturn. int _Noreturn does_not_return (void) { for (;;) continue; } // Check _Static_assert. struct test_static_assert { int x; _Static_assert (sizeof (int) <= sizeof (long int), "_Static_assert does not work in struct"); long int y; }; // Check UTF-8 literals. #define u8 syntax error! char const utf8_literal[] = u8"happens to be ASCII" "another string"; // Check duplicate typedefs. typedef long *long_ptr; typedef long int *long_ptr; typedef long_ptr long_ptr; // Anonymous structures and unions -- taken from C11 6.7.2.1 Example 1. struct anonymous { union { struct { int i; int j; }; struct { int k; long int l; } w; }; int m; } v1; ]], [_AC_C_C99_TEST_BODY[ v1.i = 2; v1.w.k = 5; _Static_assert ((offsetof (struct anonymous, i) == offsetof (struct anonymous, w.k)), "Anonymous union alignment botch"); ]], dnl Try dnl GCC -std=gnu11 (unused restrictive mode: -std=c11) dnl with extended modes being tried first. dnl dnl Do not try -qlanglvl=extc1x, because IBM XL C V12.1 (the latest version as dnl of September 2012) does not pass the C11 test. For now, try extc1x when dnl compiling the C99 test instead, since it enables _Static_assert and dnl _Noreturn, which is a win. If -qlanglvl=extc11 or -qlanglvl=extc1x passes dnl the C11 test in some future version of IBM XL C, we'll add it here, dnl preferably extc11. [[-std=gnu11]], [$1], [$2])[]dnl ])# _AC_PROG_CC_C11 # AC_PROG_CC_C89 # -------------- # Do not use AU_ALIAS here and in AC_PROG_CC_C99 and AC_PROG_CC_STDC, # as that'd be incompatible with how Automake redefines AC_PROG_CC. See # . AU_DEFUN([AC_PROG_CC_C89], [AC_REQUIRE([AC_PROG_CC])], [$0 is obsolete; use AC_PROG_CC] ) # AC_PROG_CC_C99 # -------------- AU_DEFUN([AC_PROG_CC_C99], [AC_REQUIRE([AC_PROG_CC])], [$0 is obsolete; use AC_PROG_CC] ) # AC_PROG_CC_STDC # --------------- AU_DEFUN([AC_PROG_CC_STDC], [AC_REQUIRE([AC_PROG_CC])], [$0 is obsolete; use AC_PROG_CC] ) # AC_C_PROTOTYPES # --------------- # Check if the C compiler supports prototypes, included if it needs # options. AC_DEFUN([AC_C_PROTOTYPES], [AC_REQUIRE([AC_PROG_CC])dnl if test "$ac_prog_cc_stdc" != no; then AC_DEFINE(PROTOTYPES, 1, [Define to 1 if the C compiler supports function prototypes.]) AC_DEFINE(__PROTOTYPES, 1, [Define like PROTOTYPES; this can be used by system headers.]) fi ])# AC_C_PROTOTYPES # _AC_CXX_STD_TRY(STANDARD, TEST-PROLOGUE, TEST-BODY, OPTION-LIST, # ACTION-IF-AVAILABLE, ACTION-IF-UNAVAILABLE) # ---------------------------------------------------------------- # Check whether the C++ compiler accepts features of STANDARD (e.g # `cxx98', `cxx11') by trying to compile a program of TEST-PROLOGUE # and TEST-BODY. If this fails, try again with each compiler option # in the space-separated OPTION-LIST; if one helps, append it to CXX. # If eventually successful, run ACTION-IF-AVAILABLE, else # ACTION-IF-UNAVAILABLE. AC_DEFUN([_AC_CXX_STD_TRY], [AC_MSG_CHECKING([for $CXX option to enable ]m4_translit(m4_translit($1, [x], [+]), [a-z], [A-Z])[ features]) AC_LANG_PUSH(C++)dnl AC_CACHE_VAL(ac_cv_prog_cxx_$1, [ac_cv_prog_cxx_$1=no ac_save_CXX=$CXX AC_LANG_CONFTEST([AC_LANG_PROGRAM([$2], [$3])]) for ac_arg in '' $4 do CXX="$ac_save_CXX $ac_arg" _AC_COMPILE_IFELSE([], [ac_cv_prog_cxx_$1=$ac_arg]) test "x$ac_cv_prog_cxx_$1" != "xno" && break done rm -f conftest.$ac_ext CXX=$ac_save_CXX ])# AC_CACHE_VAL ac_prog_cxx_stdcxx_options= case "x$ac_cv_prog_cxx_$1" in x) AC_MSG_RESULT([none needed]) ;; xno) AC_MSG_RESULT([unsupported]) ;; *) ac_prog_cxx_stdcxx_options=" $ac_cv_prog_cxx_$1" CXX=$CXX$ac_prog_cxx_stdcxx_options AC_MSG_RESULT([$ac_cv_prog_cxx_$1]) ;; esac AC_LANG_POP(C++)dnl AS_IF([test "x$ac_cv_prog_cxx_$1" != xno], [$5], [$6]) ])# _AC_CXX_STD_TRY # _AC_CXX_CXX98_TEST_HEADER # ------------------------- # A C++ header suitable for testing for CXX98. AC_DEFUN([_AC_CXX_CXX98_TEST_HEADER], [[ #include #include #include #include #include #include #include #include #include #include #include #include #include namespace test { typedef std::vector string_vec; typedef std::pair map_value; typedef std::map map_type; typedef std::set set_type; template class printer { public: printer(std::ostringstream& os): os(os) {} void operator() (T elem) { os << elem << std::endl; } private: std::ostringstream& os; }; } ]])# _AC_CXX_CXX98_TEST_HEADER # _AC_CXX_CXX98_TEST_BODY # ----------------------- # A C++ body suitable for testing for CXX98, assuming the corresponding header. AC_DEFUN([_AC_CXX_CXX98_TEST_BODY], [[ try { // Basic string. std::string teststr("ASCII text"); teststr += " string"; // Simple vector. test::string_vec testvec; testvec.push_back(teststr); testvec.push_back("foo"); testvec.push_back("bar"); if (testvec.size() != 3) { throw std::runtime_error("vector size is not 1"); } // Dump vector into stringstream and obtain string. std::ostringstream os; for (test::string_vec::const_iterator i = testvec.begin(); i != testvec.end(); ++i) { if (i + 1 != testvec.end()) { os << teststr << '\n'; } } // Check algorithms work. std::for_each(testvec.begin(), testvec.end(), test::printer(os)); std::string os_out = os.str(); // Test pair and map. test::map_type testmap; testmap.insert(std::make_pair(std::string("key"), std::make_pair(53,false))); // Test set. int values[] = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1}; test::set_type testset(values, values + sizeof(values)/sizeof(values[0])); std::list testlist(testset.begin(), testset.end()); std::copy(testset.begin(), testset.end(), std::back_inserter(testlist)); } catch (const std::exception& e) { std::cerr << "Caught exception: " << e.what() << std::endl; // Test fstream std::ofstream of("test.txt"); of << "Test ASCII text\n" << std::flush; of << "N= " << std::hex << std::setw(8) << std::left << 534 << std::endl; of.close(); } std::exit(0); ]]) # _AC_CXX_CXX11_TEST_HEADER # ------------------------- # A C++ header suitable for testing for CXX11. AC_DEFUN([_AC_CXX_CXX11_TEST_HEADER], [[ #include #include #include #include #include #include #include namespace cxx11test { typedef std::shared_ptr sptr; typedef std::weak_ptr wptr; typedef std::tuple tp; typedef std::array int_array; constexpr int get_val() { return 20; } struct testinit { int i; double d; }; class delegate { public: delegate(int n) : n(n) {} delegate(): delegate(2354) {} virtual int getval() { return this->n; }; protected: int n; }; class overridden : public delegate { public: overridden(int n): delegate(n) {} virtual int getval() override final { return this->n * 2; } }; class nocopy { public: nocopy(int i): i(i) {} nocopy() = default; nocopy(const nocopy&) = delete; nocopy & operator=(const nocopy&) = delete; private: int i; }; } ]])# _AC_CXX_CXX11_TEST_HEADER # _AC_CXX_CXX11_TEST_BODY # ----------------------- # A C++ body suitable for testing for CXX11, assuming the corresponding header. AC_DEFUN([_AC_CXX_CXX11_TEST_BODY], [[ { // Test auto and decltype std::deque d; d.push_front(43); d.push_front(484); d.push_front(3); d.push_front(844); int total = 0; for (auto i = d.begin(); i != d.end(); ++i) { total += *i; } auto a1 = 6538; auto a2 = 48573953.4; auto a3 = "String literal"; decltype(a2) a4 = 34895.034; } { // Test constexpr short sa[cxx11test::get_val()] = { 0 }; } { // Test initializer lists cxx11test::testinit il = { 4323, 435234.23544 }; } { // Test range-based for and lambda cxx11test::int_array array = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1}; for (int &x : array) { x += 23; } std::for_each(array.begin(), array.end(), [](int v1){ std::cout << v1; }); } { using cxx11test::sptr; using cxx11test::wptr; sptr sp(new std::string("ASCII string")); wptr wp(sp); sptr sp2(wp); } { cxx11test::tp tuple("test", 54, 45.53434); double d = std::get<2>(tuple); std::string s; int i; std::tie(s,i,d) = tuple; } { static std::regex filename_regex("^_?([a-z0-9_.]+-)+[a-z0-9]+$"); std::string testmatch("Test if this string matches"); bool match = std::regex_search(testmatch, filename_regex); } { cxx11test::int_array array = {9, 7, 13, 15, 4, 18, 12, 10, 5, 3, 14, 19, 17, 8, 6, 20, 16, 2, 11, 1}; cxx11test::int_array::size_type size = array.size(); } { // Test constructor delegation cxx11test::delegate d1; cxx11test::delegate d2(); cxx11test::delegate d3(45); } { // Test override and final cxx11test::overridden o1(55464); } { // Test nullptr char *c = nullptr; } { // Test template brackets std::vector> v1; } { // Unicode literals char const *utf8 = u8"UTF-8 string \u2500"; char16_t const *utf16 = u"UTF-8 string \u2500"; char32_t const *utf32 = U"UTF-32 string \u2500"; } ]]) # _AC_PROG_CXX_CXX98 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE]) # ------------------------------------------------------------------- # If the C++ compiler is not in ISO C++98 mode by default, try to add # an option to output variable CXX to make it so. This macro tries # various options that select ISO C++98 on some system or another. It # considers the compiler to be in ISO C++98 mode if it handles basic # features of the std namespace including: string, containers (list, # map, set, vector), streams (fstreams, iostreams, stringstreams, # iomanip), pair, exceptions and algorithms. AC_DEFUN([_AC_PROG_CXX_CXX98], [_AC_CXX_STD_TRY([cxx98], [_AC_CXX_CXX98_TEST_HEADER], [_AC_CXX_CXX98_TEST_BODY], dnl Try dnl GCC -std=gnu++98 (unused restrictive mode: -std=c++98) dnl IBM XL C -qlanglvl=extended dnl HP aC++ -AA dnl Intel ICC -std=gnu++98 dnl Solaris N/A (default) dnl Tru64 N/A (default, but -std gnu could be used) dnl with extended modes being tried first. [[-std=gnu++98 -std=c++98 -qlanglvl=extended -AA]], [$1], [$2])[]dnl ])# _AC_PROG_CXX_CXX98 # _AC_PROG_CXX_CXX11 ([ACTION-IF-AVAILABLE], [ACTION-IF-UNAVAILABLE]) # ------------------------------------------------------------------- # If the C++ compiler is not in ISO CXX11 mode by default, try to add # an option to output variable CXX to make it so. This macro tries # various options that select ISO C++11 on some system or another. It # considers the compiler to be in ISO C++11 mode if it handles all the # tests from the C++98 checks, plus the following: Language features # (auto, constexpr, decltype, default/deleted constructors, delegate # constructors, final, initializer lists, lambda functions, nullptr, # override, range-based for loops, template brackets without spaces, # unicode literals) and library features (array, memory (shared_ptr, # weak_ptr), regex and tuple types). AC_DEFUN([_AC_PROG_CXX_CXX11], [_AC_CXX_STD_TRY([cxx11], [_AC_CXX_CXX11_TEST_HEADER _AC_CXX_CXX98_TEST_HEADER], [_AC_CXX_CXX11_TEST_BODY _AC_CXX_CXX98_TEST_BODY], dnl Try dnl GCC -std=gnu++11 (unused restrictive mode: -std=c++11) [and 0x variants] dnl IBM XL C -qlanglvl=extended0x dnl (pre-V12.1; unused restrictive mode: -qlanglvl=stdcxx11) dnl HP aC++ -AA dnl Intel ICC -std=c++11 -std=c++0x dnl Solaris N/A (no support) dnl Tru64 N/A (no support) dnl with extended modes being tried first. [[-std=gnu++11 -std=c++11 -std=gnu++0x -std=c++0x -qlanglvl=extended0x -AA]], [$1], [$2])[]dnl ])# _AC_PROG_CXX_CXX11 ])# m4_version_prereq ])# !_AC_C_C23_OPTIONS libffcall-2.5/gnulib-m4/getdtablesize.m40000664000000000000000000000504714631432055015066 00000000000000# getdtablesize.m4 # serial 8 dnl Copyright (C) 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_GETDTABLESIZE], [ AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_CHECK_FUNCS_ONCE([getdtablesize]) AC_CHECK_DECLS_ONCE([getdtablesize]) if test $ac_cv_func_getdtablesize = yes && test $ac_cv_have_decl_getdtablesize = yes; then AC_CACHE_CHECK([whether getdtablesize works], [gl_cv_func_getdtablesize_works], [dnl There are two concepts: the "maximum possible file descriptor value + 1" dnl and the "maximum number of open file descriptors in a process". dnl Per SUSv2 and POSIX, getdtablesize() should return the first one. dnl On most platforms, the first and the second concept are the same. dnl On OpenVMS, however, they are different and getdtablesize() returns dnl the second one; thus the test below fails. But we don't care dnl because there's no good way to write a replacement getdtablesize(). case "$host_os" in vms*) gl_cv_func_getdtablesize_works="no (limitation)" ;; *) dnl Cygwin 1.7.25 automatically increases the RLIMIT_NOFILE soft dnl limit up to an unchangeable hard limit; all other platforms dnl correctly require setrlimit before getdtablesize() can report dnl a larger value. AC_RUN_IFELSE([ AC_LANG_PROGRAM( [[#include ] GL_MDA_DEFINES ], [[int size = getdtablesize(); if (dup2 (0, getdtablesize()) != -1) return 1; if (size != getdtablesize()) return 2; ]])], [gl_cv_func_getdtablesize_works=yes], [gl_cv_func_getdtablesize_works=no], [case "$host_os" in cygwin*) # on cygwin 1.5.25, getdtablesize() automatically grows gl_cv_func_getdtablesize_works="guessing no" ;; *) gl_cv_func_getdtablesize_works="guessing yes" ;; esac ]) ;; esac ]) case "$gl_cv_func_getdtablesize_works" in *yes | "no (limitation)") ;; *) REPLACE_GETDTABLESIZE=1 ;; esac else HAVE_GETDTABLESIZE=0 fi ]) # Prerequisites of lib/getdtablesize.c. AC_DEFUN([gl_PREREQ_GETDTABLESIZE], [:]) libffcall-2.5/gnulib-m4/wchar_t.m40000664000000000000000000000146414631432055013666 00000000000000# wchar_t.m4 # serial 4 (gettext-0.18.2) dnl Copyright (C) 2002-2003, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Test whether has the 'wchar_t' type. dnl Prerequisite: AC_PROG_CC AC_DEFUN([gt_TYPE_WCHAR_T], [ AC_CACHE_CHECK([for wchar_t], [gt_cv_c_wchar_t], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include wchar_t foo = (wchar_t)'\0';]], [[]])], [gt_cv_c_wchar_t=yes], [gt_cv_c_wchar_t=no])]) if test $gt_cv_c_wchar_t = yes; then AC_DEFINE([HAVE_WCHAR_T], [1], [Define if you have the 'wchar_t' type.]) fi ]) libffcall-2.5/gnulib-m4/sys_cdefs_h.m40000664000000000000000000000154314631432055014526 00000000000000# sys_cdefs_h.m4 - Is compatible enough with glibc? # serial 2 dnl Copyright 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Written by Paul Eggert. AC_DEFUN_ONCE([gl_CHECK_HEADER_SYS_CDEFS_H], [AC_CACHE_CHECK([for glibc-compatible sys/cdefs.h], [gl_cv_header_sys_cdefs_h], [AC_COMPILE_IFELSE( [AC_LANG_DEFINES_PROVIDED [#include enum { foo = __GNUC_PREREQ (14, 1) } bar; ]], [gl_cv_header_sys_cdefs_h=yes], [gl_cv_header_sys_cdefs_h=no])]) if test "$gl_cv_header_sys_cdefs_h" = yes; then HAVE_SYS_CDEFS_H=1 else HAVE_SYS_CDEFS_H=0 fi AC_SUBST([HAVE_SYS_CDEFS_H])]) libffcall-2.5/gnulib-m4/fatal-signal.m40000664000000000000000000000066014631432055014576 00000000000000# fatal-signal.m4 # serial 9 dnl Copyright (C) 2003-2004, 2006, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FATAL_SIGNAL], [ AC_REQUIRE([gt_TYPE_SIG_ATOMIC_T]) AC_CHECK_HEADERS_ONCE([unistd.h]) gl_PREREQ_SIG_HANDLER_H ]) libffcall-2.5/gnulib-m4/sys_types_h.m40000664000000000000000000000450014631432055014602 00000000000000# sys_types_h.m4 # serial 14 dnl Copyright (C) 2011-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_SYS_TYPES_H], [ AC_REQUIRE([gl_SYS_TYPES_H_DEFAULTS]) dnl Use sane struct stat types in OpenVMS 8.2 and later. AC_DEFINE([_USE_STD_STAT], 1, [For standard stat data types on VMS.]) gl_NEXT_HEADERS([sys/types.h]) dnl Ensure the type pid_t gets defined. AC_REQUIRE([AC_TYPE_PID_T]) dnl Ensure the type mode_t gets defined. AC_REQUIRE([AC_TYPE_MODE_T]) dnl Whether to override the 'off_t' type. AC_REQUIRE([gl_TYPE_OFF_T]) dnl Whether to define the 'off64_t' type. AC_REQUIRE([gl_TYPE_OFF64_T]) dnl Whether to override the 'dev_t' and 'ino_t' types. m4_ifdef([gl_WINDOWS_STAT_INODES], [ AC_REQUIRE([gl_WINDOWS_STAT_INODES]) ], [ WINDOWS_STAT_INODES=0 ]) AC_SUBST([WINDOWS_STAT_INODES]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_SYS_TYPES_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_SYS_TYPE_H_MODULE_INDICATOR_DEFAULTS], [ ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_SYS_TYPE_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_SYS_TYPES_H_DEFAULTS]) ]) AC_DEFUN([gl_SYS_TYPES_H_DEFAULTS], [ ]) # This works around a buggy version in autoconf <= 2.69. # See # The 2.70 version isn't quoted properly, so override it too. m4_version_prereq([2.70.1], [], [ m4_undefine([AC_HEADER_MAJOR]) AC_DEFUN([AC_HEADER_MAJOR], [AC_CHECK_HEADERS_ONCE([sys/types.h]) AC_CHECK_HEADER([sys/mkdev.h], [AC_DEFINE([MAJOR_IN_MKDEV], [1], [Define to 1 if `major', `minor', and `makedev' are declared in .])]) if test $ac_cv_header_sys_mkdev_h = no; then AC_CHECK_HEADER([sys/sysmacros.h], [AC_DEFINE([MAJOR_IN_SYSMACROS], [1], [Define to 1 if `major', `minor', and `makedev' are declared in .])]) fi ])# AC_HEADER_MAJOR ]) libffcall-2.5/gnulib-m4/stdlib_h.m40000664000000000000000000003043414665266362014043 00000000000000# stdlib_h.m4 # serial 81 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_STDLIB_H], [ AC_REQUIRE([gl_STDLIB_H_DEFAULTS]) gl_NEXT_HEADERS([stdlib.h]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, and which is not dnl guaranteed by C89. gl_WARN_ON_USE_PREPARE([[#include #if HAVE_SYS_LOADAVG_H /* OpenIndiana has a bug: must be included before . */ # include # include #endif #if HAVE_RANDOM_H # include #endif ]], [_Exit aligned_alloc atoll canonicalize_file_name free getloadavg getprogname getsubopt grantpt initstate initstate_r mbstowcs mbtowc mkdtemp mkostemp mkostemps mkstemp mkstemps posix_memalign posix_openpt ptsname ptsname_r qsort_r random random_r reallocarray realpath rpmatch secure_getenv setenv setstate setstate_r srandom srandom_r strtod strtol strtold strtoll strtoul strtoull unlockpt unsetenv]) AC_REQUIRE([AC_C_RESTRICT]) dnl Test whether MB_CUR_MAX needs to be overridden. dnl On Solaris 10, in UTF-8 locales, its value is 3 but needs to be 4. dnl Fortunately, we can do this because on this platform MB_LEN_MAX is 5. AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gt_LOCALE_EN_UTF8]) AC_CACHE_CHECK([whether MB_CUR_MAX is correct], [gl_cv_macro_MB_CUR_MAX_good], [ dnl Initial guess, used when cross-compiling or when no suitable locale dnl is present. changequote(,)dnl case "$host_os" in # Guess no on Solaris and Haiku. solaris* | haiku*) gl_cv_macro_MB_CUR_MAX_good="guessing no" ;; # Guess yes otherwise. *) gl_cv_macro_MB_CUR_MAX_good="guessing yes" ;; esac changequote([,])dnl if test "$LOCALE_EN_UTF8" != none; then AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #include int main () { int result = 0; if (setlocale (LC_ALL, "$LOCALE_EN_UTF8") != NULL) { if (MB_CUR_MAX < 4) result |= 1; } return result; }]])], [gl_cv_macro_MB_CUR_MAX_good=yes], [gl_cv_macro_MB_CUR_MAX_good=no], [:]) fi ]) case "$gl_cv_macro_MB_CUR_MAX_good" in *yes) ;; *) REPLACE_MB_CUR_MAX=1 ;; esac AC_CHECK_DECLS_ONCE([ecvt]) if test $ac_cv_have_decl_ecvt = no; then HAVE_DECL_ECVT=0 fi AC_CHECK_DECLS_ONCE([fcvt]) if test $ac_cv_have_decl_fcvt = no; then HAVE_DECL_FCVT=0 fi AC_CHECK_DECLS_ONCE([gcvt]) if test $ac_cv_have_decl_gcvt = no; then HAVE_DECL_GCVT=0 fi ]) # gl_STDLIB_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_STDLIB_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_STDLIB_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_STDLIB_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_STDLIB_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB__EXIT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ABORT_DEBUG]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ALIGNED_ALLOC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ATOLL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CALLOC_GNU]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CALLOC_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CANONICALIZE_FILE_NAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FREE_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETLOADAVG]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETPROGNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETSUBOPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GRANTPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MALLOC_GNU]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MALLOC_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSTOWCS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBTOWC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKDTEMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKOSTEMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKOSTEMPS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKSTEMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKSTEMPS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_POSIX_MEMALIGN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_POSIX_OPENPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTSNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTSNAME_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PUTENV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_QSORT_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RAND]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RANDOM]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RANDOM_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_REALLOCARRAY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_REALLOC_GNU]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_REALLOC_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_REALPATH]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RPMATCH]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SECURE_GETENV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SETENV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STACK_TRACE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOLD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOLL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOUL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOULL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SYSTEM_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNLOCKPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNSETENV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_WCTOMB]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_ECVT], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_FCVT], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_GCVT], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_MKTEMP], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_PUTENV], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_STDLIB_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_STDLIB_H_DEFAULTS]) ]) AC_DEFUN([gl_STDLIB_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE__EXIT=1; AC_SUBST([HAVE__EXIT]) HAVE_ALIGNED_ALLOC=1; AC_SUBST([HAVE_ALIGNED_ALLOC]) HAVE_ATOLL=1; AC_SUBST([HAVE_ATOLL]) HAVE_CANONICALIZE_FILE_NAME=1; AC_SUBST([HAVE_CANONICALIZE_FILE_NAME]) HAVE_DECL_ECVT=1; AC_SUBST([HAVE_DECL_ECVT]) HAVE_DECL_FCVT=1; AC_SUBST([HAVE_DECL_FCVT]) HAVE_DECL_GCVT=1; AC_SUBST([HAVE_DECL_GCVT]) HAVE_DECL_GETLOADAVG=1; AC_SUBST([HAVE_DECL_GETLOADAVG]) HAVE_DECL_PROGRAM_INVOCATION_NAME=1; AC_SUBST([HAVE_DECL_PROGRAM_INVOCATION_NAME]) HAVE_GETPROGNAME=1; AC_SUBST([HAVE_GETPROGNAME]) HAVE_GETSUBOPT=1; AC_SUBST([HAVE_GETSUBOPT]) HAVE_GRANTPT=1; AC_SUBST([HAVE_GRANTPT]) HAVE_INITSTATE=1; AC_SUBST([HAVE_INITSTATE]) HAVE_DECL_INITSTATE=1; AC_SUBST([HAVE_DECL_INITSTATE]) HAVE_MBTOWC=1; AC_SUBST([HAVE_MBTOWC]) HAVE_MKDTEMP=1; AC_SUBST([HAVE_MKDTEMP]) HAVE_MKOSTEMP=1; AC_SUBST([HAVE_MKOSTEMP]) HAVE_MKOSTEMPS=1; AC_SUBST([HAVE_MKOSTEMPS]) HAVE_MKSTEMP=1; AC_SUBST([HAVE_MKSTEMP]) HAVE_MKSTEMPS=1; AC_SUBST([HAVE_MKSTEMPS]) HAVE_POSIX_MEMALIGN=1; AC_SUBST([HAVE_POSIX_MEMALIGN]) HAVE_POSIX_OPENPT=1; AC_SUBST([HAVE_POSIX_OPENPT]) HAVE_PTSNAME=1; AC_SUBST([HAVE_PTSNAME]) HAVE_PTSNAME_R=1; AC_SUBST([HAVE_PTSNAME_R]) HAVE_QSORT_R=1; AC_SUBST([HAVE_QSORT_R]) HAVE_RANDOM=1; AC_SUBST([HAVE_RANDOM]) HAVE_RANDOM_H=1; AC_SUBST([HAVE_RANDOM_H]) HAVE_RANDOM_R=1; AC_SUBST([HAVE_RANDOM_R]) HAVE_REALLOCARRAY=1; AC_SUBST([HAVE_REALLOCARRAY]) HAVE_REALPATH=1; AC_SUBST([HAVE_REALPATH]) HAVE_RPMATCH=1; AC_SUBST([HAVE_RPMATCH]) HAVE_SECURE_GETENV=1; AC_SUBST([HAVE_SECURE_GETENV]) HAVE_SETENV=1; AC_SUBST([HAVE_SETENV]) HAVE_DECL_SETENV=1; AC_SUBST([HAVE_DECL_SETENV]) HAVE_SETSTATE=1; AC_SUBST([HAVE_SETSTATE]) HAVE_DECL_SETSTATE=1; AC_SUBST([HAVE_DECL_SETSTATE]) HAVE_STRTOD=1; AC_SUBST([HAVE_STRTOD]) HAVE_STRTOF=1; AC_SUBST([HAVE_STRTOF]) HAVE_STRTOL=1; AC_SUBST([HAVE_STRTOL]) HAVE_STRTOLD=1; AC_SUBST([HAVE_STRTOLD]) HAVE_STRTOLL=1; AC_SUBST([HAVE_STRTOLL]) HAVE_STRTOUL=1; AC_SUBST([HAVE_STRTOUL]) HAVE_STRTOULL=1; AC_SUBST([HAVE_STRTOULL]) HAVE_STRUCT_RANDOM_DATA=1; AC_SUBST([HAVE_STRUCT_RANDOM_DATA]) HAVE_SYS_LOADAVG_H=0; AC_SUBST([HAVE_SYS_LOADAVG_H]) HAVE_UNLOCKPT=1; AC_SUBST([HAVE_UNLOCKPT]) HAVE_DECL_UNSETENV=1; AC_SUBST([HAVE_DECL_UNSETENV]) REPLACE__EXIT=0; AC_SUBST([REPLACE__EXIT]) REPLACE_ABORT=0; AC_SUBST([REPLACE_ABORT]) REPLACE_ALIGNED_ALLOC=0; AC_SUBST([REPLACE_ALIGNED_ALLOC]) REPLACE_CALLOC_FOR_CALLOC_GNU=0; AC_SUBST([REPLACE_CALLOC_FOR_CALLOC_GNU]) REPLACE_CALLOC_FOR_CALLOC_POSIX=0; AC_SUBST([REPLACE_CALLOC_FOR_CALLOC_POSIX]) REPLACE_CANONICALIZE_FILE_NAME=0; AC_SUBST([REPLACE_CANONICALIZE_FILE_NAME]) REPLACE_FREE=0; AC_SUBST([REPLACE_FREE]) REPLACE_GETLOADAVG=0; AC_SUBST([REPLACE_GETLOADAVG]) REPLACE_GETPROGNAME=0; AC_SUBST([REPLACE_GETPROGNAME]) REPLACE_GETSUBOPT=0; AC_SUBST([REPLACE_GETSUBOPT]) REPLACE_INITSTATE=0; AC_SUBST([REPLACE_INITSTATE]) REPLACE_MALLOC_FOR_MALLOC_GNU=0; AC_SUBST([REPLACE_MALLOC_FOR_MALLOC_GNU]) REPLACE_MALLOC_FOR_MALLOC_POSIX=0; AC_SUBST([REPLACE_MALLOC_FOR_MALLOC_POSIX]) REPLACE_MB_CUR_MAX=0; AC_SUBST([REPLACE_MB_CUR_MAX]) REPLACE_MBSTOWCS=0; AC_SUBST([REPLACE_MBSTOWCS]) REPLACE_MBTOWC=0; AC_SUBST([REPLACE_MBTOWC]) REPLACE_MKOSTEMP=0; AC_SUBST([REPLACE_MKOSTEMP]) REPLACE_MKOSTEMPS=0; AC_SUBST([REPLACE_MKOSTEMPS]) REPLACE_MKSTEMP=0; AC_SUBST([REPLACE_MKSTEMP]) REPLACE_POSIX_MEMALIGN=0; AC_SUBST([REPLACE_POSIX_MEMALIGN]) REPLACE_POSIX_OPENPT=0; AC_SUBST([REPLACE_POSIX_OPENPT]) REPLACE_PTSNAME=0; AC_SUBST([REPLACE_PTSNAME]) REPLACE_PTSNAME_R=0; AC_SUBST([REPLACE_PTSNAME_R]) REPLACE_PUTENV=0; AC_SUBST([REPLACE_PUTENV]) REPLACE_QSORT_R=0; AC_SUBST([REPLACE_QSORT_R]) REPLACE_RAND=0; AC_SUBST([REPLACE_RAND]) REPLACE_RANDOM=0; AC_SUBST([REPLACE_RANDOM]) REPLACE_RANDOM_R=0; AC_SUBST([REPLACE_RANDOM_R]) REPLACE_REALLOC_FOR_REALLOC_GNU=0; AC_SUBST([REPLACE_REALLOC_FOR_REALLOC_GNU]) REPLACE_REALLOC_FOR_REALLOC_POSIX=0; AC_SUBST([REPLACE_REALLOC_FOR_REALLOC_POSIX]) REPLACE_REALLOCARRAY=0; AC_SUBST([REPLACE_REALLOCARRAY]) REPLACE_REALPATH=0; AC_SUBST([REPLACE_REALPATH]) REPLACE_SETENV=0; AC_SUBST([REPLACE_SETENV]) REPLACE_SETSTATE=0; AC_SUBST([REPLACE_SETSTATE]) REPLACE_STRTOD=0; AC_SUBST([REPLACE_STRTOD]) REPLACE_STRTOF=0; AC_SUBST([REPLACE_STRTOF]) REPLACE_STRTOL=0; AC_SUBST([REPLACE_STRTOL]) REPLACE_STRTOLD=0; AC_SUBST([REPLACE_STRTOLD]) REPLACE_STRTOLL=0; AC_SUBST([REPLACE_STRTOLL]) REPLACE_STRTOUL=0; AC_SUBST([REPLACE_STRTOUL]) REPLACE_STRTOULL=0; AC_SUBST([REPLACE_STRTOULL]) REPLACE_UNSETENV=0; AC_SUBST([REPLACE_UNSETENV]) REPLACE_WCTOMB=0; AC_SUBST([REPLACE_WCTOMB]) CAN_PRINT_STACK_TRACE=0; AC_SUBST([CAN_PRINT_STACK_TRACE]) ]) libffcall-2.5/gnulib-m4/once.m40000664000000000000000000000053414657156076013176 00000000000000# once.m4 # serial 1 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_DEFUN([gl_ONCE], [ AC_REQUIRE([gl_THREADLIB]) ]) libffcall-2.5/gnulib-m4/atomic-cas.m40000664000000000000000000001012714631432055014253 00000000000000# atomic-cas.m4 # serial 1 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Determines whether the atomic compare-and-swap operations, officially # supported in GCC >= 4.1 and clang >= 3.0, are actually available. # These primitives are documented in # # without platform restrictions. But they are not actually available # everywhere: # * On some platforms, __sync_bool_compare_and_swap does not expand # to standalone inline code, but to a call to a function # '__sync_bool_compare_and_swap_4' (assuming a 32-bit value). # This is the case on # - arm, for all gcc versions # - hppa, hppa64, for all gcc versions # - i386 (without '-march=i486'), for all gcc versions # - sparc (32-bit, for certain CPU models), for all gcc versions # - m68k, for gcc < 4.7 # - mips, for gcc < 4.3 # This can be seen by compiling this piece of code # ---------------------------------------------------------------- # int cmpxchg (int* value, int comp_val, int new_val) # { # return __sync_val_compare_and_swap (value, comp_val, new_val); # } # ---------------------------------------------------------------- # with option -S, using a (native or cross-) compiler. # * The function __sync_bool_compare_and_swap_4 is meant to be included # in libgcc. And indeed, libgcc contains the source code for this # function on # - arm, for gcc versions >= 4.7, but only for Linux # and (for gcc >= 5) FreeBSD, # - hppa, hppa64, for gcc versions >= 4.7, but only for Linux # and (for gcc >= 13) NetBSD, OpenBSD, hppa64 HP-UX # - i386, never at all # - sparc, never at all # - m68k, for gcc versions >= 4.7, but only for Linux # - mips, never at all # * The NetBSD C library provides this function on # - arm, arm64, # - i386, # - sparc, # - m68k, # - riscv64. # Other C libraries (e.g. glibc, musl libc) do not provide this function. # So, the use of these primitives results in a link error on: # - arm, with gcc versions >= 4.1, < 4.7 on all systems except NetBSD, # with gcc versions >= 4.7, < 5 on FreeBSD, OpenBSD, Android, # with gcc versions >= 5 on OpenBSD, Android, # - hppa, hppa64, with gcc versions >= 4.1, < 4.7 on all systems, # with gcc versions >= 4.7, < 13 on NetBSD, OpenBSD, # - i386 (without '-march=i486'), with gcc versions >= 4.1 # on all systems except NetBSD, # - sparc (32-bit, for certain CPU models), with gcc versions >= 4.1 # on all systems except NetBSD, # - m68k, with gcc versions >= 4.1, < 4.7 on all systems except NetBSD, # - mips, with gcc versions >= 4.1, < 4.3 on all systems. # Additionally, link errors can occur if - such as on glibc systems - the libgcc # functions are distributed through glibc, but the glibc version is older than # the gcc version. AC_DEFUN([gl_ATOMIC_COMPARE_AND_SWAP], [ AC_CACHE_CHECK([for __sync_bool_compare_and_swap], [gl_cv_builtin_sync_bool_compare_and_swap], [AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[int cmpxchg (int* value, int comp_val, int new_val) { return __sync_val_compare_and_swap (value, comp_val, new_val); } ]], [[]]) ], [gl_cv_builtin_sync_bool_compare_and_swap=yes], [gl_cv_builtin_sync_bool_compare_and_swap=no]) ]) if test $gl_cv_builtin_sync_bool_compare_and_swap = yes; then AC_DEFINE([HAVE_ATOMIC_COMPARE_AND_SWAP_GCC41], [1], [Define to 1 if the GCC 4.1 primitives for atomic compare-and-swap can be used.]) fi ]) libffcall-2.5/gnulib-m4/lock.m40000664000000000000000000000304114631432055013160 00000000000000# lock.m4 # serial 14 dnl Copyright (C) 2005-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_DEFUN([gl_LOCK], [ AC_REQUIRE([gl_THREADLIB]) if test "$gl_threads_api" = posix; then # OSF/1 4.0 and Mac OS X 10.1 lack the pthread_rwlock_t type and the # pthread_rwlock_* functions. has_rwlock=false AC_CHECK_TYPE([pthread_rwlock_t], [has_rwlock=true AC_DEFINE([HAVE_PTHREAD_RWLOCK], [1], [Define if the POSIX multithreading library has read/write locks.])], [], [#include ]) if $has_rwlock; then gl_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER fi # glibc defines PTHREAD_MUTEX_RECURSIVE as enum, not as a macro. AC_COMPILE_IFELSE([ AC_LANG_PROGRAM( [[#include ]], [[ #if __FreeBSD__ == 4 error "No, in FreeBSD 4.0 recursive mutexes actually don't work." #elif (defined __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ \ && __ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED__ < 1070) error "No, in Mac OS X < 10.7 recursive mutexes actually don't work." #else int x = (int)PTHREAD_MUTEX_RECURSIVE; return !x; #endif ]])], [AC_DEFINE([HAVE_PTHREAD_MUTEX_RECURSIVE], [1], [Define if the defines PTHREAD_MUTEX_RECURSIVE.])]) fi gl_PREREQ_LOCK ]) # Prerequisites of lib/glthread/lock.c. AC_DEFUN([gl_PREREQ_LOCK], [:]) libffcall-2.5/gnulib-m4/error.m40000664000000000000000000000115114631432055013361 00000000000000# error.m4 # serial 16 dnl Copyright (C) 1996-1998, 2001-2004, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_ERROR], [ ]) # Prerequisites of lib/error.c. AC_DEFUN([gl_PREREQ_ERROR], [ dnl Use system extensions on Android, so that AC_FUNC_STRERROR_R dnl discovers the GNU API for strerror_r on Android API level 23 and later. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_REQUIRE([AC_FUNC_STRERROR_R]) : ]) libffcall-2.5/gnulib-m4/gnulib-comp.m40000664000000000000000000016713714665276031014474 00000000000000# DO NOT EDIT! GENERATED AUTOMATICALLY! # Copyright (C) 2002-2024 Free Software Foundation, Inc. # # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This file is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this file. If not, see . # # As a special exception to the GNU General Public License, # this file may be distributed as part of a program that # contains a configuration script generated by Autoconf, under # the same distribution terms as the rest of that program. # # Generated by gnulib-tool. # # This file represents the compiled summary of the specification in # gnulib-cache.m4. It lists the computed macro invocations that need # to be invoked from configure.ac. # In projects that use version control, this file can be treated like # other built files. # This macro should be invoked from ./configure.ac, in the section # "Checks for programs", right after AC_PROG_CC, and certainly before # any checks for libraries, header files, types and library functions. AC_DEFUN([gl_EARLY], [ m4_pattern_forbid([^gl_[A-Z]])dnl the gnulib macro namespace m4_pattern_allow([^gl_ES$])dnl a valid locale name m4_pattern_allow([^gl_LIBOBJS$])dnl a variable m4_pattern_allow([^gl_LTLIBOBJS$])dnl a variable # Pre-early section. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_REQUIRE([gl_PROG_AR_RANLIB]) # Code from module absolute-header: # Code from module alloca-opt: # Code from module ansi-c++-opt: AC_REQUIRE([gl_ANSI_CXX]) # Code from module assert-h: # Code from module asyncsafe-spin: # Code from module attribute: # Code from module basename-lgpl: # Code from module c99: # Code from module clean-temp-simple: # Code from module cloexec: # Code from module close: # Code from module double-slash-root: # Code from module dup2: # Code from module errno: # Code from module error: # Code from module error-h: # Code from module extensions: # This is actually already done in the pre-early phase. # AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) # Code from module extensions-aix: AC_REQUIRE([gl_USE_AIX_EXTENSIONS]) # Code from module extern-inline: # Code from module fatal-signal: # Code from module fcntl: # Code from module fcntl-h: # Code from module fd-hook: # Code from module filename: # Code from module fstat: # Code from module gen-header: # Code from module getdtablesize: # Code from module getpagesize: # Code from module getprogname: # Code from module gettext-h: # Code from module hasmntopt: # Code from module host-cpu-c-abi: # Code from module idx: # Code from module include_next: # Code from module intprops: # Code from module largefile: AC_REQUIRE([AC_SYS_LARGEFILE]) # Code from module libffcall-imports: # Code from module limits-h: # Code from module linkedhash-list: # Code from module list: # Code from module lock: # Code from module malloca: # Code from module mntent: # Code from module msvc-inval: # Code from module msvc-nothrow: # Code from module multiarch: # Code from module nocrash: # Code from module once: # Code from module open: # Code from module pathmax: # Code from module pthread-h: gl_ANYTHREADLIB_EARLY # Code from module pthread-once: # Code from module raise: # Code from module rmdir: # Code from module sched: # Code from module sigaction: # Code from module signal-h: # Code from module sigprocmask: # Code from module size_max: # Code from module snippet/_Noreturn: # Code from module snippet/arg-nonnull: # Code from module snippet/c++defs: # Code from module snippet/warn-on-use: # Code from module sparcv8+: gl_SPARC_V8PLUS # Code from module ssize_t: # Code from module stat: # Code from module stat-time: # Code from module std-gnu11: # Code from module stdbool: # Code from module stdckdint: # Code from module stddef: # Code from module stdint: # Code from module stdio: gl_STDIO_H_EARLY # Code from module stdlib: # Code from module stdnoreturn: # Code from module strerror: # Code from module strerror-override: # Code from module string: # Code from module sys_stat: # Code from module sys_types: AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) # Code from module thread-optim: # Code from module threadlib: gl_THREADLIB_EARLY # Code from module time-h: # Code from module unistd: # Code from module vararrays: # Code from module vma-iter: # Code from module vma-prot: # Code from module windows-mutex: # Code from module windows-once: # Code from module windows-recmutex: # Code from module windows-rwlock: # Code from module windows-spin: # Code from module xalloc-oversized: # Code from module xsize: ]) # This macro should be invoked from ./configure.ac, in the section # "Check for header files, types and library functions". AC_DEFUN([gl_INIT], [ AM_CONDITIONAL([GL_COND_LIBTOOL], [true]) gl_cond_libtool=true gl_m4_base='gnulib-m4' m4_pushdef([AC_LIBOBJ], m4_defn([gl_LIBOBJ])) m4_pushdef([AC_REPLACE_FUNCS], m4_defn([gl_REPLACE_FUNCS])) m4_pushdef([AC_LIBSOURCES], m4_defn([gl_LIBSOURCES])) m4_pushdef([gl_LIBSOURCES_LIST], []) m4_pushdef([gl_LIBSOURCES_DIR], []) m4_pushdef([GL_MACRO_PREFIX], [gl]) m4_pushdef([GL_MODULE_INDICATOR_PREFIX], [GL]) gl_COMMON gl_source_base='gnulib-lib' gl_source_base_prefix= AC_REQUIRE([gl_HOST_CPU_C_ABI]) AC_REQUIRE([AC_CANONICAL_HOST]) gl_LIMITS_H gl_CONDITIONAL_HEADER([limits.h]) AC_PROG_MKDIR_P gl_LOCK gl_MODULE_INDICATOR([lock]) gl_MULTIARCH gl_ONCE gt_TYPE_SSIZE_T gl_STDINT_H gl_CONDITIONAL_HEADER([stdint.h]) dnl Because of gl_REPLACE_LIMITS_H: gl_CONDITIONAL_HEADER([limits.h]) AC_PROG_MKDIR_P gl_STDNORETURN_H gl_CONDITIONAL_HEADER([stdnoreturn.h]) AC_PROG_MKDIR_P gl_SYS_TYPES_H gl_SYS_TYPES_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P AC_REQUIRE([gl_THREADLIB]) gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04=false gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f=false gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce=false gl_gnulib_enabled_attribute=false gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f=false gl_gnulib_enabled_c99=false gl_gnulib_enabled_55e6e810e702cce3e72865884958a831=false gl_gnulib_enabled_cloexec=false gl_gnulib_enabled_close=false gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346=false gl_gnulib_enabled_dup2=false gl_gnulib_enabled_errno=false gl_gnulib_enabled_error=false gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0=false gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5=false gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27=false gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057=false gl_gnulib_enabled_fcntl=false gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8=false gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239=false gl_gnulib_enabled_filename=false gl_gnulib_enabled_fstat=false gl_gnulib_enabled_getdtablesize=false gl_gnulib_enabled_getpagesize=false gl_gnulib_enabled_getprogname=false gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=false gl_gnulib_enabled_hasmntopt=false gl_gnulib_enabled_idx=false gl_gnulib_enabled_intprops=false gl_gnulib_enabled_largefile=false gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2=false gl_gnulib_enabled_list=false gl_gnulib_enabled_malloca=false gl_gnulib_enabled_mntent=false gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616=false gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07=false gl_gnulib_enabled_open=false gl_gnulib_enabled_pathmax=false gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c=false gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a=false gl_gnulib_enabled_raise=false gl_gnulib_enabled_rmdir=false gl_gnulib_enabled_sched=false gl_gnulib_enabled_sigaction=false gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9=false gl_gnulib_enabled_sigprocmask=false gl_gnulib_enabled_size_max=false gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54=false gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c=false gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5=false gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b=false gl_gnulib_enabled_stat=false gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c=false gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81=false gl_gnulib_enabled_stdbool=false gl_gnulib_enabled_stdckdint=false gl_gnulib_enabled_stddef=false gl_gnulib_enabled_stdio=false gl_gnulib_enabled_stdlib=false gl_gnulib_enabled_strerror=false gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72=false gl_gnulib_enabled_string=false gl_gnulib_enabled_sys_stat=false gl_gnulib_enabled_ff372e41059705989544356242e580a9=false gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd=false gl_gnulib_enabled_unistd=false gl_gnulib_enabled_vararrays=false gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556=false gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d=false gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440=false gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab=false gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354=false gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef=false gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f=false gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec=false gl_gnulib_enabled_xsize=false func_gl_gnulib_m4code_4661e0b4e500a1a00180219f0280fb04 () { if $gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04; then :; else gl_FUNC_ALLOCA gl_CONDITIONAL_HEADER([alloca.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04=true fi } func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f () { if $gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f; then :; else gl_ASSERT_H gl_CONDITIONAL_HEADER([assert.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f=true fi } func_gl_gnulib_m4code_3146726593c1fd888d32adc5a62973ce () { if $gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce; then :; else AC_REQUIRE([AC_C_INLINE]) AC_CHECK_HEADERS_ONCE([pthread.h]) AC_REQUIRE([gl_ATOMIC_COMPARE_AND_SWAP]) gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce=true func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 func_gl_gnulib_m4code_sigprocmask func_gl_gnulib_m4code_11f0455f01baad17427f00c3f461553b func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_b26fd0a0c34f92c929116e0e7f1d232f fi } func_gl_gnulib_m4code_attribute () { if $gl_gnulib_enabled_attribute; then :; else gl_gnulib_enabled_attribute=true fi } func_gl_gnulib_m4code_ae0d979e17e723693567f9efd1d2294f () { if $gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f; then :; else gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f=true func_gl_gnulib_m4code_36afd6902ac3aacf32e3ff12a686c346 func_gl_gnulib_m4code_filename func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_c99 () { if $gl_gnulib_enabled_c99; then :; else gl_gnulib_enabled_c99=true func_gl_gnulib_m4code_4ecd6d4226a85c8d3e919d781a515f81 fi } func_gl_gnulib_m4code_55e6e810e702cce3e72865884958a831 () { if $gl_gnulib_enabled_55e6e810e702cce3e72865884958a831; then :; else AC_DEFINE([SIGNAL_SAFE_LIST], [1], [Define if lists must be signal-safe.]) gl_gnulib_enabled_55e6e810e702cce3e72865884958a831=true func_gl_gnulib_m4code_3146726593c1fd888d32adc5a62973ce func_gl_gnulib_m4code_c99 func_gl_gnulib_m4code_error func_gl_gnulib_m4code_83e4d5f60933eb2f07d525a5bfabe057 func_gl_gnulib_m4code_be453cec5eecf5731a274f2de7f2db36 func_gl_gnulib_m4code_5b88be6afdf85eedb41cc8063ca35aa2 func_gl_gnulib_m4code_list func_gl_gnulib_m4code_rmdir func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_cloexec () { if $gl_gnulib_enabled_cloexec; then :; else gl_MODULE_INDICATOR_FOR_TESTS([cloexec]) gl_gnulib_enabled_cloexec=true func_gl_gnulib_m4code_dup2 func_gl_gnulib_m4code_fcntl func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_close () { if $gl_gnulib_enabled_close; then :; else gl_FUNC_CLOSE gl_CONDITIONAL([GL_COND_OBJ_CLOSE], [test $REPLACE_CLOSE = 1]) gl_UNISTD_MODULE_INDICATOR([close]) gl_MODULE_INDICATOR([close]) gl_gnulib_enabled_close=true if test $REPLACE_CLOSE = 1; then func_gl_gnulib_m4code_43fe87a341d9b4b93c47c3ad819a5239 fi if test $REPLACE_CLOSE = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_36afd6902ac3aacf32e3ff12a686c346 () { if $gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346; then :; else gl_DOUBLE_SLASH_ROOT gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346=true fi } func_gl_gnulib_m4code_dup2 () { if $gl_gnulib_enabled_dup2; then :; else gl_FUNC_DUP2 gl_CONDITIONAL([GL_COND_OBJ_DUP2], [test $REPLACE_DUP2 = 1]) AM_COND_IF([GL_COND_OBJ_DUP2], [ gl_PREREQ_DUP2 ]) gl_UNISTD_MODULE_INDICATOR([dup2]) gl_gnulib_enabled_dup2=true if test $REPLACE_DUP2 = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi if test $REPLACE_DUP2 = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_errno () { if $gl_gnulib_enabled_errno; then :; else gl_HEADER_ERRNO_H gl_CONDITIONAL_HEADER([errno.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_errno=true func_gl_gnulib_m4code_303a13eed89acabfd6998a952149f2d5 fi } func_gl_gnulib_m4code_error () { if $gl_gnulib_enabled_error; then :; else AC_REQUIRE([gl_ERROR_H]) gl_ERROR gl_CONDITIONAL([GL_COND_OBJ_ERROR], [test $COMPILE_ERROR_C = 1]) AM_COND_IF([GL_COND_OBJ_ERROR], [ gl_PREREQ_ERROR ]) m4_ifdef([AM_XGETTEXT_OPTION], [AM_][XGETTEXT_OPTION([--flag=error:3:c-format]) AM_][XGETTEXT_OPTION([--flag=error_at_line:5:c-format])]) gl_gnulib_enabled_error=true func_gl_gnulib_m4code_97a0594d08da5f192f25b8c02c46f5f0 if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_getprogname fi if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_stdio if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_strerror fi if test $COMPILE_ERROR_C = 1; then func_gl_gnulib_m4code_unistd fi fi } func_gl_gnulib_m4code_97a0594d08da5f192f25b8c02c46f5f0 () { if $gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0; then :; else gl_ERROR_H AC_PROG_MKDIR_P gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0=true func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c fi } func_gl_gnulib_m4code_303a13eed89acabfd6998a952149f2d5 () { if $gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5; then :; else gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5=true fi } func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 () { if $gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27; then :; else AC_REQUIRE([gl_EXTERN_INLINE]) gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27=true fi } func_gl_gnulib_m4code_83e4d5f60933eb2f07d525a5bfabe057 () { if $gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057; then :; else gl_FATAL_SIGNAL gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057=true func_gl_gnulib_m4code_c99 func_gl_gnulib_m4code_raise func_gl_gnulib_m4code_sigaction func_gl_gnulib_m4code_sigprocmask func_gl_gnulib_m4code_stdbool func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_fcntl () { if $gl_gnulib_enabled_fcntl; then :; else gl_FUNC_FCNTL gl_CONDITIONAL([GL_COND_OBJ_FCNTL], [test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1]) gl_FCNTL_MODULE_INDICATOR([fcntl]) gl_gnulib_enabled_fcntl=true if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_close fi if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_dup2 fi func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_getdtablesize fi if test $HAVE_FCNTL = 0 || test $REPLACE_FCNTL = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi fi } func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 () { if $gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8; then :; else gl_FCNTL_H gl_FCNTL_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_43fe87a341d9b4b93c47c3ad819a5239 () { if $gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239; then :; else gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_filename () { if $gl_gnulib_enabled_filename; then :; else gl_gnulib_enabled_filename=true fi } func_gl_gnulib_m4code_fstat () { if $gl_gnulib_enabled_fstat; then :; else gl_FUNC_FSTAT gl_CONDITIONAL([GL_COND_OBJ_FSTAT], [test $REPLACE_FSTAT = 1]) AM_COND_IF([GL_COND_OBJ_FSTAT], [ case "$host_os" in mingw* | windows*) AC_LIBOBJ([stat-w32]) ;; esac gl_PREREQ_FSTAT ]) gl_SYS_STAT_MODULE_INDICATOR([fstat]) gl_MODULE_INDICATOR([fstat]) gl_gnulib_enabled_fstat=true if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi func_gl_gnulib_m4code_largefile if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_pathmax fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_stat fi if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c fi func_gl_gnulib_m4code_sys_stat if test $REPLACE_FSTAT = 1; then func_gl_gnulib_m4code_unistd fi fi } func_gl_gnulib_m4code_getdtablesize () { if $gl_gnulib_enabled_getdtablesize; then :; else gl_FUNC_GETDTABLESIZE gl_CONDITIONAL([GL_COND_OBJ_GETDTABLESIZE], [test $HAVE_GETDTABLESIZE = 0 || test $REPLACE_GETDTABLESIZE = 1]) AM_COND_IF([GL_COND_OBJ_GETDTABLESIZE], [ gl_PREREQ_GETDTABLESIZE ]) gl_UNISTD_MODULE_INDICATOR([getdtablesize]) gl_gnulib_enabled_getdtablesize=true if test $HAVE_GETDTABLESIZE = 0; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_getpagesize () { if $gl_gnulib_enabled_getpagesize; then :; else gl_FUNC_GETPAGESIZE gl_CONDITIONAL([GL_COND_OBJ_GETPAGESIZE], [test $REPLACE_GETPAGESIZE = 1]) gl_UNISTD_MODULE_INDICATOR([getpagesize]) gl_gnulib_enabled_getpagesize=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_getprogname () { if $gl_gnulib_enabled_getprogname; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_FUNC_GETPROGNAME gl_CONDITIONAL([GL_COND_OBJ_GETPROGNAME], [test $HAVE_GETPROGNAME = 0 || test $REPLACE_GETPROGNAME = 1]) AM_COND_IF([GL_COND_OBJ_GETPROGNAME], [ gl_PREREQ_GETPROGNAME ]) gl_STDLIB_MODULE_INDICATOR([getprogname]) gl_gnulib_enabled_getprogname=true if test $HAVE_GETPROGNAME = 0; then func_gl_gnulib_m4code_ae0d979e17e723693567f9efd1d2294f fi if test $HAVE_GETPROGNAME = 0 && case "$host_os" in irix* | osf* | sco* | unixware*) true;; *) false;; esac; then func_gl_gnulib_m4code_open fi func_gl_gnulib_m4code_stdlib fi } func_gl_gnulib_m4code_be453cec5eecf5731a274f2de7f2db36 () { if $gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36; then :; else AC_SUBST([LIBINTL]) AC_SUBST([LTLIBINTL]) gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=true func_gl_gnulib_m4code_vararrays fi } func_gl_gnulib_m4code_hasmntopt () { if $gl_gnulib_enabled_hasmntopt; then :; else gl_FUNC_HASMNTOPT gl_CONDITIONAL([GL_COND_OBJ_HASMNTOPT], [test $HAVE_SETMNTENT = 1 && { test $HAVE_HASMNTOPT = 0 || test $REPLACE_HASMNTOPT = 1; }]) AM_COND_IF([GL_COND_OBJ_HASMNTOPT], [ gl_PREREQ_HASMNTOPT ]) gl_MNTENT_MODULE_INDICATOR([hasmntopt]) gl_gnulib_enabled_hasmntopt=true func_gl_gnulib_m4code_mntent fi } func_gl_gnulib_m4code_idx () { if $gl_gnulib_enabled_idx; then :; else gl_gnulib_enabled_idx=true fi } func_gl_gnulib_m4code_intprops () { if $gl_gnulib_enabled_intprops; then :; else gl_gnulib_enabled_intprops=true fi } func_gl_gnulib_m4code_largefile () { if $gl_gnulib_enabled_largefile; then :; else AC_REQUIRE([gl_LARGEFILE]) gl_gnulib_enabled_largefile=true fi } func_gl_gnulib_m4code_5b88be6afdf85eedb41cc8063ca35aa2 () { if $gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2; then :; else gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2=true func_gl_gnulib_m4code_list func_gl_gnulib_m4code_xsize fi } func_gl_gnulib_m4code_list () { if $gl_gnulib_enabled_list; then :; else gl_gnulib_enabled_list=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_malloca () { if $gl_gnulib_enabled_malloca; then :; else gl_MALLOCA gl_gnulib_enabled_malloca=true func_gl_gnulib_m4code_4661e0b4e500a1a00180219f0280fb04 func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f func_gl_gnulib_m4code_idx func_gl_gnulib_m4code_stdckdint func_gl_gnulib_m4code_682e609604ccaac6be382e4ee3a4eaec fi } func_gl_gnulib_m4code_mntent () { if $gl_gnulib_enabled_mntent; then :; else gl_MNTENT_H gl_CONDITIONAL_HEADER([mntent.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_mntent=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 () { if $gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616; then :; else AC_REQUIRE([gl_MSVC_INVAL]) gl_CONDITIONAL([GL_COND_OBJ_MSVC_INVAL], [test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1]) gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616=true fi } func_gl_gnulib_m4code_676220fa4366efa9bdbfccf11a857c07 () { if $gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07; then :; else AC_REQUIRE([gl_MSVC_NOTHROW]) gl_CONDITIONAL([GL_COND_OBJ_MSVC_NOTHROW], [test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1]) gl_MODULE_INDICATOR([msvc-nothrow]) gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07=true func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi } func_gl_gnulib_m4code_open () { if $gl_gnulib_enabled_open; then :; else gl_FUNC_OPEN gl_CONDITIONAL([GL_COND_OBJ_OPEN], [test $REPLACE_OPEN = 1]) AM_COND_IF([GL_COND_OBJ_OPEN], [ gl_PREREQ_OPEN ]) gl_FCNTL_MODULE_INDICATOR([open]) gl_gnulib_enabled_open=true if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_cloexec fi func_gl_gnulib_m4code_deb6c5f14b16306a85c59bccf4d416d8 if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_fstat fi func_gl_gnulib_m4code_largefile if test $REPLACE_OPEN = 1; then func_gl_gnulib_m4code_stat fi fi } func_gl_gnulib_m4code_pathmax () { if $gl_gnulib_enabled_pathmax; then :; else gl_PATHMAX gl_gnulib_enabled_pathmax=true func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_94ea50e7ff7c2508f8a5894b17b1211c () { if $gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c; then :; else gl_PTHREAD_H gl_PTHREAD_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_sched func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_e0dc424e76447be3f4b8566d84038f5a () { if $gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a; then :; else gl_PTHREAD_ONCE gl_CONDITIONAL([GL_COND_OBJ_PTHREAD_ONCE], [test $HAVE_PTHREAD_ONCE = 0 || test $REPLACE_PTHREAD_ONCE = 1]) gl_PTHREAD_MODULE_INDICATOR([pthread-once]) gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a=true func_gl_gnulib_m4code_94ea50e7ff7c2508f8a5894b17b1211c if test $gl_threads_api = windows; then func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab fi fi } func_gl_gnulib_m4code_raise () { if $gl_gnulib_enabled_raise; then :; else gl_FUNC_RAISE gl_CONDITIONAL([GL_COND_OBJ_RAISE], [test $HAVE_RAISE = 0 || test $REPLACE_RAISE = 1]) AM_COND_IF([GL_COND_OBJ_RAISE], [ gl_PREREQ_RAISE ]) gl_SIGNAL_MODULE_INDICATOR([raise]) gl_gnulib_enabled_raise=true if test $HAVE_RAISE = 0 || test $REPLACE_RAISE = 1; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 fi } func_gl_gnulib_m4code_rmdir () { if $gl_gnulib_enabled_rmdir; then :; else gl_FUNC_RMDIR gl_CONDITIONAL([GL_COND_OBJ_RMDIR], [test $REPLACE_RMDIR = 1]) gl_UNISTD_MODULE_INDICATOR([rmdir]) gl_gnulib_enabled_rmdir=true if test $REPLACE_RMDIR = 1; then func_gl_gnulib_m4code_filename fi if test $REPLACE_RMDIR = 1; then func_gl_gnulib_m4code_sys_stat fi func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_sched () { if $gl_gnulib_enabled_sched; then :; else gl_SCHED_H gl_SCHED_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_sched=true func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_sigaction () { if $gl_gnulib_enabled_sigaction; then :; else gl_SIGACTION gl_CONDITIONAL([GL_COND_OBJ_SIGACTION], [test $HAVE_SIGACTION = 0]) AM_COND_IF([GL_COND_OBJ_SIGACTION], [ gl_PREREQ_SIGACTION ]) gl_SIGNAL_MODULE_INDICATOR([sigaction]) gl_gnulib_enabled_sigaction=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 if test $HAVE_SIGACTION = 0; then func_gl_gnulib_m4code_sigprocmask fi fi } func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 () { if $gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9; then :; else gl_SIGNAL_H gl_SIGNAL_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 fi } func_gl_gnulib_m4code_sigprocmask () { if $gl_gnulib_enabled_sigprocmask; then :; else gl_SIGNALBLOCKING gl_CONDITIONAL([GL_COND_OBJ_SIGPROCMASK], [test $HAVE_POSIX_SIGNALBLOCKING = 0]) AM_COND_IF([GL_COND_OBJ_SIGPROCMASK], [ gl_PREREQ_SIGPROCMASK ]) gl_SIGNAL_MODULE_INDICATOR([sigprocmask]) gl_gnulib_enabled_sigprocmask=true if test $HAVE_POSIX_SIGNALBLOCKING = 0; then func_gl_gnulib_m4code_f691f076f650964c9f5598c3ee487616 fi if test $HAVE_POSIX_SIGNALBLOCKING = 0; then func_gl_gnulib_m4code_raise fi func_gl_gnulib_m4code_af7e3f0204832604ea56703236d065c9 fi } func_gl_gnulib_m4code_size_max () { if $gl_gnulib_enabled_size_max; then :; else gl_SIZE_MAX gl_gnulib_enabled_size_max=true fi } func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 () { if $gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54; then :; else gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54=true fi } func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c () { if $gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c; then :; else gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c=true fi } func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 () { if $gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5; then :; else gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5=true fi } func_gl_gnulib_m4code_11f0455f01baad17427f00c3f461553b () { if $gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b; then :; else gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b=true fi } func_gl_gnulib_m4code_stat () { if $gl_gnulib_enabled_stat; then :; else gl_FUNC_STAT gl_CONDITIONAL([GL_COND_OBJ_STAT], [test $REPLACE_STAT = 1]) AM_COND_IF([GL_COND_OBJ_STAT], [ case "$host_os" in mingw* | windows*) AC_LIBOBJ([stat-w32]) ;; esac gl_PREREQ_STAT ]) gl_SYS_STAT_MODULE_INDICATOR([stat]) gl_MODULE_INDICATOR([stat]) gl_gnulib_enabled_stat=true if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_filename fi func_gl_gnulib_m4code_largefile if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_malloca fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_pathmax fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c fi if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_stdbool fi func_gl_gnulib_m4code_sys_stat fi } func_gl_gnulib_m4code_0137e3d3638b33e5819d132d0b23165c () { if $gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c; then :; else gl_STAT_TIME gl_STAT_BIRTHTIME gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c=true func_gl_gnulib_m4code_errno func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_stdckdint func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_4ecd6d4226a85c8d3e919d781a515f81 () { if $gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81; then :; else gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81=true fi } func_gl_gnulib_m4code_stdbool () { if $gl_gnulib_enabled_stdbool; then :; else gl_C_BOOL gl_gnulib_enabled_stdbool=true func_gl_gnulib_m4code_c99 fi } func_gl_gnulib_m4code_stdckdint () { if $gl_gnulib_enabled_stdckdint; then :; else AC_CHECK_HEADERS_ONCE([stdckdint.h]) if test $ac_cv_header_stdckdint_h = yes; then GL_GENERATE_STDCKDINT_H=false else GL_GENERATE_STDCKDINT_H=true fi gl_CONDITIONAL_HEADER([stdckdint.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_stdckdint=true func_gl_gnulib_m4code_stdbool fi } func_gl_gnulib_m4code_stddef () { if $gl_gnulib_enabled_stddef; then :; else gl_STDDEF_H gl_STDDEF_H_REQUIRE_DEFAULTS gl_CONDITIONAL_HEADER([stddef.h]) AC_PROG_MKDIR_P gl_gnulib_enabled_stddef=true fi } func_gl_gnulib_m4code_stdio () { if $gl_gnulib_enabled_stdio; then :; else gl_STDIO_H gl_STDIO_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_CONDITIONAL([GL_COND_OBJ_STDIO_READ], [test $REPLACE_STDIO_READ_FUNCS = 1]) gl_CONDITIONAL([GL_COND_OBJ_STDIO_WRITE], [test $REPLACE_STDIO_WRITE_FUNCS = 1]) dnl No need to create extra modules for these functions. Everyone who uses dnl likely needs them. gl_STDIO_MODULE_INDICATOR([fscanf]) gl_MODULE_INDICATOR([fscanf]) gl_STDIO_MODULE_INDICATOR([scanf]) gl_MODULE_INDICATOR([scanf]) gl_STDIO_MODULE_INDICATOR([fgetc]) gl_STDIO_MODULE_INDICATOR([getc]) gl_STDIO_MODULE_INDICATOR([getchar]) gl_STDIO_MODULE_INDICATOR([fgets]) gl_STDIO_MODULE_INDICATOR([fread]) dnl No need to create extra modules for these functions. Everyone who uses dnl likely needs them. gl_STDIO_MODULE_INDICATOR([fprintf]) gl_STDIO_MODULE_INDICATOR([printf]) gl_STDIO_MODULE_INDICATOR([vfprintf]) gl_STDIO_MODULE_INDICATOR([vprintf]) gl_STDIO_MODULE_INDICATOR([fputc]) gl_STDIO_MODULE_INDICATOR([putc]) gl_STDIO_MODULE_INDICATOR([putchar]) gl_STDIO_MODULE_INDICATOR([fputs]) gl_STDIO_MODULE_INDICATOR([puts]) gl_STDIO_MODULE_INDICATOR([fwrite]) gl_gnulib_enabled_stdio=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_stdlib () { if $gl_gnulib_enabled_stdlib; then :; else gl_STDLIB_H gl_STDLIB_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_stdlib=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_strerror () { if $gl_gnulib_enabled_strerror; then :; else gl_FUNC_STRERROR gl_CONDITIONAL([GL_COND_OBJ_STRERROR], [test $REPLACE_STRERROR = 1]) gl_MODULE_INDICATOR([strerror]) gl_STRING_MODULE_INDICATOR([strerror]) gl_gnulib_enabled_strerror=true if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_d07eca4c7a24aaac657c64e6568d4c2f fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_errno fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_intprops fi if test $REPLACE_STRERROR = 1; then func_gl_gnulib_m4code_dbb57f49352be8fb86869629a254fb72 fi func_gl_gnulib_m4code_string fi } func_gl_gnulib_m4code_dbb57f49352be8fb86869629a254fb72 () { if $gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72; then :; else AC_REQUIRE([gl_HEADER_ERRNO_H]) AC_REQUIRE([gl_FUNC_STRERROR_0]) gl_CONDITIONAL([GL_COND_OBJ_STRERROR_OVERRIDE], [test -n "$ERRNO_H" || test $REPLACE_STRERROR_0 = 1]) AM_COND_IF([GL_COND_OBJ_STRERROR_OVERRIDE], [ gl_PREREQ_SYS_H_WINSOCK2 ]) gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72=true func_gl_gnulib_m4code_errno fi } func_gl_gnulib_m4code_string () { if $gl_gnulib_enabled_string; then :; else gl_STRING_H gl_STRING_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_string=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef func_gl_gnulib_m4code_stdlib fi } func_gl_gnulib_m4code_sys_stat () { if $gl_gnulib_enabled_sys_stat; then :; else gl_SYS_STAT_H gl_SYS_STAT_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_sys_stat=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd fi } func_gl_gnulib_m4code_ff372e41059705989544356242e580a9 () { if $gl_gnulib_enabled_ff372e41059705989544356242e580a9; then :; else AC_CHECK_HEADERS([sys/single_threaded.h]) gl_gnulib_enabled_ff372e41059705989544356242e580a9=true fi } func_gl_gnulib_m4code_cb7562e84d8cf7185af782fe497b53dd () { if $gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd; then :; else gl_TIME_H gl_TIME_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd=true func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_unistd () { if $gl_gnulib_enabled_unistd; then :; else gl_UNISTD_H gl_UNISTD_H_REQUIRE_DEFAULTS AC_PROG_MKDIR_P gl_gnulib_enabled_unistd=true func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_6866f77579081cd4e08cb26d6ae10d54 func_gl_gnulib_m4code_61940a45a48a12e24a0309bca38eee9c func_gl_gnulib_m4code_bdf6d7d886f9468f2e09527f3b4939b5 func_gl_gnulib_m4code_stddef fi } func_gl_gnulib_m4code_vararrays () { if $gl_gnulib_enabled_vararrays; then :; else AC_C_VARARRAYS gl_gnulib_enabled_vararrays=true fi } func_gl_gnulib_m4code_c07c4a2fda832e3f2717a77545d62556 () { if $gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556; then :; else gl_FUNC_MMAP_ANON AC_REQUIRE([AC_C_INLINE]) AC_CHECK_FUNCS_ONCE([mquery pstat_getprocvm]) gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556=true func_gl_gnulib_m4code_getpagesize func_gl_gnulib_m4code_open func_gl_gnulib_m4code_unistd fi } func_gl_gnulib_m4code_cc1f80dc8888cfce5fb6c3f6d4a3d97d () { if $gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d; then :; else gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d=true func_gl_gnulib_m4code_c07c4a2fda832e3f2717a77545d62556 fi } func_gl_gnulib_m4code_503a4cb75d69c787103d0aa2ab7d8440 () { if $gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_CONDITIONAL([GL_COND_OBJ_WINDOWS_MUTEX], [case "$host_os" in mingw* | windows*) true;; *) false;; esac]) gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440=true fi } func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab () { if $gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_CONDITIONAL([GL_COND_OBJ_WINDOWS_ONCE], [case "$host_os" in mingw* | windows*) true;; *) false;; esac]) gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab=true fi } func_gl_gnulib_m4code_f0efff84a70f4afba30902bb8ffe9354 () { if $gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_CONDITIONAL([GL_COND_OBJ_WINDOWS_RECMUTEX], [case "$host_os" in mingw* | windows*) true;; *) false;; esac]) gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354=true fi } func_gl_gnulib_m4code_8bb827fe37eaccf1b97feb0c87bc92ef () { if $gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_CONDITIONAL([GL_COND_OBJ_WINDOWS_RWLOCK], [case "$host_os" in mingw* | windows*) true;; *) false;; esac]) gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef=true fi } func_gl_gnulib_m4code_b26fd0a0c34f92c929116e0e7f1d232f () { if $gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f; then :; else AC_REQUIRE([AC_CANONICAL_HOST]) gl_CONDITIONAL([GL_COND_OBJ_WINDOWS_SPIN], [case "$host_os" in mingw* | windows*) true;; *) false;; esac]) gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f=true fi } func_gl_gnulib_m4code_682e609604ccaac6be382e4ee3a4eaec () { if $gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec; then :; else gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec=true fi } func_gl_gnulib_m4code_xsize () { if $gl_gnulib_enabled_xsize; then :; else gl_XSIZE gl_gnulib_enabled_xsize=true func_gl_gnulib_m4code_attribute func_gl_gnulib_m4code_8ba2abba379e5cbd6f80c374ac0bfe27 func_gl_gnulib_m4code_size_max fi } if case "$host_os" in darwin*) true;; *) false;; esac; then func_gl_gnulib_m4code_55e6e810e702cce3e72865884958a831 fi if case "$host_os" in linux*) true;; *) false;; esac; then func_gl_gnulib_m4code_hasmntopt fi if case "$host_os" in openbsd*) true;; *) false;; esac; then func_gl_gnulib_m4code_cc1f80dc8888cfce5fb6c3f6d4a3d97d fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_503a4cb75d69c787103d0aa2ab7d8440 fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_f0efff84a70f4afba30902bb8ffe9354 fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_8bb827fe37eaccf1b97feb0c87bc92ef fi if test $gl_threads_api = posix; then func_gl_gnulib_m4code_e0dc424e76447be3f4b8566d84038f5a fi if test $gl_threads_api = windows; then func_gl_gnulib_m4code_68a4501daeca58988392c7e60b4917ab fi m4_pattern_allow([^gl_GNULIB_ENABLED_]) AM_CONDITIONAL([gl_GNULIB_ENABLED_4661e0b4e500a1a00180219f0280fb04], [$gl_gnulib_enabled_4661e0b4e500a1a00180219f0280fb04]) AM_CONDITIONAL([gl_GNULIB_ENABLED_d07eca4c7a24aaac657c64e6568d4c2f], [$gl_gnulib_enabled_d07eca4c7a24aaac657c64e6568d4c2f]) AM_CONDITIONAL([gl_GNULIB_ENABLED_3146726593c1fd888d32adc5a62973ce], [$gl_gnulib_enabled_3146726593c1fd888d32adc5a62973ce]) AM_CONDITIONAL([gl_GNULIB_ENABLED_attribute], [$gl_gnulib_enabled_attribute]) AM_CONDITIONAL([gl_GNULIB_ENABLED_ae0d979e17e723693567f9efd1d2294f], [$gl_gnulib_enabled_ae0d979e17e723693567f9efd1d2294f]) AM_CONDITIONAL([gl_GNULIB_ENABLED_c99], [$gl_gnulib_enabled_c99]) AM_CONDITIONAL([gl_GNULIB_ENABLED_55e6e810e702cce3e72865884958a831], [$gl_gnulib_enabled_55e6e810e702cce3e72865884958a831]) AM_CONDITIONAL([gl_GNULIB_ENABLED_cloexec], [$gl_gnulib_enabled_cloexec]) AM_CONDITIONAL([gl_GNULIB_ENABLED_close], [$gl_gnulib_enabled_close]) AM_CONDITIONAL([gl_GNULIB_ENABLED_36afd6902ac3aacf32e3ff12a686c346], [$gl_gnulib_enabled_36afd6902ac3aacf32e3ff12a686c346]) AM_CONDITIONAL([gl_GNULIB_ENABLED_dup2], [$gl_gnulib_enabled_dup2]) AM_CONDITIONAL([gl_GNULIB_ENABLED_errno], [$gl_gnulib_enabled_errno]) AM_CONDITIONAL([gl_GNULIB_ENABLED_error], [$gl_gnulib_enabled_error]) AM_CONDITIONAL([gl_GNULIB_ENABLED_97a0594d08da5f192f25b8c02c46f5f0], [$gl_gnulib_enabled_97a0594d08da5f192f25b8c02c46f5f0]) AM_CONDITIONAL([gl_GNULIB_ENABLED_303a13eed89acabfd6998a952149f2d5], [$gl_gnulib_enabled_303a13eed89acabfd6998a952149f2d5]) AM_CONDITIONAL([gl_GNULIB_ENABLED_8ba2abba379e5cbd6f80c374ac0bfe27], [$gl_gnulib_enabled_8ba2abba379e5cbd6f80c374ac0bfe27]) AM_CONDITIONAL([gl_GNULIB_ENABLED_83e4d5f60933eb2f07d525a5bfabe057], [$gl_gnulib_enabled_83e4d5f60933eb2f07d525a5bfabe057]) AM_CONDITIONAL([gl_GNULIB_ENABLED_fcntl], [$gl_gnulib_enabled_fcntl]) AM_CONDITIONAL([gl_GNULIB_ENABLED_deb6c5f14b16306a85c59bccf4d416d8], [$gl_gnulib_enabled_deb6c5f14b16306a85c59bccf4d416d8]) AM_CONDITIONAL([gl_GNULIB_ENABLED_43fe87a341d9b4b93c47c3ad819a5239], [$gl_gnulib_enabled_43fe87a341d9b4b93c47c3ad819a5239]) AM_CONDITIONAL([gl_GNULIB_ENABLED_filename], [$gl_gnulib_enabled_filename]) AM_CONDITIONAL([gl_GNULIB_ENABLED_fstat], [$gl_gnulib_enabled_fstat]) AM_CONDITIONAL([gl_GNULIB_ENABLED_getdtablesize], [$gl_gnulib_enabled_getdtablesize]) AM_CONDITIONAL([gl_GNULIB_ENABLED_getpagesize], [$gl_gnulib_enabled_getpagesize]) AM_CONDITIONAL([gl_GNULIB_ENABLED_getprogname], [$gl_gnulib_enabled_getprogname]) AM_CONDITIONAL([gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36], [$gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36]) AM_CONDITIONAL([gl_GNULIB_ENABLED_hasmntopt], [$gl_gnulib_enabled_hasmntopt]) AM_CONDITIONAL([gl_GNULIB_ENABLED_idx], [$gl_gnulib_enabled_idx]) AM_CONDITIONAL([gl_GNULIB_ENABLED_intprops], [$gl_gnulib_enabled_intprops]) AM_CONDITIONAL([gl_GNULIB_ENABLED_largefile], [$gl_gnulib_enabled_largefile]) AM_CONDITIONAL([gl_GNULIB_ENABLED_5b88be6afdf85eedb41cc8063ca35aa2], [$gl_gnulib_enabled_5b88be6afdf85eedb41cc8063ca35aa2]) AM_CONDITIONAL([gl_GNULIB_ENABLED_list], [$gl_gnulib_enabled_list]) AM_CONDITIONAL([gl_GNULIB_ENABLED_malloca], [$gl_gnulib_enabled_malloca]) AM_CONDITIONAL([gl_GNULIB_ENABLED_mntent], [$gl_gnulib_enabled_mntent]) AM_CONDITIONAL([gl_GNULIB_ENABLED_f691f076f650964c9f5598c3ee487616], [$gl_gnulib_enabled_f691f076f650964c9f5598c3ee487616]) AM_CONDITIONAL([gl_GNULIB_ENABLED_676220fa4366efa9bdbfccf11a857c07], [$gl_gnulib_enabled_676220fa4366efa9bdbfccf11a857c07]) AM_CONDITIONAL([gl_GNULIB_ENABLED_open], [$gl_gnulib_enabled_open]) AM_CONDITIONAL([gl_GNULIB_ENABLED_pathmax], [$gl_gnulib_enabled_pathmax]) AM_CONDITIONAL([gl_GNULIB_ENABLED_94ea50e7ff7c2508f8a5894b17b1211c], [$gl_gnulib_enabled_94ea50e7ff7c2508f8a5894b17b1211c]) AM_CONDITIONAL([gl_GNULIB_ENABLED_e0dc424e76447be3f4b8566d84038f5a], [$gl_gnulib_enabled_e0dc424e76447be3f4b8566d84038f5a]) AM_CONDITIONAL([gl_GNULIB_ENABLED_raise], [$gl_gnulib_enabled_raise]) AM_CONDITIONAL([gl_GNULIB_ENABLED_rmdir], [$gl_gnulib_enabled_rmdir]) AM_CONDITIONAL([gl_GNULIB_ENABLED_sched], [$gl_gnulib_enabled_sched]) AM_CONDITIONAL([gl_GNULIB_ENABLED_sigaction], [$gl_gnulib_enabled_sigaction]) AM_CONDITIONAL([gl_GNULIB_ENABLED_af7e3f0204832604ea56703236d065c9], [$gl_gnulib_enabled_af7e3f0204832604ea56703236d065c9]) AM_CONDITIONAL([gl_GNULIB_ENABLED_sigprocmask], [$gl_gnulib_enabled_sigprocmask]) AM_CONDITIONAL([gl_GNULIB_ENABLED_size_max], [$gl_gnulib_enabled_size_max]) AM_CONDITIONAL([gl_GNULIB_ENABLED_6866f77579081cd4e08cb26d6ae10d54], [$gl_gnulib_enabled_6866f77579081cd4e08cb26d6ae10d54]) AM_CONDITIONAL([gl_GNULIB_ENABLED_61940a45a48a12e24a0309bca38eee9c], [$gl_gnulib_enabled_61940a45a48a12e24a0309bca38eee9c]) AM_CONDITIONAL([gl_GNULIB_ENABLED_bdf6d7d886f9468f2e09527f3b4939b5], [$gl_gnulib_enabled_bdf6d7d886f9468f2e09527f3b4939b5]) AM_CONDITIONAL([gl_GNULIB_ENABLED_11f0455f01baad17427f00c3f461553b], [$gl_gnulib_enabled_11f0455f01baad17427f00c3f461553b]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stat], [$gl_gnulib_enabled_stat]) AM_CONDITIONAL([gl_GNULIB_ENABLED_0137e3d3638b33e5819d132d0b23165c], [$gl_gnulib_enabled_0137e3d3638b33e5819d132d0b23165c]) AM_CONDITIONAL([gl_GNULIB_ENABLED_4ecd6d4226a85c8d3e919d781a515f81], [$gl_gnulib_enabled_4ecd6d4226a85c8d3e919d781a515f81]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stdbool], [$gl_gnulib_enabled_stdbool]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stdckdint], [$gl_gnulib_enabled_stdckdint]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stddef], [$gl_gnulib_enabled_stddef]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stdio], [$gl_gnulib_enabled_stdio]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stdlib], [$gl_gnulib_enabled_stdlib]) AM_CONDITIONAL([gl_GNULIB_ENABLED_strerror], [$gl_gnulib_enabled_strerror]) AM_CONDITIONAL([gl_GNULIB_ENABLED_dbb57f49352be8fb86869629a254fb72], [$gl_gnulib_enabled_dbb57f49352be8fb86869629a254fb72]) AM_CONDITIONAL([gl_GNULIB_ENABLED_string], [$gl_gnulib_enabled_string]) AM_CONDITIONAL([gl_GNULIB_ENABLED_sys_stat], [$gl_gnulib_enabled_sys_stat]) AM_CONDITIONAL([gl_GNULIB_ENABLED_ff372e41059705989544356242e580a9], [$gl_gnulib_enabled_ff372e41059705989544356242e580a9]) AM_CONDITIONAL([gl_GNULIB_ENABLED_cb7562e84d8cf7185af782fe497b53dd], [$gl_gnulib_enabled_cb7562e84d8cf7185af782fe497b53dd]) AM_CONDITIONAL([gl_GNULIB_ENABLED_unistd], [$gl_gnulib_enabled_unistd]) AM_CONDITIONAL([gl_GNULIB_ENABLED_vararrays], [$gl_gnulib_enabled_vararrays]) AM_CONDITIONAL([gl_GNULIB_ENABLED_c07c4a2fda832e3f2717a77545d62556], [$gl_gnulib_enabled_c07c4a2fda832e3f2717a77545d62556]) AM_CONDITIONAL([gl_GNULIB_ENABLED_cc1f80dc8888cfce5fb6c3f6d4a3d97d], [$gl_gnulib_enabled_cc1f80dc8888cfce5fb6c3f6d4a3d97d]) AM_CONDITIONAL([gl_GNULIB_ENABLED_503a4cb75d69c787103d0aa2ab7d8440], [$gl_gnulib_enabled_503a4cb75d69c787103d0aa2ab7d8440]) AM_CONDITIONAL([gl_GNULIB_ENABLED_68a4501daeca58988392c7e60b4917ab], [$gl_gnulib_enabled_68a4501daeca58988392c7e60b4917ab]) AM_CONDITIONAL([gl_GNULIB_ENABLED_f0efff84a70f4afba30902bb8ffe9354], [$gl_gnulib_enabled_f0efff84a70f4afba30902bb8ffe9354]) AM_CONDITIONAL([gl_GNULIB_ENABLED_8bb827fe37eaccf1b97feb0c87bc92ef], [$gl_gnulib_enabled_8bb827fe37eaccf1b97feb0c87bc92ef]) AM_CONDITIONAL([gl_GNULIB_ENABLED_b26fd0a0c34f92c929116e0e7f1d232f], [$gl_gnulib_enabled_b26fd0a0c34f92c929116e0e7f1d232f]) AM_CONDITIONAL([gl_GNULIB_ENABLED_682e609604ccaac6be382e4ee3a4eaec], [$gl_gnulib_enabled_682e609604ccaac6be382e4ee3a4eaec]) AM_CONDITIONAL([gl_GNULIB_ENABLED_xsize], [$gl_gnulib_enabled_xsize]) # End of code from modules m4_ifval(gl_LIBSOURCES_LIST, [ m4_syscmd([test ! -d ]m4_defn([gl_LIBSOURCES_DIR])[ || for gl_file in ]gl_LIBSOURCES_LIST[ ; do if test ! -r ]m4_defn([gl_LIBSOURCES_DIR])[/$gl_file ; then echo "missing file ]m4_defn([gl_LIBSOURCES_DIR])[/$gl_file" >&2 exit 1 fi done])dnl m4_if(m4_sysval, [0], [], [AC_FATAL([expected source file, required through AC_LIBSOURCES, not found])]) ]) m4_popdef([GL_MODULE_INDICATOR_PREFIX]) m4_popdef([GL_MACRO_PREFIX]) m4_popdef([gl_LIBSOURCES_DIR]) m4_popdef([gl_LIBSOURCES_LIST]) m4_popdef([AC_LIBSOURCES]) m4_popdef([AC_REPLACE_FUNCS]) m4_popdef([AC_LIBOBJ]) AC_CONFIG_COMMANDS_PRE([ gl_libobjs= gl_ltlibobjs= gl_libobjdeps= if test -n "$gl_LIBOBJS"; then # Remove the extension. changequote(,)dnl sed_drop_objext='s/\.o$//;s/\.obj$//' sed_dirname1='s,//*,/,g' sed_dirname2='s,\(.\)/$,\1,' sed_dirname3='s,^[^/]*$,.,' sed_dirname4='s,\(.\)/[^/]*$,\1,' sed_basename1='s,.*/,,' changequote([, ])dnl for i in `for i in $gl_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do gl_libobjs="$gl_libobjs $i.$ac_objext" gl_ltlibobjs="$gl_ltlibobjs $i.lo" i_dir=`echo "$i" | sed -e "$sed_dirname1" -e "$sed_dirname2" -e "$sed_dirname3" -e "$sed_dirname4"` i_base=`echo "$i" | sed -e "$sed_basename1"` gl_libobjdeps="$gl_libobjdeps $i_dir/\$(DEPDIR)/$i_base.Plo" done fi AC_SUBST([gl_LIBOBJS], [$gl_libobjs]) AC_SUBST([gl_LTLIBOBJS], [$gl_ltlibobjs]) AC_SUBST([gl_LIBOBJDEPS], [$gl_libobjdeps]) ]) gltests_libdeps= gltests_ltlibdeps= m4_pushdef([AC_LIBOBJ], m4_defn([gltests_LIBOBJ])) m4_pushdef([AC_REPLACE_FUNCS], m4_defn([gltests_REPLACE_FUNCS])) m4_pushdef([AC_LIBSOURCES], m4_defn([gltests_LIBSOURCES])) m4_pushdef([gltests_LIBSOURCES_LIST], []) m4_pushdef([gltests_LIBSOURCES_DIR], []) m4_pushdef([GL_MACRO_PREFIX], [gltests]) m4_pushdef([GL_MODULE_INDICATOR_PREFIX], [GL]) gl_COMMON gl_source_base='tests' gl_source_base_prefix= changequote(,)dnl gltests_WITNESS=IN_`echo "${PACKAGE-$PACKAGE_TARNAME}" | LC_ALL=C tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ | LC_ALL=C sed -e 's/[^A-Z0-9_]/_/g'`_GNULIB_TESTS changequote([, ])dnl AC_SUBST([gltests_WITNESS]) gl_module_indicator_condition=$gltests_WITNESS m4_pushdef([gl_MODULE_INDICATOR_CONDITION], [$gl_module_indicator_condition]) m4_pattern_allow([^gl_GNULIB_ENABLED_]) m4_popdef([gl_MODULE_INDICATOR_CONDITION]) m4_ifval(gltests_LIBSOURCES_LIST, [ m4_syscmd([test ! -d ]m4_defn([gltests_LIBSOURCES_DIR])[ || for gl_file in ]gltests_LIBSOURCES_LIST[ ; do if test ! -r ]m4_defn([gltests_LIBSOURCES_DIR])[/$gl_file ; then echo "missing file ]m4_defn([gltests_LIBSOURCES_DIR])[/$gl_file" >&2 exit 1 fi done])dnl m4_if(m4_sysval, [0], [], [AC_FATAL([expected source file, required through AC_LIBSOURCES, not found])]) ]) m4_popdef([GL_MODULE_INDICATOR_PREFIX]) m4_popdef([GL_MACRO_PREFIX]) m4_popdef([gltests_LIBSOURCES_DIR]) m4_popdef([gltests_LIBSOURCES_LIST]) m4_popdef([AC_LIBSOURCES]) m4_popdef([AC_REPLACE_FUNCS]) m4_popdef([AC_LIBOBJ]) AC_CONFIG_COMMANDS_PRE([ gltests_libobjs= gltests_ltlibobjs= gltests_libobjdeps= if test -n "$gltests_LIBOBJS"; then # Remove the extension. changequote(,)dnl sed_drop_objext='s/\.o$//;s/\.obj$//' sed_dirname1='s,//*,/,g' sed_dirname2='s,\(.\)/$,\1,' sed_dirname3='s,^[^/]*$,.,' sed_dirname4='s,\(.\)/[^/]*$,\1,' sed_basename1='s,.*/,,' changequote([, ])dnl for i in `for i in $gltests_LIBOBJS; do echo "$i"; done | sed -e "$sed_drop_objext" | sort | uniq`; do gltests_libobjs="$gltests_libobjs $i.$ac_objext" gltests_ltlibobjs="$gltests_ltlibobjs $i.lo" i_dir=`echo "$i" | sed -e "$sed_dirname1" -e "$sed_dirname2" -e "$sed_dirname3" -e "$sed_dirname4"` i_base=`echo "$i" | sed -e "$sed_basename1"` gltests_libobjdeps="$gltests_libobjdeps $i_dir/\$(DEPDIR)/$i_base.Plo" done fi AC_SUBST([gltests_LIBOBJS], [$gltests_libobjs]) AC_SUBST([gltests_LTLIBOBJS], [$gltests_ltlibobjs]) AC_SUBST([gltests_LIBOBJDEPS], [$gltests_libobjdeps]) ]) AC_REQUIRE([gl_CC_GNULIB_WARNINGS]) ]) # Like AC_LIBOBJ, except that the module name goes # into gl_LIBOBJS instead of into LIBOBJS. AC_DEFUN([gl_LIBOBJ], [ AS_LITERAL_IF([$1], [gl_LIBSOURCES([$1.c])])dnl gl_LIBOBJS="$gl_LIBOBJS $1.$ac_objext" ]) # Like AC_REPLACE_FUNCS, except that the module name goes # into gl_LIBOBJS instead of into LIBOBJS. AC_DEFUN([gl_REPLACE_FUNCS], [ m4_foreach_w([gl_NAME], [$1], [AC_LIBSOURCES(gl_NAME[.c])])dnl AC_CHECK_FUNCS([$1], , [gl_LIBOBJ($ac_func)]) ]) # Like AC_LIBSOURCES, except the directory where the source file is # expected is derived from the gnulib-tool parameterization, # and alloca is special cased (for the alloca-opt module). # We could also entirely rely on EXTRA_lib..._SOURCES. AC_DEFUN([gl_LIBSOURCES], [ m4_foreach([_gl_NAME], [$1], [ m4_if(_gl_NAME, [alloca.c], [], [ m4_define([gl_LIBSOURCES_DIR], [gnulib-lib]) m4_append([gl_LIBSOURCES_LIST], _gl_NAME, [ ]) ]) ]) ]) # Like AC_LIBOBJ, except that the module name goes # into gltests_LIBOBJS instead of into LIBOBJS. AC_DEFUN([gltests_LIBOBJ], [ AS_LITERAL_IF([$1], [gltests_LIBSOURCES([$1.c])])dnl gltests_LIBOBJS="$gltests_LIBOBJS $1.$ac_objext" ]) # Like AC_REPLACE_FUNCS, except that the module name goes # into gltests_LIBOBJS instead of into LIBOBJS. AC_DEFUN([gltests_REPLACE_FUNCS], [ m4_foreach_w([gl_NAME], [$1], [AC_LIBSOURCES(gl_NAME[.c])])dnl AC_CHECK_FUNCS([$1], , [gltests_LIBOBJ($ac_func)]) ]) # Like AC_LIBSOURCES, except the directory where the source file is # expected is derived from the gnulib-tool parameterization, # and alloca is special cased (for the alloca-opt module). # We could also entirely rely on EXTRA_lib..._SOURCES. AC_DEFUN([gltests_LIBSOURCES], [ m4_foreach([_gl_NAME], [$1], [ m4_if(_gl_NAME, [alloca.c], [], [ m4_define([gltests_LIBSOURCES_DIR], [tests]) m4_append([gltests_LIBSOURCES_LIST], _gl_NAME, [ ]) ]) ]) ]) # This macro records the list of files which have been installed by # gnulib-tool and may be removed by future gnulib-tool invocations. AC_DEFUN([gl_FILE_LIST], [ lib/_Noreturn.h lib/alloca.in.h lib/arg-nonnull.h lib/assert.in.h lib/asyncsafe-spin.c lib/asyncsafe-spin.h lib/attribute.h lib/basename-lgpl.c lib/basename-lgpl.h lib/c++defs.h lib/clean-temp-private.h lib/clean-temp-simple.c lib/clean-temp-simple.h lib/cloexec.c lib/cloexec.h lib/close.c lib/dup2.c lib/errno.in.h lib/error.c lib/error.in.h lib/fatal-signal.c lib/fatal-signal.h lib/fcntl.c lib/fcntl.in.h lib/fd-hook.c lib/fd-hook.h lib/filename.h lib/fstat.c lib/getdtablesize.c lib/getpagesize.c lib/getprogname.c lib/getprogname.h lib/gettext.h lib/gl_anyhash1.h lib/gl_anyhash2.h lib/gl_anyhash_primes.h lib/gl_anylinked_list1.h lib/gl_anylinked_list2.h lib/gl_linkedhash_list.c lib/gl_linkedhash_list.h lib/gl_list.c lib/gl_list.h lib/glthread/lock.c lib/glthread/lock.h lib/glthread/once.c lib/glthread/once.h lib/glthread/threadlib.c lib/hasmntopt.c lib/idx.h lib/intprops-internal.h lib/intprops.h lib/limits.in.h lib/malloca.c lib/malloca.h lib/mntent.in.h lib/msvc-inval.c lib/msvc-inval.h lib/msvc-nothrow.c lib/msvc-nothrow.h lib/open.c lib/pathmax.h lib/pthread-once.c lib/pthread.in.h lib/raise.c lib/rmdir.c lib/sched.in.h lib/sig-handler.c lib/sig-handler.h lib/sigaction.c lib/signal.in.h lib/sigprocmask.c lib/size_max.h lib/stat-time.c lib/stat-time.h lib/stat-w32.c lib/stat-w32.h lib/stat.c lib/stdckdint.in.h lib/stddef.in.h lib/stdint.in.h lib/stdio-read.c lib/stdio-write.c lib/stdio.in.h lib/stdlib.in.h lib/stdnoreturn.in.h lib/strerror-override.c lib/strerror-override.h lib/strerror.c lib/string.in.h lib/sys_stat.in.h lib/sys_types.in.h lib/thread-optim.h lib/time.in.h lib/unistd.c lib/unistd.in.h lib/verify.h lib/vma-iter.c lib/vma-iter.h lib/vma-prot.c lib/vma-prot.h lib/warn-on-use.h lib/windows-initguard.h lib/windows-mutex.c lib/windows-mutex.h lib/windows-once.c lib/windows-once.h lib/windows-recmutex.c lib/windows-recmutex.h lib/windows-rwlock.c lib/windows-rwlock.h lib/windows-spin.c lib/windows-spin.h lib/xalloc-oversized.h lib/xsize.c lib/xsize.h m4/00gnulib.m4 m4/absolute-header.m4 m4/alloca.m4 m4/ansi-c++.m4 m4/asm-underscore.m4 m4/assert_h.m4 m4/atomic-cas.m4 m4/c-bool.m4 m4/close.m4 m4/codeset.m4 m4/double-slash-root.m4 m4/dup2.m4 m4/eealloc.m4 m4/errno_h.m4 m4/error.m4 m4/error_h.m4 m4/extensions-aix.m4 m4/extensions.m4 m4/extern-inline.m4 m4/fatal-signal.m4 m4/fcntl-o.m4 m4/fcntl.m4 m4/fcntl_h.m4 m4/fstat.m4 m4/getdtablesize.m4 m4/getpagesize.m4 m4/getprogname.m4 m4/gnulib-common.m4 m4/hasmntopt.m4 m4/host-cpu-c-abi.m4 m4/include_next.m4 m4/largefile.m4 m4/limits-h.m4 m4/locale-en.m4 m4/lock.m4 m4/malloca.m4 m4/mmap-anon.m4 m4/mntent_h.m4 m4/mode_t.m4 m4/msvc-inval.m4 m4/msvc-nothrow.m4 m4/multiarch.m4 m4/musl.m4 m4/nocrash.m4 m4/off64_t.m4 m4/off_t.m4 m4/once.m4 m4/open-cloexec.m4 m4/open-slash.m4 m4/open.m4 m4/pathmax.m4 m4/pid_t.m4 m4/pthread-once.m4 m4/pthread-spin.m4 m4/pthread_h.m4 m4/pthread_rwlock_rdlock.m4 m4/raise.m4 m4/rmdir.m4 m4/sched_h.m4 m4/sig_atomic_t.m4 m4/sigaction.m4 m4/signal_h.m4 m4/signalblocking.m4 m4/size_max.m4 m4/sparcv8+.m4 m4/ssize_t.m4 m4/stat-time.m4 m4/stat.m4 m4/std-gnu11.m4 m4/stddef_h.m4 m4/stdint.m4 m4/stdio_h.m4 m4/stdlib_h.m4 m4/stdnoreturn.m4 m4/strerror.m4 m4/string_h.m4 m4/sys_cdefs_h.m4 m4/sys_socket_h.m4 m4/sys_stat_h.m4 m4/sys_types_h.m4 m4/threadlib.m4 m4/time_h.m4 m4/unistd_h.m4 m4/vararrays.m4 m4/warn-on-use.m4 m4/wint_t.m4 m4/xsize.m4 m4/zzgnulib.m4 ]) libffcall-2.5/gnulib-m4/off_t.m40000664000000000000000000000101014631432055013317 00000000000000# off_t.m4 # serial 1 dnl Copyright (C) 2012-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Check whether to override the 'off_t' type. dnl Set WINDOWS_64_BIT_OFF_T. AC_DEFUN([gl_TYPE_OFF_T], [ m4_ifdef([gl_LARGEFILE], [ AC_REQUIRE([gl_LARGEFILE]) ], [ WINDOWS_64_BIT_OFF_T=0 ]) AC_SUBST([WINDOWS_64_BIT_OFF_T]) ]) libffcall-2.5/gnulib-m4/signalblocking.m40000664000000000000000000000156414631432055015226 00000000000000# signalblocking.m4 # serial 17 dnl Copyright (C) 2001-2002, 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Determine available signal blocking primitives. Three different APIs exist: # 1) POSIX: sigemptyset, sigaddset, sigprocmask # 2) SYSV: sighold, sigrelse # 3) BSD: sigblock, sigsetmask # For simplicity, here we check only for the POSIX signal blocking. AC_DEFUN([gl_SIGNALBLOCKING], [ AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) AC_REQUIRE([gl_CHECK_TYPE_SIGSET_T]) HAVE_POSIX_SIGNALBLOCKING=0 if test "$gl_cv_type_sigset_t" = yes; then AC_CHECK_FUNC([sigprocmask], [HAVE_POSIX_SIGNALBLOCKING=1]) fi ]) # Prerequisites of lib/sigprocmask.c. AC_DEFUN([gl_PREREQ_SIGPROCMASK], [:]) libffcall-2.5/gnulib-m4/double-slash-root.m40000664000000000000000000000312714631432055015600 00000000000000# double-slash-root.m4 # serial 4 -*- Autoconf -*- dnl Copyright (C) 2006, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_DOUBLE_SLASH_ROOT], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_CACHE_CHECK([whether // is distinct from /], [gl_cv_double_slash_root], [ if test x"$cross_compiling" = xyes ; then # When cross-compiling, there is no way to tell whether // is special # short of a list of hosts. However, the only known hosts to date # that have a distinct // are Apollo DomainOS (too old to port to), # Cygwin, and z/OS. If anyone knows of another system for which // has # special semantics and is distinct from /, please report it to # . case $host in *-cygwin | i370-ibm-openedition) gl_cv_double_slash_root=yes ;; *) # Be optimistic and assume that / and // are the same when we # don't know. gl_cv_double_slash_root='unknown, assuming no' ;; esac else set x `ls -di / // 2>/dev/null` if test "$[2]" = "$[4]" && wc //dev/null >/dev/null 2>&1; then gl_cv_double_slash_root=no else gl_cv_double_slash_root=yes fi fi]) if test "$gl_cv_double_slash_root" = yes; then AC_DEFINE([DOUBLE_SLASH_IS_DISTINCT_ROOT], [1], [Define to 1 if // is a file system root distinct from /.]) fi ]) libffcall-2.5/gnulib-m4/include_next.m40000664000000000000000000002104214631432055014712 00000000000000# include_next.m4 # serial 27 dnl Copyright (C) 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Paul Eggert and Derek Price. dnl Sets INCLUDE_NEXT, INCLUDE_NEXT_AS_FIRST_DIRECTIVE, PRAGMA_SYSTEM_HEADER, dnl and PRAGMA_COLUMNS. dnl dnl INCLUDE_NEXT expands to 'include_next' if the compiler supports it, or to dnl 'include' otherwise. dnl dnl INCLUDE_NEXT_AS_FIRST_DIRECTIVE expands to 'include_next' if the compiler dnl supports it in the special case that it is the first include directive in dnl the given file, or to 'include' otherwise. dnl dnl PRAGMA_SYSTEM_HEADER can be used in files that contain #include_next, dnl so as to avoid GCC warnings when the gcc option -pedantic is used. dnl '#pragma GCC system_header' has the same effect as if the file was found dnl through the include search path specified with '-isystem' options (as dnl opposed to the search path specified with '-I' options). Namely, gcc dnl does not warn about some things, and on some systems (Solaris and Interix) dnl __STDC__ evaluates to 0 instead of to 1. The latter is an undesired side dnl effect; we are therefore careful to use 'defined __STDC__' or '1' instead dnl of plain '__STDC__'. dnl dnl PRAGMA_COLUMNS can be used in files that override system header files, so dnl as to avoid compilation errors on HP NonStop systems when the gnulib file dnl is included by a system header file that does a "#pragma COLUMNS 80" (which dnl has the effect of truncating the lines of that file and all files that it dnl includes to 80 columns) and the gnulib file has lines longer than 80 dnl columns. AC_DEFUN([gl_INCLUDE_NEXT], [ AC_LANG_PREPROC_REQUIRE() AC_CACHE_CHECK([whether the preprocessor supports include_next], [gl_cv_have_include_next], [rm -rf conftestd1a conftestd1b conftestd2 mkdir conftestd1a conftestd1b conftestd2 dnl IBM C 9.0, 10.1 (original versions, prior to the 2009-01 updates) on dnl AIX 6.1 support include_next when used as first preprocessor directive dnl in a file, but not when preceded by another include directive. Check dnl for this bug by including . dnl Additionally, with this same compiler, include_next is a no-op when dnl used in a header file that was included by specifying its absolute dnl file name. Despite these two bugs, include_next is used in the dnl compiler's . By virtue of the second bug, we need to use dnl include_next as well in this case. cat < conftestd1a/conftest.h #define DEFINED_IN_CONFTESTD1 #include_next #ifdef DEFINED_IN_CONFTESTD2 int foo; #else #error "include_next doesn't work" #endif EOF cat < conftestd1b/conftest.h #define DEFINED_IN_CONFTESTD1 #include #include_next #ifdef DEFINED_IN_CONFTESTD2 int foo; #else #error "include_next doesn't work" #endif EOF cat < conftestd2/conftest.h #ifndef DEFINED_IN_CONFTESTD1 #error "include_next test doesn't work" #endif #define DEFINED_IN_CONFTESTD2 EOF gl_saved_CPPFLAGS="$CPPFLAGS" CPPFLAGS="$gl_saved_CPPFLAGS -Iconftestd1b -Iconftestd2" dnl We intentionally avoid using AC_LANG_SOURCE here. AC_COMPILE_IFELSE([AC_LANG_DEFINES_PROVIDED[#include ]], [gl_cv_have_include_next=yes], [CPPFLAGS="$gl_saved_CPPFLAGS -Iconftestd1a -Iconftestd2" AC_COMPILE_IFELSE([AC_LANG_DEFINES_PROVIDED[#include ]], [gl_cv_have_include_next=buggy], [gl_cv_have_include_next=no]) ]) CPPFLAGS="$gl_saved_CPPFLAGS" rm -rf conftestd1a conftestd1b conftestd2 ]) PRAGMA_SYSTEM_HEADER= if test $gl_cv_have_include_next = yes; then INCLUDE_NEXT=include_next INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next if test -n "$GCC"; then PRAGMA_SYSTEM_HEADER='#pragma GCC system_header' fi else if test $gl_cv_have_include_next = buggy; then INCLUDE_NEXT=include INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include_next else INCLUDE_NEXT=include INCLUDE_NEXT_AS_FIRST_DIRECTIVE=include fi fi AC_SUBST([INCLUDE_NEXT]) AC_SUBST([INCLUDE_NEXT_AS_FIRST_DIRECTIVE]) AC_SUBST([PRAGMA_SYSTEM_HEADER]) dnl HP NonStop systems, which define __TANDEM, limit the line length dnl after including some system header files. AC_CACHE_CHECK([whether source code line length is unlimited], [gl_cv_source_line_length_unlimited], [AC_EGREP_CPP([choke me], [ #ifdef __TANDEM choke me #endif ], [gl_cv_source_line_length_unlimited=no], [gl_cv_source_line_length_unlimited=yes]) ]) if test $gl_cv_source_line_length_unlimited = no; then PRAGMA_COLUMNS="#pragma COLUMNS 10000" else PRAGMA_COLUMNS= fi AC_SUBST([PRAGMA_COLUMNS]) ]) # gl_CHECK_NEXT_HEADERS(HEADER1 HEADER2 ...) # ------------------------------------------ # For each arg foo.h, if #include_next works, define NEXT_FOO_H to be # ''; otherwise define it to be # '"///usr/include/foo.h"', or whatever other absolute file name is suitable. # Also, if #include_next works as first preprocessing directive in a file, # define NEXT_AS_FIRST_DIRECTIVE_FOO_H to be ''; otherwise define it to # be # '"///usr/include/foo.h"', or whatever other absolute file name is suitable. # That way, a header file with the following line: # #@INCLUDE_NEXT@ @NEXT_FOO_H@ # or # #@INCLUDE_NEXT_AS_FIRST_DIRECTIVE@ @NEXT_AS_FIRST_DIRECTIVE_FOO_H@ # behaves (after sed substitution) as if it contained # #include_next # even if the compiler does not support include_next. # The three "///" are to pacify Sun C 5.8, which otherwise would say # "warning: #include of /usr/include/... may be non-portable". # Use '""', not '<>', so that the /// cannot be confused with a C99 comment. # Note: This macro assumes that the header file is not empty after # preprocessing, i.e. it does not only define preprocessor macros but also # provides some type/enum definitions or function/variable declarations. # # This macro also checks whether each header exists, by invoking # AC_CHECK_HEADERS_ONCE or AC_CHECK_HEADERS on each argument. AC_DEFUN([gl_CHECK_NEXT_HEADERS], [ gl_NEXT_HEADERS_INTERNAL([$1], [check]) ]) # gl_NEXT_HEADERS(HEADER1 HEADER2 ...) # ------------------------------------ # Like gl_CHECK_NEXT_HEADERS, except do not check whether the headers exist. # This is suitable for headers like that are standardized by C89 # and therefore can be assumed to exist. AC_DEFUN([gl_NEXT_HEADERS], [ gl_NEXT_HEADERS_INTERNAL([$1], [assume]) ]) # The guts of gl_CHECK_NEXT_HEADERS and gl_NEXT_HEADERS. AC_DEFUN([gl_NEXT_HEADERS_INTERNAL], [ AC_REQUIRE([gl_INCLUDE_NEXT]) AC_REQUIRE([AC_CANONICAL_HOST]) m4_if([$2], [check], [AC_CHECK_HEADERS_ONCE([$1]) ]) m4_foreach_w([gl_HEADER_NAME], [$1], [AS_VAR_PUSHDEF([gl_next_header], [gl_cv_next_]m4_defn([gl_HEADER_NAME])) if test $gl_cv_have_include_next = yes; then AS_VAR_SET([gl_next_header], ['<'gl_HEADER_NAME'>']) else AC_CACHE_CHECK( [absolute name of <]m4_defn([gl_HEADER_NAME])[>], [gl_next_header], [m4_if([$2], [check], [AS_VAR_PUSHDEF([gl_header_exists], [ac_cv_header_]m4_defn([gl_HEADER_NAME])) if test AS_VAR_GET([gl_header_exists]) = yes; then AS_VAR_POPDEF([gl_header_exists]) ]) gl_ABSOLUTE_HEADER_ONE(gl_HEADER_NAME) AS_VAR_COPY([gl_header], [gl_cv_absolute_]AS_TR_SH(gl_HEADER_NAME)) AS_VAR_SET([gl_next_header], ['"'$gl_header'"']) m4_if([$2], [check], [else AS_VAR_SET([gl_next_header], ['<'gl_HEADER_NAME'>']) fi ]) ]) fi AC_SUBST( AS_TR_CPP([NEXT_]m4_defn([gl_HEADER_NAME])), [AS_VAR_GET([gl_next_header])]) if test $gl_cv_have_include_next = yes || test $gl_cv_have_include_next = buggy; then # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include_next' gl_next_as_first_directive='<'gl_HEADER_NAME'>' else # INCLUDE_NEXT_AS_FIRST_DIRECTIVE='include' gl_next_as_first_directive=AS_VAR_GET([gl_next_header]) fi AC_SUBST( AS_TR_CPP([NEXT_AS_FIRST_DIRECTIVE_]m4_defn([gl_HEADER_NAME])), [$gl_next_as_first_directive]) AS_VAR_POPDEF([gl_next_header])]) ]) # Autoconf 2.68 added warnings for our use of AC_COMPILE_IFELSE; # this fallback is safe for all earlier autoconf versions. m4_define_default([AC_LANG_DEFINES_PROVIDED]) libffcall-2.5/gnulib-m4/fcntl-o.m40000664000000000000000000001130114631432055013570 00000000000000# fcntl-o.m4 # serial 8 dnl Copyright (C) 2006, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Written by Paul Eggert. AC_PREREQ([2.60]) # Test whether the flags O_NOATIME and O_NOFOLLOW actually work. # Define HAVE_WORKING_O_NOATIME to 1 if O_NOATIME works, or to 0 otherwise. # Define HAVE_WORKING_O_NOFOLLOW to 1 if O_NOFOLLOW works, or to 0 otherwise. AC_DEFUN([gl_FCNTL_O_FLAGS], [ dnl Persuade glibc to define O_NOATIME and O_NOFOLLOW. AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles AC_CHECK_HEADERS_ONCE([unistd.h]) AC_CHECK_FUNCS_ONCE([symlink]) AC_CACHE_CHECK([for working fcntl.h], [gl_cv_header_working_fcntl_h], [AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include #include #if HAVE_UNISTD_H # include #else /* on Windows with MSVC */ # include # include # defined sleep(n) _sleep ((n) * 1000) #endif #include ]GL_MDA_DEFINES[ #ifndef O_NOATIME #define O_NOATIME 0 #endif #ifndef O_NOFOLLOW #define O_NOFOLLOW 0 #endif static int const constants[] = { O_CREAT, O_EXCL, O_NOCTTY, O_TRUNC, O_APPEND, O_NONBLOCK, O_SYNC, O_ACCMODE, O_RDONLY, O_RDWR, O_WRONLY }; ]], [[ int result = !constants; #if HAVE_SYMLINK { static char const sym[] = "conftest.sym"; if (symlink ("/dev/null", sym) != 0) result |= 2; else { int fd = open (sym, O_WRONLY | O_NOFOLLOW | O_CREAT, 0); if (fd >= 0) { close (fd); result |= 4; } } if (unlink (sym) != 0 || symlink (".", sym) != 0) result |= 2; else { int fd = open (sym, O_RDONLY | O_NOFOLLOW); if (fd >= 0) { close (fd); result |= 4; } } unlink (sym); } #endif { static char const file[] = "confdefs.h"; int fd = open (file, O_RDONLY | O_NOATIME); if (fd < 0) result |= 8; else { struct stat st0; if (fstat (fd, &st0) != 0) result |= 16; else { char c; sleep (1); if (read (fd, &c, 1) != 1) result |= 24; else { if (close (fd) != 0) result |= 32; else { struct stat st1; if (stat (file, &st1) != 0) result |= 40; else if (st0.st_atime != st1.st_atime) result |= 64; } } } } } return result;]])], [gl_cv_header_working_fcntl_h=yes], [case $? in #( 4) gl_cv_header_working_fcntl_h='no (bad O_NOFOLLOW)';; #( 64) gl_cv_header_working_fcntl_h='no (bad O_NOATIME)';; #( 68) gl_cv_header_working_fcntl_h='no (bad O_NOATIME, O_NOFOLLOW)';; #( *) gl_cv_header_working_fcntl_h='no';; esac], [case "$host_os" in # Guess 'no' on native Windows. mingw* | windows*) gl_cv_header_working_fcntl_h='no' ;; *) gl_cv_header_working_fcntl_h=cross-compiling ;; esac ]) ]) case $gl_cv_header_working_fcntl_h in #( *O_NOATIME* | no | cross-compiling) ac_val=0;; #( *) ac_val=1;; esac AC_DEFINE_UNQUOTED([HAVE_WORKING_O_NOATIME], [$ac_val], [Define to 1 if O_NOATIME works.]) case $gl_cv_header_working_fcntl_h in #( *O_NOFOLLOW* | no | cross-compiling) ac_val=0;; #( *) ac_val=1;; esac AC_DEFINE_UNQUOTED([HAVE_WORKING_O_NOFOLLOW], [$ac_val], [Define to 1 if O_NOFOLLOW works.]) ]) libffcall-2.5/gnulib-m4/wint_t.m40000664000000000000000000000343514631432055013543 00000000000000# wint_t.m4 # serial 11 dnl Copyright (C) 2003, 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Test whether has the 'wint_t' type and whether gnulib's dnl or would, if present, override 'wint_t'. dnl Prerequisite: AC_PROG_CC AC_DEFUN([gt_TYPE_WINT_T], [ AC_CACHE_CHECK([for wint_t], [gt_cv_c_wint_t], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include wint_t foo = (wchar_t)'\0';]], [[]])], [gt_cv_c_wint_t=yes], [gt_cv_c_wint_t=no])]) if test $gt_cv_c_wint_t = yes; then AC_DEFINE([HAVE_WINT_T], [1], [Define if you have the 'wint_t' type.]) dnl Determine whether gnulib's or would, if present, dnl override 'wint_t'. AC_CACHE_CHECK([whether wint_t is large enough], [gl_cv_type_wint_t_large_enough], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int verify[sizeof (wint_t) < sizeof (int) ? -1 : 1]; ]])], [gl_cv_type_wint_t_large_enough=yes], [gl_cv_type_wint_t_large_enough=no])]) if test $gl_cv_type_wint_t_large_enough = no; then GNULIBHEADERS_OVERRIDE_WINT_T=1 else GNULIBHEADERS_OVERRIDE_WINT_T=0 fi else GNULIBHEADERS_OVERRIDE_WINT_T=0 fi AC_SUBST([GNULIBHEADERS_OVERRIDE_WINT_T]) ]) dnl Prerequisites of the 'wint_t' override. AC_DEFUN([gl_TYPE_WINT_T_PREREQ], [ AC_CHECK_HEADERS_ONCE([crtdefs.h]) if test $ac_cv_header_crtdefs_h = yes; then HAVE_CRTDEFS_H=1 else HAVE_CRTDEFS_H=0 fi AC_SUBST([HAVE_CRTDEFS_H]) ]) libffcall-2.5/gnulib-m4/absolute-header.m40000664000000000000000000001016614631432055015302 00000000000000# absolute-header.m4 # serial 18 dnl Copyright (C) 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Derek Price. # gl_ABSOLUTE_HEADER(HEADER1 HEADER2 ...) # --------------------------------------- # Find the absolute name of a header file, testing first if the header exists. # If the header were sys/inttypes.h, this macro would define # ABSOLUTE_SYS_INTTYPES_H to the '""' quoted absolute name of sys/inttypes.h # in config.h # (e.g. '#define ABSOLUTE_SYS_INTTYPES_H "///usr/include/sys/inttypes.h"'). # The three "///" are to pacify Sun C 5.8, which otherwise would say # "warning: #include of /usr/include/... may be non-portable". # Use '""', not '<>', so that the /// cannot be confused with a C99 comment. # Note: This macro assumes that the header file is not empty after # preprocessing, i.e. it does not only define preprocessor macros but also # provides some type/enum definitions or function/variable declarations. AC_DEFUN([gl_ABSOLUTE_HEADER], [AC_REQUIRE([AC_CANONICAL_HOST]) AC_LANG_PREPROC_REQUIRE()dnl m4_foreach_w([gl_HEADER_NAME], [$1], [AS_VAR_PUSHDEF([gl_absolute_header], [gl_cv_absolute_]m4_defn([gl_HEADER_NAME]))dnl AC_CACHE_CHECK([absolute name of <]m4_defn([gl_HEADER_NAME])[>], [gl_absolute_header], [AS_VAR_PUSHDEF([ac_header_exists], [ac_cv_header_]m4_defn([gl_HEADER_NAME]))dnl AC_CHECK_HEADERS_ONCE(m4_defn([gl_HEADER_NAME]))dnl if test AS_VAR_GET([ac_header_exists]) = yes; then gl_ABSOLUTE_HEADER_ONE(m4_defn([gl_HEADER_NAME])) fi AS_VAR_POPDEF([ac_header_exists])dnl ])dnl AC_DEFINE_UNQUOTED(AS_TR_CPP([ABSOLUTE_]m4_defn([gl_HEADER_NAME])), ["AS_VAR_GET([gl_absolute_header])"], [Define this to an absolute name of <]m4_defn([gl_HEADER_NAME])[>.]) AS_VAR_POPDEF([gl_absolute_header])dnl ])dnl ])# gl_ABSOLUTE_HEADER # gl_ABSOLUTE_HEADER_ONE(HEADER) # ------------------------------ # Like gl_ABSOLUTE_HEADER, except that: # - it assumes that the header exists, # - it uses the current CPPFLAGS, # - it does not cache the result, # - it is silent. AC_DEFUN([gl_ABSOLUTE_HEADER_ONE], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_LANG_CONFTEST([AC_LANG_SOURCE([[#include <]]m4_dquote([$1])[[>]])]) dnl AIX "xlc -E" and "cc -E" omit #line directives for header files dnl that contain only a #include of other header files and no dnl non-comment tokens of their own. This leads to a failure to dnl detect the absolute name of , , dnl and others. The workaround is to force preservation of comments dnl through option -C. This ensures all necessary #line directives dnl are present. GCC supports option -C as well. case "$host_os" in aix*) gl_absname_cpp="$ac_cpp -C" ;; *) gl_absname_cpp="$ac_cpp" ;; esac changequote(,) case "$host_os" in mingw* | windows*) dnl For the sake of native Windows compilers (excluding gcc), dnl treat backslash as a directory separator, like /. dnl Actually, these compilers use a double-backslash as dnl directory separator, inside the dnl # line "filename" dnl directives. gl_dirsep_regex='[/\\]' ;; *) gl_dirsep_regex='\/' ;; esac dnl A sed expression that turns a string into a basic regular dnl expression, for use within "/.../". gl_make_literal_regex_sed='s,[]$^\\.*/[],\\&,g' gl_header_literal_regex=`echo '$1' \ | sed -e "$gl_make_literal_regex_sed"` gl_absolute_header_sed="/${gl_dirsep_regex}${gl_header_literal_regex}/"'{ s/.*"\(.*'"${gl_dirsep_regex}${gl_header_literal_regex}"'\)".*/\1/ s|^/[^/]|//&| p q }' changequote([,]) dnl eval is necessary to expand gl_absname_cpp. dnl Ultrix and Pyramid sh refuse to redirect output of eval, dnl so use subshell. AS_VAR_SET([gl_cv_absolute_]AS_TR_SH([[$1]]), [`(eval "$gl_absname_cpp conftest.$ac_ext") 2>&AS_MESSAGE_LOG_FD | sed -n "$gl_absolute_header_sed"`]) ]) libffcall-2.5/gnulib-m4/extensions.m40000664000000000000000000002154414631432055014437 00000000000000# extensions.m4 # serial 25 -*- Autoconf -*- dnl Copyright (C) 2003, 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Enable extensions on systems that normally disable them. dnl Define to empty for the benefit of Autoconf 2.69 and earlier, so that dnl AC_USE_SYSTEM_EXTENSIONS (below) can be used unchanged from Autoconf 2.70+. m4_ifndef([AC_CHECK_INCLUDES_DEFAULT], [AC_DEFUN([AC_CHECK_INCLUDES_DEFAULT], [])]) # This definition of AC_USE_SYSTEM_EXTENSIONS is stolen from git # Autoconf. Perhaps we can remove this once we can assume Autoconf # is recent-enough everywhere, but since Autoconf mutates rapidly # enough in this area it's likely we'll need to redefine # AC_USE_SYSTEM_EXTENSIONS for quite some time. # If autoconf reports a warning # warning: AC_COMPILE_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS # or warning: AC_RUN_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS # the fix is # 1) to ensure that AC_USE_SYSTEM_EXTENSIONS is never directly invoked # but always AC_REQUIREd, # 2) to ensure that for each occurrence of # AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) # or # AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) # the corresponding gnulib module description has 'extensions' among # its dependencies. This will ensure that the gl_USE_SYSTEM_EXTENSIONS # invocation occurs in gl_EARLY, not in gl_INIT. m4_version_prereq([2.72], [], [ # AC_USE_SYSTEM_EXTENSIONS # ------------------------ # Enable extensions on systems that normally disable them, # typically due to standards-conformance issues. # We unconditionally define as many of the known feature-enabling # as possible, reserving conditional behavior for macros that are # known to cause problems on some platforms (such as __EXTENSIONS__). AC_DEFUN_ONCE([AC_USE_SYSTEM_EXTENSIONS], [AC_BEFORE([$0], [AC_PREPROC_IFELSE])dnl AC_BEFORE([$0], [AC_COMPILE_IFELSE])dnl AC_BEFORE([$0], [AC_LINK_IFELSE])dnl AC_BEFORE([$0], [AC_RUN_IFELSE])dnl AC_BEFORE([$0], [AC_CHECK_INCLUDES_DEFAULT])dnl dnl #undef in AH_VERBATIM gets replaced with #define by AC_DEFINE. dnl Use a different key than __EXTENSIONS__, as that name broke existing dnl configure.ac when using autoheader 2.62. dnl The macros below are in alphabetical order ignoring leading _ or __ dnl prefixes. AH_VERBATIM([USE_SYSTEM_EXTENSIONS], [/* Enable extensions on AIX 3, Interix. */ #ifndef _ALL_SOURCE # undef _ALL_SOURCE #endif /* Enable general extensions on macOS. */ #ifndef _DARWIN_C_SOURCE # undef _DARWIN_C_SOURCE #endif /* Enable general extensions on Solaris. */ #ifndef __EXTENSIONS__ # undef __EXTENSIONS__ #endif /* Enable GNU extensions on systems that have them. */ #ifndef _GNU_SOURCE # undef _GNU_SOURCE #endif /* Enable X/Open compliant socket functions that do not require linking with -lxnet on HP-UX 11.11. */ #ifndef _HPUX_ALT_XOPEN_SOCKET_API # undef _HPUX_ALT_XOPEN_SOCKET_API #endif /* Identify the host operating system as Minix. This macro does not affect the system headers' behavior. A future release of Autoconf may stop defining this macro. */ #ifndef _MINIX # undef _MINIX #endif /* Enable general extensions on NetBSD. Enable NetBSD compatibility extensions on Minix. */ #ifndef _NETBSD_SOURCE # undef _NETBSD_SOURCE #endif /* Enable OpenBSD compatibility extensions on NetBSD. Oddly enough, this does nothing on OpenBSD. */ #ifndef _OPENBSD_SOURCE # undef _OPENBSD_SOURCE #endif /* Define to 1 if needed for POSIX-compatible behavior. */ #ifndef _POSIX_SOURCE # undef _POSIX_SOURCE #endif /* Define to 2 if needed for POSIX-compatible behavior. */ #ifndef _POSIX_1_SOURCE # undef _POSIX_1_SOURCE #endif /* Enable POSIX-compatible threading on Solaris. */ #ifndef _POSIX_PTHREAD_SEMANTICS # undef _POSIX_PTHREAD_SEMANTICS #endif /* Enable extensions specified by ISO/IEC TS 18661-5:2014. */ #ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ # undef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-1:2014. */ #ifndef __STDC_WANT_IEC_60559_BFP_EXT__ # undef __STDC_WANT_IEC_60559_BFP_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-2:2015. */ #ifndef __STDC_WANT_IEC_60559_DFP_EXT__ # undef __STDC_WANT_IEC_60559_DFP_EXT__ #endif /* Enable extensions specified by C23 Annex F. */ #ifndef __STDC_WANT_IEC_60559_EXT__ # undef __STDC_WANT_IEC_60559_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-4:2015. */ #ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__ # undef __STDC_WANT_IEC_60559_FUNCS_EXT__ #endif /* Enable extensions specified by C23 Annex H and ISO/IEC TS 18661-3:2015. */ #ifndef __STDC_WANT_IEC_60559_TYPES_EXT__ # undef __STDC_WANT_IEC_60559_TYPES_EXT__ #endif /* Enable extensions specified by ISO/IEC TR 24731-2:2010. */ #ifndef __STDC_WANT_LIB_EXT2__ # undef __STDC_WANT_LIB_EXT2__ #endif /* Enable extensions specified by ISO/IEC 24747:2009. */ #ifndef __STDC_WANT_MATH_SPEC_FUNCS__ # undef __STDC_WANT_MATH_SPEC_FUNCS__ #endif /* Enable extensions on HP NonStop. */ #ifndef _TANDEM_SOURCE # undef _TANDEM_SOURCE #endif /* Enable X/Open extensions. Define to 500 only if necessary to make mbstate_t available. */ #ifndef _XOPEN_SOURCE # undef _XOPEN_SOURCE #endif ])dnl AC_REQUIRE([AC_CHECK_INCLUDES_DEFAULT])dnl _AC_CHECK_HEADER_ONCE([wchar.h]) _AC_CHECK_HEADER_ONCE([minix/config.h]) dnl Defining __EXTENSIONS__ may break the system headers on some systems. dnl (FIXME: Which ones?) AC_CACHE_CHECK([whether it is safe to define __EXTENSIONS__], [ac_cv_safe_to_define___extensions__], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ # define __EXTENSIONS__ 1 ]AC_INCLUDES_DEFAULT])], [ac_cv_safe_to_define___extensions__=yes], [ac_cv_safe_to_define___extensions__=no])]) dnl HP-UX 11.11 defines mbstate_t only if _XOPEN_SOURCE is defined to dnl 500, regardless of whether compiling with -Ae or -D_HPUX_SOURCE=1. dnl But defining _XOPEN_SOURCE may turn *off* extensions on platforms dnl not covered by turn-on-extensions macros (notably Dragonfly, Free, dnl and OpenBSD, which don't have any equivalent of _NETBSD_SOURCE) so dnl it should only be defined when necessary. AC_CACHE_CHECK([whether _XOPEN_SOURCE should be defined], [ac_cv_should_define__xopen_source], [ac_cv_should_define__xopen_source=no AS_IF([test $ac_cv_header_wchar_h = yes], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ #include mbstate_t x;]])], [], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ #define _XOPEN_SOURCE 500 #include mbstate_t x;]])], [ac_cv_should_define__xopen_source=yes])])])]) AC_DEFINE([_ALL_SOURCE]) AC_DEFINE([_DARWIN_C_SOURCE]) AC_DEFINE([_GNU_SOURCE]) AC_DEFINE([_HPUX_ALT_XOPEN_SOCKET_API]) AC_DEFINE([_NETBSD_SOURCE]) AC_DEFINE([_OPENBSD_SOURCE]) AC_DEFINE([_POSIX_PTHREAD_SEMANTICS]) AC_DEFINE([__STDC_WANT_IEC_60559_ATTRIBS_EXT__]) AC_DEFINE([__STDC_WANT_IEC_60559_BFP_EXT__]) AC_DEFINE([__STDC_WANT_IEC_60559_DFP_EXT__]) AC_DEFINE([__STDC_WANT_IEC_60559_EXT__]) AC_DEFINE([__STDC_WANT_IEC_60559_FUNCS_EXT__]) AC_DEFINE([__STDC_WANT_IEC_60559_TYPES_EXT__]) AC_DEFINE([__STDC_WANT_LIB_EXT2__]) AC_DEFINE([__STDC_WANT_MATH_SPEC_FUNCS__]) AC_DEFINE([_TANDEM_SOURCE]) AS_IF([test $ac_cv_header_minix_config_h = yes], [MINIX=yes AC_DEFINE([_MINIX]) AC_DEFINE([_POSIX_SOURCE]) AC_DEFINE([_POSIX_1_SOURCE], [2])], [MINIX=]) AS_IF([test $ac_cv_safe_to_define___extensions__ = yes], [AC_DEFINE([__EXTENSIONS__])]) AS_IF([test $ac_cv_should_define__xopen_source = yes], [AC_DEFINE([_XOPEN_SOURCE], [500])]) ])# AC_USE_SYSTEM_EXTENSIONS ]) # gl_USE_SYSTEM_EXTENSIONS # ------------------------ # Enable extensions on systems that normally disable them, # typically due to standards-conformance issues. AC_DEFUN_ONCE([gl_USE_SYSTEM_EXTENSIONS], [ AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) dnl On OpenBSD 6.8 with GCC, the include files contain a couple of dnl definitions that are only activated with an explicit -D_ISOC11_SOURCE. dnl That's because this version of GCC (4.2.1) supports the option dnl '-std=gnu99' but not the option '-std=gnu11'. AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_os" in openbsd*) AC_DEFINE([_ISOC11_SOURCE], [1], [Define to enable the declarations of ISO C 11 types and functions.]) ;; esac dnl On OpenSolaris derivatives, the include files contains a couple of dnl declarations that are only activated with an explicit dnl -D__STDC_WANT_LIB_EXT1__. AH_VERBATIM([USE_ISO_C_23_ANNEX_K_EXTENSIONS], [/* Define to enable the declarations of ISO C 23 Annex K types and functions. */ #if !(defined __STDC_WANT_LIB_EXT1__ && __STDC_WANT_LIB_EXT1__) #undef/**/__STDC_WANT_LIB_EXT1__ #define __STDC_WANT_LIB_EXT1__ 1 #endif ]) ]) libffcall-2.5/gnulib-m4/nocrash.m40000664000000000000000000001055714631432055013677 00000000000000# nocrash.m4 # serial 5 dnl Copyright (C) 2005, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Based on libsigsegv, from Bruno Haible and Paolo Bonzini. AC_PREREQ([2.13]) dnl Expands to some code for use in .c programs that will cause the configure dnl test to exit instead of crashing. This is useful to avoid triggering dnl action from a background debugger and to avoid core dumps. dnl Usage: ... dnl ]GL_NOCRASH[ dnl ... dnl int main() { nocrash_init(); ... } AC_DEFUN([GL_NOCRASH],[[ #include #if defined __MACH__ && defined __APPLE__ /* Avoid a crash on Mac OS X. */ #include #include #include #include #include #include /* The exception port on which our thread listens. */ static mach_port_t our_exception_port; /* The main function of the thread listening for exceptions of type EXC_BAD_ACCESS. */ static void * mach_exception_thread (void *arg) { /* Buffer for a message to be received. */ struct { mach_msg_header_t head; mach_msg_body_t msgh_body; char data[1024]; } msg; mach_msg_return_t retval; /* Wait for a message on the exception port. */ retval = mach_msg (&msg.head, MACH_RCV_MSG | MACH_RCV_LARGE, 0, sizeof (msg), our_exception_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL); if (retval != MACH_MSG_SUCCESS) abort (); exit (1); } static void nocrash_init (void) { mach_port_t self = mach_task_self (); /* Allocate a port on which the thread shall listen for exceptions. */ if (mach_port_allocate (self, MACH_PORT_RIGHT_RECEIVE, &our_exception_port) == KERN_SUCCESS) { /* See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/mach_port_insert_right.html. */ if (mach_port_insert_right (self, our_exception_port, our_exception_port, MACH_MSG_TYPE_MAKE_SEND) == KERN_SUCCESS) { /* The exceptions we want to catch. Only EXC_BAD_ACCESS is interesting for us. */ exception_mask_t mask = EXC_MASK_BAD_ACCESS; /* Create the thread listening on the exception port. */ pthread_attr_t attr; pthread_t thread; if (pthread_attr_init (&attr) == 0 && pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED) == 0 && pthread_create (&thread, &attr, mach_exception_thread, NULL) == 0) { pthread_attr_destroy (&attr); /* Replace the exception port info for these exceptions with our own. Note that we replace the exception port for the entire task, not only for a particular thread. This has the effect that when our exception port gets the message, the thread specific exception port has already been asked, and we don't need to bother about it. See https://web.mit.edu/darwin/src/modules/xnu/osfmk/man/task_set_exception_ports.html. */ task_set_exception_ports (self, mask, our_exception_port, EXCEPTION_DEFAULT, MACHINE_THREAD_STATE); } } } } #elif defined _WIN32 && ! defined __CYGWIN__ /* Avoid a crash on native Windows. */ #define WIN32_LEAN_AND_MEAN #include #include static LONG WINAPI exception_filter (EXCEPTION_POINTERS *ExceptionInfo) { switch (ExceptionInfo->ExceptionRecord->ExceptionCode) { case EXCEPTION_ACCESS_VIOLATION: case EXCEPTION_IN_PAGE_ERROR: case EXCEPTION_STACK_OVERFLOW: case EXCEPTION_GUARD_PAGE: case EXCEPTION_PRIV_INSTRUCTION: case EXCEPTION_ILLEGAL_INSTRUCTION: case EXCEPTION_DATATYPE_MISALIGNMENT: case EXCEPTION_ARRAY_BOUNDS_EXCEEDED: case EXCEPTION_NONCONTINUABLE_EXCEPTION: exit (1); } return EXCEPTION_CONTINUE_SEARCH; } static void nocrash_init (void) { SetUnhandledExceptionFilter ((LPTOP_LEVEL_EXCEPTION_FILTER) exception_filter); } #else /* Avoid a crash on POSIX systems. */ #include #include /* A POSIX signal handler. */ static void exception_handler (int sig) { _exit (1); } static void nocrash_init (void) { #ifdef SIGSEGV signal (SIGSEGV, exception_handler); #endif #ifdef SIGBUS signal (SIGBUS, exception_handler); #endif } #endif ]]) libffcall-2.5/gnulib-m4/getpagesize.m40000664000000000000000000000277714663230755014566 00000000000000# getpagesize.m4 # serial 11 dnl Copyright (C) 2002, 2004-2005, 2007, 2009-2024 Free Software Foundation, dnl Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_GETPAGESIZE], [ AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) gl_CHECK_FUNC_GETPAGESIZE if test $gl_cv_func_getpagesize = no; then HAVE_GETPAGESIZE=0 AC_CHECK_HEADERS([OS.h]) if test $ac_cv_header_OS_h = yes; then HAVE_OS_H=1 fi AC_CHECK_HEADERS([sys/param.h]) if test $ac_cv_header_sys_param_h = yes; then HAVE_SYS_PARAM_H=1 fi fi case "$host_os" in mingw* | windows*) REPLACE_GETPAGESIZE=1 ;; esac dnl Also check whether it's declared. dnl mingw has getpagesize() in libgcc.a but doesn't declare it. AC_CHECK_DECL([getpagesize], , [HAVE_DECL_GETPAGESIZE=0]) ]) dnl Tests whether the function getpagesize() exists. dnl Sets gl_cv_func_getpagesize. AC_DEFUN([gl_CHECK_FUNC_GETPAGESIZE], [ dnl We can't use AC_CHECK_FUNC here, because getpagesize() is defined as a dnl static inline function when compiling for Android 4.4 or older. AC_CACHE_CHECK([for getpagesize], [gl_cv_func_getpagesize], [AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[return getpagesize();]]) ], [gl_cv_func_getpagesize=yes], [gl_cv_func_getpagesize=no]) ]) ]) libffcall-2.5/gnulib-m4/asm-underscore.m40000664000000000000000000000527214631432055015167 00000000000000# asm-underscore.m4 # serial 5 dnl Copyright (C) 2010-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. Based on as-underscore.m4 in GNU clisp. # gl_ASM_SYMBOL_PREFIX # Tests for the prefix of C symbols at the assembly language level and the # linker level. This prefix is either an underscore or empty. Defines the # C macro USER_LABEL_PREFIX to this prefix, and sets ASM_SYMBOL_PREFIX to # a stringified variant of this prefix. AC_DEFUN([gl_ASM_SYMBOL_PREFIX], [ AC_REQUIRE([AC_PROG_EGREP]) dnl We don't use GCC's __USER_LABEL_PREFIX__ here, because dnl 1. It works only for GCC. dnl 2. It is incorrectly defined on some platforms, in some GCC versions. AC_REQUIRE([gl_C_ASM]) AC_CACHE_CHECK( [whether C symbols are prefixed with underscore at the linker level], [gl_cv_prog_as_underscore], [cat > conftest.c </dev/null 2>&1 if LC_ALL=C $EGREP '(^|[[^a-zA-Z0-9_]])_foo([[^a-zA-Z0-9_]]|$)' conftest.$gl_asmext >/dev/null; then gl_cv_prog_as_underscore=yes else gl_cv_prog_as_underscore=no fi rm -f conftest* ]) if test $gl_cv_prog_as_underscore = yes; then USER_LABEL_PREFIX=_ else USER_LABEL_PREFIX= fi AC_DEFINE_UNQUOTED([USER_LABEL_PREFIX], [$USER_LABEL_PREFIX], [Define to the prefix of C symbols at the assembler and linker level, either an underscore or empty.]) ASM_SYMBOL_PREFIX='"'${USER_LABEL_PREFIX}'"' AC_SUBST([ASM_SYMBOL_PREFIX]) ]) # gl_C_ASM # Determines how to produce an assembly language file from C source code. # Sets the variables: # gl_asmext - the extension of assembly language output, # gl_c_asm_opt - the C compiler option that produces assembly language output. AC_DEFUN([gl_C_ASM], [ AC_EGREP_CPP([MicrosoftCompiler], [ #ifdef _MSC_VER MicrosoftCompiler #endif ], [dnl Microsoft's 'cl' and 'clang-cl' produce an .asm file, whereas 'clang' dnl produces a .s file. Need to distinguish 'clang' and 'clang-cl'. rm -f conftest* echo 'int dummy;' > conftest.c AC_TRY_COMMAND(${CC-cc} $CFLAGS $CPPFLAGS -c conftest.c) >/dev/null 2>&1 if test -f conftest.o; then gl_asmext='s' gl_c_asm_opt='-S' else gl_asmext='asm' gl_c_asm_opt='-c -Fa' fi rm -f conftest* ], [gl_asmext='s' gl_c_asm_opt='-S' ]) ]) libffcall-2.5/gnulib-m4/warn-on-use.m40000664000000000000000000000552714631432055014416 00000000000000# warn-on-use.m4 # serial 11 dnl Copyright (C) 2010-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # gl_WARN_ON_USE_PREPARE(INCLUDES, NAMES) # --------------------------------------- # If the module 'posixcheck' is in use: # # For each whitespace-separated element in the list of NAMES, define # HAVE_RAW_DECL_name if the function has a declaration among INCLUDES # even after being undefined as a macro. # # See warn-on-use.h for some hints on how to poison function names, as # well as ideas on poisoning global variables and macros. NAMES may # include global variables, but remember that only functions work with # _GL_WARN_ON_USE. Typically, INCLUDES only needs to list a single # header, but if the replacement header pulls in other headers because # some systems declare functions in the wrong header, then INCLUDES # should do likewise. # # It is generally safe to assume declarations for functions declared # in the intersection of C89 and C11 (such as printf) without # needing gl_WARN_ON_USE_PREPARE. AC_DEFUN([gl_WARN_ON_USE_PREPARE], [ m4_ifdef([gl_POSIXCHECK], [m4_foreach_w([gl_decl], [$2], [AH_TEMPLATE([HAVE_RAW_DECL_]AS_TR_CPP(m4_defn([gl_decl])), [Define to 1 if ]m4_defn([gl_decl])[ is declared even after undefining macros.])])dnl for gl_func in m4_flatten([$2]); do AS_VAR_PUSHDEF([gl_Symbol], [gl_cv_have_raw_decl_$gl_func])dnl dnl As a workaround to implicit built-in function declarations in dnl clang (e.g. strndup), reference ac_compile_for_check_decl instead dnl of ac_compile. If, for whatever reason, the override of AC_PROG_CC dnl in zzgnulib.m4 is inactive, use the original ac_compile. ac_saved_ac_compile="$ac_compile" if test -n "$ac_compile_for_check_decl"; then ac_compile="$ac_compile_for_check_decl" fi AC_CACHE_CHECK([whether $gl_func is declared without a macro], [gl_Symbol], [AC_COMPILE_IFELSE([AC_LANG_PROGRAM([$1], [[#undef $gl_func (void) $gl_func;]])], [AS_VAR_SET([gl_Symbol], [yes])], [AS_VAR_SET([gl_Symbol], [no])])]) ac_compile="$ac_saved_ac_compile" AS_VAR_IF([gl_Symbol], [yes], [AC_DEFINE_UNQUOTED(AS_TR_CPP([HAVE_RAW_DECL_$gl_func]), [1]) dnl Shortcut for an AC_CHECK_DECL invocation that may come later: dnl If the raw declaration exists with the given includes, then dnl AC_CHECK_DECL with its many includes would see it as well. dnl So, set a cache variable to allow skipping any later dnl AC_CHECK_DECL invocation for $gl_func. eval "ac_cv_have_decl_$gl_func=yes" ]) AS_VAR_POPDEF([gl_Symbol])dnl done ]) ]) libffcall-2.5/gnulib-m4/pid_t.m40000664000000000000000000000261214631432055013332 00000000000000# pid_t.m4 # serial 4 dnl Copyright (C) 2020-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # The following implementation works around a problem in autoconf <= 2.69. m4_version_prereq([2.70], [], [ dnl Define pid_t if the headers don't define it. AC_DEFUN([AC_TYPE_PID_T], [ AC_CHECK_TYPE([pid_t], [], [dnl On 64-bit native Windows, define it to the equivalent of 'intptr_t' dnl (= 'long long' = '__int64'), because that is the return type dnl of the _spawnv* functions dnl dnl and the argument type of the _cwait function dnl . dnl Otherwise (on 32-bit Windows and on old Unix platforms), define it dnl to 'int'. AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ #if defined _WIN64 && !defined __CYGWIN__ LLP64 #endif ]]) ], [gl_pid_type='int'], [gl_pid_type='__int64']) AC_DEFINE_UNQUOTED([pid_t], [$gl_pid_type], [Define as a signed integer type capable of holding a process identifier.]) ], [AC_INCLUDES_DEFAULT]) ]) ])# m4_version_prereq 2.70 libffcall-2.5/gnulib-m4/fcntl.m40000664000000000000000000001217514631432055013346 00000000000000# fcntl.m4 # serial 12 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # For now, this module ensures that fcntl() # - supports F_DUPFD correctly # - supports or emulates F_DUPFD_CLOEXEC # - supports F_GETFD # Still to be ported to mingw: # - F_SETFD # - F_GETFL, F_SETFL # - F_GETOWN, F_SETOWN # - F_GETLK, F_SETLK, F_SETLKW AC_DEFUN([gl_FUNC_FCNTL], [ dnl Persuade glibc to expose F_DUPFD_CLOEXEC. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) AC_REQUIRE([gl_FCNTL_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_CHECK_FUNCS_ONCE([fcntl]) if test $ac_cv_func_fcntl = no; then gl_REPLACE_FCNTL else dnl cygwin 1.5.x F_DUPFD has wrong errno, and allows negative target dnl haiku alpha 2 F_DUPFD has wrong errno AC_CACHE_CHECK([whether fcntl handles F_DUPFD correctly], [gl_cv_func_fcntl_f_dupfd_works], [AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include #include #include #include #include ]GL_MDA_DEFINES[ #ifndef RLIM_SAVED_CUR # define RLIM_SAVED_CUR RLIM_INFINITY #endif #ifndef RLIM_SAVED_MAX # define RLIM_SAVED_MAX RLIM_INFINITY #endif ]], [[int result = 0; int bad_fd = INT_MAX; struct rlimit rlim; if (getrlimit (RLIMIT_NOFILE, &rlim) == 0 && 0 <= rlim.rlim_cur && rlim.rlim_cur <= INT_MAX && rlim.rlim_cur != RLIM_INFINITY && rlim.rlim_cur != RLIM_SAVED_MAX && rlim.rlim_cur != RLIM_SAVED_CUR) bad_fd = rlim.rlim_cur; if (fcntl (0, F_DUPFD, -1) != -1) result |= 1; if (errno != EINVAL) result |= 2; if (fcntl (0, F_DUPFD, bad_fd) != -1) result |= 4; if (errno != EINVAL) result |= 8; /* On OS/2 kLIBC, F_DUPFD does not work on a directory fd */ { int fd; fd = open (".", O_RDONLY); if (fd == -1) result |= 16; else if (fcntl (fd, F_DUPFD, STDERR_FILENO + 1) == -1) result |= 32; close (fd); } return result;]])], [gl_cv_func_fcntl_f_dupfd_works=yes], [gl_cv_func_fcntl_f_dupfd_works=no], [case $host_os in aix* | cygwin* | haiku*) gl_cv_func_fcntl_f_dupfd_works="guessing no" ;; *) gl_cv_func_fcntl_f_dupfd_works="guessing yes" ;; esac])]) case $gl_cv_func_fcntl_f_dupfd_works in *yes) ;; *) gl_REPLACE_FCNTL AC_DEFINE([FCNTL_DUPFD_BUGGY], [1], [Define this to 1 if F_DUPFD behavior does not match POSIX]) ;; esac dnl Many systems lack F_DUPFD_CLOEXEC. dnl NetBSD 10.0 declares F_DUPFD_CLOEXEC but it works only like F_DUPFD. AC_CACHE_CHECK([whether fcntl understands F_DUPFD_CLOEXEC], [gl_cv_func_fcntl_f_dupfd_cloexec], [AC_RUN_IFELSE( [AC_LANG_SOURCE( [[#include #include int main (int argc, char *argv[]) { if (argc == 1) /* parent process */ { if (fcntl (1, F_DUPFD_CLOEXEC, 10) < 0) return 1; return execl ("./conftest", "./conftest", "child", NULL); } else /* child process */ return (fcntl (10, F_GETFL) < 0 ? 0 : 42); } ]]) ], [AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[ #ifdef __linux__ /* The Linux kernel only added F_DUPFD_CLOEXEC in 2.6.24, so we always replace it to support the semantics on older kernels that failed with EINVAL. */ choke me #endif ]])], [gl_cv_func_fcntl_f_dupfd_cloexec=yes], [gl_cv_func_fcntl_f_dupfd_cloexec="needs runtime check"]) ], [gl_cv_func_fcntl_f_dupfd_cloexec=no], [case "$host_os" in # Guess no on NetBSD. netbsd*) gl_cv_func_fcntl_f_dupfd_cloexec="guessing no" ;; *) gl_cv_func_fcntl_f_dupfd_cloexec="$gl_cross_guess_normal" ;; esac ]) ]) case "$gl_cv_func_fcntl_f_dupfd_cloexec" in *yes) ;; *) gl_REPLACE_FCNTL dnl No witness macro needed for this bug. ;; esac fi dnl Replace fcntl() for supporting the gnulib-defined fchdir() function, dnl to keep fchdir's bookkeeping up-to-date. m4_ifdef([gl_FUNC_FCHDIR], [ gl_TEST_FCHDIR if test $HAVE_FCHDIR = 0; then gl_REPLACE_FCNTL fi ]) ]) AC_DEFUN([gl_REPLACE_FCNTL], [ AC_REQUIRE([gl_FCNTL_H_DEFAULTS]) AC_CHECK_FUNCS_ONCE([fcntl]) if test $ac_cv_func_fcntl = no; then HAVE_FCNTL=0 else REPLACE_FCNTL=1 fi ]) libffcall-2.5/gnulib-m4/sigaction.m40000664000000000000000000000232714631432055014216 00000000000000# sigaction.m4 # serial 7 dnl Copyright (C) 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Determine if sigaction interface is present. AC_DEFUN([gl_SIGACTION], [ AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) AC_CHECK_FUNCS_ONCE([sigaction]) if test $ac_cv_func_sigaction = yes; then AC_CHECK_MEMBERS([struct sigaction.sa_sigaction], , , [[#include ]]) if test $ac_cv_member_struct_sigaction_sa_sigaction = no; then HAVE_STRUCT_SIGACTION_SA_SIGACTION=0 fi else HAVE_SIGACTION=0 fi ]) # Prerequisites of the part of lib/signal.in.h and of lib/sigaction.c. AC_DEFUN([gl_PREREQ_SIGACTION], [ AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) AC_REQUIRE([AC_C_RESTRICT]) AC_REQUIRE([AC_TYPE_UID_T]) AC_REQUIRE([gl_PREREQ_SIG_HANDLER_H]) AC_CHECK_FUNCS_ONCE([sigaltstack siginterrupt]) AC_CHECK_TYPES([siginfo_t], [], [], [[ #include ]]) if test $ac_cv_type_siginfo_t = no; then HAVE_SIGINFO_T=0 fi ]) # Prerequisites of lib/sig-handler.h. AC_DEFUN([gl_PREREQ_SIG_HANDLER_H], [:]) libffcall-2.5/gnulib-m4/extern-inline.m40000664000000000000000000001313014631432055015011 00000000000000# extern-inline.m4 # serial 1 dnl Copyright 2012-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl 'extern inline' a la ISO C99. AC_DEFUN([gl_EXTERN_INLINE], [ AC_CACHE_CHECK([whether ctype.h defines __header_inline], [gl_cv_have___header_inline], [AC_PREPROC_IFELSE( [AC_LANG_SOURCE([[#include #ifndef __header_inline #error " does not define __header_inline" #endif ]])], [gl_cv_have___header_inline=yes], [gl_cv_have___header_inline=no])]) if test "$gl_cv_have___header_inline" = yes; then AC_DEFINE([HAVE___HEADER_INLINE], [1], [Define to 1 if ctype.h defines __header_inline.]) fi AH_VERBATIM([HAVE___HEADER_INLINE_1], [/* Please see the Gnulib manual for how to use these macros. Suppress extern inline with HP-UX cc, as it appears to be broken; see . Suppress extern inline with Sun C in standards-conformance mode, as it mishandles inline functions that call each other. E.g., for 'inline void f (void) { } inline void g (void) { f (); }', c99 incorrectly complains 'reference to static identifier "f" in extern inline function'. This bug was observed with Oracle Developer Studio 12.6 (Sun C 5.15 SunOS_sparc 2017/05/30). Suppress extern inline (with or without __attribute__ ((__gnu_inline__))) on configurations that mistakenly use 'static inline' to implement functions or macros in standard C headers like . For example, if isdigit is mistakenly implemented via a static inline function, a program containing an extern inline function that calls isdigit may not work since the C standard prohibits extern inline functions from calling static functions (ISO C 99 section 6.7.4.(3). This bug is known to occur on: OS X 10.8 and earlier; see: https://lists.gnu.org/r/bug-gnulib/2012-12/msg00023.html DragonFly; see http://muscles.dragonflybsd.org/bulk/clang-master-potential/20141111_102002/logs/ah-tty-0.3.12.log FreeBSD; see: https://lists.gnu.org/r/bug-gnulib/2014-07/msg00104.html OS X 10.9 has a macro __header_inline indicating the bug is fixed for C and for clang but remains for g++; see . Assume DragonFly and FreeBSD will be similar. GCC 4.3 and above with -std=c99 or -std=gnu99 implements ISO C99 inline semantics, unless -fgnu89-inline is used. It defines a macro __GNUC_STDC_INLINE__ to indicate this situation or a macro __GNUC_GNU_INLINE__ to indicate the opposite situation. GCC 4.2 with -std=c99 or -std=gnu99 implements the GNU C inline semantics but warns, unless -fgnu89-inline is used: warning: C99 inline functions are not supported; using GNU89 warning: to disable this warning use -fgnu89-inline or the gnu_inline function attribute It defines a macro __GNUC_GNU_INLINE__ to indicate this situation. */ #if (((defined __APPLE__ && defined __MACH__) \ || defined __DragonFly__ || defined __FreeBSD__) \ && (defined HAVE___HEADER_INLINE \ ? (defined __cplusplus && defined __GNUC_STDC_INLINE__ \ && ! defined __clang__) \ : ((! defined _DONT_USE_CTYPE_INLINE_ \ && (defined __GNUC__ || defined __cplusplus)) \ || (defined _FORTIFY_SOURCE && 0 < _FORTIFY_SOURCE \ && defined __GNUC__ && ! defined __cplusplus)))) # define _GL_EXTERN_INLINE_STDHEADER_BUG #endif #if ((__GNUC__ \ ? (defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ \ && !defined __PCC__) \ : (199901L <= __STDC_VERSION__ \ && !defined __HP_cc \ && !defined __PGI \ && !(defined __SUNPRO_C && __STDC__))) \ && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) # define _GL_INLINE inline # define _GL_EXTERN_INLINE extern inline # define _GL_EXTERN_INLINE_IN_USE #elif (2 < __GNUC__ + (7 <= __GNUC_MINOR__) && !defined __STRICT_ANSI__ \ && !defined __PCC__ \ && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) # if defined __GNUC_GNU_INLINE__ && __GNUC_GNU_INLINE__ /* __gnu_inline__ suppresses a GCC 4.2 diagnostic. */ # define _GL_INLINE extern inline __attribute__ ((__gnu_inline__)) # else # define _GL_INLINE extern inline # endif # define _GL_EXTERN_INLINE extern # define _GL_EXTERN_INLINE_IN_USE #else # define _GL_INLINE _GL_UNUSED static # define _GL_EXTERN_INLINE _GL_UNUSED static #endif /* In GCC 4.6 (inclusive) to 5.1 (exclusive), suppress bogus "no previous prototype for 'FOO'" and "no previous declaration for 'FOO'" diagnostics, when FOO is an inline function in the header; see and . */ #if __GNUC__ == 4 && 6 <= __GNUC_MINOR__ # if defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ # define _GL_INLINE_HEADER_CONST_PRAGMA # else # define _GL_INLINE_HEADER_CONST_PRAGMA \ _Pragma ("GCC diagnostic ignored \"-Wsuggest-attribute=const\"") # endif # define _GL_INLINE_HEADER_BEGIN \ _Pragma ("GCC diagnostic push") \ _Pragma ("GCC diagnostic ignored \"-Wmissing-prototypes\"") \ _Pragma ("GCC diagnostic ignored \"-Wmissing-declarations\"") \ _GL_INLINE_HEADER_CONST_PRAGMA # define _GL_INLINE_HEADER_END \ _Pragma ("GCC diagnostic pop") #else # define _GL_INLINE_HEADER_BEGIN # define _GL_INLINE_HEADER_END #endif]) ]) libffcall-2.5/gnulib-m4/dup2.m40000664000000000000000000000726414631432055013115 00000000000000# dup2.m4 # serial 28 dnl Copyright (C) 2002, 2005, 2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_DUP2], [ AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_CACHE_CHECK([whether dup2 works], [gl_cv_func_dup2_works], [AC_RUN_IFELSE([ AC_LANG_PROGRAM( [[#include #include #include #include #include ]GL_MDA_DEFINES[ #ifndef RLIM_SAVED_CUR # define RLIM_SAVED_CUR RLIM_INFINITY #endif #ifndef RLIM_SAVED_MAX # define RLIM_SAVED_MAX RLIM_INFINITY #endif ]], [[int result = 0; int bad_fd = INT_MAX; struct rlimit rlim; if (getrlimit (RLIMIT_NOFILE, &rlim) == 0 && 0 <= rlim.rlim_cur && rlim.rlim_cur <= INT_MAX && rlim.rlim_cur != RLIM_INFINITY && rlim.rlim_cur != RLIM_SAVED_MAX && rlim.rlim_cur != RLIM_SAVED_CUR) bad_fd = rlim.rlim_cur; #ifdef FD_CLOEXEC if (fcntl (1, F_SETFD, FD_CLOEXEC) == -1) result |= 1; #endif if (dup2 (1, 1) != 1) result |= 2; #ifdef FD_CLOEXEC if (fcntl (1, F_GETFD) != FD_CLOEXEC) result |= 4; #endif close (0); if (dup2 (0, 0) != -1) result |= 8; /* Many gnulib modules require POSIX conformance of EBADF. */ if (dup2 (2, bad_fd) == -1 && errno != EBADF) result |= 16; /* Flush out some cygwin core dumps. */ if (dup2 (2, -1) != -1 || errno != EBADF) result |= 32; dup2 (2, 255); dup2 (2, 256); /* On OS/2 kLIBC, dup2() does not work on a directory fd. */ { int fd = open (".", O_RDONLY); if (fd == -1) result |= 64; else if (dup2 (fd, fd + 1) == -1) result |= 128; close (fd); } return result;]]) ], [gl_cv_func_dup2_works=yes], [gl_cv_func_dup2_works=no], [case "$host_os" in mingw* | windows*) # on this platform, dup2 always returns 0 for success gl_cv_func_dup2_works="guessing no" ;; cygwin*) # on cygwin 1.5.x, dup2(1,1) returns 0 gl_cv_func_dup2_works="guessing no" ;; aix* | freebsd*) # on AIX 7.1 and FreeBSD 6.1, dup2 (1,toobig) gives EMFILE, # not EBADF. gl_cv_func_dup2_works="guessing no" ;; haiku*) # on Haiku alpha 2, dup2(1, 1) resets FD_CLOEXEC. gl_cv_func_dup2_works="guessing no" ;; *-android*) # implemented using dup3(), which fails if oldfd == newfd gl_cv_func_dup2_works="guessing no" ;; os2*) # on OS/2 kLIBC, dup2() does not work on a directory fd. gl_cv_func_dup2_works="guessing no" ;; *) gl_cv_func_dup2_works="guessing yes" ;; esac]) ]) case "$gl_cv_func_dup2_works" in *yes) ;; *) REPLACE_DUP2=1 AC_CHECK_FUNCS([setdtablesize]) ;; esac dnl Replace dup2() for supporting the gnulib-defined fchdir() function, dnl to keep fchdir's bookkeeping up-to-date. m4_ifdef([gl_FUNC_FCHDIR], [ gl_TEST_FCHDIR if test $HAVE_FCHDIR = 0; then REPLACE_DUP2=1 fi ]) ]) # Prerequisites of lib/dup2.c. AC_DEFUN([gl_PREREQ_DUP2], []) libffcall-2.5/gnulib-m4/strerror.m40000664000000000000000000000731314631432055014120 00000000000000# strerror.m4 # serial 25 dnl Copyright (C) 2002, 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_STRERROR], [ AC_REQUIRE([gl_STRING_H_DEFAULTS]) AC_REQUIRE([gl_HEADER_ERRNO_H]) AC_REQUIRE([gl_FUNC_STRERROR_0]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles m4_ifdef([gl_FUNC_STRERROR_R_WORKS], [ AC_REQUIRE([gl_FUNC_STRERROR_R_WORKS]) ]) if test "$GL_GENERATE_ERRNO_H:$REPLACE_STRERROR_0" = false:0; then AC_CACHE_CHECK([for working strerror function], [gl_cv_func_working_strerror], [AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[if (!*strerror (-2)) return 1;]])], [gl_cv_func_working_strerror=yes], [gl_cv_func_working_strerror=no], [case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_working_strerror="guessing yes" ;; # Guess yes on musl systems. *-musl* | midipix*) gl_cv_func_working_strerror="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_working_strerror="$gl_cross_guess_normal" ;; esac ]) ]) case "$gl_cv_func_working_strerror" in *yes) ;; *) dnl The system's strerror() fails to return a string for out-of-range dnl integers. Replace it. REPLACE_STRERROR=1 ;; esac m4_ifdef([gl_FUNC_STRERROR_R_WORKS], [ dnl If the system's strerror_r or __xpg_strerror_r clobbers strerror's dnl buffer, we must replace strerror. case "$gl_cv_func_strerror_r_works" in *no) REPLACE_STRERROR=1 ;; esac ]) else dnl The system's strerror() cannot know about the new errno values we add dnl to , or any fix for strerror(0). Replace it. REPLACE_STRERROR=1 fi ]) dnl Detect if strerror(0) passes (that is, does not set errno, and does not dnl return a string that matches strerror(-1)). AC_DEFUN([gl_FUNC_STRERROR_0], [ AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles REPLACE_STRERROR_0=0 AC_CACHE_CHECK([whether strerror(0) succeeds], [gl_cv_func_strerror_0_works], [AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include #include ]], [[int result = 0; char *str; errno = 0; str = strerror (0); if (!*str) result |= 1; if (errno) result |= 2; if (strstr (str, "nknown") || strstr (str, "ndefined")) result |= 4; return result;]])], [gl_cv_func_strerror_0_works=yes], [gl_cv_func_strerror_0_works=no], [case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_strerror_0_works="guessing yes" ;; # Guess yes on musl systems. *-musl* | midipix*) gl_cv_func_strerror_0_works="guessing yes" ;; # Guess yes on native Windows. mingw* | windows*) gl_cv_func_strerror_0_works="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_strerror_0_works="$gl_cross_guess_normal" ;; esac ]) ]) case "$gl_cv_func_strerror_0_works" in *yes) ;; *) REPLACE_STRERROR_0=1 AC_DEFINE([REPLACE_STRERROR_0], [1], [Define to 1 if strerror(0) does not return a message implying success.]) ;; esac ]) libffcall-2.5/gnulib-m4/assert_h.m40000664000000000000000000000522214631432055014043 00000000000000# assert_h.m4 # serial 1 dnl Copyright (C) 2011-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Paul Eggert. AC_DEFUN([gl_ASSERT_H], [ AC_CACHE_CHECK([for static_assert], [gl_cv_static_assert], [gl_saved_CFLAGS=$CFLAGS for gl_working in "yes, a keyword" "yes, an macro"; do AS_CASE([$gl_working], [*assert.h*], [CFLAGS="$gl_saved_CFLAGS -DINCLUDE_ASSERT_H"]) AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#if defined __clang__ && __STDC_VERSION__ < 202311 #pragma clang diagnostic error "-Wc2x-extensions" #pragma clang diagnostic error "-Wc++1z-extensions" #endif #ifdef INCLUDE_ASSERT_H #include #endif static_assert (2 + 2 == 4, "arithmetic does not work"); static_assert (2 + 2 == 4); ]], [[ static_assert (sizeof (char) == 1, "sizeof does not work"); static_assert (sizeof (char) == 1); ]])], [gl_cv_static_assert=$gl_working], [gl_cv_static_assert=no]) CFLAGS=$gl_saved_CFLAGS test "$gl_cv_static_assert" != no && break done]) GL_GENERATE_ASSERT_H=false AS_CASE([$gl_cv_static_assert], [yes*keyword*], [AC_DEFINE([HAVE_C_STATIC_ASSERT], [1], [Define to 1 if the static_assert keyword works.])], [no], [GL_GENERATE_ASSERT_H=true gl_NEXT_HEADERS([assert.h])]) dnl The "zz" puts this toward config.h's end, to avoid potential dnl collisions with other definitions. dnl #undef assert so that programs are not tempted to use it without dnl specifically including assert.h. dnl #undef __ASSERT_H__ so that on IRIX, when programs later include dnl , this include actually defines assert. dnl Break the #undef_s apart with a comment so that 'configure' does dnl not comment them out. AH_VERBATIM([zzstatic_assert], [#if (!defined HAVE_C_STATIC_ASSERT && !defined assert \ && (!defined __cplusplus \ || (__cpp_static_assert < 201411 \ && __GNUG__ < 6 && __clang_major__ < 6))) #include #undef/**/assert #ifdef __sgi #undef/**/__ASSERT_H__ #endif /* Solaris 11.4 defines static_assert as a macro with 2 arguments. We need it also to be invocable with a single argument. */ #if defined __sun && (__STDC_VERSION__ - 0 >= 201112L) && !defined __cplusplus #undef/**/static_assert #define static_assert _Static_assert #endif #endif]) ]) libffcall-2.5/gnulib-m4/size_max.m40000664000000000000000000000550014631432055014051 00000000000000# size_max.m4 # serial 12 dnl Copyright (C) 2003, 2005-2006, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_PREREQ([2.61]) AC_DEFUN([gl_SIZE_MAX], [ AC_CHECK_HEADERS([stdint.h]) dnl First test whether the system already has SIZE_MAX. AC_CACHE_CHECK([for SIZE_MAX], [gl_cv_size_max], [ gl_cv_size_max=no AC_EGREP_CPP([Found it], [ #include #if HAVE_STDINT_H #include #endif #ifdef SIZE_MAX Found it #endif ], [gl_cv_size_max=yes]) if test $gl_cv_size_max != yes; then dnl Define it ourselves. Here we assume that the type 'size_t' is not wider dnl than the type 'unsigned long'. Try hard to find a definition that can dnl be used in a preprocessor #if, i.e. doesn't contain a cast. AC_COMPUTE_INT([size_t_bits_minus_1], [sizeof (size_t) * CHAR_BIT - 1], [#include #include ], [size_t_bits_minus_1=]) AC_COMPUTE_INT([fits_in_uint], [sizeof (size_t) <= sizeof (unsigned int)], [#include ], [fits_in_uint=]) if test -n "$size_t_bits_minus_1" && test -n "$fits_in_uint"; then if test $fits_in_uint = 1; then dnl Even though SIZE_MAX fits in an unsigned int, it must be of type dnl 'unsigned long' if the type 'size_t' is the same as 'unsigned long'. AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include extern size_t foo; extern unsigned long foo; ]], [[]])], [fits_in_uint=0]) fi dnl We cannot use 'expr' to simplify this expression, because 'expr' dnl works only with 'long' integers in the host environment, while we dnl might be cross-compiling from a 32-bit platform to a 64-bit platform. if test $fits_in_uint = 1; then gl_cv_size_max="(((1U << $size_t_bits_minus_1) - 1) * 2 + 1)" else gl_cv_size_max="(((1UL << $size_t_bits_minus_1) - 1) * 2 + 1)" fi else dnl Shouldn't happen, but who knows... gl_cv_size_max='((size_t)~(size_t)0)' fi fi ]) if test "$gl_cv_size_max" != yes; then AC_DEFINE_UNQUOTED([SIZE_MAX], [$gl_cv_size_max], [Define as the maximum value of type 'size_t', if the system doesn't define it.]) fi dnl Don't redefine SIZE_MAX in config.h if config.h is re-included after dnl . Remember that the #undef in AH_VERBATIM gets replaced with dnl #define by AC_DEFINE_UNQUOTED. AH_VERBATIM([SIZE_MAX], [/* Define as the maximum value of type 'size_t', if the system doesn't define it. */ #ifndef SIZE_MAX # undef SIZE_MAX #endif]) ]) libffcall-2.5/gnulib-m4/open-slash.m40000664000000000000000000000345714631432055014314 00000000000000# open-slash.m4 # serial 2 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Tests whether open() and creat() recognize a trailing slash. dnl Sets gl_cv_func_open_slash. AC_DEFUN([gl_OPEN_TRAILING_SLASH_BUG], [ AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles dnl open("foo/") should not create a file when the file name has a dnl trailing slash. FreeBSD only has the problem on symlinks. AC_CHECK_FUNCS_ONCE([lstat]) AC_CACHE_CHECK([whether open recognizes a trailing slash], [gl_cv_func_open_slash], [# Assume that if we have lstat, we can also check symlinks. if test $ac_cv_func_lstat = yes; then touch conftest.tmp ln -s conftest.tmp conftest.lnk fi AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #if HAVE_UNISTD_H # include #endif ]GL_MDA_DEFINES[ int main () { int result = 0; #if HAVE_LSTAT if (open ("conftest.lnk/", O_RDONLY) != -1) result |= 1; #endif if (open ("conftest.sl/", O_CREAT, 0600) >= 0) result |= 2; return result; }]])], [gl_cv_func_open_slash=yes], [gl_cv_func_open_slash=no], [ changequote(,)dnl case "$host_os" in freebsd* | aix* | hpux* | solaris2.[0-9] | solaris2.[0-9].*) gl_cv_func_open_slash="guessing no" ;; *) gl_cv_func_open_slash="guessing yes" ;; esac changequote([,])dnl ]) rm -f conftest.sl conftest.tmp conftest.lnk ]) case "$gl_cv_func_open_slash" in *no) AC_DEFINE([OPEN_TRAILING_SLASH_BUG], [1], [Define to 1 if open() fails to recognize a trailing slash.]) ;; esac ]) libffcall-2.5/gnulib-m4/sched_h.m40000664000000000000000000000615714631432055013640 00000000000000# sched_h.m4 # serial 16 dnl Copyright (C) 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Written by Bruno Haible. AC_DEFUN_ONCE([gl_SCHED_H], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_SCHED_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_CHECK_HEADER_SYS_CDEFS_H]) AC_CHECK_HEADERS([sched.h], [], [], [[#if HAVE_SYS_CDEFS_H #include #endif ]]) gl_NEXT_HEADERS([sched.h]) if test "$ac_cv_header_sched_h" = yes; then HAVE_SCHED_H=1 else HAVE_SCHED_H=0 fi AC_SUBST([HAVE_SCHED_H]) if test "$HAVE_SCHED_H" = 1; then AC_CHECK_TYPE([struct sched_param], [HAVE_STRUCT_SCHED_PARAM=1], [HAVE_STRUCT_SCHED_PARAM=0], [[#if HAVE_SYS_CDEFS_H #include #endif #include ]]) else HAVE_STRUCT_SCHED_PARAM=0 case "$host_os" in os2*) dnl On OS/2 kLIBC, struct sched_param is in spawn.h. AC_CHECK_TYPE([struct sched_param], [HAVE_STRUCT_SCHED_PARAM=1], [], [#include ]) ;; vms) dnl On OpenVMS 7.2 or newer, struct sched_param is in pthread.h. AC_CHECK_TYPE([struct sched_param], [HAVE_STRUCT_SCHED_PARAM=1], [], [#include ]) ;; esac fi AC_SUBST([HAVE_STRUCT_SCHED_PARAM]) dnl Ensure the type pid_t gets defined. AC_REQUIRE([AC_TYPE_PID_T]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, if it is not common dnl enough to be declared everywhere. gl_WARN_ON_USE_PREPARE([[#include ]], [sched_yield]) ]) # gl_SCHED_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_SCHED_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_SCHED_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_SCHED_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_SCHED_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SCHED_YIELD]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_SCHED_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_SCHED_H_DEFAULTS]) ]) AC_DEFUN([gl_SCHED_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_SCHED_YIELD=1; AC_SUBST([HAVE_SCHED_YIELD]) REPLACE_SCHED_YIELD=0; AC_SUBST([REPLACE_SCHED_YIELD]) ]) libffcall-2.5/gnulib-m4/unistd_h.m40000664000000000000000000003454514631432055014062 00000000000000# unistd_h.m4 # serial 96 dnl Copyright (C) 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Written by Simon Josefsson, Bruno Haible. AC_DEFUN_ONCE([gl_UNISTD_H], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) gl_CHECK_NEXT_HEADERS([unistd.h]) if test $ac_cv_header_unistd_h = yes; then HAVE_UNISTD_H=1 else HAVE_UNISTD_H=0 fi AC_SUBST([HAVE_UNISTD_H]) dnl Ensure the type pid_t gets defined. AC_REQUIRE([AC_TYPE_PID_T]) dnl Determine WINDOWS_64_BIT_OFF_T. AC_REQUIRE([gl_TYPE_OFF_T]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[ #if HAVE_UNISTD_H # include #endif /* Some systems declare various items in the wrong headers. */ #if !(defined __GLIBC__ && !defined __UCLIBC__) # include # include # include # if defined _WIN32 && ! defined __CYGWIN__ # include # endif #endif ]], [access chdir chown copy_file_range dup dup2 dup3 environ euidaccess execl execle execlp execv execve execvp execvpe faccessat fchdir fchownat fdatasync fsync ftruncate getcwd getdomainname getdtablesize getentropy getgroups gethostname getlogin getlogin_r getpagesize getpass getusershell setusershell endusershell group_member isatty lchown link linkat lseek pipe pipe2 pread pwrite readlink readlinkat rmdir sethostname sleep symlink symlinkat truncate ttyname_r unlink unlinkat usleep]) AC_REQUIRE([AC_C_RESTRICT]) AC_CHECK_DECLS_ONCE([execvpe]) if test $ac_cv_have_decl_execvpe = no; then HAVE_DECL_EXECVPE=0 fi ]) # gl_UNISTD_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_UNISTD_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_UNISTD_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_UNISTD_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_UNISTD_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ACCESS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CHDIR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CHOWN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CLOSE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_COPY_FILE_RANGE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_DUP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_DUP2]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_DUP3]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ENVIRON]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EUIDACCESS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECLE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECLP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECV]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECVE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECVP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXECVPE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FACCESSAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FCHDIR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FCHOWNAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FDATASYNC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSYNC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FTRUNCATE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETCWD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETDOMAINNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETDTABLESIZE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETENTROPY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETGROUPS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETHOSTNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETLOGIN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETLOGIN_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETOPT_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETPAGESIZE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETPASS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETPASS_GNU]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETUSERSHELL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GROUP_MEMBER]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ISATTY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LCHOWN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LINK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LINKAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LSEEK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PIPE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PIPE2]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PREAD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PWRITE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_READ]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_READLINK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_READLINKAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RMDIR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SETHOSTNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SLEEP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SYMLINK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SYMLINKAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TRUNCATE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TTYNAME_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNISTD_H_GETOPT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNISTD_H_NONBLOCKING]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNISTD_H_SIGPIPE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNLINK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UNLINKAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_USLEEP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_WRITE]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_ACCESS], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_CHDIR], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_CLOSE], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_DUP], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_DUP2], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECL], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECLE], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECLP], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECV], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECVE], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECVP], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_EXECVPE], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_GETCWD], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_GETPID], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_ISATTY], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_LSEEK], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_READ], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_RMDIR], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_SWAB], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_UNLINK], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_WRITE], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_UNISTD_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) ]) AC_DEFUN([gl_UNISTD_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_CHOWN=1; AC_SUBST([HAVE_CHOWN]) HAVE_COPY_FILE_RANGE=1; AC_SUBST([HAVE_COPY_FILE_RANGE]) HAVE_DUP3=1; AC_SUBST([HAVE_DUP3]) HAVE_EUIDACCESS=1; AC_SUBST([HAVE_EUIDACCESS]) HAVE_EXECVPE=1; AC_SUBST([HAVE_EXECVPE]) HAVE_FACCESSAT=1; AC_SUBST([HAVE_FACCESSAT]) HAVE_FCHDIR=1; AC_SUBST([HAVE_FCHDIR]) HAVE_FCHOWNAT=1; AC_SUBST([HAVE_FCHOWNAT]) HAVE_FDATASYNC=1; AC_SUBST([HAVE_FDATASYNC]) HAVE_FSYNC=1; AC_SUBST([HAVE_FSYNC]) HAVE_FTRUNCATE=1; AC_SUBST([HAVE_FTRUNCATE]) HAVE_GETDTABLESIZE=1; AC_SUBST([HAVE_GETDTABLESIZE]) HAVE_GETENTROPY=1; AC_SUBST([HAVE_GETENTROPY]) HAVE_GETGROUPS=1; AC_SUBST([HAVE_GETGROUPS]) HAVE_GETHOSTNAME=1; AC_SUBST([HAVE_GETHOSTNAME]) HAVE_GETLOGIN=1; AC_SUBST([HAVE_GETLOGIN]) HAVE_GETPAGESIZE=1; AC_SUBST([HAVE_GETPAGESIZE]) HAVE_GETPASS=1; AC_SUBST([HAVE_GETPASS]) HAVE_GROUP_MEMBER=1; AC_SUBST([HAVE_GROUP_MEMBER]) HAVE_LCHOWN=1; AC_SUBST([HAVE_LCHOWN]) HAVE_LINK=1; AC_SUBST([HAVE_LINK]) HAVE_LINKAT=1; AC_SUBST([HAVE_LINKAT]) HAVE_PIPE=1; AC_SUBST([HAVE_PIPE]) HAVE_PIPE2=1; AC_SUBST([HAVE_PIPE2]) HAVE_PREAD=1; AC_SUBST([HAVE_PREAD]) HAVE_PWRITE=1; AC_SUBST([HAVE_PWRITE]) HAVE_READLINK=1; AC_SUBST([HAVE_READLINK]) HAVE_READLINKAT=1; AC_SUBST([HAVE_READLINKAT]) HAVE_SETHOSTNAME=1; AC_SUBST([HAVE_SETHOSTNAME]) HAVE_SLEEP=1; AC_SUBST([HAVE_SLEEP]) HAVE_SYMLINK=1; AC_SUBST([HAVE_SYMLINK]) HAVE_SYMLINKAT=1; AC_SUBST([HAVE_SYMLINKAT]) HAVE_UNLINKAT=1; AC_SUBST([HAVE_UNLINKAT]) HAVE_USLEEP=1; AC_SUBST([HAVE_USLEEP]) HAVE_DECL_ENVIRON=1; AC_SUBST([HAVE_DECL_ENVIRON]) HAVE_DECL_EXECVPE=1; AC_SUBST([HAVE_DECL_EXECVPE]) HAVE_DECL_FCHDIR=1; AC_SUBST([HAVE_DECL_FCHDIR]) HAVE_DECL_FDATASYNC=1; AC_SUBST([HAVE_DECL_FDATASYNC]) HAVE_DECL_GETDOMAINNAME=1; AC_SUBST([HAVE_DECL_GETDOMAINNAME]) HAVE_DECL_GETLOGIN=1; AC_SUBST([HAVE_DECL_GETLOGIN]) HAVE_DECL_GETLOGIN_R=1; AC_SUBST([HAVE_DECL_GETLOGIN_R]) HAVE_DECL_GETPAGESIZE=1; AC_SUBST([HAVE_DECL_GETPAGESIZE]) HAVE_DECL_GETUSERSHELL=1; AC_SUBST([HAVE_DECL_GETUSERSHELL]) HAVE_DECL_SETHOSTNAME=1; AC_SUBST([HAVE_DECL_SETHOSTNAME]) HAVE_DECL_TRUNCATE=1; AC_SUBST([HAVE_DECL_TRUNCATE]) HAVE_DECL_TTYNAME_R=1; AC_SUBST([HAVE_DECL_TTYNAME_R]) HAVE_OS_H=0; AC_SUBST([HAVE_OS_H]) HAVE_SYS_PARAM_H=0; AC_SUBST([HAVE_SYS_PARAM_H]) REPLACE_ACCESS=0; AC_SUBST([REPLACE_ACCESS]) REPLACE_CHOWN=0; AC_SUBST([REPLACE_CHOWN]) REPLACE_CLOSE=0; AC_SUBST([REPLACE_CLOSE]) REPLACE_COPY_FILE_RANGE=0; AC_SUBST([REPLACE_COPY_FILE_RANGE]) REPLACE_DUP=0; AC_SUBST([REPLACE_DUP]) REPLACE_DUP2=0; AC_SUBST([REPLACE_DUP2]) REPLACE_DUP3=0; AC_SUBST([REPLACE_DUP3]) REPLACE_EXECL=0; AC_SUBST([REPLACE_EXECL]) REPLACE_EXECLE=0; AC_SUBST([REPLACE_EXECLE]) REPLACE_EXECLP=0; AC_SUBST([REPLACE_EXECLP]) REPLACE_EXECV=0; AC_SUBST([REPLACE_EXECV]) REPLACE_EXECVE=0; AC_SUBST([REPLACE_EXECVE]) REPLACE_EXECVP=0; AC_SUBST([REPLACE_EXECVP]) REPLACE_EXECVPE=0; AC_SUBST([REPLACE_EXECVPE]) REPLACE_FACCESSAT=0; AC_SUBST([REPLACE_FACCESSAT]) REPLACE_FCHDIR=0; AC_SUBST([REPLACE_FCHDIR]) REPLACE_FCHOWNAT=0; AC_SUBST([REPLACE_FCHOWNAT]) REPLACE_FDATASYNC=0; AC_SUBST([REPLACE_FDATASYNC]) REPLACE_FTRUNCATE=0; AC_SUBST([REPLACE_FTRUNCATE]) REPLACE_GETCWD=0; AC_SUBST([REPLACE_GETCWD]) REPLACE_GETDOMAINNAME=0; AC_SUBST([REPLACE_GETDOMAINNAME]) REPLACE_GETDTABLESIZE=0; AC_SUBST([REPLACE_GETDTABLESIZE]) REPLACE_GETENTROPY=0; AC_SUBST([REPLACE_GETENTROPY]) REPLACE_GETLOGIN_R=0; AC_SUBST([REPLACE_GETLOGIN_R]) REPLACE_GETGROUPS=0; AC_SUBST([REPLACE_GETGROUPS]) REPLACE_GETPAGESIZE=0; AC_SUBST([REPLACE_GETPAGESIZE]) REPLACE_GETPASS=0; AC_SUBST([REPLACE_GETPASS]) REPLACE_GETPASS_FOR_GETPASS_GNU=0; AC_SUBST([REPLACE_GETPASS_FOR_GETPASS_GNU]) REPLACE_GETUSERSHELL=0; AC_SUBST([REPLACE_GETUSERSHELL]) REPLACE_ISATTY=0; AC_SUBST([REPLACE_ISATTY]) REPLACE_LCHOWN=0; AC_SUBST([REPLACE_LCHOWN]) REPLACE_LINK=0; AC_SUBST([REPLACE_LINK]) REPLACE_LINKAT=0; AC_SUBST([REPLACE_LINKAT]) REPLACE_LSEEK=0; AC_SUBST([REPLACE_LSEEK]) REPLACE_PIPE2=0; AC_SUBST([REPLACE_PIPE2]) REPLACE_PREAD=0; AC_SUBST([REPLACE_PREAD]) REPLACE_PWRITE=0; AC_SUBST([REPLACE_PWRITE]) REPLACE_READ=0; AC_SUBST([REPLACE_READ]) REPLACE_READLINK=0; AC_SUBST([REPLACE_READLINK]) REPLACE_READLINKAT=0; AC_SUBST([REPLACE_READLINKAT]) REPLACE_RMDIR=0; AC_SUBST([REPLACE_RMDIR]) REPLACE_SETHOSTNAME=0; AC_SUBST([REPLACE_SETHOSTNAME]) REPLACE_SLEEP=0; AC_SUBST([REPLACE_SLEEP]) REPLACE_SYMLINK=0; AC_SUBST([REPLACE_SYMLINK]) REPLACE_SYMLINKAT=0; AC_SUBST([REPLACE_SYMLINKAT]) REPLACE_TRUNCATE=0; AC_SUBST([REPLACE_TRUNCATE]) REPLACE_TTYNAME_R=0; AC_SUBST([REPLACE_TTYNAME_R]) REPLACE_UNLINK=0; AC_SUBST([REPLACE_UNLINK]) REPLACE_UNLINKAT=0; AC_SUBST([REPLACE_UNLINKAT]) REPLACE_USLEEP=0; AC_SUBST([REPLACE_USLEEP]) REPLACE_WRITE=0; AC_SUBST([REPLACE_WRITE]) UNISTD_H_HAVE_SYS_RANDOM_H=0; AC_SUBST([UNISTD_H_HAVE_SYS_RANDOM_H]) UNISTD_H_HAVE_WINSOCK2_H=0; AC_SUBST([UNISTD_H_HAVE_WINSOCK2_H]) UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS=0; AC_SUBST([UNISTD_H_HAVE_WINSOCK2_H_AND_USE_SOCKETS]) ]) libffcall-2.5/gnulib-m4/locale-fr.m40000664000000000000000000003017714631432055014106 00000000000000# locale-fr.m4 # serial 23 dnl Copyright (C) 2003, 2005-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Determine the name of a french locale with traditional encoding. AC_DEFUN_ONCE([gt_LOCALE_FR], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([AM_LANGINFO_CODESET]) AC_CACHE_CHECK([for a traditional french locale], [gt_cv_locale_fr], [ AC_LANG_CONFTEST([AC_LANG_SOURCE([[ #include #include #if HAVE_LANGINFO_CODESET # include #endif #include #include struct tm t; char buf[16]; int main () { /* On BeOS and Haiku, locales are not implemented in libc. Rather, libintl imitates locale dependent behaviour by looking at the environment variables, and all locales use the UTF-8 encoding. */ #if defined __BEOS__ || defined __HAIKU__ return 1; #else /* Check whether the given locale name is recognized by the system. */ # if defined _WIN32 && !defined __CYGWIN__ /* On native Windows, setlocale(category, "") looks at the system settings, not at the environment variables. Also, when an encoding suffix such as ".65001" or ".54936" is specified, it succeeds but sets the LC_CTYPE category of the locale to "C". */ if (setlocale (LC_ALL, getenv ("LC_ALL")) == NULL || strcmp (setlocale (LC_CTYPE, NULL), "C") == 0) return 1; # else if (setlocale (LC_ALL, "") == NULL) return 1; # endif /* Check whether nl_langinfo(CODESET) is nonempty and not "ASCII" or "646". On Mac OS X 10.3.5 (Darwin 7.5) in the fr_FR locale, nl_langinfo(CODESET) is empty, and the behaviour of Tcl 8.4 in this locale is not useful. On OpenBSD 4.0, when an unsupported locale is specified, setlocale() succeeds but then nl_langinfo(CODESET) is "646". In this situation, some unit tests fail. On MirBSD 10, when an unsupported locale is specified, setlocale() succeeds but then nl_langinfo(CODESET) is "UTF-8". */ # if HAVE_LANGINFO_CODESET { const char *cs = nl_langinfo (CODESET); if (cs[0] == '\0' || strcmp (cs, "ASCII") == 0 || strcmp (cs, "646") == 0 || strcmp (cs, "UTF-8") == 0) return 1; } # endif # ifdef __CYGWIN__ /* On Cygwin, avoid locale names without encoding suffix, because the locale_charset() function relies on the encoding suffix. Note that LC_ALL is set on the command line. */ if (strchr (getenv ("LC_ALL"), '.') == NULL) return 1; # endif /* Check whether in the abbreviation of the second month, the second character (should be U+00E9: LATIN SMALL LETTER E WITH ACUTE) is only one byte long. This excludes the UTF-8 encoding. */ t.tm_year = 1975 - 1900; t.tm_mon = 2 - 1; t.tm_mday = 4; if (strftime (buf, sizeof (buf), "%b", &t) < 3 || buf[2] != 'v') return 1; # if !defined __BIONIC__ /* Bionic libc's 'struct lconv' is just a dummy. */ /* Check whether the decimal separator is a comma. On NetBSD 3.0 in the fr_FR.ISO8859-1 locale, localeconv()->decimal_point are nl_langinfo(RADIXCHAR) are both ".". */ if (localeconv () ->decimal_point[0] != ',') return 1; # endif return 0; #endif } ]])]) if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then case "$host_os" in # Handle native Windows specially, because there setlocale() interprets # "ar" as "Arabic" or "Arabic_Saudi Arabia.1256", # "fr" or "fra" as "French" or "French_France.1252", # "ge"(!) or "deu"(!) as "German" or "German_Germany.1252", # "ja" as "Japanese" or "Japanese_Japan.932", # and similar. mingw* | windows*) # Test for the native Windows locale name. if (LC_ALL=French_France.1252 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=French_France.1252 else # None found. gt_cv_locale_fr=none fi ;; *) # Setting LC_ALL is not enough. Need to set LC_TIME to empty, because # otherwise on Mac OS X 10.3.5 the LC_TIME=C from the beginning of the # configure script would override the LC_ALL setting. Likewise for # LC_CTYPE, which is also set at the beginning of the configure script. # Test for the usual locale name. if (LC_ALL=fr_FR LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=fr_FR else # Test for the locale name with explicit encoding suffix. if (LC_ALL=fr_FR.ISO-8859-1 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=fr_FR.ISO-8859-1 else # Test for the AIX, OSF/1, FreeBSD, NetBSD, OpenBSD locale name. if (LC_ALL=fr_FR.ISO8859-1 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=fr_FR.ISO8859-1 else # Test for the HP-UX locale name. if (LC_ALL=fr_FR.iso88591 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=fr_FR.iso88591 else # Test for the Solaris 10 locale name. if (LC_ALL=fr LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr=fr else # None found. gt_cv_locale_fr=none fi fi fi fi fi ;; esac fi rm -fr conftest* ]) LOCALE_FR=$gt_cv_locale_fr case $LOCALE_FR in #( '' | *[[[:space:]\"\$\'*@<:@]]*) dnl This locale name might cause trouble with sh or make. AC_MSG_WARN([invalid locale "$LOCALE_FR"; assuming "none"]) LOCALE_FR=none;; esac AC_SUBST([LOCALE_FR]) ]) dnl Determine the name of a french locale with UTF-8 encoding. AC_DEFUN_ONCE([gt_LOCALE_FR_UTF8], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([AM_LANGINFO_CODESET]) AC_CACHE_CHECK([for a french Unicode locale], [gt_cv_locale_fr_utf8], [ case "$host_os" in *-musl* | midipix*) dnl On musl libc, all kinds of ll_CC.UTF-8 locales exist, even without dnl any locale file on disk. But they are effectively equivalent to the dnl C.UTF-8 locale, except for locale categories (such as LC_MESSSAGES) dnl for which localizations (.mo files) have been installed. gt_cv_locale_fr_utf8=fr_FR.UTF-8 ;; *) AC_LANG_CONFTEST([AC_LANG_SOURCE([[ #include #include #if HAVE_LANGINFO_CODESET # include #endif #include #include struct tm t; char buf[16]; int main () { /* On BeOS and Haiku, locales are not implemented in libc. Rather, libintl imitates locale dependent behaviour by looking at the environment variables, and all locales use the UTF-8 encoding. */ #if !(defined __BEOS__ || defined __HAIKU__) /* Check whether the given locale name is recognized by the system. */ # if defined _WIN32 && !defined __CYGWIN__ /* On native Windows, setlocale(category, "") looks at the system settings, not at the environment variables. Also, when an encoding suffix such as ".65001" or ".54936" is specified, it succeeds but sets the LC_CTYPE category of the locale to "C". */ if (setlocale (LC_ALL, getenv ("LC_ALL")) == NULL || strcmp (setlocale (LC_CTYPE, NULL), "C") == 0) return 1; # else if (setlocale (LC_ALL, "") == NULL) return 1; # endif /* Check whether nl_langinfo(CODESET) is nonempty and not "ASCII" or "646". On Mac OS X 10.3.5 (Darwin 7.5) in the fr_FR locale, nl_langinfo(CODESET) is empty, and the behaviour of Tcl 8.4 in this locale is not useful. On OpenBSD 4.0, when an unsupported locale is specified, setlocale() succeeds but then nl_langinfo(CODESET) is "646". In this situation, some unit tests fail. */ # if HAVE_LANGINFO_CODESET { const char *cs = nl_langinfo (CODESET); if (cs[0] == '\0' || strcmp (cs, "ASCII") == 0 || strcmp (cs, "646") == 0) return 1; } # endif # ifdef __CYGWIN__ /* On Cygwin, avoid locale names without encoding suffix, because the locale_charset() function relies on the encoding suffix. Note that LC_ALL is set on the command line. */ if (strchr (getenv ("LC_ALL"), '.') == NULL) return 1; # endif /* Check whether in the abbreviation of the second month, the second character (should be U+00E9: LATIN SMALL LETTER E WITH ACUTE) is two bytes long, with UTF-8 encoding. */ t.tm_year = 1975 - 1900; t.tm_mon = 2 - 1; t.tm_mday = 4; if (strftime (buf, sizeof (buf), "%b", &t) < 4 || buf[1] != (char) 0xc3 || buf[2] != (char) 0xa9 || buf[3] != 'v') return 1; #endif #if !defined __BIONIC__ /* Bionic libc's 'struct lconv' is just a dummy. */ /* Check whether the decimal separator is a comma. On NetBSD 3.0 in the fr_FR.ISO8859-1 locale, localeconv()->decimal_point are nl_langinfo(RADIXCHAR) are both ".". */ if (localeconv () ->decimal_point[0] != ',') return 1; #endif return 0; } ]])]) if AC_TRY_EVAL([ac_link]) && test -s conftest$ac_exeext; then case "$host_os" in # Handle native Windows specially, because there setlocale() interprets # "ar" as "Arabic" or "Arabic_Saudi Arabia.1256", # "fr" or "fra" as "French" or "French_France.1252", # "ge"(!) or "deu"(!) as "German" or "German_Germany.1252", # "ja" as "Japanese" or "Japanese_Japan.932", # and similar. mingw* | windows*) # Test for the hypothetical native Windows locale name. if (LC_ALL=French_France.65001 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr_utf8=French_France.65001 else # None found. gt_cv_locale_fr_utf8=none fi ;; *) # Setting LC_ALL is not enough. Need to set LC_TIME to empty, because # otherwise on Mac OS X 10.3.5 the LC_TIME=C from the beginning of the # configure script would override the LC_ALL setting. Likewise for # LC_CTYPE, which is also set at the beginning of the configure script. # Test for the usual locale name. if (LC_ALL=fr_FR LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr_utf8=fr_FR else # Test for the locale name with explicit encoding suffix. if (LC_ALL=fr_FR.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr_utf8=fr_FR.UTF-8 else # Test for the Solaris 10 locale name. if (LC_ALL=fr.UTF-8 LC_TIME= LC_CTYPE= ./conftest; exit) 2>/dev/null; then gt_cv_locale_fr_utf8=fr.UTF-8 else # None found. gt_cv_locale_fr_utf8=none fi fi fi ;; esac fi rm -fr conftest* ;; esac ]) LOCALE_FR_UTF8=$gt_cv_locale_fr_utf8 case $LOCALE_FR_UTF8 in #( '' | *[[[:space:]\"\$\'*@<:@]]*) dnl This locale name might cause trouble with sh or make. AC_MSG_WARN([invalid locale "$LOCALE_FR_UTF8"; assuming "none"]) LOCALE_FR_UTF8=none;; esac AC_SUBST([LOCALE_FR_UTF8]) dnl Users of $LOCALE_FR_UTF8 need to know which of the locale categories they dnl can rely on. case "$host_os" in *-musl* | midipix*) dnl On musl libc, locale categories other than LC_CTYPE and LC_MESSAGES dnl are effectively unimplemented. LC_COLLATE_IMPLEMENTED=false LC_NUMERIC_IMPLEMENTED=false LC_TIME_IMPLEMENTED=false LC_MONETARY_IMPLEMENTED=false ;; *) LC_COLLATE_IMPLEMENTED=true LC_NUMERIC_IMPLEMENTED=true LC_TIME_IMPLEMENTED=true LC_MONETARY_IMPLEMENTED=true ;; esac AC_SUBST([LC_COLLATE_IMPLEMENTED]) AC_SUBST([LC_NUMERIC_IMPLEMENTED]) AC_SUBST([LC_TIME_IMPLEMENTED]) AC_SUBST([LC_MONETARY_IMPLEMENTED]) ]) libffcall-2.5/gnulib-m4/stdint.m40000664000000000000000000004325614631432055013551 00000000000000# stdint.m4 # serial 63 dnl Copyright (C) 2001-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Paul Eggert and Bruno Haible. dnl Test whether is supported or must be substituted. AC_PREREQ([2.61]) AC_DEFUN_ONCE([gl_STDINT_H], [ AC_PREREQ([2.59])dnl AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles AC_REQUIRE([gl_LIMITS_H]) AC_REQUIRE([gt_TYPE_WINT_T]) dnl For backward compatibility. Some packages may still be testing these dnl macros. AC_DEFINE([HAVE_LONG_LONG_INT], [1], [Define to 1 if the system has the type 'long long int'.]) AC_DEFINE([HAVE_UNSIGNED_LONG_LONG_INT], [1], [Define to 1 if the system has the type 'unsigned long long int'.]) dnl Check for , in the same way as gl_WCHAR_H does. AC_CHECK_HEADERS_ONCE([wchar.h]) if test $ac_cv_header_wchar_h = yes; then HAVE_WCHAR_H=1 else HAVE_WCHAR_H=0 fi AC_SUBST([HAVE_WCHAR_H]) dnl Check for . AC_CHECK_HEADERS_ONCE([inttypes.h]) if test $ac_cv_header_inttypes_h = yes; then HAVE_INTTYPES_H=1 else HAVE_INTTYPES_H=0 fi AC_SUBST([HAVE_INTTYPES_H]) dnl Check for . AC_CHECK_HEADERS_ONCE([sys/types.h]) if test $ac_cv_header_sys_types_h = yes; then HAVE_SYS_TYPES_H=1 else HAVE_SYS_TYPES_H=0 fi AC_SUBST([HAVE_SYS_TYPES_H]) gl_CHECK_NEXT_HEADERS([stdint.h]) if test $ac_cv_header_stdint_h = yes; then HAVE_STDINT_H=1 else HAVE_STDINT_H=0 fi AC_SUBST([HAVE_STDINT_H]) dnl Now see whether we need a substitute . if test $ac_cv_header_stdint_h = yes; then AC_CACHE_CHECK([whether stdint.h conforms to C99], [gl_cv_header_working_stdint_h], [gl_cv_header_working_stdint_h=no AC_COMPILE_IFELSE([ AC_LANG_PROGRAM([[ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #define __STDC_CONSTANT_MACROS 1 #define __STDC_LIMIT_MACROS 1 #include /* Dragonfly defines WCHAR_MIN, WCHAR_MAX only in . */ #if !(defined WCHAR_MIN && defined WCHAR_MAX) #error "WCHAR_MIN, WCHAR_MAX not defined in " #endif ] gl_STDINT_INCLUDES [ #ifdef INT8_MAX int8_t a1 = INT8_MAX; int8_t a1min = INT8_MIN; #endif #ifdef INT16_MAX int16_t a2 = INT16_MAX; int16_t a2min = INT16_MIN; #endif #ifdef INT32_MAX int32_t a3 = INT32_MAX; int32_t a3min = INT32_MIN; #endif #ifdef INT64_MAX int64_t a4 = INT64_MAX; int64_t a4min = INT64_MIN; #endif #ifdef UINT8_MAX uint8_t b1 = UINT8_MAX; #else typedef int b1[(unsigned char) -1 != 255 ? 1 : -1]; #endif #ifdef UINT16_MAX uint16_t b2 = UINT16_MAX; #endif #ifdef UINT32_MAX uint32_t b3 = UINT32_MAX; #endif #ifdef UINT64_MAX uint64_t b4 = UINT64_MAX; #endif int_least8_t c1 = INT8_C (0x7f); int_least8_t c1max = INT_LEAST8_MAX; int_least8_t c1min = INT_LEAST8_MIN; int_least16_t c2 = INT16_C (0x7fff); int_least16_t c2max = INT_LEAST16_MAX; int_least16_t c2min = INT_LEAST16_MIN; int_least32_t c3 = INT32_C (0x7fffffff); int_least32_t c3max = INT_LEAST32_MAX; int_least32_t c3min = INT_LEAST32_MIN; int_least64_t c4 = INT64_C (0x7fffffffffffffff); int_least64_t c4max = INT_LEAST64_MAX; int_least64_t c4min = INT_LEAST64_MIN; uint_least8_t d1 = UINT8_C (0xff); uint_least8_t d1max = UINT_LEAST8_MAX; uint_least16_t d2 = UINT16_C (0xffff); uint_least16_t d2max = UINT_LEAST16_MAX; uint_least32_t d3 = UINT32_C (0xffffffff); uint_least32_t d3max = UINT_LEAST32_MAX; uint_least64_t d4 = UINT64_C (0xffffffffffffffff); uint_least64_t d4max = UINT_LEAST64_MAX; int_fast8_t e1 = INT_FAST8_MAX; int_fast8_t e1min = INT_FAST8_MIN; int_fast16_t e2 = INT_FAST16_MAX; int_fast16_t e2min = INT_FAST16_MIN; int_fast32_t e3 = INT_FAST32_MAX; int_fast32_t e3min = INT_FAST32_MIN; int_fast64_t e4 = INT_FAST64_MAX; int_fast64_t e4min = INT_FAST64_MIN; uint_fast8_t f1 = UINT_FAST8_MAX; uint_fast16_t f2 = UINT_FAST16_MAX; uint_fast32_t f3 = UINT_FAST32_MAX; uint_fast64_t f4 = UINT_FAST64_MAX; #ifdef INTPTR_MAX intptr_t g = INTPTR_MAX; intptr_t gmin = INTPTR_MIN; #endif #ifdef UINTPTR_MAX uintptr_t h = UINTPTR_MAX; #endif intmax_t i = INTMAX_MAX; uintmax_t j = UINTMAX_MAX; /* Check that SIZE_MAX has the correct type, if possible. */ /* ISO C 11 mandates _Generic, but GCC versions < 4.9 lack it. */ #if 201112 <= __STDC_VERSION__ \ && (!defined __GNUC__ || 4 < __GNUC__ + (9 <= __GNUC_MINOR__) \ || defined __clang__) int k = _Generic (SIZE_MAX, size_t: 0); #elif (2 <= __GNUC__ || 4 <= __clang_major__ || defined __IBM__TYPEOF__ \ || (0x5110 <= __SUNPRO_C && !__STDC__)) extern size_t k; extern __typeof__ (SIZE_MAX) k; #endif #include /* for CHAR_BIT */ #define TYPE_MINIMUM(t) \ ((t) ((t) 0 < (t) -1 ? (t) 0 : ~ TYPE_MAXIMUM (t))) #define TYPE_MAXIMUM(t) \ ((t) ((t) 0 < (t) -1 \ ? (t) -1 \ : ((((t) 1 << (sizeof (t) * CHAR_BIT - 2)) - 1) * 2 + 1))) struct s { int check_PTRDIFF: PTRDIFF_MIN == TYPE_MINIMUM (ptrdiff_t) && PTRDIFF_MAX == TYPE_MAXIMUM (ptrdiff_t) ? 1 : -1; /* Detect bug in FreeBSD 6.0/ia64 and FreeBSD 13.0/arm64. */ int check_SIG_ATOMIC: SIG_ATOMIC_MIN == TYPE_MINIMUM (sig_atomic_t) && SIG_ATOMIC_MAX == TYPE_MAXIMUM (sig_atomic_t) ? 1 : -1; int check_SIZE: SIZE_MAX == TYPE_MAXIMUM (size_t) ? 1 : -1; int check_WCHAR: WCHAR_MIN == TYPE_MINIMUM (wchar_t) && WCHAR_MAX == TYPE_MAXIMUM (wchar_t) ? 1 : -1; /* Detect bug in mingw. */ int check_WINT: WINT_MIN == TYPE_MINIMUM (wint_t) && WINT_MAX == TYPE_MAXIMUM (wint_t) ? 1 : -1; /* Detect bugs in glibc 2.4 and Solaris 10 stdint.h, among others. */ int check_UINT8_C: (-1 < UINT8_C (0)) == (-1 < (uint_least8_t) 0) ? 1 : -1; int check_UINT16_C: (-1 < UINT16_C (0)) == (-1 < (uint_least16_t) 0) ? 1 : -1; /* Detect bugs in OpenBSD 3.9 stdint.h. */ #ifdef UINT8_MAX int check_uint8: (uint8_t) -1 == UINT8_MAX ? 1 : -1; #endif #ifdef UINT16_MAX int check_uint16: (uint16_t) -1 == UINT16_MAX ? 1 : -1; #endif #ifdef UINT32_MAX int check_uint32: (uint32_t) -1 == UINT32_MAX ? 1 : -1; #endif #ifdef UINT64_MAX int check_uint64: (uint64_t) -1 == UINT64_MAX ? 1 : -1; #endif int check_uint_least8: (uint_least8_t) -1 == UINT_LEAST8_MAX ? 1 : -1; int check_uint_least16: (uint_least16_t) -1 == UINT_LEAST16_MAX ? 1 : -1; int check_uint_least32: (uint_least32_t) -1 == UINT_LEAST32_MAX ? 1 : -1; int check_uint_least64: (uint_least64_t) -1 == UINT_LEAST64_MAX ? 1 : -1; int check_uint_fast8: (uint_fast8_t) -1 == UINT_FAST8_MAX ? 1 : -1; int check_uint_fast16: (uint_fast16_t) -1 == UINT_FAST16_MAX ? 1 : -1; int check_uint_fast32: (uint_fast32_t) -1 == UINT_FAST32_MAX ? 1 : -1; int check_uint_fast64: (uint_fast64_t) -1 == UINT_FAST64_MAX ? 1 : -1; int check_uintptr: (uintptr_t) -1 == UINTPTR_MAX ? 1 : -1; int check_uintmax: (uintmax_t) -1 == UINTMAX_MAX ? 1 : -1; int check_size: (size_t) -1 == SIZE_MAX ? 1 : -1; }; ]])], [dnl Determine whether the various *_MIN, *_MAX macros are usable dnl in preprocessor expression. We could do it by compiling a test dnl program for each of these macros. It is faster to run a program dnl that inspects the macro expansion. dnl This detects a bug on HP-UX 11.23/ia64. AC_RUN_IFELSE([ AC_LANG_PROGRAM([[ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #define __STDC_CONSTANT_MACROS 1 #define __STDC_LIMIT_MACROS 1 #include ] gl_STDINT_INCLUDES [ #include #include #define MVAL(macro) MVAL1(macro) #define MVAL1(expression) #expression static const char *macro_values[] = { #ifdef INT8_MAX MVAL (INT8_MAX), #endif #ifdef INT16_MAX MVAL (INT16_MAX), #endif #ifdef INT32_MAX MVAL (INT32_MAX), #endif #ifdef INT64_MAX MVAL (INT64_MAX), #endif #ifdef UINT8_MAX MVAL (UINT8_MAX), #endif #ifdef UINT16_MAX MVAL (UINT16_MAX), #endif #ifdef UINT32_MAX MVAL (UINT32_MAX), #endif #ifdef UINT64_MAX MVAL (UINT64_MAX), #endif NULL }; ]], [[ const char **mv; for (mv = macro_values; *mv != NULL; mv++) { const char *value = *mv; /* Test whether it looks like a cast expression. */ if (strncmp (value, "((unsigned int)"/*)*/, 15) == 0 || strncmp (value, "((unsigned short)"/*)*/, 17) == 0 || strncmp (value, "((unsigned char)"/*)*/, 16) == 0 || strncmp (value, "((int)"/*)*/, 6) == 0 || strncmp (value, "((signed short)"/*)*/, 15) == 0 || strncmp (value, "((signed char)"/*)*/, 14) == 0) return mv - macro_values + 1; } return 0; ]])], [gl_cv_header_working_stdint_h=yes], [], [case "$host_os" in # Guess yes on native Windows. mingw* | windows*) gl_cv_header_working_stdint_h="guessing yes" ;; # In general, assume it works. *) gl_cv_header_working_stdint_h="guessing yes" ;; esac ]) ]) ]) fi HAVE_C99_STDINT_H=0 HAVE_SYS_BITYPES_H=0 HAVE_SYS_INTTYPES_H=0 GL_GENERATE_STDINT_H=true case "$gl_cv_header_working_stdint_h" in *yes) HAVE_C99_STDINT_H=1 dnl Now see whether the system works without dnl __STDC_CONSTANT_MACROS/__STDC_LIMIT_MACROS defined. dnl If not, there would be problems when stdint.h is included from C++. AC_CACHE_CHECK([whether stdint.h works without ISO C predefines], [gl_cv_header_stdint_without_STDC_macros], [gl_cv_header_stdint_without_STDC_macros=no AC_COMPILE_IFELSE([ AC_LANG_PROGRAM([[ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 /* work if build isn't clean */ #include ] gl_STDINT_INCLUDES [ intmax_t im = INTMAX_MAX; int32_t i32 = INT32_C (0x7fffffff); ]])], [gl_cv_header_stdint_without_STDC_macros=yes]) ]) if test $gl_cv_header_stdint_without_STDC_macros = no; then AC_DEFINE([__STDC_CONSTANT_MACROS], [1], [Define to 1 if the system predates C++11.]) AC_DEFINE([__STDC_LIMIT_MACROS], [1], [Define to 1 if the system predates C++11.]) fi AC_CACHE_CHECK([whether stdint.h has UINTMAX_WIDTH etc.], [gl_cv_header_stdint_width], [gl_cv_header_stdint_width=no AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ /* Work if build is not clean. */ #define _GL_JUST_INCLUDE_SYSTEM_STDINT_H 1 #ifndef __STDC_WANT_IEC_60559_BFP_EXT__ #define __STDC_WANT_IEC_60559_BFP_EXT__ 1 #endif #include ]gl_STDINT_INCLUDES[ int iw = UINTMAX_WIDTH; ]])], [gl_cv_header_stdint_width=yes])]) if test "$gl_cv_header_stdint_width" = yes; then GL_GENERATE_STDINT_H=false fi ;; *) dnl Check for , and for dnl (used in Linux libc4 >= 4.6.7 and libc5). AC_CHECK_HEADERS([sys/inttypes.h sys/bitypes.h]) if test $ac_cv_header_sys_inttypes_h = yes; then HAVE_SYS_INTTYPES_H=1 fi if test $ac_cv_header_sys_bitypes_h = yes; then HAVE_SYS_BITYPES_H=1 fi gl_STDINT_TYPE_PROPERTIES ;; esac dnl The substitute stdint.h needs the substitute limit.h's _GL_INTEGER_WIDTH. gl_REPLACE_LIMITS_H AC_SUBST([HAVE_C99_STDINT_H]) AC_SUBST([HAVE_SYS_BITYPES_H]) AC_SUBST([HAVE_SYS_INTTYPES_H]) ]) dnl gl_STDINT_BITSIZEOF(TYPES, INCLUDES) dnl Determine the size of each of the given types in bits. AC_DEFUN([gl_STDINT_BITSIZEOF], [ dnl Use a shell loop, to avoid bloating configure, and dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into dnl config.h.in, dnl - extra AC_SUBST calls, so that the right substitutions are made. m4_foreach_w([gltype], [$1], [AH_TEMPLATE([BITSIZEOF_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]), [Define to the number of bits in type ']gltype['.])]) for gltype in $1 ; do AC_CACHE_CHECK([for bit size of $gltype], [gl_cv_bitsizeof_${gltype}], [AC_COMPUTE_INT([result], [sizeof ($gltype) * CHAR_BIT], [$2 #include ], [result=unknown]) eval gl_cv_bitsizeof_${gltype}=\$result ]) eval result=\$gl_cv_bitsizeof_${gltype} if test $result = unknown; then dnl Use a nonempty default, because some compilers, such as IRIX 5 cc, dnl do a syntax check even on unused #if conditions and give an error dnl on valid C code like this: dnl #if 0 dnl # if > 32 dnl # endif dnl #endif result=0 fi GLTYPE=`echo "$gltype" | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` AC_DEFINE_UNQUOTED([BITSIZEOF_${GLTYPE}], [$result]) eval BITSIZEOF_${GLTYPE}=\$result done m4_foreach_w([gltype], [$1], [AC_SUBST([BITSIZEOF_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]))]) ]) dnl gl_CHECK_TYPES_SIGNED(TYPES, INCLUDES) dnl Determine the signedness of each of the given types. dnl Define HAVE_SIGNED_TYPE if type is signed. AC_DEFUN([gl_CHECK_TYPES_SIGNED], [ dnl Use a shell loop, to avoid bloating configure, and dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into dnl config.h.in, dnl - extra AC_SUBST calls, so that the right substitutions are made. m4_foreach_w([gltype], [$1], [AH_TEMPLATE([HAVE_SIGNED_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]), [Define to 1 if ']gltype[' is a signed integer type.])]) for gltype in $1 ; do AC_CACHE_CHECK([whether $gltype is signed], [gl_cv_type_${gltype}_signed], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([$2[ int verify[2 * (($gltype) -1 < ($gltype) 0) - 1];]])], result=yes, result=no) eval gl_cv_type_${gltype}_signed=\$result ]) eval result=\$gl_cv_type_${gltype}_signed GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` if test "$result" = yes; then AC_DEFINE_UNQUOTED([HAVE_SIGNED_${GLTYPE}], [1]) eval HAVE_SIGNED_${GLTYPE}=1 else eval HAVE_SIGNED_${GLTYPE}=0 fi done m4_foreach_w([gltype], [$1], [AC_SUBST([HAVE_SIGNED_]m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_]))]) ]) dnl gl_INTEGER_TYPE_SUFFIX(TYPES, INCLUDES) dnl Determine the suffix to use for integer constants of the given types. dnl Define t_SUFFIX for each such type. AC_DEFUN([gl_INTEGER_TYPE_SUFFIX], [ dnl Use a shell loop, to avoid bloating configure, and dnl - extra AH_TEMPLATE calls, so that autoheader knows what to put into dnl config.h.in, dnl - extra AC_SUBST calls, so that the right substitutions are made. m4_foreach_w([gltype], [$1], [AH_TEMPLATE(m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_])[_SUFFIX], [Define to l, ll, u, ul, ull, etc., as suitable for constants of type ']gltype['.])]) for gltype in $1 ; do AC_CACHE_CHECK([for $gltype integer literal suffix], [gl_cv_type_${gltype}_suffix], [eval gl_cv_type_${gltype}_suffix=no eval result=\$gl_cv_type_${gltype}_signed if test "$result" = yes; then glsufu= else glsufu=u fi for glsuf in "$glsufu" ${glsufu}l ${glsufu}ll ${glsufu}i64; do case $glsuf in '') gltype1='int';; l) gltype1='long int';; ll) gltype1='long long int';; i64) gltype1='__int64';; u) gltype1='unsigned int';; ul) gltype1='unsigned long int';; ull) gltype1='unsigned long long int';; ui64)gltype1='unsigned __int64';; esac AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([$2[ extern $gltype foo; extern $gltype1 foo;]])], [eval gl_cv_type_${gltype}_suffix=\$glsuf]) eval result=\$gl_cv_type_${gltype}_suffix test "$result" != no && break done]) GLTYPE=`echo $gltype | tr 'abcdefghijklmnopqrstuvwxyz ' 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_'` eval result=\$gl_cv_type_${gltype}_suffix test "$result" = no && result= eval ${GLTYPE}_SUFFIX=\$result AC_DEFINE_UNQUOTED([${GLTYPE}_SUFFIX], [$result]) done m4_foreach_w([gltype], [$1], [AC_SUBST(m4_translit(gltype,[abcdefghijklmnopqrstuvwxyz ],[ABCDEFGHIJKLMNOPQRSTUVWXYZ_])[_SUFFIX])]) ]) dnl gl_STDINT_INCLUDES AC_DEFUN([gl_STDINT_INCLUDES], [[ #include #include #if HAVE_WCHAR_H # include #endif ]]) dnl gl_STDINT_TYPE_PROPERTIES dnl Compute HAVE_SIGNED_t, BITSIZEOF_t and t_SUFFIX, for all the types t dnl of interest to stdint.in.h. AC_DEFUN([gl_STDINT_TYPE_PROPERTIES], [ AC_REQUIRE([gl_MULTIARCH]) if test $APPLE_UNIVERSAL_BUILD = 0; then gl_STDINT_BITSIZEOF([ptrdiff_t size_t], [gl_STDINT_INCLUDES]) fi gl_STDINT_BITSIZEOF([sig_atomic_t wchar_t wint_t], [gl_STDINT_INCLUDES]) gl_CHECK_TYPES_SIGNED([sig_atomic_t wchar_t wint_t], [gl_STDINT_INCLUDES]) gl_cv_type_ptrdiff_t_signed=yes gl_cv_type_size_t_signed=no if test $APPLE_UNIVERSAL_BUILD = 0; then gl_INTEGER_TYPE_SUFFIX([ptrdiff_t size_t], [gl_STDINT_INCLUDES]) fi gl_INTEGER_TYPE_SUFFIX([sig_atomic_t wchar_t wint_t], [gl_STDINT_INCLUDES]) dnl If wint_t is smaller than 'int', it cannot satisfy the ISO C 99 dnl requirement that wint_t is "unchanged by default argument promotions". dnl In this case gnulib's and override wint_t. dnl Set the variable BITSIZEOF_WINT_T accordingly. if test $GNULIBHEADERS_OVERRIDE_WINT_T = 1; then BITSIZEOF_WINT_T=32 fi ]) libffcall-2.5/gnulib-m4/00gnulib.m40000664000000000000000000000701714631432055013657 00000000000000# 00gnulib.m4 # serial 9 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl This file must be named something that sorts before all other dnl gnulib-provided .m4 files. It is needed until the clang fix has dnl been included in Autoconf. # The following definitions arrange to use a compiler option # -Werror=implicit-function-declaration in AC_CHECK_DECL, when the # compiler is clang. Without it, clang implicitly declares "known" # library functions in C mode, but not in C++ mode, which would cause # Gnulib to omit a declaration and thus later produce an error in C++ # mode. As of clang 9.0, these "known" functions are identified through # LIBBUILTIN invocations in the LLVM source file # llvm/tools/clang/include/clang/Basic/Builtins.def. # It's not possible to AC_REQUIRE the extra tests from AC_CHECK_DECL, # because AC_CHECK_DECL, like other Autoconf built-ins, is not supposed # to AC_REQUIRE anything: some configure.ac files have their first # AC_CHECK_DECL executed conditionally. Therefore append the extra tests # to AC_PROG_CC. AC_DEFUN([gl_COMPILER_CLANG], [ dnl AC_REQUIRE([AC_PROG_CC]) AC_CACHE_CHECK([whether the compiler is clang], [gl_cv_compiler_clang], [dnl Use _AC_COMPILE_IFELSE instead of AC_EGREP_CPP, to avoid error dnl "circular dependency of AC_LANG_COMPILER(C)" if AC_PROG_CC has dnl not yet been invoked. _AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ #ifdef __clang__ barfbarf #endif ]],[[]]) ], [gl_cv_compiler_clang=no], [gl_cv_compiler_clang=yes]) ]) ]) AC_DEFUN([gl_COMPILER_PREPARE_CHECK_DECL], [ dnl AC_REQUIRE([AC_PROG_CC]) dnl AC_REQUIRE([gl_COMPILER_CLANG]) AC_CACHE_CHECK([for compiler option needed when checking for declarations], [gl_cv_compiler_check_decl_option], [if test $gl_cv_compiler_clang = yes; then dnl Test whether the compiler supports the option dnl '-Werror=implicit-function-declaration'. saved_ac_compile="$ac_compile" ac_compile="$ac_compile -Werror=implicit-function-declaration" dnl Use _AC_COMPILE_IFELSE instead of AC_COMPILE_IFELSE, to avoid a dnl warning "AC_COMPILE_IFELSE was called before AC_USE_SYSTEM_EXTENSIONS". _AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[]],[[]])], [gl_cv_compiler_check_decl_option='-Werror=implicit-function-declaration'], [gl_cv_compiler_check_decl_option=none]) ac_compile="$saved_ac_compile" else gl_cv_compiler_check_decl_option=none fi ]) if test "x$gl_cv_compiler_check_decl_option" != xnone; then ac_compile_for_check_decl="$ac_compile $gl_cv_compiler_check_decl_option" else ac_compile_for_check_decl="$ac_compile" fi ]) dnl Redefine _AC_CHECK_DECL_BODY so that it references ac_compile_for_check_decl dnl instead of ac_compile. If, for whatever reason, the override of AC_PROG_CC dnl in zzgnulib.m4 is inactive, use the original ac_compile. m4_define([_AC_CHECK_DECL_BODY], [ ac_saved_ac_compile="$ac_compile" if test -n "$ac_compile_for_check_decl"; then ac_compile="$ac_compile_for_check_decl" fi] m4_defn([_AC_CHECK_DECL_BODY])[ ac_compile="$ac_saved_ac_compile" ]) # gl_00GNULIB # ----------- # Witness macro that this file has been included. Needed to force # Automake to include this file prior to all other gnulib .m4 files. AC_DEFUN([gl_00GNULIB]) libffcall-2.5/gnulib-m4/stdnoreturn.m40000664000000000000000000000365414631432055014631 00000000000000# stdnoreturn.m4 # serial 1 dnl Copyright 2012-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Check for stdnoreturn.h that conforms to C11. # Prepare for substituting if it is not supported. AC_DEFUN([gl_STDNORETURN_H], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_os" in cygwin*) dnl Regardless whether a working exists or not, dnl we need our own , because of the definition dnl of _Noreturn done by gnulib-common.m4. GL_GENERATE_STDNORETURN_H=true ;; *) AC_CACHE_CHECK([for working stdnoreturn.h], [gl_cv_header_working_stdnoreturn_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include #include #if defined _WIN32 && !defined __CYGWIN__ # include #endif /* Do not check for 'noreturn' after the return type. C11 allows it, but it's rarely done that way and circa-2012 bleeding-edge GCC rejects it when given -Werror=old-style-declaration. */ noreturn void foo1 (void) { exit (0); } _Noreturn void foo2 (void) { exit (0); } int testit (int argc, char **argv) { if (argc & 1) return 0; (argv[0][0] ? foo1 : foo2) (); } ]])], [gl_cv_header_working_stdnoreturn_h=yes], [gl_cv_header_working_stdnoreturn_h=no])]) if test $gl_cv_header_working_stdnoreturn_h = yes; then GL_GENERATE_STDNORETURN_H=false else GL_GENERATE_STDNORETURN_H=true fi ;; esac ]) libffcall-2.5/gnulib-m4/fcntl_h.m40000664000000000000000000000522414631432055013652 00000000000000# fcntl_h.m4 # serial 20 dnl Copyright (C) 2006-2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Configure fcntl.h. dnl Written by Paul Eggert. AC_DEFUN_ONCE([gl_FCNTL_H], [ AC_REQUIRE([gl_FCNTL_H_DEFAULTS]) AC_REQUIRE([gl_FCNTL_O_FLAGS]) gl_NEXT_HEADERS([fcntl.h]) dnl Ensure the type pid_t gets defined. AC_REQUIRE([AC_TYPE_PID_T]) dnl Ensure the type mode_t gets defined. AC_REQUIRE([AC_TYPE_MODE_T]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, if it is not common dnl enough to be declared everywhere. gl_WARN_ON_USE_PREPARE([[#include ]], [fcntl openat]) ]) # gl_FCNTL_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_FCNTL_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_FCNTL_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_FCNTL_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_FCNTL_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CREAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FCNTL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_NONBLOCKING]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OPEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OPENAT]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_CREAT], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_OPEN], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_FCNTL_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_FCNTL_H_DEFAULTS]) ]) AC_DEFUN([gl_FCNTL_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_FCNTL=1; AC_SUBST([HAVE_FCNTL]) HAVE_OPENAT=1; AC_SUBST([HAVE_OPENAT]) REPLACE_CREAT=0; AC_SUBST([REPLACE_CREAT]) REPLACE_FCNTL=0; AC_SUBST([REPLACE_FCNTL]) REPLACE_OPEN=0; AC_SUBST([REPLACE_OPEN]) REPLACE_OPENAT=0; AC_SUBST([REPLACE_OPENAT]) ]) libffcall-2.5/gnulib-m4/off64_t.m40000664000000000000000000000163214631432055013503 00000000000000# off64_t.m4 # serial 1 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl Check whether defines the 'off64_t' type. dnl Set HAVE_OFF64_T. AC_DEFUN([gl_TYPE_OFF64_T], [ dnl Persuade glibc , , , , dnl to define off64_t. AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) AC_CACHE_CHECK([for off64_t], [gl_cv_off64_t], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[int x = sizeof (off64_t *) + sizeof (off64_t); return !x;]])], [gl_cv_off64_t=yes], [gl_cv_off64_t=no])]) if test $gl_cv_off64_t != no; then HAVE_OFF64_T=1 else HAVE_OFF64_T=0 fi AC_SUBST([HAVE_OFF64_T]) ]) libffcall-2.5/gnulib-m4/pthread_h.m40000664000000000000000000003565214631432055014203 00000000000000# pthread_h.m4 # serial 11 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_PTHREAD_H_PART1], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_PTHREAD_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_PTHREADLIB]) gl_CHECK_NEXT_HEADERS([pthread.h]) if test $ac_cv_header_pthread_h = yes; then HAVE_PTHREAD_H=1 dnl On mingw, if --enable-threads=windows or gl_AVOID_WINPTHREAD is used, dnl ignore the from the mingw-w64 winpthreads library. m4_ifdef([gl_][THREADLIB], [ AC_REQUIRE([gl_][THREADLIB]) if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then HAVE_PTHREAD_H=0 fi ]) else HAVE_PTHREAD_H=0 fi AC_SUBST([HAVE_PTHREAD_H]) AC_CHECK_TYPES([pthread_t, pthread_spinlock_t], [], [], [AC_INCLUDES_DEFAULT[ #if HAVE_PTHREAD_H #include #endif]]) if test $ac_cv_type_pthread_t != yes; then HAVE_PTHREAD_T=0 fi if test $ac_cv_type_pthread_spinlock_t != yes; then HAVE_PTHREAD_SPINLOCK_T=0 fi ]) AC_DEFUN([gl_PTHREAD_H], [ AC_REQUIRE([gl_PTHREAD_H_PART1]) dnl Set HAVE_PTHREAD_SPIN_INIT, REPLACE_PTHREAD_SPIN_INIT. gl_PTHREAD_SPIN dnl Constants may be defined as C preprocessor macros or as enum items. AC_CACHE_CHECK([for PTHREAD_CREATE_DETACHED], [gl_cv_const_PTHREAD_CREATE_DETACHED], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int x = PTHREAD_CREATE_DETACHED; ]], [[]])], [gl_cv_const_PTHREAD_CREATE_DETACHED=yes], [gl_cv_const_PTHREAD_CREATE_DETACHED=no]) ]) if test $gl_cv_const_PTHREAD_CREATE_DETACHED != yes; then HAVE_PTHREAD_CREATE_DETACHED=0 fi AC_CACHE_CHECK([for PTHREAD_MUTEX_RECURSIVE], [gl_cv_const_PTHREAD_MUTEX_RECURSIVE], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int x = PTHREAD_MUTEX_RECURSIVE; ]], [[]])], [gl_cv_const_PTHREAD_MUTEX_RECURSIVE=yes], [gl_cv_const_PTHREAD_MUTEX_RECURSIVE=no]) ]) if test $gl_cv_const_PTHREAD_MUTEX_RECURSIVE != yes; then HAVE_PTHREAD_MUTEX_RECURSIVE=0 fi AC_CACHE_CHECK([for PTHREAD_MUTEX_ROBUST], [gl_cv_const_PTHREAD_MUTEX_ROBUST], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int x = PTHREAD_MUTEX_ROBUST; ]], [[]])], [gl_cv_const_PTHREAD_MUTEX_ROBUST=yes], [gl_cv_const_PTHREAD_MUTEX_ROBUST=no]) ]) if test $gl_cv_const_PTHREAD_MUTEX_ROBUST != yes; then HAVE_PTHREAD_MUTEX_ROBUST=0 fi AC_CACHE_CHECK([for PTHREAD_PROCESS_SHARED], [gl_cv_const_PTHREAD_PROCESS_SHARED], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int x = PTHREAD_PROCESS_SHARED; ]], [[]])], [gl_cv_const_PTHREAD_PROCESS_SHARED=yes], [gl_cv_const_PTHREAD_PROCESS_SHARED=no]) ]) if test $gl_cv_const_PTHREAD_PROCESS_SHARED != yes; then HAVE_PTHREAD_PROCESS_SHARED=0 fi dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, if it is not common dnl enough to be declared everywhere. gl_WARN_ON_USE_PREPARE([[#include ]], [ pthread_create pthread_attr_init pthread_attr_getdetachstate pthread_attr_setdetachstate pthread_attr_destroy pthread_self pthread_equal pthread_detach pthread_join pthread_exit pthread_once pthread_mutex_init pthread_mutexattr_init pthread_mutexattr_gettype pthread_mutexattr_settype pthread_mutexattr_getrobust pthread_mutexattr_setrobust pthread_mutexattr_destroy pthread_mutex_lock pthread_mutex_trylock pthread_mutex_timedlock pthread_mutex_unlock pthread_mutex_destroy pthread_rwlock_init pthread_rwlockattr_init pthread_rwlockattr_destroy pthread_rwlock_rdlock pthread_rwlock_wrlock pthread_rwlock_tryrdlock pthread_rwlock_trywrlock pthread_rwlock_timedrdlock pthread_rwlock_timedwrlock pthread_rwlock_unlock pthread_rwlock_destroy pthread_cond_init pthread_condattr_init pthread_condattr_destroy pthread_cond_wait pthread_cond_timedwait pthread_cond_signal pthread_cond_broadcast pthread_cond_destroy pthread_key_create pthread_setspecific pthread_getspecific pthread_key_delete pthread_spin_init pthread_spin_lock pthread_spin_trylock pthread_spin_unlock pthread_spin_destroy]) AC_REQUIRE([AC_C_RESTRICT]) dnl For backward compatibility with gnulib versions <= 2019-07. LIB_PTHREAD="$LIBPMULTITHREAD" AC_SUBST([LIB_PTHREAD]) ]) # gl_PTHREAD_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_PTHREAD_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_PTHREAD_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_PTHREAD_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_PTHREAD_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_THREAD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_ONCE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_MUTEX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_RWLOCK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_COND]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_TSS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_SPIN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PTHREAD_MUTEX_TIMEDLOCK]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_PTHREAD_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_PTHREAD_H_DEFAULTS]) ]) AC_DEFUN([gl_PTHREAD_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_PTHREAD_T=1; AC_SUBST([HAVE_PTHREAD_T]) HAVE_PTHREAD_SPINLOCK_T=1; AC_SUBST([HAVE_PTHREAD_SPINLOCK_T]) HAVE_PTHREAD_CREATE_DETACHED=1; AC_SUBST([HAVE_PTHREAD_CREATE_DETACHED]) HAVE_PTHREAD_MUTEX_RECURSIVE=1; AC_SUBST([HAVE_PTHREAD_MUTEX_RECURSIVE]) HAVE_PTHREAD_MUTEX_ROBUST=1; AC_SUBST([HAVE_PTHREAD_MUTEX_ROBUST]) HAVE_PTHREAD_PROCESS_SHARED=1; AC_SUBST([HAVE_PTHREAD_PROCESS_SHARED]) HAVE_PTHREAD_CREATE=1; AC_SUBST([HAVE_PTHREAD_CREATE]) HAVE_PTHREAD_ATTR_INIT=1; AC_SUBST([HAVE_PTHREAD_ATTR_INIT]) HAVE_PTHREAD_ATTR_GETDETACHSTATE=1; AC_SUBST([HAVE_PTHREAD_ATTR_GETDETACHSTATE]) HAVE_PTHREAD_ATTR_SETDETACHSTATE=1; AC_SUBST([HAVE_PTHREAD_ATTR_SETDETACHSTATE]) HAVE_PTHREAD_ATTR_DESTROY=1; AC_SUBST([HAVE_PTHREAD_ATTR_DESTROY]) HAVE_PTHREAD_SELF=1; AC_SUBST([HAVE_PTHREAD_SELF]) HAVE_PTHREAD_EQUAL=1; AC_SUBST([HAVE_PTHREAD_EQUAL]) HAVE_PTHREAD_DETACH=1; AC_SUBST([HAVE_PTHREAD_DETACH]) HAVE_PTHREAD_JOIN=1; AC_SUBST([HAVE_PTHREAD_JOIN]) HAVE_PTHREAD_EXIT=1; AC_SUBST([HAVE_PTHREAD_EXIT]) HAVE_PTHREAD_ONCE=1; AC_SUBST([HAVE_PTHREAD_ONCE]) HAVE_PTHREAD_MUTEX_INIT=1; AC_SUBST([HAVE_PTHREAD_MUTEX_INIT]) HAVE_PTHREAD_MUTEXATTR_INIT=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_INIT]) HAVE_PTHREAD_MUTEXATTR_GETTYPE=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_GETTYPE]) HAVE_PTHREAD_MUTEXATTR_SETTYPE=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_SETTYPE]) HAVE_PTHREAD_MUTEXATTR_GETROBUST=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_GETROBUST]) HAVE_PTHREAD_MUTEXATTR_SETROBUST=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_SETROBUST]) HAVE_PTHREAD_MUTEXATTR_DESTROY=1; AC_SUBST([HAVE_PTHREAD_MUTEXATTR_DESTROY]) HAVE_PTHREAD_MUTEX_LOCK=1; AC_SUBST([HAVE_PTHREAD_MUTEX_LOCK]) HAVE_PTHREAD_MUTEX_TRYLOCK=1; AC_SUBST([HAVE_PTHREAD_MUTEX_TRYLOCK]) HAVE_PTHREAD_MUTEX_TIMEDLOCK=1; AC_SUBST([HAVE_PTHREAD_MUTEX_TIMEDLOCK]) HAVE_PTHREAD_MUTEX_UNLOCK=1; AC_SUBST([HAVE_PTHREAD_MUTEX_UNLOCK]) HAVE_PTHREAD_MUTEX_DESTROY=1; AC_SUBST([HAVE_PTHREAD_MUTEX_DESTROY]) HAVE_PTHREAD_RWLOCK_INIT=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_INIT]) HAVE_PTHREAD_RWLOCKATTR_INIT=1; AC_SUBST([HAVE_PTHREAD_RWLOCKATTR_INIT]) HAVE_PTHREAD_RWLOCKATTR_DESTROY=1; AC_SUBST([HAVE_PTHREAD_RWLOCKATTR_DESTROY]) HAVE_PTHREAD_RWLOCK_RDLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_RDLOCK]) HAVE_PTHREAD_RWLOCK_WRLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_WRLOCK]) HAVE_PTHREAD_RWLOCK_TRYRDLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_TRYRDLOCK]) HAVE_PTHREAD_RWLOCK_TRYWRLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_TRYWRLOCK]) HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_TIMEDRDLOCK]) HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_TIMEDWRLOCK]) HAVE_PTHREAD_RWLOCK_UNLOCK=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_UNLOCK]) HAVE_PTHREAD_RWLOCK_DESTROY=1; AC_SUBST([HAVE_PTHREAD_RWLOCK_DESTROY]) HAVE_PTHREAD_COND_INIT=1; AC_SUBST([HAVE_PTHREAD_COND_INIT]) HAVE_PTHREAD_CONDATTR_INIT=1; AC_SUBST([HAVE_PTHREAD_CONDATTR_INIT]) HAVE_PTHREAD_CONDATTR_DESTROY=1; AC_SUBST([HAVE_PTHREAD_CONDATTR_DESTROY]) HAVE_PTHREAD_COND_WAIT=1; AC_SUBST([HAVE_PTHREAD_COND_WAIT]) HAVE_PTHREAD_COND_TIMEDWAIT=1; AC_SUBST([HAVE_PTHREAD_COND_TIMEDWAIT]) HAVE_PTHREAD_COND_SIGNAL=1; AC_SUBST([HAVE_PTHREAD_COND_SIGNAL]) HAVE_PTHREAD_COND_BROADCAST=1; AC_SUBST([HAVE_PTHREAD_COND_BROADCAST]) HAVE_PTHREAD_COND_DESTROY=1; AC_SUBST([HAVE_PTHREAD_COND_DESTROY]) HAVE_PTHREAD_KEY_CREATE=1; AC_SUBST([HAVE_PTHREAD_KEY_CREATE]) HAVE_PTHREAD_SETSPECIFIC=1; AC_SUBST([HAVE_PTHREAD_SETSPECIFIC]) HAVE_PTHREAD_GETSPECIFIC=1; AC_SUBST([HAVE_PTHREAD_GETSPECIFIC]) HAVE_PTHREAD_KEY_DELETE=1; AC_SUBST([HAVE_PTHREAD_KEY_DELETE]) HAVE_PTHREAD_SPIN_INIT=1; AC_SUBST([HAVE_PTHREAD_SPIN_INIT]) HAVE_PTHREAD_SPIN_LOCK=1; AC_SUBST([HAVE_PTHREAD_SPIN_LOCK]) HAVE_PTHREAD_SPIN_TRYLOCK=1; AC_SUBST([HAVE_PTHREAD_SPIN_TRYLOCK]) HAVE_PTHREAD_SPIN_UNLOCK=1; AC_SUBST([HAVE_PTHREAD_SPIN_UNLOCK]) HAVE_PTHREAD_SPIN_DESTROY=1; AC_SUBST([HAVE_PTHREAD_SPIN_DESTROY]) REPLACE_PTHREAD_CREATE=0; AC_SUBST([REPLACE_PTHREAD_CREATE]) REPLACE_PTHREAD_ATTR_INIT=0; AC_SUBST([REPLACE_PTHREAD_ATTR_INIT]) REPLACE_PTHREAD_ATTR_GETDETACHSTATE=0; AC_SUBST([REPLACE_PTHREAD_ATTR_GETDETACHSTATE]) REPLACE_PTHREAD_ATTR_SETDETACHSTATE=0; AC_SUBST([REPLACE_PTHREAD_ATTR_SETDETACHSTATE]) REPLACE_PTHREAD_ATTR_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_ATTR_DESTROY]) REPLACE_PTHREAD_SELF=0; AC_SUBST([REPLACE_PTHREAD_SELF]) REPLACE_PTHREAD_EQUAL=0; AC_SUBST([REPLACE_PTHREAD_EQUAL]) REPLACE_PTHREAD_DETACH=0; AC_SUBST([REPLACE_PTHREAD_DETACH]) REPLACE_PTHREAD_JOIN=0; AC_SUBST([REPLACE_PTHREAD_JOIN]) REPLACE_PTHREAD_EXIT=0; AC_SUBST([REPLACE_PTHREAD_EXIT]) REPLACE_PTHREAD_ONCE=0; AC_SUBST([REPLACE_PTHREAD_ONCE]) REPLACE_PTHREAD_MUTEX_INIT=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_INIT]) REPLACE_PTHREAD_MUTEXATTR_INIT=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_INIT]) REPLACE_PTHREAD_MUTEXATTR_GETTYPE=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_GETTYPE]) REPLACE_PTHREAD_MUTEXATTR_SETTYPE=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_SETTYPE]) REPLACE_PTHREAD_MUTEXATTR_GETROBUST=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_GETROBUST]) REPLACE_PTHREAD_MUTEXATTR_SETROBUST=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_SETROBUST]) REPLACE_PTHREAD_MUTEXATTR_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_MUTEXATTR_DESTROY]) REPLACE_PTHREAD_MUTEX_LOCK=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_LOCK]) REPLACE_PTHREAD_MUTEX_TRYLOCK=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_TRYLOCK]) REPLACE_PTHREAD_MUTEX_TIMEDLOCK=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_TIMEDLOCK]) REPLACE_PTHREAD_MUTEX_UNLOCK=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_UNLOCK]) REPLACE_PTHREAD_MUTEX_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_MUTEX_DESTROY]) REPLACE_PTHREAD_RWLOCK_INIT=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_INIT]) REPLACE_PTHREAD_RWLOCKATTR_INIT=0; AC_SUBST([REPLACE_PTHREAD_RWLOCKATTR_INIT]) REPLACE_PTHREAD_RWLOCKATTR_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_RWLOCKATTR_DESTROY]) REPLACE_PTHREAD_RWLOCK_RDLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_RDLOCK]) REPLACE_PTHREAD_RWLOCK_WRLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_WRLOCK]) REPLACE_PTHREAD_RWLOCK_TRYRDLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_TRYRDLOCK]) REPLACE_PTHREAD_RWLOCK_TRYWRLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_TRYWRLOCK]) REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_TIMEDRDLOCK]) REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_TIMEDWRLOCK]) REPLACE_PTHREAD_RWLOCK_UNLOCK=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_UNLOCK]) REPLACE_PTHREAD_RWLOCK_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_RWLOCK_DESTROY]) REPLACE_PTHREAD_COND_INIT=0; AC_SUBST([REPLACE_PTHREAD_COND_INIT]) REPLACE_PTHREAD_CONDATTR_INIT=0; AC_SUBST([REPLACE_PTHREAD_CONDATTR_INIT]) REPLACE_PTHREAD_CONDATTR_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_CONDATTR_DESTROY]) REPLACE_PTHREAD_COND_WAIT=0; AC_SUBST([REPLACE_PTHREAD_COND_WAIT]) REPLACE_PTHREAD_COND_TIMEDWAIT=0; AC_SUBST([REPLACE_PTHREAD_COND_TIMEDWAIT]) REPLACE_PTHREAD_COND_SIGNAL=0; AC_SUBST([REPLACE_PTHREAD_COND_SIGNAL]) REPLACE_PTHREAD_COND_BROADCAST=0; AC_SUBST([REPLACE_PTHREAD_COND_BROADCAST]) REPLACE_PTHREAD_COND_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_COND_DESTROY]) REPLACE_PTHREAD_KEY_CREATE=0; AC_SUBST([REPLACE_PTHREAD_KEY_CREATE]) REPLACE_PTHREAD_SETSPECIFIC=0; AC_SUBST([REPLACE_PTHREAD_SETSPECIFIC]) REPLACE_PTHREAD_GETSPECIFIC=0; AC_SUBST([REPLACE_PTHREAD_GETSPECIFIC]) REPLACE_PTHREAD_KEY_DELETE=0; AC_SUBST([REPLACE_PTHREAD_KEY_DELETE]) REPLACE_PTHREAD_SPIN_INIT=0; AC_SUBST([REPLACE_PTHREAD_SPIN_INIT]) REPLACE_PTHREAD_SPIN_LOCK=0; AC_SUBST([REPLACE_PTHREAD_SPIN_LOCK]) REPLACE_PTHREAD_SPIN_TRYLOCK=0; AC_SUBST([REPLACE_PTHREAD_SPIN_TRYLOCK]) REPLACE_PTHREAD_SPIN_UNLOCK=0; AC_SUBST([REPLACE_PTHREAD_SPIN_UNLOCK]) REPLACE_PTHREAD_SPIN_DESTROY=0; AC_SUBST([REPLACE_PTHREAD_SPIN_DESTROY]) ]) libffcall-2.5/gnulib-m4/pthread-spin.m40000664000000000000000000000510114631432055014625 00000000000000# pthread-spin.m4 # serial 8 dnl Copyright (C) 2019-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_PTHREAD_SPIN], [ AC_REQUIRE([gl_PTHREAD_H_PART1]) AC_REQUIRE([AC_CANONICAL_HOST]) if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then dnl Choose function names that don't conflict with the mingw-w64 winpthreads dnl library. REPLACE_PTHREAD_SPIN_INIT=1 REPLACE_PTHREAD_SPIN_LOCK=1 REPLACE_PTHREAD_SPIN_TRYLOCK=1 REPLACE_PTHREAD_SPIN_UNLOCK=1 REPLACE_PTHREAD_SPIN_DESTROY=1 else if test $HAVE_PTHREAD_H = 0 || test $HAVE_PTHREAD_SPINLOCK_T = 0; then HAVE_PTHREAD_SPIN_INIT=0 HAVE_PTHREAD_SPIN_LOCK=0 HAVE_PTHREAD_SPIN_TRYLOCK=0 HAVE_PTHREAD_SPIN_UNLOCK=0 HAVE_PTHREAD_SPIN_DESTROY=0 else dnl Test whether the gnulib module 'threadlib' is in use. dnl Some packages like Emacs use --avoid=threadlib. dnl Write the symbol in such a way that it does not cause 'aclocal' to pick dnl the threadlib.m4 file that is installed in $PREFIX/share/aclocal/. m4_ifdef([gl_][THREADLIB], [ AC_REQUIRE([gl_][THREADLIB]) dnl Test whether the functions actually exist. dnl FreeBSD 5.2.1 declares them but does not define them. AC_CACHE_CHECK([for pthread_spin_init], [gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD], [gl_saved_LIBS="$LIBS" LIBS="$LIBS $LIBMULTITHREAD" AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[pthread_spinlock_t lock; return pthread_spin_init (&lock, 0); ]]) ], [gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD=yes], [gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD=no]) LIBS="$gl_saved_LIBS" ]) if test $gl_cv_func_pthread_spin_init_in_LIBMULTITHREAD != yes; then HAVE_PTHREAD_SPIN_INIT=0 REPLACE_PTHREAD_SPIN_INIT=1 HAVE_PTHREAD_SPIN_LOCK=0 REPLACE_PTHREAD_SPIN_LOCK=1 HAVE_PTHREAD_SPIN_TRYLOCK=0 REPLACE_PTHREAD_SPIN_TRYLOCK=1 HAVE_PTHREAD_SPIN_UNLOCK=0 REPLACE_PTHREAD_SPIN_UNLOCK=1 HAVE_PTHREAD_SPIN_DESTROY=0 REPLACE_PTHREAD_SPIN_DESTROY=1 fi ], [ : ]) fi fi ]) libffcall-2.5/gnulib-m4/close.m40000664000000000000000000000223114631432055013335 00000000000000# close.m4 # serial 10 dnl Copyright (C) 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN_ONCE([gl_FUNC_CLOSE], [ AC_REQUIRE([gl_UNISTD_H_DEFAULTS]) m4_ifdef([gl_MSVC_INVAL], [ AC_REQUIRE([gl_MSVC_INVAL]) if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then REPLACE_CLOSE=1 fi ]) m4_ifdef([gl_PREREQ_SYS_H_WINSOCK2], [ gl_PREREQ_SYS_H_WINSOCK2 if test $UNISTD_H_HAVE_WINSOCK2_H = 1; then dnl Even if the 'socket' module is not used here, another part of the dnl application may use it and pass file descriptors that refer to dnl sockets to the close() function. So enable the support for sockets. REPLACE_CLOSE=1 fi ]) dnl Replace close() for supporting the gnulib-defined fchdir() function, dnl to keep fchdir's bookkeeping up-to-date. m4_ifdef([gl_FUNC_FCHDIR], [ if test $REPLACE_CLOSE = 0; then gl_TEST_FCHDIR if test $HAVE_FCHDIR = 0; then REPLACE_CLOSE=1 fi fi ]) ]) libffcall-2.5/gnulib-m4/zzgnulib.m40000664000000000000000000000152414631432055014100 00000000000000# zzgnulib.m4 # serial 1 dnl Copyright (C) 2020-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl This file must be named something that sorts after all other dnl package- or gnulib-provided .m4 files - at least for those packages dnl that redefine AC_PROG_CC. dnl Redefine AC_PROG_CC so that it ends with invocations of gl_COMPILER_CLANG dnl and gl_COMPILER_PREPARE_CHECK_DECL. m4_define([AC_PROG_CC], m4_defn([AC_PROG_CC])[ gl_COMPILER_CLANG gl_COMPILER_PREPARE_CHECK_DECL ]) # gl_ZZGNULIB # ----------- # Witness macro that this file has been included. Needed to force # Automake to include this file after all other gnulib .m4 files. AC_DEFUN([gl_ZZGNULIB]) libffcall-2.5/gnulib-m4/stdio_h.m40000664000000000000000000003105214641402034013657 00000000000000# stdio_h.m4 # serial 75 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_STDIO_H_EARLY], [ dnl Defining __USE_MINGW_ANSI_STDIO to 1 must be done early, because dnl the results of several configure tests depend on it: The tests dnl - checking whether snprintf returns a byte count as in C99... dnl - checking whether snprintf truncates the result as in C99... dnl - checking whether printf supports the 'F' directive... dnl - checking whether printf supports the grouping flag... dnl - checking whether printf supports the zero flag correctly... dnl - checking whether printf supports infinite 'double' arguments... dnl - checking whether printf supports large precisions... dnl report 'yes' if __USE_MINGW_ANSI_STDIO is 1 but 'no' if dnl __USE_MINGW_ANSI_STDIO is not set. AH_VERBATIM([MINGW_ANSI_STDIO], [/* Use GNU style printf and scanf. */ #ifndef __USE_MINGW_ANSI_STDIO # undef __USE_MINGW_ANSI_STDIO #endif ]) AC_DEFINE([__USE_MINGW_ANSI_STDIO]) ]) AC_DEFUN_ONCE([gl_STDIO_H], [ AC_REQUIRE([gl_STDIO_H_DEFAULTS]) gl_NEXT_HEADERS([stdio.h]) dnl Determine whether __USE_MINGW_ANSI_STDIO makes printf and dnl inttypes.h behave like gnu instead of system; we must give our dnl printf wrapper the right attribute to match. AC_CACHE_CHECK([which flavor of printf attribute matches inttypes macros], [gl_cv_func_printf_attribute_flavor], [AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[ #define __STDC_FORMAT_MACROS 1 #include #include /* For non-mingw systems, compilation will trivially succeed. For mingw, compilation will succeed for older mingw (system printf, "I64d") and fail for newer mingw (gnu printf, "lld"). */ #if (defined _WIN32 && ! defined __CYGWIN__) && \ (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 4)) extern char PRIdMAX_probe[sizeof PRIdMAX == sizeof "I64d" ? 1 : -1]; #endif ]])], [gl_cv_func_printf_attribute_flavor=system], [gl_cv_func_printf_attribute_flavor=gnu])]) if test "$gl_cv_func_printf_attribute_flavor" = gnu; then AC_DEFINE([GNULIB_PRINTF_ATTRIBUTE_FLAVOR_GNU], [1], [Define to 1 if printf and friends should be labeled with attribute "__gnu_printf__" instead of "__printf__"]) fi dnl For defining _PRINTF_NAN_LEN_MAX. gl_MUSL_LIBC dnl This ifdef is an optimization, to avoid performing a configure check whose dnl result is not used. But it does not make the test of dnl GNULIB_STDIO_H_NONBLOCKING or GNULIB_NONBLOCKING redundant. m4_ifdef([gl_NONBLOCKING_IO], [ gl_NONBLOCKING_IO if test $gl_cv_have_nonblocking != yes; then REPLACE_STDIO_READ_FUNCS=1 fi ]) dnl This ifdef is an optimization, to avoid performing a configure check whose dnl result is not used. But it does not make the test of dnl GNULIB_STDIO_H_SIGPIPE or GNULIB_SIGPIPE redundant. m4_ifdef([gl_SIGNAL_SIGPIPE], [ gl_SIGNAL_SIGPIPE if test $gl_cv_header_signal_h_SIGPIPE != yes; then REPLACE_STDIO_WRITE_FUNCS=1 fi ]) dnl This ifdef is an optimization, to avoid performing a configure check whose dnl result is not used. But it does not make the test of dnl GNULIB_STDIO_H_NONBLOCKING or GNULIB_NONBLOCKING redundant. m4_ifdef([gl_NONBLOCKING_IO], [ gl_NONBLOCKING_IO if test $gl_cv_have_nonblocking != yes; then REPLACE_STDIO_WRITE_FUNCS=1 fi ]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, and which is not dnl guaranteed by both C89 and C11. gl_WARN_ON_USE_PREPARE([[#include ]], [dprintf fpurge fseeko ftello getdelim getline gets pclose popen renameat snprintf tmpfile vdprintf vsnprintf]) AC_REQUIRE([AC_C_RESTRICT]) AC_CHECK_DECLS_ONCE([fcloseall]) if test $ac_cv_have_decl_fcloseall = no; then HAVE_DECL_FCLOSEALL=0 fi AC_CHECK_DECLS_ONCE([getw]) if test $ac_cv_have_decl_getw = no; then HAVE_DECL_GETW=0 fi AC_CHECK_DECLS_ONCE([putw]) if test $ac_cv_have_decl_putw = no; then HAVE_DECL_PUTW=0 fi ]) # gl_STDIO_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_STDIO_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_STDIO_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_STDIO_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_STDIO_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_DPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_DZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FCLOSE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FDOPEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FFLUSH]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FGETC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FGETS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FOPEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FOPEN_GNU]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FPRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FPURGE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FPUTC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FPUTS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FREAD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FREOPEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSCANF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSEEK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSEEKO]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FTELL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FTELLO]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FWRITE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETCHAR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETDELIM]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETLINE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OBSTACK_PRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OBSTACK_PRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OBSTACK_ZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PCLOSE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PERROR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_POPEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PUTC]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PUTCHAR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_PUTS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_REMOVE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RENAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RENAMEAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SCANF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SNPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SNZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SPRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STDIO_H_NONBLOCKING]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STDIO_H_SIGPIPE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TMPFILE]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VASPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VASZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VFSCANF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VSCANF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VDPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VDZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VFPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VFPRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VFZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VPRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VSNPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VSNZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VSPRINTF_POSIX]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VSZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_VZPRINTF]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_ZPRINTF]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_FCLOSEALL], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_FDOPEN], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_FILENO], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_GETW], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_PUTW], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_TEMPNAM], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_STDIO_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_STDIO_H_DEFAULTS]) ]) AC_DEFUN([gl_STDIO_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_DECL_FCLOSEALL=1; AC_SUBST([HAVE_DECL_FCLOSEALL]) HAVE_DECL_FPURGE=1; AC_SUBST([HAVE_DECL_FPURGE]) HAVE_DECL_FSEEKO=1; AC_SUBST([HAVE_DECL_FSEEKO]) HAVE_DECL_FTELLO=1; AC_SUBST([HAVE_DECL_FTELLO]) HAVE_DECL_GETDELIM=1; AC_SUBST([HAVE_DECL_GETDELIM]) HAVE_DECL_GETLINE=1; AC_SUBST([HAVE_DECL_GETLINE]) HAVE_DECL_GETW=1; AC_SUBST([HAVE_DECL_GETW]) HAVE_DECL_OBSTACK_PRINTF=1; AC_SUBST([HAVE_DECL_OBSTACK_PRINTF]) HAVE_DECL_PUTW=1; AC_SUBST([HAVE_DECL_PUTW]) HAVE_DECL_SNPRINTF=1; AC_SUBST([HAVE_DECL_SNPRINTF]) HAVE_DECL_VSNPRINTF=1; AC_SUBST([HAVE_DECL_VSNPRINTF]) HAVE_DPRINTF=1; AC_SUBST([HAVE_DPRINTF]) HAVE_FSEEKO=1; AC_SUBST([HAVE_FSEEKO]) HAVE_FTELLO=1; AC_SUBST([HAVE_FTELLO]) HAVE_PCLOSE=1; AC_SUBST([HAVE_PCLOSE]) HAVE_POPEN=1; AC_SUBST([HAVE_POPEN]) HAVE_RENAMEAT=1; AC_SUBST([HAVE_RENAMEAT]) HAVE_VASPRINTF=1; AC_SUBST([HAVE_VASPRINTF]) HAVE_VDPRINTF=1; AC_SUBST([HAVE_VDPRINTF]) REPLACE_DPRINTF=0; AC_SUBST([REPLACE_DPRINTF]) REPLACE_FCLOSE=0; AC_SUBST([REPLACE_FCLOSE]) REPLACE_FDOPEN=0; AC_SUBST([REPLACE_FDOPEN]) REPLACE_FFLUSH=0; AC_SUBST([REPLACE_FFLUSH]) REPLACE_FOPEN=0; AC_SUBST([REPLACE_FOPEN]) REPLACE_FOPEN_FOR_FOPEN_GNU=0; AC_SUBST([REPLACE_FOPEN_FOR_FOPEN_GNU]) REPLACE_FPRINTF=0; AC_SUBST([REPLACE_FPRINTF]) REPLACE_FPURGE=0; AC_SUBST([REPLACE_FPURGE]) REPLACE_FREOPEN=0; AC_SUBST([REPLACE_FREOPEN]) REPLACE_FSEEK=0; AC_SUBST([REPLACE_FSEEK]) REPLACE_FSEEKO=0; AC_SUBST([REPLACE_FSEEKO]) REPLACE_FTELL=0; AC_SUBST([REPLACE_FTELL]) REPLACE_FTELLO=0; AC_SUBST([REPLACE_FTELLO]) REPLACE_GETDELIM=0; AC_SUBST([REPLACE_GETDELIM]) REPLACE_GETLINE=0; AC_SUBST([REPLACE_GETLINE]) REPLACE_OBSTACK_PRINTF=0; AC_SUBST([REPLACE_OBSTACK_PRINTF]) REPLACE_PERROR=0; AC_SUBST([REPLACE_PERROR]) REPLACE_POPEN=0; AC_SUBST([REPLACE_POPEN]) REPLACE_PRINTF=0; AC_SUBST([REPLACE_PRINTF]) REPLACE_REMOVE=0; AC_SUBST([REPLACE_REMOVE]) REPLACE_RENAME=0; AC_SUBST([REPLACE_RENAME]) REPLACE_RENAMEAT=0; AC_SUBST([REPLACE_RENAMEAT]) REPLACE_SNPRINTF=0; AC_SUBST([REPLACE_SNPRINTF]) REPLACE_SPRINTF=0; AC_SUBST([REPLACE_SPRINTF]) REPLACE_STDIO_READ_FUNCS=0; AC_SUBST([REPLACE_STDIO_READ_FUNCS]) REPLACE_STDIO_WRITE_FUNCS=0; AC_SUBST([REPLACE_STDIO_WRITE_FUNCS]) REPLACE_TMPFILE=0; AC_SUBST([REPLACE_TMPFILE]) REPLACE_VASPRINTF=0; AC_SUBST([REPLACE_VASPRINTF]) REPLACE_VDPRINTF=0; AC_SUBST([REPLACE_VDPRINTF]) REPLACE_VFPRINTF=0; AC_SUBST([REPLACE_VFPRINTF]) REPLACE_VPRINTF=0; AC_SUBST([REPLACE_VPRINTF]) REPLACE_VSNPRINTF=0; AC_SUBST([REPLACE_VSNPRINTF]) REPLACE_VSPRINTF=0; AC_SUBST([REPLACE_VSPRINTF]) ]) libffcall-2.5/gnulib-m4/sparcv8+.m40000664000000000000000000000317514631432055013701 00000000000000# sparcv8+.m4 # serial 2 dnl Copyright (C) 2020-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl When compiling for SPARC in 32-bit mode, make sure that instructions for dnl SPARC v8+ are accepted. This is necessary for multiprocessing (for dnl instructions like 'membar' or 'cas'). All SPARC CPUs made since 1993 dnl support this instruction set. But GCC in its default configuration, in dnl 32-bit mode (64-bit mode assumes SPARC v9 or newer), still defaults to dnl SPARC v7 instruction set: "By default (unless configured otherwise), GCC dnl generates code for the V7 variant of the SPARC architecture." See dnl dnl AC_DEFUN([gl_SPARC_V8PLUS], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host" in sparc*-*-solaris*) if test -n "$GCC"; then AC_CACHE_CHECK([whether SPARC v8+ instructions are supported], [gl_cv_sparc_v8plus], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[]], [[asm volatile ("membar 2");]])], [gl_cv_sparc_v8plus=yes], [gl_cv_sparc_v8plus=no]) ]) if test $gl_cv_sparc_v8plus = no; then dnl Strangely enough, '-mv8plus' does not have the desired effect. dnl But '-mcpu=v9' does. CC="$CC -mcpu=v9" CXX="$CXX -mcpu=v9" fi fi ;; esac ]) libffcall-2.5/gnulib-m4/msvc-nothrow.m40000664000000000000000000000053214631432055014700 00000000000000# msvc-nothrow.m4 # serial 1 dnl Copyright (C) 2011-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_MSVC_NOTHROW], [ AC_REQUIRE([gl_MSVC_INVAL]) ]) libffcall-2.5/gnulib-m4/open-cloexec.m40000664000000000000000000000136014631432055014613 00000000000000# open-cloexec.m4 # serial 1 dnl Copyright 2017-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Test whether O_CLOEXEC is defined. AC_DEFUN([gl_PREPROC_O_CLOEXEC], [ AC_CACHE_CHECK([for O_CLOEXEC], [gl_cv_macro_O_CLOEXEC], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[#include #ifndef O_CLOEXEC choke me; #endif ]], [[return O_CLOEXEC;]])], [gl_cv_macro_O_CLOEXEC=yes], [gl_cv_macro_O_CLOEXEC=no])]) ]) libffcall-2.5/gnulib-m4/hasmntopt.m40000664000000000000000000000431114660662607014260 00000000000000# hasmntopt.m4 # serial 1 dnl Copyright (C) 2024 Free Software Foundation, Inc. dnl dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_HASMNTOPT], [ AC_REQUIRE([gl_MNTENT_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) gl_CHECK_FUNCS_ANDROID([setmntent], [[#include #include ]]) if test $ac_cv_func_setmntent != yes; then HAVE_SETMNTENT=0 fi gl_CHECK_FUNCS_ANDROID([hasmntopt], [[#include #include ]]) if test $ac_cv_func_hasmntopt = yes; then dnl hasmntopt has the dumbest possible implementation on musl libc 1.2.5: dnl it confuses the "atime" option with the "noatime" option. AC_CACHE_CHECK([whether hasmntopt works], [gl_cv_func_hasmntopt_works], [AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include #include ]], [[int result = 0; /* This test fails on musl libc 1.2.5. */ { char options[] = "rw,noatime"; struct mntent me; me.mnt_opts = options; if (hasmntopt (&me, "atime") != NULL) result |= 1; } return result; ]]) ], [gl_cv_func_hasmntopt_works=yes], [gl_cv_func_hasmntopt_works=no], [case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_hasmntopt_works="guessing yes" ;; # Guess no on musl systems. *-musl* | midipix*) gl_cv_func_hasmntopt_works="guessing no" ;; *) gl_cv_func_hasmntopt_works="$gl_cross_guess_normal" ;; esac ]) ]) case "$gl_cv_func_hasmntopt_works" in *yes) ;; *) REPLACE_HASMNTOPT=1 ;; esac else HAVE_HASMNTOPT=0 case "$gl_cv_onwards_func_hasmntopt" in future*) REPLACE_HASMNTOPT=1 ;; esac fi ]) # Prerequisites of lib/hasmntopt.c. AC_DEFUN([gl_PREREQ_HASMNTOPT], [ : ]) libffcall-2.5/gnulib-m4/time_h.m40000664000000000000000000001637714631432055013515 00000000000000# time_h.m4 # serial 26 dnl Copyright (C) 2000-2001, 2003-2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Configure a more-standard replacement for . # Written by Paul Eggert and Jim Meyering. AC_DEFUN_ONCE([gl_TIME_H], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_TIME_H_DEFAULTS]) gl_NEXT_HEADERS([time.h]) AC_REQUIRE([gl_CHECK_TYPE_STRUCT_TIMESPEC]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[ #include ]], [ asctime asctime_r ctime ctime_r gmtime_r localtime localtime_r mktime nanosleep strftime strptime time timegm timespec_get timespec_getres tzset ]) AC_REQUIRE([AC_C_RESTRICT]) AC_CACHE_CHECK([for TIME_UTC in ], [gl_cv_time_h_has_TIME_UTC], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[static int x = TIME_UTC; x++;]])], [gl_cv_time_h_has_TIME_UTC=yes], [gl_cv_time_h_has_TIME_UTC=no])]) if test $gl_cv_time_h_has_TIME_UTC = yes; then TIME_H_DEFINES_TIME_UTC=1 else TIME_H_DEFINES_TIME_UTC=0 fi AC_SUBST([TIME_H_DEFINES_TIME_UTC]) ]) dnl Check whether 'struct timespec' is declared dnl in time.h, sys/time.h, pthread.h, or unistd.h. AC_DEFUN([gl_CHECK_TYPE_STRUCT_TIMESPEC], [ AC_CHECK_HEADERS_ONCE([sys/time.h]) AC_CACHE_CHECK([for struct timespec in ], [gl_cv_sys_struct_timespec_in_time_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[static struct timespec x; x.tv_sec = x.tv_nsec;]])], [gl_cv_sys_struct_timespec_in_time_h=yes], [gl_cv_sys_struct_timespec_in_time_h=no])]) TIME_H_DEFINES_STRUCT_TIMESPEC=0 SYS_TIME_H_DEFINES_STRUCT_TIMESPEC=0 PTHREAD_H_DEFINES_STRUCT_TIMESPEC=0 UNISTD_H_DEFINES_STRUCT_TIMESPEC=0 if test $gl_cv_sys_struct_timespec_in_time_h = yes; then TIME_H_DEFINES_STRUCT_TIMESPEC=1 else AC_CACHE_CHECK([for struct timespec in ], [gl_cv_sys_struct_timespec_in_sys_time_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[static struct timespec x; x.tv_sec = x.tv_nsec;]])], [gl_cv_sys_struct_timespec_in_sys_time_h=yes], [gl_cv_sys_struct_timespec_in_sys_time_h=no])]) if test $gl_cv_sys_struct_timespec_in_sys_time_h = yes; then SYS_TIME_H_DEFINES_STRUCT_TIMESPEC=1 else AC_CACHE_CHECK([for struct timespec in ], [gl_cv_sys_struct_timespec_in_pthread_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[static struct timespec x; x.tv_sec = x.tv_nsec;]])], [gl_cv_sys_struct_timespec_in_pthread_h=yes], [gl_cv_sys_struct_timespec_in_pthread_h=no])]) if test $gl_cv_sys_struct_timespec_in_pthread_h = yes; then PTHREAD_H_DEFINES_STRUCT_TIMESPEC=1 else AC_CACHE_CHECK([for struct timespec in ], [gl_cv_sys_struct_timespec_in_unistd_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[static struct timespec x; x.tv_sec = x.tv_nsec;]])], [gl_cv_sys_struct_timespec_in_unistd_h=yes], [gl_cv_sys_struct_timespec_in_unistd_h=no])]) if test $gl_cv_sys_struct_timespec_in_unistd_h = yes; then UNISTD_H_DEFINES_STRUCT_TIMESPEC=1 fi fi fi fi AC_SUBST([TIME_H_DEFINES_STRUCT_TIMESPEC]) AC_SUBST([SYS_TIME_H_DEFINES_STRUCT_TIMESPEC]) AC_SUBST([PTHREAD_H_DEFINES_STRUCT_TIMESPEC]) AC_SUBST([UNISTD_H_DEFINES_STRUCT_TIMESPEC]) ]) # gl_TIME_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_TIME_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_TIME_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_TIME_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_TIME_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CTIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKTIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LOCALTIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_NANOSLEEP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRFTIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRPTIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIMEGM]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIMESPEC_GET]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIMESPEC_GETRES]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIME_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TIME_RZ]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TZNAME]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_TZSET]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_TZSET], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_TIME_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_TIME_H_DEFAULTS]) ]) AC_DEFUN([gl_TIME_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_DECL_LOCALTIME_R=1; AC_SUBST([HAVE_DECL_LOCALTIME_R]) HAVE_NANOSLEEP=1; AC_SUBST([HAVE_NANOSLEEP]) HAVE_STRPTIME=1; AC_SUBST([HAVE_STRPTIME]) HAVE_TIMEGM=1; AC_SUBST([HAVE_TIMEGM]) HAVE_TIMESPEC_GET=1; AC_SUBST([HAVE_TIMESPEC_GET]) HAVE_TIMESPEC_GETRES=1; AC_SUBST([HAVE_TIMESPEC_GETRES]) dnl Even GNU libc does not have timezone_t yet. HAVE_TIMEZONE_T=0; AC_SUBST([HAVE_TIMEZONE_T]) REPLACE_CTIME=0; AC_SUBST([REPLACE_CTIME]) REPLACE_GMTIME=0; AC_SUBST([REPLACE_GMTIME]) REPLACE_LOCALTIME=0; AC_SUBST([REPLACE_LOCALTIME]) REPLACE_LOCALTIME_R=0; AC_SUBST([REPLACE_LOCALTIME_R]) REPLACE_MKTIME=0; AC_SUBST([REPLACE_MKTIME]) REPLACE_NANOSLEEP=0; AC_SUBST([REPLACE_NANOSLEEP]) REPLACE_STRFTIME=0; AC_SUBST([REPLACE_STRFTIME]) REPLACE_TIME=0; AC_SUBST([REPLACE_TIME]) REPLACE_TIMEGM=0; AC_SUBST([REPLACE_TIMEGM]) REPLACE_TIMESPEC_GET=0; AC_SUBST([REPLACE_TIMESPEC_GET]) REPLACE_TIMESPEC_GETRES=0; AC_SUBST([REPLACE_TIMESPEC_GETRES]) REPLACE_TZSET=0; AC_SUBST([REPLACE_TZSET]) ]) libffcall-2.5/gnulib-m4/error_h.m40000664000000000000000000000765314660212547013711 00000000000000# error_h.m4 # serial 5 dnl Copyright (C) 1996-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Provide a working . AC_DEFUN_ONCE([gl_ERROR_H], [ AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles gl_CHECK_NEXT_HEADERS([error.h]) if test $ac_cv_header_error_h = yes; then HAVE_ERROR_H=1 else HAVE_ERROR_H=0 fi AC_SUBST([HAVE_ERROR_H]) REPLACE_ERROR=0 gl_CHECK_FUNCS_ANDROID([error], [[#include ]]) if test $ac_cv_func_error = yes; then HAVE_ERROR=1 else HAVE_ERROR=0 case "$gl_cv_onwards_func_error" in future*) REPLACE_ERROR=1 ;; esac fi dnl We don't use AC_FUNC_ERROR_AT_LINE any more, because it is no longer dnl maintained in Autoconf and because it invokes AC_LIBOBJ. dnl We need to notice a missing declaration, like gl_CHECK_FUNCS_ANDROID does. AC_CHECK_DECL([error_at_line], , , [[#include ]]) if test $ac_cv_have_decl_error_at_line = yes; then AC_CACHE_CHECK([for error_at_line], [ac_cv_lib_error_at_line], [AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[error_at_line (0, 0, "", 0, "an error occurred");]])], [ac_cv_lib_error_at_line=yes], [ac_cv_lib_error_at_line=no])]) else ac_cv_lib_error_at_line=no fi if test $ac_cv_lib_error_at_line = yes; then HAVE_ERROR_AT_LINE=1 else HAVE_ERROR_AT_LINE=0 fi REPLACE_ERROR_AT_LINE=0 if test $ac_cv_func_error = yes && test $ac_cv_lib_error_at_line = yes; then dnl On Android 11, when error_print_progname is set, the output of the dnl error() function contains an extra space. AC_CACHE_CHECK([for working error function], [gl_cv_func_working_error], [if test $cross_compiling != yes; then AC_LINK_IFELSE( [AC_LANG_PROGRAM([[ #include static void print_no_progname (void) {} ]], [[ error_print_progname = print_no_progname; error (0, 0, "foo"); ]]) ], [rm -f conftest.out if test -s conftest$ac_exeext \ && ./conftest$ac_exeext 2> conftest.out; then if grep ' ' conftest.out >/dev/null; then gl_cv_func_working_error=no else gl_cv_func_working_error=yes fi else gl_cv_func_working_error=no fi rm -f conftest.out ], [gl_cv_func_working_error=no]) else AC_COMPILE_IFELSE( [AC_LANG_PROGRAM([[ #include ]], [[ error (0, 0, "foo"); ]]) ], [case "$host_os" in # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_working_error="guessing yes" ;; # Guess no on Android. linux*-android*) gl_cv_func_working_error="guessing no" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_working_error="$gl_cross_guess_normal" ;; esac ], [gl_cv_func_working_error=no]) fi ]) case "$gl_cv_func_working_error" in *no) REPLACE_ERROR=1 REPLACE_ERROR_AT_LINE=1 ;; esac fi m4_ifdef([gl_HAVE_MODULE_VERROR], [COMPILE_ERROR_C=1], [if test $HAVE_ERROR = 0 || test $REPLACE_ERROR = 1 \ || test $HAVE_ERROR_AT_LINE = 0 \ || test $REPLACE_ERROR_AT_LINE = 1; then COMPILE_ERROR_C=1 else COMPILE_ERROR_C=0 fi]) AC_SUBST([HAVE_ERROR]) AC_SUBST([HAVE_ERROR_AT_LINE]) AC_SUBST([REPLACE_ERROR]) AC_SUBST([REPLACE_ERROR_AT_LINE]) ]) libffcall-2.5/gnulib-m4/string_h.m40000664000000000000000000001673314631432055014061 00000000000000# string_h.m4 # serial 39 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Configure a GNU-like replacement for . # Written by Paul Eggert. AC_DEFUN_ONCE([gl_STRING_H], [ dnl Ensure to expand the default settings once only, before all statements dnl that occur in other macros. AC_REQUIRE([gl_STRING_H_DEFAULTS]) gl_NEXT_HEADERS([string.h]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use, and which is not dnl guaranteed by C89. gl_WARN_ON_USE_PREPARE([[#include ]], [explicit_bzero ffsl ffsll memmem mempcpy memrchr memset_explicit rawmemchr stpcpy stpncpy strchrnul strdup strncat strndup strnlen strpbrk strsep strcasestr strtok_r strerror_r strerrorname_np sigabbrev_np sigdescr_np strsignal strverscmp]) AC_REQUIRE([AC_C_RESTRICT]) ]) # gl_STRING_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_STRING_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_STRING_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_STRING_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_STRING_H_MODULE_INDICATOR_DEFAULTS], [ gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_EXPLICIT_BZERO]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FFSL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FFSLL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MEMCHR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MEMMEM]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MEMPCPY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MEMRCHR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MEMSET_EXPLICIT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_RAWMEMCHR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STPCPY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STPNCPY]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRCHRNUL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRDUP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRNCAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRNDUP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRNLEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRPBRK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRSEP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRSTR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRCASESTR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRTOK_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSLEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSNLEN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSCHR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSRCHR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSSTR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSCASECMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSNCASECMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSPCASECMP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSCASESTR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSCSPN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSPBRK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSSPN]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSSEP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MBSTOK_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRERROR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRERROR_R]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRERRORNAME_NP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIGABBREV_NP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_SIGDESCR_NP]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRSIGNAL]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STRVERSCMP]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_MEMCCPY], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_STRDUP], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_STRING_H_MODULE_INDICATOR_DEFAULTS]) dnl Make sure the shell variable for GNULIB_FREE_POSIX is initialized. gl_STDLIB_H_REQUIRE_DEFAULTS AC_REQUIRE([gl_STRING_H_DEFAULTS]) ]) AC_DEFUN([gl_STRING_H_DEFAULTS], [ HAVE_MBSLEN=0; AC_SUBST([HAVE_MBSLEN]) dnl Assume proper GNU behavior unless another module says otherwise. HAVE_EXPLICIT_BZERO=1; AC_SUBST([HAVE_EXPLICIT_BZERO]) HAVE_FFSL=1; AC_SUBST([HAVE_FFSL]) HAVE_FFSLL=1; AC_SUBST([HAVE_FFSLL]) HAVE_DECL_MEMMEM=1; AC_SUBST([HAVE_DECL_MEMMEM]) HAVE_MEMPCPY=1; AC_SUBST([HAVE_MEMPCPY]) HAVE_MEMSET_EXPLICIT=1; AC_SUBST([HAVE_MEMSET_EXPLICIT]) HAVE_DECL_MEMRCHR=1; AC_SUBST([HAVE_DECL_MEMRCHR]) HAVE_RAWMEMCHR=1; AC_SUBST([HAVE_RAWMEMCHR]) HAVE_STPCPY=1; AC_SUBST([HAVE_STPCPY]) HAVE_STPNCPY=1; AC_SUBST([HAVE_STPNCPY]) HAVE_STRCHRNUL=1; AC_SUBST([HAVE_STRCHRNUL]) HAVE_DECL_STRDUP=1; AC_SUBST([HAVE_DECL_STRDUP]) HAVE_DECL_STRNDUP=1; AC_SUBST([HAVE_DECL_STRNDUP]) HAVE_DECL_STRNLEN=1; AC_SUBST([HAVE_DECL_STRNLEN]) HAVE_STRPBRK=1; AC_SUBST([HAVE_STRPBRK]) HAVE_STRSEP=1; AC_SUBST([HAVE_STRSEP]) HAVE_STRCASESTR=1; AC_SUBST([HAVE_STRCASESTR]) HAVE_DECL_STRTOK_R=1; AC_SUBST([HAVE_DECL_STRTOK_R]) HAVE_DECL_STRERROR_R=1; AC_SUBST([HAVE_DECL_STRERROR_R]) HAVE_STRERRORNAME_NP=1; AC_SUBST([HAVE_STRERRORNAME_NP]) HAVE_SIGABBREV_NP=1; AC_SUBST([HAVE_SIGABBREV_NP]) HAVE_SIGDESCR_NP=1; AC_SUBST([HAVE_SIGDESCR_NP]) HAVE_DECL_STRSIGNAL=1; AC_SUBST([HAVE_DECL_STRSIGNAL]) HAVE_STRVERSCMP=1; AC_SUBST([HAVE_STRVERSCMP]) REPLACE_FFSLL=0; AC_SUBST([REPLACE_FFSLL]) REPLACE_MEMCHR=0; AC_SUBST([REPLACE_MEMCHR]) REPLACE_MEMMEM=0; AC_SUBST([REPLACE_MEMMEM]) REPLACE_MEMPCPY=0; AC_SUBST([REPLACE_MEMPCPY]) REPLACE_MEMSET_EXPLICIT=0; AC_SUBST([REPLACE_MEMSET_EXPLICIT]) REPLACE_STPCPY=0; AC_SUBST([REPLACE_STPCPY]) REPLACE_STPNCPY=0; AC_SUBST([REPLACE_STPNCPY]) REPLACE_STRCHRNUL=0; AC_SUBST([REPLACE_STRCHRNUL]) REPLACE_STRDUP=0; AC_SUBST([REPLACE_STRDUP]) REPLACE_STRNCAT=0; AC_SUBST([REPLACE_STRNCAT]) REPLACE_STRNDUP=0; AC_SUBST([REPLACE_STRNDUP]) REPLACE_STRNLEN=0; AC_SUBST([REPLACE_STRNLEN]) REPLACE_STRSTR=0; AC_SUBST([REPLACE_STRSTR]) REPLACE_STRCASESTR=0; AC_SUBST([REPLACE_STRCASESTR]) REPLACE_STRTOK_R=0; AC_SUBST([REPLACE_STRTOK_R]) REPLACE_STRERROR=0; AC_SUBST([REPLACE_STRERROR]) REPLACE_STRERROR_R=0; AC_SUBST([REPLACE_STRERROR_R]) REPLACE_STRERRORNAME_NP=0; AC_SUBST([REPLACE_STRERRORNAME_NP]) REPLACE_STRSIGNAL=0; AC_SUBST([REPLACE_STRSIGNAL]) REPLACE_STRVERSCMP=0; AC_SUBST([REPLACE_STRVERSCMP]) UNDEFINE_STRTOK_R=0; AC_SUBST([UNDEFINE_STRTOK_R]) ]) libffcall-2.5/gnulib-m4/musl.m40000664000000000000000000000123514631432055013213 00000000000000# musl.m4 # serial 4 dnl Copyright (C) 2019-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Test for musl libc, despite the musl libc authors don't like it # # . # From Bruno Haible. AC_DEFUN_ONCE([gl_MUSL_LIBC], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_os" in *-musl* | midipix*) AC_DEFINE([MUSL_LIBC], [1], [Define to 1 on musl libc.]) ;; esac ]) libffcall-2.5/gnulib-m4/vararrays.m40000664000000000000000000000445114631432055014250 00000000000000# vararrays.m4 # serial 6 dnl Copyright (C) 2001, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Check for variable-length arrays. # From Paul Eggert m4_version_prereq([2.70], [], [ # AC_C_VARARRAYS # -------------- # Check whether the C compiler supports variable-length arrays. AC_DEFUN([AC_C_VARARRAYS], [ AC_CACHE_CHECK([for variable-length arrays], ac_cv_c_vararrays, [AC_EGREP_CPP([defined], [#ifdef __STDC_NO_VLA__ defined #endif ], [ac_cv_c_vararrays='no: __STDC_NO_VLA__ is defined'], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[/* Test for VLA support. This test is partly inspired from examples in the C standard. Use at least two VLA functions to detect the GCC 3.4.3 bug described in: https://lists.gnu.org/archive/html/bug-gnulib/2014-08/msg00014.html */ #ifdef __STDC_NO_VLA__ syntax error; #else extern int n; int B[100]; int fvla (int m, int C[m][m]); int simple (int count, int all[static count]) { return all[count - 1]; } int fvla (int m, int C[m][m]) { typedef int VLA[m][m]; VLA x; int D[m]; static int (*q)[m] = &B; int (*s)[n] = q; return C && &x[0][0] == &D[0] && &D[0] == s[0]; } #endif ]])], [ac_cv_c_vararrays=yes], [ac_cv_c_vararrays=no])])]) if test "$ac_cv_c_vararrays" = yes; then dnl This is for compatibility with Autoconf 2.61-2.69. AC_DEFINE([HAVE_C_VARARRAYS], 1, [Define to 1 if C supports variable-length arrays.]) elif test "$ac_cv_c_vararrays" = no; then AC_DEFINE([__STDC_NO_VLA__], 1, [Define to 1 if C does not support variable-length arrays, and if the compiler does not already define this.]) fi ]) ]) libffcall-2.5/gnulib-m4/raise.m40000664000000000000000000000177314631432055013345 00000000000000# raise.m4 # serial 4 dnl Copyright (C) 2011-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_RAISE], [ AC_REQUIRE([gl_SIGNAL_H_DEFAULTS]) AC_REQUIRE([AC_CANONICAL_HOST]) AC_CHECK_FUNCS([raise]) if test $ac_cv_func_raise = no; then HAVE_RAISE=0 else m4_ifdef([gl_MSVC_INVAL], [ AC_REQUIRE([gl_MSVC_INVAL]) if test $HAVE_MSVC_INVALID_PARAMETER_HANDLER = 1; then REPLACE_RAISE=1 fi ]) m4_ifdef([gl_SIGNALBLOCKING], [ gl_SIGNALBLOCKING if test $HAVE_POSIX_SIGNALBLOCKING = 0; then m4_ifdef([gl_SIGNAL_SIGPIPE], [ gl_SIGNAL_SIGPIPE if test $gl_cv_header_signal_h_SIGPIPE != yes; then REPLACE_RAISE=1 fi ], [:]) fi ]) fi ]) # Prerequisites of lib/raise.c. AC_DEFUN([gl_PREREQ_RAISE], [:]) libffcall-2.5/gnulib-m4/pthread-once.m40000664000000000000000000000216214631432055014604 00000000000000# pthread-once.m4 # serial 3 dnl Copyright (C) 2019-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_PTHREAD_ONCE], [ AC_REQUIRE([gl_PTHREAD_H]) AC_REQUIRE([AC_CANONICAL_HOST]) if { case "$host_os" in mingw* | windows*) true;; *) false;; esac; } \ && test $gl_threads_api = windows; then dnl Choose function names that don't conflict with the mingw-w64 winpthreads dnl library. REPLACE_PTHREAD_ONCE=1 else if test $HAVE_PTHREAD_H = 0; then HAVE_PTHREAD_ONCE=0 else dnl Work around Cygwin 3.5.3 bug. AC_CACHE_CHECK([whether pthread_once works], [gl_cv_func_pthread_once_works], [case "$host_os" in cygwin*) gl_cv_func_pthread_once_works="guessing no" ;; *) gl_cv_func_pthread_once_works="yes" ;; esac ]) case "$gl_cv_func_pthread_once_works" in *yes) ;; *) REPLACE_PTHREAD_ONCE=1 ;; esac fi fi ]) libffcall-2.5/gnulib-m4/stat.m40000664000000000000000000000601714631432055013211 00000000000000# stat.m4 # serial 21 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_STAT], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_SYS_STAT_H_DEFAULTS]) AC_CHECK_FUNCS_ONCE([lstat]) case "$host_os" in mingw* | windows*) dnl On this platform, the original stat() returns st_atime, st_mtime, dnl st_ctime values that are affected by the time zone. REPLACE_STAT=1 ;; *) dnl AIX 7.1, Solaris 9, mingw64 mistakenly succeed on stat("file/"). dnl (For mingw, this is due to a broken stat() override in libmingwex.a.) dnl FreeBSD 7.2 mistakenly succeeds on stat("link-to-file/"). AC_CACHE_CHECK([whether stat handles trailing slashes on files], [gl_cv_func_stat_file_slash], [touch conftest.tmp # Assume that if we have lstat, we can also check symlinks. if test $ac_cv_func_lstat = yes; then ln -s conftest.tmp conftest.lnk fi AC_RUN_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[int result = 0; struct stat st; if (!stat ("conftest.tmp/", &st)) result |= 1; #if HAVE_LSTAT if (!stat ("conftest.lnk/", &st)) result |= 2; #endif return result; ]])], [gl_cv_func_stat_file_slash=yes], [gl_cv_func_stat_file_slash=no], [case "$host_os" in # Guess yes on Linux systems. linux-* | linux) gl_cv_func_stat_file_slash="guessing yes" ;; # Guess yes on systems that emulate the Linux system calls. midipix*) gl_cv_func_stat_file_slash="guessing yes" ;; # Guess yes on glibc systems. *-gnu* | gnu*) gl_cv_func_stat_file_slash="guessing yes" ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_func_stat_file_slash="$gl_cross_guess_normal" ;; esac ]) rm -f conftest.tmp conftest.lnk]) case $gl_cv_func_stat_file_slash in *no) REPLACE_STAT=1 AC_DEFINE([REPLACE_FUNC_STAT_FILE], [1], [Define to 1 if stat needs help when passed a file name with a trailing slash]);; esac case $host_os in dnl macOS and Solaris stat can return a negative tv_nsec. darwin* | solaris*) REPLACE_FSTAT=1 ;; esac ;; esac ]) # Prerequisites of lib/stat.c and lib/stat-w32.c. AC_DEFUN([gl_PREREQ_STAT], [ AC_REQUIRE([gl_SYS_STAT_H]) AC_REQUIRE([gl_PREREQ_STAT_W32]) : ]) # Prerequisites of lib/stat-w32.c. AC_DEFUN([gl_PREREQ_STAT_W32], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_os" in mingw* | windows*) AC_CHECK_HEADERS([sdkddkver.h]) ;; esac ]) libffcall-2.5/gnulib-m4/gnulib-cache.m40000664000000000000000000000415014665326513014563 00000000000000# Copyright (C) 2002-2024 Free Software Foundation, Inc. # # This file is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # This file is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this file. If not, see . # # As a special exception to the GNU General Public License, # this file may be distributed as part of a program that # contains a configuration script generated by Autoconf, under # the same distribution terms as the rest of that program. # # Generated by gnulib-tool. # # This file represents the specification of how gnulib-tool is used. # It acts as a cache: It is written and read by gnulib-tool. # In projects that use version control, this file is meant to be put under # version control, like the configure.ac and various Makefile.am files. # Specification in the form of a command-line invocation: # gnulib-tool --import \ # --local-dir=gnulib-local \ # --lib=libgnu \ # --source-base=gnulib-lib \ # --m4-base=gnulib-m4 \ # --doc-base=doc \ # --tests-base=tests \ # --aux-dir=build-aux \ # --gpl=2 \ # --conditional-dependencies \ # --libtool \ # --macro-prefix=gl \ # ansi-c++-opt \ # host-cpu-c-abi \ # libffcall-imports \ # nocrash \ # stdint \ # stdnoreturn # Specification in the form of a few gnulib-tool.m4 macro invocations: gl_LOCAL_DIR([gnulib-local]) gl_MODULES([ ansi-c++-opt host-cpu-c-abi libffcall-imports nocrash stdint stdnoreturn ]) gl_AVOID([]) gl_SOURCE_BASE([gnulib-lib]) gl_M4_BASE([gnulib-m4]) gl_PO_BASE([]) gl_DOC_BASE([doc]) gl_TESTS_BASE([tests]) gl_LIB([libgnu]) gl_GPL([2]) gl_MAKEFILE_NAME([]) gl_CONDITIONAL_DEPENDENCIES gl_LIBTOOL gl_MACRO_PREFIX([gl]) gl_PO_DOMAIN([]) gl_WITNESS_C_MACRO([]) libffcall-2.5/gnulib-m4/stdbool.m40000664000000000000000000000740314166663515013716 00000000000000# Check for stdbool.h that conforms to C99. dnl Copyright (C) 2002-2006, 2009-2022 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. #serial 9 # Prepare for substituting if it is not supported. AC_DEFUN([gl_STDBOOL_H], [ AC_REQUIRE([AC_CHECK_HEADER_STDBOOL]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl On some platforms, does not exist or does not conform to C99. dnl On Solaris 10 with CC=cc CXX=CC, exists but is not usable dnl in C++ mode (and no exists). In this case, we use our dnl replacement, also in C mode (for binary compatibility between C and C++). if test "$ac_cv_header_stdbool_h" = yes; then case "$host_os" in solaris*) if test -z "$GCC"; then GL_GENERATE_STDBOOL_H=true else GL_GENERATE_STDBOOL_H=false fi ;; *) GL_GENERATE_STDBOOL_H=false ;; esac else GL_GENERATE_STDBOOL_H=true fi if test "$ac_cv_type__Bool" = yes; then HAVE__BOOL=1 else HAVE__BOOL=0 fi AC_SUBST([HAVE__BOOL]) ]) # This version of the macro is needed in autoconf <= 2.68. AC_DEFUN([AC_CHECK_HEADER_STDBOOL], [AC_CACHE_CHECK([for stdbool.h that conforms to C99], [ac_cv_header_stdbool_h], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[ #include #ifdef __cplusplus typedef bool Bool; #else typedef _Bool Bool; #ifndef bool "error: bool is not defined" #endif #ifndef false "error: false is not defined" #endif #if false "error: false is not 0" #endif #ifndef true "error: true is not defined" #endif #if true != 1 "error: true is not 1" #endif #endif #ifndef __bool_true_false_are_defined "error: __bool_true_false_are_defined is not defined" #endif struct s { Bool s: 1; Bool t; bool u: 1; bool v; } s; char a[true == 1 ? 1 : -1]; char b[false == 0 ? 1 : -1]; char c[__bool_true_false_are_defined == 1 ? 1 : -1]; char d[(bool) 0.5 == true ? 1 : -1]; /* See body of main program for 'e'. */ char f[(Bool) 0.0 == false ? 1 : -1]; char g[true]; char h[sizeof (Bool)]; char i[sizeof s.t]; enum { j = false, k = true, l = false * true, m = true * 256 }; /* The following fails for HP aC++/ANSI C B3910B A.05.55 [Dec 04 2003]. */ Bool n[m]; char o[sizeof n == m * sizeof n[0] ? 1 : -1]; char p[-1 - (Bool) 0 < 0 && -1 - (bool) 0 < 0 ? 1 : -1]; /* Catch a bug in an HP-UX C compiler. See https://gcc.gnu.org/ml/gcc-patches/2003-12/msg02303.html https://lists.gnu.org/r/bug-coreutils/2005-11/msg00161.html */ Bool q = true; Bool *pq = &q; bool *qq = &q; ]], [[ bool e = &s; *pq |= q; *pq |= ! q; *qq |= q; *qq |= ! q; /* Refer to every declared value, to avoid compiler optimizations. */ return (!a + !b + !c + !d + !e + !f + !g + !h + !i + !!j + !k + !!l + !m + !n + !o + !p + !q + !pq + !qq); ]])], [ac_cv_header_stdbool_h=yes], [ac_cv_header_stdbool_h=no])]) AC_CHECK_TYPES([_Bool]) ]) libffcall-2.5/gnulib-m4/gnulib-common.m40000664000000000000000000020465314664171733015023 00000000000000# gnulib-common.m4 # serial 103 dnl Copyright (C) 2007-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_PREREQ([2.62]) # gl_COMMON # is expanded unconditionally through gnulib-tool magic. AC_DEFUN([gl_COMMON], [ dnl Use AC_REQUIRE here, so that the code is expanded once only. AC_REQUIRE([gl_00GNULIB]) AC_REQUIRE([gl_COMMON_BODY]) AC_REQUIRE([gl_ZZGNULIB]) ]) AC_DEFUN([gl_COMMON_BODY], [ AH_VERBATIM([0witness], [/* Witness that has been included. */ #define _GL_CONFIG_H_INCLUDED 1 ]) AH_VERBATIM([_GL_GNUC_PREREQ], [/* True if the compiler says it groks GNU C version MAJOR.MINOR. Except that - clang groks GNU C 4.2, even on Windows, where it does not define __GNUC__. - The OpenMandriva-modified clang compiler pretends that it groks GNU C version 13.1, but it doesn't: It does not support __attribute__ ((__malloc__ (f, i))), nor does it support __attribute__ ((__warning__ (message))) on a function redeclaration. - Users can make clang lie as well, through the -fgnuc-version option. */ #if defined __GNUC__ && defined __GNUC_MINOR__ && !defined __clang__ # define _GL_GNUC_PREREQ(major, minor) \ ((major) < __GNUC__ + ((minor) <= __GNUC_MINOR__)) #elif defined __clang__ /* clang really only groks GNU C 4.2. */ # define _GL_GNUC_PREREQ(major, minor) \ ((major) < 4 + ((minor) <= 2)) #else # define _GL_GNUC_PREREQ(major, minor) 0 #endif ]) AH_VERBATIM([_Noreturn], [/* The _Noreturn keyword of C11. */ #ifndef _Noreturn # if (defined __cplusplus \ && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \ || (defined _MSC_VER && 1900 <= _MSC_VER)) \ && 0) /* [[noreturn]] is not practically usable, because with it the syntax extern _Noreturn void func (...); would not be valid; such a declaration would only be valid with 'extern' and '_Noreturn' swapped, or without the 'extern' keyword. However, some AIX system header files and several gnulib header files use precisely this syntax with 'extern'. */ # define _Noreturn [[noreturn]] # elif (defined __clang__ && __clang_major__ < 16 \ && defined _GL_WORK_AROUND_LLVM_BUG_59792) /* Compile with -D_GL_WORK_AROUND_LLVM_BUG_59792 to work around that rare LLVM bug, though you may get many false-alarm warnings. */ # define _Noreturn # elif ((!defined __cplusplus || defined __clang__) \ && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0) \ || (!defined __STRICT_ANSI__ \ && (_GL_GNUC_PREREQ (4, 7) \ || (defined __apple_build_version__ \ ? 6000000 <= __apple_build_version__ \ : 3 < __clang_major__ + (5 <= __clang_minor__)))))) /* _Noreturn works as-is. */ # elif _GL_GNUC_PREREQ (2, 8) || defined __clang__ || 0x5110 <= __SUNPRO_C # define _Noreturn __attribute__ ((__noreturn__)) # elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0) # define _Noreturn __declspec (noreturn) # else # define _Noreturn # endif #endif ]) AH_VERBATIM([isoc99_inline], [/* Work around a bug in Apple GCC 4.0.1 build 5465: In C99 mode, it supports the ISO C 99 semantics of 'extern inline' (unlike the GNU C semantics of earlier versions), but does not display it by setting __GNUC_STDC_INLINE__. __APPLE__ && __MACH__ test for Mac OS X. __APPLE_CC__ tests for the Apple compiler and its version. __STDC_VERSION__ tests for the C99 mode. */ #if defined __APPLE__ && defined __MACH__ && __APPLE_CC__ >= 5465 && !defined __cplusplus && __STDC_VERSION__ >= 199901L && !defined __GNUC_STDC_INLINE__ # define __GNUC_STDC_INLINE__ 1 #endif]) AH_VERBATIM([attribute], [/* Attributes. */ /* Define _GL_HAS_ATTRIBUTE only once, because on FreeBSD, with gcc < 5, if gets included once again after , __has_attribute(x) expands to 0 always, and redefining _GL_HAS_ATTRIBUTE would turn off all attributes. */ #ifndef _GL_HAS_ATTRIBUTE # if (defined __has_attribute \ && (!defined __clang_minor__ \ || (defined __apple_build_version__ \ ? 7000000 <= __apple_build_version__ \ : 5 <= __clang_major__))) # define _GL_HAS_ATTRIBUTE(attr) __has_attribute (__##attr##__) # else # define _GL_HAS_ATTRIBUTE(attr) _GL_ATTR_##attr # define _GL_ATTR_alloc_size _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_always_inline _GL_GNUC_PREREQ (3, 2) # define _GL_ATTR_artificial _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_cold _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_const _GL_GNUC_PREREQ (2, 95) # define _GL_ATTR_deprecated _GL_GNUC_PREREQ (3, 1) # define _GL_ATTR_diagnose_if 0 # define _GL_ATTR_error _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_externally_visible _GL_GNUC_PREREQ (4, 1) # define _GL_ATTR_fallthrough _GL_GNUC_PREREQ (7, 0) # define _GL_ATTR_format _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_leaf _GL_GNUC_PREREQ (4, 6) # define _GL_ATTR_malloc _GL_GNUC_PREREQ (3, 0) # ifdef _ICC # define _GL_ATTR_may_alias 0 # else # define _GL_ATTR_may_alias _GL_GNUC_PREREQ (3, 3) # endif # define _GL_ATTR_noinline _GL_GNUC_PREREQ (3, 1) # define _GL_ATTR_nonnull _GL_GNUC_PREREQ (3, 3) # define _GL_ATTR_nonstring _GL_GNUC_PREREQ (8, 0) # define _GL_ATTR_nothrow _GL_GNUC_PREREQ (3, 3) # define _GL_ATTR_packed _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_pure _GL_GNUC_PREREQ (2, 96) # define _GL_ATTR_reproducible 0 /* not yet supported, as of GCC 14 */ # define _GL_ATTR_returns_nonnull _GL_GNUC_PREREQ (4, 9) # define _GL_ATTR_sentinel _GL_GNUC_PREREQ (4, 0) # define _GL_ATTR_unsequenced 0 /* not yet supported, as of GCC 14 */ # define _GL_ATTR_unused _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_warn_unused_result _GL_GNUC_PREREQ (3, 4) # endif #endif /* Use __has_c_attribute if available. However, do not use with pre-C23 GCC, which can issue false positives if -Wpedantic. */ #if (defined __has_c_attribute \ && ! (_GL_GNUC_PREREQ (4, 6) \ && (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0) <= 201710)) # define _GL_HAVE___HAS_C_ATTRIBUTE 1 #else # define _GL_HAVE___HAS_C_ATTRIBUTE 0 #endif /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in function declarations. There are two problems here. (Last tested with gcc/g++ 14 and clang/clang++ 18.) 1) We want that the _GL_ATTRIBUTE_* can be cumulated on the same declaration in any order. =========================== foo.c = foo.cc =========================== __attribute__ ((__deprecated__)) [[__nodiscard__]] int bar1 (int); [[__nodiscard__]] __attribute__ ((__deprecated__)) int bar2 (int); ====================================================================== This gives a syntax error - in C mode with gcc , and - in C++ mode with clang++ version < 16, and - in C++ mode, inside extern "C" {}, still in newer clang++ versions . */ /* Define if, in a function declaration, the attributes in bracket syntax [[...]] must come before the attributes in __attribute__((...)) syntax. If this is defined, it is best to avoid the bracket syntax, so that the various _GL_ATTRIBUTE_* can be cumulated on the same declaration in any order. */ #ifdef __cplusplus # if defined __clang__ # define _GL_BRACKET_BEFORE_ATTRIBUTE 1 # endif #else # if defined __GNUC__ && !defined __clang__ # define _GL_BRACKET_BEFORE_ATTRIBUTE 1 # endif #endif /* 2) We want that the _GL_ATTRIBUTE_* can be placed in a declaration - without 'extern', in C as well as in C++, - with 'extern', in C, - with 'extern "C"', in C++ in the same position. That is, we don't want to be forced to use a macro which arranges for the attribute to come before 'extern' in one case and after 'extern' in the other case, because such a macro would make the source code of .h files pretty ugly. =========================== foo.c = foo.cc =========================== #ifdef __cplusplus # define CC "C" #else # define CC #endif #define ND [[__nodiscard__]] #define WUR __attribute__((__warn_unused_result__)) #ifdef __cplusplus extern "C" { #endif // gcc clang g++ clang++ ND int foo (int); int ND foo (int); // warn error warn error int foo ND (int); int foo (int) ND; // warn error warn error WUR int foo (int); int WUR foo (int); int fo1 WUR (int); // error error error error int foo (int) WUR; #ifdef __cplusplus } #endif // gcc clang g++ clang++ ND extern CC int foo (int); // error error extern CC ND int foo (int); // error error extern CC int ND foo (int); // warn error warn error extern CC int foo ND (int); extern CC int foo (int) ND; // warn error warn error WUR extern CC int foo (int); // warn extern CC WUR int foo (int); extern CC int WUR foo (int); extern CC int foo WUR (int); // error error error error extern CC int foo (int) WUR; ND EXTERN_C_FUNC int foo (int); // error error EXTERN_C_FUNC ND int foo (int); EXTERN_C_FUNC int ND foo (int); // warn error warn error EXTERN_C_FUNC int foo ND (int); EXTERN_C_FUNC int foo (int) ND; // warn error warn error WUR EXTERN_C_FUNC int foo (int); // warn EXTERN_C_FUNC WUR int foo (int); EXTERN_C_FUNC int WUR foo (int); EXTERN_C_FUNC int fo2 WUR (int); // error error error error EXTERN_C_FUNC int foo (int) WUR; ====================================================================== So, if we insist on using the 'extern' keyword ('extern CC' idiom): * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in both C and C++, there is one available position: - between the function name and the parameter list. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in both C and C++, there are several available positions: - before the return type, - between return type and function name, - at the end of the declaration. * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in C and to __attribute__((...)) syntax in C++, there is no available position: it would need to come before 'extern' in C but after 'extern "C"' in C++. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in C and to bracket syntax [[...]] in C++, there is one available position: - before the return type. Whereas, if we use the 'EXTERN_C_FUNC' idiom, which conditionally omits the 'extern' keyword: * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in both C and C++, there are two available positions: - before the return type, - between the function name and the parameter list. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in both C and C++, there are several available positions: - before the return type, - between return type and function name, - at the end of the declaration. * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in C and to __attribute__((...)) syntax in C++, there is one available position: - before the return type. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in C and to bracket syntax [[...]] in C++, there is one available position: - before the return type. The best choice is therefore to use the 'EXTERN_C_FUNC' idiom and put the attributes before the return type. This works regardless to what the _GL_ATTRIBUTE_* macros expand. */ /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in static/inline function definitions. There are similar constraints as for function declarations. However, here, we cannot omit the storage-class specifier. Therefore, the following rule applies: * The macros _GL_ATTRIBUTE_CONST _GL_ATTRIBUTE_DEPRECATED _GL_ATTRIBUTE_MAYBE_UNUSED _GL_ATTRIBUTE_NODISCARD _GL_ATTRIBUTE_PURE _GL_ATTRIBUTE_REPRODUCIBLE _GL_ATTRIBUTE_UNSEQUENCED which may expand to bracket syntax [[...]], must come first, before the storage-class specifier. * Other _GL_ATTRIBUTE_* macros, that expand to __attribute__((...)) syntax, are better placed between the storage-class specifier and the return type. */ /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in variable declarations. At which position can they be placed? (Last tested with gcc/g++ 14 and clang/clang++ 18.) =========================== foo.c = foo.cc =========================== #ifdef __cplusplus # define CC "C" #else # define CC #endif #define BD [[__deprecated__]] #define AD __attribute__ ((__deprecated__)) // gcc clang g++ clang++ BD extern CC int var; // error error extern CC BD int var; // error error extern CC int BD var; // warn error warn error extern CC int var BD; AD extern CC int var; // warn extern CC AD int var; extern CC int AD var; extern CC int var AD; BD extern CC int z[]; // error error extern CC BD int z[]; // error error extern CC int BD z[]; // warn error warn error extern CC int z1 BD []; extern CC int z[] BD; // warn error error AD extern CC int z[]; // warn extern CC AD int z[]; extern CC int AD z[]; extern CC int z2 AD []; // error error error error extern CC int z[] AD; ====================================================================== * For non-array variables, the only good position is after the variable name, that is, at the end of the declaration. * For array variables, you will need to distinguish C and C++: - In C, before the 'extern' keyword. - In C++, between the 'extern "C"' and the variable's type. */ ]dnl There is no _GL_ATTRIBUTE_ALIGNED; use stdalign's alignas instead. [ /* _GL_ATTRIBUTE_ALLOC_SIZE ((N)) declares that the Nth argument of the function is the size of the returned memory block. _GL_ATTRIBUTE_ALLOC_SIZE ((M, N)) declares that the Mth argument multiplied by the Nth argument of the function is the size of the returned memory block. */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_ALLOC_SIZE # if _GL_HAS_ATTRIBUTE (alloc_size) # define _GL_ATTRIBUTE_ALLOC_SIZE(args) __attribute__ ((__alloc_size__ args)) # else # define _GL_ATTRIBUTE_ALLOC_SIZE(args) # endif #endif /* _GL_ATTRIBUTE_ALWAYS_INLINE tells that the compiler should always inline the function and report an error if it cannot do so. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_ALWAYS_INLINE # if _GL_HAS_ATTRIBUTE (always_inline) # define _GL_ATTRIBUTE_ALWAYS_INLINE __attribute__ ((__always_inline__)) # else # define _GL_ATTRIBUTE_ALWAYS_INLINE # endif #endif /* _GL_ATTRIBUTE_ARTIFICIAL declares that the function is not important to show in stack traces when debugging. The compiler should omit the function from stack traces. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_ARTIFICIAL # if _GL_HAS_ATTRIBUTE (artificial) # define _GL_ATTRIBUTE_ARTIFICIAL __attribute__ ((__artificial__)) # else # define _GL_ATTRIBUTE_ARTIFICIAL # endif #endif /* _GL_ATTRIBUTE_COLD declares that the function is rarely executed. */ /* Applies to: functions. */ /* Avoid __attribute__ ((cold)) on MinGW; see thread starting at . Also, Oracle Studio 12.6 requires 'cold' not '__cold__'. */ #ifndef _GL_ATTRIBUTE_COLD # if _GL_HAS_ATTRIBUTE (cold) && !defined __MINGW32__ # ifndef __SUNPRO_C # define _GL_ATTRIBUTE_COLD __attribute__ ((__cold__)) # else # define _GL_ATTRIBUTE_COLD __attribute__ ((cold)) # endif # else # define _GL_ATTRIBUTE_COLD # endif #endif /* _GL_ATTRIBUTE_CONST declares: It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used. This attribute is safe for a function that neither depends on nor affects state, and always returns exactly once - e.g., does not raise an exception, call longjmp, or loop forever. (This attribute is stricter than _GL_ATTRIBUTE_PURE because the function cannot observe state. It is stricter than _GL_ATTRIBUTE_UNSEQUENCED because the function must return exactly once and cannot depend on state addressed by its arguments.) */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_CONST # if _GL_HAS_ATTRIBUTE (const) # define _GL_ATTRIBUTE_CONST __attribute__ ((__const__)) # else # define _GL_ATTRIBUTE_CONST _GL_ATTRIBUTE_UNSEQUENCED # endif #endif /* _GL_ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. _GL_ATTRIBUTE_DEALLOC_FREE declares that the function returns pointers that can be freed via 'free'; it can be used only after declaring 'free'. */ /* Applies to: functions. Cannot be used on inline functions. */ #ifndef _GL_ATTRIBUTE_DEALLOC # if _GL_GNUC_PREREQ (11, 0) # define _GL_ATTRIBUTE_DEALLOC(f, i) __attribute__ ((__malloc__ (f, i))) # else # define _GL_ATTRIBUTE_DEALLOC(f, i) # endif #endif /* If gnulib's or has already defined this macro, continue to use this earlier definition, since may not have been included yet. */ #ifndef _GL_ATTRIBUTE_DEALLOC_FREE # if defined __cplusplus && defined __GNUC__ && !defined __clang__ /* Work around GCC bug */ # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC ((void (*) (void *)) free, 1) # else # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC (free, 1) # endif #endif /* _GL_ATTRIBUTE_DEPRECATED: Declares that an entity is deprecated. The compiler may warn if the entity is used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: namespace, class, template specialization. */ #ifndef _GL_ATTRIBUTE_DEPRECATED # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__deprecated__) # define _GL_ATTRIBUTE_DEPRECATED [[__deprecated__]] # endif # endif # endif # if !defined _GL_ATTRIBUTE_DEPRECATED && _GL_HAS_ATTRIBUTE (deprecated) # define _GL_ATTRIBUTE_DEPRECATED __attribute__ ((__deprecated__)) # endif # ifndef _GL_ATTRIBUTE_DEPRECATED # define _GL_ATTRIBUTE_DEPRECATED # endif #endif /* _GL_ATTRIBUTE_ERROR(msg) requests an error if a function is called and the function call is not optimized away. _GL_ATTRIBUTE_WARNING(msg) requests a warning if a function is called and the function call is not optimized away. */ /* Applies to: functions. */ #if !(defined _GL_ATTRIBUTE_ERROR && defined _GL_ATTRIBUTE_WARNING) # if _GL_HAS_ATTRIBUTE (error) # define _GL_ATTRIBUTE_ERROR(msg) __attribute__ ((__error__ (msg))) # define _GL_ATTRIBUTE_WARNING(msg) __attribute__ ((__warning__ (msg))) # elif _GL_HAS_ATTRIBUTE (diagnose_if) # define _GL_ATTRIBUTE_ERROR(msg) __attribute__ ((__diagnose_if__ (1, msg, "error"))) # define _GL_ATTRIBUTE_WARNING(msg) __attribute__ ((__diagnose_if__ (1, msg, "warning"))) # else # define _GL_ATTRIBUTE_ERROR(msg) # define _GL_ATTRIBUTE_WARNING(msg) # endif #endif /* _GL_ATTRIBUTE_EXTERNALLY_VISIBLE declares that the entity should remain visible to debuggers etc., even with '-fwhole-program'. */ /* Applies to: functions, variables. */ #ifndef _GL_ATTRIBUTE_EXTERNALLY_VISIBLE # if _GL_HAS_ATTRIBUTE (externally_visible) # define _GL_ATTRIBUTE_EXTERNALLY_VISIBLE __attribute__ ((externally_visible)) # else # define _GL_ATTRIBUTE_EXTERNALLY_VISIBLE # endif #endif /* _GL_ATTRIBUTE_FALLTHROUGH declares that it is not a programming mistake if the control flow falls through to the immediately following 'case' or 'default' label. The compiler should not warn in this case. */ /* Applies to: Empty statement (;), inside a 'switch' statement. */ /* Always expands to something. */ #ifndef _GL_ATTRIBUTE_FALLTHROUGH # if _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__fallthrough__) # define _GL_ATTRIBUTE_FALLTHROUGH [[__fallthrough__]] # endif # endif # if !defined _GL_ATTRIBUTE_FALLTHROUGH && _GL_HAS_ATTRIBUTE (fallthrough) # define _GL_ATTRIBUTE_FALLTHROUGH __attribute__ ((__fallthrough__)) # endif # ifndef _GL_ATTRIBUTE_FALLTHROUGH # define _GL_ATTRIBUTE_FALLTHROUGH ((void) 0) # endif #endif /* _GL_ATTRIBUTE_FORMAT ((ARCHETYPE, STRING-INDEX, FIRST-TO-CHECK)) declares that the STRING-INDEXth function argument is a format string of style ARCHETYPE, which is one of: printf, gnu_printf scanf, gnu_scanf, strftime, gnu_strftime, strfmon, or the same thing prefixed and suffixed with '__'. If FIRST-TO-CHECK is not 0, arguments starting at FIRST-TO_CHECK are suitable for the format string. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_FORMAT # if _GL_HAS_ATTRIBUTE (format) # define _GL_ATTRIBUTE_FORMAT(spec) __attribute__ ((__format__ spec)) # else # define _GL_ATTRIBUTE_FORMAT(spec) # endif #endif /* _GL_ATTRIBUTE_LEAF declares that if the function is called from some other compilation unit, it executes code from that unit only by return or by exception handling. This declaration lets the compiler optimize that unit more aggressively. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_LEAF # if _GL_HAS_ATTRIBUTE (leaf) # define _GL_ATTRIBUTE_LEAF __attribute__ ((__leaf__)) # else # define _GL_ATTRIBUTE_LEAF # endif #endif /* _GL_ATTRIBUTE_MALLOC declares that the function returns a pointer to freshly allocated memory. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_MALLOC # if _GL_HAS_ATTRIBUTE (malloc) # define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) # else # define _GL_ATTRIBUTE_MALLOC # endif #endif /* _GL_ATTRIBUTE_MAY_ALIAS declares that pointers to the type may point to the same storage as pointers to other types. Thus this declaration disables strict aliasing optimization. */ /* Applies to: types. */ /* Oracle Studio 12.6 mishandles may_alias despite __has_attribute OK. */ #ifndef _GL_ATTRIBUTE_MAY_ALIAS # if _GL_HAS_ATTRIBUTE (may_alias) && !defined __SUNPRO_C # define _GL_ATTRIBUTE_MAY_ALIAS __attribute__ ((__may_alias__)) # else # define _GL_ATTRIBUTE_MAY_ALIAS # endif #endif /* _GL_ATTRIBUTE_MAYBE_UNUSED declares that it is not a programming mistake if the entity is not used. The compiler should not warn if the entity is not used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: class. */ /* In C++ and C23, this is spelled [[__maybe_unused__]]. GCC's syntax is __attribute__ ((__unused__)). clang supports both syntaxes. Except that with clang ≥ 6, < 10, in C++ mode, __has_c_attribute (__maybe_unused__) yields true but the use of [[__maybe_unused__]] nevertheless produces a warning. */ #ifndef _GL_ATTRIBUTE_MAYBE_UNUSED # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if defined __clang__ && defined __cplusplus # if !defined __apple_build_version__ && __clang_major__ >= 10 # define _GL_ATTRIBUTE_MAYBE_UNUSED [[__maybe_unused__]] # endif # elif _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__maybe_unused__) # define _GL_ATTRIBUTE_MAYBE_UNUSED [[__maybe_unused__]] # endif # endif # endif # ifndef _GL_ATTRIBUTE_MAYBE_UNUSED # define _GL_ATTRIBUTE_MAYBE_UNUSED _GL_ATTRIBUTE_UNUSED # endif #endif /* Alternative spelling of this macro, for convenience and for compatibility with glibc/include/libc-symbols.h. */ #define _GL_UNUSED _GL_ATTRIBUTE_MAYBE_UNUSED /* Earlier spellings of this macro. */ #define _UNUSED_PARAMETER_ _GL_ATTRIBUTE_MAYBE_UNUSED /* _GL_ATTRIBUTE_NODISCARD declares that the caller of the function should not discard the return value. The compiler may warn if the caller does not use the return value, unless the caller uses something like ignore_value. */ /* Applies to: function, enumeration, class. */ #ifndef _GL_ATTRIBUTE_NODISCARD # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if defined __clang__ && defined __cplusplus /* With clang up to 15.0.6 (at least), in C++ mode, [[__nodiscard__]] produces a warning. The 1000 below means a yet unknown threshold. When clang++ version X starts supporting [[__nodiscard__]] without warning about it, you can replace the 1000 with X. */ # if __clang_major__ >= 1000 # define _GL_ATTRIBUTE_NODISCARD [[__nodiscard__]] # endif # elif _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__nodiscard__) # define _GL_ATTRIBUTE_NODISCARD [[__nodiscard__]] # endif # endif # endif # if !defined _GL_ATTRIBUTE_NODISCARD && _GL_HAS_ATTRIBUTE (warn_unused_result) # define _GL_ATTRIBUTE_NODISCARD __attribute__ ((__warn_unused_result__)) # endif # ifndef _GL_ATTRIBUTE_NODISCARD # define _GL_ATTRIBUTE_NODISCARD # endif #endif /* _GL_ATTRIBUTE_NOINLINE tells that the compiler should not inline the function. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_NOINLINE # if _GL_HAS_ATTRIBUTE (noinline) # define _GL_ATTRIBUTE_NOINLINE __attribute__ ((__noinline__)) # else # define _GL_ATTRIBUTE_NOINLINE # endif #endif /* _GL_ATTRIBUTE_NONNULL ((N1, N2,...)) declares that the arguments N1, N2,... must not be NULL. _GL_ATTRIBUTE_NONNULL () declares that all pointer arguments must not be null. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_NONNULL # if _GL_HAS_ATTRIBUTE (nonnull) # define _GL_ATTRIBUTE_NONNULL(args) __attribute__ ((__nonnull__ args)) # else # define _GL_ATTRIBUTE_NONNULL(args) # endif #endif /* _GL_ATTRIBUTE_NONSTRING declares that the contents of a character array is not meant to be NUL-terminated. */ /* Applies to: struct/union members and variables that are arrays of element type '[[un]signed] char'. */ #ifndef _GL_ATTRIBUTE_NONSTRING # if _GL_HAS_ATTRIBUTE (nonstring) # define _GL_ATTRIBUTE_NONSTRING __attribute__ ((__nonstring__)) # else # define _GL_ATTRIBUTE_NONSTRING # endif #endif /* There is no _GL_ATTRIBUTE_NORETURN; use _Noreturn instead. */ /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ /* Applies to: functions. */ /* After a function's parameter list, this attribute must come first, before other attributes. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if _GL_GNUC_PREREQ (2, 8) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if _GL_HAS_ATTRIBUTE (nothrow) # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* _GL_ATTRIBUTE_PACKED declares: For struct members: The member has the smallest possible alignment. For struct, union, class: All members have the smallest possible alignment, minimizing the memory required. */ /* Applies to: struct members, struct, union, in C++ also: class. */ #ifndef _GL_ATTRIBUTE_PACKED /* Oracle Studio 12.6 miscompiles code with __attribute__ ((__packed__)) despite __has_attribute OK. */ # if _GL_HAS_ATTRIBUTE (packed) && !defined __SUNPRO_C # define _GL_ATTRIBUTE_PACKED __attribute__ ((__packed__)) # else # define _GL_ATTRIBUTE_PACKED # endif #endif /* _GL_ATTRIBUTE_PURE declares: It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used, and if observable state is the same. This attribute is safe for a function that does not affect observable state and always returns exactly once. (This attribute is looser than _GL_ATTRIBUTE_CONST because the function can depend on observable state. It is stricter than _GL_ATTRIBUTE_REPRODUCIBLE because the function must return exactly once and cannot affect state addressed by its arguments.) */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_PURE # if _GL_HAS_ATTRIBUTE (pure) # define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__)) # else # define _GL_ATTRIBUTE_PURE _GL_ATTRIBUTE_REPRODUCIBLE # endif #endif /* _GL_ATTRIBUTE_REPRODUCIBLE declares: It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same and is updated in time for the rest of the program. This attribute is safe for a function that is effectless and idempotent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is looser than _GL_ATTRIBUTE_UNSEQUENCED because the function need not be stateless and idempotent. It is looser than _GL_ATTRIBUTE_PURE because the function need not return exactly once and can affect state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_REPRODUCIBLE /* This may be revisited when gcc and clang support [[reproducible]] or possibly __attribute__ ((__reproducible__)). */ # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAS_ATTRIBUTE (reproducible) # define _GL_ATTRIBUTE_REPRODUCIBLE [[reproducible]] # endif # endif # ifndef _GL_ATTRIBUTE_REPRODUCIBLE # define _GL_ATTRIBUTE_REPRODUCIBLE # endif #endif /* _GL_ATTRIBUTE_RETURNS_NONNULL declares that the function's return value is a non-NULL pointer. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_RETURNS_NONNULL # if _GL_HAS_ATTRIBUTE (returns_nonnull) # define _GL_ATTRIBUTE_RETURNS_NONNULL __attribute__ ((__returns_nonnull__)) # else # define _GL_ATTRIBUTE_RETURNS_NONNULL # endif #endif /* _GL_ATTRIBUTE_SENTINEL(pos) declares that the variadic function expects a trailing NULL argument. _GL_ATTRIBUTE_SENTINEL () - The last argument is NULL (requires C99). _GL_ATTRIBUTE_SENTINEL ((N)) - The (N+1)st argument from the end is NULL. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_SENTINEL # if _GL_HAS_ATTRIBUTE (sentinel) # define _GL_ATTRIBUTE_SENTINEL(pos) __attribute__ ((__sentinel__ pos)) # else # define _GL_ATTRIBUTE_SENTINEL(pos) # endif #endif /* _GL_ATTRIBUTE_UNSEQUENCED declares: It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same. This attribute is safe for a function that is effectless, idempotent, stateless, and independent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is stricter than _GL_ATTRIBUTE_REPRODUCIBLE because the function must be stateless and independent. It is looser than _GL_ATTRIBUTE_CONST because the function need not return exactly once and can depend on state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_UNSEQUENCED /* This may be revisited when gcc and clang support [[unsequenced]] or possibly __attribute__ ((__unsequenced__)). */ # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAS_ATTRIBUTE (unsequenced) # define _GL_ATTRIBUTE_UNSEQUENCED [[unsequenced]] # endif # endif # ifndef _GL_ATTRIBUTE_UNSEQUENCED # define _GL_ATTRIBUTE_UNSEQUENCED # endif #endif /* A helper macro. Don't use it directly. */ #ifndef _GL_ATTRIBUTE_UNUSED # if _GL_HAS_ATTRIBUTE (unused) # define _GL_ATTRIBUTE_UNUSED __attribute__ ((__unused__)) # else # define _GL_ATTRIBUTE_UNUSED # endif #endif ]dnl There is no _GL_ATTRIBUTE_VISIBILITY; see m4/visibility.m4 instead. [ /* _GL_UNUSED_LABEL; declares that it is not a programming mistake if the immediately preceding label is not used. The compiler should not warn if the label is not used. */ /* Applies to: label (both in C and C++). */ /* Note that g++ < 4.5 does not support the '__attribute__ ((__unused__)) ;' syntax. But clang does. */ #ifndef _GL_UNUSED_LABEL # if !(defined __cplusplus && !_GL_GNUC_PREREQ (4, 5)) || defined __clang__ # define _GL_UNUSED_LABEL _GL_ATTRIBUTE_UNUSED # else # define _GL_UNUSED_LABEL # endif #endif ]) AH_VERBATIM([c_linkage], [/* In C++, there is the concept of "language linkage", that encompasses name mangling and function calling conventions. The following macros start and end a block of "C" linkage. */ #ifdef __cplusplus # define _GL_BEGIN_C_LINKAGE extern "C" { # define _GL_END_C_LINKAGE } #else # define _GL_BEGIN_C_LINKAGE # define _GL_END_C_LINKAGE #endif ]) AH_VERBATIM([async_safe], [/* The _GL_ASYNC_SAFE marker should be attached to functions that are signal handlers (for signals other than SIGABRT, SIGPIPE) or can be invoked from such signal handlers. Such functions have some restrictions: * All functions that it calls should be marked _GL_ASYNC_SAFE as well, or should be listed as async-signal-safe in POSIX section 2.4.3. Note that malloc(), sprintf(), and fwrite(), in particular, are NOT async-signal-safe. * All memory locations (variables and struct fields) that these functions access must be marked 'volatile'. This holds for both read and write accesses. Otherwise the compiler might optimize away stores to and reads from such locations that occur in the program, depending on its data flow analysis. For example, when the program contains a loop that is intended to inspect a variable set from within a signal handler while (!signal_occurred) ; the compiler is allowed to transform this into an endless loop if the variable 'signal_occurred' is not declared 'volatile'. Additionally, recall that: * A signal handler should not modify errno (except if it is a handler for a fatal signal and ends by raising the same signal again, thus provoking the termination of the process). If it invokes a function that may clobber errno, it needs to save and restore the value of errno. */ #define _GL_ASYNC_SAFE ]) AH_VERBATIM([micro_optimizations], [/* _GL_CMP (n1, n2) performs a three-valued comparison on n1 vs. n2, where n1 and n2 are expressions without side effects, that evaluate to real numbers (excluding NaN). It returns 1 if n1 > n2 0 if n1 == n2 -1 if n1 < n2 The naïve code (n1 > n2 ? 1 : n1 < n2 ? -1 : 0) produces a conditional jump with nearly all GCC versions up to GCC 10. This variant (n1 < n2 ? -1 : n1 > n2) produces a conditional with many GCC versions up to GCC 9. The better code (n1 > n2) - (n1 < n2) from Hacker's Delight § 2-9 avoids conditional jumps in all GCC versions >= 3.4. */ #define _GL_CMP(n1, n2) (((n1) > (n2)) - ((n1) < (n2))) ]) dnl Hint which direction to take regarding cross-compilation guesses: dnl When a user installs a program on a platform they are not intimately dnl familiar with, --enable-cross-guesses=conservative is the appropriate dnl choice. It implements the "If we don't know, assume the worst" principle. dnl However, when an operating system developer (on a platform which is not dnl yet known to gnulib) builds packages for their platform, they want to dnl expose, not hide, possible platform bugs; in this case, dnl --enable-cross-guesses=risky is the appropriate choice. dnl Sets the variables dnl gl_cross_guess_normal (to be used when 'yes' is good and 'no' is bad), dnl gl_cross_guess_inverted (to be used when 'no' is good and 'yes' is bad). AC_ARG_ENABLE([cross-guesses], [AS_HELP_STRING([[--enable-cross-guesses={conservative|risky}]], [specify policy for cross-compilation guesses])], [if test "x$enableval" != xconservative && test "x$enableval" != xrisky; then AC_MSG_WARN([invalid argument supplied to --enable-cross-guesses]) enableval=conservative fi gl_cross_guesses="$enableval"], [gl_cross_guesses=conservative]) if test $gl_cross_guesses = risky; then gl_cross_guess_normal="guessing yes" gl_cross_guess_inverted="guessing no" else gl_cross_guess_normal="guessing no" gl_cross_guess_inverted="guessing yes" fi dnl Preparation for running test programs: dnl Tell glibc to write diagnostics from -D_FORTIFY_SOURCE=2 to stderr, not dnl to /dev/tty, so they can be redirected to log files. Such diagnostics dnl arise e.g., in the macros gl_PRINTF_DIRECTIVE_N, gl_SNPRINTF_DIRECTIVE_N. LIBC_FATAL_STDERR_=1 export LIBC_FATAL_STDERR_ ]) # gl_MODULE_INDICATOR_INIT_VARIABLE([variablename]) # gl_MODULE_INDICATOR_INIT_VARIABLE([variablename], [initialvalue]) # initializes the shell variable that indicates the presence of the given module # as a C preprocessor expression. AC_DEFUN([gl_MODULE_INDICATOR_INIT_VARIABLE], [ GL_MODULE_INDICATOR_PREFIX[]_[$1]=m4_if([$2], , [0], [$2]) AC_SUBST(GL_MODULE_INDICATOR_PREFIX[]_[$1]) ]) # gl_MODULE_INDICATOR_CONDITION # expands to a C preprocessor expression that evaluates to 1 or 0, depending # whether a gnulib module that has been requested shall be considered present # or not. m4_define([gl_MODULE_INDICATOR_CONDITION], [1]) # gl_MODULE_INDICATOR_SET_VARIABLE([modulename]) # sets the shell variable that indicates the presence of the given module to # a C preprocessor expression that will evaluate to 1. AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE], [ gl_MODULE_INDICATOR_SET_VARIABLE_AUX( [GL_MODULE_INDICATOR_PREFIX[]_GNULIB_[]m4_translit([[$1]], [abcdefghijklmnopqrstuvwxyz./-], [ABCDEFGHIJKLMNOPQRSTUVWXYZ___])], [gl_MODULE_INDICATOR_CONDITION]) ]) # gl_MODULE_INDICATOR_SET_VARIABLE_AUX([variable]) # modifies the shell variable to include the gl_MODULE_INDICATOR_CONDITION. # The shell variable's value is a C preprocessor expression that evaluates # to 0 or 1. AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE_AUX], [ m4_if(m4_defn([gl_MODULE_INDICATOR_CONDITION]), [1], [ dnl Simplify the expression VALUE || 1 to 1. $1=1 ], [gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR([$1], [gl_MODULE_INDICATOR_CONDITION])]) ]) # gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR([variable], [condition]) # modifies the shell variable to include the given condition. The shell # variable's value is a C preprocessor expression that evaluates to 0 or 1. AC_DEFUN([gl_MODULE_INDICATOR_SET_VARIABLE_AUX_OR], [ dnl Simplify the expression 1 || CONDITION to 1. if test "$[]$1" != 1; then dnl Simplify the expression 0 || CONDITION to CONDITION. if test "$[]$1" = 0; then $1=$2 else $1="($[]$1 || $2)" fi fi ]) # gl_MODULE_INDICATOR([modulename]) # defines a C macro indicating the presence of the given module # in a location where it can be used. # | Value | Value | # | in lib/ | in tests/ | # --------------------------------------------+---------+-----------+ # Module present among main modules: | 1 | 1 | # --------------------------------------------+---------+-----------+ # Module present among tests-related modules: | 0 | 1 | # --------------------------------------------+---------+-----------+ # Module not present at all: | 0 | 0 | # --------------------------------------------+---------+-----------+ AC_DEFUN([gl_MODULE_INDICATOR], [ AC_DEFINE_UNQUOTED([GNULIB_]m4_translit([[$1]], [abcdefghijklmnopqrstuvwxyz./-], [ABCDEFGHIJKLMNOPQRSTUVWXYZ___]), [gl_MODULE_INDICATOR_CONDITION], [Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module $1 shall be considered present.]) ]) # gl_MODULE_INDICATOR_FOR_TESTS([modulename]) # defines a C macro indicating the presence of the given module # in lib or tests. This is useful to determine whether the module # should be tested. # | Value | Value | # | in lib/ | in tests/ | # --------------------------------------------+---------+-----------+ # Module present among main modules: | 1 | 1 | # --------------------------------------------+---------+-----------+ # Module present among tests-related modules: | 1 | 1 | # --------------------------------------------+---------+-----------+ # Module not present at all: | 0 | 0 | # --------------------------------------------+---------+-----------+ AC_DEFUN([gl_MODULE_INDICATOR_FOR_TESTS], [ AC_DEFINE([GNULIB_TEST_]m4_translit([[$1]], [abcdefghijklmnopqrstuvwxyz./-], [ABCDEFGHIJKLMNOPQRSTUVWXYZ___]), [1], [Define to 1 when the gnulib module $1 should be tested.]) ]) # gl_ASSERT_NO_GNULIB_POSIXCHECK # asserts that there will never be a need to #define GNULIB_POSIXCHECK. # and thereby enables an optimization of configure and config.h. # Used by Emacs. AC_DEFUN([gl_ASSERT_NO_GNULIB_POSIXCHECK], [ dnl Override gl_WARN_ON_USE_PREPARE. dnl But hide this definition from 'aclocal'. AC_DEFUN([gl_W][ARN_ON_USE_PREPARE], []) ]) # gl_ASSERT_NO_GNULIB_TESTS # asserts that there will be no gnulib tests in the scope of the configure.ac # and thereby enables an optimization of config.h. # Used by Emacs. AC_DEFUN([gl_ASSERT_NO_GNULIB_TESTS], [ dnl Override gl_MODULE_INDICATOR_FOR_TESTS. AC_DEFUN([gl_MODULE_INDICATOR_FOR_TESTS], []) ]) # Test whether exists. # Set HAVE_FEATURES_H. AC_DEFUN([gl_FEATURES_H], [ AC_CHECK_HEADERS_ONCE([features.h]) if test $ac_cv_header_features_h = yes; then HAVE_FEATURES_H=1 else HAVE_FEATURES_H=0 fi AC_SUBST([HAVE_FEATURES_H]) ]) # gl_PROG_CC_C99 # Modifies the value of the shell variable CC in an attempt to make $CC # understand ISO C99 source code. AC_DEFUN([gl_PROG_CC_C99], [ dnl Just use AC_PROG_CC_C99. dnl When AC_PROG_CC_C99 and AC_PROG_CC_STDC are used together, the substituted dnl value of CC will contain the C99 enabling options twice. But this is only dnl a cosmetic problem. dnl With Autoconf >= 2.70, use AC_PROG_CC since it implies AC_PROG_CC_C99; dnl this avoids a "warning: The macro `AC_PROG_CC_C99' is obsolete." m4_version_prereq([2.70], [AC_REQUIRE([AC_PROG_CC])], [AC_REQUIRE([AC_PROG_CC_C99])]) ]) # gl_PROG_AR_RANLIB # Determines the values for AR, ARFLAGS, RANLIB that fit with the compiler. # The user can set the variables AR, ARFLAGS, RANLIB if he wants to override # the values. AC_DEFUN([gl_PROG_AR_RANLIB], [ dnl Minix 3 comes with two toolchains: The Amsterdam Compiler Kit compiler dnl as "cc", and GCC as "gcc". They have different object file formats and dnl library formats. In particular, the GNU binutils programs ar and ranlib dnl produce libraries that work only with gcc, not with cc. AC_REQUIRE([AC_PROG_CC]) dnl The '][' hides this use from 'aclocal'. AC_BEFORE([$0], [A][M_PROG_AR]) AC_CACHE_CHECK([for Minix Amsterdam compiler], [gl_cv_c_amsterdam_compiler], [ AC_EGREP_CPP([Amsterdam], [ #ifdef __ACK__ Amsterdam #endif ], [gl_cv_c_amsterdam_compiler=yes], [gl_cv_c_amsterdam_compiler=no]) ]) dnl Don't compete with AM_PROG_AR's decision about AR/ARFLAGS if we are not dnl building with __ACK__. if test $gl_cv_c_amsterdam_compiler = yes; then if test -z "$AR"; then AR='cc -c.a' fi if test -z "$ARFLAGS"; then ARFLAGS='-o' fi else dnl AM_PROG_AR was added in automake v1.11.2. AM_PROG_AR does not AC_SUBST dnl ARFLAGS variable (it is filed into Makefile.in directly by automake dnl script on-demand, if not specified by ./configure of course). dnl Don't AC_REQUIRE the AM_PROG_AR otherwise the code for __ACK__ above dnl will be ignored. Also, pay attention to call AM_PROG_AR in else block dnl because AM_PROG_AR is written so it could re-set AR variable even for dnl __ACK__. It may seem like its easier to avoid calling the macro here, dnl but we need to AC_SUBST both AR/ARFLAGS (thus those must have some good dnl default value and automake should usually know them). dnl dnl The '][' hides this use from 'aclocal'. m4_ifdef([A][M_PROG_AR], [A][M_PROG_AR], [:]) fi dnl In case the code above has not helped with setting AR/ARFLAGS, use dnl Automake-documented default values for AR and ARFLAGS, but prefer dnl ${host}-ar over ar (useful for cross-compiling). AC_CHECK_TOOL([AR], [ar], [ar]) if test -z "$ARFLAGS"; then ARFLAGS='cr' fi AC_SUBST([AR]) AC_SUBST([ARFLAGS]) if test -z "$RANLIB"; then if test $gl_cv_c_amsterdam_compiler = yes; then RANLIB=':' else dnl Use the ranlib program if it is available. AC_PROG_RANLIB fi fi AC_SUBST([RANLIB]) ]) # AC_C_RESTRICT # This definition is copied from post-2.70 Autoconf and overrides the # AC_C_RESTRICT macro from autoconf 2.60..2.70. m4_version_prereq([2.70.1], [], [ AC_DEFUN([AC_C_RESTRICT], [AC_CACHE_CHECK([for C/C++ restrict keyword], [ac_cv_c_restrict], [ac_cv_c_restrict=no # Put '__restrict__' first, to avoid problems with glibc and non-GCC; see: # https://lists.gnu.org/archive/html/bug-autoconf/2016-02/msg00006.html # Put 'restrict' last, because C++ lacks it. for ac_kw in __restrict__ __restrict _Restrict restrict; do AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[typedef int *int_ptr; int foo (int_ptr $ac_kw ip) { return ip[0]; } int bar (int [$ac_kw]); /* Catch GCC bug 14050. */ int bar (int ip[$ac_kw]) { return ip[0]; } ]], [[int s[1]; int *$ac_kw t = s; t[0] = 0; return foo (t) + bar (t); ]])], [ac_cv_c_restrict=$ac_kw]) test "$ac_cv_c_restrict" != no && break done ]) AH_VERBATIM([restrict], [/* Define to the equivalent of the C99 'restrict' keyword, or to nothing if this is not supported. Do not define if restrict is supported only directly. */ #undef restrict /* Work around a bug in older versions of Sun C++, which did not #define __restrict__ or support _Restrict or __restrict__ even though the corresponding Sun C compiler ended up with "#define restrict _Restrict" or "#define restrict __restrict__" in the previous line. This workaround can be removed once we assume Oracle Developer Studio 12.5 (2016) or later. */ #if defined __SUNPRO_CC && !defined __RESTRICT && !defined __restrict__ # define _Restrict # define __restrict__ #endif]) case $ac_cv_c_restrict in restrict) ;; no) AC_DEFINE([restrict], []) ;; *) AC_DEFINE_UNQUOTED([restrict], [$ac_cv_c_restrict]) ;; esac ])# AC_C_RESTRICT ]) # gl_BIGENDIAN # is like AC_C_BIGENDIAN, except that it can be AC_REQUIREd. # Note that AC_REQUIRE([AC_C_BIGENDIAN]) does not work reliably because some # macros invoke AC_C_BIGENDIAN with arguments. AC_DEFUN([gl_BIGENDIAN], [ AC_C_BIGENDIAN ]) # A temporary file descriptor. # Must be less than 10, because dash 0.5.8 does not support redirections # with multi-digit file descriptors. m4_define([GL_TMP_FD], 9) # gl_SILENT(command) # executes command, but without the normal configure output. # This is useful when you want to invoke AC_CACHE_CHECK (or AC_CHECK_FUNC etc.) # inside another AC_CACHE_CHECK. AC_DEFUN([gl_SILENT], [ exec GL_TMP_FD>&AS_MESSAGE_FD AS_MESSAGE_FD>/dev/null $1 exec AS_MESSAGE_FD>&GL_TMP_FD GL_TMP_FD>&- ]) # gl_CACHE_VAL_SILENT(cache-id, command-to-set-it) # is like AC_CACHE_VAL(cache-id, command-to-set-it), except that it does not # output a spurious "(cached)" mark in the midst of other configure output. # This macro should be used instead of AC_CACHE_VAL when it is not surrounded # by an AC_MSG_CHECKING/AC_MSG_RESULT pair. AC_DEFUN([gl_CACHE_VAL_SILENT], [ gl_SILENT([ AC_CACHE_VAL([$1], [$2]) ]) ]) # gl_CONDITIONAL(conditional, condition) # is like AM_CONDITIONAL(conditional, condition), except that it does not # produce an error # configure: error: conditional "..." was never defined. # Usually this means the macro was only invoked conditionally. # when only invoked conditionally. Instead, in that case, both the _TRUE # and the _FALSE case are disabled. AC_DEFUN([gl_CONDITIONAL], [ pushdef([AC_CONFIG_COMMANDS_PRE], [:])dnl AM_CONDITIONAL([$1], [$2]) popdef([AC_CONFIG_COMMANDS_PRE])dnl if test -z "${[$1]_TRUE}" && test -z "${[$1]_FALSE}"; then [$1]_TRUE='#' [$1]_FALSE='#' fi ]) # gl_CC_ALLOW_WARNINGS # sets and substitutes a variable GL_CFLAG_ALLOW_WARNINGS, to a $(CC) option # that reverts a preceding '-Werror' option, if available. # This is expected to be '-Wno-error' on gcc, clang (except clang/MSVC), xlclang # and empty otherwise. AC_DEFUN([gl_CC_ALLOW_WARNINGS], [ AC_REQUIRE([AC_PROG_CC]) AC_CACHE_CHECK([for C compiler option to allow warnings], [gl_cv_cc_wallow], [rm -f conftest* echo 'int dummy;' > conftest.c AC_TRY_COMMAND([${CC-cc} $CFLAGS $CPPFLAGS -c conftest.c 2>conftest1.err]) >/dev/null AC_TRY_COMMAND([${CC-cc} $CFLAGS $CPPFLAGS -Wno-error -c conftest.c 2>conftest2.err]) >/dev/null dnl Test the number of error output lines, because AIX xlc accepts the dnl option '-Wno-error', just to produce a warning dnl "Option -Wno-error was incorrectly specified. The option will be ignored." dnl afterwards. if test $? = 0 && test `wc -l < conftest1.err` = `wc -l < conftest2.err`; then gl_cv_cc_wallow='-Wno-error' else gl_cv_cc_wallow=none fi rm -f conftest* ]) case "$gl_cv_cc_wallow" in none) GL_CFLAG_ALLOW_WARNINGS='' ;; *) GL_CFLAG_ALLOW_WARNINGS="$gl_cv_cc_wallow" ;; esac AC_SUBST([GL_CFLAG_ALLOW_WARNINGS]) ]) # gl_CXX_ALLOW_WARNINGS # sets and substitutes a variable GL_CXXFLAG_ALLOW_WARNINGS, to a $(CC) option # that reverts a preceding '-Werror' option, if available. AC_DEFUN([gl_CXX_ALLOW_WARNINGS], [ dnl Requires AC_PROG_CXX or gl_PROG_ANSI_CXX. if test -n "$CXX" && test "$CXX" != no; then AC_CACHE_CHECK([for C++ compiler option to allow warnings], [gl_cv_cxx_wallow], [rm -f conftest* echo 'int dummy;' > conftest.cc AC_TRY_COMMAND([${CXX-c++} $CXXFLAGS $CPPFLAGS -c conftest.cc 2>conftest1.err]) >/dev/null AC_TRY_COMMAND([${CXX-c++} $CXXFLAGS $CPPFLAGS -Wno-error -c conftest.cc 2>conftest2.err]) >/dev/null dnl Test the number of error output lines, because AIX xlC accepts the dnl option '-Wno-error', just to produce a warning dnl "Option -Wno-error was incorrectly specified. The option will be ignored." dnl afterwards. if test $? = 0 && test `wc -l < conftest1.err` = `wc -l < conftest2.err`; then gl_cv_cxx_wallow='-Wno-error' else gl_cv_cxx_wallow=none fi rm -f conftest* ]) case "$gl_cv_cxx_wallow" in none) GL_CXXFLAG_ALLOW_WARNINGS='' ;; *) GL_CXXFLAG_ALLOW_WARNINGS="$gl_cv_cxx_wallow" ;; esac else GL_CXXFLAG_ALLOW_WARNINGS='' fi AC_SUBST([GL_CXXFLAG_ALLOW_WARNINGS]) ]) # gl_CC_GNULIB_WARNINGS # sets and substitutes a variable GL_CFLAG_GNULIB_WARNINGS, to a $(CC) option # set that enables or disables warnings as suitable for the Gnulib coding style. AC_DEFUN([gl_CC_GNULIB_WARNINGS], [ AC_REQUIRE([gl_CC_ALLOW_WARNINGS]) dnl Assume that the compiler supports -Wno-* options only if it also supports dnl -Wno-error. GL_CFLAG_GNULIB_WARNINGS='' if test -n "$GL_CFLAG_ALLOW_WARNINGS"; then dnl Enable these warning options: dnl dnl GCC clang dnl -Wno-cast-qual >= 3 >= 3.9 dnl -Wno-conversion >= 3 >= 3.9 dnl -Wno-float-conversion >= 4.9 >= 3.9 dnl -Wno-float-equal >= 3 >= 3.9 dnl -Wimplicit-fallthrough >= 7 >= 3.9 dnl -Wno-pedantic >= 4.8 >= 3.9 dnl -Wno-sign-compare >= 3 >= 3.9 dnl -Wno-sign-conversion >= 4.3 >= 3.9 dnl -Wno-tautological-out-of-range-compare - >= 3.9 dnl -Wno-type-limits >= 4.3 >= 3.9 dnl -Wno-undef >= 3 >= 3.9 dnl -Wno-unsuffixed-float-constants >= 4.5 dnl -Wno-unused-function >= 3 >= 3.9 dnl -Wno-unused-parameter >= 3 >= 3.9 dnl cat > conftest.c <<\EOF #if (__GNUC__ >= 3 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-cast-qual -Wno-conversion -Wno-float-equal -Wno-sign-compare -Wno-undef -Wno-unused-function -Wno-unused-parameter #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 9) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-float-conversion #endif #if (__GNUC__ >= 7 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wimplicit-fallthrough #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 8) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-pedantic #endif #if 3 < __clang_major__ + (9 <= __clang_minor__) -Wno-tautological-constant-out-of-range-compare #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 3) > 4 && !defined __clang__) || (__clang_major__ + (__clang_minor__ >= 9) > 3) -Wno-sign-conversion -Wno-type-limits #endif #if (__GNUC__ + (__GNUC_MINOR__ >= 5) > 4 && !defined __clang__) -Wno-unsuffixed-float-constants #endif EOF gl_command="$CC $CFLAGS $CPPFLAGS -E conftest.c > conftest.out" if AC_TRY_EVAL([gl_command]); then gl_options=`grep -v '#' conftest.out` for word in $gl_options; do GL_CFLAG_GNULIB_WARNINGS="$GL_CFLAG_GNULIB_WARNINGS $word" done fi rm -f conftest.c conftest.out fi AC_SUBST([GL_CFLAG_GNULIB_WARNINGS]) ]) dnl gl_CONDITIONAL_HEADER([foo.h]) dnl takes a shell variable GL_GENERATE_FOO_H (with value true or false) as input dnl and produces dnl - an AC_SUBSTed variable FOO_H that is either a file name or empty, based dnl on whether GL_GENERATE_FOO_H is true or false, dnl - an Automake conditional GL_GENERATE_FOO_H that evaluates to the value of dnl the shell variable GL_GENERATE_FOO_H. AC_DEFUN([gl_CONDITIONAL_HEADER], [ m4_pushdef([gl_header_name], AS_TR_SH(m4_toupper($1))) m4_pushdef([gl_generate_var], [GL_GENERATE_]AS_TR_SH(m4_toupper($1))) m4_pushdef([gl_generate_cond], [GL_GENERATE_]AS_TR_SH(m4_toupper($1))) case "$gl_generate_var" in false) gl_header_name='' ;; true) dnl It is OK to use a .h file in lib/ from within tests/, but not vice dnl versa. if test -z "$gl_header_name"; then gl_header_name="${gl_source_base_prefix}$1" fi ;; *) echo "*** gl_generate_var is not set correctly" 1>&2; exit 1 ;; esac AC_SUBST(gl_header_name) gl_CONDITIONAL(gl_generate_cond, [$gl_generate_var]) m4_popdef([gl_generate_cond]) m4_popdef([gl_generate_var]) m4_popdef([gl_header_name]) ]) dnl Preparations for gl_CHECK_FUNCS_MACOS. AC_DEFUN([gl_PREPARE_CHECK_FUNCS_MACOS], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_COMPILER_CLANG]) AC_CACHE_CHECK([for compiler option needed when checking for future declarations], [gl_cv_compiler_check_future_option], [case "$host_os" in dnl This is only needed on macOS. darwin*) if test $gl_cv_compiler_clang = yes; then dnl Test whether the compiler supports the option dnl '-Werror=unguarded-availability-new'. saved_ac_compile="$ac_compile" ac_compile="$ac_compile -Werror=unguarded-availability-new" AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[]],[[]])], [gl_cv_compiler_check_future_option='-Werror=unguarded-availability-new'], [gl_cv_compiler_check_future_option=none]) ac_compile="$saved_ac_compile" else gl_cv_compiler_check_future_option=none fi ;; *) gl_cv_compiler_check_future_option=none ;; esac ]) ]) dnl Pieces of the expansion of dnl gl_CHECK_FUNCS_ANDROID dnl gl_CHECK_FUNCS_MACOS dnl gl_CHECK_FUNCS_ANDROID_MACOS AC_DEFUN([gl_CHECK_FUNCS_DEFAULT_CASE], [ *) AC_CHECK_FUNC([$1]) [gl_cv_onwards_func_][$1]=$[ac_cv_func_][$1] ;; ]) AC_DEFUN([gl_CHECK_FUNCS_CASE_FOR_ANDROID], [ linux*-android*) AC_CHECK_DECL([$1], , , [$2]) if test $[ac_cv_have_decl_][$1] = yes; then AC_CHECK_FUNC([[$1]]) if test $[ac_cv_func_][$1] = yes; then [gl_cv_onwards_func_][$1]=yes else dnl The function is declared but does not exist. This should not dnl happen normally. But anyway, we know that a future version dnl of Android will have the function. [gl_cv_onwards_func_][$1]='future OS version' fi else [gl_cv_onwards_func_][$1]='future OS version' fi ;; ]) AC_DEFUN([gl_CHECK_FUNCS_CASE_FOR_MACOS], [ darwin*) if test "x$gl_cv_compiler_check_future_option" != "xnone"; then dnl Use a compile test, not a link test. saved_ac_compile="$ac_compile" ac_compile="$ac_compile $gl_cv_compiler_check_future_option" saved_ac_compile_for_check_decl="$ac_compile_for_check_decl" ac_compile_for_check_decl="$ac_compile_for_check_decl $gl_cv_compiler_check_future_option" unset [ac_cv_have_decl_][$1] AC_CHECK_DECL([$1], , , [$2]) ac_compile="$saved_ac_compile" ac_compile_for_check_decl="$saved_ac_compile_for_check_decl" [ac_cv_func_][$1]="$[ac_cv_have_decl_][$1]" if test $[ac_cv_func_][$1] = yes; then [gl_cv_onwards_func_][$1]=yes else unset [ac_cv_have_decl_][$1] AC_CHECK_DECL([$1], , , [$2]) if test $[ac_cv_have_decl_][$1] = yes; then [gl_cv_onwards_func_][$1]='future OS version' else [gl_cv_onwards_func_][$1]=no fi fi else AC_CHECK_FUNC([$1]) [gl_cv_onwards_func_][$1]=$[ac_cv_func_][$1] fi ;; ]) AC_DEFUN([gl_CHECK_FUNCS_SET_RESULTS], [ case "$[gl_cv_onwards_func_][$1]" in future*) [ac_cv_func_][$1]=no ;; *) [ac_cv_func_][$1]=$[gl_cv_onwards_func_][$1] ;; esac if test $[ac_cv_func_][$1] = yes; then AC_DEFINE([HAVE_]m4_translit([[$1]], [abcdefghijklmnopqrstuvwxyz], [ABCDEFGHIJKLMNOPQRSTUVWXYZ]), [1], [Define to 1 if you have the `$1' function.]) fi ]) dnl gl_CHECK_FUNCS_ANDROID([func], [[#include ]]) dnl is like AC_CHECK_FUNCS([func]), taking into account a portability problem dnl on Android. dnl dnl When code is compiled on Android, it is in the context of a certain dnl "Android API level", which indicates the minimum version of Android on dnl which the app can be installed. In other words, you don't compile for a dnl specific version of Android. You compile for all versions of Android, dnl onwards from the given API level. dnl Thus, the question "does the OS have the function func" has three possible dnl answers: dnl - yes, in all versions starting from the given API level, dnl - no, in no version, dnl - not in the given API level, but in a later version of Android. dnl dnl In detail, this works as follows: dnl If func was added to Android API level, say, 28, then the libc.so has the dnl symbol func always, whereas the header file declares func dnl conditionally: dnl #if __ANDROID_API__ >= 28 dnl ... func (...) __INTRODUCED_IN(28); dnl #endif dnl Thus, when compiling with "clang -target armv7a-unknown-linux-android28", dnl the function func is declared and exists in libc. dnl Whereas when compiling with "clang -target armv7a-unknown-linux-android27", dnl the function func is not declared but exists in libc. dnl dnl This macro sets two variables: dnl - gl_cv_onwards_func_ to yes / no / "future OS version" dnl - ac_cv_func_ to yes / no / no dnl The first variable allows to distinguish all three cases. dnl The second variable is set, so that an invocation dnl gl_CHECK_FUNCS_ANDROID([func], [[#include ]]) dnl can be used as a drop-in replacement for dnl AC_CHECK_FUNCS([func]). AC_DEFUN([gl_CHECK_FUNCS_ANDROID], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_CACHE_CHECK([for [$1]], [[gl_cv_onwards_func_][$1]], [gl_SILENT([ case "$host_os" in gl_CHECK_FUNCS_CASE_FOR_ANDROID([$1], [$2]) gl_CHECK_FUNCS_DEFAULT_CASE([$1]) esac ]) ]) gl_CHECK_FUNCS_SET_RESULTS([$1]) ]) dnl gl_CHECK_FUNCS_MACOS([func], [[#include ]]) dnl is like AC_CHECK_FUNCS([func]), taking into account a portability problem dnl on macOS. dnl dnl When code is compiled on macOS, it is in the context of a certain minimum dnl macOS version, that can be set through the option '-mmacosx-version-min='. dnl In other words, you don't compile for a specific version of macOS. You dnl compile for all versions of macOS, onwards from the given version. dnl Thus, the question "does the OS have the function func" has three possible dnl answers: dnl - yes, in all versions starting from the given version, dnl - no, in no version, dnl - not in the given version, but in a later version of macOS. dnl dnl In detail, this works as follows: dnl If func was added to, say, macOS version 13, then the libc has the dnl symbol func always, whereas the header file declares func dnl conditionally with a special availability attribute: dnl ... func (...) __attribute__((availability(macos,introduced=13.0))); dnl Thus, when compiling with "clang mmacosx-version-min=13", there is no dnl warning about the use of func, and the resulting binary dnl - runs fine on macOS 13, dnl - aborts with a dyld "Symbol not found" message on macOS 12. dnl Whereas, when compiling with "clang mmacosx-version-min=12", there is a dnl warning: 'func' is only available on macOS 13.0 or newer dnl [-Wunguarded-availability-new], dnl and the resulting binary dnl - runs fine on macOS 13, dnl - crashes with a SIGSEGV (signal 11) on macOS 12. dnl dnl This macro sets two variables: dnl - gl_cv_onwards_func_ to yes / no / "future OS version" dnl - ac_cv_func_ to yes / no / no dnl The first variable allows to distinguish all three cases. dnl The second variable is set, so that an invocation dnl gl_CHECK_FUNCS_MACOS([func], [[#include ]]) dnl can be used as a drop-in replacement for dnl AC_CHECK_FUNCS([func]). AC_DEFUN([gl_CHECK_FUNCS_MACOS], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_PREPARE_CHECK_FUNCS_MACOS]) AC_CACHE_CHECK([for [$1]], [[gl_cv_onwards_func_][$1]], [gl_SILENT([ case "$host_os" in gl_CHECK_FUNCS_CASE_FOR_MACOS([$1], [$2]) gl_CHECK_FUNCS_DEFAULT_CASE([$1]) esac ]) ]) gl_CHECK_FUNCS_SET_RESULTS([$1]) ]) dnl gl_CHECK_FUNCS_ANDROID_MACOS([func], [[#include ]]) dnl is like AC_CHECK_FUNCS([func]), taking into account a portability problem dnl on Android and on macOS. dnl It is the combination of gl_CHECK_FUNCS_ANDROID and gl_CHECK_FUNCS_MACOS. AC_DEFUN([gl_CHECK_FUNCS_ANDROID_MACOS], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_PREPARE_CHECK_FUNCS_MACOS]) AC_CACHE_CHECK([for [$1]], [[gl_cv_onwards_func_][$1]], [gl_SILENT([ case "$host_os" in gl_CHECK_FUNCS_CASE_FOR_ANDROID([$1], [$2]) gl_CHECK_FUNCS_CASE_FOR_MACOS([$1], [$2]) gl_CHECK_FUNCS_DEFAULT_CASE([$1]) esac ]) ]) gl_CHECK_FUNCS_SET_RESULTS([$1]) ]) dnl Expands to some code for use in .c programs that, on native Windows, defines dnl the Microsoft deprecated alias function names to the underscore-prefixed dnl actual function names. With this macro, these function names are available dnl without linking with '-loldnames' and without generating warnings. dnl Usage: Use it after all system header files are included. dnl #include <...> dnl #include <...> dnl ]GL_MDA_DEFINES[ dnl ... AC_DEFUN([GL_MDA_DEFINES],[ AC_REQUIRE([_GL_MDA_DEFINES]) [$gl_mda_defines] ]) AC_DEFUN([_GL_MDA_DEFINES], [gl_mda_defines=' #if defined _WIN32 && !defined __CYGWIN__ #define access _access #define chdir _chdir #define chmod _chmod #define close _close #define creat _creat #define dup _dup #define dup2 _dup2 #define ecvt _ecvt #define execl _execl #define execle _execle #define execlp _execlp #define execv _execv #define execve _execve #define execvp _execvp #define execvpe _execvpe #define fcloseall _fcloseall #define fcvt _fcvt #define fdopen _fdopen #define fileno _fileno #define gcvt _gcvt #define getcwd _getcwd #define getpid _getpid #define getw _getw #define isatty _isatty #define j0 _j0 #define j1 _j1 #define jn _jn #define lfind _lfind #define lsearch _lsearch #define lseek _lseek #define memccpy _memccpy #define mkdir _mkdir #define mktemp _mktemp #define open _open #define putenv _putenv #define putw _putw #define read _read #define rmdir _rmdir #define strdup _strdup #define swab _swab #define tempnam _tempnam #define tzset _tzset #define umask _umask #define unlink _unlink #define utime _utime #define wcsdup _wcsdup #define write _write #define y0 _y0 #define y1 _y1 #define yn _yn #endif ' ]) libffcall-2.5/gnulib-m4/stddef_h.m40000664000000000000000000001265714641402034014020 00000000000000# stddef_h.m4 # serial 17 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl A placeholder for , for platforms that have issues. AC_DEFUN_ONCE([gl_STDDEF_H], [ AC_REQUIRE([gl_STDDEF_H_DEFAULTS]) dnl Persuade OpenBSD to declare max_align_t. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) GL_GENERATE_STDDEF_H=false dnl Test whether the type max_align_t exists and whether its alignment dnl "is as great as is supported by the implementation in all contexts". AC_CACHE_CHECK([for good max_align_t], [gl_cv_type_max_align_t], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[/* On FreeBSD 12.0/x86, max_align_t defined by has the correct alignment with the default (wrong) definition of _Alignof, but a wrong alignment as soon as we activate an ISO C compliant _Alignof definition. */ #if ((defined __GNUC__ && 4 <= __GNUC__) || defined __clang__) && !defined __cplusplus #define _Alignof(type) __builtin_offsetof (struct { char __a; type __b; }, __b) #endif #include unsigned int s = sizeof (max_align_t); #if defined __GNUC__ || defined __clang__ || defined __IBM__ALIGNOF__ int check1[2 * (__alignof__ (double) <= __alignof__ (max_align_t)) - 1]; int check2[2 * (__alignof__ (long double) <= __alignof__ (max_align_t)) - 1]; #endif typedef struct { char a; max_align_t b; } max_helper; typedef struct { char a; long b; } long_helper; typedef struct { char a; double b; } double_helper; typedef struct { char a; long double b; } long_double_helper; int check3[2 * (offsetof (long_helper, b) <= offsetof (max_helper, b)) - 1]; int check4[2 * (offsetof (double_helper, b) <= offsetof (max_helper, b)) - 1]; int check5[2 * (offsetof (long_double_helper, b) <= offsetof (max_helper, b)) - 1]; ]])], [gl_cv_type_max_align_t=yes], [gl_cv_type_max_align_t=no]) ]) if test $gl_cv_type_max_align_t = no; then HAVE_MAX_ALIGN_T=0 GL_GENERATE_STDDEF_H=true fi AC_CACHE_CHECK([whether NULL can be used in arbitrary expressions], [gl_cv_decl_null_works], [AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#include int test[2 * (sizeof NULL == sizeof (void *)) -1]; ]])], [gl_cv_decl_null_works=yes], [gl_cv_decl_null_works=no])]) if test $gl_cv_decl_null_works = no; then REPLACE_NULL=1 GL_GENERATE_STDDEF_H=true fi AC_CACHE_CHECK([for unreachable], [gl_cv_func_unreachable], [AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[unreachable (); ]])], [gl_cv_func_unreachable=yes], [gl_cv_func_unreachable=no]) ]) if test $gl_cv_func_unreachable = no; then GL_GENERATE_STDDEF_H=true fi dnl https://gcc.gnu.org/bugzilla/show_bug.cgi?id=114869 AC_CACHE_CHECK([whether nullptr_t needs ], [gl_cv_nullptr_t_needs_stddef], [AC_COMPILE_IFELSE([AC_LANG_DEFINES_PROVIDED[nullptr_t x;]], [gl_cv_nullptr_t_needs_stddef=no], [gl_cv_nullptr_t_needs_stddef=yes])]) if test "$gl_cv_nullptr_t_needs_stddef" = no; then NULLPTR_T_NEEDS_STDDEF=0 GL_GENERATE_STDDEF_H=true fi AC_CACHE_CHECK([for clean definition of __STDC_VERSION_STDDEF_H__], [gl_cv_clean_version_stddef], [AC_PREPROC_IFELSE( [AC_LANG_SOURCE( [[/* https://gcc.gnu.org/bugzilla/show_bug.cgi?id=114870 */ #include #undef __STDC_VERSION_STDDEF_H__ #include #ifdef __STDC_VERSION_STDDEF_H__ # error " defines __STDC_VERSION_STDDEF_H__" #endif ]])], [gl_cv_clean_version_stddef=yes], [gl_cv_clean_version_stddef=no])]) if test "$gl_cv_clean_version_stddef" = no; then STDDEF_NOT_IDEMPOTENT=1 GL_GENERATE_STDDEF_H=true fi if $GL_GENERATE_STDDEF_H; then gl_NEXT_HEADERS([stddef.h]) fi ]) # gl_STDDEF_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_STDDEF_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_STDDEF_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_STDDEF_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_STDDEF_H_MODULE_INDICATOR_DEFAULTS], [ ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_STDDEF_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_STDDEF_H_DEFAULTS]) ]) AC_DEFUN([gl_STDDEF_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. NULLPTR_T_NEEDS_STDDEF=1; AC_SUBST([NULLPTR_T_NEEDS_STDDEF]) STDDEF_NOT_IDEMPOTENT=0; AC_SUBST([STDDEF_NOT_IDEMPOTENT]) REPLACE_NULL=0; AC_SUBST([REPLACE_NULL]) HAVE_MAX_ALIGN_T=1; AC_SUBST([HAVE_MAX_ALIGN_T]) ]) libffcall-2.5/gnulib-m4/codeset.m40000664000000000000000000000152714631432055013665 00000000000000# codeset.m4 # serial 5 (gettext-0.18.2) dnl Copyright (C) 2000-2002, 2006, 2008-2014, 2016, 2019-2024 Free Software dnl Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_DEFUN([AM_LANGINFO_CODESET], [ AC_CACHE_CHECK([for nl_langinfo and CODESET], [am_cv_langinfo_codeset], [AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[char* cs = nl_langinfo(CODESET); return !cs;]])], [am_cv_langinfo_codeset=yes], [am_cv_langinfo_codeset=no]) ]) if test $am_cv_langinfo_codeset = yes; then AC_DEFINE([HAVE_LANGINFO_CODESET], [1], [Define if you have and nl_langinfo(CODESET).]) fi ]) libffcall-2.5/gnulib-m4/errno_h.m40000664000000000000000000000626114657156076013711 00000000000000# errno_h.m4 # serial 18 dnl Copyright (C) 2004, 2006, 2008-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_PREREQ([2.61]) AC_DEFUN_ONCE([gl_HEADER_ERRNO_H], [ AC_REQUIRE([AC_PROG_CC]) dnl Through the dependency on module extensions-aix, _LINUX_SOURCE_COMPAT dnl gets defined already before this macro gets invoked. This persuades dnl AIX 7.3 errno.h to assign ENOTEMPTY a value different than EEXIST. AC_CACHE_CHECK([for complete errno.h], [gl_cv_header_errno_h_complete], [ AC_EGREP_CPP([booboo],[ #include #if !defined ETXTBSY booboo #endif #if !defined ENOMSG booboo #endif #if !defined EIDRM booboo #endif #if !defined ENOLINK booboo #endif #if !defined EPROTO booboo #endif #if !defined EMULTIHOP booboo #endif #if !defined EBADMSG booboo #endif #if !defined EOVERFLOW booboo #endif #if !defined ENOTSUP booboo #endif #if !defined ENETRESET booboo #endif #if !defined ECONNABORTED booboo #endif #if !defined ESTALE booboo #endif #if !defined EDQUOT booboo #endif #if !defined ECANCELED booboo #endif #if !defined EOWNERDEAD booboo #endif #if !defined ENOTRECOVERABLE booboo #endif #if !defined EILSEQ booboo #endif #if !defined ESOCKTNOSUPPORT booboo #endif ], [gl_cv_header_errno_h_complete=no], [gl_cv_header_errno_h_complete=yes]) ]) if test $gl_cv_header_errno_h_complete = yes; then GL_GENERATE_ERRNO_H=false else gl_NEXT_HEADERS([errno.h]) GL_GENERATE_ERRNO_H=true fi gl_REPLACE_ERRNO_VALUE([EMULTIHOP]) gl_REPLACE_ERRNO_VALUE([ENOLINK]) gl_REPLACE_ERRNO_VALUE([EOVERFLOW]) ]) # Assuming $1 = EOVERFLOW. # The EOVERFLOW errno value ought to be defined in , according to # POSIX. But some systems (like OpenBSD 4.0 or AIX 3) don't define it, and # some systems (like OSF/1) define it when _XOPEN_SOURCE_EXTENDED is defined. # Check for the value of EOVERFLOW. # Set the variables EOVERFLOW_HIDDEN and EOVERFLOW_VALUE. AC_DEFUN([gl_REPLACE_ERRNO_VALUE], [ if $GL_GENERATE_ERRNO_H; then AC_CACHE_CHECK([for ]$1[ value], [gl_cv_header_errno_h_]$1, [ AC_EGREP_CPP([yes],[ #include #ifdef ]$1[ yes #endif ], [gl_cv_header_errno_h_]$1[=yes], [gl_cv_header_errno_h_]$1[=no]) if test $gl_cv_header_errno_h_]$1[ = no; then AC_EGREP_CPP([yes],[ #define _XOPEN_SOURCE_EXTENDED 1 #include #ifdef ]$1[ yes #endif ], [gl_cv_header_errno_h_]$1[=hidden]) if test $gl_cv_header_errno_h_]$1[ = hidden; then dnl The macro exists but is hidden. dnl Define it to the same value. AC_COMPUTE_INT([gl_cv_header_errno_h_]$1, $1, [ #define _XOPEN_SOURCE_EXTENDED 1 #include /* The following two lines are a workaround against an autoconf-2.52 bug. */ #include #include ]) fi fi ]) case $gl_cv_header_errno_h_]$1[ in yes | no) ]$1[_HIDDEN=0; ]$1[_VALUE= ;; *) ]$1[_HIDDEN=1; ]$1[_VALUE="$gl_cv_header_errno_h_]$1[" ;; esac AC_SUBST($1[_HIDDEN]) AC_SUBST($1[_VALUE]) fi ]) libffcall-2.5/gnulib-m4/sys_stat_h.m40000664000000000000000000001223414631432055014414 00000000000000# sys_stat_h.m4 # serial 42 -*- Autoconf -*- dnl Copyright (C) 2006-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Eric Blake. dnl Provide a GNU-like . AC_DEFUN_ONCE([gl_SYS_STAT_H], [ AC_REQUIRE([gl_SYS_STAT_H_DEFAULTS]) dnl Check for broken stat macros. AC_REQUIRE([AC_HEADER_STAT]) gl_CHECK_NEXT_HEADERS([sys/stat.h]) dnl Ensure the type mode_t gets defined. AC_REQUIRE([AC_TYPE_MODE_T]) dnl Whether to enable precise timestamps in 'struct stat'. m4_ifdef([gl_WINDOWS_STAT_TIMESPEC], [ AC_REQUIRE([gl_WINDOWS_STAT_TIMESPEC]) ], [ WINDOWS_STAT_TIMESPEC=0 ]) AC_SUBST([WINDOWS_STAT_TIMESPEC]) dnl Whether to ensure that struct stat.st_size is 64-bit wide. m4_ifdef([gl_LARGEFILE], [ AC_REQUIRE([gl_LARGEFILE]) ], [ WINDOWS_64_BIT_ST_SIZE=0 ]) AC_SUBST([WINDOWS_64_BIT_ST_SIZE]) dnl Define types that are supposed to be defined in or dnl . AC_CHECK_TYPE([nlink_t], [], [AC_DEFINE([nlink_t], [int], [Define to the type of st_nlink in struct stat, or a supertype.])], [#include #include ]) dnl Check for declarations of anything we want to poison if the dnl corresponding gnulib module is not in use. gl_WARN_ON_USE_PREPARE([[#include ]], [chmod fchmodat fstat fstatat futimens getumask lchmod lstat mkdirat mkfifo mkfifoat mknod mknodat stat utimensat]) AC_REQUIRE([AC_C_RESTRICT]) ]) # gl_SYS_STAT_MODULE_INDICATOR([modulename]) # sets the shell variable that indicates the presence of the given module # to a C preprocessor expression that will evaluate to 1. # This macro invocation must not occur in macros that are AC_REQUIREd. AC_DEFUN([gl_SYS_STAT_MODULE_INDICATOR], [ dnl Ensure to expand the default settings once only. gl_SYS_STAT_H_REQUIRE_DEFAULTS gl_MODULE_INDICATOR_SET_VARIABLE([$1]) dnl Define it also as a C macro, for the benefit of the unit tests. gl_MODULE_INDICATOR_FOR_TESTS([$1]) ]) # Initializes the default values for AC_SUBSTed shell variables. # This macro must not be AC_REQUIREd. It must only be invoked, and only # outside of macros or in macros that are not AC_REQUIREd. AC_DEFUN([gl_SYS_STAT_H_REQUIRE_DEFAULTS], [ m4_defun(GL_MODULE_INDICATOR_PREFIX[_SYS_STAT_H_MODULE_INDICATOR_DEFAULTS], [ gl_UNISTD_H_REQUIRE_DEFAULTS dnl for REPLACE_FCHDIR gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_CHMOD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FCHMODAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSTAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FSTATAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_FUTIMENS]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_GETUMASK]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LCHMOD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_LSTAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKDIR]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKDIRAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKFIFO]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKFIFOAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKNOD]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MKNODAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_STAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_UTIMENSAT]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_OVERRIDES_STRUCT_STAT]) dnl Support Microsoft deprecated alias function names by default. gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_CHMOD], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_MKDIR], [1]) gl_MODULE_INDICATOR_INIT_VARIABLE([GNULIB_MDA_UMASK], [1]) ]) m4_require(GL_MODULE_INDICATOR_PREFIX[_SYS_STAT_H_MODULE_INDICATOR_DEFAULTS]) AC_REQUIRE([gl_SYS_STAT_H_DEFAULTS]) ]) AC_DEFUN([gl_SYS_STAT_H_DEFAULTS], [ dnl Assume proper GNU behavior unless another module says otherwise. HAVE_FCHMODAT=1; AC_SUBST([HAVE_FCHMODAT]) HAVE_FSTATAT=1; AC_SUBST([HAVE_FSTATAT]) HAVE_FUTIMENS=1; AC_SUBST([HAVE_FUTIMENS]) HAVE_GETUMASK=1; AC_SUBST([HAVE_GETUMASK]) HAVE_LCHMOD=1; AC_SUBST([HAVE_LCHMOD]) HAVE_LSTAT=1; AC_SUBST([HAVE_LSTAT]) HAVE_MKDIRAT=1; AC_SUBST([HAVE_MKDIRAT]) HAVE_MKFIFO=1; AC_SUBST([HAVE_MKFIFO]) HAVE_MKFIFOAT=1; AC_SUBST([HAVE_MKFIFOAT]) HAVE_MKNOD=1; AC_SUBST([HAVE_MKNOD]) HAVE_MKNODAT=1; AC_SUBST([HAVE_MKNODAT]) HAVE_UTIMENSAT=1; AC_SUBST([HAVE_UTIMENSAT]) REPLACE_CHMOD=0; AC_SUBST([REPLACE_CHMOD]) REPLACE_FCHMODAT=0; AC_SUBST([REPLACE_FCHMODAT]) REPLACE_FSTAT=0; AC_SUBST([REPLACE_FSTAT]) REPLACE_FSTATAT=0; AC_SUBST([REPLACE_FSTATAT]) REPLACE_FUTIMENS=0; AC_SUBST([REPLACE_FUTIMENS]) REPLACE_LSTAT=0; AC_SUBST([REPLACE_LSTAT]) REPLACE_MKDIR=0; AC_SUBST([REPLACE_MKDIR]) REPLACE_MKFIFO=0; AC_SUBST([REPLACE_MKFIFO]) REPLACE_MKFIFOAT=0; AC_SUBST([REPLACE_MKFIFOAT]) REPLACE_MKNOD=0; AC_SUBST([REPLACE_MKNOD]) REPLACE_MKNODAT=0; AC_SUBST([REPLACE_MKNODAT]) REPLACE_STAT=0; AC_SUBST([REPLACE_STAT]) REPLACE_UTIMENSAT=0; AC_SUBST([REPLACE_UTIMENSAT]) ]) libffcall-2.5/gnulib-m4/pthread_rwlock_rdlock.m40000664000000000000000000001560114631432055016603 00000000000000# pthread_rwlock_rdlock.m4 # serial 8 dnl Copyright (C) 2017-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl Inspired by dnl https://github.com/linux-test-project/ltp/blob/master/testcases/open_posix_testsuite/conformance/interfaces/pthread_rwlock_rdlock/2-2.c dnl by Intel Corporation. dnl Test whether in a situation where dnl - an rwlock is taken by a reader and has a writer waiting, dnl - an additional reader requests the lock, dnl - the waiting writer and the requesting reader threads have the same dnl priority, dnl the requesting reader thread gets blocked, so that at some point the dnl waiting writer can acquire the lock. dnl Without such a guarantee, when there a N readers and each of the readers dnl spends more than 1/Nth of the time with the lock held, there is a high dnl probability that the waiting writer will not get the lock in a given finite dnl time, a phenomenon called "writer starvation". dnl Without such a guarantee, applications have a hard time avoiding writer dnl starvation. dnl dnl POSIX:2017 makes this requirement only for implementations that support TPS dnl (Thread Priority Scheduling) and only for the scheduling policies SCHED_FIFO dnl and SCHED_RR, see dnl https://pubs.opengroup.org/onlinepubs/9699919799/functions/pthread_rwlock_rdlock.html dnl but this test verifies the guarantee regardless of TPS and regardless of dnl scheduling policy. dnl Glibc does not provide this guarantee (and never will on Linux), see dnl https://sourceware.org/bugzilla/show_bug.cgi?id=13701 dnl https://bugzilla.redhat.com/show_bug.cgi?id=1410052 AC_DEFUN([gl_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER], [ AC_REQUIRE([gl_THREADLIB]) AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles AC_CACHE_CHECK([whether pthread_rwlock_rdlock prefers a writer to a reader], [gl_cv_pthread_rwlock_rdlock_prefer_writer], [saved_LIBS="$LIBS" LIBS="$LIBS $LIBMULTITHREAD" AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #include #include #include #define SUCCEED() exit (0) #define FAILURE() exit (1) #define UNEXPECTED(n) (exit (10 + (n))) /* The main thread creates the waiting writer and the requesting reader threads in the default way; this guarantees that they have the same priority. We can reuse the main thread as first reader thread. */ static pthread_rwlock_t lock; static pthread_t reader1; static pthread_t writer; static pthread_t reader2; static pthread_t timer; /* Used to pass control from writer to reader2 and from reader2 to timer, as in a relay race. Passing control from one running thread to another running thread is most likely faster than to create the second thread. */ static pthread_mutex_t baton; static void * timer_func (void *ignored) { /* Step 13 (can be before or after step 12): The timer thread takes the baton, then waits a moment to make sure it can tell whether the second reader thread is blocked at step 12. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (13); usleep (100000); /* By the time we get here, it's clear that the second reader thread is blocked at step 12. This is the desired behaviour. */ SUCCEED (); } static void * reader2_func (void *ignored) { int err; /* Step 8 (can be before or after step 7): The second reader thread takes the baton, then waits a moment to make sure the writer thread has reached step 7. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (8); usleep (100000); /* Step 9: The second reader thread requests the lock. */ err = pthread_rwlock_tryrdlock (&lock); if (err == 0) FAILURE (); else if (err != EBUSY) UNEXPECTED (9); /* Step 10: Launch a timer, to test whether the next call blocks. */ if (pthread_create (&timer, NULL, timer_func, NULL)) UNEXPECTED (10); /* Step 11: Release the baton. */ if (pthread_mutex_unlock (&baton)) UNEXPECTED (11); /* Step 12: The second reader thread requests the lock. */ err = pthread_rwlock_rdlock (&lock); if (err == 0) FAILURE (); else UNEXPECTED (12); } static void * writer_func (void *ignored) { /* Step 4: Take the baton, so that the second reader thread does not go ahead too early. */ if (pthread_mutex_lock (&baton)) UNEXPECTED (4); /* Step 5: Create the second reader thread. */ if (pthread_create (&reader2, NULL, reader2_func, NULL)) UNEXPECTED (5); /* Step 6: Release the baton. */ if (pthread_mutex_unlock (&baton)) UNEXPECTED (6); /* Step 7: The writer thread requests the lock. */ if (pthread_rwlock_wrlock (&lock)) UNEXPECTED (7); return NULL; } int main () { reader1 = pthread_self (); /* Step 1: The main thread initializes the lock and the baton. */ if (pthread_rwlock_init (&lock, NULL)) UNEXPECTED (1); if (pthread_mutex_init (&baton, NULL)) UNEXPECTED (1); /* Step 2: The main thread acquires the lock as a reader. */ if (pthread_rwlock_rdlock (&lock)) UNEXPECTED (2); /* Step 3: Create the writer thread. */ if (pthread_create (&writer, NULL, writer_func, NULL)) UNEXPECTED (3); /* Job done. Go to sleep. */ for (;;) { sleep (1); } } ]])], [gl_cv_pthread_rwlock_rdlock_prefer_writer=yes], [gl_cv_pthread_rwlock_rdlock_prefer_writer=no], [case "$host_os" in # Guess no on glibc systems. *-gnu* | gnu*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess no on musl systems. *-musl* | midipix*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess no on bionic systems. *-android*) gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" ;; # Guess yes on native Windows with the mingw-w64 winpthreads library. # Guess no on native Windows with the gnulib windows-rwlock module. mingw* | windows*) if test "$gl_use_threads" = yes || test "$gl_use_threads" = posix; then gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing yes" else gl_cv_pthread_rwlock_rdlock_prefer_writer="guessing no" fi ;; # If we don't know, obey --enable-cross-guesses. *) gl_cv_pthread_rwlock_rdlock_prefer_writer="$gl_cross_guess_normal" ;; esac ]) LIBS="$saved_LIBS" ]) case "$gl_cv_pthread_rwlock_rdlock_prefer_writer" in *yes) AC_DEFINE([HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER], [1], [Define if the 'pthread_rwlock_rdlock' function prefers a writer to a reader.]) ;; esac ]) libffcall-2.5/gnulib-m4/host-cpu-c-abi.m40000664000000000000000000004136414662332237014762 00000000000000# host-cpu-c-abi.m4 # serial 18 dnl Copyright (C) 2002-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible and Sam Steingold. dnl Sets the HOST_CPU variable to the canonical name of the CPU. dnl Sets the HOST_CPU_C_ABI variable to the canonical name of the CPU with its dnl C language ABI (application binary interface). dnl Also defines __${HOST_CPU}__ and __${HOST_CPU_C_ABI}__ as C macros in dnl config.h. dnl dnl This canonical name can be used to select a particular assembly language dnl source file that will interoperate with C code on the given host. dnl dnl For example: dnl * 'i386' and 'sparc' are different canonical names, because code for i386 dnl will not run on SPARC CPUs and vice versa. They have different dnl instruction sets. dnl * 'sparc' and 'sparc64' are different canonical names, because code for dnl 'sparc' and code for 'sparc64' cannot be linked together: 'sparc' code dnl contains 32-bit instructions, whereas 'sparc64' code contains 64-bit dnl instructions. A process on a SPARC CPU can be in 32-bit mode or in 64-bit dnl mode, but not both. dnl * 'mips' and 'mipsn32' are different canonical names, because they use dnl different argument passing and return conventions for C functions, and dnl although the instruction set of 'mips' is a large subset of the dnl instruction set of 'mipsn32'. dnl * 'mipsn32' and 'mips64' are different canonical names, because they use dnl different sizes for the C types like 'int' and 'void *', and although dnl the instruction sets of 'mipsn32' and 'mips64' are the same. dnl * The same canonical name is used for different endiannesses. You can dnl determine the endianness through preprocessor symbols: dnl - 'arm': test __ARMEL__. dnl - 'mips', 'mipsn32', 'mips64': test _MIPSEB vs. _MIPSEL. dnl - 'powerpc64': test __BIG_ENDIAN__ vs. __LITTLE_ENDIAN__. dnl * The same name 'i386' is used for CPUs of type i386, i486, i586 dnl (Pentium), AMD K7, Pentium II, Pentium IV, etc., because dnl - Instructions that do not exist on all of these CPUs (cmpxchg, dnl MMX, SSE, SSE2, 3DNow! etc.) are not frequently used. If your dnl assembly language source files use such instructions, you will dnl need to make the distinction. dnl - Speed of execution of the common instruction set is reasonable across dnl the entire family of CPUs. If you have assembly language source files dnl that are optimized for particular CPU types (like GNU gmp has), you dnl will need to make the distinction. dnl See . AC_DEFUN([gl_HOST_CPU_C_ABI], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_C_ASM]) AC_CACHE_CHECK([host CPU and C ABI], [gl_cv_host_cpu_c_abi], [case "$host_cpu" in changequote(,)dnl i[34567]86 ) changequote([,])dnl gl_cv_host_cpu_c_abi=i386 ;; x86_64 ) # On x86_64 systems, the C compiler may be generating code in one of # these ABIs: # - 64-bit instruction set, 64-bit pointers, 64-bit 'long': x86_64. # - 64-bit instruction set, 64-bit pointers, 32-bit 'long': x86_64 # with native Windows (mingw, MSVC). # - 64-bit instruction set, 32-bit pointers, 32-bit 'long': x86_64-x32. # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': i386. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if (defined __x86_64__ || defined __amd64__ \ || defined _M_X64 || defined _M_AMD64) int ok; #else error fail #endif ]])], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __ILP32__ || defined _ILP32 int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=x86_64-x32], [gl_cv_host_cpu_c_abi=x86_64])], [gl_cv_host_cpu_c_abi=i386]) ;; changequote(,)dnl alphaev[4-8] | alphaev56 | alphapca5[67] | alphaev6[78] ) changequote([,])dnl gl_cv_host_cpu_c_abi=alpha ;; arm* | aarch64 ) # Assume arm with EABI. # On arm64 systems, the C compiler may be generating code in one of # these ABIs: # - aarch64 instruction set, 64-bit pointers, 64-bit 'long': arm64. # - aarch64 instruction set, 32-bit pointers, 32-bit 'long': arm64-ilp32. # - 32-bit instruction set, 32-bit pointers, 32-bit 'long': arm or armhf. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#ifdef __aarch64__ int ok; #else error fail #endif ]])], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __ILP32__ || defined _ILP32 int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=arm64-ilp32], [gl_cv_host_cpu_c_abi=arm64])], [# Don't distinguish little-endian and big-endian arm, since they # don't require different machine code for simple operations and # since the user can distinguish them through the preprocessor # defines __ARMEL__ vs. __ARMEB__. # But distinguish arm which passes floating-point arguments and # return values in integer registers (r0, r1, ...) - this is # gcc -mfloat-abi=soft or gcc -mfloat-abi=softfp - from arm which # passes them in float registers (s0, s1, ...) and double registers # (d0, d1, ...) - this is gcc -mfloat-abi=hard. GCC 4.6 or newer # sets the preprocessor defines __ARM_PCS (for the first case) and # __ARM_PCS_VFP (for the second case), but older GCC does not. echo 'double ddd; void func (double dd) { ddd = dd; }' > conftest.c # Look for a reference to the register d0 in the .s file. AC_TRY_COMMAND(${CC-cc} $CFLAGS $CPPFLAGS $gl_c_asm_opt conftest.c) >/dev/null 2>&1 if LC_ALL=C grep 'd0,' conftest.$gl_asmext >/dev/null; then gl_cv_host_cpu_c_abi=armhf else gl_cv_host_cpu_c_abi=arm fi rm -f conftest* ]) ;; hppa1.0 | hppa1.1 | hppa2.0* | hppa64 ) # On hppa, the C compiler may be generating 32-bit code or 64-bit # code. In the latter case, it defines _LP64 and __LP64__. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#ifdef __LP64__ int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=hppa64], [gl_cv_host_cpu_c_abi=hppa]) ;; ia64* ) # On ia64 on HP-UX, the C compiler may be generating 64-bit code or # 32-bit code. In the latter case, it defines _ILP32. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#ifdef _ILP32 int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=ia64-ilp32], [gl_cv_host_cpu_c_abi=ia64]) ;; mips* ) # We should also check for (_MIPS_SZPTR == 64), but gcc keeps this # at 32. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined _MIPS_SZLONG && (_MIPS_SZLONG == 64) int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=mips64], [# In the n32 ABI, _ABIN32 is defined, _ABIO32 is not defined (but # may later get defined by ), and _MIPS_SIM == _ABIN32. # In the 32 ABI, _ABIO32 is defined, _ABIN32 is not defined (but # may later get defined by ), and _MIPS_SIM == _ABIO32. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if (_MIPS_SIM == _ABIN32) int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=mipsn32], [gl_cv_host_cpu_c_abi=mips])]) ;; powerpc* ) # Different ABIs are in use on AIX vs. Mac OS X vs. Linux,*BSD. # No need to distinguish them here; the caller may distinguish # them based on the OS. # On powerpc64 systems, the C compiler may still be generating # 32-bit code. And on powerpc-ibm-aix systems, the C compiler may # be generating 64-bit code. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __powerpc64__ || defined __LP64__ int ok; #else error fail #endif ]])], [# On powerpc64, there are two ABIs on Linux: The AIX compatible # one and the ELFv2 one. The latter defines _CALL_ELF=2. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined _CALL_ELF && _CALL_ELF == 2 int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=powerpc64-elfv2], [gl_cv_host_cpu_c_abi=powerpc64]) ], [gl_cv_host_cpu_c_abi=powerpc]) ;; rs6000 ) gl_cv_host_cpu_c_abi=powerpc ;; riscv32 | riscv64 ) # There are 2 architectures (with variants): rv32* and rv64*. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if __riscv_xlen == 64 int ok; #else error fail #endif ]])], [cpu=riscv64], [cpu=riscv32]) # There are 6 ABIs: ilp32, ilp32f, ilp32d, lp64, lp64f, lp64d. # Size of 'long' and 'void *': AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __LP64__ int ok; #else error fail #endif ]])], [main_abi=lp64], [main_abi=ilp32]) # Float ABIs: # __riscv_float_abi_double: # 'float' and 'double' are passed in floating-point registers. # __riscv_float_abi_single: # 'float' are passed in floating-point registers. # __riscv_float_abi_soft: # No values are passed in floating-point registers. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __riscv_float_abi_double int ok; #else error fail #endif ]])], [float_abi=d], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __riscv_float_abi_single int ok; #else error fail #endif ]])], [float_abi=f], [float_abi='']) ]) gl_cv_host_cpu_c_abi="${cpu}-${main_abi}${float_abi}" ;; s390* ) # On s390x, the C compiler may be generating 64-bit (= s390x) code # or 31-bit (= s390) code. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __LP64__ || defined __s390x__ int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=s390x], [gl_cv_host_cpu_c_abi=s390]) ;; sparc | sparc64 ) # UltraSPARCs running Linux have `uname -m` = "sparc64", but the # C compiler still generates 32-bit code. AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#if defined __sparcv9 || defined __arch64__ int ok; #else error fail #endif ]])], [gl_cv_host_cpu_c_abi=sparc64], [gl_cv_host_cpu_c_abi=sparc]) ;; *) gl_cv_host_cpu_c_abi="$host_cpu" ;; esac ]) dnl In most cases, $HOST_CPU and $HOST_CPU_C_ABI are the same. HOST_CPU=`echo "$gl_cv_host_cpu_c_abi" | sed -e 's/-.*//'` HOST_CPU_C_ABI="$gl_cv_host_cpu_c_abi" AC_SUBST([HOST_CPU]) AC_SUBST([HOST_CPU_C_ABI]) # This was # AC_DEFINE_UNQUOTED([__${HOST_CPU}__]) # AC_DEFINE_UNQUOTED([__${HOST_CPU_C_ABI}__]) # earlier, but KAI C++ 3.2d doesn't like this. sed -e 's/-/_/g' >> confdefs.h < /* Check that time_t can represent 2**32 - 1 correctly. */ #define LARGE_TIME_T \\ ((time_t) (((time_t) 1 << 30) - 1 + 3 * ((time_t) 1 << 30))) int verify_time_t_range[(LARGE_TIME_T / 65537 == 65535 && LARGE_TIME_T % 65537 == 0) ? 1 : -1]; ]]) # gl_YEAR2038_BODY(REQUIRE-YEAR2038-SAFE) ----------------------------------------- AC_DEFUN([gl_YEAR2038_BODY], [ AC_ARG_ENABLE([year2038], [ --disable-year2038 omit support for timestamps past the year 2038]) AS_IF([test "$enable_year2038" != no], [ dnl On many systems, time_t is already a 64-bit type. dnl On those systems where time_t is still 32-bit, it requires kernel dnl and libc support to make it 64-bit. For glibc 2.34 and later on Linux, dnl defining _TIME_BITS=64 and _FILE_OFFSET_BITS=64 is needed on x86 and ARM. dnl dnl On native Windows, the system include files define types __time32_t dnl and __time64_t. By default, time_t is an alias of dnl - __time32_t on 32-bit mingw, dnl - __time64_t on 64-bit mingw and on MSVC (since MSVC 8). dnl But when compiling with -D__MINGW_USE_VC2005_COMPAT, time_t is an dnl alias of __time64_t. dnl And when compiling with -D_USE_32BIT_TIME_T, time_t is an alias of dnl __time32_t. AC_CACHE_CHECK([for time_t past the year 2038], [gl_cv_type_time_t_y2038], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE([gl_YEAR2038_TEST_INCLUDES])], [gl_cv_type_time_t_y2038=yes], [gl_cv_type_time_t_y2038=no]) ]) if test "$gl_cv_type_time_t_y2038" = no; then AC_CACHE_CHECK([for 64-bit time_t with _TIME_BITS=64], [gl_cv_type_time_t_bits_macro], [AC_COMPILE_IFELSE( [AC_LANG_SOURCE([[#define _TIME_BITS 64 #define _FILE_OFFSET_BITS 64 ]gl_YEAR2038_TEST_INCLUDES])], [gl_cv_type_time_t_bits_macro=yes], [gl_cv_type_time_t_bits_macro=no]) ]) if test "$gl_cv_type_time_t_bits_macro" = yes; then AC_DEFINE([_TIME_BITS], [64], [Number of bits in a timestamp, on hosts where this is settable.]) dnl AC_SYS_LARGFILE also defines this; it's OK if we do too. AC_DEFINE([_FILE_OFFSET_BITS], [64], [Number of bits in a file offset, on hosts where this is settable.]) gl_cv_type_time_t_y2038=yes fi fi if test $gl_cv_type_time_t_y2038 = no; then AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[#ifdef _USE_32BIT_TIME_T int ok; #else error fail #endif ]])], [AC_MSG_FAILURE( [The 'time_t' type stops working after January 2038. Remove _USE_32BIT_TIME_T from the compiler flags.])], [# If not cross-compiling and $1 says we should check, # and 'touch' works with a large timestamp, then evidently wider time_t # is desired and supported, so fail and ask the builder to fix the # problem. Otherwise, just warn the builder. m4_ifval([$1], [if test $cross_compiling = no \ && TZ=UTC0 touch -t 210602070628.15 conftest.time 2>/dev/null; then case `TZ=UTC0 LC_ALL=C ls -l conftest.time 2>/dev/null` in *'Feb 7 2106'* | *'Feb 7 17:10'*) AC_MSG_FAILURE( [The 'time_t' type stops working after January 2038, and your system appears to support a wider 'time_t'. Try configuring with 'CC="${CC} -m64"'. To build with a 32-bit time_t anyway (not recommended), configure with '--disable-year2038'.]);; esac rm -f conftest.time fi]) if test "$gl_warned_about_y2038" != yes; then AC_MSG_WARN( [The 'time_t' type stops working after January 2038, and this package needs a wider 'time_t' type if there is any way to access timestamps after that. Configure with 'CC="${CC} -m64"' perhaps?]) gl_warned_about_y2038=yes fi ]) fi]) ]) AC_DEFUN([gl_YEAR2038], [ gl_YEAR2038_BODY([require-year2038-safe]) ]) libffcall-2.5/gnulib-m4/largefile.m40000664000000000000000000003527614641402034014174 00000000000000# largefile.m4 # serial 2 dnl Copyright 1992-1996, 1998-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Enable large files on systems where this is not the default. # Enable support for files on Linux file systems with 64-bit inode numbers. # The following macro works around a problem in Autoconf's AC_FUNC_FSEEKO: # It does not set _LARGEFILE_SOURCE=1 on HP-UX/ia64 32-bit, although this # setting of _LARGEFILE_SOURCE is needed so that declares fseeko # and ftello in C++ mode as well. # This problem occurs in Autoconf 2.71 and earlier, which lack AC_SYS_YEAR2038. AC_DEFUN([gl_SET_LARGEFILE_SOURCE], m4_ifndef([AC_SYS_YEAR2038], [[ AC_REQUIRE([AC_CANONICAL_HOST]) AC_FUNC_FSEEKO case "$host_os" in hpux*) AC_DEFINE([_LARGEFILE_SOURCE], [1], [Define to 1 to make fseeko visible on some hosts (e.g. glibc 2.2).]) ;; esac ]]) ) dnl Remove AC_SYS_YEAR2038_RECOMMENDED if unpatched Autoconf 2.72 or earlier. dnl Autoconf 2.72 still uses -n32, which is not a C preprocessor option, dnl and which was useful only on IRIX which is no longer supported. dnl This should be fixed in Autoconf 2.73. m4_ifdef([AC_SYS_YEAR2038_RECOMMENDED], [m4_bmatch(m4_ifdef([_AC_SYS_LARGEFILE_OPTIONS], [m4_defn([_AC_SYS_LARGEFILE_OPTIONS])], ["-n32"]), ["-n32"], [m4_undefine([AC_SYS_YEAR2038_RECOMMENDED])])]) m4_ifndef([AC_SYS_YEAR2038_RECOMMENDED], [ # Fix up AC_SYS_YEAR2038_RECOMMENDED and related macros, even if # unpatched Autoconf 2.72 or earlier. This code is taken from Autoconf master. # _AC_SYS_YEAR2038_TEST_CODE # -------------------------- # C code used to probe for time_t that can represent time points more # than 2**31 - 1 seconds after the epoch. With the usual Unix epoch, # these correspond to dates after 2038-01-18 22:14:07 +0000 (Gregorian), # hence the name. AC_DEFUN([_AC_SYS_YEAR2038_TEST_CODE], [[ #include /* Check that time_t can represent 2**32 - 1 correctly. */ #define LARGE_TIME_T \\ ((time_t) (((time_t) 1 << 30) - 1 + 3 * ((time_t) 1 << 30))) int verify_time_t_range[(LARGE_TIME_T / 65537 == 65535 && LARGE_TIME_T % 65537 == 0) ? 1 : -1]; ]]) # _AC_SYS_YEAR2038_OPTIONS # ------------------------ # List of known ways to enable support for large time_t. If you change # this list you probably also need to change the AS_CASE at the end of # _AC_SYS_YEAR2038_PROBE. m4_define([_AC_SYS_YEAR2038_OPTIONS], m4_normalize( ["none needed"] dnl 64-bit and newer 32-bit Unix ["-D_TIME_BITS=64"] dnl glibc 2.34 with some 32-bit ABIs ["-D__MINGW_USE_VC2005_COMPAT"] dnl 32-bit MinGW ["-U_USE_32_BIT_TIME_T -D__MINGW_USE_VC2005_COMPAT"] dnl 32-bit MinGW (misconfiguration) )) # _AC_SYS_YEAR2038_PROBE # ---------------------- # Subroutine of AC_SYS_YEAR2038. Probe for time_t that can represent # time points more than 2**31 - 1 seconds after the epoch (dates after # 2038-01-18, see above) and set the cache variable ac_cv_sys_year2038_opts # to one of the values in the _AC_SYS_YEAR2038_OPTIONS list, or to # "support not detected" if none of them worked. Then, set compilation # options and #defines as necessary to enable large time_t support. # # Note that we do not test whether mktime, localtime, etc. handle # large values of time_t correctly, as that would require use of # AC_TRY_RUN. Note also that some systems only support large time_t # together with large off_t. # # If you change this macro you may also need to change # _AC_SYS_YEAR2038_OPTIONS. AC_DEFUN([_AC_SYS_YEAR2038_PROBE], [AC_CACHE_CHECK([for $CC option to support timestamps after 2038], [ac_cv_sys_year2038_opts], [ac_save_CPPFLAGS="$CPPFLAGS" ac_opt_found=no for ac_opt in _AC_SYS_YEAR2038_OPTIONS; do AS_IF([test x"$ac_opt" != x"none needed"], [CPPFLAGS="$ac_save_CPPFLAGS $ac_opt"]) AC_COMPILE_IFELSE([AC_LANG_PROGRAM([_AC_SYS_YEAR2038_TEST_CODE])], [ac_cv_sys_year2038_opts="$ac_opt" ac_opt_found=yes]) test $ac_opt_found = no || break done CPPFLAGS="$ac_save_CPPFLAGS" test $ac_opt_found = yes || ac_cv_sys_year2038_opts="support not detected"]) ac_have_year2038=yes AS_CASE([$ac_cv_sys_year2038_opts], ["none needed"], [], ["support not detected"], [ac_have_year2038=no], ["-D_TIME_BITS=64"], [AC_DEFINE([_TIME_BITS], [64], [Number of bits in time_t, on hosts where this is settable.])], ["-D__MINGW_USE_VC2005_COMPAT"], [AC_DEFINE([__MINGW_USE_VC2005_COMPAT], [1], [Define to 1 on platforms where this makes time_t a 64-bit type.])], ["-U_USE_32_BIT_TIME_T"*], [AC_MSG_FAILURE(m4_text_wrap( [the 'time_t' type is currently forced to be 32-bit. It will stop working after mid-January 2038. Remove _USE_32BIT_TIME_T from the compiler flags.], [], [], [55]))], [AC_MSG_ERROR( [internal error: bad value for \$ac_cv_sys_year2038_opts])]) ]) # _AC_SYS_YEAR2038_ENABLE # ----------------------- # Depending on which of the YEAR2038 macros was used, add either an # --enable-year2038 or a --disable-year2038 to # the configure script. This is expanded very late and # therefore there cannot be any code in the AC_ARG_ENABLE. The # default value for 'enable_year2038' is emitted unconditionally # because the generated code always looks at this variable. m4_define([_AC_SYS_YEAR2038_ENABLE], [m4_divert_text([DEFAULTS], m4_provide_if([AC_SYS_YEAR2038], [enable_year2038=yes], [enable_year2038=no]))]dnl [AC_ARG_ENABLE([year2038], m4_provide_if([AC_SYS_YEAR2038], [AS_HELP_STRING([--disable-year2038], [don't support timestamps after 2038])], [AS_HELP_STRING([--enable-year2038], [support timestamps after 2038])]))]) # AC_SYS_YEAR2038 # --------------- # Attempt to detect and activate support for large time_t. # On systems where time_t is not always 64 bits, this probe can be # skipped by passing the --disable-year2038 option to configure. AC_DEFUN([AC_SYS_YEAR2038], [AC_REQUIRE([AC_SYS_LARGEFILE])dnl AS_IF([test "$enable_year2038,$ac_have_year2038,$cross_compiling" = yes,no,no], [# If we're not cross compiling and 'touch' works with a large # timestamp, then we can presume the system supports wider time_t # *somehow* and we just weren't able to detect it. One common # case that we deliberately *don't* probe for is a system that # supports both 32- and 64-bit ABIs but only the 64-bit ABI offers # wide time_t. (It would be inappropriate for us to override an # intentional use of -m32.) Error out, demanding use of # --disable-year2038 if this is intentional. AS_IF([TZ=UTC0 touch -t 210602070628.15 conftest.time 2>/dev/null], [AS_CASE([`TZ=UTC0 LC_ALL=C ls -l conftest.time 2>/dev/null`], [*'Feb 7 2106'* | *'Feb 7 17:10'*], [AC_MSG_FAILURE(m4_text_wrap( [this system appears to support timestamps after mid-January 2038, but no mechanism for enabling wide 'time_t' was detected. Did you mean to build a 64-bit binary? (E.g., 'CC="${CC} -m64"'.) To proceed with 32-bit time_t, configure with '--disable-year2038'.], [], [], [55]))])])])]) # AC_SYS_YEAR2038_RECOMMENDED # --------------------------- # Same as AC_SYS_YEAR2038, but recommend support for large time_t. # If we cannot find any way to make time_t capable of representing # values larger than 2**31 - 1, error out unless --disable-year2038 is given. AC_DEFUN([AC_SYS_YEAR2038_RECOMMENDED], [AC_REQUIRE([AC_SYS_YEAR2038])dnl AS_IF([test "$enable_year2038,$ac_have_year2038" = yes,no], [AC_MSG_FAILURE(m4_text_wrap( [could not enable timestamps after mid-January 2038. This package recommends support for these later timestamps. However, to proceed with signed 32-bit time_t even though it will fail then, configure with '--disable-year2038'.], [], [], [55]))])]) # _AC_SYS_LARGEFILE_TEST_CODE # --------------------------- # C code used to probe for large file support. m4_define([_AC_SYS_LARGEFILE_TEST_CODE], [@%:@include @%:@ifndef FTYPE @%:@ define FTYPE off_t @%:@endif /* Check that FTYPE can represent 2**63 - 1 correctly. We can't simply define LARGE_FTYPE to be 9223372036854775807, since some C++ compilers masquerading as C compilers incorrectly reject 9223372036854775807. */ @%:@define LARGE_FTYPE (((FTYPE) 1 << 31 << 31) - 1 + ((FTYPE) 1 << 31 << 31)) int FTYPE_is_large[[(LARGE_FTYPE % 2147483629 == 721 && LARGE_FTYPE % 2147483647 == 1) ? 1 : -1]];[]dnl ]) # Defined by Autoconf 2.71 and circa 2022 Gnulib unwisely depended on it. m4_define([_AC_SYS_LARGEFILE_TEST_INCLUDES], [_AC_SYS_LARGEFILE_TEST_CODE]) # _AC_SYS_LARGEFILE_OPTIONS # ------------------------- # List of known ways to enable support for large files. If you change # this list you probably also need to change the AS_CASE at the end of # _AC_SYS_LARGEFILE_PROBE. m4_define([_AC_SYS_LARGEFILE_OPTIONS], m4_normalize( ["none needed"] dnl Most current systems ["-D_FILE_OFFSET_BITS=64"] dnl X/Open LFS spec ["-D_LARGE_FILES=1"] dnl 32-bit AIX 4.2.1+, 32-bit z/OS )) # _AC_SYS_LARGEFILE_PROBE # ----------------------- # Subroutine of AC_SYS_LARGEFILE. Probe for large file support and set # the cache variable ac_cv_sys_largefile_opts to one of the values in # the _AC_SYS_LARGEFILE_OPTIONS list, or to "support not detected" if # none of the options in that list worked. Then, set compilation # options and #defines as necessary to enable large file support. # # If large file support is not detected, the behavior depends on which of # the top-level AC_SYS_LARGEFILE macros was used (see below). # # If you change this macro you may also need to change # _AC_SYS_LARGEFILE_OPTIONS. AC_DEFUN([_AC_SYS_LARGEFILE_PROBE], [AC_CACHE_CHECK([for $CC option to support large files], [ac_cv_sys_largefile_opts], [ac_save_CPPFLAGS=$CPPFLAGS ac_opt_found=no for ac_opt in _AC_SYS_LARGEFILE_OPTIONS; do AS_IF([test x"$ac_opt" != x"none needed"], [CPPFLAGS="$ac_save_CPPFLAGS $ac_opt"]) AC_COMPILE_IFELSE([AC_LANG_PROGRAM([_AC_SYS_LARGEFILE_TEST_CODE])], [AS_IF([test x"$ac_opt" = x"none needed"], [# GNU/Linux s390x and alpha need _FILE_OFFSET_BITS=64 for wide ino_t. CPPFLAGS="$CPPFLAGS -DFTYPE=ino_t" AC_COMPILE_IFELSE([], [], [CPPFLAGS="$CPPFLAGS -D_FILE_OFFSET_BITS=64" AC_COMPILE_IFELSE([], [ac_opt='-D_FILE_OFFSET_BITS=64'])])]) ac_cv_sys_largefile_opts=$ac_opt ac_opt_found=yes]) test $ac_opt_found = no || break done CPPFLAGS=$ac_save_CPPFLAGS dnl Gnulib implements large file support for native Windows, based on the dnl variables WINDOWS_64_BIT_OFF_T, WINDOWS_64_BIT_ST_SIZE. m4_ifdef([gl_LARGEFILE], [ AC_REQUIRE([AC_CANONICAL_HOST]) if test $ac_opt_found != yes; then AS_CASE([$host_os], [mingw* | windows*], [ac_cv_sys_largefile_opts="supported through gnulib" ac_opt_found=yes] ) fi ]) test $ac_opt_found = yes || ac_cv_sys_largefile_opts="support not detected"]) ac_have_largefile=yes AS_CASE([$ac_cv_sys_largefile_opts], ["none needed"], [], ["supported through gnulib"], [], ["support not detected"], [ac_have_largefile=no], ["-D_FILE_OFFSET_BITS=64"], [AC_DEFINE([_FILE_OFFSET_BITS], [64], [Number of bits in a file offset, on hosts where this is settable.])], ["-D_LARGE_FILES=1"], [AC_DEFINE([_LARGE_FILES], [1], [Define to 1 on platforms where this makes off_t a 64-bit type.])], [AC_MSG_ERROR( [internal error: bad value for \$ac_cv_sys_largefile_opts])]) AS_IF([test "$enable_year2038" != no], [_AC_SYS_YEAR2038_PROBE]) AC_CONFIG_COMMANDS_PRE([_AC_SYS_YEAR2038_ENABLE])]) # AC_SYS_LARGEFILE # ---------------- # By default, many hosts won't let programs access large files; # one must use special compiler options to get large-file access to work. # For more details about this brain damage please see: # http://www.unix.org/version2/whatsnew/lfs20mar.html # Additionally, on Linux file systems with 64-bit inodes a file that happens # to have a 64-bit inode number cannot be accessed by 32-bit applications on # Linux x86/x86_64. This can occur with file systems such as XFS and NFS. AC_DEFUN([AC_SYS_LARGEFILE], [AC_ARG_ENABLE([largefile], [AS_HELP_STRING([--disable-largefile], [omit support for large files])])dnl AS_IF([test "$enable_largefile,$enable_year2038" != no,no], [_AC_SYS_LARGEFILE_PROBE])]) ])# m4_ifndef AC_SYS_YEAR2038_RECOMMENDED # Enable large files on systems where this is implemented by Gnulib, not by the # system headers. # Set the variables WINDOWS_64_BIT_OFF_T, WINDOWS_64_BIT_ST_SIZE if Gnulib # overrides ensure that off_t or 'struct size.st_size' are 64-bit, respectively. AC_DEFUN([gl_LARGEFILE], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_os" in mingw* | windows*) dnl Native Windows. dnl mingw64 defines off_t to a 64-bit type already, if dnl _FILE_OFFSET_BITS=64, which is ensured by AC_SYS_LARGEFILE. AC_CACHE_CHECK([for 64-bit off_t], [gl_cv_type_off_t_64], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include int verify_off_t_size[sizeof (off_t) >= 8 ? 1 : -1]; ]], [[]])], [gl_cv_type_off_t_64=yes], [gl_cv_type_off_t_64=no]) ]) if test $gl_cv_type_off_t_64 = no; then WINDOWS_64_BIT_OFF_T=1 else WINDOWS_64_BIT_OFF_T=0 fi dnl Some mingw versions define, if _FILE_OFFSET_BITS=64, 'struct stat' dnl to 'struct _stat32i64' or 'struct _stat64' (depending on dnl _USE_32BIT_TIME_T), which has a 32-bit st_size member. AC_CACHE_CHECK([for 64-bit st_size], [gl_cv_member_st_size_64], [AC_COMPILE_IFELSE( [AC_LANG_PROGRAM( [[#include struct stat buf; int verify_st_size_size[sizeof (buf.st_size) >= 8 ? 1 : -1]; ]], [[]])], [gl_cv_member_st_size_64=yes], [gl_cv_member_st_size_64=no]) ]) if test $gl_cv_member_st_size_64 = no; then WINDOWS_64_BIT_ST_SIZE=1 else WINDOWS_64_BIT_ST_SIZE=0 fi ;; *) dnl Nothing to do on gnulib's side. dnl A 64-bit off_t is dnl - already the default on Mac OS X, FreeBSD, NetBSD, OpenBSD, IRIX, dnl OSF/1, Cygwin, dnl - enabled by _FILE_OFFSET_BITS=64 (ensured by AC_SYS_LARGEFILE) on dnl glibc, HP-UX, Solaris, dnl - enabled by _LARGE_FILES=1 (ensured by AC_SYS_LARGEFILE) on AIX, dnl - impossible to achieve on Minix 3.1.8. WINDOWS_64_BIT_OFF_T=0 WINDOWS_64_BIT_ST_SIZE=0 ;; esac ]) libffcall-2.5/gnulib-m4/pathmax.m40000664000000000000000000000215714631432055013701 00000000000000# pathmax.m4 # serial 11 dnl Copyright (C) 2002-2003, 2005-2006, 2009-2024 Free Software Foundation, dnl Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_PATHMAX], [ dnl Prerequisites of lib/pathmax.h. AC_CHECK_HEADERS_ONCE([sys/param.h]) ]) # Expands to a piece of C program that defines PATH_MAX in the same way as # "pathmax.h" will do. AC_DEFUN([gl_PATHMAX_SNIPPET], [[ /* Arrange to define PATH_MAX, like "pathmax.h" does. */ #if HAVE_UNISTD_H # include #endif #include #if defined HAVE_SYS_PARAM_H && !defined PATH_MAX && !defined MAXPATHLEN # include #endif #if !defined PATH_MAX && defined MAXPATHLEN # define PATH_MAX MAXPATHLEN #endif #ifdef __hpux # undef PATH_MAX # define PATH_MAX 1024 #endif #if defined _WIN32 && ! defined __CYGWIN__ # undef PATH_MAX # define PATH_MAX 260 #endif ]]) # Prerequisites of gl_PATHMAX_SNIPPET. AC_DEFUN([gl_PATHMAX_SNIPPET_PREREQ], [ AC_CHECK_HEADERS_ONCE([unistd.h sys/param.h]) ]) libffcall-2.5/gnulib-m4/mode_t.m40000664000000000000000000000234414631432055013504 00000000000000# mode_t.m4 # serial 2 dnl Copyright (C) 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # For using mode_t, it's sufficient to use AC_TYPE_MODE_T and # include . # Define PROMOTED_MODE_T to the type that is the result of "default argument # promotion" (ISO C 6.5.2.2.(6)) of the type mode_t. AC_DEFUN([gl_PROMOTED_TYPE_MODE_T], [ AC_REQUIRE([AC_TYPE_MODE_T]) AC_CACHE_CHECK([for promoted mode_t type], [gl_cv_promoted_mode_t], [ dnl Assume mode_t promotes to 'int' if and only if it is smaller than 'int', dnl and to itself otherwise. This assumption is not guaranteed by the ISO C dnl standard, but we don't know of any real-world counterexamples. AC_COMPILE_IFELSE([AC_LANG_PROGRAM([[#include ]], [[typedef int array[2 * (sizeof (mode_t) < sizeof (int)) - 1];]])], [gl_cv_promoted_mode_t='int'], [gl_cv_promoted_mode_t='mode_t']) ]) AC_DEFINE_UNQUOTED([PROMOTED_MODE_T], [$gl_cv_promoted_mode_t], [Define to the type that is the result of default argument promotions of type mode_t.]) ]) libffcall-2.5/gnulib-m4/threadlib.m40000664000000000000000000006214014631432055014173 00000000000000# threadlib.m4 # serial 42 dnl Copyright (C) 2005-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. AC_PREREQ([2.60]) dnl The general structure of the multithreading modules in gnulib is that we dnl have three set of modules: dnl dnl * POSIX API: dnl pthread, which combines dnl pthread-h dnl pthread-thread dnl pthread-once dnl pthread-mutex dnl pthread-rwlock dnl pthread-cond dnl pthread-tss dnl pthread-spin dnl sched_yield dnl dnl * ISO C API: dnl threads, which combines dnl threads-h dnl thrd dnl mtx dnl cnd dnl tss dnl dnl * Gnulib API, with an implementation that can be chosen at configure dnl time through the option --enable-threads=... dnl thread dnl lock dnl cond dnl tls dnl yield dnl dnl They are independent, except for the fact that dnl - the implementation of the ISO C API may use the POSIX (or some other dnl platform dependent) API, dnl - the implementation of the Gnulib API may use the POSIX or ISO C or dnl some other platform dependent API, depending on the --enable-threads dnl option. dnl dnl This file contains macros for all of these APIs! dnl ============================================================================ dnl Macros for all thread APIs AC_DEFUN([gl_ANYTHREADLIB_EARLY], [ AC_REQUIRE([AC_CANONICAL_HOST]) if test -z "$gl_anythreadlib_early_done"; then case "$host_os" in osf*) # On OSF/1, the compiler needs the flag -D_REENTRANT so that it # groks . cc also understands the flag -pthread, but # we don't use it because 1. gcc-2.95 doesn't understand -pthread, # 2. putting a flag into CPPFLAGS that has an effect on the linker # causes the AC_LINK_IFELSE test below to succeed unexpectedly, # leading to wrong values of LIBTHREAD and LTLIBTHREAD. CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac # Some systems optimize for single-threaded programs by default, and # need special flags to disable these optimizations. For example, the # definition of 'errno' in . case "$host_os" in aix* | freebsd*) CPPFLAGS="$CPPFLAGS -D_THREAD_SAFE" ;; solaris*) CPPFLAGS="$CPPFLAGS -D_REENTRANT" ;; esac gl_anythreadlib_early_done=done fi ]) dnl Checks whether the compiler and linker support weak declarations of symbols. AC_DEFUN([gl_WEAK_SYMBOLS], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_CACHE_CHECK([whether imported symbols can be declared weak], [gl_cv_have_weak], [case "$host_os" in cygwin* | mingw* | windows*) dnl On Cygwin 3.2.0 with gcc 10.2, and likewise on mingw 10.0.0 with dnl gcc 11.3, the test below would succeed, but programs that use dnl pthread_in_use() with weak symbol references crash miserably at dnl runtime. gl_cv_have_weak="guessing no" ;; *) gl_cv_have_weak=no dnl First, test whether the compiler accepts it syntactically. AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[extern void xyzzy (); #pragma weak xyzzy]], [[xyzzy();]])], [gl_cv_have_weak=maybe]) if test $gl_cv_have_weak = maybe; then dnl Second, test whether it actually works. On Cygwin 1.7.2, with dnl gcc 4.3, symbols declared weak always evaluate to the address 0. AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #pragma weak fputs int main () { return (fputs == NULL); }]])], [gl_cv_have_weak=yes], [gl_cv_have_weak=no], [dnl When cross-compiling, assume that only ELF platforms support dnl weak symbols. AC_EGREP_CPP([Extensible Linking Format], [#ifdef __ELF__ Extensible Linking Format #endif ], [gl_cv_have_weak="guessing yes"], [gl_cv_have_weak="guessing no"]) ]) fi ;; esac dnl But when linking statically, weak symbols don't work. case " $LDFLAGS " in *" -static "*) gl_cv_have_weak=no ;; esac dnl Test for a bug in FreeBSD 11: A link error occurs when using a weak dnl symbol and linking against a shared library that has a dependency on dnl the shared library that defines the symbol. case "$gl_cv_have_weak" in *yes) case "$host_os" in freebsd* | dragonfly* | midnightbsd*) : > conftest1.c $CC $CPPFLAGS $CFLAGS $LDFLAGS -fPIC -shared -o libempty.so conftest1.c -lpthread >&AS_MESSAGE_LOG_FD 2>&1 cat < conftest2.c #include #pragma weak pthread_mutexattr_gettype int main () { return (pthread_mutexattr_gettype != NULL); } EOF $CC $CPPFLAGS $CFLAGS $LDFLAGS -o conftest conftest2.c libempty.so >&AS_MESSAGE_LOG_FD 2>&1 \ || gl_cv_have_weak=no rm -f conftest1.c libempty.so conftest2.c conftest ;; esac ;; esac ]) case "$gl_cv_have_weak" in *yes) AC_DEFINE([HAVE_WEAK_SYMBOLS], [1], [Define to 1 if the compiler and linker support weak declarations of symbols.]) ;; esac ]) dnl ============================================================================ dnl Macros for the POSIX API dnl gl_PTHREADLIB dnl ------------- dnl Tests for the libraries needs for using the POSIX threads API. dnl Sets the variable LIBPTHREAD to the linker options for use in a Makefile. dnl Sets the variable LIBPMULTITHREAD, for programs that really need dnl multithread functionality. The difference between LIBPTHREAD and dnl LIBPMULTITHREAD is that on platforms supporting weak symbols, typically dnl LIBPTHREAD is empty whereas LIBPMULTITHREAD is not. dnl Sets the variable SCHED_YIELD_LIB to the linker options needed to use the dnl sched_yield() function. dnl Adds to CPPFLAGS the flag -D_REENTRANT or -D_THREAD_SAFE if needed for dnl multithread-safe programs. dnl Defines the C macro HAVE_PTHREAD_API if (at least parts of) the POSIX dnl threads API is available. dnl The guts of gl_PTHREADLIB. Needs to be expanded only once. AC_DEFUN([gl_PTHREADLIB_BODY], [ AC_REQUIRE([gl_ANYTHREADLIB_EARLY]) if test -z "$gl_pthreadlib_body_done"; then gl_pthread_api=no LIBPTHREAD= LIBPMULTITHREAD= # On OSF/1, the compiler needs the flag -pthread or -D_REENTRANT so that # it groks . It's added above, in gl_ANYTHREADLIB_EARLY. AC_CHECK_HEADER([pthread.h], [gl_have_pthread_h=yes], [gl_have_pthread_h=no]) if test "$gl_have_pthread_h" = yes; then # Other possible tests: # -lpthreads (FSU threads, PCthreads) # -lgthreads # Test whether both pthread_mutex_lock and pthread_mutexattr_init exist # in libc. IRIX 6.5 has the first one in both libc and libpthread, but # the second one only in libpthread, and lock.c needs it. # # If -pthread works, prefer it to -lpthread, since Ubuntu 14.04 # needs -pthread for some reason. See: # https://lists.gnu.org/r/bug-gnulib/2014-09/msg00023.html saved_LIBS="$LIBS" for gl_pthread in '' '-pthread'; do LIBS="$LIBS $gl_pthread" AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include pthread_mutex_t m; pthread_mutexattr_t ma; ]], [[pthread_mutex_lock (&m); pthread_mutexattr_init (&ma);]])], [gl_pthread_api=yes LIBPTHREAD=$gl_pthread LIBPMULTITHREAD=$gl_pthread]) LIBS="$saved_LIBS" test $gl_pthread_api = yes && break done echo "$as_me:__oline__: gl_pthread_api=$gl_pthread_api" >&AS_MESSAGE_LOG_FD echo "$as_me:__oline__: LIBPTHREAD=$LIBPTHREAD" >&AS_MESSAGE_LOG_FD gl_pthread_in_glibc=no # On Linux with glibc >= 2.34, libc contains the fully functional # pthread functions. case "$host_os" in linux*) AC_EGREP_CPP([Lucky user], [#include #ifdef __GNU_LIBRARY__ #if (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 34) || (__GLIBC__ > 2) Lucky user #endif #endif ], [gl_pthread_in_glibc=yes], []) ;; esac echo "$as_me:__oline__: gl_pthread_in_glibc=$gl_pthread_in_glibc" >&AS_MESSAGE_LOG_FD # Test for libpthread by looking for pthread_kill. (Not pthread_self, # since it is defined as a macro on OSF/1.) if test $gl_pthread_api = yes && test -z "$LIBPTHREAD"; then # The program links fine without libpthread. But it may actually # need to link with libpthread in order to create multiple threads. AC_CHECK_LIB([pthread], [pthread_kill], [if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lpthread # On Solaris and HP-UX, most pthread functions exist also in libc. # Therefore pthread_in_use() needs to actually try to create a # thread: pthread_create from libc will fail, whereas # pthread_create will actually create a thread. # On Solaris 10 or newer, this test is no longer needed, because # libc contains the fully functional pthread functions. case "$host_os" in changequote(,)dnl solaris | solaris2.[1-9] | solaris2.[1-9].* | hpux*) changequote([,])dnl AC_DEFINE([PTHREAD_IN_USE_DETECTION_HARD], [1], [Define if the pthread_in_use() detection is hard.]) esac fi ], [dnl This is needed on FreeBSD 5.2.1. AC_CHECK_LIB([thr], [pthread_kill], [if test $gl_pthread_in_glibc = yes; then LIBPMULTITHREAD= else LIBPMULTITHREAD=-lthr fi ]) ]) elif test $gl_pthread_api != yes; then # Some library is needed. Try libpthread and libc_r. AC_CHECK_LIB([pthread], [pthread_kill], [gl_pthread_api=yes LIBPTHREAD=-lpthread LIBPMULTITHREAD=-lpthread]) if test $gl_pthread_api != yes; then # For FreeBSD 4. AC_CHECK_LIB([c_r], [pthread_kill], [gl_pthread_api=yes LIBPTHREAD=-lc_r LIBPMULTITHREAD=-lc_r]) fi fi echo "$as_me:__oline__: LIBPMULTITHREAD=$LIBPMULTITHREAD" >&AS_MESSAGE_LOG_FD fi AC_MSG_CHECKING([whether POSIX threads API is available]) AC_MSG_RESULT([$gl_pthread_api]) AC_SUBST([LIBPTHREAD]) AC_SUBST([LIBPMULTITHREAD]) if test $gl_pthread_api = yes; then AC_DEFINE([HAVE_PTHREAD_API], [1], [Define if you have the header and the POSIX threads API.]) fi dnl On some systems, sched_yield is in librt, rather than in libpthread. AC_LINK_IFELSE( [AC_LANG_PROGRAM( [[#include ]], [[sched_yield ();]])], [SCHED_YIELD_LIB= ], [dnl Solaris 7...10 has sched_yield in librt, not in libpthread or libc. AC_CHECK_LIB([rt], [sched_yield], [SCHED_YIELD_LIB=-lrt], [dnl Solaris 2.5.1, 2.6 has sched_yield in libposix4, not librt. AC_CHECK_LIB([posix4], [sched_yield], [SCHED_YIELD_LIB=-lposix4])]) ]) AC_SUBST([SCHED_YIELD_LIB]) dnl For backward compatibility. LIB_SCHED_YIELD="$SCHED_YIELD_LIB" AC_SUBST([LIB_SCHED_YIELD]) gl_pthreadlib_body_done=done fi ]) AC_DEFUN([gl_PTHREADLIB], [ AC_REQUIRE([gl_ANYTHREADLIB_EARLY]) gl_PTHREADLIB_BODY ]) dnl ============================================================================ dnl Macros for the ISO C API dnl gl_STDTHREADLIB dnl --------------- dnl Tests for the libraries needs for using the ISO C threads API. dnl Sets the variable LIBSTDTHREAD to the linker options for use in a Makefile. dnl Adds to CPPFLAGS the flag -D_REENTRANT or -D_THREAD_SAFE if needed for dnl multithread-safe programs. dnl Defines the C macro HAVE_THREADS_H if (at least parts of) the ISO C threads dnl API is available. dnl The guts of gl_STDTHREADLIB. Needs to be expanded only once. AC_DEFUN([gl_STDTHREADLIB_BODY], [ AC_REQUIRE([gl_ANYTHREADLIB_EARLY]) AC_REQUIRE([AC_CANONICAL_HOST]) if test -z "$gl_stdthreadlib_body_done"; then AC_CHECK_HEADERS_ONCE([threads.h]) case "$host_os" in mingw* | windows*) LIBSTDTHREAD= ;; *) gl_PTHREADLIB_BODY if test $ac_cv_header_threads_h = yes; then dnl glibc >= 2.29 has thrd_create in libpthread. dnl FreeBSD >= 10 has thrd_create in libstdthreads; this library depends dnl on libpthread (for the symbol 'pthread_mutexattr_gettype'). dnl glibc >= 2.34, AIX >= 7.1, and Solaris >= 11.4 have thrd_create in dnl libc. gl_CHECK_FUNCS_ANDROID([thrd_create], [[#include ]]) if test $ac_cv_func_thrd_create = yes; then LIBSTDTHREAD= else AC_CHECK_LIB([stdthreads], [thrd_create], [ LIBSTDTHREAD='-lstdthreads -lpthread' ], [ dnl Guess that thrd_create is in libpthread. LIBSTDTHREAD="$LIBPMULTITHREAD" ]) fi else dnl Libraries needed by thrd.c, mtx.c, cnd.c, tss.c. LIBSTDTHREAD="$LIBPMULTITHREAD $SCHED_YIELD_LIB" fi ;; esac AC_SUBST([LIBSTDTHREAD]) AC_MSG_CHECKING([whether ISO C threads API is available]) AC_MSG_RESULT([$ac_cv_header_threads_h]) gl_stdthreadlib_body_done=done fi ]) AC_DEFUN([gl_STDTHREADLIB], [ AC_REQUIRE([gl_ANYTHREADLIB_EARLY]) gl_STDTHREADLIB_BODY ]) dnl ============================================================================ dnl Macros for the Gnulib API dnl gl_THREADLIB dnl ------------ dnl Tests for a multithreading library to be used. dnl If the configure.ac contains a definition of the gl_THREADLIB_DEFAULT_NO dnl (it must be placed before the invocation of gl_THREADLIB_EARLY!), then the dnl default is 'no', otherwise it is system dependent. In both cases, the user dnl can change the choice through the options --enable-threads=choice or dnl --disable-threads. dnl Defines at most one of the macros USE_ISOC_THREADS, USE_POSIX_THREADS, dnl USE_ISOC_AND_POSIX_THREADS, USE_WINDOWS_THREADS. dnl The choice --enable-threads=isoc+posix is available only on platforms that dnl have both the ISO C and the POSIX threads APIs. It has the effect of using dnl the ISO C API for most things and the POSIX API only for creating and dnl controlling threads (because there is no equivalent to pthread_atfork in dnl the ISO C API). dnl Sets the variables LIBTHREAD and LTLIBTHREAD to the linker options for use dnl in a Makefile (LIBTHREAD for use without libtool, LTLIBTHREAD for use with dnl libtool). dnl Sets the variables LIBMULTITHREAD and LTLIBMULTITHREAD similarly, for dnl programs that really need multithread functionality. The difference dnl between LIBTHREAD and LIBMULTITHREAD is that on platforms supporting weak dnl symbols, typically LIBTHREAD is empty whereas LIBMULTITHREAD is not. dnl Adds to CPPFLAGS the flag -D_REENTRANT or -D_THREAD_SAFE if needed for dnl multithread-safe programs. dnl Since support for GNU pth was removed, $LTLIBTHREAD and $LIBTHREAD have the dnl same value, and similarly $LTLIBMULTITHREAD and $LIBMULTITHREAD have the dnl same value. Only system libraries are needed. AC_DEFUN([gl_THREADLIB_EARLY], [ AC_REQUIRE([gl_THREADLIB_EARLY_BODY]) ]) dnl The guts of gl_THREADLIB_EARLY. Needs to be expanded only once. AC_DEFUN([gl_THREADLIB_EARLY_BODY], [ dnl Ordering constraints: This macro modifies CPPFLAGS in a way that dnl influences the result of the autoconf tests that test for *_unlocked dnl declarations, on AIX 5 at least. Therefore it must come early. AC_BEFORE([$0], [gl_FUNC_GLIBC_UNLOCKED_IO])dnl AC_BEFORE([$0], [gl_ARGP])dnl AC_REQUIRE([AC_CANONICAL_HOST]) dnl _GNU_SOURCE is needed for pthread_rwlock_t on glibc systems. AC_REQUIRE([AC_USE_SYSTEM_EXTENSIONS]) dnl Check for multithreading. m4_ifdef([gl_THREADLIB_DEFAULT_NO], [m4_divert_text([DEFAULTS], [gl_use_threads_default=no])], [m4_divert_text([DEFAULTS], [gl_use_threads_default=])]) dnl gl_use_winpthreads_default defaults to 'no', because in mingw 10, like dnl in mingw 5, the use of libwinpthread still makes test-pthread-tss crash. m4_divert_text([DEFAULTS], [gl_use_winpthreads_default=no]) AC_ARG_ENABLE([threads], AS_HELP_STRING([[--enable-threads={isoc|posix|isoc+posix|windows}]], [specify multithreading API])m4_ifdef([gl_THREADLIB_DEFAULT_NO], [], [ AS_HELP_STRING([[--disable-threads]], [build without multithread safety])]), [gl_use_threads=$enableval], [if test -n "$gl_use_threads_default"; then gl_use_threads="$gl_use_threads_default" else changequote(,)dnl case "$host_os" in dnl Disable multithreading by default on OSF/1, because it interferes dnl with fork()/exec(): When msgexec is linked with -lpthread, its dnl child process gets an endless segmentation fault inside execvp(). osf*) gl_use_threads=no ;; dnl Disable multithreading by default on Cygwin 1.5.x, because it has dnl bugs that lead to endless loops or crashes. See dnl . cygwin*) case `uname -r` in 1.[0-5].*) gl_use_threads=no ;; *) gl_use_threads=yes ;; esac ;; dnl Obey gl_AVOID_WINPTHREAD on mingw. mingw* | windows*) case "$gl_use_winpthreads_default" in yes) gl_use_threads=posix ;; no) gl_use_threads=windows ;; *) gl_use_threads=yes ;; esac ;; *) gl_use_threads=yes ;; esac changequote([,])dnl fi ]) if test "$gl_use_threads" = yes \ || test "$gl_use_threads" = isoc \ || test "$gl_use_threads" = posix \ || test "$gl_use_threads" = isoc+posix; then # For using or : gl_ANYTHREADLIB_EARLY fi ]) dnl The guts of gl_THREADLIB. Needs to be expanded only once. AC_DEFUN([gl_THREADLIB_BODY], [ AC_REQUIRE([gl_THREADLIB_EARLY_BODY]) gl_threads_api=none LIBTHREAD= LTLIBTHREAD= LIBMULTITHREAD= LTLIBMULTITHREAD= if test "$gl_use_threads" != no; then dnl Check whether the compiler and linker support weak declarations. gl_WEAK_SYMBOLS if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then dnl If we use weak symbols to implement pthread_in_use / pth_in_use / dnl thread_in_use, we also need to test whether the ISO C 11 thrd_create dnl facility is in use. AC_CHECK_HEADERS_ONCE([threads.h]) : fi if test "$gl_use_threads" = isoc || test "$gl_use_threads" = isoc+posix; then AC_CHECK_HEADERS_ONCE([threads.h]) gl_have_isoc_threads="$ac_cv_header_threads_h" fi if test "$gl_use_threads" = yes \ || test "$gl_use_threads" = posix \ || test "$gl_use_threads" = isoc+posix; then gl_PTHREADLIB_BODY LIBTHREAD=$LIBPTHREAD LTLIBTHREAD=$LIBPTHREAD LIBMULTITHREAD=$LIBPMULTITHREAD LTLIBMULTITHREAD=$LIBPMULTITHREAD if test $gl_pthread_api = yes; then if test "$gl_use_threads" = isoc+posix && test "$gl_have_isoc_threads" = yes; then gl_threads_api='isoc+posix' AC_DEFINE([USE_ISOC_AND_POSIX_THREADS], [1], [Define if the combination of the ISO C and POSIX multithreading APIs can be used.]) LIBTHREAD= LTLIBTHREAD= else gl_threads_api=posix AC_DEFINE([USE_POSIX_THREADS], [1], [Define if the POSIX multithreading library can be used.]) if test -z "$LIBMULTITHREAD" && test -z "$LTLIBMULTITHREAD"; then AC_DEFINE([USE_POSIX_THREADS_FROM_LIBC], [1], [Define if references to the POSIX multithreading library are satisfied by libc.]) else if case "$gl_cv_have_weak" in *yes) true;; *) false;; esac; then AC_DEFINE([USE_POSIX_THREADS_WEAK], [1], [Define if references to the POSIX multithreading library should be made weak.]) LIBTHREAD= LTLIBTHREAD= else case "$host_os" in freebsd* | dragonfly* | midnightbsd*) if test "x$LIBTHREAD" != "x$LIBMULTITHREAD"; then dnl If weak symbols can't tell whether pthread_create(), pthread_key_create() dnl etc. will succeed, we need a runtime test. AC_DEFINE([PTHREAD_IN_USE_DETECTION_HARD], [1], [Define if the pthread_in_use() detection is hard.]) fi ;; esac fi fi fi fi fi if test $gl_threads_api = none; then if test "$gl_use_threads" = isoc && test "$gl_have_isoc_threads" = yes; then gl_STDTHREADLIB_BODY LIBTHREAD=$LIBSTDTHREAD LTLIBTHREAD=$LIBSTDTHREAD LIBMULTITHREAD=$LIBSTDTHREAD LTLIBMULTITHREAD=$LIBSTDTHREAD gl_threads_api=isoc AC_DEFINE([USE_ISOC_THREADS], [1], [Define if the ISO C multithreading library can be used.]) fi fi if test $gl_threads_api = none; then case "$gl_use_threads" in yes | windows | win32) # The 'win32' is for backward compatibility. if { case "$host_os" in mingw* | windows*) true;; *) false;; esac }; then gl_threads_api=windows AC_DEFINE([USE_WINDOWS_THREADS], [1], [Define if the native Windows multithreading API can be used.]) fi ;; esac fi else dnl "$gl_use_threads" is "no". AC_DEFINE([AVOID_ANY_THREADS], [1], [Define if no multithread safety and no multithreading is desired.]) fi AC_MSG_CHECKING([for multithread API to use]) AC_MSG_RESULT([$gl_threads_api]) AC_SUBST([LIBTHREAD]) AC_SUBST([LTLIBTHREAD]) AC_SUBST([LIBMULTITHREAD]) AC_SUBST([LTLIBMULTITHREAD]) ]) AC_DEFUN([gl_THREADLIB], [ AC_REQUIRE([gl_THREADLIB_EARLY]) AC_REQUIRE([gl_THREADLIB_BODY]) ]) dnl gl_DISABLE_THREADS dnl ------------------ dnl Sets the gl_THREADLIB default so that threads are not used by default. dnl The user can still override it at installation time, by using the dnl configure option '--enable-threads'. AC_DEFUN([gl_DISABLE_THREADS], [ m4_divert_text([INIT_PREPARE], [gl_use_threads_default=no]) ]) dnl gl_AVOID_WINPTHREAD dnl ------------------- dnl Sets the gl_THREADLIB default so that on mingw, a dependency to the dnl libwinpthread DLL (mingw-w64 winpthreads library) is avoided. dnl The user can still override it at installation time, by using the dnl configure option '--enable-threads=posix'. dnl As of 2023, this is now the default. AC_DEFUN([gl_AVOID_WINPTHREAD], [ m4_divert_text([INIT_PREPARE], [gl_use_winpthreads_default=no]) ]) dnl ============================================================================ dnl Survey of platforms: dnl dnl Platform Available Compiler Supports test-lock dnl flavours option weak result dnl --------------- --------- --------- -------- --------- dnl Linux 2.4/glibc posix -lpthread Y OK dnl dnl Linux/glibc 2.34 posix Y OK dnl dnl GNU Hurd/glibc posix -lpthread Y OK dnl dnl Ubuntu 14.04 posix -pthread Y OK dnl dnl FreeBSD 5.3 posix -lc_r Y dnl posix -lkse ? Y dnl posix -lpthread ? Y dnl posix -lthr Y dnl dnl FreeBSD 5.2 posix -lc_r Y dnl posix -lkse Y dnl posix -lthr Y dnl dnl FreeBSD 4.0,4.10 posix -lc_r Y OK dnl dnl NetBSD 1.6 -- dnl dnl OpenBSD 3.4 posix -lpthread Y OK dnl dnl Mac OS X 10.[123] posix -lpthread Y OK dnl dnl Solaris 7,8,9 posix -lpthread Y Sol 7,8: 0.0; Sol 9: OK dnl dnl HP-UX 11 posix -lpthread N (cc) OK dnl Y (gcc) dnl dnl IRIX 6.5 posix -lpthread Y 0.5 dnl dnl AIX 4.3,5.1 posix -lpthread N AIX 4: 0.5; AIX 5: OK dnl dnl OSF/1 4.0,5.1 posix -pthread (cc) N OK dnl -lpthread (gcc) Y dnl dnl Cygwin posix -lpthread Y OK dnl dnl Mingw windows N OK dnl dnl BeOS 5 -- dnl dnl The test-lock result shows what happens if in test-lock.c EXPLICIT_YIELD is dnl turned off: dnl OK if all three tests terminate OK, dnl 0.5 if the first test terminates OK but the second one loops endlessly, dnl 0.0 if the first test already loops endlessly. libffcall-2.5/gnulib-m4/alloca.m40000664000000000000000000000731414631432055013472 00000000000000# alloca.m4 # serial 21 dnl Copyright (C) 2002-2004, 2006-2007, 2009-2024 Free Software Foundation, dnl Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. AC_DEFUN([gl_FUNC_ALLOCA], [ AC_REQUIRE([AC_FUNC_ALLOCA]) if test $ac_cv_func_alloca_works = no; then gl_PREREQ_ALLOCA fi # Define an additional variable used in the Makefile substitution. if test $ac_cv_working_alloca_h = yes; then AC_CACHE_CHECK([for alloca as a compiler built-in], [gl_cv_rpl_alloca], [ AC_EGREP_CPP([Need own alloca], [ #if defined __GNUC__ || defined _AIX || defined _MSC_VER Need own alloca #endif ], [gl_cv_rpl_alloca=yes], [gl_cv_rpl_alloca=no]) ]) if test $gl_cv_rpl_alloca = yes; then dnl OK, alloca can be implemented through a compiler built-in. AC_DEFINE([HAVE_ALLOCA], [1], [Define to 1 if you have 'alloca' after including , a header that may be supplied by this distribution.]) GL_GENERATE_ALLOCA_H=true else dnl alloca exists as a library function, i.e. it is slow and probably dnl a memory leak. Don't define HAVE_ALLOCA in this case. GL_GENERATE_ALLOCA_H=false fi else GL_GENERATE_ALLOCA_H=true fi if test $ac_cv_working_alloca_h = yes; then HAVE_ALLOCA_H=1 else HAVE_ALLOCA_H=0 fi AC_SUBST([HAVE_ALLOCA_H]) ]) # Prerequisites of lib/alloca.c. # STACK_DIRECTION is already handled by AC_FUNC_ALLOCA. AC_DEFUN([gl_PREREQ_ALLOCA], [:]) m4_version_prereq([2.70], [], [ # This works around a bug in autoconf <= 2.68 and has simplifications # from 2.70. See: # https://lists.gnu.org/r/bug-gnulib/2011-06/msg00277.html # https://git.savannah.gnu.org/cgit/autoconf.git/commit/?id=6cd9f12520b0d6f76d3230d7565feba1ecf29497 # https://git.savannah.gnu.org/cgit/autoconf.git/commit/?id=15edf7fd8094fd14a89d9891dd72a9624762597a # _AC_LIBOBJ_ALLOCA # ----------------- # Set up the LIBOBJ replacement of 'alloca'. Well, not exactly # AC_LIBOBJ since we actually set the output variable 'ALLOCA'. # Nevertheless, for Automake, AC_LIBSOURCES it. m4_define([_AC_LIBOBJ_ALLOCA], [# The SVR3 libPW and SVR4 libucb both contain incompatible functions # that cause trouble. Some versions do not even contain alloca or # contain a buggy version. If you still want to use their alloca, # use ar to extract alloca.o from them instead of compiling alloca.c. AC_LIBSOURCES(alloca.c) AC_SUBST([ALLOCA], [\${LIBOBJDIR}alloca.$ac_objext])dnl AC_DEFINE(C_ALLOCA, 1, [Define to 1 if using 'alloca.c'.]) AC_CACHE_CHECK([stack direction for C alloca], [ac_cv_c_stack_direction], [AC_RUN_IFELSE([AC_LANG_SOURCE( [AC_INCLUDES_DEFAULT int find_stack_direction (int *addr, int depth) { int dir, dummy = 0; if (! addr) addr = &dummy; *addr = addr < &dummy ? 1 : addr == &dummy ? 0 : -1; dir = depth ? find_stack_direction (addr, depth - 1) : 0; return dir + dummy; } int main (int argc, char **argv) { return find_stack_direction (0, argc + !argv + 20) < 0; }])], [ac_cv_c_stack_direction=1], [ac_cv_c_stack_direction=-1], [ac_cv_c_stack_direction=0])]) AH_VERBATIM([STACK_DIRECTION], [/* If using the C implementation of alloca, define if you know the direction of stack growth for your system; otherwise it will be automatically deduced at runtime. STACK_DIRECTION > 0 => grows toward higher addresses STACK_DIRECTION < 0 => grows toward lower addresses STACK_DIRECTION = 0 => direction of growth unknown */ #undef STACK_DIRECTION])dnl AC_DEFINE_UNQUOTED(STACK_DIRECTION, $ac_cv_c_stack_direction) ])# _AC_LIBOBJ_ALLOCA ]) libffcall-2.5/config.h.in0000664000000000000000000020622614665326516012240 00000000000000/* config.h.in. Generated from configure.ac by autoheader. */ /* CPU and C ABI indicator */ #ifndef __i386__ #undef __i386__ #endif #ifndef __x86_64_x32__ #undef __x86_64_x32__ #endif #ifndef __x86_64__ #undef __x86_64__ #endif #ifndef __alpha__ #undef __alpha__ #endif #ifndef __arm__ #undef __arm__ #endif #ifndef __armhf__ #undef __armhf__ #endif #ifndef __arm64_ilp32__ #undef __arm64_ilp32__ #endif #ifndef __arm64__ #undef __arm64__ #endif #ifndef __hppa__ #undef __hppa__ #endif #ifndef __hppa64__ #undef __hppa64__ #endif #ifndef __ia64_ilp32__ #undef __ia64_ilp32__ #endif #ifndef __ia64__ #undef __ia64__ #endif #ifndef __loongarch64__ #undef __loongarch64__ #endif #ifndef __m68k__ #undef __m68k__ #endif #ifndef __mips__ #undef __mips__ #endif #ifndef __mipsn32__ #undef __mipsn32__ #endif #ifndef __mips64__ #undef __mips64__ #endif #ifndef __powerpc__ #undef __powerpc__ #endif #ifndef __powerpc64__ #undef __powerpc64__ #endif #ifndef __powerpc64_elfv2__ #undef __powerpc64_elfv2__ #endif #ifndef __riscv32__ #undef __riscv32__ #endif #ifndef __riscv64__ #undef __riscv64__ #endif #ifndef __riscv32_ilp32__ #undef __riscv32_ilp32__ #endif #ifndef __riscv32_ilp32f__ #undef __riscv32_ilp32f__ #endif #ifndef __riscv32_ilp32d__ #undef __riscv32_ilp32d__ #endif #ifndef __riscv64_ilp32__ #undef __riscv64_ilp32__ #endif #ifndef __riscv64_ilp32f__ #undef __riscv64_ilp32f__ #endif #ifndef __riscv64_ilp32d__ #undef __riscv64_ilp32d__ #endif #ifndef __riscv64_lp64__ #undef __riscv64_lp64__ #endif #ifndef __riscv64_lp64f__ #undef __riscv64_lp64f__ #endif #ifndef __riscv64_lp64d__ #undef __riscv64_lp64d__ #endif #ifndef __s390__ #undef __s390__ #endif #ifndef __s390x__ #undef __s390x__ #endif #ifndef __sh__ #undef __sh__ #endif #ifndef __sparc__ #undef __sparc__ #endif #ifndef __sparc64__ #undef __sparc64__ #endif /* Witness that has been included. */ #define _GL_CONFIG_H_INCLUDED 1 /* Define if no multithread safety and no multithreading is desired. */ #undef AVOID_ANY_THREADS /* Define to the number of bits in type 'ptrdiff_t'. */ #undef BITSIZEOF_PTRDIFF_T /* Define to the number of bits in type 'sig_atomic_t'. */ #undef BITSIZEOF_SIG_ATOMIC_T /* Define to the number of bits in type 'size_t'. */ #undef BITSIZEOF_SIZE_T /* Define to the number of bits in type 'wchar_t'. */ #undef BITSIZEOF_WCHAR_T /* Define to the number of bits in type 'wint_t'. */ #undef BITSIZEOF_WINT_T /* whether code in malloc()ed memory is executable */ #undef CODE_EXECUTABLE /* Define to 1 if using 'alloca.c'. */ #undef C_ALLOCA /* Define to 1 if // is a file system root distinct from /. */ #undef DOUBLE_SLASH_IS_DISTINCT_ROOT /* Define this to 1 if F_DUPFD behavior does not match POSIX */ #undef FCNTL_DUPFD_BUGGY /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module close shall be considered present. */ #undef GNULIB_CLOSE /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module fscanf shall be considered present. */ #undef GNULIB_FSCANF /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module fstat shall be considered present. */ #undef GNULIB_FSTAT /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module lock shall be considered present. */ #undef GNULIB_LOCK /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module msvc-nothrow shall be considered present. */ #undef GNULIB_MSVC_NOTHROW /* Define to 1 if printf and friends should be labeled with attribute "__gnu_printf__" instead of "__printf__" */ #undef GNULIB_PRINTF_ATTRIBUTE_FLAVOR_GNU /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module scanf shall be considered present. */ #undef GNULIB_SCANF /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module stat shall be considered present. */ #undef GNULIB_STAT /* Define to a C preprocessor expression that evaluates to 1 or 0, depending whether the gnulib module strerror shall be considered present. */ #undef GNULIB_STRERROR /* Define to 1 when the gnulib module cloexec should be tested. */ #undef GNULIB_TEST_CLOEXEC /* Define to 1 when the gnulib module close should be tested. */ #undef GNULIB_TEST_CLOSE /* Define to 1 when the gnulib module dup2 should be tested. */ #undef GNULIB_TEST_DUP2 /* Define to 1 when the gnulib module fcntl should be tested. */ #undef GNULIB_TEST_FCNTL /* Define to 1 when the gnulib module fgetc should be tested. */ #undef GNULIB_TEST_FGETC /* Define to 1 when the gnulib module fgets should be tested. */ #undef GNULIB_TEST_FGETS /* Define to 1 when the gnulib module fprintf should be tested. */ #undef GNULIB_TEST_FPRINTF /* Define to 1 when the gnulib module fputc should be tested. */ #undef GNULIB_TEST_FPUTC /* Define to 1 when the gnulib module fputs should be tested. */ #undef GNULIB_TEST_FPUTS /* Define to 1 when the gnulib module fread should be tested. */ #undef GNULIB_TEST_FREAD /* Define to 1 when the gnulib module fscanf should be tested. */ #undef GNULIB_TEST_FSCANF /* Define to 1 when the gnulib module fstat should be tested. */ #undef GNULIB_TEST_FSTAT /* Define to 1 when the gnulib module fwrite should be tested. */ #undef GNULIB_TEST_FWRITE /* Define to 1 when the gnulib module getc should be tested. */ #undef GNULIB_TEST_GETC /* Define to 1 when the gnulib module getchar should be tested. */ #undef GNULIB_TEST_GETCHAR /* Define to 1 when the gnulib module getdtablesize should be tested. */ #undef GNULIB_TEST_GETDTABLESIZE /* Define to 1 when the gnulib module getpagesize should be tested. */ #undef GNULIB_TEST_GETPAGESIZE /* Define to 1 when the gnulib module getprogname should be tested. */ #undef GNULIB_TEST_GETPROGNAME /* Define to 1 when the gnulib module hasmntopt should be tested. */ #undef GNULIB_TEST_HASMNTOPT /* Define to 1 when the gnulib module open should be tested. */ #undef GNULIB_TEST_OPEN /* Define to 1 when the gnulib module printf should be tested. */ #undef GNULIB_TEST_PRINTF /* Define to 1 when the gnulib module pthread-once should be tested. */ #undef GNULIB_TEST_PTHREAD_ONCE /* Define to 1 when the gnulib module putc should be tested. */ #undef GNULIB_TEST_PUTC /* Define to 1 when the gnulib module putchar should be tested. */ #undef GNULIB_TEST_PUTCHAR /* Define to 1 when the gnulib module puts should be tested. */ #undef GNULIB_TEST_PUTS /* Define to 1 when the gnulib module raise should be tested. */ #undef GNULIB_TEST_RAISE /* Define to 1 when the gnulib module rmdir should be tested. */ #undef GNULIB_TEST_RMDIR /* Define to 1 when the gnulib module scanf should be tested. */ #undef GNULIB_TEST_SCANF /* Define to 1 when the gnulib module sigaction should be tested. */ #undef GNULIB_TEST_SIGACTION /* Define to 1 when the gnulib module sigprocmask should be tested. */ #undef GNULIB_TEST_SIGPROCMASK /* Define to 1 when the gnulib module stat should be tested. */ #undef GNULIB_TEST_STAT /* Define to 1 when the gnulib module strerror should be tested. */ #undef GNULIB_TEST_STRERROR /* Define to 1 when the gnulib module vfprintf should be tested. */ #undef GNULIB_TEST_VFPRINTF /* Define to 1 when the gnulib module vprintf should be tested. */ #undef GNULIB_TEST_VPRINTF /* Define to 1 if you have 'alloca' after including , a header that may be supplied by this distribution. */ #undef HAVE_ALLOCA /* Define to 1 if works. */ #undef HAVE_ALLOCA_H /* Define to 1 if the GCC 4.1 primitives for atomic compare-and-swap can be used. */ #undef HAVE_ATOMIC_COMPARE_AND_SWAP_GCC41 /* Define to 1 if bool, true and false work as per C2023. */ #undef HAVE_C_BOOL /* Define to 1 if the static_assert keyword works. */ #undef HAVE_C_STATIC_ASSERT /* Define to 1 if C supports variable-length arrays. */ #undef HAVE_C_VARARRAYS /* Define to 1 if you have the declaration of 'ecvt', and to 0 if you don't. */ #undef HAVE_DECL_ECVT /* Define to 1 if you have the declaration of 'execvpe', and to 0 if you don't. */ #undef HAVE_DECL_EXECVPE /* Define to 1 if you have the declaration of 'fcloseall', and to 0 if you don't. */ #undef HAVE_DECL_FCLOSEALL /* Define to 1 if you have the declaration of 'fcvt', and to 0 if you don't. */ #undef HAVE_DECL_FCVT /* Define to 1 if you have the declaration of 'gcvt', and to 0 if you don't. */ #undef HAVE_DECL_GCVT /* Define to 1 if you have the declaration of 'getdtablesize', and to 0 if you don't. */ #undef HAVE_DECL_GETDTABLESIZE /* Define to 1 if you have the declaration of 'getw', and to 0 if you don't. */ #undef HAVE_DECL_GETW /* Define to 1 if you have the declaration of 'program_invocation_name', and to 0 if you don't. */ #undef HAVE_DECL_PROGRAM_INVOCATION_NAME /* Define to 1 if you have the declaration of 'program_invocation_short_name', and to 0 if you don't. */ #undef HAVE_DECL_PROGRAM_INVOCATION_SHORT_NAME /* Define to 1 if you have the declaration of 'putw', and to 0 if you don't. */ #undef HAVE_DECL_PUTW /* Define to 1 if you have the declaration of 'strerror_r', and to 0 if you don't. */ #undef HAVE_DECL_STRERROR_R /* Define to 1 if you have the declaration of '__argv', and to 0 if you don't. */ #undef HAVE_DECL___ARGV /* Define to 1 if you have the header file. */ #undef HAVE_DLFCN_H /* Define to 1 if you have the `error' function. */ #undef HAVE_ERROR /* Define to 1 if you have the header file. */ #undef HAVE_ERROR_H /* Define to 1 if you have the 'fcntl' function. */ #undef HAVE_FCNTL /* Define to 1 if you have the 'getdtablesize' function. */ #undef HAVE_GETDTABLESIZE /* Define to 1 if you have the 'getexecname' function. */ #undef HAVE_GETEXECNAME /* Define to 1 if you have the `getprogname' function. */ #undef HAVE_GETPROGNAME /* Define to 1 if you have the `hasmntopt' function. */ #undef HAVE_HASMNTOPT /* Define to 1 if you have the header file. */ #undef HAVE_INTTYPES_H /* Define if you have and nl_langinfo(CODESET). */ #undef HAVE_LANGINFO_CODESET /* Define to 1 if you have the header file. */ #undef HAVE_LIMITS_H /* Define to 1 if the system has the type 'long long int'. */ #undef HAVE_LONG_LONG_INT /* Define to 1 if you have the 'lstat' function. */ #undef HAVE_LSTAT /* Define to 1 if mmap()'s MAP_ANONYMOUS flag is available after including config.h and . */ #undef HAVE_MAP_ANONYMOUS /* Define to 1 if you have the `memfd_create' function. */ #undef HAVE_MEMFD_CREATE /* Define to 1 if you have the header file. */ #undef HAVE_MINIX_CONFIG_H /* defines MAP_ANONYMOUS and mmaping with MAP_ANONYMOUS works */ #undef HAVE_MMAP_ANONYMOUS /* mmaping of the special device /dev/zero works */ #undef HAVE_MMAP_DEVZERO /* have an mmap() function that, together with mach_vm_remap(), can make memory pages executable */ #undef HAVE_MMAP_SHARED_MACOS_CAN_EXEC /* have an mmap() function that, with MAP_SHARED on a memfd descriptor, can make memory pages executable */ #undef HAVE_MMAP_SHARED_MEMFD_CAN_EXEC /* have an mmap() function that, together with mremap(), can make memory pages executable */ #undef HAVE_MMAP_SHARED_NETBSD_CAN_EXEC /* have an mmap() function that, with MAP_SHARED on a file, can make memory pages executable */ #undef HAVE_MMAP_SHARED_POSIX_CAN_EXEC /* Define to 1 if you have the header file. */ #undef HAVE_MNTENT_H /* Define to 1 if you have the 'mprotect' function. */ #undef HAVE_MPROTECT /* have an mprotect() function that can make malloc()ed memory pages executable */ #undef HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC /* have an mprotect() function that can make mmap()ed memory pages executable */ #undef HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC /* Define to 1 if you have the 'mquery' function. */ #undef HAVE_MQUERY /* Define to 1 on MSVC platforms that have the "invalid parameter handler" concept. */ #undef HAVE_MSVC_INVALID_PARAMETER_HANDLER /* Define to 1 if you have the header file. */ #undef HAVE_OS_H /* Define to 1 if you have the 'pstat_getprocvm' function. */ #undef HAVE_PSTAT_GETPROCVM /* Define if you have the header and the POSIX threads API. */ #undef HAVE_PTHREAD_API /* Define to 1 if you have the header file. */ #undef HAVE_PTHREAD_H /* Define if the defines PTHREAD_MUTEX_RECURSIVE. */ #undef HAVE_PTHREAD_MUTEX_RECURSIVE /* Define if the POSIX multithreading library has read/write locks. */ #undef HAVE_PTHREAD_RWLOCK /* Define if the 'pthread_rwlock_rdlock' function prefers a writer to a reader. */ #undef HAVE_PTHREAD_RWLOCK_RDLOCK_PREFER_WRITER /* Define to 1 if the system has the type 'pthread_spinlock_t'. */ #undef HAVE_PTHREAD_SPINLOCK_T /* Define to 1 if the system has the type 'pthread_t'. */ #undef HAVE_PTHREAD_T /* Define to 1 if you have the 'raise' function. */ #undef HAVE_RAISE /* Define to 1 if you have the header file. */ #undef HAVE_SCHED_H /* Define to 1 if you have the header file. */ #undef HAVE_SDKDDKVER_H /* Define to 1 if you have the 'setdtablesize' function. */ #undef HAVE_SETDTABLESIZE /* Define to 1 if you have the `setmntent' function. */ #undef HAVE_SETMNTENT /* Define to 1 if you have the 'sigaction' function. */ #undef HAVE_SIGACTION /* Define to 1 if you have the 'sigaltstack' function. */ #undef HAVE_SIGALTSTACK /* Define to 1 if the system has the type 'siginfo_t'. */ #undef HAVE_SIGINFO_T /* Define to 1 if you have the 'siginterrupt' function. */ #undef HAVE_SIGINTERRUPT /* Define to 1 if 'sig_atomic_t' is a signed integer type. */ #undef HAVE_SIGNED_SIG_ATOMIC_T /* Define to 1 if 'wchar_t' is a signed integer type. */ #undef HAVE_SIGNED_WCHAR_T /* Define to 1 if 'wint_t' is a signed integer type. */ #undef HAVE_SIGNED_WINT_T /* Define to 1 if the system has the type 'sigset_t'. */ #undef HAVE_SIGSET_T /* Define to 1 if the system has the type 'sig_atomic_t'. */ #undef HAVE_SIG_ATOMIC_T /* Define to 1 if you have the header file. */ #undef HAVE_STDBOOL_H /* Define to 1 if you have the header file. */ #undef HAVE_STDCKDINT_H /* Define to 1 if you have the header file. */ #undef HAVE_STDINT_H /* Define to 1 if you have the header file. */ #undef HAVE_STDIO_H /* Define to 1 if you have the header file. */ #undef HAVE_STDLIB_H /* Define if you have 'strerror_r'. */ #undef HAVE_STRERROR_R /* Define to 1 if you have the header file. */ #undef HAVE_STRINGS_H /* Define to 1 if you have the header file. */ #undef HAVE_STRING_H /* Define to 1 if 'sa_sigaction' is a member of 'struct sigaction'. */ #undef HAVE_STRUCT_SIGACTION_SA_SIGACTION /* Define to 1 if 'st_atimensec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_ATIMENSEC /* Define to 1 if 'st_atimespec.tv_nsec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_ATIMESPEC_TV_NSEC /* Define to 1 if 'st_atim.st__tim.tv_nsec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_ATIM_ST__TIM_TV_NSEC /* Define to 1 if 'st_atim.tv_nsec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_ATIM_TV_NSEC /* Define to 1 if 'st_birthtimensec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_BIRTHTIMENSEC /* Define to 1 if 'st_birthtimespec.tv_nsec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_BIRTHTIMESPEC_TV_NSEC /* Define to 1 if 'st_birthtim.tv_nsec' is a member of 'struct stat'. */ #undef HAVE_STRUCT_STAT_ST_BIRTHTIM_TV_NSEC /* Define to 1 if you have the 'symlink' function. */ #undef HAVE_SYMLINK /* Define to 1 if you have the header file. */ #undef HAVE_SYS_BITYPES_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_CACHECTL_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_INTTYPES_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_PARAM_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_SINGLE_THREADED_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_SOCKET_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_STAT_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TIME_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TYPES_H /* Define to 1 if you have the `thrd_create' function. */ #undef HAVE_THRD_CREATE /* Define to 1 if you have the header file. */ #undef HAVE_THREADS_H /* Define to 1 if you have the header file. */ #undef HAVE_UNISTD_H /* Define to 1 if the system has the type 'unsigned long long int'. */ #undef HAVE_UNSIGNED_LONG_LONG_INT /* Define if you have a global __progname variable */ #undef HAVE_VAR___PROGNAME /* Define to 1 if you have the header file. */ #undef HAVE_WCHAR_H /* Define to 1 if the compiler and linker support weak declarations of symbols. */ #undef HAVE_WEAK_SYMBOLS /* Define to 1 if you have the header file. */ #undef HAVE_WINSOCK2_H /* Define if you have the 'wint_t' type. */ #undef HAVE_WINT_T /* have a working mprotect() function */ #undef HAVE_WORKING_MPROTECT /* Define to 1 if O_NOATIME works. */ #undef HAVE_WORKING_O_NOATIME /* Define to 1 if O_NOFOLLOW works. */ #undef HAVE_WORKING_O_NOFOLLOW /* Define to 1 if you have the '_set_invalid_parameter_handler' function. */ #undef HAVE__SET_INVALID_PARAMETER_HANDLER /* Define to 1 if ctype.h defines __header_inline. */ #undef HAVE___HEADER_INLINE /* Please see the Gnulib manual for how to use these macros. Suppress extern inline with HP-UX cc, as it appears to be broken; see . Suppress extern inline with Sun C in standards-conformance mode, as it mishandles inline functions that call each other. E.g., for 'inline void f (void) { } inline void g (void) { f (); }', c99 incorrectly complains 'reference to static identifier "f" in extern inline function'. This bug was observed with Oracle Developer Studio 12.6 (Sun C 5.15 SunOS_sparc 2017/05/30). Suppress extern inline (with or without __attribute__ ((__gnu_inline__))) on configurations that mistakenly use 'static inline' to implement functions or macros in standard C headers like . For example, if isdigit is mistakenly implemented via a static inline function, a program containing an extern inline function that calls isdigit may not work since the C standard prohibits extern inline functions from calling static functions (ISO C 99 section 6.7.4.(3). This bug is known to occur on: OS X 10.8 and earlier; see: https://lists.gnu.org/r/bug-gnulib/2012-12/msg00023.html DragonFly; see http://muscles.dragonflybsd.org/bulk/clang-master-potential/20141111_102002/logs/ah-tty-0.3.12.log FreeBSD; see: https://lists.gnu.org/r/bug-gnulib/2014-07/msg00104.html OS X 10.9 has a macro __header_inline indicating the bug is fixed for C and for clang but remains for g++; see . Assume DragonFly and FreeBSD will be similar. GCC 4.3 and above with -std=c99 or -std=gnu99 implements ISO C99 inline semantics, unless -fgnu89-inline is used. It defines a macro __GNUC_STDC_INLINE__ to indicate this situation or a macro __GNUC_GNU_INLINE__ to indicate the opposite situation. GCC 4.2 with -std=c99 or -std=gnu99 implements the GNU C inline semantics but warns, unless -fgnu89-inline is used: warning: C99 inline functions are not supported; using GNU89 warning: to disable this warning use -fgnu89-inline or the gnu_inline function attribute It defines a macro __GNUC_GNU_INLINE__ to indicate this situation. */ #if (((defined __APPLE__ && defined __MACH__) \ || defined __DragonFly__ || defined __FreeBSD__) \ && (defined HAVE___HEADER_INLINE \ ? (defined __cplusplus && defined __GNUC_STDC_INLINE__ \ && ! defined __clang__) \ : ((! defined _DONT_USE_CTYPE_INLINE_ \ && (defined __GNUC__ || defined __cplusplus)) \ || (defined _FORTIFY_SOURCE && 0 < _FORTIFY_SOURCE \ && defined __GNUC__ && ! defined __cplusplus)))) # define _GL_EXTERN_INLINE_STDHEADER_BUG #endif #if ((__GNUC__ \ ? (defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ \ && !defined __PCC__) \ : (199901L <= __STDC_VERSION__ \ && !defined __HP_cc \ && !defined __PGI \ && !(defined __SUNPRO_C && __STDC__))) \ && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) # define _GL_INLINE inline # define _GL_EXTERN_INLINE extern inline # define _GL_EXTERN_INLINE_IN_USE #elif (2 < __GNUC__ + (7 <= __GNUC_MINOR__) && !defined __STRICT_ANSI__ \ && !defined __PCC__ \ && !defined _GL_EXTERN_INLINE_STDHEADER_BUG) # if defined __GNUC_GNU_INLINE__ && __GNUC_GNU_INLINE__ /* __gnu_inline__ suppresses a GCC 4.2 diagnostic. */ # define _GL_INLINE extern inline __attribute__ ((__gnu_inline__)) # else # define _GL_INLINE extern inline # endif # define _GL_EXTERN_INLINE extern # define _GL_EXTERN_INLINE_IN_USE #else # define _GL_INLINE _GL_UNUSED static # define _GL_EXTERN_INLINE _GL_UNUSED static #endif /* In GCC 4.6 (inclusive) to 5.1 (exclusive), suppress bogus "no previous prototype for 'FOO'" and "no previous declaration for 'FOO'" diagnostics, when FOO is an inline function in the header; see and . */ #if __GNUC__ == 4 && 6 <= __GNUC_MINOR__ # if defined __GNUC_STDC_INLINE__ && __GNUC_STDC_INLINE__ # define _GL_INLINE_HEADER_CONST_PRAGMA # else # define _GL_INLINE_HEADER_CONST_PRAGMA \ _Pragma ("GCC diagnostic ignored \"-Wsuggest-attribute=const\"") # endif # define _GL_INLINE_HEADER_BEGIN \ _Pragma ("GCC diagnostic push") \ _Pragma ("GCC diagnostic ignored \"-Wmissing-prototypes\"") \ _Pragma ("GCC diagnostic ignored \"-Wmissing-declarations\"") \ _GL_INLINE_HEADER_CONST_PRAGMA # define _GL_INLINE_HEADER_END \ _Pragma ("GCC diagnostic pop") #else # define _GL_INLINE_HEADER_BEGIN # define _GL_INLINE_HEADER_END #endif /* Version number: (major<<8) + minor */ #undef LIBFFCALL_VERSION /* Define to the sub-directory where libtool stores uninstalled libraries. */ #undef LT_OBJDIR /* If malloc(0) is != NULL, define this to 1. Otherwise define this to 0. */ #undef MALLOC_0_IS_NONNULL /* Define to a substitute value for mmap()'s MAP_ANONYMOUS flag. */ #undef MAP_ANONYMOUS /* Use GNU style printf and scanf. */ #ifndef __USE_MINGW_ANSI_STDIO # undef __USE_MINGW_ANSI_STDIO #endif /* Define to 1 on musl libc. */ #undef MUSL_LIBC /* Define to 1 if open() fails to recognize a trailing slash. */ #undef OPEN_TRAILING_SLASH_BUG /* Name of package */ #undef PACKAGE /* Define to the address where bug reports for this package should be sent. */ #undef PACKAGE_BUGREPORT /* Define to the full name of this package. */ #undef PACKAGE_NAME /* Define to the full name and version of this package. */ #undef PACKAGE_STRING /* Define to the one symbol short name of this package. */ #undef PACKAGE_TARNAME /* Define to the home page for this package. */ #undef PACKAGE_URL /* Define to the version of this package. */ #undef PACKAGE_VERSION /* Define to the type that is the result of default argument promotions of type mode_t. */ #undef PROMOTED_MODE_T /* Define if the pthread_in_use() detection is hard. */ #undef PTHREAD_IN_USE_DETECTION_HARD /* Define to l, ll, u, ul, ull, etc., as suitable for constants of type 'ptrdiff_t'. */ #undef PTRDIFF_T_SUFFIX /* Define to 1 if stat needs help when passed a file name with a trailing slash */ #undef REPLACE_FUNC_STAT_FILE /* Define to 1 if strerror(0) does not return a message implying success. */ #undef REPLACE_STRERROR_0 /* Define if lists must be signal-safe. */ #undef SIGNAL_SAFE_LIST /* Define to l, ll, u, ul, ull, etc., as suitable for constants of type 'sig_atomic_t'. */ #undef SIG_ATOMIC_T_SUFFIX /* Define as the maximum value of type 'size_t', if the system doesn't define it. */ #ifndef SIZE_MAX # undef SIZE_MAX #endif /* Define to l, ll, u, ul, ull, etc., as suitable for constants of type 'size_t'. */ #undef SIZE_T_SUFFIX /* If using the C implementation of alloca, define if you know the direction of stack growth for your system; otherwise it will be automatically deduced at runtime. STACK_DIRECTION > 0 => grows toward higher addresses STACK_DIRECTION < 0 => grows toward lower addresses STACK_DIRECTION = 0 => direction of growth unknown */ #undef STACK_DIRECTION /* Define to 1 if the 'S_IS*' macros in do not work properly. */ #undef STAT_MACROS_BROKEN /* Define to 1 if all of the C89 standard headers exist (not just the ones required in a freestanding environment). This macro is provided for backward compatibility; new code need not use it. */ #undef STDC_HEADERS /* Define to 1 if strerror_r returns char *. */ #undef STRERROR_R_CHAR_P /* Define to 1 if the type of the st_atim member of a struct stat is struct timespec. */ #undef TYPEOF_STRUCT_STAT_ST_ATIM_IS_STRUCT_TIMESPEC /* Define to the prefix of C symbols at the assembler and linker level, either an underscore or empty. */ #undef USER_LABEL_PREFIX /* Define if the combination of the ISO C and POSIX multithreading APIs can be used. */ #undef USE_ISOC_AND_POSIX_THREADS /* Define if the ISO C multithreading library can be used. */ #undef USE_ISOC_THREADS /* Define to enable the declarations of ISO C 23 Annex K types and functions. */ #if !(defined __STDC_WANT_LIB_EXT1__ && __STDC_WANT_LIB_EXT1__) #undef/**/__STDC_WANT_LIB_EXT1__ #define __STDC_WANT_LIB_EXT1__ 1 #endif /* Define if the POSIX multithreading library can be used. */ #undef USE_POSIX_THREADS /* Define if references to the POSIX multithreading library are satisfied by libc. */ #undef USE_POSIX_THREADS_FROM_LIBC /* Define if references to the POSIX multithreading library should be made weak. */ #undef USE_POSIX_THREADS_WEAK /* Enable extensions on AIX, Interix, z/OS. */ #ifndef _ALL_SOURCE # undef _ALL_SOURCE #endif /* Enable general extensions on macOS. */ #ifndef _DARWIN_C_SOURCE # undef _DARWIN_C_SOURCE #endif /* Enable general extensions on Solaris. */ #ifndef __EXTENSIONS__ # undef __EXTENSIONS__ #endif /* Enable GNU extensions on systems that have them. */ #ifndef _GNU_SOURCE # undef _GNU_SOURCE #endif /* Enable X/Open compliant socket functions that do not require linking with -lxnet on HP-UX 11.11. */ #ifndef _HPUX_ALT_XOPEN_SOCKET_API # undef _HPUX_ALT_XOPEN_SOCKET_API #endif /* Identify the host operating system as Minix. This macro does not affect the system headers' behavior. A future release of Autoconf may stop defining this macro. */ #ifndef _MINIX # undef _MINIX #endif /* Enable general extensions on NetBSD. Enable NetBSD compatibility extensions on Minix. */ #ifndef _NETBSD_SOURCE # undef _NETBSD_SOURCE #endif /* Enable OpenBSD compatibility extensions on NetBSD. Oddly enough, this does nothing on OpenBSD. */ #ifndef _OPENBSD_SOURCE # undef _OPENBSD_SOURCE #endif /* Define to 1 if needed for POSIX-compatible behavior. */ #ifndef _POSIX_SOURCE # undef _POSIX_SOURCE #endif /* Define to 2 if needed for POSIX-compatible behavior. */ #ifndef _POSIX_1_SOURCE # undef _POSIX_1_SOURCE #endif /* Enable POSIX-compatible threading on Solaris. */ #ifndef _POSIX_PTHREAD_SEMANTICS # undef _POSIX_PTHREAD_SEMANTICS #endif /* Enable extensions specified by ISO/IEC TS 18661-5:2014. */ #ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ # undef __STDC_WANT_IEC_60559_ATTRIBS_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-1:2014. */ #ifndef __STDC_WANT_IEC_60559_BFP_EXT__ # undef __STDC_WANT_IEC_60559_BFP_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-2:2015. */ #ifndef __STDC_WANT_IEC_60559_DFP_EXT__ # undef __STDC_WANT_IEC_60559_DFP_EXT__ #endif /* Enable extensions specified by C23 Annex F. */ #ifndef __STDC_WANT_IEC_60559_EXT__ # undef __STDC_WANT_IEC_60559_EXT__ #endif /* Enable extensions specified by ISO/IEC TS 18661-4:2015. */ #ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__ # undef __STDC_WANT_IEC_60559_FUNCS_EXT__ #endif /* Enable extensions specified by C23 Annex H and ISO/IEC TS 18661-3:2015. */ #ifndef __STDC_WANT_IEC_60559_TYPES_EXT__ # undef __STDC_WANT_IEC_60559_TYPES_EXT__ #endif /* Enable extensions specified by ISO/IEC TR 24731-2:2010. */ #ifndef __STDC_WANT_LIB_EXT2__ # undef __STDC_WANT_LIB_EXT2__ #endif /* Enable extensions specified by ISO/IEC 24747:2009. */ #ifndef __STDC_WANT_MATH_SPEC_FUNCS__ # undef __STDC_WANT_MATH_SPEC_FUNCS__ #endif /* Enable extensions on HP NonStop. */ #ifndef _TANDEM_SOURCE # undef _TANDEM_SOURCE #endif /* Enable X/Open extensions. Define to 500 only if necessary to make mbstate_t available. */ #ifndef _XOPEN_SOURCE # undef _XOPEN_SOURCE #endif /* Define if the native Windows multithreading API can be used. */ #undef USE_WINDOWS_THREADS /* Version number of package */ #undef VERSION /* Define to l, ll, u, ul, ull, etc., as suitable for constants of type 'wchar_t'. */ #undef WCHAR_T_SUFFIX /* Define to l, ll, u, ul, ull, etc., as suitable for constants of type 'wint_t'. */ #undef WINT_T_SUFFIX /* Number of bits in a file offset, on hosts where this is settable. */ #undef _FILE_OFFSET_BITS /* True if the compiler says it groks GNU C version MAJOR.MINOR. Except that - clang groks GNU C 4.2, even on Windows, where it does not define __GNUC__. - The OpenMandriva-modified clang compiler pretends that it groks GNU C version 13.1, but it doesn't: It does not support __attribute__ ((__malloc__ (f, i))), nor does it support __attribute__ ((__warning__ (message))) on a function redeclaration. - Users can make clang lie as well, through the -fgnuc-version option. */ #if defined __GNUC__ && defined __GNUC_MINOR__ && !defined __clang__ # define _GL_GNUC_PREREQ(major, minor) \ ((major) < __GNUC__ + ((minor) <= __GNUC_MINOR__)) #elif defined __clang__ /* clang really only groks GNU C 4.2. */ # define _GL_GNUC_PREREQ(major, minor) \ ((major) < 4 + ((minor) <= 2)) #else # define _GL_GNUC_PREREQ(major, minor) 0 #endif /* Define to enable the declarations of ISO C 11 types and functions. */ #undef _ISOC11_SOURCE /* Define to 1 on platforms where this makes off_t a 64-bit type. */ #undef _LARGE_FILES /* Define so that AIX headers are more compatible with GNU/Linux. */ #undef _LINUX_SOURCE_COMPAT /* The _Noreturn keyword of C11. */ #ifndef _Noreturn # if (defined __cplusplus \ && ((201103 <= __cplusplus && !(__GNUC__ == 4 && __GNUC_MINOR__ == 7)) \ || (defined _MSC_VER && 1900 <= _MSC_VER)) \ && 0) /* [[noreturn]] is not practically usable, because with it the syntax extern _Noreturn void func (...); would not be valid; such a declaration would only be valid with 'extern' and '_Noreturn' swapped, or without the 'extern' keyword. However, some AIX system header files and several gnulib header files use precisely this syntax with 'extern'. */ # define _Noreturn [[noreturn]] # elif (defined __clang__ && __clang_major__ < 16 \ && defined _GL_WORK_AROUND_LLVM_BUG_59792) /* Compile with -D_GL_WORK_AROUND_LLVM_BUG_59792 to work around that rare LLVM bug, though you may get many false-alarm warnings. */ # define _Noreturn # elif ((!defined __cplusplus || defined __clang__) \ && (201112 <= (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0) \ || (!defined __STRICT_ANSI__ \ && (_GL_GNUC_PREREQ (4, 7) \ || (defined __apple_build_version__ \ ? 6000000 <= __apple_build_version__ \ : 3 < __clang_major__ + (5 <= __clang_minor__)))))) /* _Noreturn works as-is. */ # elif _GL_GNUC_PREREQ (2, 8) || defined __clang__ || 0x5110 <= __SUNPRO_C # define _Noreturn __attribute__ ((__noreturn__)) # elif 1200 <= (defined _MSC_VER ? _MSC_VER : 0) # define _Noreturn __declspec (noreturn) # else # define _Noreturn # endif #endif /* Number of bits in time_t, on hosts where this is settable. */ #undef _TIME_BITS /* For standard stat data types on VMS. */ #undef _USE_STD_STAT /* Define to 1 on platforms where this makes time_t a 64-bit type. */ #undef __MINGW_USE_VC2005_COMPAT /* Define to 1 if the system predates C++11. */ #undef __STDC_CONSTANT_MACROS /* Define to 1 if the system predates C++11. */ #undef __STDC_LIMIT_MACROS /* Define to 1 if C does not support variable-length arrays, and if the compiler does not already define this. */ #undef __STDC_NO_VLA__ /* The _GL_ASYNC_SAFE marker should be attached to functions that are signal handlers (for signals other than SIGABRT, SIGPIPE) or can be invoked from such signal handlers. Such functions have some restrictions: * All functions that it calls should be marked _GL_ASYNC_SAFE as well, or should be listed as async-signal-safe in POSIX section 2.4.3. Note that malloc(), sprintf(), and fwrite(), in particular, are NOT async-signal-safe. * All memory locations (variables and struct fields) that these functions access must be marked 'volatile'. This holds for both read and write accesses. Otherwise the compiler might optimize away stores to and reads from such locations that occur in the program, depending on its data flow analysis. For example, when the program contains a loop that is intended to inspect a variable set from within a signal handler while (!signal_occurred) ; the compiler is allowed to transform this into an endless loop if the variable 'signal_occurred' is not declared 'volatile'. Additionally, recall that: * A signal handler should not modify errno (except if it is a handler for a fatal signal and ends by raising the same signal again, thus provoking the termination of the process). If it invokes a function that may clobber errno, it needs to save and restore the value of errno. */ #define _GL_ASYNC_SAFE /* Attributes. */ /* Define _GL_HAS_ATTRIBUTE only once, because on FreeBSD, with gcc < 5, if gets included once again after , __has_attribute(x) expands to 0 always, and redefining _GL_HAS_ATTRIBUTE would turn off all attributes. */ #ifndef _GL_HAS_ATTRIBUTE # if (defined __has_attribute \ && (!defined __clang_minor__ \ || (defined __apple_build_version__ \ ? 7000000 <= __apple_build_version__ \ : 5 <= __clang_major__))) # define _GL_HAS_ATTRIBUTE(attr) __has_attribute (__##attr##__) # else # define _GL_HAS_ATTRIBUTE(attr) _GL_ATTR_##attr # define _GL_ATTR_alloc_size _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_always_inline _GL_GNUC_PREREQ (3, 2) # define _GL_ATTR_artificial _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_cold _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_const _GL_GNUC_PREREQ (2, 95) # define _GL_ATTR_deprecated _GL_GNUC_PREREQ (3, 1) # define _GL_ATTR_diagnose_if 0 # define _GL_ATTR_error _GL_GNUC_PREREQ (4, 3) # define _GL_ATTR_externally_visible _GL_GNUC_PREREQ (4, 1) # define _GL_ATTR_fallthrough _GL_GNUC_PREREQ (7, 0) # define _GL_ATTR_format _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_leaf _GL_GNUC_PREREQ (4, 6) # define _GL_ATTR_malloc _GL_GNUC_PREREQ (3, 0) # ifdef _ICC # define _GL_ATTR_may_alias 0 # else # define _GL_ATTR_may_alias _GL_GNUC_PREREQ (3, 3) # endif # define _GL_ATTR_noinline _GL_GNUC_PREREQ (3, 1) # define _GL_ATTR_nonnull _GL_GNUC_PREREQ (3, 3) # define _GL_ATTR_nonstring _GL_GNUC_PREREQ (8, 0) # define _GL_ATTR_nothrow _GL_GNUC_PREREQ (3, 3) # define _GL_ATTR_packed _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_pure _GL_GNUC_PREREQ (2, 96) # define _GL_ATTR_reproducible 0 /* not yet supported, as of GCC 14 */ # define _GL_ATTR_returns_nonnull _GL_GNUC_PREREQ (4, 9) # define _GL_ATTR_sentinel _GL_GNUC_PREREQ (4, 0) # define _GL_ATTR_unsequenced 0 /* not yet supported, as of GCC 14 */ # define _GL_ATTR_unused _GL_GNUC_PREREQ (2, 7) # define _GL_ATTR_warn_unused_result _GL_GNUC_PREREQ (3, 4) # endif #endif /* Use __has_c_attribute if available. However, do not use with pre-C23 GCC, which can issue false positives if -Wpedantic. */ #if (defined __has_c_attribute \ && ! (_GL_GNUC_PREREQ (4, 6) \ && (defined __STDC_VERSION__ ? __STDC_VERSION__ : 0) <= 201710)) # define _GL_HAVE___HAS_C_ATTRIBUTE 1 #else # define _GL_HAVE___HAS_C_ATTRIBUTE 0 #endif /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in function declarations. There are two problems here. (Last tested with gcc/g++ 14 and clang/clang++ 18.) 1) We want that the _GL_ATTRIBUTE_* can be cumulated on the same declaration in any order. =========================== foo.c = foo.cc =========================== __attribute__ ((__deprecated__)) [[__nodiscard__]] int bar1 (int); [[__nodiscard__]] __attribute__ ((__deprecated__)) int bar2 (int); ====================================================================== This gives a syntax error - in C mode with gcc , and - in C++ mode with clang++ version < 16, and - in C++ mode, inside extern "C" {}, still in newer clang++ versions . */ /* Define if, in a function declaration, the attributes in bracket syntax [[...]] must come before the attributes in __attribute__((...)) syntax. If this is defined, it is best to avoid the bracket syntax, so that the various _GL_ATTRIBUTE_* can be cumulated on the same declaration in any order. */ #ifdef __cplusplus # if defined __clang__ # define _GL_BRACKET_BEFORE_ATTRIBUTE 1 # endif #else # if defined __GNUC__ && !defined __clang__ # define _GL_BRACKET_BEFORE_ATTRIBUTE 1 # endif #endif /* 2) We want that the _GL_ATTRIBUTE_* can be placed in a declaration - without 'extern', in C as well as in C++, - with 'extern', in C, - with 'extern "C"', in C++ in the same position. That is, we don't want to be forced to use a macro which arranges for the attribute to come before 'extern' in one case and after 'extern' in the other case, because such a macro would make the source code of .h files pretty ugly. =========================== foo.c = foo.cc =========================== #ifdef __cplusplus # define CC "C" #else # define CC #endif #define ND [[__nodiscard__]] #define WUR __attribute__((__warn_unused_result__)) #ifdef __cplusplus extern "C" { #endif // gcc clang g++ clang++ ND int foo (int); int ND foo (int); // warn error warn error int foo ND (int); int foo (int) ND; // warn error warn error WUR int foo (int); int WUR foo (int); int fo1 WUR (int); // error error error error int foo (int) WUR; #ifdef __cplusplus } #endif // gcc clang g++ clang++ ND extern CC int foo (int); // error error extern CC ND int foo (int); // error error extern CC int ND foo (int); // warn error warn error extern CC int foo ND (int); extern CC int foo (int) ND; // warn error warn error WUR extern CC int foo (int); // warn extern CC WUR int foo (int); extern CC int WUR foo (int); extern CC int foo WUR (int); // error error error error extern CC int foo (int) WUR; ND EXTERN_C_FUNC int foo (int); // error error EXTERN_C_FUNC ND int foo (int); EXTERN_C_FUNC int ND foo (int); // warn error warn error EXTERN_C_FUNC int foo ND (int); EXTERN_C_FUNC int foo (int) ND; // warn error warn error WUR EXTERN_C_FUNC int foo (int); // warn EXTERN_C_FUNC WUR int foo (int); EXTERN_C_FUNC int WUR foo (int); EXTERN_C_FUNC int fo2 WUR (int); // error error error error EXTERN_C_FUNC int foo (int) WUR; ====================================================================== So, if we insist on using the 'extern' keyword ('extern CC' idiom): * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in both C and C++, there is one available position: - between the function name and the parameter list. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in both C and C++, there are several available positions: - before the return type, - between return type and function name, - at the end of the declaration. * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in C and to __attribute__((...)) syntax in C++, there is no available position: it would need to come before 'extern' in C but after 'extern "C"' in C++. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in C and to bracket syntax [[...]] in C++, there is one available position: - before the return type. Whereas, if we use the 'EXTERN_C_FUNC' idiom, which conditionally omits the 'extern' keyword: * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in both C and C++, there are two available positions: - before the return type, - between the function name and the parameter list. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in both C and C++, there are several available positions: - before the return type, - between return type and function name, - at the end of the declaration. * If _GL_ATTRIBUTE_* expands to bracket syntax [[...]] in C and to __attribute__((...)) syntax in C++, there is one available position: - before the return type. * If _GL_ATTRIBUTE_* expands to __attribute__((...)) syntax in C and to bracket syntax [[...]] in C++, there is one available position: - before the return type. The best choice is therefore to use the 'EXTERN_C_FUNC' idiom and put the attributes before the return type. This works regardless to what the _GL_ATTRIBUTE_* macros expand. */ /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in static/inline function definitions. There are similar constraints as for function declarations. However, here, we cannot omit the storage-class specifier. Therefore, the following rule applies: * The macros _GL_ATTRIBUTE_CONST _GL_ATTRIBUTE_DEPRECATED _GL_ATTRIBUTE_MAYBE_UNUSED _GL_ATTRIBUTE_NODISCARD _GL_ATTRIBUTE_PURE _GL_ATTRIBUTE_REPRODUCIBLE _GL_ATTRIBUTE_UNSEQUENCED which may expand to bracket syntax [[...]], must come first, before the storage-class specifier. * Other _GL_ATTRIBUTE_* macros, that expand to __attribute__((...)) syntax, are better placed between the storage-class specifier and the return type. */ /* Attributes in bracket syntax [[...]] vs. attributes in __attribute__((...)) syntax, in variable declarations. At which position can they be placed? (Last tested with gcc/g++ 14 and clang/clang++ 18.) =========================== foo.c = foo.cc =========================== #ifdef __cplusplus # define CC "C" #else # define CC #endif #define BD [[__deprecated__]] #define AD __attribute__ ((__deprecated__)) // gcc clang g++ clang++ BD extern CC int var; // error error extern CC BD int var; // error error extern CC int BD var; // warn error warn error extern CC int var BD; AD extern CC int var; // warn extern CC AD int var; extern CC int AD var; extern CC int var AD; BD extern CC int z[]; // error error extern CC BD int z[]; // error error extern CC int BD z[]; // warn error warn error extern CC int z1 BD []; extern CC int z[] BD; // warn error error AD extern CC int z[]; // warn extern CC AD int z[]; extern CC int AD z[]; extern CC int z2 AD []; // error error error error extern CC int z[] AD; ====================================================================== * For non-array variables, the only good position is after the variable name, that is, at the end of the declaration. * For array variables, you will need to distinguish C and C++: - In C, before the 'extern' keyword. - In C++, between the 'extern "C"' and the variable's type. */ /* _GL_ATTRIBUTE_ALLOC_SIZE ((N)) declares that the Nth argument of the function is the size of the returned memory block. _GL_ATTRIBUTE_ALLOC_SIZE ((M, N)) declares that the Mth argument multiplied by the Nth argument of the function is the size of the returned memory block. */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_ALLOC_SIZE # if _GL_HAS_ATTRIBUTE (alloc_size) # define _GL_ATTRIBUTE_ALLOC_SIZE(args) __attribute__ ((__alloc_size__ args)) # else # define _GL_ATTRIBUTE_ALLOC_SIZE(args) # endif #endif /* _GL_ATTRIBUTE_ALWAYS_INLINE tells that the compiler should always inline the function and report an error if it cannot do so. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_ALWAYS_INLINE # if _GL_HAS_ATTRIBUTE (always_inline) # define _GL_ATTRIBUTE_ALWAYS_INLINE __attribute__ ((__always_inline__)) # else # define _GL_ATTRIBUTE_ALWAYS_INLINE # endif #endif /* _GL_ATTRIBUTE_ARTIFICIAL declares that the function is not important to show in stack traces when debugging. The compiler should omit the function from stack traces. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_ARTIFICIAL # if _GL_HAS_ATTRIBUTE (artificial) # define _GL_ATTRIBUTE_ARTIFICIAL __attribute__ ((__artificial__)) # else # define _GL_ATTRIBUTE_ARTIFICIAL # endif #endif /* _GL_ATTRIBUTE_COLD declares that the function is rarely executed. */ /* Applies to: functions. */ /* Avoid __attribute__ ((cold)) on MinGW; see thread starting at . Also, Oracle Studio 12.6 requires 'cold' not '__cold__'. */ #ifndef _GL_ATTRIBUTE_COLD # if _GL_HAS_ATTRIBUTE (cold) && !defined __MINGW32__ # ifndef __SUNPRO_C # define _GL_ATTRIBUTE_COLD __attribute__ ((__cold__)) # else # define _GL_ATTRIBUTE_COLD __attribute__ ((cold)) # endif # else # define _GL_ATTRIBUTE_COLD # endif #endif /* _GL_ATTRIBUTE_CONST declares: It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used. This attribute is safe for a function that neither depends on nor affects state, and always returns exactly once - e.g., does not raise an exception, call longjmp, or loop forever. (This attribute is stricter than _GL_ATTRIBUTE_PURE because the function cannot observe state. It is stricter than _GL_ATTRIBUTE_UNSEQUENCED because the function must return exactly once and cannot depend on state addressed by its arguments.) */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_CONST # if _GL_HAS_ATTRIBUTE (const) # define _GL_ATTRIBUTE_CONST __attribute__ ((__const__)) # else # define _GL_ATTRIBUTE_CONST _GL_ATTRIBUTE_UNSEQUENCED # endif #endif /* _GL_ATTRIBUTE_DEALLOC (F, I) declares that the function returns pointers that can be freed by passing them as the Ith argument to the function F. _GL_ATTRIBUTE_DEALLOC_FREE declares that the function returns pointers that can be freed via 'free'; it can be used only after declaring 'free'. */ /* Applies to: functions. Cannot be used on inline functions. */ #ifndef _GL_ATTRIBUTE_DEALLOC # if _GL_GNUC_PREREQ (11, 0) # define _GL_ATTRIBUTE_DEALLOC(f, i) __attribute__ ((__malloc__ (f, i))) # else # define _GL_ATTRIBUTE_DEALLOC(f, i) # endif #endif /* If gnulib's or has already defined this macro, continue to use this earlier definition, since may not have been included yet. */ #ifndef _GL_ATTRIBUTE_DEALLOC_FREE # if defined __cplusplus && defined __GNUC__ && !defined __clang__ /* Work around GCC bug */ # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC ((void (*) (void *)) free, 1) # else # define _GL_ATTRIBUTE_DEALLOC_FREE \ _GL_ATTRIBUTE_DEALLOC (free, 1) # endif #endif /* _GL_ATTRIBUTE_DEPRECATED: Declares that an entity is deprecated. The compiler may warn if the entity is used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: namespace, class, template specialization. */ #ifndef _GL_ATTRIBUTE_DEPRECATED # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__deprecated__) # define _GL_ATTRIBUTE_DEPRECATED [[__deprecated__]] # endif # endif # endif # if !defined _GL_ATTRIBUTE_DEPRECATED && _GL_HAS_ATTRIBUTE (deprecated) # define _GL_ATTRIBUTE_DEPRECATED __attribute__ ((__deprecated__)) # endif # ifndef _GL_ATTRIBUTE_DEPRECATED # define _GL_ATTRIBUTE_DEPRECATED # endif #endif /* _GL_ATTRIBUTE_ERROR(msg) requests an error if a function is called and the function call is not optimized away. _GL_ATTRIBUTE_WARNING(msg) requests a warning if a function is called and the function call is not optimized away. */ /* Applies to: functions. */ #if !(defined _GL_ATTRIBUTE_ERROR && defined _GL_ATTRIBUTE_WARNING) # if _GL_HAS_ATTRIBUTE (error) # define _GL_ATTRIBUTE_ERROR(msg) __attribute__ ((__error__ (msg))) # define _GL_ATTRIBUTE_WARNING(msg) __attribute__ ((__warning__ (msg))) # elif _GL_HAS_ATTRIBUTE (diagnose_if) # define _GL_ATTRIBUTE_ERROR(msg) __attribute__ ((__diagnose_if__ (1, msg, "error"))) # define _GL_ATTRIBUTE_WARNING(msg) __attribute__ ((__diagnose_if__ (1, msg, "warning"))) # else # define _GL_ATTRIBUTE_ERROR(msg) # define _GL_ATTRIBUTE_WARNING(msg) # endif #endif /* _GL_ATTRIBUTE_EXTERNALLY_VISIBLE declares that the entity should remain visible to debuggers etc., even with '-fwhole-program'. */ /* Applies to: functions, variables. */ #ifndef _GL_ATTRIBUTE_EXTERNALLY_VISIBLE # if _GL_HAS_ATTRIBUTE (externally_visible) # define _GL_ATTRIBUTE_EXTERNALLY_VISIBLE __attribute__ ((externally_visible)) # else # define _GL_ATTRIBUTE_EXTERNALLY_VISIBLE # endif #endif /* _GL_ATTRIBUTE_FALLTHROUGH declares that it is not a programming mistake if the control flow falls through to the immediately following 'case' or 'default' label. The compiler should not warn in this case. */ /* Applies to: Empty statement (;), inside a 'switch' statement. */ /* Always expands to something. */ #ifndef _GL_ATTRIBUTE_FALLTHROUGH # if _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__fallthrough__) # define _GL_ATTRIBUTE_FALLTHROUGH [[__fallthrough__]] # endif # endif # if !defined _GL_ATTRIBUTE_FALLTHROUGH && _GL_HAS_ATTRIBUTE (fallthrough) # define _GL_ATTRIBUTE_FALLTHROUGH __attribute__ ((__fallthrough__)) # endif # ifndef _GL_ATTRIBUTE_FALLTHROUGH # define _GL_ATTRIBUTE_FALLTHROUGH ((void) 0) # endif #endif /* _GL_ATTRIBUTE_FORMAT ((ARCHETYPE, STRING-INDEX, FIRST-TO-CHECK)) declares that the STRING-INDEXth function argument is a format string of style ARCHETYPE, which is one of: printf, gnu_printf scanf, gnu_scanf, strftime, gnu_strftime, strfmon, or the same thing prefixed and suffixed with '__'. If FIRST-TO-CHECK is not 0, arguments starting at FIRST-TO_CHECK are suitable for the format string. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_FORMAT # if _GL_HAS_ATTRIBUTE (format) # define _GL_ATTRIBUTE_FORMAT(spec) __attribute__ ((__format__ spec)) # else # define _GL_ATTRIBUTE_FORMAT(spec) # endif #endif /* _GL_ATTRIBUTE_LEAF declares that if the function is called from some other compilation unit, it executes code from that unit only by return or by exception handling. This declaration lets the compiler optimize that unit more aggressively. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_LEAF # if _GL_HAS_ATTRIBUTE (leaf) # define _GL_ATTRIBUTE_LEAF __attribute__ ((__leaf__)) # else # define _GL_ATTRIBUTE_LEAF # endif #endif /* _GL_ATTRIBUTE_MALLOC declares that the function returns a pointer to freshly allocated memory. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_MALLOC # if _GL_HAS_ATTRIBUTE (malloc) # define _GL_ATTRIBUTE_MALLOC __attribute__ ((__malloc__)) # else # define _GL_ATTRIBUTE_MALLOC # endif #endif /* _GL_ATTRIBUTE_MAY_ALIAS declares that pointers to the type may point to the same storage as pointers to other types. Thus this declaration disables strict aliasing optimization. */ /* Applies to: types. */ /* Oracle Studio 12.6 mishandles may_alias despite __has_attribute OK. */ #ifndef _GL_ATTRIBUTE_MAY_ALIAS # if _GL_HAS_ATTRIBUTE (may_alias) && !defined __SUNPRO_C # define _GL_ATTRIBUTE_MAY_ALIAS __attribute__ ((__may_alias__)) # else # define _GL_ATTRIBUTE_MAY_ALIAS # endif #endif /* _GL_ATTRIBUTE_MAYBE_UNUSED declares that it is not a programming mistake if the entity is not used. The compiler should not warn if the entity is not used. */ /* Applies to: - function, variable, - struct, union, struct/union member, - enumeration, enumeration item, - typedef, in C++ also: class. */ /* In C++ and C23, this is spelled [[__maybe_unused__]]. GCC's syntax is __attribute__ ((__unused__)). clang supports both syntaxes. Except that with clang ≥ 6, < 10, in C++ mode, __has_c_attribute (__maybe_unused__) yields true but the use of [[__maybe_unused__]] nevertheless produces a warning. */ #ifndef _GL_ATTRIBUTE_MAYBE_UNUSED # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if defined __clang__ && defined __cplusplus # if !defined __apple_build_version__ && __clang_major__ >= 10 # define _GL_ATTRIBUTE_MAYBE_UNUSED [[__maybe_unused__]] # endif # elif _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__maybe_unused__) # define _GL_ATTRIBUTE_MAYBE_UNUSED [[__maybe_unused__]] # endif # endif # endif # ifndef _GL_ATTRIBUTE_MAYBE_UNUSED # define _GL_ATTRIBUTE_MAYBE_UNUSED _GL_ATTRIBUTE_UNUSED # endif #endif /* Alternative spelling of this macro, for convenience and for compatibility with glibc/include/libc-symbols.h. */ #define _GL_UNUSED _GL_ATTRIBUTE_MAYBE_UNUSED /* Earlier spellings of this macro. */ #define _UNUSED_PARAMETER_ _GL_ATTRIBUTE_MAYBE_UNUSED /* _GL_ATTRIBUTE_NODISCARD declares that the caller of the function should not discard the return value. The compiler may warn if the caller does not use the return value, unless the caller uses something like ignore_value. */ /* Applies to: function, enumeration, class. */ #ifndef _GL_ATTRIBUTE_NODISCARD # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if defined __clang__ && defined __cplusplus /* With clang up to 15.0.6 (at least), in C++ mode, [[__nodiscard__]] produces a warning. The 1000 below means a yet unknown threshold. When clang++ version X starts supporting [[__nodiscard__]] without warning about it, you can replace the 1000 with X. */ # if __clang_major__ >= 1000 # define _GL_ATTRIBUTE_NODISCARD [[__nodiscard__]] # endif # elif _GL_HAVE___HAS_C_ATTRIBUTE # if __has_c_attribute (__nodiscard__) # define _GL_ATTRIBUTE_NODISCARD [[__nodiscard__]] # endif # endif # endif # if !defined _GL_ATTRIBUTE_NODISCARD && _GL_HAS_ATTRIBUTE (warn_unused_result) # define _GL_ATTRIBUTE_NODISCARD __attribute__ ((__warn_unused_result__)) # endif # ifndef _GL_ATTRIBUTE_NODISCARD # define _GL_ATTRIBUTE_NODISCARD # endif #endif /* _GL_ATTRIBUTE_NOINLINE tells that the compiler should not inline the function. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_NOINLINE # if _GL_HAS_ATTRIBUTE (noinline) # define _GL_ATTRIBUTE_NOINLINE __attribute__ ((__noinline__)) # else # define _GL_ATTRIBUTE_NOINLINE # endif #endif /* _GL_ATTRIBUTE_NONNULL ((N1, N2,...)) declares that the arguments N1, N2,... must not be NULL. _GL_ATTRIBUTE_NONNULL () declares that all pointer arguments must not be null. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_NONNULL # if _GL_HAS_ATTRIBUTE (nonnull) # define _GL_ATTRIBUTE_NONNULL(args) __attribute__ ((__nonnull__ args)) # else # define _GL_ATTRIBUTE_NONNULL(args) # endif #endif /* _GL_ATTRIBUTE_NONSTRING declares that the contents of a character array is not meant to be NUL-terminated. */ /* Applies to: struct/union members and variables that are arrays of element type '[[un]signed] char'. */ #ifndef _GL_ATTRIBUTE_NONSTRING # if _GL_HAS_ATTRIBUTE (nonstring) # define _GL_ATTRIBUTE_NONSTRING __attribute__ ((__nonstring__)) # else # define _GL_ATTRIBUTE_NONSTRING # endif #endif /* There is no _GL_ATTRIBUTE_NORETURN; use _Noreturn instead. */ /* _GL_ATTRIBUTE_NOTHROW declares that the function does not throw exceptions. */ /* Applies to: functions. */ /* After a function's parameter list, this attribute must come first, before other attributes. */ #ifndef _GL_ATTRIBUTE_NOTHROW # if defined __cplusplus # if _GL_GNUC_PREREQ (2, 8) || __clang_major__ >= 4 # if __cplusplus >= 201103L # define _GL_ATTRIBUTE_NOTHROW noexcept (true) # else # define _GL_ATTRIBUTE_NOTHROW throw () # endif # else # define _GL_ATTRIBUTE_NOTHROW # endif # else # if _GL_HAS_ATTRIBUTE (nothrow) # define _GL_ATTRIBUTE_NOTHROW __attribute__ ((__nothrow__)) # else # define _GL_ATTRIBUTE_NOTHROW # endif # endif #endif /* _GL_ATTRIBUTE_PACKED declares: For struct members: The member has the smallest possible alignment. For struct, union, class: All members have the smallest possible alignment, minimizing the memory required. */ /* Applies to: struct members, struct, union, in C++ also: class. */ #ifndef _GL_ATTRIBUTE_PACKED /* Oracle Studio 12.6 miscompiles code with __attribute__ ((__packed__)) despite __has_attribute OK. */ # if _GL_HAS_ATTRIBUTE (packed) && !defined __SUNPRO_C # define _GL_ATTRIBUTE_PACKED __attribute__ ((__packed__)) # else # define _GL_ATTRIBUTE_PACKED # endif #endif /* _GL_ATTRIBUTE_PURE declares: It is OK for a compiler to move calls to the function and to omit calls to the function if another call has the same arguments or the result is not used, and if observable state is the same. This attribute is safe for a function that does not affect observable state and always returns exactly once. (This attribute is looser than _GL_ATTRIBUTE_CONST because the function can depend on observable state. It is stricter than _GL_ATTRIBUTE_REPRODUCIBLE because the function must return exactly once and cannot affect state addressed by its arguments.) */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_PURE # if _GL_HAS_ATTRIBUTE (pure) # define _GL_ATTRIBUTE_PURE __attribute__ ((__pure__)) # else # define _GL_ATTRIBUTE_PURE _GL_ATTRIBUTE_REPRODUCIBLE # endif #endif /* _GL_ATTRIBUTE_REPRODUCIBLE declares: It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same and is updated in time for the rest of the program. This attribute is safe for a function that is effectless and idempotent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is looser than _GL_ATTRIBUTE_UNSEQUENCED because the function need not be stateless and idempotent. It is looser than _GL_ATTRIBUTE_PURE because the function need not return exactly once and can affect state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_REPRODUCIBLE /* This may be revisited when gcc and clang support [[reproducible]] or possibly __attribute__ ((__reproducible__)). */ # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAS_ATTRIBUTE (reproducible) # define _GL_ATTRIBUTE_REPRODUCIBLE [[reproducible]] # endif # endif # ifndef _GL_ATTRIBUTE_REPRODUCIBLE # define _GL_ATTRIBUTE_REPRODUCIBLE # endif #endif /* _GL_ATTRIBUTE_RETURNS_NONNULL declares that the function's return value is a non-NULL pointer. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_RETURNS_NONNULL # if _GL_HAS_ATTRIBUTE (returns_nonnull) # define _GL_ATTRIBUTE_RETURNS_NONNULL __attribute__ ((__returns_nonnull__)) # else # define _GL_ATTRIBUTE_RETURNS_NONNULL # endif #endif /* _GL_ATTRIBUTE_SENTINEL(pos) declares that the variadic function expects a trailing NULL argument. _GL_ATTRIBUTE_SENTINEL () - The last argument is NULL (requires C99). _GL_ATTRIBUTE_SENTINEL ((N)) - The (N+1)st argument from the end is NULL. */ /* Applies to: functions. */ #ifndef _GL_ATTRIBUTE_SENTINEL # if _GL_HAS_ATTRIBUTE (sentinel) # define _GL_ATTRIBUTE_SENTINEL(pos) __attribute__ ((__sentinel__ pos)) # else # define _GL_ATTRIBUTE_SENTINEL(pos) # endif #endif /* _GL_ATTRIBUTE_UNSEQUENCED declares: It is OK for a compiler to move calls to the function and to omit duplicate calls to the function with the same arguments, so long as the state addressed by its arguments is the same. This attribute is safe for a function that is effectless, idempotent, stateless, and independent; see ISO C 23 § 6.7.12.7 for a definition of these terms. (This attribute is stricter than _GL_ATTRIBUTE_REPRODUCIBLE because the function must be stateless and independent. It is looser than _GL_ATTRIBUTE_CONST because the function need not return exactly once and can depend on state addressed by its arguments.) See also and . */ /* Applies to: functions, pointer to functions, function types. */ #ifndef _GL_ATTRIBUTE_UNSEQUENCED /* This may be revisited when gcc and clang support [[unsequenced]] or possibly __attribute__ ((__unsequenced__)). */ # ifndef _GL_BRACKET_BEFORE_ATTRIBUTE # if _GL_HAS_ATTRIBUTE (unsequenced) # define _GL_ATTRIBUTE_UNSEQUENCED [[unsequenced]] # endif # endif # ifndef _GL_ATTRIBUTE_UNSEQUENCED # define _GL_ATTRIBUTE_UNSEQUENCED # endif #endif /* A helper macro. Don't use it directly. */ #ifndef _GL_ATTRIBUTE_UNUSED # if _GL_HAS_ATTRIBUTE (unused) # define _GL_ATTRIBUTE_UNUSED __attribute__ ((__unused__)) # else # define _GL_ATTRIBUTE_UNUSED # endif #endif /* _GL_UNUSED_LABEL; declares that it is not a programming mistake if the immediately preceding label is not used. The compiler should not warn if the label is not used. */ /* Applies to: label (both in C and C++). */ /* Note that g++ < 4.5 does not support the '__attribute__ ((__unused__)) ;' syntax. But clang does. */ #ifndef _GL_UNUSED_LABEL # if !(defined __cplusplus && !_GL_GNUC_PREREQ (4, 5)) || defined __clang__ # define _GL_UNUSED_LABEL _GL_ATTRIBUTE_UNUSED # else # define _GL_UNUSED_LABEL # endif #endif /* In C++, there is the concept of "language linkage", that encompasses name mangling and function calling conventions. The following macros start and end a block of "C" linkage. */ #ifdef __cplusplus # define _GL_BEGIN_C_LINKAGE extern "C" { # define _GL_END_C_LINKAGE } #else # define _GL_BEGIN_C_LINKAGE # define _GL_END_C_LINKAGE #endif /* Define as 'int' if doesn't define. */ #undef gid_t /* Define to '__inline__' or '__inline' if that's what the C compiler calls it, or to nothing if 'inline' is not supported under any name. */ #ifndef __cplusplus #undef inline #endif /* Work around a bug in Apple GCC 4.0.1 build 5465: In C99 mode, it supports the ISO C 99 semantics of 'extern inline' (unlike the GNU C semantics of earlier versions), but does not display it by setting __GNUC_STDC_INLINE__. __APPLE__ && __MACH__ test for Mac OS X. __APPLE_CC__ tests for the Apple compiler and its version. __STDC_VERSION__ tests for the C99 mode. */ #if defined __APPLE__ && defined __MACH__ && __APPLE_CC__ >= 5465 && !defined __cplusplus && __STDC_VERSION__ >= 199901L && !defined __GNUC_STDC_INLINE__ # define __GNUC_STDC_INLINE__ 1 #endif /* _GL_CMP (n1, n2) performs a three-valued comparison on n1 vs. n2, where n1 and n2 are expressions without side effects, that evaluate to real numbers (excluding NaN). It returns 1 if n1 > n2 0 if n1 == n2 -1 if n1 < n2 The naïve code (n1 > n2 ? 1 : n1 < n2 ? -1 : 0) produces a conditional jump with nearly all GCC versions up to GCC 10. This variant (n1 < n2 ? -1 : n1 > n2) produces a conditional with many GCC versions up to GCC 9. The better code (n1 > n2) - (n1 < n2) from Hacker's Delight § 2-9 avoids conditional jumps in all GCC versions >= 3.4. */ #define _GL_CMP(n1, n2) (((n1) > (n2)) - ((n1) < (n2))) /* Define to 'int' if does not define. */ #undef mode_t /* Define to the type of st_nlink in struct stat, or a supertype. */ #undef nlink_t /* Define as a signed integer type capable of holding a process identifier. */ #undef pid_t /* Define to the equivalent of the C99 'restrict' keyword, or to nothing if this is not supported. Do not define if restrict is supported only directly. */ #undef restrict /* Work around a bug in older versions of Sun C++, which did not #define __restrict__ or support _Restrict or __restrict__ even though the corresponding Sun C compiler ended up with "#define restrict _Restrict" or "#define restrict __restrict__" in the previous line. This workaround can be removed once we assume Oracle Developer Studio 12.5 (2016) or later. */ #if defined __SUNPRO_CC && !defined __RESTRICT && !defined __restrict__ # define _Restrict # define __restrict__ #endif /* Define as an integer type suitable for memory locations that can be accessed atomically even in the presence of asynchronous signals. */ #undef sig_atomic_t /* Define as 'unsigned int' if doesn't define. */ #undef size_t /* Define as a signed type of the same size as size_t. */ #undef ssize_t /* Define as 'int' if doesn't define. */ #undef uid_t #ifndef HAVE_C_BOOL # if !defined __cplusplus && !defined __bool_true_false_are_defined # if HAVE_STDBOOL_H # include # else # if defined __SUNPRO_C # error " is not usable with this configuration. To make it usable, add -D_STDC_C99= to $CC." # else # error " does not exist on this platform. Use gnulib module 'stdbool-c99' instead of gnulib module 'stdbool'." # endif # endif # endif # if !true # define true (!false) # endif #endif #if (!defined HAVE_C_STATIC_ASSERT && !defined assert \ && (!defined __cplusplus \ || (__cpp_static_assert < 201411 \ && __GNUG__ < 6 && __clang_major__ < 6))) #include #undef/**/assert #ifdef __sgi #undef/**/__ASSERT_H__ #endif /* Solaris 11.4 defines static_assert as a macro with 2 arguments. We need it also to be invocable with a single argument. */ #if defined __sun && (__STDC_VERSION__ - 0 >= 201112L) && !defined __cplusplus #undef/**/static_assert #define static_assert _Static_assert #endif #endif libffcall-2.5/m4/0000775000000000000000000000000014665334231010576 500000000000000libffcall-2.5/m4/mmap-anon.m40000664000000000000000000000375114631432055012645 00000000000000# mmap-anon.m4 # serial 12 dnl Copyright (C) 2005, 2007, 2009-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. # Detect how mmap can be used to create anonymous (not file-backed) memory # mappings. # - On Linux, AIX, OSF/1, Solaris, Cygwin, Interix, Haiku, both MAP_ANONYMOUS # and MAP_ANON exist and have the same value. # - On HP-UX, only MAP_ANONYMOUS exists. # - On Mac OS X, FreeBSD, NetBSD, OpenBSD, Minix, only MAP_ANON exists. # - On IRIX, neither exists, and a file descriptor opened to /dev/zero must be # used. AC_DEFUN_ONCE([gl_FUNC_MMAP_ANON], [ dnl Persuade glibc to define MAP_ANONYMOUS. AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS]) # Check for mmap(). Don't use AC_FUNC_MMAP, because it checks too much: it # fails on HP-UX 11, because MAP_FIXED mappings do not work. But this is # irrelevant for anonymous mappings. AC_CHECK_FUNC([mmap], [gl_have_mmap=yes], [gl_have_mmap=no]) # Try to allow MAP_ANONYMOUS. gl_have_mmap_anonymous=no if test $gl_have_mmap = yes; then AC_MSG_CHECKING([for MAP_ANONYMOUS]) AC_EGREP_CPP([I cannot identify this map], [ #include #ifdef MAP_ANONYMOUS I cannot identify this map #endif ], [gl_have_mmap_anonymous=yes]) if test $gl_have_mmap_anonymous != yes; then AC_EGREP_CPP([I cannot identify this map], [ #include #ifdef MAP_ANON I cannot identify this map #endif ], [AC_DEFINE([MAP_ANONYMOUS], [MAP_ANON], [Define to a substitute value for mmap()'s MAP_ANONYMOUS flag.]) gl_have_mmap_anonymous=yes]) fi AC_MSG_RESULT([$gl_have_mmap_anonymous]) if test $gl_have_mmap_anonymous = yes; then AC_DEFINE([HAVE_MAP_ANONYMOUS], [1], [Define to 1 if mmap()'s MAP_ANONYMOUS flag is available after including config.h and .]) fi fi ]) libffcall-2.5/m4/endianness.m40000644000000000000000000000446714603525527013122 00000000000000# endianness.m4 # serial 1 dnl Copyright (C) 2017-2024 Free Software Foundation, Inc. dnl This file is free software; the Free Software Foundation dnl gives unlimited permission to copy and/or distribute it, dnl with or without modifications, as long as this notice is preserved. dnl From Bruno Haible. dnl For specific bi-endian CPUs, sets the ENDIANNESS variable to either dnl 'eb' (means big endian) or 'el' (means little endian). dnl dnl This variable can be used to select a particular assembly language dnl source file that will interoperate with C code on the given host. AC_DEFUN([FFCALL_ENDIANNESS], [ AC_REQUIRE([AC_CANONICAL_HOST]) case "$host_cpu" in arm* ) AC_CACHE_CHECK([endianness], [ffcall_cv_endianness], [AC_EGREP_CPP([yes], [#if defined __ARMEL__ yes #endif], [ffcall_cv_endianness=little], [ffcall_cv_endianness=big])]) ;; mips* ) AC_CACHE_CHECK([endianness], [ffcall_cv_endianness], [# Compilers on IRIX define only _MIPSEB as indicator. # Compilers on Linux define _MIPSEB, __MIPSEB__, __MIPSEB or - in # the opposite case - _MIPSEL, __MIPSEL__, __MIPSEL. AC_EGREP_CPP([yes], [#if defined _MIPSEB yes #endif], [ffcall_cv_endianness=big], [AC_EGREP_CPP([yes], [#if defined _MIPSEL yes #endif], [ffcall_cv_endianness=little], [ffcall_cv_endianness=unknown])]) ]) ;; powerpc*) AC_CACHE_CHECK([endianness], [ffcall_cv_endianness], [# Compilers on AIX and Linux define _BIG_ENDIAN, __BIG_ENDIAN__ or # - in the opposite case - _LITTLE_ENDIAN, __LITTLE_ENDIAN__. AC_EGREP_CPP([yes], [#if defined _BIG_ENDIAN yes #endif], [ffcall_cv_endianness=big], [AC_EGREP_CPP([yes], [#if defined _LITTLE_ENDIAN yes #endif], [ffcall_cv_endianness=little], [ffcall_cv_endianness=unknown])]) ]) ;; *) ffcall_cv_endianness=known ;; esac case "$ffcall_cv_endianness" in big) ENDIANNESS='eb' ;; little) ENDIANNESS='el' ;; *) ENDIANNESS='' ;; esac AC_SUBST([ENDIANNESS]) ]) libffcall-2.5/m4/libtool.m40000644000000000000000000113060314662364334012432 00000000000000# libtool.m4 - Configure libtool for the host system. -*-Autoconf-*- # # Copyright (C) 1996-2001, 2003-2019, 2021-2022 Free Software # Foundation, Inc. # Written by Gordon Matzigkeit, 1996 # # This file is free software; the Free Software Foundation gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. m4_define([_LT_COPYING], [dnl # Copyright (C) 2014 Free Software Foundation, Inc. # This is free software; see the source for copying conditions. There is NO # warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # GNU Libtool is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of of the License, or # (at your option) any later version. # # As a special exception to the GNU General Public License, if you # distribute this file as part of a program or library that is built # using GNU Libtool, you may include this file under the same # distribution terms that you use for the rest of that program. # # GNU Libtool is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see . ]) # serial 59 LT_INIT # LT_PREREQ(VERSION) # ------------------ # Complain and exit if this libtool version is less that VERSION. m4_defun([LT_PREREQ], [m4_if(m4_version_compare(m4_defn([LT_PACKAGE_VERSION]), [$1]), -1, [m4_default([$3], [m4_fatal([Libtool version $1 or higher is required], 63)])], [$2])]) # _LT_CHECK_BUILDDIR # ------------------ # Complain if the absolute build directory name contains unusual characters m4_defun([_LT_CHECK_BUILDDIR], [case `pwd` in *\ * | *\ *) AC_MSG_WARN([Libtool does not cope well with whitespace in `pwd`]) ;; esac ]) # LT_INIT([OPTIONS]) # ------------------ AC_DEFUN([LT_INIT], [AC_PREREQ([2.62])dnl We use AC_PATH_PROGS_FEATURE_CHECK AC_REQUIRE([AC_CONFIG_AUX_DIR_DEFAULT])dnl AC_BEFORE([$0], [LT_LANG])dnl AC_BEFORE([$0], [LT_OUTPUT])dnl AC_BEFORE([$0], [LTDL_INIT])dnl m4_require([_LT_CHECK_BUILDDIR])dnl dnl Autoconf doesn't catch unexpanded LT_ macros by default: m4_pattern_forbid([^_?LT_[A-Z_]+$])dnl m4_pattern_allow([^(_LT_EOF|LT_DLGLOBAL|LT_DLLAZY_OR_NOW|LT_MULTI_MODULE)$])dnl dnl aclocal doesn't pull ltoptions.m4, ltsugar.m4, or ltversion.m4 dnl unless we require an AC_DEFUNed macro: AC_REQUIRE([LTOPTIONS_VERSION])dnl AC_REQUIRE([LTSUGAR_VERSION])dnl AC_REQUIRE([LTVERSION_VERSION])dnl AC_REQUIRE([LTOBSOLETE_VERSION])dnl m4_require([_LT_PROG_LTMAIN])dnl _LT_SHELL_INIT([SHELL=${CONFIG_SHELL-/bin/sh}]) dnl Parse OPTIONS _LT_SET_OPTIONS([$0], [$1]) # This can be used to rebuild libtool when needed LIBTOOL_DEPS=$ltmain # Always use our own libtool. LIBTOOL='$(SHELL) $(top_builddir)/libtool' AC_SUBST(LIBTOOL)dnl _LT_SETUP # Only expand once: m4_define([LT_INIT]) ])# LT_INIT # Old names: AU_ALIAS([AC_PROG_LIBTOOL], [LT_INIT]) AU_ALIAS([AM_PROG_LIBTOOL], [LT_INIT]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_PROG_LIBTOOL], []) dnl AC_DEFUN([AM_PROG_LIBTOOL], []) # _LT_PREPARE_CC_BASENAME # ----------------------- m4_defun([_LT_PREPARE_CC_BASENAME], [ # Calculate cc_basename. Skip known compiler wrappers and cross-prefix. func_cc_basename () { for cc_temp in @S|@*""; do case $cc_temp in compile | *[[\\/]]compile | ccache | *[[\\/]]ccache ) ;; distcc | *[[\\/]]distcc | purify | *[[\\/]]purify ) ;; \-*) ;; *) break;; esac done func_cc_basename_result=`$ECHO "$cc_temp" | $SED "s%.*/%%; s%^$host_alias-%%"` } ])# _LT_PREPARE_CC_BASENAME # _LT_CC_BASENAME(CC) # ------------------- # It would be clearer to call AC_REQUIREs from _LT_PREPARE_CC_BASENAME, # but that macro is also expanded into generated libtool script, which # arranges for $SED and $ECHO to be set by different means. m4_defun([_LT_CC_BASENAME], [m4_require([_LT_PREPARE_CC_BASENAME])dnl AC_REQUIRE([_LT_DECL_SED])dnl AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH])dnl func_cc_basename $1 cc_basename=$func_cc_basename_result ]) # _LT_FILEUTILS_DEFAULTS # ---------------------- # It is okay to use these file commands and assume they have been set # sensibly after 'm4_require([_LT_FILEUTILS_DEFAULTS])'. m4_defun([_LT_FILEUTILS_DEFAULTS], [: ${CP="cp -f"} : ${MV="mv -f"} : ${RM="rm -f"} ])# _LT_FILEUTILS_DEFAULTS # _LT_SETUP # --------- m4_defun([_LT_SETUP], [AC_REQUIRE([AC_CANONICAL_HOST])dnl AC_REQUIRE([AC_CANONICAL_BUILD])dnl AC_REQUIRE([_LT_PREPARE_SED_QUOTE_VARS])dnl AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH])dnl _LT_DECL([], [PATH_SEPARATOR], [1], [The PATH separator for the build system])dnl dnl _LT_DECL([], [host_alias], [0], [The host system])dnl _LT_DECL([], [host], [0])dnl _LT_DECL([], [host_os], [0])dnl dnl _LT_DECL([], [build_alias], [0], [The build system])dnl _LT_DECL([], [build], [0])dnl _LT_DECL([], [build_os], [0])dnl dnl AC_REQUIRE([AC_PROG_CC])dnl AC_REQUIRE([LT_PATH_LD])dnl AC_REQUIRE([LT_PATH_NM])dnl dnl AC_REQUIRE([AC_PROG_LN_S])dnl test -z "$LN_S" && LN_S="ln -s" _LT_DECL([], [LN_S], [1], [Whether we need soft or hard links])dnl dnl AC_REQUIRE([LT_CMD_MAX_LEN])dnl _LT_DECL([objext], [ac_objext], [0], [Object file suffix (normally "o")])dnl _LT_DECL([], [exeext], [0], [Executable file suffix (normally "")])dnl dnl m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_CHECK_SHELL_FEATURES])dnl m4_require([_LT_PATH_CONVERSION_FUNCTIONS])dnl m4_require([_LT_CMD_RELOAD])dnl m4_require([_LT_DECL_FILECMD])dnl m4_require([_LT_CHECK_MAGIC_METHOD])dnl m4_require([_LT_CHECK_SHAREDLIB_FROM_LINKLIB])dnl m4_require([_LT_CMD_OLD_ARCHIVE])dnl m4_require([_LT_CMD_GLOBAL_SYMBOLS])dnl m4_require([_LT_WITH_SYSROOT])dnl m4_require([_LT_CMD_TRUNCATE])dnl _LT_CONFIG_LIBTOOL_INIT([ # See if we are running on zsh, and set the options that allow our # commands through without removal of \ escapes INIT. if test -n "\${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi ]) if test -n "${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi _LT_CHECK_OBJDIR m4_require([_LT_TAG_COMPILER])dnl case $host_os in aix3*) # AIX sometimes has problems with the GCC collect2 program. For some # reason, if we set the COLLECT_NAMES environment variable, the problems # vanish in a puff of smoke. if test set != "${COLLECT_NAMES+set}"; then COLLECT_NAMES= export COLLECT_NAMES fi ;; esac # Global variables: ofile=libtool can_build_shared=yes # All known linkers require a '.a' archive for static linking (except MSVC and # ICC, which need '.lib'). libext=a with_gnu_ld=$lt_cv_prog_gnu_ld old_CC=$CC old_CFLAGS=$CFLAGS # Set sane defaults for various variables test -z "$CC" && CC=cc test -z "$LTCC" && LTCC=$CC test -z "$LTCFLAGS" && LTCFLAGS=$CFLAGS test -z "$LD" && LD=ld test -z "$ac_objext" && ac_objext=o _LT_CC_BASENAME([$compiler]) # Only perform the check for file, if the check method requires it test -z "$MAGIC_CMD" && MAGIC_CMD=file case $deplibs_check_method in file_magic*) if test "$file_magic_cmd" = '$MAGIC_CMD'; then _LT_PATH_MAGIC fi ;; esac # Use C for the default configuration in the libtool script LT_SUPPORTED_TAG([CC]) _LT_LANG_C_CONFIG _LT_LANG_DEFAULT_CONFIG _LT_CONFIG_COMMANDS ])# _LT_SETUP # _LT_PREPARE_SED_QUOTE_VARS # -------------------------- # Define a few sed substitution that help us do robust quoting. m4_defun([_LT_PREPARE_SED_QUOTE_VARS], [# Backslashify metacharacters that are still active within # double-quoted strings. sed_quote_subst='s/\([["`$\\]]\)/\\\1/g' # Same as above, but do not quote variable references. double_quote_subst='s/\([["`\\]]\)/\\\1/g' # Sed substitution to delay expansion of an escaped shell variable in a # double_quote_subst'ed string. delay_variable_subst='s/\\\\\\\\\\\$/\\\\\\$/g' # Sed substitution to delay expansion of an escaped single quote. delay_single_quote_subst='s/'\''/'\'\\\\\\\'\''/g' # Sed substitution to avoid accidental globbing in evaled expressions no_glob_subst='s/\*/\\\*/g' ]) # _LT_PROG_LTMAIN # --------------- # Note that this code is called both from 'configure', and 'config.status' # now that we use AC_CONFIG_COMMANDS to generate libtool. Notably, # 'config.status' has no value for ac_aux_dir unless we are using Automake, # so we pass a copy along to make sure it has a sensible value anyway. m4_defun([_LT_PROG_LTMAIN], [m4_ifdef([AC_REQUIRE_AUX_FILE], [AC_REQUIRE_AUX_FILE([ltmain.sh])])dnl _LT_CONFIG_LIBTOOL_INIT([ac_aux_dir='$ac_aux_dir']) ltmain=$ac_aux_dir/ltmain.sh ])# _LT_PROG_LTMAIN ## ------------------------------------- ## ## Accumulate code for creating libtool. ## ## ------------------------------------- ## # So that we can recreate a full libtool script including additional # tags, we accumulate the chunks of code to send to AC_CONFIG_COMMANDS # in macros and then make a single call at the end using the 'libtool' # label. # _LT_CONFIG_LIBTOOL_INIT([INIT-COMMANDS]) # ---------------------------------------- # Register INIT-COMMANDS to be passed to AC_CONFIG_COMMANDS later. m4_define([_LT_CONFIG_LIBTOOL_INIT], [m4_ifval([$1], [m4_append([_LT_OUTPUT_LIBTOOL_INIT], [$1 ])])]) # Initialize. m4_define([_LT_OUTPUT_LIBTOOL_INIT]) # _LT_CONFIG_LIBTOOL([COMMANDS]) # ------------------------------ # Register COMMANDS to be passed to AC_CONFIG_COMMANDS later. m4_define([_LT_CONFIG_LIBTOOL], [m4_ifval([$1], [m4_append([_LT_OUTPUT_LIBTOOL_COMMANDS], [$1 ])])]) # Initialize. m4_define([_LT_OUTPUT_LIBTOOL_COMMANDS]) # _LT_CONFIG_SAVE_COMMANDS([COMMANDS], [INIT_COMMANDS]) # ----------------------------------------------------- m4_defun([_LT_CONFIG_SAVE_COMMANDS], [_LT_CONFIG_LIBTOOL([$1]) _LT_CONFIG_LIBTOOL_INIT([$2]) ]) # _LT_FORMAT_COMMENT([COMMENT]) # ----------------------------- # Add leading comment marks to the start of each line, and a trailing # full-stop to the whole comment if one is not present already. m4_define([_LT_FORMAT_COMMENT], [m4_ifval([$1], [ m4_bpatsubst([m4_bpatsubst([$1], [^ *], [# ])], [['`$\]], [\\\&])]m4_bmatch([$1], [[!?.]$], [], [.]) )]) ## ------------------------ ## ## FIXME: Eliminate VARNAME ## ## ------------------------ ## # _LT_DECL([CONFIGNAME], VARNAME, VALUE, [DESCRIPTION], [IS-TAGGED?]) # ------------------------------------------------------------------- # CONFIGNAME is the name given to the value in the libtool script. # VARNAME is the (base) name used in the configure script. # VALUE may be 0, 1 or 2 for a computed quote escaped value based on # VARNAME. Any other value will be used directly. m4_define([_LT_DECL], [lt_if_append_uniq([lt_decl_varnames], [$2], [, ], [lt_dict_add_subkey([lt_decl_dict], [$2], [libtool_name], [m4_ifval([$1], [$1], [$2])]) lt_dict_add_subkey([lt_decl_dict], [$2], [value], [$3]) m4_ifval([$4], [lt_dict_add_subkey([lt_decl_dict], [$2], [description], [$4])]) lt_dict_add_subkey([lt_decl_dict], [$2], [tagged?], [m4_ifval([$5], [yes], [no])])]) ]) # _LT_TAGDECL([CONFIGNAME], VARNAME, VALUE, [DESCRIPTION]) # -------------------------------------------------------- m4_define([_LT_TAGDECL], [_LT_DECL([$1], [$2], [$3], [$4], [yes])]) # lt_decl_tag_varnames([SEPARATOR], [VARNAME1...]) # ------------------------------------------------ m4_define([lt_decl_tag_varnames], [_lt_decl_filter([tagged?], [yes], $@)]) # _lt_decl_filter(SUBKEY, VALUE, [SEPARATOR], [VARNAME1..]) # --------------------------------------------------------- m4_define([_lt_decl_filter], [m4_case([$#], [0], [m4_fatal([$0: too few arguments: $#])], [1], [m4_fatal([$0: too few arguments: $#: $1])], [2], [lt_dict_filter([lt_decl_dict], [$1], [$2], [], lt_decl_varnames)], [3], [lt_dict_filter([lt_decl_dict], [$1], [$2], [$3], lt_decl_varnames)], [lt_dict_filter([lt_decl_dict], $@)])[]dnl ]) # lt_decl_quote_varnames([SEPARATOR], [VARNAME1...]) # -------------------------------------------------- m4_define([lt_decl_quote_varnames], [_lt_decl_filter([value], [1], $@)]) # lt_decl_dquote_varnames([SEPARATOR], [VARNAME1...]) # --------------------------------------------------- m4_define([lt_decl_dquote_varnames], [_lt_decl_filter([value], [2], $@)]) # lt_decl_varnames_tagged([SEPARATOR], [VARNAME1...]) # --------------------------------------------------- m4_define([lt_decl_varnames_tagged], [m4_assert([$# <= 2])dnl _$0(m4_quote(m4_default([$1], [[, ]])), m4_ifval([$2], [[$2]], [m4_dquote(lt_decl_tag_varnames)]), m4_split(m4_normalize(m4_quote(_LT_TAGS)), [ ]))]) m4_define([_lt_decl_varnames_tagged], [m4_ifval([$3], [lt_combine([$1], [$2], [_], $3)])]) # lt_decl_all_varnames([SEPARATOR], [VARNAME1...]) # ------------------------------------------------ m4_define([lt_decl_all_varnames], [_$0(m4_quote(m4_default([$1], [[, ]])), m4_if([$2], [], m4_quote(lt_decl_varnames), m4_quote(m4_shift($@))))[]dnl ]) m4_define([_lt_decl_all_varnames], [lt_join($@, lt_decl_varnames_tagged([$1], lt_decl_tag_varnames([[, ]], m4_shift($@))))dnl ]) # _LT_CONFIG_STATUS_DECLARE([VARNAME]) # ------------------------------------ # Quote a variable value, and forward it to 'config.status' so that its # declaration there will have the same value as in 'configure'. VARNAME # must have a single quote delimited value for this to work. m4_define([_LT_CONFIG_STATUS_DECLARE], [$1='`$ECHO "$][$1" | $SED "$delay_single_quote_subst"`']) # _LT_CONFIG_STATUS_DECLARATIONS # ------------------------------ # We delimit libtool config variables with single quotes, so when # we write them to config.status, we have to be sure to quote all # embedded single quotes properly. In configure, this macro expands # each variable declared with _LT_DECL (and _LT_TAGDECL) into: # # ='`$ECHO "$" | $SED "$delay_single_quote_subst"`' m4_defun([_LT_CONFIG_STATUS_DECLARATIONS], [m4_foreach([_lt_var], m4_quote(lt_decl_all_varnames), [m4_n([_LT_CONFIG_STATUS_DECLARE(_lt_var)])])]) # _LT_LIBTOOL_TAGS # ---------------- # Output comment and list of tags supported by the script m4_defun([_LT_LIBTOOL_TAGS], [_LT_FORMAT_COMMENT([The names of the tagged configurations supported by this script])dnl available_tags='_LT_TAGS'dnl ]) # _LT_LIBTOOL_DECLARE(VARNAME, [TAG]) # ----------------------------------- # Extract the dictionary values for VARNAME (optionally with TAG) and # expand to a commented shell variable setting: # # # Some comment about what VAR is for. # visible_name=$lt_internal_name m4_define([_LT_LIBTOOL_DECLARE], [_LT_FORMAT_COMMENT(m4_quote(lt_dict_fetch([lt_decl_dict], [$1], [description])))[]dnl m4_pushdef([_libtool_name], m4_quote(lt_dict_fetch([lt_decl_dict], [$1], [libtool_name])))[]dnl m4_case(m4_quote(lt_dict_fetch([lt_decl_dict], [$1], [value])), [0], [_libtool_name=[$]$1], [1], [_libtool_name=$lt_[]$1], [2], [_libtool_name=$lt_[]$1], [_libtool_name=lt_dict_fetch([lt_decl_dict], [$1], [value])])[]dnl m4_ifval([$2], [_$2])[]m4_popdef([_libtool_name])[]dnl ]) # _LT_LIBTOOL_CONFIG_VARS # ----------------------- # Produce commented declarations of non-tagged libtool config variables # suitable for insertion in the LIBTOOL CONFIG section of the 'libtool' # script. Tagged libtool config variables (even for the LIBTOOL CONFIG # section) are produced by _LT_LIBTOOL_TAG_VARS. m4_defun([_LT_LIBTOOL_CONFIG_VARS], [m4_foreach([_lt_var], m4_quote(_lt_decl_filter([tagged?], [no], [], lt_decl_varnames)), [m4_n([_LT_LIBTOOL_DECLARE(_lt_var)])])]) # _LT_LIBTOOL_TAG_VARS(TAG) # ------------------------- m4_define([_LT_LIBTOOL_TAG_VARS], [m4_foreach([_lt_var], m4_quote(lt_decl_tag_varnames), [m4_n([_LT_LIBTOOL_DECLARE(_lt_var, [$1])])])]) # _LT_TAGVAR(VARNAME, [TAGNAME]) # ------------------------------ m4_define([_LT_TAGVAR], [m4_ifval([$2], [$1_$2], [$1])]) # _LT_CONFIG_COMMANDS # ------------------- # Send accumulated output to $CONFIG_STATUS. Thanks to the lists of # variables for single and double quote escaping we saved from calls # to _LT_DECL, we can put quote escaped variables declarations # into 'config.status', and then the shell code to quote escape them in # for loops in 'config.status'. Finally, any additional code accumulated # from calls to _LT_CONFIG_LIBTOOL_INIT is expanded. m4_defun([_LT_CONFIG_COMMANDS], [AC_PROVIDE_IFELSE([LT_OUTPUT], dnl If the libtool generation code has been placed in $CONFIG_LT, dnl instead of duplicating it all over again into config.status, dnl then we will have config.status run $CONFIG_LT later, so it dnl needs to know what name is stored there: [AC_CONFIG_COMMANDS([libtool], [$SHELL $CONFIG_LT || AS_EXIT(1)], [CONFIG_LT='$CONFIG_LT'])], dnl If the libtool generation code is destined for config.status, dnl expand the accumulated commands and init code now: [AC_CONFIG_COMMANDS([libtool], [_LT_OUTPUT_LIBTOOL_COMMANDS], [_LT_OUTPUT_LIBTOOL_COMMANDS_INIT])]) ])#_LT_CONFIG_COMMANDS # Initialize. m4_define([_LT_OUTPUT_LIBTOOL_COMMANDS_INIT], [ # The HP-UX ksh and POSIX shell print the target directory to stdout # if CDPATH is set. (unset CDPATH) >/dev/null 2>&1 && unset CDPATH sed_quote_subst='$sed_quote_subst' double_quote_subst='$double_quote_subst' delay_variable_subst='$delay_variable_subst' _LT_CONFIG_STATUS_DECLARATIONS LTCC='$LTCC' LTCFLAGS='$LTCFLAGS' compiler='$compiler_DEFAULT' # A function that is used when there is no print builtin or printf. func_fallback_echo () { eval 'cat <<_LTECHO_EOF \$[]1 _LTECHO_EOF' } # Quote evaled strings. for var in lt_decl_all_varnames([[ \ ]], lt_decl_quote_varnames); do case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in *[[\\\\\\\`\\"\\\$]]*) eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED \\"\\\$sed_quote_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes ;; *) eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\"" ;; esac done # Double-quote double-evaled strings. for var in lt_decl_all_varnames([[ \ ]], lt_decl_dquote_varnames); do case \`eval \\\\\$ECHO \\\\""\\\\\$\$var"\\\\"\` in *[[\\\\\\\`\\"\\\$]]*) eval "lt_\$var=\\\\\\"\\\`\\\$ECHO \\"\\\$\$var\\" | \\\$SED -e \\"\\\$double_quote_subst\\" -e \\"\\\$sed_quote_subst\\" -e \\"\\\$delay_variable_subst\\"\\\`\\\\\\"" ## exclude from sc_prohibit_nested_quotes ;; *) eval "lt_\$var=\\\\\\"\\\$\$var\\\\\\"" ;; esac done _LT_OUTPUT_LIBTOOL_INIT ]) # _LT_GENERATED_FILE_INIT(FILE, [COMMENT]) # ------------------------------------ # Generate a child script FILE with all initialization necessary to # reuse the environment learned by the parent script, and make the # file executable. If COMMENT is supplied, it is inserted after the # '#!' sequence but before initialization text begins. After this # macro, additional text can be appended to FILE to form the body of # the child script. The macro ends with non-zero status if the # file could not be fully written (such as if the disk is full). m4_ifdef([AS_INIT_GENERATED], [m4_defun([_LT_GENERATED_FILE_INIT],[AS_INIT_GENERATED($@)])], [m4_defun([_LT_GENERATED_FILE_INIT], [m4_require([AS_PREPARE])]dnl [m4_pushdef([AS_MESSAGE_LOG_FD])]dnl [lt_write_fail=0 cat >$1 <<_ASEOF || lt_write_fail=1 #! $SHELL # Generated by $as_me. $2 SHELL=\${CONFIG_SHELL-$SHELL} export SHELL _ASEOF cat >>$1 <<\_ASEOF || lt_write_fail=1 AS_SHELL_SANITIZE _AS_PREPARE exec AS_MESSAGE_FD>&1 _ASEOF test 0 = "$lt_write_fail" && chmod +x $1[]dnl m4_popdef([AS_MESSAGE_LOG_FD])])])# _LT_GENERATED_FILE_INIT # LT_OUTPUT # --------- # This macro allows early generation of the libtool script (before # AC_OUTPUT is called), incase it is used in configure for compilation # tests. AC_DEFUN([LT_OUTPUT], [: ${CONFIG_LT=./config.lt} AC_MSG_NOTICE([creating $CONFIG_LT]) _LT_GENERATED_FILE_INIT(["$CONFIG_LT"], [# Run this file to recreate a libtool stub with the current configuration.]) cat >>"$CONFIG_LT" <<\_LTEOF lt_cl_silent=false exec AS_MESSAGE_LOG_FD>>config.log { echo AS_BOX([Running $as_me.]) } >&AS_MESSAGE_LOG_FD lt_cl_help="\ '$as_me' creates a local libtool stub from the current configuration, for use in further configure time tests before the real libtool is generated. Usage: $[0] [[OPTIONS]] -h, --help print this help, then exit -V, --version print version number, then exit -q, --quiet do not print progress messages -d, --debug don't remove temporary files Report bugs to ." lt_cl_version="\ m4_ifset([AC_PACKAGE_NAME], [AC_PACKAGE_NAME ])config.lt[]dnl m4_ifset([AC_PACKAGE_VERSION], [ AC_PACKAGE_VERSION]) configured by $[0], generated by m4_PACKAGE_STRING. Copyright (C) 2011 Free Software Foundation, Inc. This config.lt script is free software; the Free Software Foundation gives unlimited permision to copy, distribute and modify it." while test 0 != $[#] do case $[1] in --version | --v* | -V ) echo "$lt_cl_version"; exit 0 ;; --help | --h* | -h ) echo "$lt_cl_help"; exit 0 ;; --debug | --d* | -d ) debug=: ;; --quiet | --q* | --silent | --s* | -q ) lt_cl_silent=: ;; -*) AC_MSG_ERROR([unrecognized option: $[1] Try '$[0] --help' for more information.]) ;; *) AC_MSG_ERROR([unrecognized argument: $[1] Try '$[0] --help' for more information.]) ;; esac shift done if $lt_cl_silent; then exec AS_MESSAGE_FD>/dev/null fi _LTEOF cat >>"$CONFIG_LT" <<_LTEOF _LT_OUTPUT_LIBTOOL_COMMANDS_INIT _LTEOF cat >>"$CONFIG_LT" <<\_LTEOF AC_MSG_NOTICE([creating $ofile]) _LT_OUTPUT_LIBTOOL_COMMANDS AS_EXIT(0) _LTEOF chmod +x "$CONFIG_LT" # configure is writing to config.log, but config.lt does its own redirection, # appending to config.log, which fails on DOS, as config.log is still kept # open by configure. Here we exec the FD to /dev/null, effectively closing # config.log, so it can be properly (re)opened and appended to by config.lt. lt_cl_success=: test yes = "$silent" && lt_config_lt_args="$lt_config_lt_args --quiet" exec AS_MESSAGE_LOG_FD>/dev/null $SHELL "$CONFIG_LT" $lt_config_lt_args || lt_cl_success=false exec AS_MESSAGE_LOG_FD>>config.log $lt_cl_success || AS_EXIT(1) ])# LT_OUTPUT # _LT_CONFIG(TAG) # --------------- # If TAG is the built-in tag, create an initial libtool script with a # default configuration from the untagged config vars. Otherwise add code # to config.status for appending the configuration named by TAG from the # matching tagged config vars. m4_defun([_LT_CONFIG], [m4_require([_LT_FILEUTILS_DEFAULTS])dnl _LT_CONFIG_SAVE_COMMANDS([ m4_define([_LT_TAG], m4_if([$1], [], [C], [$1]))dnl m4_if(_LT_TAG, [C], [ # See if we are running on zsh, and set the options that allow our # commands through without removal of \ escapes. if test -n "${ZSH_VERSION+set}"; then setopt NO_GLOB_SUBST fi cfgfile=${ofile}T trap "$RM \"$cfgfile\"; exit 1" 1 2 15 $RM "$cfgfile" cat <<_LT_EOF >> "$cfgfile" #! $SHELL # Generated automatically by $as_me ($PACKAGE) $VERSION # Libtool was configured on host `(hostname || uname -n) 2>/dev/null | sed 1q`: # NOTE: Changes made to this file will be lost: look at ltmain.sh. # Provide generalized library-building support services. # Written by Gordon Matzigkeit, 1996 _LT_COPYING _LT_LIBTOOL_TAGS # Configured defaults for sys_lib_dlsearch_path munging. : \${LT_SYS_LIBRARY_PATH="$configure_time_lt_sys_library_path"} # ### BEGIN LIBTOOL CONFIG _LT_LIBTOOL_CONFIG_VARS _LT_LIBTOOL_TAG_VARS # ### END LIBTOOL CONFIG _LT_EOF cat <<'_LT_EOF' >> "$cfgfile" # ### BEGIN FUNCTIONS SHARED WITH CONFIGURE _LT_PREPARE_MUNGE_PATH_LIST _LT_PREPARE_CC_BASENAME # ### END FUNCTIONS SHARED WITH CONFIGURE _LT_EOF case $host_os in aix3*) cat <<\_LT_EOF >> "$cfgfile" # AIX sometimes has problems with the GCC collect2 program. For some # reason, if we set the COLLECT_NAMES environment variable, the problems # vanish in a puff of smoke. if test set != "${COLLECT_NAMES+set}"; then COLLECT_NAMES= export COLLECT_NAMES fi _LT_EOF ;; esac _LT_PROG_LTMAIN # We use sed instead of cat because bash on DJGPP gets confused if # if finds mixed CR/LF and LF-only lines. Since sed operates in # text mode, it properly converts lines to CR/LF. This bash problem # is reportedly fixed, but why not run on old versions too? $SED '$q' "$ltmain" >> "$cfgfile" \ || (rm -f "$cfgfile"; exit 1) mv -f "$cfgfile" "$ofile" || (rm -f "$ofile" && cp "$cfgfile" "$ofile" && rm -f "$cfgfile") chmod +x "$ofile" ], [cat <<_LT_EOF >> "$ofile" dnl Unfortunately we have to use $1 here, since _LT_TAG is not expanded dnl in a comment (ie after a #). # ### BEGIN LIBTOOL TAG CONFIG: $1 _LT_LIBTOOL_TAG_VARS(_LT_TAG) # ### END LIBTOOL TAG CONFIG: $1 _LT_EOF ])dnl /m4_if ], [m4_if([$1], [], [ PACKAGE='$PACKAGE' VERSION='$VERSION' RM='$RM' ofile='$ofile'], []) ])dnl /_LT_CONFIG_SAVE_COMMANDS ])# _LT_CONFIG # LT_SUPPORTED_TAG(TAG) # --------------------- # Trace this macro to discover what tags are supported by the libtool # --tag option, using: # autoconf --trace 'LT_SUPPORTED_TAG:$1' AC_DEFUN([LT_SUPPORTED_TAG], []) # C support is built-in for now m4_define([_LT_LANG_C_enabled], []) m4_define([_LT_TAGS], []) # LT_LANG(LANG) # ------------- # Enable libtool support for the given language if not already enabled. AC_DEFUN([LT_LANG], [AC_BEFORE([$0], [LT_OUTPUT])dnl m4_case([$1], [C], [_LT_LANG(C)], [C++], [_LT_LANG(CXX)], [Go], [_LT_LANG(GO)], [Java], [_LT_LANG(GCJ)], [Fortran 77], [_LT_LANG(F77)], [Fortran], [_LT_LANG(FC)], [Windows Resource], [_LT_LANG(RC)], [m4_ifdef([_LT_LANG_]$1[_CONFIG], [_LT_LANG($1)], [m4_fatal([$0: unsupported language: "$1"])])])dnl ])# LT_LANG # _LT_LANG(LANGNAME) # ------------------ m4_defun([_LT_LANG], [m4_ifdef([_LT_LANG_]$1[_enabled], [], [LT_SUPPORTED_TAG([$1])dnl m4_append([_LT_TAGS], [$1 ])dnl m4_define([_LT_LANG_]$1[_enabled], [])dnl _LT_LANG_$1_CONFIG($1)])dnl ])# _LT_LANG m4_ifndef([AC_PROG_GO], [ ############################################################ # NOTE: This macro has been submitted for inclusion into # # GNU Autoconf as AC_PROG_GO. When it is available in # # a released version of Autoconf we should remove this # # macro and use it instead. # ############################################################ m4_defun([AC_PROG_GO], [AC_LANG_PUSH(Go)dnl AC_ARG_VAR([GOC], [Go compiler command])dnl AC_ARG_VAR([GOFLAGS], [Go compiler flags])dnl _AC_ARG_VAR_LDFLAGS()dnl AC_CHECK_TOOL(GOC, gccgo) if test -z "$GOC"; then if test -n "$ac_tool_prefix"; then AC_CHECK_PROG(GOC, [${ac_tool_prefix}gccgo], [${ac_tool_prefix}gccgo]) fi fi if test -z "$GOC"; then AC_CHECK_PROG(GOC, gccgo, gccgo, false) fi ])#m4_defun ])#m4_ifndef # _LT_LANG_DEFAULT_CONFIG # ----------------------- m4_defun([_LT_LANG_DEFAULT_CONFIG], [AC_PROVIDE_IFELSE([AC_PROG_CXX], [LT_LANG(CXX)], [m4_define([AC_PROG_CXX], defn([AC_PROG_CXX])[LT_LANG(CXX)])]) AC_PROVIDE_IFELSE([AC_PROG_F77], [LT_LANG(F77)], [m4_define([AC_PROG_F77], defn([AC_PROG_F77])[LT_LANG(F77)])]) AC_PROVIDE_IFELSE([AC_PROG_FC], [LT_LANG(FC)], [m4_define([AC_PROG_FC], defn([AC_PROG_FC])[LT_LANG(FC)])]) dnl The call to [A][M_PROG_GCJ] is quoted like that to stop aclocal dnl pulling things in needlessly. AC_PROVIDE_IFELSE([AC_PROG_GCJ], [LT_LANG(GCJ)], [AC_PROVIDE_IFELSE([A][M_PROG_GCJ], [LT_LANG(GCJ)], [AC_PROVIDE_IFELSE([LT_PROG_GCJ], [LT_LANG(GCJ)], [m4_ifdef([AC_PROG_GCJ], [m4_define([AC_PROG_GCJ], defn([AC_PROG_GCJ])[LT_LANG(GCJ)])]) m4_ifdef([A][M_PROG_GCJ], [m4_define([A][M_PROG_GCJ], defn([A][M_PROG_GCJ])[LT_LANG(GCJ)])]) m4_ifdef([LT_PROG_GCJ], [m4_define([LT_PROG_GCJ], defn([LT_PROG_GCJ])[LT_LANG(GCJ)])])])])]) AC_PROVIDE_IFELSE([AC_PROG_GO], [LT_LANG(GO)], [m4_define([AC_PROG_GO], defn([AC_PROG_GO])[LT_LANG(GO)])]) AC_PROVIDE_IFELSE([LT_PROG_RC], [LT_LANG(RC)], [m4_define([LT_PROG_RC], defn([LT_PROG_RC])[LT_LANG(RC)])]) ])# _LT_LANG_DEFAULT_CONFIG # Obsolete macros: AU_DEFUN([AC_LIBTOOL_CXX], [LT_LANG(C++)]) AU_DEFUN([AC_LIBTOOL_F77], [LT_LANG(Fortran 77)]) AU_DEFUN([AC_LIBTOOL_FC], [LT_LANG(Fortran)]) AU_DEFUN([AC_LIBTOOL_GCJ], [LT_LANG(Java)]) AU_DEFUN([AC_LIBTOOL_RC], [LT_LANG(Windows Resource)]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_CXX], []) dnl AC_DEFUN([AC_LIBTOOL_F77], []) dnl AC_DEFUN([AC_LIBTOOL_FC], []) dnl AC_DEFUN([AC_LIBTOOL_GCJ], []) dnl AC_DEFUN([AC_LIBTOOL_RC], []) # _LT_TAG_COMPILER # ---------------- m4_defun([_LT_TAG_COMPILER], [AC_REQUIRE([AC_PROG_CC])dnl _LT_DECL([LTCC], [CC], [1], [A C compiler])dnl _LT_DECL([LTCFLAGS], [CFLAGS], [1], [LTCC compiler flags])dnl _LT_TAGDECL([CC], [compiler], [1], [A language specific compiler])dnl _LT_TAGDECL([with_gcc], [GCC], [0], [Is the compiler the GNU compiler?])dnl # If no C compiler was specified, use CC. LTCC=${LTCC-"$CC"} # If no C compiler flags were specified, use CFLAGS. LTCFLAGS=${LTCFLAGS-"$CFLAGS"} # Allow CC to be a program name with arguments. compiler=$CC ])# _LT_TAG_COMPILER # _LT_COMPILER_BOILERPLATE # ------------------------ # Check for compiler boilerplate output or warnings with # the simple compiler test code. m4_defun([_LT_COMPILER_BOILERPLATE], [m4_require([_LT_DECL_SED])dnl ac_outfile=conftest.$ac_objext echo "$lt_simple_compile_test_code" >conftest.$ac_ext eval "$ac_compile" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_compiler_boilerplate=`cat conftest.err` $RM conftest* ])# _LT_COMPILER_BOILERPLATE # _LT_LINKER_BOILERPLATE # ---------------------- # Check for linker boilerplate output or warnings with # the simple link test code. m4_defun([_LT_LINKER_BOILERPLATE], [m4_require([_LT_DECL_SED])dnl ac_outfile=conftest.$ac_objext echo "$lt_simple_link_test_code" >conftest.$ac_ext eval "$ac_link" 2>&1 >/dev/null | $SED '/^$/d; /^ *+/d' >conftest.err _lt_linker_boilerplate=`cat conftest.err` $RM -r conftest* ])# _LT_LINKER_BOILERPLATE # _LT_REQUIRED_DARWIN_CHECKS # ------------------------- m4_defun_once([_LT_REQUIRED_DARWIN_CHECKS],[ case $host_os in rhapsody* | darwin*) AC_CHECK_TOOL([DSYMUTIL], [dsymutil], [:]) AC_CHECK_TOOL([NMEDIT], [nmedit], [:]) AC_CHECK_TOOL([LIPO], [lipo], [:]) AC_CHECK_TOOL([OTOOL], [otool], [:]) AC_CHECK_TOOL([OTOOL64], [otool64], [:]) _LT_DECL([], [DSYMUTIL], [1], [Tool to manipulate archived DWARF debug symbol files on Mac OS X]) _LT_DECL([], [NMEDIT], [1], [Tool to change global to local symbols on Mac OS X]) _LT_DECL([], [LIPO], [1], [Tool to manipulate fat objects and archives on Mac OS X]) _LT_DECL([], [OTOOL], [1], [ldd/readelf like tool for Mach-O binaries on Mac OS X]) _LT_DECL([], [OTOOL64], [1], [ldd/readelf like tool for 64 bit Mach-O binaries on Mac OS X 10.4]) AC_CACHE_CHECK([for -single_module linker flag],[lt_cv_apple_cc_single_mod], [lt_cv_apple_cc_single_mod=no if test -z "$LT_MULTI_MODULE"; then # By default we will add the -single_module flag. You can override # by either setting the environment variable LT_MULTI_MODULE # non-empty at configure time, or by adding -multi_module to the # link flags. rm -rf libconftest.dylib* echo "int foo(void){return 1;}" > conftest.c echo "$LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \ -dynamiclib -Wl,-single_module conftest.c" >&AS_MESSAGE_LOG_FD $LTCC $LTCFLAGS $LDFLAGS -o libconftest.dylib \ -dynamiclib -Wl,-single_module conftest.c 2>conftest.err _lt_result=$? # If there is a non-empty error log, and "single_module" # appears in it, assume the flag caused a linker warning if test -s conftest.err && $GREP single_module conftest.err; then cat conftest.err >&AS_MESSAGE_LOG_FD # Otherwise, if the output was created with a 0 exit code from # the compiler, it worked. elif test -f libconftest.dylib && test 0 = "$_lt_result"; then lt_cv_apple_cc_single_mod=yes else cat conftest.err >&AS_MESSAGE_LOG_FD fi rm -rf libconftest.dylib* rm -f conftest.* fi]) AC_CACHE_CHECK([for -exported_symbols_list linker flag], [lt_cv_ld_exported_symbols_list], [lt_cv_ld_exported_symbols_list=no save_LDFLAGS=$LDFLAGS echo "_main" > conftest.sym LDFLAGS="$LDFLAGS -Wl,-exported_symbols_list,conftest.sym" AC_LINK_IFELSE([AC_LANG_PROGRAM([],[])], [lt_cv_ld_exported_symbols_list=yes], [lt_cv_ld_exported_symbols_list=no]) LDFLAGS=$save_LDFLAGS ]) AC_CACHE_CHECK([for -force_load linker flag],[lt_cv_ld_force_load], [lt_cv_ld_force_load=no cat > conftest.c << _LT_EOF int forced_loaded() { return 2;} _LT_EOF echo "$LTCC $LTCFLAGS -c -o conftest.o conftest.c" >&AS_MESSAGE_LOG_FD $LTCC $LTCFLAGS -c -o conftest.o conftest.c 2>&AS_MESSAGE_LOG_FD echo "$AR $AR_FLAGS libconftest.a conftest.o" >&AS_MESSAGE_LOG_FD $AR $AR_FLAGS libconftest.a conftest.o 2>&AS_MESSAGE_LOG_FD echo "$RANLIB libconftest.a" >&AS_MESSAGE_LOG_FD $RANLIB libconftest.a 2>&AS_MESSAGE_LOG_FD cat > conftest.c << _LT_EOF int main() { return 0;} _LT_EOF echo "$LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a" >&AS_MESSAGE_LOG_FD $LTCC $LTCFLAGS $LDFLAGS -o conftest conftest.c -Wl,-force_load,./libconftest.a 2>conftest.err _lt_result=$? if test -s conftest.err && $GREP force_load conftest.err; then cat conftest.err >&AS_MESSAGE_LOG_FD elif test -f conftest && test 0 = "$_lt_result" && $GREP forced_load conftest >/dev/null 2>&1; then lt_cv_ld_force_load=yes else cat conftest.err >&AS_MESSAGE_LOG_FD fi rm -f conftest.err libconftest.a conftest conftest.c rm -rf conftest.dSYM ]) case $host_os in rhapsody* | darwin1.[[012]]) _lt_dar_allow_undefined='$wl-undefined ${wl}suppress' ;; darwin1.*) _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;; darwin*) case $MACOSX_DEPLOYMENT_TARGET,$host in 10.[[012]],*|,*powerpc*-darwin[[5-8]]*) _lt_dar_allow_undefined='$wl-flat_namespace $wl-undefined ${wl}suppress' ;; *) _lt_dar_allow_undefined='$wl-undefined ${wl}dynamic_lookup' ;; esac ;; esac if test yes = "$lt_cv_apple_cc_single_mod"; then _lt_dar_single_mod='$single_module' fi if test yes = "$lt_cv_ld_exported_symbols_list"; then _lt_dar_export_syms=' $wl-exported_symbols_list,$output_objdir/$libname-symbols.expsym' else _lt_dar_export_syms='~$NMEDIT -s $output_objdir/$libname-symbols.expsym $lib' fi if test : != "$DSYMUTIL" && test no = "$lt_cv_ld_force_load"; then _lt_dsymutil='~$DSYMUTIL $lib || :' else _lt_dsymutil= fi ;; esac ]) # _LT_DARWIN_LINKER_FEATURES([TAG]) # --------------------------------- # Checks for linker and compiler features on darwin m4_defun([_LT_DARWIN_LINKER_FEATURES], [ m4_require([_LT_REQUIRED_DARWIN_CHECKS]) _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_automatic, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported if test yes = "$lt_cv_ld_force_load"; then _LT_TAGVAR(whole_archive_flag_spec, $1)='`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience $wl-force_load,$conv\"; done; func_echo_all \"$new_convenience\"`' m4_case([$1], [F77], [_LT_TAGVAR(compiler_needs_object, $1)=yes], [FC], [_LT_TAGVAR(compiler_needs_object, $1)=yes]) else _LT_TAGVAR(whole_archive_flag_spec, $1)='' fi _LT_TAGVAR(link_all_deplibs, $1)=yes _LT_TAGVAR(allow_undefined_flag, $1)=$_lt_dar_allow_undefined case $cc_basename in ifort*|nagfor*) _lt_dar_can_shared=yes ;; *) _lt_dar_can_shared=$GCC ;; esac if test yes = "$_lt_dar_can_shared"; then output_verbose_link_cmd=func_echo_all _LT_TAGVAR(archive_cmds, $1)="\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dsymutil" _LT_TAGVAR(module_cmds, $1)="\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dsymutil" _LT_TAGVAR(archive_expsym_cmds, $1)="$SED 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$libobjs \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring $_lt_dar_single_mod$_lt_dar_export_syms$_lt_dsymutil" _LT_TAGVAR(module_expsym_cmds, $1)="$SED -e 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC \$allow_undefined_flag -o \$lib -bundle \$libobjs \$deplibs \$compiler_flags$_lt_dar_export_syms$_lt_dsymutil" m4_if([$1], [CXX], [ if test yes != "$lt_cv_apple_cc_single_mod"; then _LT_TAGVAR(archive_cmds, $1)="\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dsymutil" _LT_TAGVAR(archive_expsym_cmds, $1)="$SED 's|^|_|' < \$export_symbols > \$output_objdir/\$libname-symbols.expsym~\$CC -r -keep_private_externs -nostdlib -o \$lib-master.o \$libobjs~\$CC -dynamiclib \$allow_undefined_flag -o \$lib \$lib-master.o \$deplibs \$compiler_flags -install_name \$rpath/\$soname \$verstring$_lt_dar_export_syms$_lt_dsymutil" fi ],[]) else _LT_TAGVAR(ld_shlibs, $1)=no fi ]) # _LT_SYS_MODULE_PATH_AIX([TAGNAME]) # ---------------------------------- # Links a minimal program and checks the executable # for the system default hardcoded library path. In most cases, # this is /usr/lib:/lib, but when the MPI compilers are used # the location of the communication and MPI libs are included too. # If we don't find anything, use the default library path according # to the aix ld manual. # Store the results from the different compilers for each TAGNAME. # Allow to override them for all tags through lt_cv_aix_libpath. m4_defun([_LT_SYS_MODULE_PATH_AIX], [m4_require([_LT_DECL_SED])dnl if test set = "${lt_cv_aix_libpath+set}"; then aix_libpath=$lt_cv_aix_libpath else AC_CACHE_VAL([_LT_TAGVAR([lt_cv_aix_libpath_], [$1])], [AC_LINK_IFELSE([AC_LANG_PROGRAM],[ lt_aix_libpath_sed='[ /Import File Strings/,/^$/ { /^0/ { s/^0 *\([^ ]*\) *$/\1/ p } }]' _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=`dump -H conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` # Check for a 64-bit object if we didn't find anything. if test -z "$_LT_TAGVAR([lt_cv_aix_libpath_], [$1])"; then _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=`dump -HX64 conftest$ac_exeext 2>/dev/null | $SED -n -e "$lt_aix_libpath_sed"` fi],[]) if test -z "$_LT_TAGVAR([lt_cv_aix_libpath_], [$1])"; then _LT_TAGVAR([lt_cv_aix_libpath_], [$1])=/usr/lib:/lib fi ]) aix_libpath=$_LT_TAGVAR([lt_cv_aix_libpath_], [$1]) fi ])# _LT_SYS_MODULE_PATH_AIX # _LT_SHELL_INIT(ARG) # ------------------- m4_define([_LT_SHELL_INIT], [m4_divert_text([M4SH-INIT], [$1 ])])# _LT_SHELL_INIT # _LT_PROG_ECHO_BACKSLASH # ----------------------- # Find how we can fake an echo command that does not interpret backslash. # In particular, with Autoconf 2.60 or later we add some code to the start # of the generated configure script that will find a shell with a builtin # printf (that we can use as an echo command). m4_defun([_LT_PROG_ECHO_BACKSLASH], [ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\' ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO AC_MSG_CHECKING([how to print strings]) # Test print first, because it will be a builtin if present. if test "X`( print -r -- -n ) 2>/dev/null`" = X-n && \ test "X`print -r -- $ECHO 2>/dev/null`" = "X$ECHO"; then ECHO='print -r --' elif test "X`printf %s $ECHO 2>/dev/null`" = "X$ECHO"; then ECHO='printf %s\n' else # Use this function as a fallback that always works. func_fallback_echo () { eval 'cat <<_LTECHO_EOF $[]1 _LTECHO_EOF' } ECHO='func_fallback_echo' fi # func_echo_all arg... # Invoke $ECHO with all args, space-separated. func_echo_all () { $ECHO "$*" } case $ECHO in printf*) AC_MSG_RESULT([printf]) ;; print*) AC_MSG_RESULT([print -r]) ;; *) AC_MSG_RESULT([cat]) ;; esac m4_ifdef([_AS_DETECT_SUGGESTED], [_AS_DETECT_SUGGESTED([ test -n "${ZSH_VERSION+set}${BASH_VERSION+set}" || ( ECHO='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\' ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO ECHO=$ECHO$ECHO$ECHO$ECHO$ECHO$ECHO PATH=/empty FPATH=/empty; export PATH FPATH test "X`printf %s $ECHO`" = "X$ECHO" \ || test "X`print -r -- $ECHO`" = "X$ECHO" )])]) _LT_DECL([], [SHELL], [1], [Shell to use when invoking shell scripts]) _LT_DECL([], [ECHO], [1], [An echo program that protects backslashes]) ])# _LT_PROG_ECHO_BACKSLASH # _LT_WITH_SYSROOT # ---------------- AC_DEFUN([_LT_WITH_SYSROOT], [m4_require([_LT_DECL_SED])dnl AC_MSG_CHECKING([for sysroot]) AC_ARG_WITH([sysroot], [AS_HELP_STRING([--with-sysroot@<:@=DIR@:>@], [Search for dependent libraries within DIR (or the compiler's sysroot if not specified).])], [], [with_sysroot=no]) dnl lt_sysroot will always be passed unquoted. We quote it here dnl in case the user passed a directory name. lt_sysroot= case $with_sysroot in #( yes) if test yes = "$GCC"; then lt_sysroot=`$CC --print-sysroot 2>/dev/null` fi ;; #( /*) lt_sysroot=`echo "$with_sysroot" | $SED -e "$sed_quote_subst"` ;; #( no|'') ;; #( *) AC_MSG_RESULT([$with_sysroot]) AC_MSG_ERROR([The sysroot must be an absolute path.]) ;; esac AC_MSG_RESULT([${lt_sysroot:-no}]) _LT_DECL([], [lt_sysroot], [0], [The root where to search for ]dnl [dependent libraries, and where our libraries should be installed.])]) # _LT_ENABLE_LOCK # --------------- m4_defun([_LT_ENABLE_LOCK], [AC_ARG_ENABLE([libtool-lock], [AS_HELP_STRING([--disable-libtool-lock], [avoid locking (might break parallel builds)])]) test no = "$enable_libtool_lock" || enable_libtool_lock=yes # Some flags need to be propagated to the compiler or linker for good # libtool support. case $host in ia64-*-hpux*) # Find out what ABI is being produced by ac_compile, and set mode # options accordingly. echo 'int i;' > conftest.$ac_ext if AC_TRY_EVAL(ac_compile); then case `$FILECMD conftest.$ac_objext` in *ELF-32*) HPUX_IA64_MODE=32 ;; *ELF-64*) HPUX_IA64_MODE=64 ;; esac fi rm -rf conftest* ;; *-*-irix6*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo '[#]line '$LINENO' "configure"' > conftest.$ac_ext if AC_TRY_EVAL(ac_compile); then if test yes = "$lt_cv_prog_gnu_ld"; then case `$FILECMD conftest.$ac_objext` in *32-bit*) LD="${LD-ld} -melf32bsmip" ;; *N32*) LD="${LD-ld} -melf32bmipn32" ;; *64-bit*) LD="${LD-ld} -melf64bmip" ;; esac else case `$FILECMD conftest.$ac_objext` in *32-bit*) LD="${LD-ld} -32" ;; *N32*) LD="${LD-ld} -n32" ;; *64-bit*) LD="${LD-ld} -64" ;; esac fi fi rm -rf conftest* ;; mips64*-*linux*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo '[#]line '$LINENO' "configure"' > conftest.$ac_ext if AC_TRY_EVAL(ac_compile); then emul=elf case `$FILECMD conftest.$ac_objext` in *32-bit*) emul="${emul}32" ;; *64-bit*) emul="${emul}64" ;; esac case `$FILECMD conftest.$ac_objext` in *MSB*) emul="${emul}btsmip" ;; *LSB*) emul="${emul}ltsmip" ;; esac case `$FILECMD conftest.$ac_objext` in *N32*) emul="${emul}n32" ;; esac LD="${LD-ld} -m $emul" fi rm -rf conftest* ;; x86_64-*kfreebsd*-gnu|x86_64-*linux*|powerpc*-*linux*| \ s390*-*linux*|s390*-*tpf*|sparc*-*linux*|x86_64-gnu*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. Note that the listed cases only cover the # situations where additional linker options are needed (such as when # doing 32-bit compilation for a host where ld defaults to 64-bit, or # vice versa); the common cases where no linker options are needed do # not appear in the list. echo 'int i;' > conftest.$ac_ext if AC_TRY_EVAL(ac_compile); then case `$FILECMD conftest.o` in *32-bit*) case $host in x86_64-*kfreebsd*-gnu) LD="${LD-ld} -m elf_i386_fbsd" ;; x86_64-*linux*|x86_64-gnu*) case `$FILECMD conftest.o` in *x86-64*) LD="${LD-ld} -m elf32_x86_64" ;; *) LD="${LD-ld} -m elf_i386" ;; esac ;; powerpc64le-*linux*) LD="${LD-ld} -m elf32lppclinux" ;; powerpc64-*linux*) LD="${LD-ld} -m elf32ppclinux" ;; s390x-*linux*) LD="${LD-ld} -m elf_s390" ;; sparc64-*linux*) LD="${LD-ld} -m elf32_sparc" ;; esac ;; *64-bit*) case $host in x86_64-*kfreebsd*-gnu) LD="${LD-ld} -m elf_x86_64_fbsd" ;; x86_64-*linux*|x86_64-gnu*) LD="${LD-ld} -m elf_x86_64" ;; powerpcle-*linux*) LD="${LD-ld} -m elf64lppc" ;; powerpc-*linux*) LD="${LD-ld} -m elf64ppc" ;; s390*-*linux*|s390*-*tpf*) LD="${LD-ld} -m elf64_s390" ;; sparc*-*linux*) LD="${LD-ld} -m elf64_sparc" ;; esac ;; esac fi rm -rf conftest* ;; *-*-sco3.2v5*) # On SCO OpenServer 5, we need -belf to get full-featured binaries. SAVE_CFLAGS=$CFLAGS CFLAGS="$CFLAGS -belf" AC_CACHE_CHECK([whether the C compiler needs -belf], lt_cv_cc_needs_belf, [AC_LANG_PUSH(C) AC_LINK_IFELSE([AC_LANG_PROGRAM([[]],[[]])],[lt_cv_cc_needs_belf=yes],[lt_cv_cc_needs_belf=no]) AC_LANG_POP]) if test yes != "$lt_cv_cc_needs_belf"; then # this is probably gcc 2.8.0, egcs 1.0 or newer; no need for -belf CFLAGS=$SAVE_CFLAGS fi ;; *-*solaris*) # Find out what ABI is being produced by ac_compile, and set linker # options accordingly. echo 'int i;' > conftest.$ac_ext if AC_TRY_EVAL(ac_compile); then case `$FILECMD conftest.o` in *64-bit*) case $lt_cv_prog_gnu_ld in yes*) case $host in i?86-*-solaris*|x86_64-*-solaris*) LD="${LD-ld} -m elf_x86_64" ;; sparc*-*-solaris*) LD="${LD-ld} -m elf64_sparc" ;; esac # GNU ld 2.21 introduced _sol2 emulations. Use them if available. if ${LD-ld} -V | grep _sol2 >/dev/null 2>&1; then LD=${LD-ld}_sol2 fi ;; *) if ${LD-ld} -64 -r -o conftest2.o conftest.o >/dev/null 2>&1; then LD="${LD-ld} -64" fi ;; esac ;; esac fi rm -rf conftest* ;; esac need_locks=$enable_libtool_lock ])# _LT_ENABLE_LOCK # _LT_PROG_AR # ----------- m4_defun([_LT_PROG_AR], [AC_CHECK_TOOLS(AR, [ar], false) : ${AR=ar} _LT_DECL([], [AR], [1], [The archiver]) # Use ARFLAGS variable as AR's operation code to sync the variable naming with # Automake. If both AR_FLAGS and ARFLAGS are specified, AR_FLAGS should have # higher priority because thats what people were doing historically (setting # ARFLAGS for automake and AR_FLAGS for libtool). FIXME: Make the AR_FLAGS # variable obsoleted/removed. test ${AR_FLAGS+y} || AR_FLAGS=${ARFLAGS-cr} lt_ar_flags=$AR_FLAGS _LT_DECL([], [lt_ar_flags], [0], [Flags to create an archive (by configure)]) # Make AR_FLAGS overridable by 'make ARFLAGS='. Don't try to run-time override # by AR_FLAGS because that was never working and AR_FLAGS is about to die. _LT_DECL([], [AR_FLAGS], [\@S|@{ARFLAGS-"\@S|@lt_ar_flags"}], [Flags to create an archive]) AC_CACHE_CHECK([for archiver @FILE support], [lt_cv_ar_at_file], [lt_cv_ar_at_file=no AC_COMPILE_IFELSE([AC_LANG_PROGRAM], [echo conftest.$ac_objext > conftest.lst lt_ar_try='$AR $AR_FLAGS libconftest.a @conftest.lst >&AS_MESSAGE_LOG_FD' AC_TRY_EVAL([lt_ar_try]) if test 0 -eq "$ac_status"; then # Ensure the archiver fails upon bogus file names. rm -f conftest.$ac_objext libconftest.a AC_TRY_EVAL([lt_ar_try]) if test 0 -ne "$ac_status"; then lt_cv_ar_at_file=@ fi fi rm -f conftest.* libconftest.a ]) ]) if test no = "$lt_cv_ar_at_file"; then archiver_list_spec= else archiver_list_spec=$lt_cv_ar_at_file fi _LT_DECL([], [archiver_list_spec], [1], [How to feed a file listing to the archiver]) ])# _LT_PROG_AR # _LT_CMD_OLD_ARCHIVE # ------------------- m4_defun([_LT_CMD_OLD_ARCHIVE], [_LT_PROG_AR AC_CHECK_TOOL(STRIP, strip, :) test -z "$STRIP" && STRIP=: _LT_DECL([], [STRIP], [1], [A symbol stripping program]) AC_CHECK_TOOL(RANLIB, ranlib, :) test -z "$RANLIB" && RANLIB=: _LT_DECL([], [RANLIB], [1], [Commands used to install an old-style archive]) # Determine commands to create old-style static archives. old_archive_cmds='$AR $AR_FLAGS $oldlib$oldobjs' old_postinstall_cmds='chmod 644 $oldlib' old_postuninstall_cmds= if test -n "$RANLIB"; then case $host_os in bitrig* | openbsd*) old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB -t \$tool_oldlib" ;; *) old_postinstall_cmds="$old_postinstall_cmds~\$RANLIB \$tool_oldlib" ;; esac old_archive_cmds="$old_archive_cmds~\$RANLIB \$tool_oldlib" fi case $host_os in darwin*) lock_old_archive_extraction=yes ;; *) lock_old_archive_extraction=no ;; esac _LT_DECL([], [old_postinstall_cmds], [2]) _LT_DECL([], [old_postuninstall_cmds], [2]) _LT_TAGDECL([], [old_archive_cmds], [2], [Commands used to build an old-style archive]) _LT_DECL([], [lock_old_archive_extraction], [0], [Whether to use a lock for old archive extraction]) ])# _LT_CMD_OLD_ARCHIVE # _LT_COMPILER_OPTION(MESSAGE, VARIABLE-NAME, FLAGS, # [OUTPUT-FILE], [ACTION-SUCCESS], [ACTION-FAILURE]) # ---------------------------------------------------------------- # Check whether the given compiler option works AC_DEFUN([_LT_COMPILER_OPTION], [m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_DECL_SED])dnl AC_CACHE_CHECK([$1], [$2], [$2=no m4_if([$4], , [ac_outfile=conftest.$ac_objext], [ac_outfile=$4]) echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="$3" ## exclude from sc_useless_quotes_in_assignment # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. # The option is referenced via a variable to avoid confusing sed. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [[^ ]]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&AS_MESSAGE_LOG_FD) (eval "$lt_compile" 2>conftest.err) ac_status=$? cat conftest.err >&AS_MESSAGE_LOG_FD echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD if (exit $ac_status) && test -s "$ac_outfile"; then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings other than the usual output. $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' >conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if test ! -s conftest.er2 || diff conftest.exp conftest.er2 >/dev/null; then $2=yes fi fi $RM conftest* ]) if test yes = "[$]$2"; then m4_if([$5], , :, [$5]) else m4_if([$6], , :, [$6]) fi ])# _LT_COMPILER_OPTION # Old name: AU_ALIAS([AC_LIBTOOL_COMPILER_OPTION], [_LT_COMPILER_OPTION]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_COMPILER_OPTION], []) # _LT_LINKER_OPTION(MESSAGE, VARIABLE-NAME, FLAGS, # [ACTION-SUCCESS], [ACTION-FAILURE]) # ---------------------------------------------------- # Check whether the given linker option works AC_DEFUN([_LT_LINKER_OPTION], [m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_DECL_SED])dnl AC_CACHE_CHECK([$1], [$2], [$2=no save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS $3" echo "$lt_simple_link_test_code" > conftest.$ac_ext if (eval $ac_link 2>conftest.err) && test -s conftest$ac_exeext; then # The linker can only warn and ignore the option if not recognized # So say no if there are warnings if test -s conftest.err; then # Append any errors to the config.log. cat conftest.err 1>&AS_MESSAGE_LOG_FD $ECHO "$_lt_linker_boilerplate" | $SED '/^$/d' > conftest.exp $SED '/^$/d; /^ *+/d' conftest.err >conftest.er2 if diff conftest.exp conftest.er2 >/dev/null; then $2=yes fi else $2=yes fi fi $RM -r conftest* LDFLAGS=$save_LDFLAGS ]) if test yes = "[$]$2"; then m4_if([$4], , :, [$4]) else m4_if([$5], , :, [$5]) fi ])# _LT_LINKER_OPTION # Old name: AU_ALIAS([AC_LIBTOOL_LINKER_OPTION], [_LT_LINKER_OPTION]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_LINKER_OPTION], []) # LT_CMD_MAX_LEN #--------------- AC_DEFUN([LT_CMD_MAX_LEN], [AC_REQUIRE([AC_CANONICAL_HOST])dnl # find the maximum length of command line arguments AC_MSG_CHECKING([the maximum length of command line arguments]) AC_CACHE_VAL([lt_cv_sys_max_cmd_len], [dnl i=0 teststring=ABCD case $build_os in msdosdjgpp*) # On DJGPP, this test can blow up pretty badly due to problems in libc # (any single argument exceeding 2000 bytes causes a buffer overrun # during glob expansion). Even if it were fixed, the result of this # check would be larger than it should be. lt_cv_sys_max_cmd_len=12288; # 12K is about right ;; gnu*) # Under GNU Hurd, this test is not required because there is # no limit to the length of command line arguments. # Libtool will interpret -1 as no limit whatsoever lt_cv_sys_max_cmd_len=-1; ;; cygwin* | mingw* | cegcc*) # On Win9x/ME, this test blows up -- it succeeds, but takes # about 5 minutes as the teststring grows exponentially. # Worse, since 9x/ME are not pre-emptively multitasking, # you end up with a "frozen" computer, even though with patience # the test eventually succeeds (with a max line length of 256k). # Instead, let's just punt: use the minimum linelength reported by # all of the supported platforms: 8192 (on NT/2K/XP). lt_cv_sys_max_cmd_len=8192; ;; mint*) # On MiNT this can take a long time and run out of memory. lt_cv_sys_max_cmd_len=8192; ;; amigaos*) # On AmigaOS with pdksh, this test takes hours, literally. # So we just punt and use a minimum line length of 8192. lt_cv_sys_max_cmd_len=8192; ;; bitrig* | darwin* | dragonfly* | freebsd* | midnightbsd* | netbsd* | openbsd*) # This has been around since 386BSD, at least. Likely further. if test -x /sbin/sysctl; then lt_cv_sys_max_cmd_len=`/sbin/sysctl -n kern.argmax` elif test -x /usr/sbin/sysctl; then lt_cv_sys_max_cmd_len=`/usr/sbin/sysctl -n kern.argmax` else lt_cv_sys_max_cmd_len=65536 # usable default for all BSDs fi # And add a safety zone lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4` lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3` ;; interix*) # We know the value 262144 and hardcode it with a safety zone (like BSD) lt_cv_sys_max_cmd_len=196608 ;; os2*) # The test takes a long time on OS/2. lt_cv_sys_max_cmd_len=8192 ;; osf*) # Dr. Hans Ekkehard Plesser reports seeing a kernel panic running configure # due to this test when exec_disable_arg_limit is 1 on Tru64. It is not # nice to cause kernel panics so lets avoid the loop below. # First set a reasonable default. lt_cv_sys_max_cmd_len=16384 # if test -x /sbin/sysconfig; then case `/sbin/sysconfig -q proc exec_disable_arg_limit` in *1*) lt_cv_sys_max_cmd_len=-1 ;; esac fi ;; sco3.2v5*) lt_cv_sys_max_cmd_len=102400 ;; sysv5* | sco5v6* | sysv4.2uw2*) kargmax=`grep ARG_MAX /etc/conf/cf.d/stune 2>/dev/null` if test -n "$kargmax"; then lt_cv_sys_max_cmd_len=`echo $kargmax | $SED 's/.*[[ ]]//'` else lt_cv_sys_max_cmd_len=32768 fi ;; *) lt_cv_sys_max_cmd_len=`(getconf ARG_MAX) 2> /dev/null` if test -n "$lt_cv_sys_max_cmd_len" && \ test undefined != "$lt_cv_sys_max_cmd_len"; then lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 4` lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \* 3` else # Make teststring a little bigger before we do anything with it. # a 1K string should be a reasonable start. for i in 1 2 3 4 5 6 7 8; do teststring=$teststring$teststring done SHELL=${SHELL-${CONFIG_SHELL-/bin/sh}} # If test is not a shell built-in, we'll probably end up computing a # maximum length that is only half of the actual maximum length, but # we can't tell. while { test X`env echo "$teststring$teststring" 2>/dev/null` \ = "X$teststring$teststring"; } >/dev/null 2>&1 && test 17 != "$i" # 1/2 MB should be enough do i=`expr $i + 1` teststring=$teststring$teststring done # Only check the string length outside the loop. lt_cv_sys_max_cmd_len=`expr "X$teststring" : ".*" 2>&1` teststring= # Add a significant safety factor because C++ compilers can tack on # massive amounts of additional arguments before passing them to the # linker. It appears as though 1/2 is a usable value. lt_cv_sys_max_cmd_len=`expr $lt_cv_sys_max_cmd_len \/ 2` fi ;; esac ]) if test -n "$lt_cv_sys_max_cmd_len"; then AC_MSG_RESULT($lt_cv_sys_max_cmd_len) else AC_MSG_RESULT(none) fi max_cmd_len=$lt_cv_sys_max_cmd_len _LT_DECL([], [max_cmd_len], [0], [What is the maximum length of a command?]) ])# LT_CMD_MAX_LEN # Old name: AU_ALIAS([AC_LIBTOOL_SYS_MAX_CMD_LEN], [LT_CMD_MAX_LEN]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_SYS_MAX_CMD_LEN], []) # _LT_HEADER_DLFCN # ---------------- m4_defun([_LT_HEADER_DLFCN], [AC_CHECK_HEADERS([dlfcn.h], [], [], [AC_INCLUDES_DEFAULT])dnl ])# _LT_HEADER_DLFCN # _LT_TRY_DLOPEN_SELF (ACTION-IF-TRUE, ACTION-IF-TRUE-W-USCORE, # ACTION-IF-FALSE, ACTION-IF-CROSS-COMPILING) # ---------------------------------------------------------------- m4_defun([_LT_TRY_DLOPEN_SELF], [m4_require([_LT_HEADER_DLFCN])dnl if test yes = "$cross_compiling"; then : [$4] else lt_dlunknown=0; lt_dlno_uscore=1; lt_dlneed_uscore=2 lt_status=$lt_dlunknown cat > conftest.$ac_ext <<_LT_EOF [#line $LINENO "configure" #include "confdefs.h" #if HAVE_DLFCN_H #include #endif #include #ifdef RTLD_GLOBAL # define LT_DLGLOBAL RTLD_GLOBAL #else # ifdef DL_GLOBAL # define LT_DLGLOBAL DL_GLOBAL # else # define LT_DLGLOBAL 0 # endif #endif /* We may have to define LT_DLLAZY_OR_NOW in the command line if we find out it does not work in some platform. */ #ifndef LT_DLLAZY_OR_NOW # ifdef RTLD_LAZY # define LT_DLLAZY_OR_NOW RTLD_LAZY # else # ifdef DL_LAZY # define LT_DLLAZY_OR_NOW DL_LAZY # else # ifdef RTLD_NOW # define LT_DLLAZY_OR_NOW RTLD_NOW # else # ifdef DL_NOW # define LT_DLLAZY_OR_NOW DL_NOW # else # define LT_DLLAZY_OR_NOW 0 # endif # endif # endif # endif #endif /* When -fvisibility=hidden is used, assume the code has been annotated correspondingly for the symbols needed. */ #if defined __GNUC__ && (((__GNUC__ == 3) && (__GNUC_MINOR__ >= 3)) || (__GNUC__ > 3)) int fnord () __attribute__((visibility("default"))); #endif int fnord () { return 42; } int main () { void *self = dlopen (0, LT_DLGLOBAL|LT_DLLAZY_OR_NOW); int status = $lt_dlunknown; if (self) { if (dlsym (self,"fnord")) status = $lt_dlno_uscore; else { if (dlsym( self,"_fnord")) status = $lt_dlneed_uscore; else puts (dlerror ()); } /* dlclose (self); */ } else puts (dlerror ()); return status; }] _LT_EOF if AC_TRY_EVAL(ac_link) && test -s "conftest$ac_exeext" 2>/dev/null; then (./conftest; exit; ) >&AS_MESSAGE_LOG_FD 2>/dev/null lt_status=$? case x$lt_status in x$lt_dlno_uscore) $1 ;; x$lt_dlneed_uscore) $2 ;; x$lt_dlunknown|x*) $3 ;; esac else : # compilation failed $3 fi fi rm -fr conftest* ])# _LT_TRY_DLOPEN_SELF # LT_SYS_DLOPEN_SELF # ------------------ AC_DEFUN([LT_SYS_DLOPEN_SELF], [m4_require([_LT_HEADER_DLFCN])dnl if test yes != "$enable_dlopen"; then enable_dlopen=unknown enable_dlopen_self=unknown enable_dlopen_self_static=unknown else lt_cv_dlopen=no lt_cv_dlopen_libs= case $host_os in beos*) lt_cv_dlopen=load_add_on lt_cv_dlopen_libs= lt_cv_dlopen_self=yes ;; mingw* | pw32* | cegcc*) lt_cv_dlopen=LoadLibrary lt_cv_dlopen_libs= ;; cygwin*) lt_cv_dlopen=dlopen lt_cv_dlopen_libs= ;; darwin*) # if libdl is installed we need to link against it AC_CHECK_LIB([dl], [dlopen], [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl],[ lt_cv_dlopen=dyld lt_cv_dlopen_libs= lt_cv_dlopen_self=yes ]) ;; tpf*) # Don't try to run any link tests for TPF. We know it's impossible # because TPF is a cross-compiler, and we know how we open DSOs. lt_cv_dlopen=dlopen lt_cv_dlopen_libs= lt_cv_dlopen_self=no ;; *) AC_CHECK_FUNC([shl_load], [lt_cv_dlopen=shl_load], [AC_CHECK_LIB([dld], [shl_load], [lt_cv_dlopen=shl_load lt_cv_dlopen_libs=-ldld], [AC_CHECK_FUNC([dlopen], [lt_cv_dlopen=dlopen], [AC_CHECK_LIB([dl], [dlopen], [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-ldl], [AC_CHECK_LIB([svld], [dlopen], [lt_cv_dlopen=dlopen lt_cv_dlopen_libs=-lsvld], [AC_CHECK_LIB([dld], [dld_link], [lt_cv_dlopen=dld_link lt_cv_dlopen_libs=-ldld]) ]) ]) ]) ]) ]) ;; esac if test no = "$lt_cv_dlopen"; then enable_dlopen=no else enable_dlopen=yes fi case $lt_cv_dlopen in dlopen) save_CPPFLAGS=$CPPFLAGS test yes = "$ac_cv_header_dlfcn_h" && CPPFLAGS="$CPPFLAGS -DHAVE_DLFCN_H" save_LDFLAGS=$LDFLAGS wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $export_dynamic_flag_spec\" save_LIBS=$LIBS LIBS="$lt_cv_dlopen_libs $LIBS" AC_CACHE_CHECK([whether a program can dlopen itself], lt_cv_dlopen_self, [dnl _LT_TRY_DLOPEN_SELF( lt_cv_dlopen_self=yes, lt_cv_dlopen_self=yes, lt_cv_dlopen_self=no, lt_cv_dlopen_self=cross) ]) if test yes = "$lt_cv_dlopen_self"; then wl=$lt_prog_compiler_wl eval LDFLAGS=\"\$LDFLAGS $lt_prog_compiler_static\" AC_CACHE_CHECK([whether a statically linked program can dlopen itself], lt_cv_dlopen_self_static, [dnl _LT_TRY_DLOPEN_SELF( lt_cv_dlopen_self_static=yes, lt_cv_dlopen_self_static=yes, lt_cv_dlopen_self_static=no, lt_cv_dlopen_self_static=cross) ]) fi CPPFLAGS=$save_CPPFLAGS LDFLAGS=$save_LDFLAGS LIBS=$save_LIBS ;; esac case $lt_cv_dlopen_self in yes|no) enable_dlopen_self=$lt_cv_dlopen_self ;; *) enable_dlopen_self=unknown ;; esac case $lt_cv_dlopen_self_static in yes|no) enable_dlopen_self_static=$lt_cv_dlopen_self_static ;; *) enable_dlopen_self_static=unknown ;; esac fi _LT_DECL([dlopen_support], [enable_dlopen], [0], [Whether dlopen is supported]) _LT_DECL([dlopen_self], [enable_dlopen_self], [0], [Whether dlopen of programs is supported]) _LT_DECL([dlopen_self_static], [enable_dlopen_self_static], [0], [Whether dlopen of statically linked programs is supported]) ])# LT_SYS_DLOPEN_SELF # Old name: AU_ALIAS([AC_LIBTOOL_DLOPEN_SELF], [LT_SYS_DLOPEN_SELF]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_DLOPEN_SELF], []) # _LT_COMPILER_C_O([TAGNAME]) # --------------------------- # Check to see if options -c and -o are simultaneously supported by compiler. # This macro does not hard code the compiler like AC_PROG_CC_C_O. m4_defun([_LT_COMPILER_C_O], [m4_require([_LT_DECL_SED])dnl m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_TAG_COMPILER])dnl AC_CACHE_CHECK([if $compiler supports -c -o file.$ac_objext], [_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)], [_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=no $RM -r conftest 2>/dev/null mkdir conftest cd conftest mkdir out echo "$lt_simple_compile_test_code" > conftest.$ac_ext lt_compiler_flag="-o out/conftest2.$ac_objext" # Insert the option either (1) after the last *FLAGS variable, or # (2) before a word containing "conftest.", or (3) at the end. # Note that $ac_compile itself does not contain backslashes and begins # with a dollar sign (not a hyphen), so the echo should work correctly. lt_compile=`echo "$ac_compile" | $SED \ -e 's:.*FLAGS}\{0,1\} :&$lt_compiler_flag :; t' \ -e 's: [[^ ]]*conftest\.: $lt_compiler_flag&:; t' \ -e 's:$: $lt_compiler_flag:'` (eval echo "\"\$as_me:$LINENO: $lt_compile\"" >&AS_MESSAGE_LOG_FD) (eval "$lt_compile" 2>out/conftest.err) ac_status=$? cat out/conftest.err >&AS_MESSAGE_LOG_FD echo "$as_me:$LINENO: \$? = $ac_status" >&AS_MESSAGE_LOG_FD if (exit $ac_status) && test -s out/conftest2.$ac_objext then # The compiler can only warn and ignore the option if not recognized # So say no if there are warnings $ECHO "$_lt_compiler_boilerplate" | $SED '/^$/d' > out/conftest.exp $SED '/^$/d; /^ *+/d' out/conftest.err >out/conftest.er2 if test ! -s out/conftest.er2 || diff out/conftest.exp out/conftest.er2 >/dev/null; then _LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=yes fi fi chmod u+w . 2>&AS_MESSAGE_LOG_FD $RM conftest* # SGI C++ compiler will create directory out/ii_files/ for # template instantiation test -d out/ii_files && $RM out/ii_files/* && rmdir out/ii_files $RM out/* && rmdir out cd .. $RM -r conftest $RM conftest* ]) _LT_TAGDECL([compiler_c_o], [lt_cv_prog_compiler_c_o], [1], [Does compiler simultaneously support -c and -o options?]) ])# _LT_COMPILER_C_O # _LT_COMPILER_FILE_LOCKS([TAGNAME]) # ---------------------------------- # Check to see if we can do hard links to lock some files if needed m4_defun([_LT_COMPILER_FILE_LOCKS], [m4_require([_LT_ENABLE_LOCK])dnl m4_require([_LT_FILEUTILS_DEFAULTS])dnl _LT_COMPILER_C_O([$1]) hard_links=nottested if test no = "$_LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)" && test no != "$need_locks"; then # do not overwrite the value of need_locks provided by the user AC_MSG_CHECKING([if we can lock with hard links]) hard_links=yes $RM conftest* ln conftest.a conftest.b 2>/dev/null && hard_links=no touch conftest.a ln conftest.a conftest.b 2>&5 || hard_links=no ln conftest.a conftest.b 2>/dev/null && hard_links=no AC_MSG_RESULT([$hard_links]) if test no = "$hard_links"; then AC_MSG_WARN(['$CC' does not support '-c -o', so 'make -j' may be unsafe]) need_locks=warn fi else need_locks=no fi _LT_DECL([], [need_locks], [1], [Must we lock files when doing compilation?]) ])# _LT_COMPILER_FILE_LOCKS # _LT_CHECK_OBJDIR # ---------------- m4_defun([_LT_CHECK_OBJDIR], [AC_CACHE_CHECK([for objdir], [lt_cv_objdir], [rm -f .libs 2>/dev/null mkdir .libs 2>/dev/null if test -d .libs; then lt_cv_objdir=.libs else # MS-DOS does not allow filenames that begin with a dot. lt_cv_objdir=_libs fi rmdir .libs 2>/dev/null]) objdir=$lt_cv_objdir _LT_DECL([], [objdir], [0], [The name of the directory that contains temporary libtool files])dnl m4_pattern_allow([LT_OBJDIR])dnl AC_DEFINE_UNQUOTED([LT_OBJDIR], "$lt_cv_objdir/", [Define to the sub-directory where libtool stores uninstalled libraries.]) ])# _LT_CHECK_OBJDIR # _LT_LINKER_HARDCODE_LIBPATH([TAGNAME]) # -------------------------------------- # Check hardcoding attributes. m4_defun([_LT_LINKER_HARDCODE_LIBPATH], [AC_MSG_CHECKING([how to hardcode library paths into programs]) _LT_TAGVAR(hardcode_action, $1)= if test -n "$_LT_TAGVAR(hardcode_libdir_flag_spec, $1)" || test -n "$_LT_TAGVAR(runpath_var, $1)" || test yes = "$_LT_TAGVAR(hardcode_automatic, $1)"; then # We can hardcode non-existent directories. if test no != "$_LT_TAGVAR(hardcode_direct, $1)" && # If the only mechanism to avoid hardcoding is shlibpath_var, we # have to relink, otherwise we might link with an installed library # when we should be linking with a yet-to-be-installed one ## test no != "$_LT_TAGVAR(hardcode_shlibpath_var, $1)" && test no != "$_LT_TAGVAR(hardcode_minus_L, $1)"; then # Linking always hardcodes the temporary library directory. _LT_TAGVAR(hardcode_action, $1)=relink else # We can link without hardcoding, and we can hardcode nonexisting dirs. _LT_TAGVAR(hardcode_action, $1)=immediate fi else # We cannot hardcode anything, or else we can only hardcode existing # directories. _LT_TAGVAR(hardcode_action, $1)=unsupported fi AC_MSG_RESULT([$_LT_TAGVAR(hardcode_action, $1)]) if test relink = "$_LT_TAGVAR(hardcode_action, $1)" || test yes = "$_LT_TAGVAR(inherit_rpath, $1)"; then # Fast installation is not supported enable_fast_install=no elif test yes = "$shlibpath_overrides_runpath" || test no = "$enable_shared"; then # Fast installation is not necessary enable_fast_install=needless fi _LT_TAGDECL([], [hardcode_action], [0], [How to hardcode a shared library path into an executable]) ])# _LT_LINKER_HARDCODE_LIBPATH # _LT_CMD_STRIPLIB # ---------------- m4_defun([_LT_CMD_STRIPLIB], [m4_require([_LT_DECL_EGREP]) striplib= old_striplib= AC_MSG_CHECKING([whether stripping libraries is possible]) if test -z "$STRIP"; then AC_MSG_RESULT([no]) else if $STRIP -V 2>&1 | $GREP "GNU strip" >/dev/null; then old_striplib="$STRIP --strip-debug" striplib="$STRIP --strip-unneeded" AC_MSG_RESULT([yes]) else case $host_os in darwin*) # FIXME - insert some real tests, host_os isn't really good enough striplib="$STRIP -x" old_striplib="$STRIP -S" AC_MSG_RESULT([yes]) ;; freebsd*) if $STRIP -V 2>&1 | $GREP "elftoolchain" >/dev/null; then old_striplib="$STRIP --strip-debug" striplib="$STRIP --strip-unneeded" AC_MSG_RESULT([yes]) else AC_MSG_RESULT([no]) fi ;; *) AC_MSG_RESULT([no]) ;; esac fi fi _LT_DECL([], [old_striplib], [1], [Commands to strip libraries]) _LT_DECL([], [striplib], [1]) ])# _LT_CMD_STRIPLIB # _LT_PREPARE_MUNGE_PATH_LIST # --------------------------- # Make sure func_munge_path_list() is defined correctly. m4_defun([_LT_PREPARE_MUNGE_PATH_LIST], [[# func_munge_path_list VARIABLE PATH # ----------------------------------- # VARIABLE is name of variable containing _space_ separated list of # directories to be munged by the contents of PATH, which is string # having a format: # "DIR[:DIR]:" # string "DIR[ DIR]" will be prepended to VARIABLE # ":DIR[:DIR]" # string "DIR[ DIR]" will be appended to VARIABLE # "DIRP[:DIRP]::[DIRA:]DIRA" # string "DIRP[ DIRP]" will be prepended to VARIABLE and string # "DIRA[ DIRA]" will be appended to VARIABLE # "DIR[:DIR]" # VARIABLE will be replaced by "DIR[ DIR]" func_munge_path_list () { case x@S|@2 in x) ;; *:) eval @S|@1=\"`$ECHO @S|@2 | $SED 's/:/ /g'` \@S|@@S|@1\" ;; x:*) eval @S|@1=\"\@S|@@S|@1 `$ECHO @S|@2 | $SED 's/:/ /g'`\" ;; *::*) eval @S|@1=\"\@S|@@S|@1\ `$ECHO @S|@2 | $SED -e 's/.*:://' -e 's/:/ /g'`\" eval @S|@1=\"`$ECHO @S|@2 | $SED -e 's/::.*//' -e 's/:/ /g'`\ \@S|@@S|@1\" ;; *) eval @S|@1=\"`$ECHO @S|@2 | $SED 's/:/ /g'`\" ;; esac } ]])# _LT_PREPARE_PATH_LIST # _LT_SYS_DYNAMIC_LINKER([TAG]) # ----------------------------- # PORTME Fill in your ld.so characteristics m4_defun([_LT_SYS_DYNAMIC_LINKER], [AC_REQUIRE([AC_CANONICAL_HOST])dnl m4_require([_LT_DECL_EGREP])dnl m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_DECL_OBJDUMP])dnl m4_require([_LT_DECL_SED])dnl m4_require([_LT_CHECK_SHELL_FEATURES])dnl m4_require([_LT_PREPARE_MUNGE_PATH_LIST])dnl AC_MSG_CHECKING([dynamic linker characteristics]) m4_if([$1], [], [ if test yes = "$GCC"; then case $host_os in darwin*) lt_awk_arg='/^libraries:/,/LR/' ;; *) lt_awk_arg='/^libraries:/' ;; esac case $host_os in mingw* | cegcc*) lt_sed_strip_eq='s|=\([[A-Za-z]]:\)|\1|g' ;; *) lt_sed_strip_eq='s|=/|/|g' ;; esac lt_search_path_spec=`$CC -print-search-dirs | awk $lt_awk_arg | $SED -e "s/^libraries://" -e $lt_sed_strip_eq` case $lt_search_path_spec in *\;*) # if the path contains ";" then we assume it to be the separator # otherwise default to the standard path separator (i.e. ":") - it is # assumed that no part of a normal pathname contains ";" but that should # okay in the real world where ";" in dirpaths is itself problematic. lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED 's/;/ /g'` ;; *) lt_search_path_spec=`$ECHO "$lt_search_path_spec" | $SED "s/$PATH_SEPARATOR/ /g"` ;; esac # Ok, now we have the path, separated by spaces, we can step through it # and add multilib dir if necessary... lt_tmp_lt_search_path_spec= lt_multi_os_dir=/`$CC $CPPFLAGS $CFLAGS $LDFLAGS -print-multi-os-directory 2>/dev/null` # ...but if some path component already ends with the multilib dir we assume # that all is fine and trust -print-search-dirs as is (GCC 4.2? or newer). case "$lt_multi_os_dir; $lt_search_path_spec " in "/; "* | "/.; "* | "/./; "* | *"$lt_multi_os_dir "* | *"$lt_multi_os_dir/ "*) lt_multi_os_dir= ;; esac for lt_sys_path in $lt_search_path_spec; do if test -d "$lt_sys_path$lt_multi_os_dir"; then lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path$lt_multi_os_dir" elif test -n "$lt_multi_os_dir"; then test -d "$lt_sys_path" && \ lt_tmp_lt_search_path_spec="$lt_tmp_lt_search_path_spec $lt_sys_path" fi done lt_search_path_spec=`$ECHO "$lt_tmp_lt_search_path_spec" | awk ' BEGIN {RS = " "; FS = "/|\n";} { lt_foo = ""; lt_count = 0; for (lt_i = NF; lt_i > 0; lt_i--) { if ($lt_i != "" && $lt_i != ".") { if ($lt_i == "..") { lt_count++; } else { if (lt_count == 0) { lt_foo = "/" $lt_i lt_foo; } else { lt_count--; } } } } if (lt_foo != "") { lt_freq[[lt_foo]]++; } if (lt_freq[[lt_foo]] == 1) { print lt_foo; } }'` # AWK program above erroneously prepends '/' to C:/dos/paths # for these hosts. case $host_os in mingw* | cegcc*) lt_search_path_spec=`$ECHO "$lt_search_path_spec" |\ $SED 's|/\([[A-Za-z]]:\)|\1|g'` ;; esac sys_lib_search_path_spec=`$ECHO "$lt_search_path_spec" | $lt_NL2SP` else sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib" fi]) library_names_spec= libname_spec='lib$name' soname_spec= shrext_cmds=.so postinstall_cmds= postuninstall_cmds= finish_cmds= finish_eval= shlibpath_var= shlibpath_overrides_runpath=unknown version_type=none dynamic_linker="$host_os ld.so" sys_lib_dlsearch_path_spec="/lib /usr/lib" need_lib_prefix=unknown hardcode_into_libs=no # when you set need_version to no, make sure it does not cause -set_version # flags to be left without arguments need_version=unknown AC_ARG_VAR([LT_SYS_LIBRARY_PATH], [User-defined run-time library search path.]) case $host_os in aix3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname.a' shlibpath_var=LIBPATH # AIX 3 has no versioning support, so we append a major version to the name. soname_spec='$libname$release$shared_ext$major' ;; aix[[4-9]]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no hardcode_into_libs=yes if test ia64 = "$host_cpu"; then # AIX 5 supports IA64 library_names_spec='$libname$release$shared_ext$major $libname$release$shared_ext$versuffix $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH else # With GCC up to 2.95.x, collect2 would create an import file # for dependence libraries. The import file would start with # the line '#! .'. This would cause the generated library to # depend on '.', always an invalid library. This was fixed in # development snapshots of GCC prior to 3.0. case $host_os in aix4 | aix4.[[01]] | aix4.[[01]].*) if { echo '#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 97)' echo ' yes ' echo '#endif'; } | $CC -E - | $GREP yes > /dev/null; then : else can_build_shared=no fi ;; esac # Using Import Files as archive members, it is possible to support # filename-based versioning of shared library archives on AIX. While # this would work for both with and without runtime linking, it will # prevent static linking of such archives. So we do filename-based # shared library versioning with .so extension only, which is used # when both runtime linking and shared linking is enabled. # Unfortunately, runtime linking may impact performance, so we do # not want this to be the default eventually. Also, we use the # versioned .so libs for executables only if there is the -brtl # linker flag in LDFLAGS as well, or --with-aix-soname=svr4 only. # To allow for filename-based versioning support, we need to create # libNAME.so.V as an archive file, containing: # *) an Import File, referring to the versioned filename of the # archive as well as the shared archive member, telling the # bitwidth (32 or 64) of that shared object, and providing the # list of exported symbols of that shared object, eventually # decorated with the 'weak' keyword # *) the shared object with the F_LOADONLY flag set, to really avoid # it being seen by the linker. # At run time we better use the real file rather than another symlink, # but for link time we create the symlink libNAME.so -> libNAME.so.V case $with_aix_soname,$aix_use_runtimelinking in # AIX (on Power*) has no versioning support, so currently we cannot hardcode correct # soname into executable. Probably we can add versioning support to # collect2, so additional links can be useful in future. aix,yes) # traditional libtool dynamic_linker='AIX unversionable lib.so' # If using run time linking (on AIX 4.2 or later) use lib.so # instead of lib.a to let people know that these are not # typical AIX shared libraries. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; aix,no) # traditional AIX only dynamic_linker='AIX lib.a[(]lib.so.V[)]' # We preserve .a as extension for shared libraries through AIX4.2 # and later when we are not doing run time linking. library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' ;; svr4,*) # full svr4 only dynamic_linker="AIX lib.so.V[(]$shared_archive_member_spec.o[)]" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,yes) # both, prefer svr4 dynamic_linker="AIX lib.so.V[(]$shared_archive_member_spec.o[)], lib.a[(]lib.so.V[)]" library_names_spec='$libname$release$shared_ext$major $libname$shared_ext' # unpreferred sharedlib libNAME.a needs extra handling postinstall_cmds='test -n "$linkname" || linkname="$realname"~func_stripname "" ".so" "$linkname"~$install_shared_prog "$dir/$func_stripname_result.$libext" "$destdir/$func_stripname_result.$libext"~test -z "$tstripme" || test -z "$striplib" || $striplib "$destdir/$func_stripname_result.$libext"' postuninstall_cmds='for n in $library_names $old_library; do :; done~func_stripname "" ".so" "$n"~test "$func_stripname_result" = "$n" || func_append rmfiles " $odir/$func_stripname_result.$libext"' # We do not specify a path in Import Files, so LIBPATH fires. shlibpath_overrides_runpath=yes ;; *,no) # both, prefer aix dynamic_linker="AIX lib.a[(]lib.so.V[)], lib.so.V[(]$shared_archive_member_spec.o[)]" library_names_spec='$libname$release.a $libname.a' soname_spec='$libname$release$shared_ext$major' # unpreferred sharedlib libNAME.so.V and symlink libNAME.so need extra handling postinstall_cmds='test -z "$dlname" || $install_shared_prog $dir/$dlname $destdir/$dlname~test -z "$tstripme" || test -z "$striplib" || $striplib $destdir/$dlname~test -n "$linkname" || linkname=$realname~func_stripname "" ".a" "$linkname"~(cd "$destdir" && $LN_S -f $dlname $func_stripname_result.so)' postuninstall_cmds='test -z "$dlname" || func_append rmfiles " $odir/$dlname"~for n in $old_library $library_names; do :; done~func_stripname "" ".a" "$n"~func_append rmfiles " $odir/$func_stripname_result.so"' ;; esac shlibpath_var=LIBPATH fi ;; amigaos*) case $host_cpu in powerpc) # Since July 2007 AmigaOS4 officially supports .so libraries. # When compiling the executable, add -use-dynld -Lsobjs: to the compileline. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' ;; m68k) library_names_spec='$libname.ixlibrary $libname.a' # Create ${libname}_ixlibrary.a entries in /sys/libs. finish_eval='for lib in `ls $libdir/*.ixlibrary 2>/dev/null`; do libname=`func_echo_all "$lib" | $SED '\''s%^.*/\([[^/]]*\)\.ixlibrary$%\1%'\''`; $RM /sys/libs/${libname}_ixlibrary.a; $show "cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a"; cd /sys/libs && $LN_S $lib ${libname}_ixlibrary.a || exit 1; done' ;; esac ;; beos*) library_names_spec='$libname$shared_ext' dynamic_linker="$host_os ld.so" shlibpath_var=LIBRARY_PATH ;; bsdi[[45]]*) version_type=linux # correct to gnu/linux during the next big refactor need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/shlib /usr/lib /usr/X11/lib /usr/contrib/lib /lib /usr/local/lib" sys_lib_dlsearch_path_spec="/shlib /usr/lib /usr/local/lib" # the default ld.so.conf also contains /usr/contrib/lib and # /usr/X11R6/lib (/usr/X11 is a link to /usr/X11R6), but let us allow # libtool to hard-code these into programs ;; cygwin* | mingw* | pw32* | cegcc*) version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no case $GCC,$cc_basename in yes,*) # gcc library_names_spec='$libname.dll.a' # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes case $host_os in cygwin*) # Cygwin DLLs use 'cyg' prefix rather than 'lib' soname_spec='`echo $libname | $SED -e 's/^lib/cyg/'``echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext' m4_if([$1], [],[ sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/lib/w32api"]) ;; mingw* | cegcc*) # MinGW DLLs use traditional 'lib' prefix soname_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext' ;; pw32*) # pw32 DLLs use 'pw' prefix rather than 'lib' library_names_spec='`echo $libname | $SED -e 's/^lib/pw/'``echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext' ;; esac dynamic_linker='Win32 ld.exe' ;; *,cl* | *,icl*) # Native MSVC or ICC libname_spec='$name' soname_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext' library_names_spec='$libname.dll.lib' case $build_os in mingw*) sys_lib_search_path_spec= lt_save_ifs=$IFS IFS=';' for lt_path in $LIB do IFS=$lt_save_ifs # Let DOS variable expansion print the short 8.3 style file name. lt_path=`cd "$lt_path" 2>/dev/null && cmd //C "for %i in (".") do @echo %~si"` sys_lib_search_path_spec="$sys_lib_search_path_spec $lt_path" done IFS=$lt_save_ifs # Convert to MSYS style. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's|\\\\|/|g' -e 's| \\([[a-zA-Z]]\\):| /\\1|g' -e 's|^ ||'` ;; cygwin*) # Convert to unix form, then to dos form, then back to unix form # but this time dos style (no spaces!) so that the unix form looks # like /cygdrive/c/PROGRA~1:/cygdr... sys_lib_search_path_spec=`cygpath --path --unix "$LIB"` sys_lib_search_path_spec=`cygpath --path --dos "$sys_lib_search_path_spec" 2>/dev/null` sys_lib_search_path_spec=`cygpath --path --unix "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` ;; *) sys_lib_search_path_spec=$LIB if $ECHO "$sys_lib_search_path_spec" | [$GREP ';[c-zC-Z]:/' >/dev/null]; then # It is most probably a Windows format PATH. sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e 's/;/ /g'` else sys_lib_search_path_spec=`$ECHO "$sys_lib_search_path_spec" | $SED -e "s/$PATH_SEPARATOR/ /g"` fi # FIXME: find the short name or the path components, as spaces are # common. (e.g. "Program Files" -> "PROGRA~1") ;; esac # DLL is installed to $(libdir)/../bin by postinstall_cmds postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; echo \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; echo \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' shlibpath_overrides_runpath=yes dynamic_linker='Win32 link.exe' ;; *) # Assume MSVC and ICC wrapper library_names_spec='$libname`echo $release | $SED -e 's/[[.]]/-/g'`$versuffix$shared_ext $libname.lib' dynamic_linker='Win32 ld.exe' ;; esac # FIXME: first we should search . and the directory the executable is in shlibpath_var=PATH ;; darwin* | rhapsody*) dynamic_linker="$host_os dyld" version_type=darwin need_lib_prefix=no need_version=no library_names_spec='$libname$release$major$shared_ext $libname$shared_ext' soname_spec='$libname$release$major$shared_ext' shlibpath_overrides_runpath=yes shlibpath_var=DYLD_LIBRARY_PATH shrext_cmds='`test .$module = .yes && echo .so || echo .dylib`' m4_if([$1], [],[ sys_lib_search_path_spec="$sys_lib_search_path_spec /usr/local/lib"]) sys_lib_dlsearch_path_spec='/usr/local/lib /lib /usr/lib' ;; dgux*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; freebsd* | dragonfly* | midnightbsd*) # DragonFly does not have aout. When/if they implement a new # versioning mechanism, adjust this. if test -x /usr/bin/objformat; then objformat=`/usr/bin/objformat` else case $host_os in freebsd[[23]].*) objformat=aout ;; *) objformat=elf ;; esac fi version_type=freebsd-$objformat case $version_type in freebsd-elf*) library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' need_version=no need_lib_prefix=no ;; freebsd-*) library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' need_version=yes ;; esac case $host_cpu in powerpc64) # On FreeBSD bi-arch platforms, a different variable is used for 32-bit # binaries. See . AC_COMPILE_IFELSE( [AC_LANG_SOURCE( [[int test_pointer_size[sizeof (void *) - 5]; ]])], [shlibpath_var=LD_LIBRARY_PATH], [shlibpath_var=LD_32_LIBRARY_PATH]) ;; *) shlibpath_var=LD_LIBRARY_PATH ;; esac case $host_os in freebsd2.*) shlibpath_overrides_runpath=yes ;; freebsd3.[[01]]* | freebsdelf3.[[01]]*) shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; freebsd3.[[2-9]]* | freebsdelf3.[[2-9]]* | \ freebsd4.[[0-5]] | freebsdelf4.[[0-5]] | freebsd4.1.1 | freebsdelf4.1.1) shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; *) # from 4.6 on, and DragonFly shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; esac ;; haiku*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no dynamic_linker="$host_os runtime_loader" library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LIBRARY_PATH shlibpath_overrides_runpath=no sys_lib_dlsearch_path_spec='/boot/home/config/lib /boot/common/lib /boot/system/lib' hardcode_into_libs=yes ;; hpux9* | hpux10* | hpux11*) # Give a soname corresponding to the major version so that dld.sl refuses to # link against other versions. version_type=sunos need_lib_prefix=no need_version=no case $host_cpu in ia64*) shrext_cmds='.so' hardcode_into_libs=yes dynamic_linker="$host_os dld.so" shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' if test 32 = "$HPUX_IA64_MODE"; then sys_lib_search_path_spec="/usr/lib/hpux32 /usr/local/lib/hpux32 /usr/local/lib" sys_lib_dlsearch_path_spec=/usr/lib/hpux32 else sys_lib_search_path_spec="/usr/lib/hpux64 /usr/local/lib/hpux64" sys_lib_dlsearch_path_spec=/usr/lib/hpux64 fi ;; hppa*64*) shrext_cmds='.sl' hardcode_into_libs=yes dynamic_linker="$host_os dld.sl" shlibpath_var=LD_LIBRARY_PATH # How should we handle SHLIB_PATH shlibpath_overrides_runpath=yes # Unless +noenvvar is specified. library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' sys_lib_search_path_spec="/usr/lib/pa20_64 /usr/ccs/lib/pa20_64" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; *) shrext_cmds='.sl' dynamic_linker="$host_os dld.sl" shlibpath_var=SHLIB_PATH shlibpath_overrides_runpath=no # +s is required to enable SHLIB_PATH library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' ;; esac # HP-UX runs *really* slowly unless shared libraries are mode 555, ... postinstall_cmds='chmod 555 $lib' # or fails outright, so override atomically: install_override_mode=555 ;; interix[[3-9]]*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='Interix 3.x ld.so.1 (PE, like ELF)' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; irix5* | irix6* | nonstopux*) case $host_os in nonstopux*) version_type=nonstopux ;; *) if test yes = "$lt_cv_prog_gnu_ld"; then version_type=linux # correct to gnu/linux during the next big refactor else version_type=irix fi ;; esac need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$release$shared_ext $libname$shared_ext' case $host_os in irix5* | nonstopux*) libsuff= shlibsuff= ;; *) case $LD in # libtool.m4 will add one of these switches to LD *-32|*"-32 "|*-melf32bsmip|*"-melf32bsmip ") libsuff= shlibsuff= libmagic=32-bit;; *-n32|*"-n32 "|*-melf32bmipn32|*"-melf32bmipn32 ") libsuff=32 shlibsuff=N32 libmagic=N32;; *-64|*"-64 "|*-melf64bmip|*"-melf64bmip ") libsuff=64 shlibsuff=64 libmagic=64-bit;; *) libsuff= shlibsuff= libmagic=never-match;; esac ;; esac shlibpath_var=LD_LIBRARY${shlibsuff}_PATH shlibpath_overrides_runpath=no sys_lib_search_path_spec="/usr/lib$libsuff /lib$libsuff /usr/local/lib$libsuff" sys_lib_dlsearch_path_spec="/usr/lib$libsuff /lib$libsuff" hardcode_into_libs=yes ;; # No shared lib support for Linux oldld, aout, or coff. linux*oldld* | linux*aout* | linux*coff*) dynamic_linker=no ;; linux*android*) version_type=none # Android doesn't support versioned libraries. need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext' finish_cmds= shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes dynamic_linker='Android linker' # -rpath works at least for libraries that are not overridden by # libraries installed in system locations. _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' ;; # This must be glibc/ELF. linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' finish_cmds='PATH="\$PATH:/sbin" ldconfig -n $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no # Some binutils ld are patched to set DT_RUNPATH AC_CACHE_VAL([lt_cv_shlibpath_overrides_runpath], [lt_cv_shlibpath_overrides_runpath=no save_LDFLAGS=$LDFLAGS save_libdir=$libdir eval "libdir=/foo; wl=\"$_LT_TAGVAR(lt_prog_compiler_wl, $1)\"; \ LDFLAGS=\"\$LDFLAGS $_LT_TAGVAR(hardcode_libdir_flag_spec, $1)\"" AC_LINK_IFELSE([AC_LANG_PROGRAM([],[])], [AS_IF([ ($OBJDUMP -p conftest$ac_exeext) 2>/dev/null | grep "RUNPATH.*$libdir" >/dev/null], [lt_cv_shlibpath_overrides_runpath=yes])]) LDFLAGS=$save_LDFLAGS libdir=$save_libdir ]) shlibpath_overrides_runpath=$lt_cv_shlibpath_overrides_runpath # This implies no fast_install, which is unacceptable. # Some rework will be needed to allow for fast_install # before this can be enabled. hardcode_into_libs=yes # Ideally, we could use ldconfig to report *all* directores which are # searched for libraries, however this is still not possible. Aside from not # being certain /sbin/ldconfig is available, command # 'ldconfig -N -X -v | grep ^/' on 64bit Fedora does not report /usr/lib64, # even though it is searched at run-time. Try to do the best guess by # appending ld.so.conf contents (and includes) to the search path. if test -f /etc/ld.so.conf; then lt_ld_extra=`awk '/^include / { system(sprintf("cd /etc; cat %s 2>/dev/null", \[$]2)); skip = 1; } { if (!skip) print \[$]0; skip = 0; }' < /etc/ld.so.conf | $SED -e 's/#.*//;/^[ ]*hwcap[ ]/d;s/[:, ]/ /g;s/=[^=]*$//;s/=[^= ]* / /g;s/"//g;/^$/d' | tr '\n' ' '` sys_lib_dlsearch_path_spec="/lib /usr/lib $lt_ld_extra" fi # We used to test for /lib/ld.so.1 and disable shared libraries on # powerpc, because MkLinux only supported shared libraries with the # GNU dynamic linker. Since this was broken with cross compilers, # most powerpc-linux boxes support dynamic linking these days and # people can always --disable-shared, the test was removed, and we # assume the GNU/Linux dynamic linker is in use. dynamic_linker='GNU/Linux ld.so' ;; netbsd*) version_type=sunos need_lib_prefix=no need_version=no if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' dynamic_linker='NetBSD (a.out) ld.so' else library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' dynamic_linker='NetBSD ld.elf_so' fi shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes ;; newsos6) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; *nto* | *qnx*) version_type=qnx need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes dynamic_linker='ldqnx.so' ;; openbsd* | bitrig*) version_type=sunos sys_lib_dlsearch_path_spec=/usr/lib need_lib_prefix=no if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then need_version=no else need_version=yes fi library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/sbin" ldconfig -m $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes ;; os2*) libname_spec='$name' version_type=windows shrext_cmds=.dll need_version=no need_lib_prefix=no # OS/2 can only load a DLL with a base name of 8 characters or less. soname_spec='`test -n "$os2dllname" && libname="$os2dllname"; v=$($ECHO $release$versuffix | tr -d .-); n=$($ECHO $libname | cut -b -$((8 - ${#v})) | tr . _); $ECHO $n$v`$shared_ext' library_names_spec='${libname}_dll.$libext' dynamic_linker='OS/2 ld.exe' shlibpath_var=BEGINLIBPATH sys_lib_search_path_spec="/lib /usr/lib /usr/local/lib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec postinstall_cmds='base_file=`basename \$file`~ dlpath=`$SHELL 2>&1 -c '\''. $dir/'\''\$base_file'\''i; $ECHO \$dlname'\''`~ dldir=$destdir/`dirname \$dlpath`~ test -d \$dldir || mkdir -p \$dldir~ $install_prog $dir/$dlname \$dldir/$dlname~ chmod a+x \$dldir/$dlname~ if test -n '\''$stripme'\'' && test -n '\''$striplib'\''; then eval '\''$striplib \$dldir/$dlname'\'' || exit \$?; fi' postuninstall_cmds='dldll=`$SHELL 2>&1 -c '\''. $file; $ECHO \$dlname'\''`~ dlpath=$dir/\$dldll~ $RM \$dlpath' ;; osf3* | osf4* | osf5*) version_type=osf need_lib_prefix=no need_version=no soname_spec='$libname$release$shared_ext$major' library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH sys_lib_search_path_spec="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc /usr/lib /usr/local/lib /var/shlib" sys_lib_dlsearch_path_spec=$sys_lib_search_path_spec ;; rdos*) dynamic_linker=no ;; solaris*) version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes # ldd complains unless libraries are executable postinstall_cmds='chmod +x $lib' ;; sunos4*) version_type=sunos library_names_spec='$libname$release$shared_ext$versuffix $libname$shared_ext$versuffix' finish_cmds='PATH="\$PATH:/usr/etc" ldconfig $libdir' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes if test yes = "$with_gnu_ld"; then need_lib_prefix=no fi need_version=yes ;; sysv4 | sysv4.3*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH case $host_vendor in sni) shlibpath_overrides_runpath=no need_lib_prefix=no runpath_var=LD_RUN_PATH ;; siemens) need_lib_prefix=no ;; motorola) need_lib_prefix=no need_version=no shlibpath_overrides_runpath=no sys_lib_search_path_spec='/lib /usr/lib /usr/ccs/lib' ;; esac ;; sysv4*MP*) if test -d /usr/nec; then version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$shared_ext.$versuffix $libname$shared_ext.$major $libname$shared_ext' soname_spec='$libname$shared_ext.$major' shlibpath_var=LD_LIBRARY_PATH fi ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*) version_type=sco need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=yes hardcode_into_libs=yes if test yes = "$with_gnu_ld"; then sys_lib_search_path_spec='/usr/local/lib /usr/gnu/lib /usr/ccs/lib /usr/lib /lib' else sys_lib_search_path_spec='/usr/ccs/lib /usr/lib' case $host_os in sco3.2v5*) sys_lib_search_path_spec="$sys_lib_search_path_spec /lib" ;; esac fi sys_lib_dlsearch_path_spec='/usr/lib' ;; tpf*) # TPF is a cross-target only. Preferred cross-host = GNU/Linux. version_type=linux # correct to gnu/linux during the next big refactor need_lib_prefix=no need_version=no library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' shlibpath_var=LD_LIBRARY_PATH shlibpath_overrides_runpath=no hardcode_into_libs=yes ;; uts4*) version_type=linux # correct to gnu/linux during the next big refactor library_names_spec='$libname$release$shared_ext$versuffix $libname$release$shared_ext$major $libname$shared_ext' soname_spec='$libname$release$shared_ext$major' shlibpath_var=LD_LIBRARY_PATH ;; *) dynamic_linker=no ;; esac AC_MSG_RESULT([$dynamic_linker]) test no = "$dynamic_linker" && can_build_shared=no variables_saved_for_relink="PATH $shlibpath_var $runpath_var" if test yes = "$GCC"; then variables_saved_for_relink="$variables_saved_for_relink GCC_EXEC_PREFIX COMPILER_PATH LIBRARY_PATH" fi if test set = "${lt_cv_sys_lib_search_path_spec+set}"; then sys_lib_search_path_spec=$lt_cv_sys_lib_search_path_spec fi if test set = "${lt_cv_sys_lib_dlsearch_path_spec+set}"; then sys_lib_dlsearch_path_spec=$lt_cv_sys_lib_dlsearch_path_spec fi # remember unaugmented sys_lib_dlsearch_path content for libtool script decls... configure_time_dlsearch_path=$sys_lib_dlsearch_path_spec # ... but it needs LT_SYS_LIBRARY_PATH munging for other configure-time code func_munge_path_list sys_lib_dlsearch_path_spec "$LT_SYS_LIBRARY_PATH" # to be used as default LT_SYS_LIBRARY_PATH value in generated libtool configure_time_lt_sys_library_path=$LT_SYS_LIBRARY_PATH _LT_DECL([], [variables_saved_for_relink], [1], [Variables whose values should be saved in libtool wrapper scripts and restored at link time]) _LT_DECL([], [need_lib_prefix], [0], [Do we need the "lib" prefix for modules?]) _LT_DECL([], [need_version], [0], [Do we need a version for libraries?]) _LT_DECL([], [version_type], [0], [Library versioning type]) _LT_DECL([], [runpath_var], [0], [Shared library runtime path variable]) _LT_DECL([], [shlibpath_var], [0],[Shared library path variable]) _LT_DECL([], [shlibpath_overrides_runpath], [0], [Is shlibpath searched before the hard-coded library search path?]) _LT_DECL([], [libname_spec], [1], [Format of library name prefix]) _LT_DECL([], [library_names_spec], [1], [[List of archive names. First name is the real one, the rest are links. The last name is the one that the linker finds with -lNAME]]) _LT_DECL([], [soname_spec], [1], [[The coded name of the library, if different from the real name]]) _LT_DECL([], [install_override_mode], [1], [Permission mode override for installation of shared libraries]) _LT_DECL([], [postinstall_cmds], [2], [Command to use after installation of a shared archive]) _LT_DECL([], [postuninstall_cmds], [2], [Command to use after uninstallation of a shared archive]) _LT_DECL([], [finish_cmds], [2], [Commands used to finish a libtool library installation in a directory]) _LT_DECL([], [finish_eval], [1], [[As "finish_cmds", except a single script fragment to be evaled but not shown]]) _LT_DECL([], [hardcode_into_libs], [0], [Whether we should hardcode library paths into libraries]) _LT_DECL([], [sys_lib_search_path_spec], [2], [Compile-time system search path for libraries]) _LT_DECL([sys_lib_dlsearch_path_spec], [configure_time_dlsearch_path], [2], [Detected run-time system search path for libraries]) _LT_DECL([], [configure_time_lt_sys_library_path], [2], [Explicit LT_SYS_LIBRARY_PATH set during ./configure time]) ])# _LT_SYS_DYNAMIC_LINKER # _LT_PATH_TOOL_PREFIX(TOOL) # -------------------------- # find a file program that can recognize shared library AC_DEFUN([_LT_PATH_TOOL_PREFIX], [m4_require([_LT_DECL_EGREP])dnl AC_MSG_CHECKING([for $1]) AC_CACHE_VAL(lt_cv_path_MAGIC_CMD, [case $MAGIC_CMD in [[\\/*] | ?:[\\/]*]) lt_cv_path_MAGIC_CMD=$MAGIC_CMD # Let the user override the test with a path. ;; *) lt_save_MAGIC_CMD=$MAGIC_CMD lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR dnl $ac_dummy forces splitting on constant user-supplied paths. dnl POSIX.2 word splitting is done only on the output of word expansions, dnl not every word. This closes a longstanding sh security hole. ac_dummy="m4_if([$2], , $PATH, [$2])" for ac_dir in $ac_dummy; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/$1"; then lt_cv_path_MAGIC_CMD=$ac_dir/"$1" if test -n "$file_magic_test_file"; then case $deplibs_check_method in "file_magic "*) file_magic_regex=`expr "$deplibs_check_method" : "file_magic \(.*\)"` MAGIC_CMD=$lt_cv_path_MAGIC_CMD if eval $file_magic_cmd \$file_magic_test_file 2> /dev/null | $EGREP "$file_magic_regex" > /dev/null; then : else cat <<_LT_EOF 1>&2 *** Warning: the command libtool uses to detect shared libraries, *** $file_magic_cmd, produces output that libtool cannot recognize. *** The result is that libtool may fail to recognize shared libraries *** as such. This will affect the creation of libtool libraries that *** depend on shared libraries, but programs linked with such libtool *** libraries will work regardless of this problem. Nevertheless, you *** may want to report the problem to your system manager and/or to *** bug-libtool@gnu.org _LT_EOF fi ;; esac fi break fi done IFS=$lt_save_ifs MAGIC_CMD=$lt_save_MAGIC_CMD ;; esac]) MAGIC_CMD=$lt_cv_path_MAGIC_CMD if test -n "$MAGIC_CMD"; then AC_MSG_RESULT($MAGIC_CMD) else AC_MSG_RESULT(no) fi _LT_DECL([], [MAGIC_CMD], [0], [Used to examine libraries when file_magic_cmd begins with "file"])dnl ])# _LT_PATH_TOOL_PREFIX # Old name: AU_ALIAS([AC_PATH_TOOL_PREFIX], [_LT_PATH_TOOL_PREFIX]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_PATH_TOOL_PREFIX], []) # _LT_PATH_MAGIC # -------------- # find a file program that can recognize a shared library m4_defun([_LT_PATH_MAGIC], [_LT_PATH_TOOL_PREFIX(${ac_tool_prefix}file, /usr/bin$PATH_SEPARATOR$PATH) if test -z "$lt_cv_path_MAGIC_CMD"; then if test -n "$ac_tool_prefix"; then _LT_PATH_TOOL_PREFIX(file, /usr/bin$PATH_SEPARATOR$PATH) else MAGIC_CMD=: fi fi ])# _LT_PATH_MAGIC # LT_PATH_LD # ---------- # find the pathname to the GNU or non-GNU linker AC_DEFUN([LT_PATH_LD], [AC_REQUIRE([AC_PROG_CC])dnl AC_REQUIRE([AC_CANONICAL_HOST])dnl AC_REQUIRE([AC_CANONICAL_BUILD])dnl m4_require([_LT_DECL_SED])dnl m4_require([_LT_DECL_EGREP])dnl m4_require([_LT_PROG_ECHO_BACKSLASH])dnl AC_ARG_WITH([gnu-ld], [AS_HELP_STRING([--with-gnu-ld], [assume the C compiler uses GNU ld @<:@default=no@:>@])], [test no = "$withval" || with_gnu_ld=yes], [with_gnu_ld=no])dnl ac_prog=ld if test yes = "$GCC"; then # Check if gcc -print-prog-name=ld gives a path. AC_MSG_CHECKING([for ld used by $CC]) case $host in *-*-mingw*) # gcc leaves a trailing carriage return, which upsets mingw ac_prog=`($CC -print-prog-name=ld) 2>&5 | tr -d '\015'` ;; *) ac_prog=`($CC -print-prog-name=ld) 2>&5` ;; esac case $ac_prog in # Accept absolute paths. [[\\/]]* | ?:[[\\/]]*) re_direlt='/[[^/]][[^/]]*/\.\./' # Canonicalize the pathname of ld ac_prog=`$ECHO "$ac_prog"| $SED 's%\\\\%/%g'` while $ECHO "$ac_prog" | $GREP "$re_direlt" > /dev/null 2>&1; do ac_prog=`$ECHO $ac_prog| $SED "s%$re_direlt%/%"` done test -z "$LD" && LD=$ac_prog ;; "") # If it fails, then pretend we aren't using GCC. ac_prog=ld ;; *) # If it is relative, then search for the first ld in PATH. with_gnu_ld=unknown ;; esac elif test yes = "$with_gnu_ld"; then AC_MSG_CHECKING([for GNU ld]) else AC_MSG_CHECKING([for non-GNU ld]) fi AC_CACHE_VAL(lt_cv_path_LD, [if test -z "$LD"; then lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR for ac_dir in $PATH; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. if test -f "$ac_dir/$ac_prog" || test -f "$ac_dir/$ac_prog$ac_exeext"; then lt_cv_path_LD=$ac_dir/$ac_prog # Check to see if the program is GNU ld. I'd rather use --version, # but apparently some variants of GNU ld only accept -v. # Break only if it was the GNU/non-GNU ld that we prefer. case `"$lt_cv_path_LD" -v 2>&1 &1 conftest.i cat conftest.i conftest.i >conftest2.i : ${lt_DD:=$DD} AC_PATH_PROGS_FEATURE_CHECK([lt_DD], [dd], [if "$ac_path_lt_DD" bs=32 count=1 conftest.out 2>/dev/null; then cmp -s conftest.i conftest.out \ && ac_cv_path_lt_DD="$ac_path_lt_DD" ac_path_lt_DD_found=: fi]) rm -f conftest.i conftest2.i conftest.out]) ])# _LT_PATH_DD # _LT_CMD_TRUNCATE # ---------------- # find command to truncate a binary pipe m4_defun([_LT_CMD_TRUNCATE], [m4_require([_LT_PATH_DD]) AC_CACHE_CHECK([how to truncate binary pipes], [lt_cv_truncate_bin], [printf 0123456789abcdef0123456789abcdef >conftest.i cat conftest.i conftest.i >conftest2.i lt_cv_truncate_bin= if "$ac_cv_path_lt_DD" bs=32 count=1 conftest.out 2>/dev/null; then cmp -s conftest.i conftest.out \ && lt_cv_truncate_bin="$ac_cv_path_lt_DD bs=4096 count=1" fi rm -f conftest.i conftest2.i conftest.out test -z "$lt_cv_truncate_bin" && lt_cv_truncate_bin="$SED -e 4q"]) _LT_DECL([lt_truncate_bin], [lt_cv_truncate_bin], [1], [Command to truncate a binary pipe]) ])# _LT_CMD_TRUNCATE # _LT_CHECK_MAGIC_METHOD # ---------------------- # how to check for library dependencies # -- PORTME fill in with the dynamic library characteristics m4_defun([_LT_CHECK_MAGIC_METHOD], [m4_require([_LT_DECL_EGREP]) m4_require([_LT_DECL_OBJDUMP]) AC_CACHE_CHECK([how to recognize dependent libraries], lt_cv_deplibs_check_method, [lt_cv_file_magic_cmd='$MAGIC_CMD' lt_cv_file_magic_test_file= lt_cv_deplibs_check_method='unknown' # Need to set the preceding variable on all platforms that support # interlibrary dependencies. # 'none' -- dependencies not supported. # 'unknown' -- same as none, but documents that we really don't know. # 'pass_all' -- all dependencies passed with no checks. # 'test_compile' -- check by making test program. # 'file_magic [[regex]]' -- check by looking for files in library path # that responds to the $file_magic_cmd with a given extended regex. # If you have 'file' or equivalent on your system and you're not sure # whether 'pass_all' will *always* work, you probably want this one. case $host_os in aix[[4-9]]*) lt_cv_deplibs_check_method=pass_all ;; beos*) lt_cv_deplibs_check_method=pass_all ;; bsdi[[45]]*) lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (shared object|dynamic lib)' lt_cv_file_magic_cmd='$FILECMD -L' lt_cv_file_magic_test_file=/shlib/libc.so ;; cygwin*) # func_win32_libid is a shell function defined in ltmain.sh lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL' lt_cv_file_magic_cmd='func_win32_libid' ;; mingw* | pw32*) # Base MSYS/MinGW do not provide the 'file' command needed by # func_win32_libid shell function, so use a weaker test based on 'objdump', # unless we find 'file', for example because we are cross-compiling. if ( file / ) >/dev/null 2>&1; then lt_cv_deplibs_check_method='file_magic ^x86 archive import|^x86 DLL' lt_cv_file_magic_cmd='func_win32_libid' else # Keep this pattern in sync with the one in func_win32_libid. lt_cv_deplibs_check_method='file_magic file format (pei*-i386(.*architecture: i386)?|pe-arm-wince|pe-x86-64)' lt_cv_file_magic_cmd='$OBJDUMP -f' fi ;; cegcc*) # use the weaker test based on 'objdump'. See mingw*. lt_cv_deplibs_check_method='file_magic file format pe-arm-.*little(.*architecture: arm)?' lt_cv_file_magic_cmd='$OBJDUMP -f' ;; darwin* | rhapsody*) lt_cv_deplibs_check_method=pass_all ;; freebsd* | dragonfly* | midnightbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then case $host_cpu in i*86 ) # Not sure whether the presence of OpenBSD here was a mistake. # Let's accept both of them until this is cleared up. lt_cv_deplibs_check_method='file_magic (FreeBSD|OpenBSD|DragonFly)/i[[3-9]]86 (compact )?demand paged shared library' lt_cv_file_magic_cmd=$FILECMD lt_cv_file_magic_test_file=`echo /usr/lib/libc.so.*` ;; esac else lt_cv_deplibs_check_method=pass_all fi ;; haiku*) lt_cv_deplibs_check_method=pass_all ;; hpux10.20* | hpux11*) lt_cv_file_magic_cmd=$FILECMD case $host_cpu in ia64*) lt_cv_deplibs_check_method='file_magic (s[[0-9]][[0-9]][[0-9]]|ELF-[[0-9]][[0-9]]) shared object file - IA64' lt_cv_file_magic_test_file=/usr/lib/hpux32/libc.so ;; hppa*64*) [lt_cv_deplibs_check_method='file_magic (s[0-9][0-9][0-9]|ELF[ -][0-9][0-9])(-bit)?( [LM]SB)? shared object( file)?[, -]* PA-RISC [0-9]\.[0-9]'] lt_cv_file_magic_test_file=/usr/lib/pa20_64/libc.sl ;; *) lt_cv_deplibs_check_method='file_magic (s[[0-9]][[0-9]][[0-9]]|PA-RISC[[0-9]]\.[[0-9]]) shared library' lt_cv_file_magic_test_file=/usr/lib/libc.sl ;; esac ;; interix[[3-9]]*) # PIC code is broken on Interix 3.x, that's why |\.a not |_pic\.a here lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so|\.a)$' ;; irix5* | irix6* | nonstopux*) case $LD in *-32|*"-32 ") libmagic=32-bit;; *-n32|*"-n32 ") libmagic=N32;; *-64|*"-64 ") libmagic=64-bit;; *) libmagic=never-match;; esac lt_cv_deplibs_check_method=pass_all ;; # This must be glibc/ELF. linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) lt_cv_deplibs_check_method=pass_all ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ > /dev/null; then lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|_pic\.a)$' else lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so|_pic\.a)$' fi ;; newos6*) lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (executable|dynamic lib)' lt_cv_file_magic_cmd=$FILECMD lt_cv_file_magic_test_file=/usr/lib/libnls.so ;; *nto* | *qnx*) lt_cv_deplibs_check_method=pass_all ;; openbsd* | bitrig*) if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|\.so|_pic\.a)$' else lt_cv_deplibs_check_method='match_pattern /lib[[^/]]+(\.so\.[[0-9]]+\.[[0-9]]+|_pic\.a)$' fi ;; osf3* | osf4* | osf5*) lt_cv_deplibs_check_method=pass_all ;; rdos*) lt_cv_deplibs_check_method=pass_all ;; solaris*) lt_cv_deplibs_check_method=pass_all ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX* | sysv4*uw2*) lt_cv_deplibs_check_method=pass_all ;; sysv4 | sysv4.3*) case $host_vendor in motorola) lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[ML]]SB (shared object|dynamic lib) M[[0-9]][[0-9]]* Version [[0-9]]' lt_cv_file_magic_test_file=`echo /usr/lib/libc.so*` ;; ncr) lt_cv_deplibs_check_method=pass_all ;; sequent) lt_cv_file_magic_cmd='/bin/file' lt_cv_deplibs_check_method='file_magic ELF [[0-9]][[0-9]]*-bit [[LM]]SB (shared object|dynamic lib )' ;; sni) lt_cv_file_magic_cmd='/bin/file' lt_cv_deplibs_check_method="file_magic ELF [[0-9]][[0-9]]*-bit [[LM]]SB dynamic lib" lt_cv_file_magic_test_file=/lib/libc.so ;; siemens) lt_cv_deplibs_check_method=pass_all ;; pc) lt_cv_deplibs_check_method=pass_all ;; esac ;; tpf*) lt_cv_deplibs_check_method=pass_all ;; os2*) lt_cv_deplibs_check_method=pass_all ;; esac ]) file_magic_glob= want_nocaseglob=no if test "$build" = "$host"; then case $host_os in mingw* | pw32*) if ( shopt | grep nocaseglob ) >/dev/null 2>&1; then want_nocaseglob=yes else file_magic_glob=`echo aAbBcCdDeEfFgGhHiIjJkKlLmMnNoOpPqQrRsStTuUvVwWxXyYzZ | $SED -e "s/\(..\)/s\/[[\1]]\/[[\1]]\/g;/g"` fi ;; esac fi file_magic_cmd=$lt_cv_file_magic_cmd deplibs_check_method=$lt_cv_deplibs_check_method test -z "$deplibs_check_method" && deplibs_check_method=unknown _LT_DECL([], [deplibs_check_method], [1], [Method to check whether dependent libraries are shared objects]) _LT_DECL([], [file_magic_cmd], [1], [Command to use when deplibs_check_method = "file_magic"]) _LT_DECL([], [file_magic_glob], [1], [How to find potential files when deplibs_check_method = "file_magic"]) _LT_DECL([], [want_nocaseglob], [1], [Find potential files using nocaseglob when deplibs_check_method = "file_magic"]) ])# _LT_CHECK_MAGIC_METHOD # LT_PATH_NM # ---------- # find the pathname to a BSD- or MS-compatible name lister AC_DEFUN([LT_PATH_NM], [AC_REQUIRE([AC_PROG_CC])dnl AC_CACHE_CHECK([for BSD- or MS-compatible name lister (nm)], lt_cv_path_NM, [if test -n "$NM"; then # Let the user override the test. lt_cv_path_NM=$NM else lt_nm_to_check=${ac_tool_prefix}nm if test -n "$ac_tool_prefix" && test "$build" = "$host"; then lt_nm_to_check="$lt_nm_to_check nm" fi for lt_tmp_nm in $lt_nm_to_check; do lt_save_ifs=$IFS; IFS=$PATH_SEPARATOR for ac_dir in $PATH /usr/ccs/bin/elf /usr/ccs/bin /usr/ucb /bin; do IFS=$lt_save_ifs test -z "$ac_dir" && ac_dir=. tmp_nm=$ac_dir/$lt_tmp_nm if test -f "$tmp_nm" || test -f "$tmp_nm$ac_exeext"; then # Check to see if the nm accepts a BSD-compat flag. # Adding the 'sed 1q' prevents false positives on HP-UX, which says: # nm: unknown option "B" ignored # Tru64's nm complains that /dev/null is an invalid object file # MSYS converts /dev/null to NUL, MinGW nm treats NUL as empty case $build_os in mingw*) lt_bad_file=conftest.nm/nofile ;; *) lt_bad_file=/dev/null ;; esac case `"$tmp_nm" -B $lt_bad_file 2>&1 | $SED '1q'` in *$lt_bad_file* | *'Invalid file or object type'*) lt_cv_path_NM="$tmp_nm -B" break 2 ;; *) case `"$tmp_nm" -p /dev/null 2>&1 | $SED '1q'` in */dev/null*) lt_cv_path_NM="$tmp_nm -p" break 2 ;; *) lt_cv_path_NM=${lt_cv_path_NM="$tmp_nm"} # keep the first match, but continue # so that we can try to find one that supports BSD flags ;; esac ;; esac fi done IFS=$lt_save_ifs done : ${lt_cv_path_NM=no} fi]) if test no != "$lt_cv_path_NM"; then NM=$lt_cv_path_NM else # Didn't find any BSD compatible name lister, look for dumpbin. if test -n "$DUMPBIN"; then : # Let the user override the test. else AC_CHECK_TOOLS(DUMPBIN, [dumpbin "link -dump"], :) case `$DUMPBIN -symbols -headers /dev/null 2>&1 | $SED '1q'` in *COFF*) DUMPBIN="$DUMPBIN -symbols -headers" ;; *) DUMPBIN=: ;; esac fi AC_SUBST([DUMPBIN]) if test : != "$DUMPBIN"; then NM=$DUMPBIN fi fi test -z "$NM" && NM=nm AC_SUBST([NM]) _LT_DECL([], [NM], [1], [A BSD- or MS-compatible name lister])dnl AC_CACHE_CHECK([the name lister ($NM) interface], [lt_cv_nm_interface], [lt_cv_nm_interface="BSD nm" echo "int some_variable = 0;" > conftest.$ac_ext (eval echo "\"\$as_me:$LINENO: $ac_compile\"" >&AS_MESSAGE_LOG_FD) (eval "$ac_compile" 2>conftest.err) cat conftest.err >&AS_MESSAGE_LOG_FD (eval echo "\"\$as_me:$LINENO: $NM \\\"conftest.$ac_objext\\\"\"" >&AS_MESSAGE_LOG_FD) (eval "$NM \"conftest.$ac_objext\"" 2>conftest.err > conftest.out) cat conftest.err >&AS_MESSAGE_LOG_FD (eval echo "\"\$as_me:$LINENO: output\"" >&AS_MESSAGE_LOG_FD) cat conftest.out >&AS_MESSAGE_LOG_FD if $GREP 'External.*some_variable' conftest.out > /dev/null; then lt_cv_nm_interface="MS dumpbin" fi rm -f conftest*]) ])# LT_PATH_NM # Old names: AU_ALIAS([AM_PROG_NM], [LT_PATH_NM]) AU_ALIAS([AC_PROG_NM], [LT_PATH_NM]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AM_PROG_NM], []) dnl AC_DEFUN([AC_PROG_NM], []) # _LT_CHECK_SHAREDLIB_FROM_LINKLIB # -------------------------------- # how to determine the name of the shared library # associated with a specific link library. # -- PORTME fill in with the dynamic library characteristics m4_defun([_LT_CHECK_SHAREDLIB_FROM_LINKLIB], [m4_require([_LT_DECL_EGREP]) m4_require([_LT_DECL_OBJDUMP]) m4_require([_LT_DECL_DLLTOOL]) AC_CACHE_CHECK([how to associate runtime and link libraries], lt_cv_sharedlib_from_linklib_cmd, [lt_cv_sharedlib_from_linklib_cmd='unknown' case $host_os in cygwin* | mingw* | pw32* | cegcc*) # two different shell functions defined in ltmain.sh; # decide which one to use based on capabilities of $DLLTOOL case `$DLLTOOL --help 2>&1` in *--identify-strict*) lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib ;; *) lt_cv_sharedlib_from_linklib_cmd=func_cygming_dll_for_implib_fallback ;; esac ;; *) # fallback: assume linklib IS sharedlib lt_cv_sharedlib_from_linklib_cmd=$ECHO ;; esac ]) sharedlib_from_linklib_cmd=$lt_cv_sharedlib_from_linklib_cmd test -z "$sharedlib_from_linklib_cmd" && sharedlib_from_linklib_cmd=$ECHO _LT_DECL([], [sharedlib_from_linklib_cmd], [1], [Command to associate shared and link libraries]) ])# _LT_CHECK_SHAREDLIB_FROM_LINKLIB # _LT_PATH_MANIFEST_TOOL # ---------------------- # locate the manifest tool m4_defun([_LT_PATH_MANIFEST_TOOL], [AC_CHECK_TOOL(MANIFEST_TOOL, mt, :) test -z "$MANIFEST_TOOL" && MANIFEST_TOOL=mt AC_CACHE_CHECK([if $MANIFEST_TOOL is a manifest tool], [lt_cv_path_mainfest_tool], [lt_cv_path_mainfest_tool=no echo "$as_me:$LINENO: $MANIFEST_TOOL '-?'" >&AS_MESSAGE_LOG_FD $MANIFEST_TOOL '-?' 2>conftest.err > conftest.out cat conftest.err >&AS_MESSAGE_LOG_FD if $GREP 'Manifest Tool' conftest.out > /dev/null; then lt_cv_path_mainfest_tool=yes fi rm -f conftest*]) if test yes != "$lt_cv_path_mainfest_tool"; then MANIFEST_TOOL=: fi _LT_DECL([], [MANIFEST_TOOL], [1], [Manifest tool])dnl ])# _LT_PATH_MANIFEST_TOOL # _LT_DLL_DEF_P([FILE]) # --------------------- # True iff FILE is a Windows DLL '.def' file. # Keep in sync with func_dll_def_p in the libtool script AC_DEFUN([_LT_DLL_DEF_P], [dnl test DEF = "`$SED -n dnl -e '\''s/^[[ ]]*//'\'' dnl Strip leading whitespace -e '\''/^\(;.*\)*$/d'\'' dnl Delete empty lines and comments -e '\''s/^\(EXPORTS\|LIBRARY\)\([[ ]].*\)*$/DEF/p'\'' dnl -e q dnl Only consider the first "real" line $1`" dnl ])# _LT_DLL_DEF_P # LT_LIB_M # -------- # check for math library AC_DEFUN([LT_LIB_M], [AC_REQUIRE([AC_CANONICAL_HOST])dnl LIBM= case $host in *-*-beos* | *-*-cegcc* | *-*-cygwin* | *-*-haiku* | *-*-pw32* | *-*-darwin*) # These system don't have libm, or don't need it ;; *-ncr-sysv4.3*) AC_CHECK_LIB(mw, _mwvalidcheckl, LIBM=-lmw) AC_CHECK_LIB(m, cos, LIBM="$LIBM -lm") ;; *) AC_CHECK_LIB(m, cos, LIBM=-lm) ;; esac AC_SUBST([LIBM]) ])# LT_LIB_M # Old name: AU_ALIAS([AC_CHECK_LIBM], [LT_LIB_M]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_CHECK_LIBM], []) # _LT_COMPILER_NO_RTTI([TAGNAME]) # ------------------------------- m4_defun([_LT_COMPILER_NO_RTTI], [m4_require([_LT_TAG_COMPILER])dnl _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)= if test yes = "$GCC"; then case $cc_basename in nvcc*) _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -Xcompiler -fno-builtin' ;; *) _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -fno-builtin' ;; esac _LT_COMPILER_OPTION([if $compiler supports -fno-rtti -fno-exceptions], lt_cv_prog_compiler_rtti_exceptions, [-fno-rtti -fno-exceptions], [], [_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)="$_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1) -fno-rtti -fno-exceptions"]) fi _LT_TAGDECL([no_builtin_flag], [lt_prog_compiler_no_builtin_flag], [1], [Compiler flag to turn off builtin functions]) ])# _LT_COMPILER_NO_RTTI # _LT_CMD_GLOBAL_SYMBOLS # ---------------------- m4_defun([_LT_CMD_GLOBAL_SYMBOLS], [AC_REQUIRE([AC_CANONICAL_HOST])dnl AC_REQUIRE([AC_PROG_CC])dnl AC_REQUIRE([AC_PROG_AWK])dnl AC_REQUIRE([LT_PATH_NM])dnl AC_REQUIRE([LT_PATH_LD])dnl m4_require([_LT_DECL_SED])dnl m4_require([_LT_DECL_EGREP])dnl m4_require([_LT_TAG_COMPILER])dnl # Check for command to grab the raw symbol name followed by C symbol from nm. AC_MSG_CHECKING([command to parse $NM output from $compiler object]) AC_CACHE_VAL([lt_cv_sys_global_symbol_pipe], [ # These are sane defaults that work on at least a few old systems. # [They come from Ultrix. What could be older than Ultrix?!! ;)] # Character class describing NM global symbol codes. symcode='[[BCDEGRST]]' # Regexp to match symbols that can be accessed directly from C. sympat='\([[_A-Za-z]][[_A-Za-z0-9]]*\)' # Define system-specific variables. case $host_os in aix*) symcode='[[BCDT]]' ;; cygwin* | mingw* | pw32* | cegcc*) symcode='[[ABCDGISTW]]' ;; hpux*) if test ia64 = "$host_cpu"; then symcode='[[ABCDEGRST]]' fi ;; irix* | nonstopux*) symcode='[[BCDEGRST]]' ;; osf*) symcode='[[BCDEGQRST]]' ;; solaris*) symcode='[[BCDRT]]' ;; sco3.2v5*) symcode='[[DT]]' ;; sysv4.2uw2*) symcode='[[DT]]' ;; sysv5* | sco5v6* | unixware* | OpenUNIX*) symcode='[[ABDT]]' ;; sysv4) symcode='[[DFNSTU]]' ;; esac # If we're using GNU nm, then use its standard symbol codes. case `$NM -V 2>&1` in *GNU* | *'with BFD'*) symcode='[[ABCDGIRSTW]]' ;; esac if test "$lt_cv_nm_interface" = "MS dumpbin"; then # Gets list of data symbols to import. lt_cv_sys_global_symbol_to_import="$SED -n -e 's/^I .* \(.*\)$/\1/p'" # Adjust the below global symbol transforms to fixup imported variables. lt_cdecl_hook=" -e 's/^I .* \(.*\)$/extern __declspec(dllimport) char \1;/p'" lt_c_name_hook=" -e 's/^I .* \(.*\)$/ {\"\1\", (void *) 0},/p'" lt_c_name_lib_hook="\ -e 's/^I .* \(lib.*\)$/ {\"\1\", (void *) 0},/p'\ -e 's/^I .* \(.*\)$/ {\"lib\1\", (void *) 0},/p'" else # Disable hooks by default. lt_cv_sys_global_symbol_to_import= lt_cdecl_hook= lt_c_name_hook= lt_c_name_lib_hook= fi # Transform an extracted symbol line into a proper C declaration. # Some systems (esp. on ia64) link data and code symbols differently, # so use this general approach. lt_cv_sys_global_symbol_to_cdecl="$SED -n"\ $lt_cdecl_hook\ " -e 's/^T .* \(.*\)$/extern int \1();/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/extern char \1;/p'" # Transform an extracted symbol line into symbol name and symbol address lt_cv_sys_global_symbol_to_c_name_address="$SED -n"\ $lt_c_name_hook\ " -e 's/^: \(.*\) .*$/ {\"\1\", (void *) 0},/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/ {\"\1\", (void *) \&\1},/p'" # Transform an extracted symbol line into symbol name with lib prefix and # symbol address. lt_cv_sys_global_symbol_to_c_name_address_lib_prefix="$SED -n"\ $lt_c_name_lib_hook\ " -e 's/^: \(.*\) .*$/ {\"\1\", (void *) 0},/p'"\ " -e 's/^$symcode$symcode* .* \(lib.*\)$/ {\"\1\", (void *) \&\1},/p'"\ " -e 's/^$symcode$symcode* .* \(.*\)$/ {\"lib\1\", (void *) \&\1},/p'" # Handle CRLF in mingw tool chain opt_cr= case $build_os in mingw*) opt_cr=`$ECHO 'x\{0,1\}' | tr x '\015'` # option cr in regexp ;; esac # Try without a prefix underscore, then with it. for ac_symprfx in "" "_"; do # Transform symcode, sympat, and symprfx into a raw symbol and a C symbol. symxfrm="\\1 $ac_symprfx\\2 \\2" # Write the raw and C identifiers. if test "$lt_cv_nm_interface" = "MS dumpbin"; then # Fake it for dumpbin and say T for any non-static function, # D for any global variable and I for any imported variable. # Also find C++ and __fastcall symbols from MSVC++ or ICC, # which start with @ or ?. lt_cv_sys_global_symbol_pipe="$AWK ['"\ " {last_section=section; section=\$ 3};"\ " /^COFF SYMBOL TABLE/{for(i in hide) delete hide[i]};"\ " /Section length .*#relocs.*(pick any)/{hide[last_section]=1};"\ " /^ *Symbol name *: /{split(\$ 0,sn,\":\"); si=substr(sn[2],2)};"\ " /^ *Type *: code/{print \"T\",si,substr(si,length(prfx))};"\ " /^ *Type *: data/{print \"I\",si,substr(si,length(prfx))};"\ " \$ 0!~/External *\|/{next};"\ " / 0+ UNDEF /{next}; / UNDEF \([^|]\)*()/{next};"\ " {if(hide[section]) next};"\ " {f=\"D\"}; \$ 0~/\(\).*\|/{f=\"T\"};"\ " {split(\$ 0,a,/\||\r/); split(a[2],s)};"\ " s[1]~/^[@?]/{print f,s[1],s[1]; next};"\ " s[1]~prfx {split(s[1],t,\"@\"); print f,t[1],substr(t[1],length(prfx))}"\ " ' prfx=^$ac_symprfx]" else lt_cv_sys_global_symbol_pipe="$SED -n -e 's/^.*[[ ]]\($symcode$symcode*\)[[ ]][[ ]]*$ac_symprfx$sympat$opt_cr$/$symxfrm/p'" fi lt_cv_sys_global_symbol_pipe="$lt_cv_sys_global_symbol_pipe | $SED '/ __gnu_lto/d'" # Check to see that the pipe works correctly. pipe_works=no rm -f conftest* cat > conftest.$ac_ext <<_LT_EOF #ifdef __cplusplus extern "C" { #endif char nm_test_var; void nm_test_func(void); void nm_test_func(void){} #ifdef __cplusplus } #endif int main(){nm_test_var='a';nm_test_func();return(0);} _LT_EOF if AC_TRY_EVAL(ac_compile); then # Now try to grab the symbols. nlist=conftest.nm if AC_TRY_EVAL(NM conftest.$ac_objext \| "$lt_cv_sys_global_symbol_pipe" \> $nlist) && test -s "$nlist"; then # Try sorting and uniquifying the output. if sort "$nlist" | uniq > "$nlist"T; then mv -f "$nlist"T "$nlist" else rm -f "$nlist"T fi # Make sure that we snagged all the symbols we need. if $GREP ' nm_test_var$' "$nlist" >/dev/null; then if $GREP ' nm_test_func$' "$nlist" >/dev/null; then cat <<_LT_EOF > conftest.$ac_ext /* Keep this code in sync between libtool.m4, ltmain, lt_system.h, and tests. */ #if defined _WIN32 || defined __CYGWIN__ || defined _WIN32_WCE /* DATA imports from DLLs on WIN32 can't be const, because runtime relocations are performed -- see ld's documentation on pseudo-relocs. */ # define LT@&t@_DLSYM_CONST #elif defined __osf__ /* This system does not cope well with relocations in const data. */ # define LT@&t@_DLSYM_CONST #else # define LT@&t@_DLSYM_CONST const #endif #ifdef __cplusplus extern "C" { #endif _LT_EOF # Now generate the symbol file. eval "$lt_cv_sys_global_symbol_to_cdecl"' < "$nlist" | $GREP -v main >> conftest.$ac_ext' cat <<_LT_EOF >> conftest.$ac_ext /* The mapping between symbol names and symbols. */ LT@&t@_DLSYM_CONST struct { const char *name; void *address; } lt__PROGRAM__LTX_preloaded_symbols[[]] = { { "@PROGRAM@", (void *) 0 }, _LT_EOF $SED "s/^$symcode$symcode* .* \(.*\)$/ {\"\1\", (void *) \&\1},/" < "$nlist" | $GREP -v main >> conftest.$ac_ext cat <<\_LT_EOF >> conftest.$ac_ext {0, (void *) 0} }; /* This works around a problem in FreeBSD linker */ #ifdef FREEBSD_WORKAROUND static const void *lt_preloaded_setup() { return lt__PROGRAM__LTX_preloaded_symbols; } #endif #ifdef __cplusplus } #endif _LT_EOF # Now try linking the two files. mv conftest.$ac_objext conftstm.$ac_objext lt_globsym_save_LIBS=$LIBS lt_globsym_save_CFLAGS=$CFLAGS LIBS=conftstm.$ac_objext CFLAGS="$CFLAGS$_LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)" if AC_TRY_EVAL(ac_link) && test -s conftest$ac_exeext; then pipe_works=yes fi LIBS=$lt_globsym_save_LIBS CFLAGS=$lt_globsym_save_CFLAGS else echo "cannot find nm_test_func in $nlist" >&AS_MESSAGE_LOG_FD fi else echo "cannot find nm_test_var in $nlist" >&AS_MESSAGE_LOG_FD fi else echo "cannot run $lt_cv_sys_global_symbol_pipe" >&AS_MESSAGE_LOG_FD fi else echo "$progname: failed program was:" >&AS_MESSAGE_LOG_FD cat conftest.$ac_ext >&5 fi rm -rf conftest* conftst* # Do not use the global_symbol_pipe unless it works. if test yes = "$pipe_works"; then break else lt_cv_sys_global_symbol_pipe= fi done ]) if test -z "$lt_cv_sys_global_symbol_pipe"; then lt_cv_sys_global_symbol_to_cdecl= fi if test -z "$lt_cv_sys_global_symbol_pipe$lt_cv_sys_global_symbol_to_cdecl"; then AC_MSG_RESULT(failed) else AC_MSG_RESULT(ok) fi # Response file support. if test "$lt_cv_nm_interface" = "MS dumpbin"; then nm_file_list_spec='@' elif $NM --help 2>/dev/null | grep '[[@]]FILE' >/dev/null; then nm_file_list_spec='@' fi _LT_DECL([global_symbol_pipe], [lt_cv_sys_global_symbol_pipe], [1], [Take the output of nm and produce a listing of raw symbols and C names]) _LT_DECL([global_symbol_to_cdecl], [lt_cv_sys_global_symbol_to_cdecl], [1], [Transform the output of nm in a proper C declaration]) _LT_DECL([global_symbol_to_import], [lt_cv_sys_global_symbol_to_import], [1], [Transform the output of nm into a list of symbols to manually relocate]) _LT_DECL([global_symbol_to_c_name_address], [lt_cv_sys_global_symbol_to_c_name_address], [1], [Transform the output of nm in a C name address pair]) _LT_DECL([global_symbol_to_c_name_address_lib_prefix], [lt_cv_sys_global_symbol_to_c_name_address_lib_prefix], [1], [Transform the output of nm in a C name address pair when lib prefix is needed]) _LT_DECL([nm_interface], [lt_cv_nm_interface], [1], [The name lister interface]) _LT_DECL([], [nm_file_list_spec], [1], [Specify filename containing input files for $NM]) ]) # _LT_CMD_GLOBAL_SYMBOLS # _LT_COMPILER_PIC([TAGNAME]) # --------------------------- m4_defun([_LT_COMPILER_PIC], [m4_require([_LT_TAG_COMPILER])dnl _LT_TAGVAR(lt_prog_compiler_wl, $1)= _LT_TAGVAR(lt_prog_compiler_pic, $1)= _LT_TAGVAR(lt_prog_compiler_static, $1)= m4_if([$1], [CXX], [ # C++ specific cases for pic, static, wl, etc. if test yes = "$GXX"; then _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' case $host_os in aix*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' fi _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; m68k) # FIXME: we need at least 68020 code to build shared libraries, but # adding the '-m68020' flag to GCC prevents building anything better, # like '-m68040'. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-m68020 -resident32 -malways-restore-a4' ;; esac ;; beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*) # PIC is the default for these OSes. ;; mingw* | cygwin* | os2* | pw32* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). # Although the cygwin gcc ignores -fPIC, still need this for old-style # (--disable-auto-import) libraries m4_if([$1], [GCJ], [], [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT']) case $host_os in os2*) _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static' ;; esac ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common' ;; *djgpp*) # DJGPP does not support shared libraries at all _LT_TAGVAR(lt_prog_compiler_pic, $1)= ;; haiku*) # PIC is the default for Haiku. # The "-static" flag exists, but is broken. _LT_TAGVAR(lt_prog_compiler_static, $1)= ;; interix[[3-9]]*) # Interix 3.x gcc -fpic/-fPIC options generate broken code. # Instead, we relocate shared libraries at runtime. ;; sysv4*MP*) if test -d /usr/nec; then _LT_TAGVAR(lt_prog_compiler_pic, $1)=-Kconform_pic fi ;; hpux*) # PIC is the default for 64-bit PA HP-UX, but not for 32-bit # PA HP-UX. On IA64 HP-UX, PIC is the default but the pic flag # sets the default TLS model and affects inlining. case $host_cpu in hppa*64*) ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; esac ;; *qnx* | *nto*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared' ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; esac else case $host_os in aix[[4-9]]*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' else _LT_TAGVAR(lt_prog_compiler_static, $1)='-bnso -bI:/lib/syscalls.exp' fi ;; chorus*) case $cc_basename in cxch68*) # Green Hills C++ Compiler # _LT_TAGVAR(lt_prog_compiler_static, $1)="--no_auto_instantiation -u __main -u __premain -u _abort -r $COOL_DIR/lib/libOrb.a $MVME_DIR/lib/CC/libC.a $MVME_DIR/lib/classix/libcx.s.a" ;; esac ;; mingw* | cygwin* | os2* | pw32* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). m4_if([$1], [GCJ], [], [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT']) ;; dgux*) case $cc_basename in ec++*) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' ;; ghcx*) # Green Hills C++ Compiler _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic' ;; *) ;; esac ;; freebsd* | dragonfly* | midnightbsd*) # FreeBSD uses GNU C++ ;; hpux9* | hpux10* | hpux11*) case $cc_basename in CC*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive' if test ia64 != "$host_cpu"; then _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z' fi ;; aCC*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive' case $host_cpu in hppa*64*|ia64*) # +Z the default ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z' ;; esac ;; *) ;; esac ;; interix*) # This is c89, which is MS Visual C++ (no shared libs) # Anyone wants to do a port? ;; irix5* | irix6* | nonstopux*) case $cc_basename in CC*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' # CC pic flag -KPIC is the default. ;; *) ;; esac ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in KCC*) # KAI C++ Compiler _LT_TAGVAR(lt_prog_compiler_wl, $1)='--backend -Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; ecpc* ) # old Intel C++ for x86_64, which still supported -KPIC. _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; icpc* ) # Intel C++, used to be incompatible with GCC. # ICC 10 doesn't accept -KPIC any more. _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; pgCC* | pgcpp*) # Portland Group C++ compiler _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; cxx*) # Compaq C++ # Make sure the PIC flag is empty. It appears that all Alpha # Linux and Compaq Tru64 Unix objects are PIC. _LT_TAGVAR(lt_prog_compiler_pic, $1)= _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; xlc* | xlC* | bgxl[[cC]]* | mpixl[[cC]]*) # IBM XL 8.0, 9.0 on PPC and BlueGene _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-qpic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-qstaticlink' ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C++ 5.9 _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ' ;; esac ;; esac ;; lynxos*) ;; m88k*) ;; mvs*) case $cc_basename in cxx*) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-W c,exportall' ;; *) ;; esac ;; netbsd*) ;; *qnx* | *nto*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared' ;; osf3* | osf4* | osf5*) case $cc_basename in KCC*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='--backend -Wl,' ;; RCC*) # Rational C++ 2.4.1 _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic' ;; cxx*) # Digital/Compaq C++ _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' # Make sure the PIC flag is empty. It appears that all Alpha # Linux and Compaq Tru64 Unix objects are PIC. _LT_TAGVAR(lt_prog_compiler_pic, $1)= _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; *) ;; esac ;; psos*) ;; solaris*) case $cc_basename in CC* | sunCC*) # Sun C++ 4.2, 5.x and Centerline C++ _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ' ;; gcx*) # Green Hills C++ Compiler _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC' ;; *) ;; esac ;; sunos4*) case $cc_basename in CC*) # Sun C++ 4.x _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; lcc*) # Lucid _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic' ;; *) ;; esac ;; sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*) case $cc_basename in CC*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; esac ;; tandem*) case $cc_basename in NCC*) # NonStop-UX NCC 3.20 _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' ;; *) ;; esac ;; vxworks*) ;; *) _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no ;; esac fi ], [ if test yes = "$GCC"; then _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' case $host_os in aix*) # All AIX code is PIC. if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' fi _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; m68k) # FIXME: we need at least 68020 code to build shared libraries, but # adding the '-m68020' flag to GCC prevents building anything better, # like '-m68040'. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-m68020 -resident32 -malways-restore-a4' ;; esac ;; beos* | irix5* | irix6* | nonstopux* | osf3* | osf4* | osf5*) # PIC is the default for these OSes. ;; mingw* | cygwin* | pw32* | os2* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). # Although the cygwin gcc ignores -fPIC, still need this for old-style # (--disable-auto-import) libraries m4_if([$1], [GCJ], [], [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT']) case $host_os in os2*) _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static' ;; esac ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common' ;; haiku*) # PIC is the default for Haiku. # The "-static" flag exists, but is broken. _LT_TAGVAR(lt_prog_compiler_static, $1)= ;; hpux*) # PIC is the default for 64-bit PA HP-UX, but not for 32-bit # PA HP-UX. On IA64 HP-UX, PIC is the default but the pic flag # sets the default TLS model and affects inlining. case $host_cpu in hppa*64*) # +Z the default ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; esac ;; interix[[3-9]]*) # Interix 3.x gcc -fpic/-fPIC options generate broken code. # Instead, we relocate shared libraries at runtime. ;; msdosdjgpp*) # Just because we use GCC doesn't mean we suddenly get shared libraries # on systems that don't support them. _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no enable_shared=no ;; *nto* | *qnx*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared' ;; sysv4*MP*) if test -d /usr/nec; then _LT_TAGVAR(lt_prog_compiler_pic, $1)=-Kconform_pic fi ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' ;; esac case $cc_basename in nvcc*) # Cuda Compiler Driver 2.2 _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Xlinker ' if test -n "$_LT_TAGVAR(lt_prog_compiler_pic, $1)"; then _LT_TAGVAR(lt_prog_compiler_pic, $1)="-Xcompiler $_LT_TAGVAR(lt_prog_compiler_pic, $1)" fi ;; esac else # PORTME Check for flag to pass linker flags through the system compiler. case $host_os in aix*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' if test ia64 = "$host_cpu"; then # AIX 5 now supports IA64 processor _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' else _LT_TAGVAR(lt_prog_compiler_static, $1)='-bnso -bI:/lib/syscalls.exp' fi ;; darwin* | rhapsody*) # PIC is the default on this platform # Common symbols not allowed in MH_DYLIB files _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fno-common' case $cc_basename in nagfor*) # NAG Fortran compiler _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,-Wl,,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; esac ;; mingw* | cygwin* | pw32* | os2* | cegcc*) # This hack is so that the source file can tell whether it is being # built for inclusion in a dll (and should export symbols for example). m4_if([$1], [GCJ], [], [_LT_TAGVAR(lt_prog_compiler_pic, $1)='-DDLL_EXPORT']) case $host_os in os2*) _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-static' ;; esac ;; hpux9* | hpux10* | hpux11*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' # PIC is the default for IA64 HP-UX and 64-bit HP-UX, but # not for PA HP-UX. case $host_cpu in hppa*64*|ia64*) # +Z the default ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)='+Z' ;; esac # Is there a better lt_prog_compiler_static that works with the bundled CC? _LT_TAGVAR(lt_prog_compiler_static, $1)='$wl-a ${wl}archive' ;; irix5* | irix6* | nonstopux*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' # PIC (with -KPIC) is the default. _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in # old Intel for x86_64, which still supported -KPIC. ecc*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; # icc used to be incompatible with GCC. # ICC 10 doesn't accept -KPIC any more. icc* | ifort*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; # Lahey Fortran 8.1. lf95*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='--shared' _LT_TAGVAR(lt_prog_compiler_static, $1)='--static' ;; nagfor*) # NAG Fortran compiler _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,-Wl,,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; tcc*) # Fabrice Bellard et al's Tiny C Compiler _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; pgcc* | pgf77* | pgf90* | pgf95* | pgfortran*) # Portland Group compilers (*not* the Pentium gcc compiler, # which looks to be a dead project) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; ccc*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' # All Alpha code is PIC. _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; xl* | bgxl* | bgf* | mpixl*) # IBM XL C 8.0/Fortran 10.1, 11.1 on PPC and BlueGene _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-qpic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-qstaticlink' ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ Ceres\ Fortran* | *Sun*Fortran*\ [[1-7]].* | *Sun*Fortran*\ 8.[[0-3]]*) # Sun Fortran 8.3 passes all unrecognized flags to the linker _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' _LT_TAGVAR(lt_prog_compiler_wl, $1)='' ;; *Sun\ F* | *Sun*Fortran*) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ' ;; *Sun\ C*) # Sun C 5.9 _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' ;; *Intel*\ [[CF]]*Compiler*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-static' ;; *Portland\ Group*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fpic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; esac ;; esac ;; newsos6) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; *nto* | *qnx*) # QNX uses GNU C++, but need to define -shared option too, otherwise # it will coredump. _LT_TAGVAR(lt_prog_compiler_pic, $1)='-fPIC -shared' ;; osf3* | osf4* | osf5*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' # All OSF/1 code is PIC. _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; rdos*) _LT_TAGVAR(lt_prog_compiler_static, $1)='-non_shared' ;; solaris*) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' case $cc_basename in f77* | f90* | f95* | sunf77* | sunf90* | sunf95*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ';; *) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,';; esac ;; sunos4*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Qoption ld ' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-PIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; sysv4 | sysv4.2uw2* | sysv4.3*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; sysv4*MP*) if test -d /usr/nec; then _LT_TAGVAR(lt_prog_compiler_pic, $1)='-Kconform_pic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' fi ;; sysv5* | unixware* | sco3.2v5* | sco5v6* | OpenUNIX*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_pic, $1)='-KPIC' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; unicos*) _LT_TAGVAR(lt_prog_compiler_wl, $1)='-Wl,' _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no ;; uts4*) _LT_TAGVAR(lt_prog_compiler_pic, $1)='-pic' _LT_TAGVAR(lt_prog_compiler_static, $1)='-Bstatic' ;; *) _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no ;; esac fi ]) case $host_os in # For platforms that do not support PIC, -DPIC is meaningless: *djgpp*) _LT_TAGVAR(lt_prog_compiler_pic, $1)= ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)="$_LT_TAGVAR(lt_prog_compiler_pic, $1)@&t@m4_if([$1],[],[ -DPIC],[m4_if([$1],[CXX],[ -DPIC],[])])" ;; esac AC_CACHE_CHECK([for $compiler option to produce PIC], [_LT_TAGVAR(lt_cv_prog_compiler_pic, $1)], [_LT_TAGVAR(lt_cv_prog_compiler_pic, $1)=$_LT_TAGVAR(lt_prog_compiler_pic, $1)]) _LT_TAGVAR(lt_prog_compiler_pic, $1)=$_LT_TAGVAR(lt_cv_prog_compiler_pic, $1) # # Check to make sure the PIC flag actually works. # if test -n "$_LT_TAGVAR(lt_prog_compiler_pic, $1)"; then _LT_COMPILER_OPTION([if $compiler PIC flag $_LT_TAGVAR(lt_prog_compiler_pic, $1) works], [_LT_TAGVAR(lt_cv_prog_compiler_pic_works, $1)], [$_LT_TAGVAR(lt_prog_compiler_pic, $1)@&t@m4_if([$1],[],[ -DPIC],[m4_if([$1],[CXX],[ -DPIC],[])])], [], [case $_LT_TAGVAR(lt_prog_compiler_pic, $1) in "" | " "*) ;; *) _LT_TAGVAR(lt_prog_compiler_pic, $1)=" $_LT_TAGVAR(lt_prog_compiler_pic, $1)" ;; esac], [_LT_TAGVAR(lt_prog_compiler_pic, $1)= _LT_TAGVAR(lt_prog_compiler_can_build_shared, $1)=no]) fi _LT_TAGDECL([pic_flag], [lt_prog_compiler_pic], [1], [Additional compiler flags for building library objects]) _LT_TAGDECL([wl], [lt_prog_compiler_wl], [1], [How to pass a linker flag through the compiler]) # # Check to make sure the static flag actually works. # wl=$_LT_TAGVAR(lt_prog_compiler_wl, $1) eval lt_tmp_static_flag=\"$_LT_TAGVAR(lt_prog_compiler_static, $1)\" _LT_LINKER_OPTION([if $compiler static flag $lt_tmp_static_flag works], _LT_TAGVAR(lt_cv_prog_compiler_static_works, $1), $lt_tmp_static_flag, [], [_LT_TAGVAR(lt_prog_compiler_static, $1)=]) _LT_TAGDECL([link_static_flag], [lt_prog_compiler_static], [1], [Compiler flag to prevent dynamic linking]) ])# _LT_COMPILER_PIC # _LT_LINKER_SHLIBS([TAGNAME]) # ---------------------------- # See if the linker supports building shared libraries. m4_defun([_LT_LINKER_SHLIBS], [AC_REQUIRE([LT_PATH_LD])dnl AC_REQUIRE([LT_PATH_NM])dnl m4_require([_LT_PATH_MANIFEST_TOOL])dnl m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_DECL_EGREP])dnl m4_require([_LT_DECL_SED])dnl m4_require([_LT_CMD_GLOBAL_SYMBOLS])dnl m4_require([_LT_TAG_COMPILER])dnl AC_MSG_CHECKING([whether the $compiler linker ($LD) supports shared libraries]) m4_if([$1], [CXX], [ _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' _LT_TAGVAR(exclude_expsyms, $1)=['_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*'] case $host_os in aix[[4-9]]*) # If we're using GNU nm, then we don't want the "-C" option. # -C means demangle to GNU nm, but means don't demangle to AIX nm. # Without the "-l" option, or with the "-B" option, AIX nm treats # weak defined symbols like other global defined symbols, whereas # GNU nm marks them as "W". # While the 'weak' keyword is ignored in the Export File, we need # it in the Import File for the 'aix-soname' feature, so we have # to replace the "-B" option with "-P" for AIX nm. if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then _LT_TAGVAR(export_symbols_cmds, $1)='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && ([substr](\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols' else _LT_TAGVAR(export_symbols_cmds, $1)='`func_echo_all $NM | $SED -e '\''s/B\([[^B]]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "L") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && ([substr](\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols' fi ;; pw32*) _LT_TAGVAR(export_symbols_cmds, $1)=$ltdll_cmds ;; cygwin* | mingw* | cegcc*) case $cc_basename in cl* | icl*) _LT_TAGVAR(exclude_expsyms, $1)='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*' ;; *) _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1 DATA/;s/^.*[[ ]]__nm__\([[^ ]]*\)[[ ]][[^ ]]*/\1 DATA/;/^I[[ ]]/d;/^[[AITW]][[ ]]/s/.* //'\'' | sort | uniq > $export_symbols' _LT_TAGVAR(exclude_expsyms, $1)=['[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname'] ;; esac ;; *) _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' ;; esac ], [ runpath_var= _LT_TAGVAR(allow_undefined_flag, $1)= _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(archive_cmds, $1)= _LT_TAGVAR(archive_expsym_cmds, $1)= _LT_TAGVAR(compiler_needs_object, $1)=no _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no _LT_TAGVAR(export_dynamic_flag_spec, $1)= _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED '\''s/.* //'\'' | sort | uniq > $export_symbols' _LT_TAGVAR(hardcode_automatic, $1)=no _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)= _LT_TAGVAR(hardcode_libdir_separator, $1)= _LT_TAGVAR(hardcode_minus_L, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported _LT_TAGVAR(inherit_rpath, $1)=no _LT_TAGVAR(link_all_deplibs, $1)=unknown _LT_TAGVAR(module_cmds, $1)= _LT_TAGVAR(module_expsym_cmds, $1)= _LT_TAGVAR(old_archive_from_new_cmds, $1)= _LT_TAGVAR(old_archive_from_expsyms_cmds, $1)= _LT_TAGVAR(thread_safe_flag_spec, $1)= _LT_TAGVAR(whole_archive_flag_spec, $1)= # include_expsyms should be a list of space-separated symbols to be *always* # included in the symbol list _LT_TAGVAR(include_expsyms, $1)= # exclude_expsyms can be an extended regexp of symbols to exclude # it will be wrapped by ' (' and ')$', so one must not match beginning or # end of line. Example: 'a|bc|.*d.*' will exclude the symbols 'a' and 'bc', # as well as any symbol that contains 'd'. _LT_TAGVAR(exclude_expsyms, $1)=['_GLOBAL_OFFSET_TABLE_|_GLOBAL__F[ID]_.*'] # Although _GLOBAL_OFFSET_TABLE_ is a valid symbol C name, most a.out # platforms (ab)use it in PIC code, but their linkers get confused if # the symbol is explicitly referenced. Since portable code cannot # rely on this symbol name, it's probably fine to never include it in # preloaded symbol tables. # Exclude shared library initialization/finalization symbols. dnl Note also adjust exclude_expsyms for C++ above. extract_expsyms_cmds= case $host_os in cygwin* | mingw* | pw32* | cegcc*) # FIXME: the MSVC++ and ICC port hasn't been tested in a loooong time # When not using gcc, we currently assume that we are using # Microsoft Visual C++ or Intel C++ Compiler. if test yes != "$GCC"; then with_gnu_ld=no fi ;; interix*) # we just hope/assume this is gcc and not c89 (= MSVC++ or ICC) with_gnu_ld=yes ;; openbsd* | bitrig*) with_gnu_ld=no ;; esac _LT_TAGVAR(ld_shlibs, $1)=yes # On some targets, GNU ld is compatible enough with the native linker # that we're better off using the native interface for both. lt_use_gnu_ld_interface=no if test yes = "$with_gnu_ld"; then case $host_os in aix*) # The AIX port of GNU ld has always aspired to compatibility # with the native linker. However, as the warning in the GNU ld # block says, versions before 2.19.5* couldn't really create working # shared libraries, regardless of the interface used. case `$LD -v 2>&1` in *\ \(GNU\ Binutils\)\ 2.19.5*) ;; *\ \(GNU\ Binutils\)\ 2.[[2-9]]*) ;; *\ \(GNU\ Binutils\)\ [[3-9]]*) ;; *) lt_use_gnu_ld_interface=yes ;; esac ;; *) lt_use_gnu_ld_interface=yes ;; esac fi if test yes = "$lt_use_gnu_ld_interface"; then # If archive_cmds runs LD, not CC, wlarc should be empty wlarc='$wl' # Set some defaults for GNU ld with shared library support. These # are reset later if shared libraries are not supported. Putting them # here allows them to be overridden if necessary. runpath_var=LD_RUN_PATH _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' # ancient GNU ld didn't support --whole-archive et. al. if $LD --help 2>&1 | $GREP 'no-whole-archive' > /dev/null; then _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' else _LT_TAGVAR(whole_archive_flag_spec, $1)= fi supports_anon_versioning=no case `$LD -v | $SED -e 's/([[^)]]\+)\s\+//' 2>&1` in *GNU\ gold*) supports_anon_versioning=yes ;; *\ [[01]].* | *\ 2.[[0-9]].* | *\ 2.10.*) ;; # catch versions < 2.11 *\ 2.11.93.0.2\ *) supports_anon_versioning=yes ;; # RH7.3 ... *\ 2.11.92.0.12\ *) supports_anon_versioning=yes ;; # Mandrake 8.2 ... *\ 2.11.*) ;; # other 2.11 versions *) supports_anon_versioning=yes ;; esac # See if GNU ld supports shared libraries. case $host_os in aix[[3-9]]*) # On AIX/PPC, the GNU linker is very broken if test ia64 != "$host_cpu"; then _LT_TAGVAR(ld_shlibs, $1)=no cat <<_LT_EOF 1>&2 *** Warning: the GNU linker, at least up to release 2.19, is reported *** to be unable to reliably create shared libraries on AIX. *** Therefore, libtool is disabling shared libraries support. If you *** really care for shared libraries, you may want to install binutils *** 2.20 or above, or modify your PATH so that a non-GNU linker is found. *** You will then need to restart the configuration process. _LT_EOF fi ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='' ;; m68k) _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_minus_L, $1)=yes ;; esac ;; beos*) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then _LT_TAGVAR(allow_undefined_flag, $1)=unsupported # Joseph Beckenbach says some releases of gcc # support --undefined. This deserves some investigation. FIXME _LT_TAGVAR(archive_cmds, $1)='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; cygwin* | mingw* | pw32* | cegcc*) # _LT_TAGVAR(hardcode_libdir_flag_spec, $1) is actually meaningless, # as there is no search path for DLLs. _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-all-symbols' _LT_TAGVAR(allow_undefined_flag, $1)=unsupported _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1 DATA/;s/^.*[[ ]]__nm__\([[^ ]]*\)[[ ]][[^ ]]*/\1 DATA/;/^I[[ ]]/d;/^[[AITW]][[ ]]/s/.* //'\'' | sort | uniq > $export_symbols' _LT_TAGVAR(exclude_expsyms, $1)=['[_]+GLOBAL_OFFSET_TABLE_|[_]+GLOBAL__[FID]_.*|[_]+head_[A-Za-z0-9_]+_dll|[A-Za-z0-9_]+_dll_iname'] if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' # If the export-symbols file already is a .def file, use it as # is; otherwise, prepend EXPORTS... _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then cp $export_symbols $output_objdir/$soname.def; else echo EXPORTS > $output_objdir/$soname.def; cat $export_symbols >> $output_objdir/$soname.def; fi~ $CC -shared $output_objdir/$soname.def $libobjs $deplibs $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; haiku*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(link_all_deplibs, $1)=yes ;; os2*) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(allow_undefined_flag, $1)=unsupported shrext_cmds=.dll _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes _LT_TAGVAR(file_list_spec, $1)='@' ;; interix[[3-9]]*) _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc. # Instead, shared libraries are loaded at an image base (0x10000000 by # default) and relocated if they conflict, which is a slow very memory # consuming and fragmenting process. To avoid this, we pick a random, # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link # time. Moving up from 0x10000000 also allows more sbrk(2) space. _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$SED "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' ;; gnu* | linux* | tpf* | k*bsd*-gnu | kopensolaris*-gnu) tmp_diet=no if test linux-dietlibc = "$host_os"; then case $cc_basename in diet\ *) tmp_diet=yes;; # linux-dietlibc with static linking (!diet-dyn) esac fi if $LD --help 2>&1 | $EGREP ': supported targets:.* elf' > /dev/null \ && test no = "$tmp_diet" then tmp_addflag=' $pic_flag' tmp_sharedflag='-shared' case $cc_basename,$host_cpu in pgcc*) # Portland Group C compiler _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' tmp_addflag=' $pic_flag' ;; pgf77* | pgf90* | pgf95* | pgfortran*) # Portland Group f77 and f90 compilers _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' tmp_addflag=' $pic_flag -Mnomain' ;; ecc*,ia64* | icc*,ia64*) # Intel C compiler on ia64 tmp_addflag=' -i_dynamic' ;; efc*,ia64* | ifort*,ia64*) # Intel Fortran compiler on ia64 tmp_addflag=' -i_dynamic -nofor_main' ;; ifc* | ifort*) # Intel Fortran compiler tmp_addflag=' -nofor_main' ;; lf95*) # Lahey Fortran 8.1 _LT_TAGVAR(whole_archive_flag_spec, $1)= tmp_sharedflag='--shared' ;; nagfor*) # NAGFOR 5.3 tmp_sharedflag='-Wl,-shared' ;; xl[[cC]]* | bgxl[[cC]]* | mpixl[[cC]]*) # IBM XL C 8.0 on PPC (deal with xlf below) tmp_sharedflag='-qmkshrobj' tmp_addflag= ;; nvcc*) # Cuda Compiler Driver 2.2 _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' _LT_TAGVAR(compiler_needs_object, $1)=yes ;; esac case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C 5.9 _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' _LT_TAGVAR(compiler_needs_object, $1)=yes tmp_sharedflag='-G' ;; *Sun\ F*) # Sun Fortran 8.3 tmp_sharedflag='-G' ;; esac _LT_TAGVAR(archive_cmds, $1)='$CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' if test yes = "$supports_anon_versioning"; then _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $CC '"$tmp_sharedflag""$tmp_addflag"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib' fi case $cc_basename in tcc*) _LT_TAGVAR(export_dynamic_flag_spec, $1)='-rdynamic' ;; xlf* | bgf* | bgxlf* | mpixlf*) # IBM XL Fortran 10.1 on PPC cannot create shared libs itself _LT_TAGVAR(whole_archive_flag_spec, $1)='--whole-archive$convenience --no-whole-archive' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(archive_cmds, $1)='$LD -shared $libobjs $deplibs $linker_flags -soname $soname -o $lib' if test yes = "$supports_anon_versioning"; then _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $LD -shared $libobjs $deplibs $linker_flags -soname $soname -version-script $output_objdir/$libname.ver -o $lib' fi ;; esac else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable $libobjs $deplibs $linker_flags -o $lib' wlarc= else _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' fi ;; solaris*) if $LD -v 2>&1 | $GREP 'BFD 2\.8' > /dev/null; then _LT_TAGVAR(ld_shlibs, $1)=no cat <<_LT_EOF 1>&2 *** Warning: The releases 2.8.* of the GNU linker cannot reliably *** create shared libraries on Solaris systems. Therefore, libtool *** is disabling shared libraries support. We urge you to upgrade GNU *** binutils to release 2.9.1 or newer. Another option is to modify *** your PATH or compiler configuration so that the native linker is *** used, and then restart. _LT_EOF elif $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; sysv5* | sco3.2v5* | sco5v6* | unixware* | OpenUNIX*) case `$LD -v 2>&1` in *\ [[01]].* | *\ 2.[[0-9]].* | *\ 2.1[[0-5]].*) _LT_TAGVAR(ld_shlibs, $1)=no cat <<_LT_EOF 1>&2 *** Warning: Releases of the GNU linker prior to 2.16.91.0.3 cannot *** reliably create shared libraries on SCO systems. Therefore, libtool *** is disabling shared libraries support. We urge you to upgrade GNU *** binutils to release 2.16.91.0.3 or newer. Another option is to modify *** your PATH or compiler configuration so that the native linker is *** used, and then restart. _LT_EOF ;; *) # For security reasons, it is highly recommended that you always # use absolute paths for naming shared libraries, and exclude the # DT_RUNPATH tag from executables and libraries. But doing so # requires that you compile everything twice, which is a pain. if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac ;; sunos4*) _LT_TAGVAR(archive_cmds, $1)='$LD -assert pure-text -Bshareable -o $lib $libobjs $deplibs $linker_flags' wlarc= _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; *) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac if test no = "$_LT_TAGVAR(ld_shlibs, $1)"; then runpath_var= _LT_TAGVAR(hardcode_libdir_flag_spec, $1)= _LT_TAGVAR(export_dynamic_flag_spec, $1)= _LT_TAGVAR(whole_archive_flag_spec, $1)= fi else # PORTME fill in a description of your system's linker (not GNU ld) case $host_os in aix3*) _LT_TAGVAR(allow_undefined_flag, $1)=unsupported _LT_TAGVAR(always_export_symbols, $1)=yes _LT_TAGVAR(archive_expsym_cmds, $1)='$LD -o $output_objdir/$soname $libobjs $deplibs $linker_flags -bE:$export_symbols -T512 -H512 -bM:SRE~$AR $AR_FLAGS $lib $output_objdir/$soname' # Note: this linker hardcodes the directories in LIBPATH if there # are no directories specified by -L. _LT_TAGVAR(hardcode_minus_L, $1)=yes if test yes = "$GCC" && test -z "$lt_prog_compiler_static"; then # Neither direct hardcoding nor static linking is supported with a # broken collect2. _LT_TAGVAR(hardcode_direct, $1)=unsupported fi ;; aix[[4-9]]*) if test ia64 = "$host_cpu"; then # On IA64, the linker does run time linking by default, so we don't # have to do anything special. aix_use_runtimelinking=no exp_sym_flag='-Bexport' no_entry_flag= else # If we're using GNU nm, then we don't want the "-C" option. # -C means demangle to GNU nm, but means don't demangle to AIX nm. # Without the "-l" option, or with the "-B" option, AIX nm treats # weak defined symbols like other global defined symbols, whereas # GNU nm marks them as "W". # While the 'weak' keyword is ignored in the Export File, we need # it in the Import File for the 'aix-soname' feature, so we have # to replace the "-B" option with "-P" for AIX nm. if $NM -V 2>&1 | $GREP 'GNU' > /dev/null; then _LT_TAGVAR(export_symbols_cmds, $1)='$NM -Bpg $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "W")) && ([substr](\$ 3,1,1) != ".")) { if (\$ 2 == "W") { print \$ 3 " weak" } else { print \$ 3 } } }'\'' | sort -u > $export_symbols' else _LT_TAGVAR(export_symbols_cmds, $1)='`func_echo_all $NM | $SED -e '\''s/B\([[^B]]*\)$/P\1/'\''` -PCpgl $libobjs $convenience | awk '\''{ if (((\$ 2 == "T") || (\$ 2 == "D") || (\$ 2 == "B") || (\$ 2 == "L") || (\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) && ([substr](\$ 1,1,1) != ".")) { if ((\$ 2 == "W") || (\$ 2 == "V") || (\$ 2 == "Z")) { print \$ 1 " weak" } else { print \$ 1 } } }'\'' | sort -u > $export_symbols' fi aix_use_runtimelinking=no # Test if we are trying to use run time linking or normal # AIX style linking. If -brtl is somewhere in LDFLAGS, we # have runtime linking enabled, and use it for executables. # For shared libraries, we enable/disable runtime linking # depending on the kind of the shared library created - # when "with_aix_soname,aix_use_runtimelinking" is: # "aix,no" lib.a(lib.so.V) shared, rtl:no, for executables # "aix,yes" lib.so shared, rtl:yes, for executables # lib.a static archive # "both,no" lib.so.V(shr.o) shared, rtl:yes # lib.a(lib.so.V) shared, rtl:no, for executables # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a(lib.so.V) shared, rtl:no # "svr4,*" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a static archive case $host_os in aix4.[[23]]|aix4.[[23]].*|aix[[5-9]]*) for ld_flag in $LDFLAGS; do if (test x-brtl = "x$ld_flag" || test x-Wl,-brtl = "x$ld_flag"); then aix_use_runtimelinking=yes break fi done if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then # With aix-soname=svr4, we create the lib.so.V shared archives only, # so we don't have lib.a shared libs to link our executables. # We have to force runtime linking in this case. aix_use_runtimelinking=yes LDFLAGS="$LDFLAGS -Wl,-brtl" fi ;; esac exp_sym_flag='-bexport' no_entry_flag='-bnoentry' fi # When large executables or shared objects are built, AIX ld can # have problems creating the table of contents. If linking a library # or program results in "error TOC overflow" add -mminimal-toc to # CXXFLAGS/CFLAGS for g++/gcc. In the cases where that is not # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS. _LT_TAGVAR(archive_cmds, $1)='' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(hardcode_libdir_separator, $1)=':' _LT_TAGVAR(link_all_deplibs, $1)=yes _LT_TAGVAR(file_list_spec, $1)='$wl-f,' case $with_aix_soname,$aix_use_runtimelinking in aix,*) ;; # traditional, no import file svr4,* | *,yes) # use import file # The Import File defines what to hardcode. _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no ;; esac if test yes = "$GCC"; then case $host_os in aix4.[[012]]|aix4.[[012]].*) # We only want to do this on AIX 4.2 and lower, the check # below for broken collect2 doesn't work under 4.3+ collect2name=`$CC -print-prog-name=collect2` if test -f "$collect2name" && strings "$collect2name" | $GREP resolve_lib_name >/dev/null then # We have reworked collect2 : else # We have old collect2 _LT_TAGVAR(hardcode_direct, $1)=unsupported # It fails to find uninstalled libraries when the uninstalled # path is not listed in the libpath. Setting hardcode_minus_L # to unsupported forces relinking _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)= fi ;; esac shared_flag='-shared' if test yes = "$aix_use_runtimelinking"; then shared_flag="$shared_flag "'$wl-G' fi # Need to ensure runtime linking is disabled for the traditional # shared library, or the linker may eventually find shared libraries # /with/ Import File - we do not want to mix them. shared_flag_aix='-shared' shared_flag_svr4='-shared $wl-G' else # not using gcc if test ia64 = "$host_cpu"; then # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release # chokes on -Wl,-G. The following line is correct: shared_flag='-G' else if test yes = "$aix_use_runtimelinking"; then shared_flag='$wl-G' else shared_flag='$wl-bM:SRE' fi shared_flag_aix='$wl-bM:SRE' shared_flag_svr4='$wl-G' fi fi _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-bexpall' # It seems that -bexpall does not export symbols beginning with # underscore (_), so it is better to generate a list of symbols to export. _LT_TAGVAR(always_export_symbols, $1)=yes if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then # Warning - without using the other runtime loading flags (-brtl), # -berok will link without error, but may produce a broken library. _LT_TAGVAR(allow_undefined_flag, $1)='-berok' # Determine the default libpath from the value encoded in an # empty executable. _LT_SYS_MODULE_PATH_AIX([$1]) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath" _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag else if test ia64 = "$host_cpu"; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $libdir:/usr/lib:/lib' _LT_TAGVAR(allow_undefined_flag, $1)="-z nodefs" _LT_TAGVAR(archive_expsym_cmds, $1)="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols" else # Determine the default libpath from the value encoded in an # empty executable. _LT_SYS_MODULE_PATH_AIX([$1]) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath" # Warning - without using the other run time loading flags, # -berok will link without error, but may produce a broken library. _LT_TAGVAR(no_undefined_flag, $1)=' $wl-bernotok' _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-berok' if test yes = "$with_gnu_ld"; then # We only use this code for GNU lds that support --whole-archive. _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive' else # Exported symbols can be pulled into shared objects from archives _LT_TAGVAR(whole_archive_flag_spec, $1)='$convenience' fi _LT_TAGVAR(archive_cmds_need_lc, $1)=yes _LT_TAGVAR(archive_expsym_cmds, $1)='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d' # -brtl affects multiple linker settings, -berok does not and is overridden later compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([[, ]]\\)%-berok\\1%g"`' if test svr4 != "$with_aix_soname"; then # This is similar to how AIX traditionally builds its shared libraries. _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname' fi if test aix != "$with_aix_soname"; then _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp' else # used by -dlpreopen to get the symbols _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$MV $output_objdir/$realname.d/$soname $output_objdir' fi _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$RM -r $output_objdir/$realname.d' fi fi ;; amigaos*) case $host_cpu in powerpc) # see comment about AmigaOS4 .so support _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='' ;; m68k) _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/a2ixlibrary.data~$ECHO "#define NAME $libname" > $output_objdir/a2ixlibrary.data~$ECHO "#define LIBRARY_ID 1" >> $output_objdir/a2ixlibrary.data~$ECHO "#define VERSION $major" >> $output_objdir/a2ixlibrary.data~$ECHO "#define REVISION $revision" >> $output_objdir/a2ixlibrary.data~$AR $AR_FLAGS $lib $libobjs~$RANLIB $lib~(cd $output_objdir && a2ixlibrary -32)' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_minus_L, $1)=yes ;; esac ;; bsdi[[45]]*) _LT_TAGVAR(export_dynamic_flag_spec, $1)=-rdynamic ;; cygwin* | mingw* | pw32* | cegcc*) # When not using gcc, we currently assume that we are using # Microsoft Visual C++ or Intel C++ Compiler. # hardcode_libdir_flag_spec is actually meaningless, as there is # no search path for DLLs. case $cc_basename in cl* | icl*) # Native MSVC or ICC _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' ' _LT_TAGVAR(allow_undefined_flag, $1)=unsupported _LT_TAGVAR(always_export_symbols, $1)=yes _LT_TAGVAR(file_list_spec, $1)='@' # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. _LT_TAGVAR(archive_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames=' _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then cp "$export_symbols" "$output_objdir/$soname.def"; echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp"; else $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp; fi~ $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~ linknames=' # The linker will not automatically build a static lib if we build a DLL. # _LT_TAGVAR(old_archive_from_new_cmds, $1)='true' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes _LT_TAGVAR(exclude_expsyms, $1)='_NULL_IMPORT_DESCRIPTOR|_IMPORT_DESCRIPTOR_.*' _LT_TAGVAR(export_symbols_cmds, $1)='$NM $libobjs $convenience | $global_symbol_pipe | $SED -e '\''/^[[BCDGRS]][[ ]]/s/.*[[ ]]\([[^ ]]*\)/\1,DATA/'\'' | $SED -e '\''/^[[AITW]][[ ]]/s/.*[[ ]]//'\'' | sort | uniq > $export_symbols' # Don't use ranlib _LT_TAGVAR(old_postinstall_cmds, $1)='chmod 644 $oldlib' _LT_TAGVAR(postlink_cmds, $1)='lt_outputfile="@OUTPUT@"~ lt_tool_outputfile="@TOOL_OUTPUT@"~ case $lt_outputfile in *.exe|*.EXE) ;; *) lt_outputfile=$lt_outputfile.exe lt_tool_outputfile=$lt_tool_outputfile.exe ;; esac~ if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1; $RM "$lt_outputfile.manifest"; fi' ;; *) # Assume MSVC and ICC wrapper _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' ' _LT_TAGVAR(allow_undefined_flag, $1)=unsupported # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. _LT_TAGVAR(archive_cmds, $1)='$CC -o $lib $libobjs $compiler_flags `func_echo_all "$deplibs" | $SED '\''s/ -lc$//'\''` -link -dll~linknames=' # The linker will automatically build a .lib file if we build a DLL. _LT_TAGVAR(old_archive_from_new_cmds, $1)='true' # FIXME: Should let the user specify the lib program. _LT_TAGVAR(old_archive_cmds, $1)='lib -OUT:$oldlib$oldobjs$old_deplibs' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes ;; esac ;; darwin* | rhapsody*) _LT_DARWIN_LINKER_FEATURES($1) ;; dgux*) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; # FreeBSD 2.2.[012] allows us to include c++rt0.o to get C++ constructor # support. Future versions do this automatically, but an explicit c++rt0.o # does not break anything, and helps significantly (at the cost of a little # extra space). freebsd2.2*) _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags /usr/lib/c++rt0.o' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; # Unfortunately, older versions of FreeBSD 2 do not have this feature. freebsd2.*) _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; # FreeBSD 3 and greater uses gcc -shared to do shared libraries. freebsd* | dragonfly* | midnightbsd*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; hpux9*) if test yes = "$GCC"; then _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -shared $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $libobjs $deplibs $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' else _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$LD -b +b $install_libdir -o $output_objdir/$soname $libobjs $deplibs $linker_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' fi _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(hardcode_direct, $1)=yes # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' ;; hpux10*) if test yes,no = "$GCC,$with_gnu_ld"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags' else _LT_TAGVAR(archive_cmds, $1)='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags' fi if test no = "$with_gnu_ld"; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. _LT_TAGVAR(hardcode_minus_L, $1)=yes fi ;; hpux11*) if test yes,no = "$GCC,$with_gnu_ld"; then case $host_cpu in hppa*64*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' ;; ia64*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags' ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags' ;; esac else case $host_cpu in hppa*64*) _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' ;; ia64*) _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $libobjs $deplibs $compiler_flags' ;; *) m4_if($1, [], [ # Older versions of the 11.00 compiler do not understand -b yet # (HP92453-01 A.11.01.20 doesn't, HP92453-01 B.11.X.35175-35176.GP does) _LT_LINKER_OPTION([if $CC understands -b], _LT_TAGVAR(lt_cv_prog_compiler__b, $1), [-b], [_LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags'], [_LT_TAGVAR(archive_cmds, $1)='$LD -b +h $soname +b $install_libdir -o $lib $libobjs $deplibs $linker_flags'])], [_LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $libobjs $deplibs $compiler_flags']) ;; esac fi if test no = "$with_gnu_ld"; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: case $host_cpu in hppa*64*|ia64*) _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; *) _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' # hardcode_minus_L: Not really in the search PATH, # but as the default location of the library. _LT_TAGVAR(hardcode_minus_L, $1)=yes ;; esac fi ;; irix5* | irix6* | nonstopux*) if test yes = "$GCC"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' # Try to use the -exported_symbol ld option, if it does not # work, assume that -exports_file does not work either and # implicitly export all symbols. # This should be the same for all languages, so no per-tag cache variable. AC_CACHE_CHECK([whether the $host_os linker accepts -exported_symbol], [lt_cv_irix_exported_symbol], [save_LDFLAGS=$LDFLAGS LDFLAGS="$LDFLAGS -shared $wl-exported_symbol ${wl}foo $wl-update_registry $wl/dev/null" AC_LINK_IFELSE( [AC_LANG_SOURCE( [AC_LANG_CASE([C], [[int foo (void) { return 0; }]], [C++], [[int foo (void) { return 0; }]], [Fortran 77], [[ subroutine foo end]], [Fortran], [[ subroutine foo end]])])], [lt_cv_irix_exported_symbol=yes], [lt_cv_irix_exported_symbol=no]) LDFLAGS=$save_LDFLAGS]) if test yes = "$lt_cv_irix_exported_symbol"; then _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations $wl-exports_file $wl$export_symbols -o $lib' fi else _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -exports_file $export_symbols -o $lib' fi _LT_TAGVAR(archive_cmds_need_lc, $1)='no' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(inherit_rpath, $1)=yes _LT_TAGVAR(link_all_deplibs, $1)=yes ;; linux*) case $cc_basename in tcc*) # Fabrice Bellard et al's Tiny C Compiler _LT_TAGVAR(ld_shlibs, $1)=yes _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $libobjs $deplibs $linker_flags' # a.out else _LT_TAGVAR(archive_cmds, $1)='$LD -shared -o $lib $libobjs $deplibs $linker_flags' # ELF fi _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; newsos6) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; *nto* | *qnx*) ;; openbsd* | bitrig*) if test -f /usr/libexec/ld.so; then _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=yes if test -z "`echo __ELF__ | $CC -E - | $GREP __ELF__`"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags $wl-retain-symbols-file,$export_symbols' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' else _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' fi else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; os2*) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(allow_undefined_flag, $1)=unsupported shrext_cmds=.dll _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes _LT_TAGVAR(file_list_spec, $1)='@' ;; osf3*) if test yes = "$GCC"; then _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' else _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' fi _LT_TAGVAR(archive_cmds_need_lc, $1)='no' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: ;; osf4* | osf5*) # as osf3* with the addition of -msym flag if test yes = "$GCC"; then _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $pic_flag $libobjs $deplibs $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' else _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $libobjs $deplibs $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done; printf "%s\\n" "-hidden">> $lib.exp~ $CC -shared$allow_undefined_flag $wl-input $wl$lib.exp $compiler_flags $libobjs $deplibs -soname $soname `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~$RM $lib.exp' # Both c and cxx compiler support -rpath directly _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir' fi _LT_TAGVAR(archive_cmds_need_lc, $1)='no' _LT_TAGVAR(hardcode_libdir_separator, $1)=: ;; solaris*) _LT_TAGVAR(no_undefined_flag, $1)=' -z defs' if test yes = "$GCC"; then wlarc='$wl' _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $wl-z ${wl}text $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -shared $pic_flag $wl-z ${wl}text $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp' else case `$CC -V 2>&1` in *"Compilers 5.0"*) wlarc='' _LT_TAGVAR(archive_cmds, $1)='$LD -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $LD -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $linker_flags~$RM $lib.exp' ;; *) wlarc='$wl' _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h $soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G$allow_undefined_flag -M $lib.exp -h $soname -o $lib $libobjs $deplibs $compiler_flags~$RM $lib.exp' ;; esac fi _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no case $host_os in solaris2.[[0-5]] | solaris2.[[0-5]].*) ;; *) # The compiler driver will combine and reorder linker options, # but understands '-z linker_flag'. GCC discards it without '$wl', # but is careful enough not to reorder. # Supported since Solaris 2.6 (maybe 2.5.1?) if test yes = "$GCC"; then _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract' else _LT_TAGVAR(whole_archive_flag_spec, $1)='-z allextract$convenience -z defaultextract' fi ;; esac _LT_TAGVAR(link_all_deplibs, $1)=yes ;; sunos4*) if test sequent = "$host_vendor"; then # Use $CC to link under sequent, because it throws in some extra .o # files that make .init and .fini sections work. _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h $soname -o $lib $libobjs $deplibs $compiler_flags' else _LT_TAGVAR(archive_cmds, $1)='$LD -assert pure-text -Bstatic -o $lib $libobjs $deplibs $linker_flags' fi _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; sysv4) case $host_vendor in sni) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_direct, $1)=yes # is this really true??? ;; siemens) ## LD is ld it makes a PLAMLIB ## CC just makes a GrossModule. _LT_TAGVAR(archive_cmds, $1)='$LD -G -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(reload_cmds, $1)='$CC -r -o $output$reload_objs' _LT_TAGVAR(hardcode_direct, $1)=no ;; motorola) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_direct, $1)=no #Motorola manual says yes, but my tests say they lie ;; esac runpath_var='LD_RUN_PATH' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; sysv4.3*) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(export_dynamic_flag_spec, $1)='-Bexport' ;; sysv4*MP*) if test -d /usr/nec; then _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no runpath_var=LD_RUN_PATH hardcode_runpath_var=yes _LT_TAGVAR(ld_shlibs, $1)=yes fi ;; sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[[01]].[[10]]* | unixware7* | sco3.2v5.0.[[024]]*) _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text' _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no runpath_var='LD_RUN_PATH' if test yes = "$GCC"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' else _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' fi ;; sysv5* | sco3.2v5* | sco5v6*) # Note: We CANNOT use -z defs as we might desire, because we do not # link with -lc, and that would cause any symbols used from libc to # always be unresolved, which means just about no library would # ever link correctly. If we're not using GNU ld we use -z text # though, which does catch some bad symbols but isn't as heavy-handed # as -z defs. _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text' _LT_TAGVAR(allow_undefined_flag, $1)='$wl-z,nodefs' _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R,$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=':' _LT_TAGVAR(link_all_deplibs, $1)=yes _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Bexport' runpath_var='LD_RUN_PATH' if test yes = "$GCC"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' else _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' fi ;; uts4*) _LT_TAGVAR(archive_cmds, $1)='$LD -G -h $soname -o $lib $libobjs $deplibs $linker_flags' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; *) _LT_TAGVAR(ld_shlibs, $1)=no ;; esac if test sni = "$host_vendor"; then case $host in sysv4 | sysv4.2uw2* | sysv4.3* | sysv5*) _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Blargedynsym' ;; esac fi fi ]) AC_MSG_RESULT([$_LT_TAGVAR(ld_shlibs, $1)]) test no = "$_LT_TAGVAR(ld_shlibs, $1)" && can_build_shared=no _LT_TAGVAR(with_gnu_ld, $1)=$with_gnu_ld _LT_DECL([], [libext], [0], [Old archive suffix (normally "a")])dnl _LT_DECL([], [shrext_cmds], [1], [Shared library suffix (normally ".so")])dnl _LT_DECL([], [extract_expsyms_cmds], [2], [The commands to extract the exported symbol list from a shared archive]) # # Do we need to explicitly link libc? # case "x$_LT_TAGVAR(archive_cmds_need_lc, $1)" in x|xyes) # Assume -lc should be added _LT_TAGVAR(archive_cmds_need_lc, $1)=yes if test yes,yes = "$GCC,$enable_shared"; then case $_LT_TAGVAR(archive_cmds, $1) in *'~'*) # FIXME: we may have to deal with multi-command sequences. ;; '$CC '*) # Test whether the compiler implicitly links with -lc since on some # systems, -lgcc has to come before -lc. If gcc already passes -lc # to ld, don't add -lc before -lgcc. AC_CACHE_CHECK([whether -lc should be explicitly linked in], [lt_cv_]_LT_TAGVAR(archive_cmds_need_lc, $1), [$RM conftest* echo "$lt_simple_compile_test_code" > conftest.$ac_ext if AC_TRY_EVAL(ac_compile) 2>conftest.err; then soname=conftest lib=conftest libobjs=conftest.$ac_objext deplibs= wl=$_LT_TAGVAR(lt_prog_compiler_wl, $1) pic_flag=$_LT_TAGVAR(lt_prog_compiler_pic, $1) compiler_flags=-v linker_flags=-v verstring= output_objdir=. libname=conftest lt_save_allow_undefined_flag=$_LT_TAGVAR(allow_undefined_flag, $1) _LT_TAGVAR(allow_undefined_flag, $1)= if AC_TRY_EVAL(_LT_TAGVAR(archive_cmds, $1) 2\>\&1 \| $GREP \" -lc \" \>/dev/null 2\>\&1) then lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1)=no else lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1)=yes fi _LT_TAGVAR(allow_undefined_flag, $1)=$lt_save_allow_undefined_flag else cat conftest.err 1>&5 fi $RM conftest* ]) _LT_TAGVAR(archive_cmds_need_lc, $1)=$lt_cv_[]_LT_TAGVAR(archive_cmds_need_lc, $1) ;; esac fi ;; esac _LT_TAGDECL([build_libtool_need_lc], [archive_cmds_need_lc], [0], [Whether or not to add -lc for building shared libraries]) _LT_TAGDECL([allow_libtool_libs_with_static_runtimes], [enable_shared_with_static_runtimes], [0], [Whether or not to disallow shared libs when runtime libs are static]) _LT_TAGDECL([], [export_dynamic_flag_spec], [1], [Compiler flag to allow reflexive dlopens]) _LT_TAGDECL([], [whole_archive_flag_spec], [1], [Compiler flag to generate shared objects directly from archives]) _LT_TAGDECL([], [compiler_needs_object], [1], [Whether the compiler copes with passing no objects directly]) _LT_TAGDECL([], [old_archive_from_new_cmds], [2], [Create an old-style archive from a shared archive]) _LT_TAGDECL([], [old_archive_from_expsyms_cmds], [2], [Create a temporary old-style archive to link instead of a shared archive]) _LT_TAGDECL([], [archive_cmds], [2], [Commands used to build a shared archive]) _LT_TAGDECL([], [archive_expsym_cmds], [2]) _LT_TAGDECL([], [module_cmds], [2], [Commands used to build a loadable module if different from building a shared archive.]) _LT_TAGDECL([], [module_expsym_cmds], [2]) _LT_TAGDECL([], [with_gnu_ld], [1], [Whether we are building with GNU ld or not]) _LT_TAGDECL([], [allow_undefined_flag], [1], [Flag that allows shared libraries with undefined symbols to be built]) _LT_TAGDECL([], [no_undefined_flag], [1], [Flag that enforces no undefined symbols]) _LT_TAGDECL([], [hardcode_libdir_flag_spec], [1], [Flag to hardcode $libdir into a binary during linking. This must work even if $libdir does not exist]) _LT_TAGDECL([], [hardcode_libdir_separator], [1], [Whether we need a single "-rpath" flag with a separated argument]) _LT_TAGDECL([], [hardcode_direct], [0], [Set to "yes" if using DIR/libNAME$shared_ext during linking hardcodes DIR into the resulting binary]) _LT_TAGDECL([], [hardcode_direct_absolute], [0], [Set to "yes" if using DIR/libNAME$shared_ext during linking hardcodes DIR into the resulting binary and the resulting library dependency is "absolute", i.e impossible to change by setting $shlibpath_var if the library is relocated]) _LT_TAGDECL([], [hardcode_minus_L], [0], [Set to "yes" if using the -LDIR flag during linking hardcodes DIR into the resulting binary]) _LT_TAGDECL([], [hardcode_shlibpath_var], [0], [Set to "yes" if using SHLIBPATH_VAR=DIR during linking hardcodes DIR into the resulting binary]) _LT_TAGDECL([], [hardcode_automatic], [0], [Set to "yes" if building a shared library automatically hardcodes DIR into the library and all subsequent libraries and executables linked against it]) _LT_TAGDECL([], [inherit_rpath], [0], [Set to yes if linker adds runtime paths of dependent libraries to runtime path list]) _LT_TAGDECL([], [link_all_deplibs], [0], [Whether libtool must link a program against all its dependency libraries]) _LT_TAGDECL([], [always_export_symbols], [0], [Set to "yes" if exported symbols are required]) _LT_TAGDECL([], [export_symbols_cmds], [2], [The commands to list exported symbols]) _LT_TAGDECL([], [exclude_expsyms], [1], [Symbols that should not be listed in the preloaded symbols]) _LT_TAGDECL([], [include_expsyms], [1], [Symbols that must always be exported]) _LT_TAGDECL([], [prelink_cmds], [2], [Commands necessary for linking programs (against libraries) with templates]) _LT_TAGDECL([], [postlink_cmds], [2], [Commands necessary for finishing linking programs]) _LT_TAGDECL([], [file_list_spec], [1], [Specify filename containing input files]) dnl FIXME: Not yet implemented dnl _LT_TAGDECL([], [thread_safe_flag_spec], [1], dnl [Compiler flag to generate thread safe objects]) ])# _LT_LINKER_SHLIBS # _LT_LANG_C_CONFIG([TAG]) # ------------------------ # Ensure that the configuration variables for a C compiler are suitably # defined. These variables are subsequently used by _LT_CONFIG to write # the compiler configuration to 'libtool'. m4_defun([_LT_LANG_C_CONFIG], [m4_require([_LT_DECL_EGREP])dnl lt_save_CC=$CC AC_LANG_PUSH(C) # Source file extension for C test sources. ac_ext=c # Object file extension for compiled C test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # Code to be used in simple compile tests lt_simple_compile_test_code="int some_variable = 0;" # Code to be used in simple link tests lt_simple_link_test_code='int main(){return(0);}' _LT_TAG_COMPILER # Save the default compiler, since it gets overwritten when the other # tags are being tested, and _LT_TAGVAR(compiler, []) is a NOP. compiler_DEFAULT=$CC # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... if test -n "$compiler"; then _LT_COMPILER_NO_RTTI($1) _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_SYS_DYNAMIC_LINKER($1) _LT_LINKER_HARDCODE_LIBPATH($1) LT_SYS_DLOPEN_SELF _LT_CMD_STRIPLIB # Report what library types will actually be built AC_MSG_CHECKING([if libtool supports shared libraries]) AC_MSG_RESULT([$can_build_shared]) AC_MSG_CHECKING([whether to build shared libraries]) test no = "$can_build_shared" && enable_shared=no # On AIX, shared libraries and static libraries use the same namespace, and # are all built from PIC. case $host_os in aix3*) test yes = "$enable_shared" && enable_static=no if test -n "$RANLIB"; then archive_cmds="$archive_cmds~\$RANLIB \$lib" postinstall_cmds='$RANLIB $lib' fi ;; aix[[4-9]]*) if test ia64 != "$host_cpu"; then case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in yes,aix,yes) ;; # shared object as lib.so file only yes,svr4,*) ;; # shared object as lib.so archive member only yes,*) enable_static=no ;; # shared object in lib.a archive as well esac fi ;; esac AC_MSG_RESULT([$enable_shared]) AC_MSG_CHECKING([whether to build static libraries]) # Make sure either enable_shared or enable_static is yes. test yes = "$enable_shared" || enable_static=yes AC_MSG_RESULT([$enable_static]) _LT_CONFIG($1) fi AC_LANG_POP CC=$lt_save_CC ])# _LT_LANG_C_CONFIG # _LT_LANG_CXX_CONFIG([TAG]) # -------------------------- # Ensure that the configuration variables for a C++ compiler are suitably # defined. These variables are subsequently used by _LT_CONFIG to write # the compiler configuration to 'libtool'. m4_defun([_LT_LANG_CXX_CONFIG], [m4_require([_LT_FILEUTILS_DEFAULTS])dnl m4_require([_LT_DECL_EGREP])dnl m4_require([_LT_PATH_MANIFEST_TOOL])dnl if test -n "$CXX" && ( test no != "$CXX" && ( (test g++ = "$CXX" && `g++ -v >/dev/null 2>&1` ) || (test g++ != "$CXX"))); then AC_PROG_CXXCPP else _lt_caught_CXX_error=yes fi AC_LANG_PUSH(C++) _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(allow_undefined_flag, $1)= _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(archive_expsym_cmds, $1)= _LT_TAGVAR(compiler_needs_object, $1)=no _LT_TAGVAR(export_dynamic_flag_spec, $1)= _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)= _LT_TAGVAR(hardcode_libdir_separator, $1)= _LT_TAGVAR(hardcode_minus_L, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=unsupported _LT_TAGVAR(hardcode_automatic, $1)=no _LT_TAGVAR(inherit_rpath, $1)=no _LT_TAGVAR(module_cmds, $1)= _LT_TAGVAR(module_expsym_cmds, $1)= _LT_TAGVAR(link_all_deplibs, $1)=unknown _LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds _LT_TAGVAR(reload_flag, $1)=$reload_flag _LT_TAGVAR(reload_cmds, $1)=$reload_cmds _LT_TAGVAR(no_undefined_flag, $1)= _LT_TAGVAR(whole_archive_flag_spec, $1)= _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no # Source file extension for C++ test sources. ac_ext=cpp # Object file extension for compiled C++ test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # No sense in running all these tests if we already determined that # the CXX compiler isn't working. Some variables (like enable_shared) # are currently assumed to apply to all compilers on this platform, # and will be corrupted by setting them based on a non-working compiler. if test yes != "$_lt_caught_CXX_error"; then # Code to be used in simple compile tests lt_simple_compile_test_code="int some_variable = 0;" # Code to be used in simple link tests lt_simple_link_test_code='int main(int, char *[[]]) { return(0); }' # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_CFLAGS=$CFLAGS lt_save_LD=$LD lt_save_GCC=$GCC GCC=$GXX lt_save_with_gnu_ld=$with_gnu_ld lt_save_path_LD=$lt_cv_path_LD if test -n "${lt_cv_prog_gnu_ldcxx+set}"; then lt_cv_prog_gnu_ld=$lt_cv_prog_gnu_ldcxx else $as_unset lt_cv_prog_gnu_ld fi if test -n "${lt_cv_path_LDCXX+set}"; then lt_cv_path_LD=$lt_cv_path_LDCXX else $as_unset lt_cv_path_LD fi test -z "${LDCXX+set}" || LD=$LDCXX CC=${CXX-"c++"} CFLAGS=$CXXFLAGS compiler=$CC _LT_TAGVAR(compiler, $1)=$CC _LT_CC_BASENAME([$compiler]) if test -n "$compiler"; then # We don't want -fno-exception when compiling C++ code, so set the # no_builtin_flag separately if test yes = "$GXX"; then _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)=' -fno-builtin' else _LT_TAGVAR(lt_prog_compiler_no_builtin_flag, $1)= fi if test yes = "$GXX"; then # Set up default GNU C++ configuration LT_PATH_LD # Check if GNU C++ uses GNU ld as the underlying linker, since the # archiving commands below assume that GNU ld is being used. if test yes = "$with_gnu_ld"; then _LT_TAGVAR(archive_cmds, $1)='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC $pic_flag -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' # If archive_cmds runs LD, not CC, wlarc should be empty # XXX I think wlarc can be eliminated in ltcf-cxx, but I need to # investigate it a little bit more. (MM) wlarc='$wl' # ancient GNU ld didn't support --whole-archive et. al. if eval "`$CC -print-prog-name=ld` --help 2>&1" | $GREP 'no-whole-archive' > /dev/null; then _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' else _LT_TAGVAR(whole_archive_flag_spec, $1)= fi else with_gnu_ld=no wlarc= # A generic and very simple default shared library creation # command for GNU C++ for the case where it uses the native # linker, instead of GNU ld. If possible, this setting should # overridden to take advantage of the native linker features on # the platform it is being used on. _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib' fi # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else GXX=no with_gnu_ld=no wlarc= fi # PORTME: fill in a description of your system's C++ link characteristics AC_MSG_CHECKING([whether the $compiler linker ($LD) supports shared libraries]) _LT_TAGVAR(ld_shlibs, $1)=yes case $host_os in aix3*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; aix[[4-9]]*) if test ia64 = "$host_cpu"; then # On IA64, the linker does run time linking by default, so we don't # have to do anything special. aix_use_runtimelinking=no exp_sym_flag='-Bexport' no_entry_flag= else aix_use_runtimelinking=no # Test if we are trying to use run time linking or normal # AIX style linking. If -brtl is somewhere in LDFLAGS, we # have runtime linking enabled, and use it for executables. # For shared libraries, we enable/disable runtime linking # depending on the kind of the shared library created - # when "with_aix_soname,aix_use_runtimelinking" is: # "aix,no" lib.a(lib.so.V) shared, rtl:no, for executables # "aix,yes" lib.so shared, rtl:yes, for executables # lib.a static archive # "both,no" lib.so.V(shr.o) shared, rtl:yes # lib.a(lib.so.V) shared, rtl:no, for executables # "both,yes" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a(lib.so.V) shared, rtl:no # "svr4,*" lib.so.V(shr.o) shared, rtl:yes, for executables # lib.a static archive case $host_os in aix4.[[23]]|aix4.[[23]].*|aix[[5-9]]*) for ld_flag in $LDFLAGS; do case $ld_flag in *-brtl*) aix_use_runtimelinking=yes break ;; esac done if test svr4,no = "$with_aix_soname,$aix_use_runtimelinking"; then # With aix-soname=svr4, we create the lib.so.V shared archives only, # so we don't have lib.a shared libs to link our executables. # We have to force runtime linking in this case. aix_use_runtimelinking=yes LDFLAGS="$LDFLAGS -Wl,-brtl" fi ;; esac exp_sym_flag='-bexport' no_entry_flag='-bnoentry' fi # When large executables or shared objects are built, AIX ld can # have problems creating the table of contents. If linking a library # or program results in "error TOC overflow" add -mminimal-toc to # CXXFLAGS/CFLAGS for g++/gcc. In the cases where that is not # enough to fix the problem, add -Wl,-bbigtoc to LDFLAGS. _LT_TAGVAR(archive_cmds, $1)='' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(hardcode_libdir_separator, $1)=':' _LT_TAGVAR(link_all_deplibs, $1)=yes _LT_TAGVAR(file_list_spec, $1)='$wl-f,' case $with_aix_soname,$aix_use_runtimelinking in aix,*) ;; # no import file svr4,* | *,yes) # use import file # The Import File defines what to hardcode. _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no ;; esac if test yes = "$GXX"; then case $host_os in aix4.[[012]]|aix4.[[012]].*) # We only want to do this on AIX 4.2 and lower, the check # below for broken collect2 doesn't work under 4.3+ collect2name=`$CC -print-prog-name=collect2` if test -f "$collect2name" && strings "$collect2name" | $GREP resolve_lib_name >/dev/null then # We have reworked collect2 : else # We have old collect2 _LT_TAGVAR(hardcode_direct, $1)=unsupported # It fails to find uninstalled libraries when the uninstalled # path is not listed in the libpath. Setting hardcode_minus_L # to unsupported forces relinking _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)= fi esac shared_flag='-shared' if test yes = "$aix_use_runtimelinking"; then shared_flag=$shared_flag' $wl-G' fi # Need to ensure runtime linking is disabled for the traditional # shared library, or the linker may eventually find shared libraries # /with/ Import File - we do not want to mix them. shared_flag_aix='-shared' shared_flag_svr4='-shared $wl-G' else # not using gcc if test ia64 = "$host_cpu"; then # VisualAge C++, Version 5.5 for AIX 5L for IA-64, Beta 3 Release # chokes on -Wl,-G. The following line is correct: shared_flag='-G' else if test yes = "$aix_use_runtimelinking"; then shared_flag='$wl-G' else shared_flag='$wl-bM:SRE' fi shared_flag_aix='$wl-bM:SRE' shared_flag_svr4='$wl-G' fi fi _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-bexpall' # It seems that -bexpall does not export symbols beginning with # underscore (_), so it is better to generate a list of symbols to # export. _LT_TAGVAR(always_export_symbols, $1)=yes if test aix,yes = "$with_aix_soname,$aix_use_runtimelinking"; then # Warning - without using the other runtime loading flags (-brtl), # -berok will link without error, but may produce a broken library. # The "-G" linker flag allows undefined symbols. _LT_TAGVAR(no_undefined_flag, $1)='-bernotok' # Determine the default libpath from the value encoded in an empty # executable. _LT_SYS_MODULE_PATH_AIX([$1]) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath" _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $deplibs $wl'$no_entry_flag' $compiler_flags `if test -n "$allow_undefined_flag"; then func_echo_all "$wl$allow_undefined_flag"; else :; fi` $wl'$exp_sym_flag:\$export_symbols' '$shared_flag else if test ia64 = "$host_cpu"; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $libdir:/usr/lib:/lib' _LT_TAGVAR(allow_undefined_flag, $1)="-z nodefs" _LT_TAGVAR(archive_expsym_cmds, $1)="\$CC $shared_flag"' -o $output_objdir/$soname $libobjs $deplibs '"\$wl$no_entry_flag"' $compiler_flags $wl$allow_undefined_flag '"\$wl$exp_sym_flag:\$export_symbols" else # Determine the default libpath from the value encoded in an # empty executable. _LT_SYS_MODULE_PATH_AIX([$1]) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-blibpath:$libdir:'"$aix_libpath" # Warning - without using the other run time loading flags, # -berok will link without error, but may produce a broken library. _LT_TAGVAR(no_undefined_flag, $1)=' $wl-bernotok' _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-berok' if test yes = "$with_gnu_ld"; then # We only use this code for GNU lds that support --whole-archive. _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive' else # Exported symbols can be pulled into shared objects from archives _LT_TAGVAR(whole_archive_flag_spec, $1)='$convenience' fi _LT_TAGVAR(archive_cmds_need_lc, $1)=yes _LT_TAGVAR(archive_expsym_cmds, $1)='$RM -r $output_objdir/$realname.d~$MKDIR $output_objdir/$realname.d' # -brtl affects multiple linker settings, -berok does not and is overridden later compiler_flags_filtered='`func_echo_all "$compiler_flags " | $SED -e "s%-brtl\\([[, ]]\\)%-berok\\1%g"`' if test svr4 != "$with_aix_soname"; then # This is similar to how AIX traditionally builds its shared # libraries. Need -bnortl late, we may have -brtl in LDFLAGS. _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_aix' -o $output_objdir/$realname.d/$soname $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$AR $AR_FLAGS $output_objdir/$libname$release.a $output_objdir/$realname.d/$soname' fi if test aix != "$with_aix_soname"; then _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$CC '$shared_flag_svr4' -o $output_objdir/$realname.d/$shared_archive_member_spec.o $libobjs $deplibs $wl-bnoentry '$compiler_flags_filtered'$wl-bE:$export_symbols$allow_undefined_flag~$STRIP -e $output_objdir/$realname.d/$shared_archive_member_spec.o~( func_echo_all "#! $soname($shared_archive_member_spec.o)"; if test shr_64 = "$shared_archive_member_spec"; then func_echo_all "# 64"; else func_echo_all "# 32"; fi; cat $export_symbols ) > $output_objdir/$realname.d/$shared_archive_member_spec.imp~$AR $AR_FLAGS $output_objdir/$soname $output_objdir/$realname.d/$shared_archive_member_spec.o $output_objdir/$realname.d/$shared_archive_member_spec.imp' else # used by -dlpreopen to get the symbols _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$MV $output_objdir/$realname.d/$soname $output_objdir' fi _LT_TAGVAR(archive_expsym_cmds, $1)="$_LT_TAGVAR(archive_expsym_cmds, $1)"'~$RM -r $output_objdir/$realname.d' fi fi ;; beos*) if $LD --help 2>&1 | $GREP ': supported targets:.* elf' > /dev/null; then _LT_TAGVAR(allow_undefined_flag, $1)=unsupported # Joseph Beckenbach says some releases of gcc # support --undefined. This deserves some investigation. FIXME _LT_TAGVAR(archive_cmds, $1)='$CC -nostart $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; chorus*) case $cc_basename in *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac ;; cygwin* | mingw* | pw32* | cegcc*) case $GXX,$cc_basename in ,cl* | no,cl* | ,icl* | no,icl*) # Native MSVC or ICC # hardcode_libdir_flag_spec is actually meaningless, as there is # no search path for DLLs. _LT_TAGVAR(hardcode_libdir_flag_spec, $1)=' ' _LT_TAGVAR(allow_undefined_flag, $1)=unsupported _LT_TAGVAR(always_export_symbols, $1)=yes _LT_TAGVAR(file_list_spec, $1)='@' # Tell ltmain to make .lib files, not .a files. libext=lib # Tell ltmain to make .dll files, not .so files. shrext_cmds=.dll # FIXME: Setting linknames here is a bad hack. _LT_TAGVAR(archive_cmds, $1)='$CC -o $output_objdir/$soname $libobjs $compiler_flags $deplibs -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~linknames=' _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then cp "$export_symbols" "$output_objdir/$soname.def"; echo "$tool_output_objdir$soname.def" > "$output_objdir/$soname.exp"; else $SED -e '\''s/^/-link -EXPORT:/'\'' < $export_symbols > $output_objdir/$soname.exp; fi~ $CC -o $tool_output_objdir$soname $libobjs $compiler_flags $deplibs "@$tool_output_objdir$soname.exp" -Wl,-DLL,-IMPLIB:"$tool_output_objdir$libname.dll.lib"~ linknames=' # The linker will not automatically build a static lib if we build a DLL. # _LT_TAGVAR(old_archive_from_new_cmds, $1)='true' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes # Don't use ranlib _LT_TAGVAR(old_postinstall_cmds, $1)='chmod 644 $oldlib' _LT_TAGVAR(postlink_cmds, $1)='lt_outputfile="@OUTPUT@"~ lt_tool_outputfile="@TOOL_OUTPUT@"~ case $lt_outputfile in *.exe|*.EXE) ;; *) lt_outputfile=$lt_outputfile.exe lt_tool_outputfile=$lt_tool_outputfile.exe ;; esac~ func_to_tool_file "$lt_outputfile"~ if test : != "$MANIFEST_TOOL" && test -f "$lt_outputfile.manifest"; then $MANIFEST_TOOL -manifest "$lt_tool_outputfile.manifest" -outputresource:"$lt_tool_outputfile" || exit 1; $RM "$lt_outputfile.manifest"; fi' ;; *) # g++ # _LT_TAGVAR(hardcode_libdir_flag_spec, $1) is actually meaningless, # as there is no search path for DLLs. _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-all-symbols' _LT_TAGVAR(allow_undefined_flag, $1)=unsupported _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes if $LD --help 2>&1 | $GREP 'auto-import' > /dev/null; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' # If the export-symbols file already is a .def file, use it as # is; otherwise, prepend EXPORTS... _LT_TAGVAR(archive_expsym_cmds, $1)='if _LT_DLL_DEF_P([$export_symbols]); then cp $export_symbols $output_objdir/$soname.def; else echo EXPORTS > $output_objdir/$soname.def; cat $export_symbols >> $output_objdir/$soname.def; fi~ $CC -shared -nostdlib $output_objdir/$soname.def $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $output_objdir/$soname $wl--enable-auto-image-base -Xlinker --out-implib -Xlinker $lib' else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac ;; darwin* | rhapsody*) _LT_DARWIN_LINKER_FEATURES($1) ;; os2*) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-L$libdir' _LT_TAGVAR(hardcode_minus_L, $1)=yes _LT_TAGVAR(allow_undefined_flag, $1)=unsupported shrext_cmds=.dll _LT_TAGVAR(archive_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ emxexp $libobjs | $SED /"_DLL_InitTerm"/d >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(archive_expsym_cmds, $1)='$ECHO "LIBRARY ${soname%$shared_ext} INITINSTANCE TERMINSTANCE" > $output_objdir/$libname.def~ $ECHO "DESCRIPTION \"$libname\"" >> $output_objdir/$libname.def~ $ECHO "DATA MULTIPLE NONSHARED" >> $output_objdir/$libname.def~ $ECHO EXPORTS >> $output_objdir/$libname.def~ prefix_cmds="$SED"~ if test EXPORTS = "`$SED 1q $export_symbols`"; then prefix_cmds="$prefix_cmds -e 1d"; fi~ prefix_cmds="$prefix_cmds -e \"s/^\(.*\)$/_\1/g\""~ cat $export_symbols | $prefix_cmds >> $output_objdir/$libname.def~ $CC -Zdll -Zcrtdll -o $output_objdir/$soname $libobjs $deplibs $compiler_flags $output_objdir/$libname.def~ emximp -o $lib $output_objdir/$libname.def' _LT_TAGVAR(old_archive_From_new_cmds, $1)='emximp -o $output_objdir/${libname}_dll.a $output_objdir/$libname.def' _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=yes _LT_TAGVAR(file_list_spec, $1)='@' ;; dgux*) case $cc_basename in ec++*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; ghcx*) # Green Hills C++ Compiler # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac ;; freebsd2.*) # C++ shared libraries reported to be fairly broken before # switch to ELF _LT_TAGVAR(ld_shlibs, $1)=no ;; freebsd-elf*) _LT_TAGVAR(archive_cmds_need_lc, $1)=no ;; freebsd* | dragonfly* | midnightbsd*) # FreeBSD 3 and later use GNU C++ and GNU ld with standard ELF # conventions _LT_TAGVAR(ld_shlibs, $1)=yes ;; haiku*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(link_all_deplibs, $1)=yes ;; hpux9*) _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_minus_L, $1)=yes # Not in the search PATH, # but as the default # location of the library. case $cc_basename in CC*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; aCC*) _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -b $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $EGREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes = "$GXX"; then _LT_TAGVAR(archive_cmds, $1)='$RM $output_objdir/$soname~$CC -shared -nostdlib $pic_flag $wl+b $wl$install_libdir -o $output_objdir/$soname $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~test "x$output_objdir/$soname" = "x$lib" || mv $output_objdir/$soname $lib' else # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac ;; hpux10*|hpux11*) if test no = "$with_gnu_ld"; then _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl+b $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: case $host_cpu in hppa*64*|ia64*) ;; *) _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' ;; esac fi case $host_cpu in hppa*64*|ia64*) _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no ;; *) _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(hardcode_minus_L, $1)=yes # Not in the search PATH, # but as the default # location of the library. ;; esac case $cc_basename in CC*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; aCC*) case $host_cpu in hppa*64*) _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; ia64*) _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -b $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; esac # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`($CC -b $CFLAGS -v conftest.$objext 2>&1) | $GREP "\-L"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes = "$GXX"; then if test no = "$with_gnu_ld"; then case $host_cpu in hppa*64*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib -fPIC $wl+h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; ia64*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+nodefaultrpath -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $pic_flag $wl+h $wl$soname $wl+b $wl$install_libdir -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' ;; esac fi else # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac ;; interix[[3-9]]*) _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' # Hack: On Interix 3.x, we cannot compile PIC because of a broken gcc. # Instead, shared libraries are loaded at an image base (0x10000000 by # default) and relocated if they conflict, which is a slow very memory # consuming and fragmenting process. To avoid this, we pick a random, # 256 KiB-aligned image base between 0x50000000 and 0x6FFC0000 at link # time. Moving up from 0x10000000 also allows more sbrk(2) space. _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$SED "s|^|_|" $export_symbols >$output_objdir/$soname.expsym~$CC -shared $pic_flag $libobjs $deplibs $compiler_flags $wl-h,$soname $wl--retain-symbols-file,$output_objdir/$soname.expsym $wl--image-base,`expr ${RANDOM-$$} % 4096 / 2 \* 262144 + 1342177280` -o $lib' ;; irix5* | irix6*) case $cc_basename in CC*) # SGI C++ _LT_TAGVAR(archive_cmds, $1)='$CC -shared -all -multigot $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' # Archives containing C++ object files must be created using # "CC -ar", where "CC" is the IRIX C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. _LT_TAGVAR(old_archive_cmds, $1)='$CC -ar -WR,-u -o $oldlib $oldobjs' ;; *) if test yes = "$GXX"; then if test no = "$with_gnu_ld"; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' else _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` -o $lib' fi fi _LT_TAGVAR(link_all_deplibs, $1)=yes ;; esac _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: _LT_TAGVAR(inherit_rpath, $1)=yes ;; linux* | k*bsd*-gnu | kopensolaris*-gnu | gnu*) case $cc_basename in KCC*) # Kuck and Associates, Inc. (KAI) C++ Compiler # KCC will only create a shared library if the output file # ends with ".so" (or ".sl" for HP-UX), so rename the library # to its proper name (with version) after linking. _LT_TAGVAR(archive_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo $lib | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib $wl-retain-symbols-file,$export_symbols; mv \$templib $lib' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1 | $GREP "ld"`; rm -f libconftest$shared_ext; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' # Archives containing C++ object files must be created using # "CC -Bstatic", where "CC" is the KAI C++ compiler. _LT_TAGVAR(old_archive_cmds, $1)='$CC -Bstatic -o $oldlib $oldobjs' ;; icpc* | ecpc* ) # Intel C++ with_gnu_ld=yes # version 8.0 and above of icpc choke on multiply defined symbols # if we add $predep_objects and $postdep_objects, however 7.1 and # earlier do not add the objects themselves. case `$CC -V 2>&1` in *"Version 7."*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; *) # Version 8.0 or newer tmp_idyn= case $host_cpu in ia64*) tmp_idyn=' -i_dynamic';; esac _LT_TAGVAR(archive_cmds, $1)='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared'"$tmp_idyn"' $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; esac _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive$convenience $wl--no-whole-archive' ;; pgCC* | pgcpp*) # Portland Group C++ compiler case `$CC -V` in *pgCC\ [[1-5]].* | *pgcpp\ [[1-5]].*) _LT_TAGVAR(prelink_cmds, $1)='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $objs $libobjs $compile_deplibs~ compile_command="$compile_command `find $tpldir -name \*.o | sort | $NL2SP`"' _LT_TAGVAR(old_archive_cmds, $1)='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $oldobjs$old_deplibs~ $AR $AR_FLAGS $oldlib$oldobjs$old_deplibs `find $tpldir -name \*.o | sort | $NL2SP`~ $RANLIB $oldlib' _LT_TAGVAR(archive_cmds, $1)='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~ $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='tpldir=Template.dir~ rm -rf $tpldir~ $CC --prelink_objects --instantiation_dir $tpldir $predep_objects $libobjs $deplibs $convenience $postdep_objects~ $CC -shared $pic_flag $predep_objects $libobjs $deplibs `find $tpldir -name \*.o | sort | $NL2SP` $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; *) # Version 6 and above use weak symbols _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname $wl-retain-symbols-file $wl$export_symbols -o $lib' ;; esac _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl--rpath $wl$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`for conv in $convenience\"\"; do test -n \"$conv\" && new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' ;; cxx*) # Compaq C++ _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname -o $lib $wl-retain-symbols-file $wl$export_symbols' runpath_var=LD_RUN_PATH _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld .*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "X$list" | $Xsed' ;; xl* | mpixl* | bgxl*) # IBM XL 8.0 on PPC, with GNU ld _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl--export-dynamic' _LT_TAGVAR(archive_cmds, $1)='$CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname -o $lib' if test yes = "$supports_anon_versioning"; then _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $output_objdir/$libname.ver~ cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $output_objdir/$libname.ver~ echo "local: *; };" >> $output_objdir/$libname.ver~ $CC -qmkshrobj $libobjs $deplibs $compiler_flags $wl-soname $wl$soname $wl-version-script $wl$output_objdir/$libname.ver -o $lib' fi ;; *) case `$CC -V 2>&1 | $SED 5q` in *Sun\ C*) # Sun C++ 5.9 _LT_TAGVAR(no_undefined_flag, $1)=' -zdefs' _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file $wl$export_symbols' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl--whole-archive`new_convenience=; for conv in $convenience\"\"; do test -z \"$conv\" || new_convenience=\"$new_convenience,$conv\"; done; func_echo_all \"$new_convenience\"` $wl--no-whole-archive' _LT_TAGVAR(compiler_needs_object, $1)=yes # Not sure whether something based on # $CC $CFLAGS -v conftest.$objext -o libconftest$shared_ext 2>&1 # would be better. output_verbose_link_cmd='func_echo_all' # Archives containing C++ object files must be created using # "CC -xar", where "CC" is the Sun C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. _LT_TAGVAR(old_archive_cmds, $1)='$CC -xar -o $oldlib $oldobjs' ;; esac ;; esac ;; lynxos*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; m88k*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; mvs*) case $cc_basename in cxx*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac ;; netbsd*) if echo __ELF__ | $CC -E - | $GREP __ELF__ >/dev/null; then _LT_TAGVAR(archive_cmds, $1)='$LD -Bshareable -o $lib $predep_objects $libobjs $deplibs $postdep_objects $linker_flags' wlarc= _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no fi # Workaround some broken pre-1.5 toolchains output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP conftest.$objext | $SED -e "s:-lgcc -lc -lgcc::"' ;; *nto* | *qnx*) _LT_TAGVAR(ld_shlibs, $1)=yes ;; openbsd* | bitrig*) if test -f /usr/libexec/ld.so; then _LT_TAGVAR(hardcode_direct, $1)=yes _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=yes _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -o $lib' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' if test -z "`echo __ELF__ | $CC -E - | grep __ELF__`"; then _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $pic_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-retain-symbols-file,$export_symbols -o $lib' _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-E' _LT_TAGVAR(whole_archive_flag_spec, $1)=$wlarc'--whole-archive$convenience '$wlarc'--no-whole-archive' fi output_verbose_link_cmd=func_echo_all else _LT_TAGVAR(ld_shlibs, $1)=no fi ;; osf3* | osf4* | osf5*) case $cc_basename in KCC*) # Kuck and Associates, Inc. (KAI) C++ Compiler # KCC will only create a shared library if the output file # ends with ".so" (or ".sl" for HP-UX), so rename the library # to its proper name (with version) after linking. _LT_TAGVAR(archive_cmds, $1)='tempext=`echo $shared_ext | $SED -e '\''s/\([[^()0-9A-Za-z{}]]\)/\\\\\1/g'\''`; templib=`echo "$lib" | $SED -e "s/\$tempext\..*/.so/"`; $CC $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags --soname $soname -o \$templib; mv \$templib $lib' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath,$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: # Archives containing C++ object files must be created using # the KAI C++ compiler. case $host in osf3*) _LT_TAGVAR(old_archive_cmds, $1)='$CC -Bstatic -o $oldlib $oldobjs' ;; *) _LT_TAGVAR(old_archive_cmds, $1)='$CC -o $oldlib $oldobjs' ;; esac ;; RCC*) # Rational C++ 2.4.1 # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; cxx*) case $host in osf3*) _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $soname `test -n "$verstring" && func_echo_all "$wl-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' ;; *) _LT_TAGVAR(allow_undefined_flag, $1)=' -expect_unresolved \*' _LT_TAGVAR(archive_cmds, $1)='$CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname `test -n "$verstring" && func_echo_all "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='for i in `cat $export_symbols`; do printf "%s %s\\n" -exported_symbol "\$i" >> $lib.exp; done~ echo "-hidden">> $lib.exp~ $CC -shared$allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags -msym -soname $soname $wl-input $wl$lib.exp `test -n "$verstring" && $ECHO "-set_version $verstring"` -update_registry $output_objdir/so_locations -o $lib~ $RM $lib.exp' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-rpath $libdir' ;; esac _LT_TAGVAR(hardcode_libdir_separator, $1)=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. # # There doesn't appear to be a way to prevent this compiler from # explicitly linking system object files so we need to strip them # from the output so that they don't get included in the library # dependencies. output_verbose_link_cmd='templist=`$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP "ld" | $GREP -v "ld:"`; templist=`func_echo_all "$templist" | $SED "s/\(^.*ld.*\)\( .*ld.*$\)/\1/"`; list= ; for z in $templist; do case $z in conftest.$objext) list="$list $z";; *.$objext);; *) list="$list $z";;esac; done; func_echo_all "$list"' ;; *) if test yes,no = "$GXX,$with_gnu_ld"; then _LT_TAGVAR(allow_undefined_flag, $1)=' $wl-expect_unresolved $wl\*' case $host in osf3*) _LT_TAGVAR(archive_cmds, $1)='$CC -shared -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $allow_undefined_flag $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-msym $wl-soname $wl$soname `test -n "$verstring" && func_echo_all "$wl-set_version $wl$verstring"` $wl-update_registry $wl$output_objdir/so_locations -o $lib' ;; esac _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-rpath $wl$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=: # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no fi ;; esac ;; psos*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; sunos4*) case $cc_basename in CC*) # Sun C++ 4.x # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; lcc*) # Lucid # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac ;; solaris*) case $cc_basename in CC* | sunCC*) # Sun C++ 4.2, 5.x and Centerline C++ _LT_TAGVAR(archive_cmds_need_lc,$1)=yes _LT_TAGVAR(no_undefined_flag, $1)=' -zdefs' _LT_TAGVAR(archive_cmds, $1)='$CC -G$allow_undefined_flag -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G$allow_undefined_flag $wl-M $wl$lib.exp -h$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='-R$libdir' _LT_TAGVAR(hardcode_shlibpath_var, $1)=no case $host_os in solaris2.[[0-5]] | solaris2.[[0-5]].*) ;; *) # The compiler driver will combine and reorder linker options, # but understands '-z linker_flag'. # Supported since Solaris 2.6 (maybe 2.5.1?) _LT_TAGVAR(whole_archive_flag_spec, $1)='-z allextract$convenience -z defaultextract' ;; esac _LT_TAGVAR(link_all_deplibs, $1)=yes output_verbose_link_cmd='func_echo_all' # Archives containing C++ object files must be created using # "CC -xar", where "CC" is the Sun C++ compiler. This is # necessary to make sure instantiated templates are included # in the archive. _LT_TAGVAR(old_archive_cmds, $1)='$CC -xar -o $oldlib $oldobjs' ;; gcx*) # Green Hills C++ Compiler _LT_TAGVAR(archive_cmds, $1)='$CC -shared $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' # The C++ compiler must be used to create the archive. _LT_TAGVAR(old_archive_cmds, $1)='$CC $LDFLAGS -archive -o $oldlib $oldobjs' ;; *) # GNU C++ compiler with Solaris linker if test yes,no = "$GXX,$with_gnu_ld"; then _LT_TAGVAR(no_undefined_flag, $1)=' $wl-z ${wl}defs' if $CC --version | $GREP -v '^2\.7' > /dev/null; then _LT_TAGVAR(archive_cmds, $1)='$CC -shared $pic_flag -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -shared $pic_flag -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -shared $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' else # g++ 2.7 appears to require '-G' NOT '-shared' on this # platform. _LT_TAGVAR(archive_cmds, $1)='$CC -G -nostdlib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags $wl-h $wl$soname -o $lib' _LT_TAGVAR(archive_expsym_cmds, $1)='echo "{ global:" > $lib.exp~cat $export_symbols | $SED -e "s/\(.*\)/\1;/" >> $lib.exp~echo "local: *; };" >> $lib.exp~ $CC -G -nostdlib $wl-M $wl$lib.exp $wl-h $wl$soname -o $lib $predep_objects $libobjs $deplibs $postdep_objects $compiler_flags~$RM $lib.exp' # Commands to make compiler produce verbose output that lists # what "hidden" libraries, object files and flags are used when # linking a shared library. output_verbose_link_cmd='$CC -G $CFLAGS -v conftest.$objext 2>&1 | $GREP -v "^Configured with:" | $GREP "\-L"' fi _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R $wl$libdir' case $host_os in solaris2.[[0-5]] | solaris2.[[0-5]].*) ;; *) _LT_TAGVAR(whole_archive_flag_spec, $1)='$wl-z ${wl}allextract$convenience $wl-z ${wl}defaultextract' ;; esac fi ;; esac ;; sysv4*uw2* | sysv5OpenUNIX* | sysv5UnixWare7.[[01]].[[10]]* | unixware7* | sco3.2v5.0.[[024]]*) _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text' _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no runpath_var='LD_RUN_PATH' case $cc_basename in CC*) _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; sysv5* | sco3.2v5* | sco5v6*) # Note: We CANNOT use -z defs as we might desire, because we do not # link with -lc, and that would cause any symbols used from libc to # always be unresolved, which means just about no library would # ever link correctly. If we're not using GNU ld we use -z text # though, which does catch some bad symbols but isn't as heavy-handed # as -z defs. _LT_TAGVAR(no_undefined_flag, $1)='$wl-z,text' _LT_TAGVAR(allow_undefined_flag, $1)='$wl-z,nodefs' _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(hardcode_shlibpath_var, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)='$wl-R,$libdir' _LT_TAGVAR(hardcode_libdir_separator, $1)=':' _LT_TAGVAR(link_all_deplibs, $1)=yes _LT_TAGVAR(export_dynamic_flag_spec, $1)='$wl-Bexport' runpath_var='LD_RUN_PATH' case $cc_basename in CC*) _LT_TAGVAR(archive_cmds, $1)='$CC -G $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -G $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(old_archive_cmds, $1)='$CC -Tprelink_objects $oldobjs~ '"$_LT_TAGVAR(old_archive_cmds, $1)" _LT_TAGVAR(reload_cmds, $1)='$CC -Tprelink_objects $reload_objs~ '"$_LT_TAGVAR(reload_cmds, $1)" ;; *) _LT_TAGVAR(archive_cmds, $1)='$CC -shared $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' _LT_TAGVAR(archive_expsym_cmds, $1)='$CC -shared $wl-Bexport:$export_symbols $wl-h,$soname -o $lib $libobjs $deplibs $compiler_flags' ;; esac ;; tandem*) case $cc_basename in NCC*) # NonStop-UX NCC 3.20 # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac ;; vxworks*) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; *) # FIXME: insert proper C++ library support _LT_TAGVAR(ld_shlibs, $1)=no ;; esac AC_MSG_RESULT([$_LT_TAGVAR(ld_shlibs, $1)]) test no = "$_LT_TAGVAR(ld_shlibs, $1)" && can_build_shared=no _LT_TAGVAR(GCC, $1)=$GXX _LT_TAGVAR(LD, $1)=$LD ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... _LT_SYS_HIDDEN_LIBDEPS($1) _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_SYS_DYNAMIC_LINKER($1) _LT_LINKER_HARDCODE_LIBPATH($1) _LT_CONFIG($1) fi # test -n "$compiler" CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS LDCXX=$LD LD=$lt_save_LD GCC=$lt_save_GCC with_gnu_ld=$lt_save_with_gnu_ld lt_cv_path_LDCXX=$lt_cv_path_LD lt_cv_path_LD=$lt_save_path_LD lt_cv_prog_gnu_ldcxx=$lt_cv_prog_gnu_ld lt_cv_prog_gnu_ld=$lt_save_with_gnu_ld fi # test yes != "$_lt_caught_CXX_error" AC_LANG_POP ])# _LT_LANG_CXX_CONFIG # _LT_FUNC_STRIPNAME_CNF # ---------------------- # func_stripname_cnf prefix suffix name # strip PREFIX and SUFFIX off of NAME. # PREFIX and SUFFIX must not contain globbing or regex special # characters, hashes, percent signs, but SUFFIX may contain a leading # dot (in which case that matches only a dot). # # This function is identical to the (non-XSI) version of func_stripname, # except this one can be used by m4 code that may be executed by configure, # rather than the libtool script. m4_defun([_LT_FUNC_STRIPNAME_CNF],[dnl AC_REQUIRE([_LT_DECL_SED]) AC_REQUIRE([_LT_PROG_ECHO_BACKSLASH]) func_stripname_cnf () { case @S|@2 in .*) func_stripname_result=`$ECHO "@S|@3" | $SED "s%^@S|@1%%; s%\\\\@S|@2\$%%"`;; *) func_stripname_result=`$ECHO "@S|@3" | $SED "s%^@S|@1%%; s%@S|@2\$%%"`;; esac } # func_stripname_cnf ])# _LT_FUNC_STRIPNAME_CNF # _LT_SYS_HIDDEN_LIBDEPS([TAGNAME]) # --------------------------------- # Figure out "hidden" library dependencies from verbose # compiler output when linking a shared library. # Parse the compiler output and extract the necessary # objects, libraries and library flags. m4_defun([_LT_SYS_HIDDEN_LIBDEPS], [m4_require([_LT_FILEUTILS_DEFAULTS])dnl AC_REQUIRE([_LT_FUNC_STRIPNAME_CNF])dnl # Dependencies to place before and after the object being linked: _LT_TAGVAR(predep_objects, $1)= _LT_TAGVAR(postdep_objects, $1)= _LT_TAGVAR(predeps, $1)= _LT_TAGVAR(postdeps, $1)= _LT_TAGVAR(compiler_lib_search_path, $1)= dnl we can't use the lt_simple_compile_test_code here, dnl because it contains code intended for an executable, dnl not a library. It's possible we should let each dnl tag define a new lt_????_link_test_code variable, dnl but it's only used here... m4_if([$1], [], [cat > conftest.$ac_ext <<_LT_EOF int a; void foo (void) { a = 0; } _LT_EOF ], [$1], [CXX], [cat > conftest.$ac_ext <<_LT_EOF class Foo { public: Foo (void) { a = 0; } private: int a; }; _LT_EOF ], [$1], [F77], [cat > conftest.$ac_ext <<_LT_EOF subroutine foo implicit none integer*4 a a=0 return end _LT_EOF ], [$1], [FC], [cat > conftest.$ac_ext <<_LT_EOF subroutine foo implicit none integer a a=0 return end _LT_EOF ], [$1], [GCJ], [cat > conftest.$ac_ext <<_LT_EOF public class foo { private int a; public void bar (void) { a = 0; } }; _LT_EOF ], [$1], [GO], [cat > conftest.$ac_ext <<_LT_EOF package foo func foo() { } _LT_EOF ]) _lt_libdeps_save_CFLAGS=$CFLAGS case "$CC $CFLAGS " in #( *\ -flto*\ *) CFLAGS="$CFLAGS -fno-lto" ;; *\ -fwhopr*\ *) CFLAGS="$CFLAGS -fno-whopr" ;; *\ -fuse-linker-plugin*\ *) CFLAGS="$CFLAGS -fno-use-linker-plugin" ;; esac dnl Parse the compiler output and extract the necessary dnl objects, libraries and library flags. if AC_TRY_EVAL(ac_compile); then # Parse the compiler output and extract the necessary # objects, libraries and library flags. # Sentinel used to keep track of whether or not we are before # the conftest object file. pre_test_object_deps_done=no for p in `eval "$output_verbose_link_cmd"`; do case $prev$p in -L* | -R* | -l*) # Some compilers place space between "-{L,R}" and the path. # Remove the space. if test x-L = "$p" || test x-R = "$p"; then prev=$p continue fi # Expand the sysroot to ease extracting the directories later. if test -z "$prev"; then case $p in -L*) func_stripname_cnf '-L' '' "$p"; prev=-L; p=$func_stripname_result ;; -R*) func_stripname_cnf '-R' '' "$p"; prev=-R; p=$func_stripname_result ;; -l*) func_stripname_cnf '-l' '' "$p"; prev=-l; p=$func_stripname_result ;; esac fi case $p in =*) func_stripname_cnf '=' '' "$p"; p=$lt_sysroot$func_stripname_result ;; esac if test no = "$pre_test_object_deps_done"; then case $prev in -L | -R) # Internal compiler library paths should come after those # provided the user. The postdeps already come after the # user supplied libs so there is no need to process them. if test -z "$_LT_TAGVAR(compiler_lib_search_path, $1)"; then _LT_TAGVAR(compiler_lib_search_path, $1)=$prev$p else _LT_TAGVAR(compiler_lib_search_path, $1)="${_LT_TAGVAR(compiler_lib_search_path, $1)} $prev$p" fi ;; # The "-l" case would never come before the object being # linked, so don't bother handling this case. esac else if test -z "$_LT_TAGVAR(postdeps, $1)"; then _LT_TAGVAR(postdeps, $1)=$prev$p else _LT_TAGVAR(postdeps, $1)="${_LT_TAGVAR(postdeps, $1)} $prev$p" fi fi prev= ;; *.lto.$objext) ;; # Ignore GCC LTO objects *.$objext) # This assumes that the test object file only shows up # once in the compiler output. if test "$p" = "conftest.$objext"; then pre_test_object_deps_done=yes continue fi if test no = "$pre_test_object_deps_done"; then if test -z "$_LT_TAGVAR(predep_objects, $1)"; then _LT_TAGVAR(predep_objects, $1)=$p else _LT_TAGVAR(predep_objects, $1)="$_LT_TAGVAR(predep_objects, $1) $p" fi else if test -z "$_LT_TAGVAR(postdep_objects, $1)"; then _LT_TAGVAR(postdep_objects, $1)=$p else _LT_TAGVAR(postdep_objects, $1)="$_LT_TAGVAR(postdep_objects, $1) $p" fi fi ;; *) ;; # Ignore the rest. esac done # Clean up. rm -f a.out a.exe else echo "libtool.m4: error: problem compiling $1 test program" fi $RM -f confest.$objext CFLAGS=$_lt_libdeps_save_CFLAGS # PORTME: override above test on systems where it is broken m4_if([$1], [CXX], [case $host_os in interix[[3-9]]*) # Interix 3.5 installs completely hosed .la files for C++, so rather than # hack all around it, let's just trust "g++" to DTRT. _LT_TAGVAR(predep_objects,$1)= _LT_TAGVAR(postdep_objects,$1)= _LT_TAGVAR(postdeps,$1)= ;; esac ]) case " $_LT_TAGVAR(postdeps, $1) " in *" -lc "*) _LT_TAGVAR(archive_cmds_need_lc, $1)=no ;; esac _LT_TAGVAR(compiler_lib_search_dirs, $1)= if test -n "${_LT_TAGVAR(compiler_lib_search_path, $1)}"; then _LT_TAGVAR(compiler_lib_search_dirs, $1)=`echo " ${_LT_TAGVAR(compiler_lib_search_path, $1)}" | $SED -e 's! -L! !g' -e 's!^ !!'` fi _LT_TAGDECL([], [compiler_lib_search_dirs], [1], [The directories searched by this compiler when creating a shared library]) _LT_TAGDECL([], [predep_objects], [1], [Dependencies to place before and after the objects being linked to create a shared library]) _LT_TAGDECL([], [postdep_objects], [1]) _LT_TAGDECL([], [predeps], [1]) _LT_TAGDECL([], [postdeps], [1]) _LT_TAGDECL([], [compiler_lib_search_path], [1], [The library search path used internally by the compiler when linking a shared library]) ])# _LT_SYS_HIDDEN_LIBDEPS # _LT_LANG_F77_CONFIG([TAG]) # -------------------------- # Ensure that the configuration variables for a Fortran 77 compiler are # suitably defined. These variables are subsequently used by _LT_CONFIG # to write the compiler configuration to 'libtool'. m4_defun([_LT_LANG_F77_CONFIG], [AC_LANG_PUSH(Fortran 77) if test -z "$F77" || test no = "$F77"; then _lt_disable_F77=yes fi _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(allow_undefined_flag, $1)= _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(archive_expsym_cmds, $1)= _LT_TAGVAR(export_dynamic_flag_spec, $1)= _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)= _LT_TAGVAR(hardcode_libdir_separator, $1)= _LT_TAGVAR(hardcode_minus_L, $1)=no _LT_TAGVAR(hardcode_automatic, $1)=no _LT_TAGVAR(inherit_rpath, $1)=no _LT_TAGVAR(module_cmds, $1)= _LT_TAGVAR(module_expsym_cmds, $1)= _LT_TAGVAR(link_all_deplibs, $1)=unknown _LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds _LT_TAGVAR(reload_flag, $1)=$reload_flag _LT_TAGVAR(reload_cmds, $1)=$reload_cmds _LT_TAGVAR(no_undefined_flag, $1)= _LT_TAGVAR(whole_archive_flag_spec, $1)= _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no # Source file extension for f77 test sources. ac_ext=f # Object file extension for compiled f77 test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # No sense in running all these tests if we already determined that # the F77 compiler isn't working. Some variables (like enable_shared) # are currently assumed to apply to all compilers on this platform, # and will be corrupted by setting them based on a non-working compiler. if test yes != "$_lt_disable_F77"; then # Code to be used in simple compile tests lt_simple_compile_test_code="\ subroutine t return end " # Code to be used in simple link tests lt_simple_link_test_code="\ program t end " # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_GCC=$GCC lt_save_CFLAGS=$CFLAGS CC=${F77-"f77"} CFLAGS=$FFLAGS compiler=$CC _LT_TAGVAR(compiler, $1)=$CC _LT_CC_BASENAME([$compiler]) GCC=$G77 if test -n "$compiler"; then AC_MSG_CHECKING([if libtool supports shared libraries]) AC_MSG_RESULT([$can_build_shared]) AC_MSG_CHECKING([whether to build shared libraries]) test no = "$can_build_shared" && enable_shared=no # On AIX, shared libraries and static libraries use the same namespace, and # are all built from PIC. case $host_os in aix3*) test yes = "$enable_shared" && enable_static=no if test -n "$RANLIB"; then archive_cmds="$archive_cmds~\$RANLIB \$lib" postinstall_cmds='$RANLIB $lib' fi ;; aix[[4-9]]*) if test ia64 != "$host_cpu"; then case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in yes,aix,yes) ;; # shared object as lib.so file only yes,svr4,*) ;; # shared object as lib.so archive member only yes,*) enable_static=no ;; # shared object in lib.a archive as well esac fi ;; esac AC_MSG_RESULT([$enable_shared]) AC_MSG_CHECKING([whether to build static libraries]) # Make sure either enable_shared or enable_static is yes. test yes = "$enable_shared" || enable_static=yes AC_MSG_RESULT([$enable_static]) _LT_TAGVAR(GCC, $1)=$G77 _LT_TAGVAR(LD, $1)=$LD ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_SYS_DYNAMIC_LINKER($1) _LT_LINKER_HARDCODE_LIBPATH($1) _LT_CONFIG($1) fi # test -n "$compiler" GCC=$lt_save_GCC CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS fi # test yes != "$_lt_disable_F77" AC_LANG_POP ])# _LT_LANG_F77_CONFIG # _LT_LANG_FC_CONFIG([TAG]) # ------------------------- # Ensure that the configuration variables for a Fortran compiler are # suitably defined. These variables are subsequently used by _LT_CONFIG # to write the compiler configuration to 'libtool'. m4_defun([_LT_LANG_FC_CONFIG], [AC_LANG_PUSH(Fortran) if test -z "$FC" || test no = "$FC"; then _lt_disable_FC=yes fi _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(allow_undefined_flag, $1)= _LT_TAGVAR(always_export_symbols, $1)=no _LT_TAGVAR(archive_expsym_cmds, $1)= _LT_TAGVAR(export_dynamic_flag_spec, $1)= _LT_TAGVAR(hardcode_direct, $1)=no _LT_TAGVAR(hardcode_direct_absolute, $1)=no _LT_TAGVAR(hardcode_libdir_flag_spec, $1)= _LT_TAGVAR(hardcode_libdir_separator, $1)= _LT_TAGVAR(hardcode_minus_L, $1)=no _LT_TAGVAR(hardcode_automatic, $1)=no _LT_TAGVAR(inherit_rpath, $1)=no _LT_TAGVAR(module_cmds, $1)= _LT_TAGVAR(module_expsym_cmds, $1)= _LT_TAGVAR(link_all_deplibs, $1)=unknown _LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds _LT_TAGVAR(reload_flag, $1)=$reload_flag _LT_TAGVAR(reload_cmds, $1)=$reload_cmds _LT_TAGVAR(no_undefined_flag, $1)= _LT_TAGVAR(whole_archive_flag_spec, $1)= _LT_TAGVAR(enable_shared_with_static_runtimes, $1)=no # Source file extension for fc test sources. ac_ext=${ac_fc_srcext-f} # Object file extension for compiled fc test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # No sense in running all these tests if we already determined that # the FC compiler isn't working. Some variables (like enable_shared) # are currently assumed to apply to all compilers on this platform, # and will be corrupted by setting them based on a non-working compiler. if test yes != "$_lt_disable_FC"; then # Code to be used in simple compile tests lt_simple_compile_test_code="\ subroutine t return end " # Code to be used in simple link tests lt_simple_link_test_code="\ program t end " # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_GCC=$GCC lt_save_CFLAGS=$CFLAGS CC=${FC-"f95"} CFLAGS=$FCFLAGS compiler=$CC GCC=$ac_cv_fc_compiler_gnu _LT_TAGVAR(compiler, $1)=$CC _LT_CC_BASENAME([$compiler]) if test -n "$compiler"; then AC_MSG_CHECKING([if libtool supports shared libraries]) AC_MSG_RESULT([$can_build_shared]) AC_MSG_CHECKING([whether to build shared libraries]) test no = "$can_build_shared" && enable_shared=no # On AIX, shared libraries and static libraries use the same namespace, and # are all built from PIC. case $host_os in aix3*) test yes = "$enable_shared" && enable_static=no if test -n "$RANLIB"; then archive_cmds="$archive_cmds~\$RANLIB \$lib" postinstall_cmds='$RANLIB $lib' fi ;; aix[[4-9]]*) if test ia64 != "$host_cpu"; then case $enable_shared,$with_aix_soname,$aix_use_runtimelinking in yes,aix,yes) ;; # shared object as lib.so file only yes,svr4,*) ;; # shared object as lib.so archive member only yes,*) enable_static=no ;; # shared object in lib.a archive as well esac fi ;; esac AC_MSG_RESULT([$enable_shared]) AC_MSG_CHECKING([whether to build static libraries]) # Make sure either enable_shared or enable_static is yes. test yes = "$enable_shared" || enable_static=yes AC_MSG_RESULT([$enable_static]) _LT_TAGVAR(GCC, $1)=$ac_cv_fc_compiler_gnu _LT_TAGVAR(LD, $1)=$LD ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... _LT_SYS_HIDDEN_LIBDEPS($1) _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_SYS_DYNAMIC_LINKER($1) _LT_LINKER_HARDCODE_LIBPATH($1) _LT_CONFIG($1) fi # test -n "$compiler" GCC=$lt_save_GCC CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS fi # test yes != "$_lt_disable_FC" AC_LANG_POP ])# _LT_LANG_FC_CONFIG # _LT_LANG_GCJ_CONFIG([TAG]) # -------------------------- # Ensure that the configuration variables for the GNU Java Compiler compiler # are suitably defined. These variables are subsequently used by _LT_CONFIG # to write the compiler configuration to 'libtool'. m4_defun([_LT_LANG_GCJ_CONFIG], [AC_REQUIRE([LT_PROG_GCJ])dnl AC_LANG_SAVE # Source file extension for Java test sources. ac_ext=java # Object file extension for compiled Java test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # Code to be used in simple compile tests lt_simple_compile_test_code="class foo {}" # Code to be used in simple link tests lt_simple_link_test_code='public class conftest { public static void main(String[[]] argv) {}; }' # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_CFLAGS=$CFLAGS lt_save_GCC=$GCC GCC=yes CC=${GCJ-"gcj"} CFLAGS=$GCJFLAGS compiler=$CC _LT_TAGVAR(compiler, $1)=$CC _LT_TAGVAR(LD, $1)=$LD _LT_CC_BASENAME([$compiler]) # GCJ did not exist at the time GCC didn't implicitly link libc in. _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds _LT_TAGVAR(reload_flag, $1)=$reload_flag _LT_TAGVAR(reload_cmds, $1)=$reload_cmds ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... if test -n "$compiler"; then _LT_COMPILER_NO_RTTI($1) _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_LINKER_HARDCODE_LIBPATH($1) _LT_CONFIG($1) fi AC_LANG_RESTORE GCC=$lt_save_GCC CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS ])# _LT_LANG_GCJ_CONFIG # _LT_LANG_GO_CONFIG([TAG]) # -------------------------- # Ensure that the configuration variables for the GNU Go compiler # are suitably defined. These variables are subsequently used by _LT_CONFIG # to write the compiler configuration to 'libtool'. m4_defun([_LT_LANG_GO_CONFIG], [AC_REQUIRE([LT_PROG_GO])dnl AC_LANG_SAVE # Source file extension for Go test sources. ac_ext=go # Object file extension for compiled Go test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # Code to be used in simple compile tests lt_simple_compile_test_code="package main; func main() { }" # Code to be used in simple link tests lt_simple_link_test_code='package main; func main() { }' # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_CFLAGS=$CFLAGS lt_save_GCC=$GCC GCC=yes CC=${GOC-"gccgo"} CFLAGS=$GOFLAGS compiler=$CC _LT_TAGVAR(compiler, $1)=$CC _LT_TAGVAR(LD, $1)=$LD _LT_CC_BASENAME([$compiler]) # Go did not exist at the time GCC didn't implicitly link libc in. _LT_TAGVAR(archive_cmds_need_lc, $1)=no _LT_TAGVAR(old_archive_cmds, $1)=$old_archive_cmds _LT_TAGVAR(reload_flag, $1)=$reload_flag _LT_TAGVAR(reload_cmds, $1)=$reload_cmds ## CAVEAT EMPTOR: ## There is no encapsulation within the following macros, do not change ## the running order or otherwise move them around unless you know exactly ## what you are doing... if test -n "$compiler"; then _LT_COMPILER_NO_RTTI($1) _LT_COMPILER_PIC($1) _LT_COMPILER_C_O($1) _LT_COMPILER_FILE_LOCKS($1) _LT_LINKER_SHLIBS($1) _LT_LINKER_HARDCODE_LIBPATH($1) _LT_CONFIG($1) fi AC_LANG_RESTORE GCC=$lt_save_GCC CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS ])# _LT_LANG_GO_CONFIG # _LT_LANG_RC_CONFIG([TAG]) # ------------------------- # Ensure that the configuration variables for the Windows resource compiler # are suitably defined. These variables are subsequently used by _LT_CONFIG # to write the compiler configuration to 'libtool'. m4_defun([_LT_LANG_RC_CONFIG], [AC_REQUIRE([LT_PROG_RC])dnl AC_LANG_SAVE # Source file extension for RC test sources. ac_ext=rc # Object file extension for compiled RC test sources. objext=o _LT_TAGVAR(objext, $1)=$objext # Code to be used in simple compile tests lt_simple_compile_test_code='sample MENU { MENUITEM "&Soup", 100, CHECKED }' # Code to be used in simple link tests lt_simple_link_test_code=$lt_simple_compile_test_code # ltmain only uses $CC for tagged configurations so make sure $CC is set. _LT_TAG_COMPILER # save warnings/boilerplate of simple test code _LT_COMPILER_BOILERPLATE _LT_LINKER_BOILERPLATE # Allow CC to be a program name with arguments. lt_save_CC=$CC lt_save_CFLAGS=$CFLAGS lt_save_GCC=$GCC GCC= CC=${RC-"windres"} CFLAGS= compiler=$CC _LT_TAGVAR(compiler, $1)=$CC _LT_CC_BASENAME([$compiler]) _LT_TAGVAR(lt_cv_prog_compiler_c_o, $1)=yes if test -n "$compiler"; then : _LT_CONFIG($1) fi GCC=$lt_save_GCC AC_LANG_RESTORE CC=$lt_save_CC CFLAGS=$lt_save_CFLAGS ])# _LT_LANG_RC_CONFIG # LT_PROG_GCJ # ----------- AC_DEFUN([LT_PROG_GCJ], [m4_ifdef([AC_PROG_GCJ], [AC_PROG_GCJ], [m4_ifdef([A][M_PROG_GCJ], [A][M_PROG_GCJ], [AC_CHECK_TOOL(GCJ, gcj,) test set = "${GCJFLAGS+set}" || GCJFLAGS="-g -O2" AC_SUBST(GCJFLAGS)])])[]dnl ]) # Old name: AU_ALIAS([LT_AC_PROG_GCJ], [LT_PROG_GCJ]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([LT_AC_PROG_GCJ], []) # LT_PROG_GO # ---------- AC_DEFUN([LT_PROG_GO], [AC_CHECK_TOOL(GOC, gccgo,) ]) # LT_PROG_RC # ---------- AC_DEFUN([LT_PROG_RC], [AC_CHECK_TOOL(RC, windres,) ]) # Old name: AU_ALIAS([LT_AC_PROG_RC], [LT_PROG_RC]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([LT_AC_PROG_RC], []) # _LT_DECL_EGREP # -------------- # If we don't have a new enough Autoconf to choose the best grep # available, choose the one first in the user's PATH. m4_defun([_LT_DECL_EGREP], [AC_REQUIRE([AC_PROG_EGREP])dnl AC_REQUIRE([AC_PROG_FGREP])dnl test -z "$GREP" && GREP=grep _LT_DECL([], [GREP], [1], [A grep program that handles long lines]) _LT_DECL([], [EGREP], [1], [An ERE matcher]) _LT_DECL([], [FGREP], [1], [A literal string matcher]) dnl Non-bleeding-edge autoconf doesn't subst GREP, so do it here too AC_SUBST([GREP]) ]) # _LT_DECL_OBJDUMP # -------------- # If we don't have a new enough Autoconf to choose the best objdump # available, choose the one first in the user's PATH. m4_defun([_LT_DECL_OBJDUMP], [AC_CHECK_TOOL(OBJDUMP, objdump, false) test -z "$OBJDUMP" && OBJDUMP=objdump _LT_DECL([], [OBJDUMP], [1], [An object symbol dumper]) AC_SUBST([OBJDUMP]) ]) # _LT_DECL_DLLTOOL # ---------------- # Ensure DLLTOOL variable is set. m4_defun([_LT_DECL_DLLTOOL], [AC_CHECK_TOOL(DLLTOOL, dlltool, false) test -z "$DLLTOOL" && DLLTOOL=dlltool _LT_DECL([], [DLLTOOL], [1], [DLL creation program]) AC_SUBST([DLLTOOL]) ]) # _LT_DECL_FILECMD # ---------------- # Check for a file(cmd) program that can be used to detect file type and magic m4_defun([_LT_DECL_FILECMD], [AC_CHECK_TOOL([FILECMD], [file], [:]) _LT_DECL([], [FILECMD], [1], [A file(cmd) program that detects file types]) ])# _LD_DECL_FILECMD # _LT_DECL_SED # ------------ # Check for a fully-functional sed program, that truncates # as few characters as possible. Prefer GNU sed if found. m4_defun([_LT_DECL_SED], [AC_PROG_SED test -z "$SED" && SED=sed Xsed="$SED -e 1s/^X//" _LT_DECL([], [SED], [1], [A sed program that does not truncate output]) _LT_DECL([], [Xsed], ["\$SED -e 1s/^X//"], [Sed that helps us avoid accidentally triggering echo(1) options like -n]) ])# _LT_DECL_SED m4_ifndef([AC_PROG_SED], [ ############################################################ # NOTE: This macro has been submitted for inclusion into # # GNU Autoconf as AC_PROG_SED. When it is available in # # a released version of Autoconf we should remove this # # macro and use it instead. # ############################################################ m4_defun([AC_PROG_SED], [AC_MSG_CHECKING([for a sed that does not truncate output]) AC_CACHE_VAL(lt_cv_path_SED, [# Loop through the user's path and test for sed and gsed. # Then use that list of sed's as ones to test for truncation. as_save_IFS=$IFS; IFS=$PATH_SEPARATOR for as_dir in $PATH do IFS=$as_save_IFS test -z "$as_dir" && as_dir=. for lt_ac_prog in sed gsed; do for ac_exec_ext in '' $ac_executable_extensions; do if $as_executable_p "$as_dir/$lt_ac_prog$ac_exec_ext"; then lt_ac_sed_list="$lt_ac_sed_list $as_dir/$lt_ac_prog$ac_exec_ext" fi done done done IFS=$as_save_IFS lt_ac_max=0 lt_ac_count=0 # Add /usr/xpg4/bin/sed as it is typically found on Solaris # along with /bin/sed that truncates output. for lt_ac_sed in $lt_ac_sed_list /usr/xpg4/bin/sed; do test ! -f "$lt_ac_sed" && continue cat /dev/null > conftest.in lt_ac_count=0 echo $ECHO_N "0123456789$ECHO_C" >conftest.in # Check for GNU sed and select it if it is found. if "$lt_ac_sed" --version 2>&1 < /dev/null | grep 'GNU' > /dev/null; then lt_cv_path_SED=$lt_ac_sed break fi while true; do cat conftest.in conftest.in >conftest.tmp mv conftest.tmp conftest.in cp conftest.in conftest.nl echo >>conftest.nl $lt_ac_sed -e 's/a$//' < conftest.nl >conftest.out || break cmp -s conftest.out conftest.nl || break # 10000 chars as input seems more than enough test 10 -lt "$lt_ac_count" && break lt_ac_count=`expr $lt_ac_count + 1` if test "$lt_ac_count" -gt "$lt_ac_max"; then lt_ac_max=$lt_ac_count lt_cv_path_SED=$lt_ac_sed fi done done ]) SED=$lt_cv_path_SED AC_SUBST([SED]) AC_MSG_RESULT([$SED]) ])#AC_PROG_SED ])#m4_ifndef # Old name: AU_ALIAS([LT_AC_PROG_SED], [AC_PROG_SED]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([LT_AC_PROG_SED], []) # _LT_CHECK_SHELL_FEATURES # ------------------------ # Find out whether the shell is Bourne or XSI compatible, # or has some other useful features. m4_defun([_LT_CHECK_SHELL_FEATURES], [if ( (MAIL=60; unset MAIL) || exit) >/dev/null 2>&1; then lt_unset=unset else lt_unset=false fi _LT_DECL([], [lt_unset], [0], [whether the shell understands "unset"])dnl # test EBCDIC or ASCII case `echo X|tr X '\101'` in A) # ASCII based system # \n is not interpreted correctly by Solaris 8 /usr/ucb/tr lt_SP2NL='tr \040 \012' lt_NL2SP='tr \015\012 \040\040' ;; *) # EBCDIC based system lt_SP2NL='tr \100 \n' lt_NL2SP='tr \r\n \100\100' ;; esac _LT_DECL([SP2NL], [lt_SP2NL], [1], [turn spaces into newlines])dnl _LT_DECL([NL2SP], [lt_NL2SP], [1], [turn newlines into spaces])dnl ])# _LT_CHECK_SHELL_FEATURES # _LT_PATH_CONVERSION_FUNCTIONS # ----------------------------- # Determine what file name conversion functions should be used by # func_to_host_file (and, implicitly, by func_to_host_path). These are needed # for certain cross-compile configurations and native mingw. m4_defun([_LT_PATH_CONVERSION_FUNCTIONS], [AC_REQUIRE([AC_CANONICAL_HOST])dnl AC_REQUIRE([AC_CANONICAL_BUILD])dnl AC_MSG_CHECKING([how to convert $build file names to $host format]) AC_CACHE_VAL(lt_cv_to_host_file_cmd, [case $host in *-*-mingw* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_host_file_cmd=func_convert_file_msys_to_w32 ;; *-*-cygwin* ) lt_cv_to_host_file_cmd=func_convert_file_cygwin_to_w32 ;; * ) # otherwise, assume *nix lt_cv_to_host_file_cmd=func_convert_file_nix_to_w32 ;; esac ;; *-*-cygwin* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_host_file_cmd=func_convert_file_msys_to_cygwin ;; *-*-cygwin* ) lt_cv_to_host_file_cmd=func_convert_file_noop ;; * ) # otherwise, assume *nix lt_cv_to_host_file_cmd=func_convert_file_nix_to_cygwin ;; esac ;; * ) # unhandled hosts (and "normal" native builds) lt_cv_to_host_file_cmd=func_convert_file_noop ;; esac ]) to_host_file_cmd=$lt_cv_to_host_file_cmd AC_MSG_RESULT([$lt_cv_to_host_file_cmd]) _LT_DECL([to_host_file_cmd], [lt_cv_to_host_file_cmd], [0], [convert $build file names to $host format])dnl AC_MSG_CHECKING([how to convert $build file names to toolchain format]) AC_CACHE_VAL(lt_cv_to_tool_file_cmd, [#assume ordinary cross tools, or native build. lt_cv_to_tool_file_cmd=func_convert_file_noop case $host in *-*-mingw* ) case $build in *-*-mingw* ) # actually msys lt_cv_to_tool_file_cmd=func_convert_file_msys_to_w32 ;; esac ;; esac ]) to_tool_file_cmd=$lt_cv_to_tool_file_cmd AC_MSG_RESULT([$lt_cv_to_tool_file_cmd]) _LT_DECL([to_tool_file_cmd], [lt_cv_to_tool_file_cmd], [0], [convert $build files to toolchain format])dnl ])# _LT_PATH_CONVERSION_FUNCTIONS libffcall-2.5/m4/ln.m40000664000000000000000000000302613702414015011360 00000000000000dnl -*- Autoconf -*- dnl Copyright (C) 1993-2017 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License as published by the Free Software Foundation; dnl either version 2 of the License, or (at your option) any later version. dnl As a special exception to the GNU General Public License, this file dnl may be distributed as part of a program that contains a configuration dnl script generated by Autoconf, under the same distribution terms as dnl the rest of that program. dnl From Bruno Haible, Marcus Daniels, Sam Steingold. AC_PREREQ([2.13]) AC_DEFUN([CL_PROG_LN], [ AC_CACHE_CHECK([how to make hard links], [cl_cv_prog_LN], [rm -f conftestdata conftestfile echo data > conftestfile if ln conftestfile conftestdata 2>/dev/null; then cl_cv_prog_LN=ln else cl_cv_prog_LN="cp -p" fi rm -f conftestdata conftestfile ]) LN="$cl_cv_prog_LN" AC_SUBST([LN]) ]) AC_DEFUN([CL_PROG_LN_S], [ AC_REQUIRE([CL_PROG_LN]) dnl Make a symlink if possible; otherwise try a hard link. On filesystems dnl which support neither symlink nor hard link, use a plain copy. AC_CACHE_CHECK([whether ln -s works], [cl_cv_prog_LN_S_works], [rm -f conftestdata if ln -s X conftestdata 2>/dev/null; then cl_cv_prog_LN_S_works=yes else cl_cv_prog_LN_S_works=no fi rm -f conftestdata ]) if test $cl_cv_prog_LN_S_works = yes; then LN_S="ln -s" else LN_S="$cl_cv_prog_LN" fi AC_SUBST([LN_S]) ]) libffcall-2.5/m4/lt~obsolete.m40000644000000000000000000001400714214520133013316 00000000000000# lt~obsolete.m4 -- aclocal satisfying obsolete definitions. -*-Autoconf-*- # # Copyright (C) 2004-2005, 2007, 2009, 2011-2019, 2021-2022 Free # Software Foundation, Inc. # Written by Scott James Remnant, 2004. # # This file is free software; the Free Software Foundation gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # serial 5 lt~obsolete.m4 # These exist entirely to fool aclocal when bootstrapping libtool. # # In the past libtool.m4 has provided macros via AC_DEFUN (or AU_DEFUN), # which have later been changed to m4_define as they aren't part of the # exported API, or moved to Autoconf or Automake where they belong. # # The trouble is, aclocal is a bit thick. It'll see the old AC_DEFUN # in /usr/share/aclocal/libtool.m4 and remember it, then when it sees us # using a macro with the same name in our local m4/libtool.m4 it'll # pull the old libtool.m4 in (it doesn't see our shiny new m4_define # and doesn't know about Autoconf macros at all.) # # So we provide this file, which has a silly filename so it's always # included after everything else. This provides aclocal with the # AC_DEFUNs it wants, but when m4 processes it, it doesn't do anything # because those macros already exist, or will be overwritten later. # We use AC_DEFUN over AU_DEFUN for compatibility with aclocal-1.6. # # Anytime we withdraw an AC_DEFUN or AU_DEFUN, remember to add it here. # Yes, that means every name once taken will need to remain here until # we give up compatibility with versions before 1.7, at which point # we need to keep only those names which we still refer to. # This is to help aclocal find these macros, as it can't see m4_define. AC_DEFUN([LTOBSOLETE_VERSION], [m4_if([1])]) m4_ifndef([AC_LIBTOOL_LINKER_OPTION], [AC_DEFUN([AC_LIBTOOL_LINKER_OPTION])]) m4_ifndef([AC_PROG_EGREP], [AC_DEFUN([AC_PROG_EGREP])]) m4_ifndef([_LT_AC_PROG_ECHO_BACKSLASH], [AC_DEFUN([_LT_AC_PROG_ECHO_BACKSLASH])]) m4_ifndef([_LT_AC_SHELL_INIT], [AC_DEFUN([_LT_AC_SHELL_INIT])]) m4_ifndef([_LT_AC_SYS_LIBPATH_AIX], [AC_DEFUN([_LT_AC_SYS_LIBPATH_AIX])]) m4_ifndef([_LT_PROG_LTMAIN], [AC_DEFUN([_LT_PROG_LTMAIN])]) m4_ifndef([_LT_AC_TAGVAR], [AC_DEFUN([_LT_AC_TAGVAR])]) m4_ifndef([AC_LTDL_ENABLE_INSTALL], [AC_DEFUN([AC_LTDL_ENABLE_INSTALL])]) m4_ifndef([AC_LTDL_PREOPEN], [AC_DEFUN([AC_LTDL_PREOPEN])]) m4_ifndef([_LT_AC_SYS_COMPILER], [AC_DEFUN([_LT_AC_SYS_COMPILER])]) m4_ifndef([_LT_AC_LOCK], [AC_DEFUN([_LT_AC_LOCK])]) m4_ifndef([AC_LIBTOOL_SYS_OLD_ARCHIVE], [AC_DEFUN([AC_LIBTOOL_SYS_OLD_ARCHIVE])]) m4_ifndef([_LT_AC_TRY_DLOPEN_SELF], [AC_DEFUN([_LT_AC_TRY_DLOPEN_SELF])]) m4_ifndef([AC_LIBTOOL_PROG_CC_C_O], [AC_DEFUN([AC_LIBTOOL_PROG_CC_C_O])]) m4_ifndef([AC_LIBTOOL_SYS_HARD_LINK_LOCKS], [AC_DEFUN([AC_LIBTOOL_SYS_HARD_LINK_LOCKS])]) m4_ifndef([AC_LIBTOOL_OBJDIR], [AC_DEFUN([AC_LIBTOOL_OBJDIR])]) m4_ifndef([AC_LTDL_OBJDIR], [AC_DEFUN([AC_LTDL_OBJDIR])]) m4_ifndef([AC_LIBTOOL_PROG_LD_HARDCODE_LIBPATH], [AC_DEFUN([AC_LIBTOOL_PROG_LD_HARDCODE_LIBPATH])]) m4_ifndef([AC_LIBTOOL_SYS_LIB_STRIP], [AC_DEFUN([AC_LIBTOOL_SYS_LIB_STRIP])]) m4_ifndef([AC_PATH_MAGIC], [AC_DEFUN([AC_PATH_MAGIC])]) m4_ifndef([AC_PROG_LD_GNU], [AC_DEFUN([AC_PROG_LD_GNU])]) m4_ifndef([AC_PROG_LD_RELOAD_FLAG], [AC_DEFUN([AC_PROG_LD_RELOAD_FLAG])]) m4_ifndef([AC_DEPLIBS_CHECK_METHOD], [AC_DEFUN([AC_DEPLIBS_CHECK_METHOD])]) m4_ifndef([AC_LIBTOOL_PROG_COMPILER_NO_RTTI], [AC_DEFUN([AC_LIBTOOL_PROG_COMPILER_NO_RTTI])]) m4_ifndef([AC_LIBTOOL_SYS_GLOBAL_SYMBOL_PIPE], [AC_DEFUN([AC_LIBTOOL_SYS_GLOBAL_SYMBOL_PIPE])]) m4_ifndef([AC_LIBTOOL_PROG_COMPILER_PIC], [AC_DEFUN([AC_LIBTOOL_PROG_COMPILER_PIC])]) m4_ifndef([AC_LIBTOOL_PROG_LD_SHLIBS], [AC_DEFUN([AC_LIBTOOL_PROG_LD_SHLIBS])]) m4_ifndef([AC_LIBTOOL_POSTDEP_PREDEP], [AC_DEFUN([AC_LIBTOOL_POSTDEP_PREDEP])]) m4_ifndef([LT_AC_PROG_EGREP], [AC_DEFUN([LT_AC_PROG_EGREP])]) m4_ifndef([LT_AC_PROG_SED], [AC_DEFUN([LT_AC_PROG_SED])]) m4_ifndef([_LT_CC_BASENAME], [AC_DEFUN([_LT_CC_BASENAME])]) m4_ifndef([_LT_COMPILER_BOILERPLATE], [AC_DEFUN([_LT_COMPILER_BOILERPLATE])]) m4_ifndef([_LT_LINKER_BOILERPLATE], [AC_DEFUN([_LT_LINKER_BOILERPLATE])]) m4_ifndef([_AC_PROG_LIBTOOL], [AC_DEFUN([_AC_PROG_LIBTOOL])]) m4_ifndef([AC_LIBTOOL_SETUP], [AC_DEFUN([AC_LIBTOOL_SETUP])]) m4_ifndef([_LT_AC_CHECK_DLFCN], [AC_DEFUN([_LT_AC_CHECK_DLFCN])]) m4_ifndef([AC_LIBTOOL_SYS_DYNAMIC_LINKER], [AC_DEFUN([AC_LIBTOOL_SYS_DYNAMIC_LINKER])]) m4_ifndef([_LT_AC_TAGCONFIG], [AC_DEFUN([_LT_AC_TAGCONFIG])]) m4_ifndef([AC_DISABLE_FAST_INSTALL], [AC_DEFUN([AC_DISABLE_FAST_INSTALL])]) m4_ifndef([_LT_AC_LANG_CXX], [AC_DEFUN([_LT_AC_LANG_CXX])]) m4_ifndef([_LT_AC_LANG_F77], [AC_DEFUN([_LT_AC_LANG_F77])]) m4_ifndef([_LT_AC_LANG_GCJ], [AC_DEFUN([_LT_AC_LANG_GCJ])]) m4_ifndef([AC_LIBTOOL_LANG_C_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_C_CONFIG])]) m4_ifndef([_LT_AC_LANG_C_CONFIG], [AC_DEFUN([_LT_AC_LANG_C_CONFIG])]) m4_ifndef([AC_LIBTOOL_LANG_CXX_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_CXX_CONFIG])]) m4_ifndef([_LT_AC_LANG_CXX_CONFIG], [AC_DEFUN([_LT_AC_LANG_CXX_CONFIG])]) m4_ifndef([AC_LIBTOOL_LANG_F77_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_F77_CONFIG])]) m4_ifndef([_LT_AC_LANG_F77_CONFIG], [AC_DEFUN([_LT_AC_LANG_F77_CONFIG])]) m4_ifndef([AC_LIBTOOL_LANG_GCJ_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_GCJ_CONFIG])]) m4_ifndef([_LT_AC_LANG_GCJ_CONFIG], [AC_DEFUN([_LT_AC_LANG_GCJ_CONFIG])]) m4_ifndef([AC_LIBTOOL_LANG_RC_CONFIG], [AC_DEFUN([AC_LIBTOOL_LANG_RC_CONFIG])]) m4_ifndef([_LT_AC_LANG_RC_CONFIG], [AC_DEFUN([_LT_AC_LANG_RC_CONFIG])]) m4_ifndef([AC_LIBTOOL_CONFIG], [AC_DEFUN([AC_LIBTOOL_CONFIG])]) m4_ifndef([_LT_AC_FILE_LTDLL_C], [AC_DEFUN([_LT_AC_FILE_LTDLL_C])]) m4_ifndef([_LT_REQUIRED_DARWIN_CHECKS], [AC_DEFUN([_LT_REQUIRED_DARWIN_CHECKS])]) m4_ifndef([_LT_AC_PROG_CXXCPP], [AC_DEFUN([_LT_AC_PROG_CXXCPP])]) m4_ifndef([_LT_PREPARE_SED_QUOTE_VARS], [AC_DEFUN([_LT_PREPARE_SED_QUOTE_VARS])]) m4_ifndef([_LT_PROG_ECHO_BACKSLASH], [AC_DEFUN([_LT_PROG_ECHO_BACKSLASH])]) m4_ifndef([_LT_PROG_F77], [AC_DEFUN([_LT_PROG_F77])]) m4_ifndef([_LT_PROG_FC], [AC_DEFUN([_LT_PROG_FC])]) m4_ifndef([_LT_PROG_CXX], [AC_DEFUN([_LT_PROG_CXX])]) libffcall-2.5/m4/cc-gcc.m40000664000000000000000000000203614661170520012073 00000000000000dnl -*- Autoconf -*- dnl Copyright (C) 1993-2017 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License as published by the Free Software Foundation; dnl either version 2 of the License, or (at your option) any later version. dnl As a special exception to the GNU General Public License, this file dnl may be distributed as part of a program that contains a configuration dnl script generated by Autoconf, under the same distribution terms as dnl the rest of that program. dnl From Bruno Haible, Marcus Daniels. AC_PREREQ([2.13]) AC_DEFUN([CL_CC_GCC], [ AC_REQUIRE([AC_PROG_CPP]) AC_CACHE_CHECK([whether using GNU C], [cl_cv_prog_cc_gcc], [AC_EGREP_CPP([yes], [#ifdef __GNUC__ yes #endif ], [cl_cv_prog_cc_gcc=yes], [cl_cv_prog_cc_gcc=no]) ]) if test $cl_cv_prog_cc_gcc = yes; then CC_GCC=true GCC_X_NONE='-x none' else CC_GCC=false GCC_X_NONE='' fi AC_SUBST([CC_GCC]) AC_SUBST([GCC_X_NONE]) ]) libffcall-2.5/m4/codeexec.m40000664000000000000000000011251214660727354012550 00000000000000dnl -*- Autoconf -*- dnl Copyright (C) 1993-2024 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License as published by the Free Software Foundation; dnl either version 2 of the License, or (at your option) any later version. dnl As a special exception to the GNU General Public License, this file dnl may be distributed as part of a program that contains a configuration dnl script generated by Autoconf, under the same distribution terms as dnl the rest of that program. dnl From Bruno Haible, Marcus Daniels, Sam Steingold. AC_PREREQ([2.63]) AC_DEFUN([FFCALL_CODEEXEC], [ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([gl_HOST_CPU_C_ABI]) AC_REQUIRE([gl_FUNC_MMAP_ANON]) AC_CACHE_CHECK([whether code in malloc()ed memory is executable], [ffcall_cv_codeexec], [dnl The test below does not work on platforms with the following ABIs: dnl - hppa, because function pointers are actually pointers into(!) dnl a two-pointer struct. dnl - hppa64, because function pointers are actually pointers to a dnl four-pointer struct. dnl - powerpc on AIX, powerpc64, because function pointers are actually dnl pointers to a three-pointer struct. dnl - ia64, because function pointers are actually pointers to a dnl two-pointer struct. case "$HOST_CPU_C_ABI--$host_os" in hppa--* | hppa64--* | powerpc--aix* | powerpc64--* | ia64--*) dnl On these platforms, it's irrelevant whether malloc'ed memory is dnl executable, because the trampolines are built without executable dnl code. ffcall_cv_codeexec="irrelevant" ;; arm64--freebsd*) dnl On this platform, malloc()ed memory is not executable, and the dnl test program loops endlessly. ffcall_cv_codeexec=no ;; *) AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [#include /* declare malloc() */ #include int fun () { return 31415926; } int main () { nocrash_init(); {long size = (char*)&main - (char*)&fun; char* funcopy = (char*) malloc(size); int i; for (i = 0; i < size; i++) { funcopy[i] = ((char*)&fun)[i]; } return !((*(int(*)())funcopy)() == 31415926); }} ]]) ], [ffcall_cv_codeexec=yes], [ffcall_cv_codeexec=no], [dnl When cross-compiling, assume the known behaviour. dnl If we don't know, assume the worst. case "$host_os" in cygwin*) case "$HOST_CPU_C_ABI" in i386) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; darwin*) case "$HOST_CPU_C_ABI" in i386 | powerpc) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; irix*) ffcall_cv_codeexec="guessing no" ;; linux*) case "$HOST_CPU_C_ABI" in alpha | ia64) ffcall_cv_codeexec="guessing yes" ;; arm | armhf | arm64 | i386 | mips* | s390 | s390x | sparc | sparc64 | x86_64*) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; solaris*) case "$HOST_CPU_C_ABI" in i386 | sparc | sparc64) ffcall_cv_codeexec="guessing yes" ;; x86_64) ffcall_cv_codeexec="guessing no" ;; *) ffcall_cv_codeexec="guessing no" ;; esac ;; *) ffcall_cv_codeexec="guessing no" ;; esac ]) ;; esac ]) case "$ffcall_cv_codeexec" in *yes | irrelevant) AC_DEFINE([CODE_EXECUTABLE], [], [whether code in malloc()ed memory is executable]) ;; *no) ;; esac AC_CHECK_HEADER([sys/mman.h], [], [no_mmap=1]) if test -z "$no_mmap"; then AC_CHECK_FUNC([mmap], [], [no_mmap=1]) if test -z "$no_mmap"; then mmap_prog_1=' #include #ifdef HAVE_UNISTD_H #include #endif #include #include #include int main () { ' mmap_prog_2=' if (mmap(NULL,0x100000,PROT_READ|PROT_WRITE,flags,fd,0) == (void*)-1) exit(1); exit(0); } ' AC_CACHE_CHECK([for working mmap with MAP_ANONYMOUS], [ffcall_cv_func_mmap_anonymous], [AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mmap_prog_1 int flags = MAP_ANONYMOUS | MAP_PRIVATE; int fd = -1; nocrash_init(); $mmap_prog_2 ]]) ], [have_mmap_anon=1 ffcall_cv_func_mmap_anonymous=yes], [ffcall_cv_func_mmap_anonymous=no], [dnl When cross-compiling, assume the known behaviour. dnl If we don't know, don't assume anything. case "$host_os" in aix* | cygwin* | darwin* | hpux* | linux* | solaris*) ffcall_cv_func_mmap_anonymous="guessing yes" ;; *) ffcall_cv_func_mmap_anonymous="guessing no" ;; esac ]) ]) case "$ffcall_cv_func_mmap_anonymous" in *yes) AC_DEFINE([HAVE_MMAP_ANONYMOUS], [1], [ defines MAP_ANONYMOUS and mmaping with MAP_ANONYMOUS works]) ;; *) dnl This is needed for IRIX. AC_CACHE_CHECK([for working mmap of /dev/zero], [ffcall_cv_func_mmap_devzero], [AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mmap_prog_1 #ifndef MAP_FILE #define MAP_FILE 0 #endif int flags = MAP_FILE | MAP_PRIVATE; int fd = open("/dev/zero",O_RDONLY,0666); if (fd<0) exit(1); nocrash_init(); $mmap_prog_2 ]]) ], [have_mmap_devzero=1 ffcall_cv_func_mmap_devzero=yes], [ffcall_cv_func_mmap_devzero=no], [dnl When cross-compiling, assume the known behaviour. dnl If we don't know, don't assume anything. case "$host_os" in aix* | cygwin* | hpux* | irix* | linux* | solaris*) ffcall_cv_func_mmap_devzero="guessing yes" ;; *) ffcall_cv_func_mmap_devzero="guessing no" ;; esac ]) ]) case "$ffcall_cv_func_mmap_devzero" in *yes) AC_DEFINE([HAVE_MMAP_DEVZERO], [1], [mmaping of the special device /dev/zero works]) ;; esac ;; esac fi fi AC_CHECK_FUNCS([mprotect]) if test $ac_cv_func_mprotect = yes; then AC_CACHE_CHECK([for working mprotect], [cl_cv_func_mprotect_works], [if test $cross_compiling = no; then mprotect_prog=' #include /* Declare malloc(). */ #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mprotect(). */ #include char foo; int main () { unsigned long pagesize = getpagesize(); #define page_align(address) (char*)((unsigned long)(address) & -pagesize) ' AC_RUN_IFELSE( [AC_LANG_SOURCE([ [$mprotect_prog if ((pagesize-1) & pagesize) exit(1); exit(0); } ]]) ], [], [no_mprotect=1], [dnl When cross-compiling, don't assume anything. no_mprotect=1 ]) mprotect_prog="$mprotect_prog"' char* area = (char*) malloc(6*pagesize); char* fault_address = area + pagesize*7/2; ' if test -z "$no_mprotect"; then AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0) exit(0); foo = *fault_address; /* this should cause an exception or signal */ exit(0); } ]]) ], [no_mprotect=1], [], [dnl When cross-compiling, don't assume anything. : ]) fi if test -z "$no_mprotect"; then AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_NONE) < 0) exit(0); *fault_address = 'z'; /* this should cause an exception or signal */ exit(0); } ]]) ], [no_mprotect=1], [], [dnl When cross-compiling, don't assume anything. : ]) fi if test -z "$no_mprotect"; then AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0) exit(0); *fault_address = 'z'; /* this should cause an exception or signal */ exit(0); } ]]) ], [no_mprotect=1], [], [dnl When cross-compiling, don't assume anything. : ]) fi if test -z "$no_mprotect"; then AC_RUN_IFELSE( [AC_LANG_SOURCE([ GL_NOCRASH [$mprotect_prog nocrash_init(); if (mprotect(page_align(fault_address),pagesize,PROT_READ) < 0) exit(1); if (mprotect(page_align(fault_address),pagesize,PROT_READ|PROT_WRITE) < 0) exit(1); *fault_address = 'z'; /* this should not cause an exception or signal */ exit(0); } ]]) ], [], [no_mprotect=1], [dnl When cross-compiling, don't assume anything. : ]) fi if test -z "$no_mprotect"; then cl_cv_func_mprotect_works=yes else cl_cv_func_mprotect_works=no fi else dnl When cross-compiling, assume the known behaviour. dnl If we don't know, don't assume anything. case "$host_os" in aix* | cygwin* | darwin* | hpux* | irix* | linux* | solaris*) cl_cv_func_mprotect_works="guessing yes" ;; mingw* | windows*) cl_cv_func_mprotect_works="guessing no" ;; *) cl_cv_func_mprotect_works="guessing no" ;; esac fi ]) case "$cl_cv_func_mprotect_works" in *yes) AC_DEFINE([HAVE_WORKING_MPROTECT], [1], [have a working mprotect() function]) ;; esac fi dnl Test how to use the mprotect function to make memory executable. dnl Test against the mprotect limitations found in PaX enabled Linux kernels dnl and HardenedBSD. case "$ffcall_cv_codeexec" in *yes | irrelevant) ;; *) case "$ac_cv_func_mprotect--$cl_cv_func_mprotect_works" in yes--*yes) AC_CACHE_CHECK([whether mprotect can make malloc()ed memory executable], [ffcall_cv_malloc_mprotect_can_exec], [case "$host_os" in linux*) dnl On RHEL 6 / CentOS 6 with SELinux enabled, the result of dnl this test depends on SELinux flags that can be changed at dnl runtime: By default, the result is 'no'. However, when the dnl flag allow_execheap is turned on, the result is 'yes'. But dnl the flag can be turned off again at any moment, for example dnl by changing the file /etc/selinux/config. dnl See https://akkadia.org/drepper/selinux-mem.html . ffcall_cv_malloc_mprotect_can_exec='determined by SELinux at runtime' ;; freebsd* | dragonfly*) dnl On FreeBSD, the result of this test depends on the sysctl dnl flag kern.elf32.allow_wx or kern.elf64.allow_wx. It can be dnl changed at any moment, by editing the file /etc/sysctl.conf. ffcall_cv_malloc_mprotect_can_exec='determined by sysctl at runtime' ;; netbsd*) dnl On NetBSD, the result of this test depends on the sysctl dnl flags security.pax.mprotect.enabled dnl and security.pax.mprotect.global. dnl See https://man.netbsd.org/sysctl.7 . They can be changed dnl at any moment, by editing the file /etc/sysctl.conf. ffcall_cv_malloc_mprotect_can_exec='determined by sysctl at runtime' ;; *) AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif #include /* Declare mprotect(). */ #include int main () { unsigned int pagesize = getpagesize (); char *p = (char *) malloc (50); int ret; if (p == (char*) -1) /* malloc is not working as expected. */ return 1; p[5] = 0x77; ret = mprotect (p - ((unsigned int) p & (pagesize - 1)), pagesize, PROT_READ | PROT_WRITE | PROT_EXEC); if (ret < 0 && (errno == EACCES || errno == ENOMEM || errno == ENOTSUP)) /* mprotect is forbidden to make malloc()ed pages executable that were writable earlier. */ return 2; return 0; } ]]) ], [ffcall_cv_malloc_mprotect_can_exec=yes], [ffcall_cv_malloc_mprotect_can_exec=no], [dnl When cross-compiling, assume the worst. case "$host_os" in aix* | cygwin* | darwin* | irix* | solaris*) ffcall_cv_malloc_mprotect_can_exec="guessing yes" ;; *) ffcall_cv_malloc_mprotect_can_exec="guessing no" ;; esac ]) ;; esac ]) case "$ffcall_cv_malloc_mprotect_can_exec" in *yes) MPROTECT_AFTER_MALLOC_CAN_EXEC=1 ;; *no) MPROTECT_AFTER_MALLOC_CAN_EXEC=0 ;; *runtime*) MPROTECT_AFTER_MALLOC_CAN_EXEC='-1' ;; esac AC_DEFINE_UNQUOTED([HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC], [$MPROTECT_AFTER_MALLOC_CAN_EXEC], [have an mprotect() function that can make malloc()ed memory pages executable]) AC_CACHE_CHECK([whether mprotect can make mmap()ed memory executable], [ffcall_cv_mmap_mprotect_can_exec], [case "$host_os" in linux*) dnl On RHEL 6 / CentOS 6 with SELinux enabled, the result dnl of this test depends on SELinux flags that can be dnl changed at runtime: By default, the result is 'yes'. dnl However, when the flags allow_execmem and allow_execstack dnl are turned off, the result is 'no'. Similarly on dnl RHEL 7 / CentOS 7, where the result by default is 'no'. dnl These flags can be turned on or off, for example by dnl changing the file /etc/selinux/config. dnl See https://akkadia.org/drepper/selinux-mem.html . ffcall_cv_mmap_mprotect_can_exec='determined by SELinux at runtime' ;; freebsd* | dragonfly*) dnl On FreeBSD, the result of this test depends on the sysctl dnl flag kern.elf32.allow_wx or kern.elf64.allow_wx. It can be dnl changed at any moment, by editing the file /etc/sysctl.conf. ffcall_cv_mmap_mprotect_can_exec='determined by sysctl at runtime' ;; netbsd*) dnl On NetBSD, the result of this test depends on the sysctl dnl flags security.pax.mprotect.enabled dnl and security.pax.mprotect.global. dnl See https://man.netbsd.org/sysctl.7 . They can be changed dnl at any moment, by editing the file /etc/sysctl.conf. ffcall_cv_mmap_mprotect_can_exec='determined by sysctl at runtime' ;; *) AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif #include /* Declare mmap(), mprotect(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); char *p; int ret; #if HAVE_MMAP_ANONYMOUS p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #elif HAVE_MMAP_DEVZERO int zero_fd = open("/dev/zero", O_RDONLY, 0666); if (zero_fd < 0) return 1; p = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_FILE | MAP_VARIABLE, zero_fd, 0); #else ?? #endif if (p == (char*) -1) /* mmap is not working as expected. */ return 1; p[5] = 0x77; ret = mprotect (p, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC); if (ret < 0 && (errno == EACCES || errno == ENOMEM || errno == ENOTSUP)) /* mprotect is forbidden to make mmap()ed pages executable that were writable earlier. */ return 2; return 0; } ]]) ], [ffcall_cv_mmap_mprotect_can_exec=yes], [ffcall_cv_mmap_mprotect_can_exec=no], [dnl When cross-compiling, assume the worst. case "$host_os" in *) ffcall_cv_mmap_mprotect_can_exec="guessing no" ;; esac ]) ;; esac ]) case "$ffcall_cv_mmap_mprotect_can_exec" in *yes) MPROTECT_AFTER_MMAP_CAN_EXEC=1 ;; *no) MPROTECT_AFTER_MMAP_CAN_EXEC=0 ;; *runtime*) MPROTECT_AFTER_MMAP_CAN_EXEC='-1' ;; esac AC_DEFINE_UNQUOTED([HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC], [$MPROTECT_AFTER_MMAP_CAN_EXEC], [have an mprotect() function that can make mmap()ed memory pages executable]) case "$ffcall_cv_malloc_mprotect_can_exec" in *yes) ;; *) case "$ffcall_cv_mmap_mprotect_can_exec" in *yes) ;; *) case "$host_os" in darwin*) # This is expected to work on macOS only. # Here we use the approach with Mach primitives that exist # since macOS 10.4. It was invented by Joelle van Dyne for QEMU. # It is a lot simpler than the MAP_JIT approach that is # propagated by Apple but incompletely documented and # changes behaviour whenever Apple wants to improve "security". AC_CACHE_CHECK([whether a shared mmap with macOS primitives can make memory pages executable], [ffcall_cv_mmap_shared_macos_can_exec], [AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include /* Declare getpagesize(). */ #include /* Declare mmap(). */ #include /* Declare mach_vm_remap. */ #include /* Declaring it ourselves is easier than including . */ extern #ifdef __cplusplus "C" #endif kern_return_t mach_vm_remap (vm_map_t target_task, mach_vm_address_t *target_address, /* in/out */ mach_vm_size_t size, mach_vm_offset_t mask, int flags, vm_map_t src_task, mach_vm_address_t src_address, boolean_t copy, vm_prot_t *cur_protection, /* out */ vm_prot_t *max_protection, /* out */ vm_inherit_t inheritance); int main () { unsigned int pagesize = getpagesize (); char *pw; char *px; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON, -1, 0); if (pw == (char*) -1) return 2; pw[5] = 0xc3; { vm_map_t self = mach_task_self (); mach_vm_address_t target_address = 0; vm_prot_t cur_prot; vm_prot_t max_prot; kern_return_t ret = mach_vm_remap (self, &target_address, pagesize, 0, VM_FLAGS_ANYWHERE, self, (mach_vm_address_t) (unsigned long) pw, FALSE, &cur_prot, &max_prot, VM_INHERIT_NONE); if (ret != KERN_SUCCESS) return 3; px = (char *) (unsigned long) target_address; } if (mprotect (px, pagesize, PROT_READ | PROT_EXEC) < 0) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } ]]) ], [ffcall_cv_mmap_shared_macos_can_exec=yes], [ffcall_cv_mmap_shared_macos_can_exec=no], [dnl When cross-compiling, assume yes, since this is the result dnl on all the platforms where we have tested it. ffcall_cv_mmap_shared_macos_can_exec="guessing yes" ]) ]) case "$ffcall_cv_mmap_shared_macos_can_exec" in *yes) AC_DEFINE([HAVE_MMAP_SHARED_MACOS_CAN_EXEC], [1], [have an mmap() function that, together with mach_vm_remap(), can make memory pages executable]) ;; esac ;; esac AC_CACHE_CHECK([whether a shared mmap with NetBSD primitives can make memory pages executable], [ffcall_cv_mmap_shared_netbsd_can_exec], [AC_RUN_IFELSE( [AC_LANG_SOURCE([[ /* Enable the PROT_MPROTECT declaration on NetBSD. */ #ifndef _NETBSD_SOURCE #define _NETBSD_SOURCE 1 #endif #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif /* Declare mmap() and mremap(). */ #include int main () { unsigned int pagesize = getpagesize (); char *pw; char *px; pw = (char *) mmap (NULL, pagesize, (PROT_READ | PROT_WRITE) | PROT_MPROTECT (PROT_READ | PROT_WRITE | PROT_EXEC), MAP_PRIVATE | MAP_ANON, -1, 0); if (pw == (char*) -1) return 2; pw[5] = 0xc3; px = (char *) mremap (pw, pagesize, NULL, pagesize, MAP_REMAPDUP); if (px == (char*) -1) return 3; if (mprotect (px, pagesize, PROT_READ | PROT_EXEC) < 0) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } ]]) ], [ffcall_cv_mmap_shared_netbsd_can_exec=yes], [ffcall_cv_mmap_shared_netbsd_can_exec=no], [dnl When cross-compiling, assume yes, since this is the result dnl on all the platforms where we have tested it. ffcall_cv_mmap_shared_netbsd_can_exec="guessing yes" ]) ]) case "$ffcall_cv_mmap_shared_netbsd_can_exec" in *yes) AC_DEFINE([HAVE_MMAP_SHARED_NETBSD_CAN_EXEC], [1], [have an mmap() function that, together with mremap(), can make memory pages executable]) ;; esac gl_CHECK_FUNCS_ANDROID([memfd_create], [[#include ]]) if test $ac_cv_func_memfd_create = yes; then AC_CACHE_CHECK([whether a shared mmap of a RAM-only region can make memory pages executable], [ffcall_cv_mmap_shared_memfd_can_exec], [filename="trampdata$$" AC_RUN_IFELSE( [AC_LANG_SOURCE([[ /* Enable the memfd_create declaration on Linux. */ #ifndef _GNU_SOURCE #define _GNU_SOURCE 1 #endif #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif /* Declare mmap() and memfd_create(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); int fd; char *pw; char *px; fd = memfd_create ("$filename", 0); if (fd < 0) return 1; if (ftruncate (fd, pagesize) < 0) return 2; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0); if (pw == (char*) -1) return 3; pw[5] = 0xc3; px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED, fd, 0); if (px == (char*) -1) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } ]]) ], [ffcall_cv_mmap_shared_memfd_can_exec=yes], [ffcall_cv_mmap_shared_memfd_can_exec=no], [dnl When cross-compiling, assume yes, since this is the result dnl on all the platforms where we have tested it. ffcall_cv_mmap_shared_memfd_can_exec="guessing yes" ]) ]) case "$ffcall_cv_mmap_shared_memfd_can_exec" in *yes) AC_DEFINE([HAVE_MMAP_SHARED_MEMFD_CAN_EXEC], [1], [have an mmap() function that, with MAP_SHARED on a memfd descriptor, can make memory pages executable]) ;; esac fi AC_CACHE_CHECK([whether a shared mmap of a file can make memory pages executable], [ffcall_cv_mmap_shared_posix_can_exec], [filename="/tmp/trampdata$$.data" AC_RUN_IFELSE( [AC_LANG_SOURCE([[ #include #include /* Declare getpagesize(). */ #ifdef HAVE_UNISTD_H #include #endif #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mmap(). */ #include #ifndef MAP_FILE #define MAP_FILE 0 #endif #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif int main () { unsigned int pagesize = getpagesize (); int fd; char *pw; char *px; fd = open ("$filename", O_CREAT | O_RDWR | O_TRUNC, 0700); if (fd < 0) return 1; if (ftruncate (fd, pagesize) < 0) return 2; pw = (char *) mmap (NULL, pagesize, PROT_READ | PROT_WRITE, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0); if (pw == (char*) -1) return 3; pw[5] = 0xc3; px = (char *) mmap (NULL, pagesize, PROT_READ | PROT_EXEC, MAP_SHARED | MAP_FILE | MAP_VARIABLE, fd, 0); if (px == (char*) -1) return 4; if ((char)px[5] != (char)0xc3) return 5; /* On i386 and x86_64 this is a 'ret' instruction that we can invoke. */ #if (defined __i386 || defined __i386__ || defined _I386 || defined _M_IX86 || defined _X86_) || (defined __x86_64__ || defined __amd64__) ((void (*) (void)) (px + 5)) (); #endif return 0; } ]]) ], [ffcall_cv_mmap_shared_posix_can_exec=yes], [ffcall_cv_mmap_shared_posix_can_exec=no], [dnl When cross-compiling, assume yes, since this is the result dnl on all the platforms where we have tested it. ffcall_cv_mmap_shared_posix_can_exec="guessing yes" ]) rm -f "$filename" ]) case "$ffcall_cv_mmap_shared_posix_can_exec" in *yes) AC_DEFINE([HAVE_MMAP_SHARED_POSIX_CAN_EXEC], [1], [have an mmap() function that, with MAP_SHARED on a file, can make memory pages executable]) ;; esac ;; esac ;; esac ;; esac ;; esac ]) libffcall-2.5/m4/ltversion.m40000444000000000000000000000131214214520272012766 00000000000000# ltversion.m4 -- version numbers -*- Autoconf -*- # # Copyright (C) 2004, 2011-2019, 2021-2022 Free Software Foundation, # Inc. # Written by Scott James Remnant, 2004 # # This file is free software; the Free Software Foundation gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # @configure_input@ # serial 4245 ltversion.m4 # This file is part of GNU Libtool m4_define([LT_PACKAGE_VERSION], [2.4.7]) m4_define([LT_PACKAGE_REVISION], [2.4.7]) AC_DEFUN([LTVERSION_VERSION], [macro_version='2.4.7' macro_revision='2.4.7' _LT_DECL(, macro_version, 0, [Which release of libtool.m4 was used?]) _LT_DECL(, macro_revision, 0) ]) libffcall-2.5/m4/ltsugar.m40000644000000000000000000001045314214520133012426 00000000000000# ltsugar.m4 -- libtool m4 base layer. -*-Autoconf-*- # # Copyright (C) 2004-2005, 2007-2008, 2011-2019, 2021-2022 Free Software # Foundation, Inc. # Written by Gary V. Vaughan, 2004 # # This file is free software; the Free Software Foundation gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # serial 6 ltsugar.m4 # This is to help aclocal find these macros, as it can't see m4_define. AC_DEFUN([LTSUGAR_VERSION], [m4_if([0.1])]) # lt_join(SEP, ARG1, [ARG2...]) # ----------------------------- # Produce ARG1SEPARG2...SEPARGn, omitting [] arguments and their # associated separator. # Needed until we can rely on m4_join from Autoconf 2.62, since all earlier # versions in m4sugar had bugs. m4_define([lt_join], [m4_if([$#], [1], [], [$#], [2], [[$2]], [m4_if([$2], [], [], [[$2]_])$0([$1], m4_shift(m4_shift($@)))])]) m4_define([_lt_join], [m4_if([$#$2], [2], [], [m4_if([$2], [], [], [[$1$2]])$0([$1], m4_shift(m4_shift($@)))])]) # lt_car(LIST) # lt_cdr(LIST) # ------------ # Manipulate m4 lists. # These macros are necessary as long as will still need to support # Autoconf-2.59, which quotes differently. m4_define([lt_car], [[$1]]) m4_define([lt_cdr], [m4_if([$#], 0, [m4_fatal([$0: cannot be called without arguments])], [$#], 1, [], [m4_dquote(m4_shift($@))])]) m4_define([lt_unquote], $1) # lt_append(MACRO-NAME, STRING, [SEPARATOR]) # ------------------------------------------ # Redefine MACRO-NAME to hold its former content plus 'SEPARATOR''STRING'. # Note that neither SEPARATOR nor STRING are expanded; they are appended # to MACRO-NAME as is (leaving the expansion for when MACRO-NAME is invoked). # No SEPARATOR is output if MACRO-NAME was previously undefined (different # than defined and empty). # # This macro is needed until we can rely on Autoconf 2.62, since earlier # versions of m4sugar mistakenly expanded SEPARATOR but not STRING. m4_define([lt_append], [m4_define([$1], m4_ifdef([$1], [m4_defn([$1])[$3]])[$2])]) # lt_combine(SEP, PREFIX-LIST, INFIX, SUFFIX1, [SUFFIX2...]) # ---------------------------------------------------------- # Produce a SEP delimited list of all paired combinations of elements of # PREFIX-LIST with SUFFIX1 through SUFFIXn. Each element of the list # has the form PREFIXmINFIXSUFFIXn. # Needed until we can rely on m4_combine added in Autoconf 2.62. m4_define([lt_combine], [m4_if(m4_eval([$# > 3]), [1], [m4_pushdef([_Lt_sep], [m4_define([_Lt_sep], m4_defn([lt_car]))])]]dnl [[m4_foreach([_Lt_prefix], [$2], [m4_foreach([_Lt_suffix], ]m4_dquote(m4_dquote(m4_shift(m4_shift(m4_shift($@)))))[, [_Lt_sep([$1])[]m4_defn([_Lt_prefix])[$3]m4_defn([_Lt_suffix])])])])]) # lt_if_append_uniq(MACRO-NAME, VARNAME, [SEPARATOR], [UNIQ], [NOT-UNIQ]) # ----------------------------------------------------------------------- # Iff MACRO-NAME does not yet contain VARNAME, then append it (delimited # by SEPARATOR if supplied) and expand UNIQ, else NOT-UNIQ. m4_define([lt_if_append_uniq], [m4_ifdef([$1], [m4_if(m4_index([$3]m4_defn([$1])[$3], [$3$2$3]), [-1], [lt_append([$1], [$2], [$3])$4], [$5])], [lt_append([$1], [$2], [$3])$4])]) # lt_dict_add(DICT, KEY, VALUE) # ----------------------------- m4_define([lt_dict_add], [m4_define([$1($2)], [$3])]) # lt_dict_add_subkey(DICT, KEY, SUBKEY, VALUE) # -------------------------------------------- m4_define([lt_dict_add_subkey], [m4_define([$1($2:$3)], [$4])]) # lt_dict_fetch(DICT, KEY, [SUBKEY]) # ---------------------------------- m4_define([lt_dict_fetch], [m4_ifval([$3], m4_ifdef([$1($2:$3)], [m4_defn([$1($2:$3)])]), m4_ifdef([$1($2)], [m4_defn([$1($2)])]))]) # lt_if_dict_fetch(DICT, KEY, [SUBKEY], VALUE, IF-TRUE, [IF-FALSE]) # ----------------------------------------------------------------- m4_define([lt_if_dict_fetch], [m4_if(lt_dict_fetch([$1], [$2], [$3]), [$4], [$5], [$6])]) # lt_dict_filter(DICT, [SUBKEY], VALUE, [SEPARATOR], KEY, [...]) # -------------------------------------------------------------- m4_define([lt_dict_filter], [m4_if([$5], [], [], [lt_join(m4_quote(m4_default([$4], [[, ]])), lt_unquote(m4_split(m4_normalize(m4_foreach(_Lt_key, lt_car([m4_shiftn(4, $@)]), [lt_if_dict_fetch([$1], _Lt_key, [$2], [$3], [_Lt_key ])])))))])[]dnl ]) libffcall-2.5/m4/ltoptions.m40000644000000000000000000003427514214520133013010 00000000000000# Helper functions for option handling. -*- Autoconf -*- # # Copyright (C) 2004-2005, 2007-2009, 2011-2019, 2021-2022 Free # Software Foundation, Inc. # Written by Gary V. Vaughan, 2004 # # This file is free software; the Free Software Foundation gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # serial 8 ltoptions.m4 # This is to help aclocal find these macros, as it can't see m4_define. AC_DEFUN([LTOPTIONS_VERSION], [m4_if([1])]) # _LT_MANGLE_OPTION(MACRO-NAME, OPTION-NAME) # ------------------------------------------ m4_define([_LT_MANGLE_OPTION], [[_LT_OPTION_]m4_bpatsubst($1__$2, [[^a-zA-Z0-9_]], [_])]) # _LT_SET_OPTION(MACRO-NAME, OPTION-NAME) # --------------------------------------- # Set option OPTION-NAME for macro MACRO-NAME, and if there is a # matching handler defined, dispatch to it. Other OPTION-NAMEs are # saved as a flag. m4_define([_LT_SET_OPTION], [m4_define(_LT_MANGLE_OPTION([$1], [$2]))dnl m4_ifdef(_LT_MANGLE_DEFUN([$1], [$2]), _LT_MANGLE_DEFUN([$1], [$2]), [m4_warning([Unknown $1 option '$2'])])[]dnl ]) # _LT_IF_OPTION(MACRO-NAME, OPTION-NAME, IF-SET, [IF-NOT-SET]) # ------------------------------------------------------------ # Execute IF-SET if OPTION is set, IF-NOT-SET otherwise. m4_define([_LT_IF_OPTION], [m4_ifdef(_LT_MANGLE_OPTION([$1], [$2]), [$3], [$4])]) # _LT_UNLESS_OPTIONS(MACRO-NAME, OPTION-LIST, IF-NOT-SET) # ------------------------------------------------------- # Execute IF-NOT-SET unless all options in OPTION-LIST for MACRO-NAME # are set. m4_define([_LT_UNLESS_OPTIONS], [m4_foreach([_LT_Option], m4_split(m4_normalize([$2])), [m4_ifdef(_LT_MANGLE_OPTION([$1], _LT_Option), [m4_define([$0_found])])])[]dnl m4_ifdef([$0_found], [m4_undefine([$0_found])], [$3 ])[]dnl ]) # _LT_SET_OPTIONS(MACRO-NAME, OPTION-LIST) # ---------------------------------------- # OPTION-LIST is a space-separated list of Libtool options associated # with MACRO-NAME. If any OPTION has a matching handler declared with # LT_OPTION_DEFINE, dispatch to that macro; otherwise complain about # the unknown option and exit. m4_defun([_LT_SET_OPTIONS], [# Set options m4_foreach([_LT_Option], m4_split(m4_normalize([$2])), [_LT_SET_OPTION([$1], _LT_Option)]) m4_if([$1],[LT_INIT],[ dnl dnl Simply set some default values (i.e off) if boolean options were not dnl specified: _LT_UNLESS_OPTIONS([LT_INIT], [dlopen], [enable_dlopen=no ]) _LT_UNLESS_OPTIONS([LT_INIT], [win32-dll], [enable_win32_dll=no ]) dnl dnl If no reference was made to various pairs of opposing options, then dnl we run the default mode handler for the pair. For example, if neither dnl 'shared' nor 'disable-shared' was passed, we enable building of shared dnl archives by default: _LT_UNLESS_OPTIONS([LT_INIT], [shared disable-shared], [_LT_ENABLE_SHARED]) _LT_UNLESS_OPTIONS([LT_INIT], [static disable-static], [_LT_ENABLE_STATIC]) _LT_UNLESS_OPTIONS([LT_INIT], [pic-only no-pic], [_LT_WITH_PIC]) _LT_UNLESS_OPTIONS([LT_INIT], [fast-install disable-fast-install], [_LT_ENABLE_FAST_INSTALL]) _LT_UNLESS_OPTIONS([LT_INIT], [aix-soname=aix aix-soname=both aix-soname=svr4], [_LT_WITH_AIX_SONAME([aix])]) ]) ])# _LT_SET_OPTIONS ## --------------------------------- ## ## Macros to handle LT_INIT options. ## ## --------------------------------- ## # _LT_MANGLE_DEFUN(MACRO-NAME, OPTION-NAME) # ----------------------------------------- m4_define([_LT_MANGLE_DEFUN], [[_LT_OPTION_DEFUN_]m4_bpatsubst(m4_toupper([$1__$2]), [[^A-Z0-9_]], [_])]) # LT_OPTION_DEFINE(MACRO-NAME, OPTION-NAME, CODE) # ----------------------------------------------- m4_define([LT_OPTION_DEFINE], [m4_define(_LT_MANGLE_DEFUN([$1], [$2]), [$3])[]dnl ])# LT_OPTION_DEFINE # dlopen # ------ LT_OPTION_DEFINE([LT_INIT], [dlopen], [enable_dlopen=yes ]) AU_DEFUN([AC_LIBTOOL_DLOPEN], [_LT_SET_OPTION([LT_INIT], [dlopen]) AC_DIAGNOSE([obsolete], [$0: Remove this warning and the call to _LT_SET_OPTION when you put the 'dlopen' option into LT_INIT's first parameter.]) ]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_DLOPEN], []) # win32-dll # --------- # Declare package support for building win32 dll's. LT_OPTION_DEFINE([LT_INIT], [win32-dll], [enable_win32_dll=yes case $host in *-*-cygwin* | *-*-mingw* | *-*-pw32* | *-*-cegcc*) AC_CHECK_TOOL(AS, as, false) AC_CHECK_TOOL(DLLTOOL, dlltool, false) AC_CHECK_TOOL(OBJDUMP, objdump, false) ;; esac test -z "$AS" && AS=as _LT_DECL([], [AS], [1], [Assembler program])dnl test -z "$DLLTOOL" && DLLTOOL=dlltool _LT_DECL([], [DLLTOOL], [1], [DLL creation program])dnl test -z "$OBJDUMP" && OBJDUMP=objdump _LT_DECL([], [OBJDUMP], [1], [Object dumper program])dnl ])# win32-dll AU_DEFUN([AC_LIBTOOL_WIN32_DLL], [AC_REQUIRE([AC_CANONICAL_HOST])dnl _LT_SET_OPTION([LT_INIT], [win32-dll]) AC_DIAGNOSE([obsolete], [$0: Remove this warning and the call to _LT_SET_OPTION when you put the 'win32-dll' option into LT_INIT's first parameter.]) ]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_WIN32_DLL], []) # _LT_ENABLE_SHARED([DEFAULT]) # ---------------------------- # implement the --enable-shared flag, and supports the 'shared' and # 'disable-shared' LT_INIT options. # DEFAULT is either 'yes' or 'no'. If omitted, it defaults to 'yes'. m4_define([_LT_ENABLE_SHARED], [m4_define([_LT_ENABLE_SHARED_DEFAULT], [m4_if($1, no, no, yes)])dnl AC_ARG_ENABLE([shared], [AS_HELP_STRING([--enable-shared@<:@=PKGS@:>@], [build shared libraries @<:@default=]_LT_ENABLE_SHARED_DEFAULT[@:>@])], [p=${PACKAGE-default} case $enableval in yes) enable_shared=yes ;; no) enable_shared=no ;; *) enable_shared=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_shared=yes fi done IFS=$lt_save_ifs ;; esac], [enable_shared=]_LT_ENABLE_SHARED_DEFAULT) _LT_DECL([build_libtool_libs], [enable_shared], [0], [Whether or not to build shared libraries]) ])# _LT_ENABLE_SHARED LT_OPTION_DEFINE([LT_INIT], [shared], [_LT_ENABLE_SHARED([yes])]) LT_OPTION_DEFINE([LT_INIT], [disable-shared], [_LT_ENABLE_SHARED([no])]) # Old names: AC_DEFUN([AC_ENABLE_SHARED], [_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[shared]) ]) AC_DEFUN([AC_DISABLE_SHARED], [_LT_SET_OPTION([LT_INIT], [disable-shared]) ]) AU_DEFUN([AM_ENABLE_SHARED], [AC_ENABLE_SHARED($@)]) AU_DEFUN([AM_DISABLE_SHARED], [AC_DISABLE_SHARED($@)]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AM_ENABLE_SHARED], []) dnl AC_DEFUN([AM_DISABLE_SHARED], []) # _LT_ENABLE_STATIC([DEFAULT]) # ---------------------------- # implement the --enable-static flag, and support the 'static' and # 'disable-static' LT_INIT options. # DEFAULT is either 'yes' or 'no'. If omitted, it defaults to 'yes'. m4_define([_LT_ENABLE_STATIC], [m4_define([_LT_ENABLE_STATIC_DEFAULT], [m4_if($1, no, no, yes)])dnl AC_ARG_ENABLE([static], [AS_HELP_STRING([--enable-static@<:@=PKGS@:>@], [build static libraries @<:@default=]_LT_ENABLE_STATIC_DEFAULT[@:>@])], [p=${PACKAGE-default} case $enableval in yes) enable_static=yes ;; no) enable_static=no ;; *) enable_static=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_static=yes fi done IFS=$lt_save_ifs ;; esac], [enable_static=]_LT_ENABLE_STATIC_DEFAULT) _LT_DECL([build_old_libs], [enable_static], [0], [Whether or not to build static libraries]) ])# _LT_ENABLE_STATIC LT_OPTION_DEFINE([LT_INIT], [static], [_LT_ENABLE_STATIC([yes])]) LT_OPTION_DEFINE([LT_INIT], [disable-static], [_LT_ENABLE_STATIC([no])]) # Old names: AC_DEFUN([AC_ENABLE_STATIC], [_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[static]) ]) AC_DEFUN([AC_DISABLE_STATIC], [_LT_SET_OPTION([LT_INIT], [disable-static]) ]) AU_DEFUN([AM_ENABLE_STATIC], [AC_ENABLE_STATIC($@)]) AU_DEFUN([AM_DISABLE_STATIC], [AC_DISABLE_STATIC($@)]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AM_ENABLE_STATIC], []) dnl AC_DEFUN([AM_DISABLE_STATIC], []) # _LT_ENABLE_FAST_INSTALL([DEFAULT]) # ---------------------------------- # implement the --enable-fast-install flag, and support the 'fast-install' # and 'disable-fast-install' LT_INIT options. # DEFAULT is either 'yes' or 'no'. If omitted, it defaults to 'yes'. m4_define([_LT_ENABLE_FAST_INSTALL], [m4_define([_LT_ENABLE_FAST_INSTALL_DEFAULT], [m4_if($1, no, no, yes)])dnl AC_ARG_ENABLE([fast-install], [AS_HELP_STRING([--enable-fast-install@<:@=PKGS@:>@], [optimize for fast installation @<:@default=]_LT_ENABLE_FAST_INSTALL_DEFAULT[@:>@])], [p=${PACKAGE-default} case $enableval in yes) enable_fast_install=yes ;; no) enable_fast_install=no ;; *) enable_fast_install=no # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for pkg in $enableval; do IFS=$lt_save_ifs if test "X$pkg" = "X$p"; then enable_fast_install=yes fi done IFS=$lt_save_ifs ;; esac], [enable_fast_install=]_LT_ENABLE_FAST_INSTALL_DEFAULT) _LT_DECL([fast_install], [enable_fast_install], [0], [Whether or not to optimize for fast installation])dnl ])# _LT_ENABLE_FAST_INSTALL LT_OPTION_DEFINE([LT_INIT], [fast-install], [_LT_ENABLE_FAST_INSTALL([yes])]) LT_OPTION_DEFINE([LT_INIT], [disable-fast-install], [_LT_ENABLE_FAST_INSTALL([no])]) # Old names: AU_DEFUN([AC_ENABLE_FAST_INSTALL], [_LT_SET_OPTION([LT_INIT], m4_if([$1], [no], [disable-])[fast-install]) AC_DIAGNOSE([obsolete], [$0: Remove this warning and the call to _LT_SET_OPTION when you put the 'fast-install' option into LT_INIT's first parameter.]) ]) AU_DEFUN([AC_DISABLE_FAST_INSTALL], [_LT_SET_OPTION([LT_INIT], [disable-fast-install]) AC_DIAGNOSE([obsolete], [$0: Remove this warning and the call to _LT_SET_OPTION when you put the 'disable-fast-install' option into LT_INIT's first parameter.]) ]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_ENABLE_FAST_INSTALL], []) dnl AC_DEFUN([AM_DISABLE_FAST_INSTALL], []) # _LT_WITH_AIX_SONAME([DEFAULT]) # ---------------------------------- # implement the --with-aix-soname flag, and support the `aix-soname=aix' # and `aix-soname=both' and `aix-soname=svr4' LT_INIT options. DEFAULT # is either `aix', `both' or `svr4'. If omitted, it defaults to `aix'. m4_define([_LT_WITH_AIX_SONAME], [m4_define([_LT_WITH_AIX_SONAME_DEFAULT], [m4_if($1, svr4, svr4, m4_if($1, both, both, aix))])dnl shared_archive_member_spec= case $host,$enable_shared in power*-*-aix[[5-9]]*,yes) AC_MSG_CHECKING([which variant of shared library versioning to provide]) AC_ARG_WITH([aix-soname], [AS_HELP_STRING([--with-aix-soname=aix|svr4|both], [shared library versioning (aka "SONAME") variant to provide on AIX, @<:@default=]_LT_WITH_AIX_SONAME_DEFAULT[@:>@.])], [case $withval in aix|svr4|both) ;; *) AC_MSG_ERROR([Unknown argument to --with-aix-soname]) ;; esac lt_cv_with_aix_soname=$with_aix_soname], [AC_CACHE_VAL([lt_cv_with_aix_soname], [lt_cv_with_aix_soname=]_LT_WITH_AIX_SONAME_DEFAULT) with_aix_soname=$lt_cv_with_aix_soname]) AC_MSG_RESULT([$with_aix_soname]) if test aix != "$with_aix_soname"; then # For the AIX way of multilib, we name the shared archive member # based on the bitwidth used, traditionally 'shr.o' or 'shr_64.o', # and 'shr.imp' or 'shr_64.imp', respectively, for the Import File. # Even when GNU compilers ignore OBJECT_MODE but need '-maix64' flag, # the AIX toolchain works better with OBJECT_MODE set (default 32). if test 64 = "${OBJECT_MODE-32}"; then shared_archive_member_spec=shr_64 else shared_archive_member_spec=shr fi fi ;; *) with_aix_soname=aix ;; esac _LT_DECL([], [shared_archive_member_spec], [0], [Shared archive member basename, for filename based shared library versioning on AIX])dnl ])# _LT_WITH_AIX_SONAME LT_OPTION_DEFINE([LT_INIT], [aix-soname=aix], [_LT_WITH_AIX_SONAME([aix])]) LT_OPTION_DEFINE([LT_INIT], [aix-soname=both], [_LT_WITH_AIX_SONAME([both])]) LT_OPTION_DEFINE([LT_INIT], [aix-soname=svr4], [_LT_WITH_AIX_SONAME([svr4])]) # _LT_WITH_PIC([MODE]) # -------------------- # implement the --with-pic flag, and support the 'pic-only' and 'no-pic' # LT_INIT options. # MODE is either 'yes' or 'no'. If omitted, it defaults to 'both'. m4_define([_LT_WITH_PIC], [AC_ARG_WITH([pic], [AS_HELP_STRING([--with-pic@<:@=PKGS@:>@], [try to use only PIC/non-PIC objects @<:@default=use both@:>@])], [lt_p=${PACKAGE-default} case $withval in yes|no) pic_mode=$withval ;; *) pic_mode=default # Look at the argument we got. We use all the common list separators. lt_save_ifs=$IFS; IFS=$IFS$PATH_SEPARATOR, for lt_pkg in $withval; do IFS=$lt_save_ifs if test "X$lt_pkg" = "X$lt_p"; then pic_mode=yes fi done IFS=$lt_save_ifs ;; esac], [pic_mode=m4_default([$1], [default])]) _LT_DECL([], [pic_mode], [0], [What type of objects to build])dnl ])# _LT_WITH_PIC LT_OPTION_DEFINE([LT_INIT], [pic-only], [_LT_WITH_PIC([yes])]) LT_OPTION_DEFINE([LT_INIT], [no-pic], [_LT_WITH_PIC([no])]) # Old name: AU_DEFUN([AC_LIBTOOL_PICMODE], [_LT_SET_OPTION([LT_INIT], [pic-only]) AC_DIAGNOSE([obsolete], [$0: Remove this warning and the call to _LT_SET_OPTION when you put the 'pic-only' option into LT_INIT's first parameter.]) ]) dnl aclocal-1.4 backwards compatibility: dnl AC_DEFUN([AC_LIBTOOL_PICMODE], []) ## ----------------- ## ## LTDL_INIT Options ## ## ----------------- ## m4_define([_LTDL_MODE], []) LT_OPTION_DEFINE([LTDL_INIT], [nonrecursive], [m4_define([_LTDL_MODE], [nonrecursive])]) LT_OPTION_DEFINE([LTDL_INIT], [recursive], [m4_define([_LTDL_MODE], [recursive])]) LT_OPTION_DEFINE([LTDL_INIT], [subproject], [m4_define([_LTDL_MODE], [subproject])]) m4_define([_LTDL_TYPE], []) LT_OPTION_DEFINE([LTDL_INIT], [installable], [m4_define([_LTDL_TYPE], [installable])]) LT_OPTION_DEFINE([LTDL_INIT], [convenience], [m4_define([_LTDL_TYPE], [convenience])]) libffcall-2.5/m4/as-underscore.m40000664000000000000000000000146713153072350013532 00000000000000dnl -*- Autoconf -*- dnl Copyright (C) 1993-2017 Free Software Foundation, Inc. dnl This file is free software, distributed under the terms of the GNU dnl General Public License as published by the Free Software Foundation; dnl either version 2 of the License, or (at your option) any later version. dnl As a special exception to the GNU General Public License, this file dnl may be distributed as part of a program that contains a configuration dnl script generated by Autoconf, under the same distribution terms as dnl the rest of that program. dnl From Bruno Haible, Marcus Daniels, Sam Steingold. AC_PREREQ([2.57]) AC_DEFUN([CL_AS_UNDERSCORE], [ AC_REQUIRE([gl_ASM_SYMBOL_PREFIX]) if test "$USER_LABEL_PREFIX" = '_'; then AS_UNDERSCORE=true else AS_UNDERSCORE=false fi AC_SUBST([AS_UNDERSCORE]) ]) libffcall-2.5/Makefile.maint0000664000000000000000000001254014665266243012756 00000000000000# maintainer -*-Makefile-*- SHELL = /bin/sh MAKE = make ACLOCAL = aclocal AUTOMAKE = automake AUTOCONF = autoconf AUTOHEADER = autoheader CP = cp RM = rm -f # ==================== Easily regeneratable files ==================== .PHONY : all all : aclocal.m4 configures check-configures config-h-in Makefile-ins force cd avcall && $(MAKE) -f Makefile.maint all cd vacall && $(MAKE) -f Makefile.maint all cd trampoline && $(MAKE) -f Makefile.maint all cd callback && $(MAKE) -f Makefile.maint all # Files originating from GNU libtool. # It is important to get ltmain.sh and libtool.m4 from the same version of # libtool. Don't rely on what's installed in /usr/share or similar. .PHONY : libtool-imported-files libtool-imported-files : force test -n "$(LIBTOOL_RELEASE)" || { echo "Variable LIBTOOL_RELEASE not set." 1>&2; exit 1; } test -f "$(LIBTOOL_RELEASE)" || { echo "File $(LIBTOOL_RELEASE) does not exist." 1>&2; exit 1; } rm -rf libtool.tmp mkdir libtool.tmp gzip -d -c < "$(LIBTOOL_RELEASE)" | (cd libtool.tmp && tar -xf -) test -d build-aux || mkdir build-aux for destfile in m4/libtool.m4 m4/ltoptions.m4 m4/ltsugar.m4 m4/ltversion.m4 m4/lt~obsolete.m4 build-aux/ltmain.sh; do \ name=`echo $$destfile | sed -e 's|^.*/||'`; \ srcfile=`find libtool.tmp -name $$name -print | sed 1q`; \ if test -n "$$srcfile"; then \ if test -f $$destfile && cmp "$$srcfile" $$destfile > /dev/null; then \ : ; \ else \ mv "$$srcfile" $$destfile; \ fi; \ else \ echo "File $(LIBTOOL_RELEASE) does not contain the expected files of a libtool release." 1>&2; \ exit 1; \ fi; \ done rm -rf libtool.tmp chmod u+w build-aux/ltmain.sh patch build-aux/ltmain.sh < libtool-patches/libtool-allow-static.diff chmod u+w m4/libtool.m4 patch -p1 < libtool-patches/libtool-solaris11-fix.diff patch -p1 < libtool-patches/libtool-hurd-64.diff patch -p1 < libtool-patches/libtool-android.diff patch -p0 < libtool-patches/libtool-freebsd-biarch.diff chmod u+w build-aux/ltmain.sh m4/libtool.m4 .PHONY : libtool-clean libtool-clean : force $(RM) m4/libtool.m4 build-aux/ltmain.sh # Files brought in by gnulib-tool. GNULIB_MODULES = \ ansi-c++-opt \ host-cpu-c-abi \ nocrash \ stdint \ stdnoreturn \ libffcall-imports gnulib-m4/gnulib-cache.m4 : if test -n "$$GNULIB_TOOL"; then \ $$GNULIB_TOOL \ --local-dir=gnulib-local \ --source-base=gnulib-lib --m4-base=gnulib-m4 --aux-dir=build-aux \ --gpl=2 --libtool --conditional-dependencies --no-changelog \ --import $(GNULIB_MODULES); \ fi GNULIB_FILES = \ m4/mmap-anon.m4 .PHONY : gnulib-imported-files gnulib-imported-files : force if test -n "$$GNULIB_TOOL"; then \ for file in $(GNULIB_FILES); do \ $$GNULIB_TOOL --copy-file $$file || exit $$?; \ done; \ fi # Get up-to-date versions of files imported from https://git.savannah.gnu.org/gitweb/?p=automake.git;a=tree;f=lib via gnulib. if test -n "$$GNULIB_TOOL"; then \ for file in ar-lib compile install-sh; do \ $$GNULIB_TOOL --copy-file build-aux/$$file || exit $$?; \ chmod a+x build-aux/$$file || exit $$?; \ done; \ fi # Get up-to-date versions of files imported from https://git.savannah.gnu.org/gitweb/?p=config.git;a=tree via gnulib. if test -n "$$GNULIB_TOOL"; then \ for file in config.guess config.sub; do \ $$GNULIB_TOOL --copy-file build-aux/$$file || exit $$?; \ chmod a+x build-aux/$$file || exit $$?; \ done; \ fi .PHONY : gnulib-clean gnulib-clean : force # Move gnulib-m4/gnulib-cache.m4 away, so that the target 'gnulib-m4/gnulib-cache.m4' will actually do something. if test -f gnulib-m4/gnulib-cache.m4; then \ mv gnulib-m4/gnulib-cache.m4 gnulib-m4/gnulib-cache.m4~; \ fi # No need to remove the stale files. gnulib-tool does this itself, thanks to gnulib-m4/gnulib-comp.m4. # rm -rf gnulib-m4 # Files generated by GNU Autoconf and GNU Automake. AUTOCONF_CACHE = autom4te.cache ALL_CONFIGURE = configure ALL_CONFIGURE_AC = configure.ac aclocal.m4 : $(ALL_CONFIGURE_AC) $(wildcard m4/*.m4) $(wildcard gnulib-m4/*.m4) $(ACLOCAL) --output=aclocal.m4 .PHONY : configures configures : $(ALL_CONFIGURE) AUTOCONF_FILES = aclocal.m4 $(wildcard m4/*.m4) $(wildcard gnulib-m4/*.m4) configure : configure.ac $(AUTOCONF_FILES) $(AUTOCONF) && rm -rf autom4te.cache .PHONY : check-configures check-configures : $(ALL_CONFIGURE) set -e; for f in $(ALL_CONFIGURE); do bash -x -n $$f; done ALL_CONFIG_H_IN = config.h.in .PHONY : config-h-in config-h-in : $(ALL_CONFIG_H_IN) config.h.in : configure.ac $(AUTOCONF_FILES) srcdir=`pwd`; $(AUTOHEADER) --include="$$srcdir" && rm -rf autom4te.cache ALL_MAKEFILE_IN_FROM_AM = gnulib-lib/Makefile.in .PHONY: Makefile-ins Makefile-ins : $(ALL_MAKEFILE_IN_FROM_AM) gnulib-lib/Makefile.in : gnulib-lib/Makefile.am configure.ac $(AUTOCONF_FILES) : "Make sure we get new versions of files brought in by automake." (cd build-aux && rm -f depcomp missing) $(AUTOMAKE) --add-missing --copy && rm -rf autom4te.cache # ==================== Cleanup ==================== .PHONY : totally-clean totally-clean : force cd avcall && $(MAKE) -f Makefile.maint totally-clean cd vacall && $(MAKE) -f Makefile.maint totally-clean cd trampoline && $(MAKE) -f Makefile.maint totally-clean cd callback && $(MAKE) -f Makefile.maint totally-clean rm -f $(ALL_CONFIGURE) $(ALL_CONFIG_H_IN) rm -f aclocal.m4 rm -rf `find . -name $(AUTOCONF_CACHE) -print` force : libffcall-2.5/trampoline/0000775000000000000000000000000014665334232012431 500000000000000libffcall-2.5/trampoline/trampoline.c0000664000000000000000000023014514664204614014673 00000000000000/* Trampoline construction */ /* * Copyright 1995-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "config.h" #include "trampoline.h" #if defined(__hppa__) && !defined(__hppa64__) #if 0 #define __hppaold__ /* Old trampoline, real machine code. */ #else #define __hppanew__ /* New trampoline, just a closure. */ #endif #endif #if defined(__hppa64__) #if 0 #define __hppa64old__ /* Old trampoline, real machine code. */ #else #define __hppa64new__ /* New trampoline, just a closure. */ #endif #endif #if defined(__powerpc__) && !defined(__powerpc64__) #if !defined(_AIX) #define __powerpcsysv4__ /* SysV.4 ABI, real machine code. */ #else #define __powerpcaix__ /* AIX ABI, just a closure. */ #endif #endif #if defined(__powerpc64__) && !defined(__powerpc64_elfv2__) #define __powerpc64aix__ /* AIX ABI, just a closure. */ #endif #if defined(__hppanew__) || defined(__hppa64new__) /* * A function pointer is a biased pointer to a data area whose first word * (hppa) or third word (hppa64) contains the actual address of the function. */ extern void tramp (); /* trampoline prototype */ /* We don't need to take any special measures to make the code executable * since the actual instructions are in the text segment. */ #ifndef CODE_EXECUTABLE #define CODE_EXECUTABLE #endif #endif #if defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__) /* * A function pointer is a pointer to a data area whose first word contains * the actual address of the function. */ extern void (*tramp) (); /* trampoline prototype */ /* We don't need to take any special measures to make the code executable * since the actual instructions are in the text segment. */ #ifndef CODE_EXECUTABLE #define CODE_EXECUTABLE #endif #endif #ifndef CODE_EXECUTABLE /* Linux, Hurd, macOS, *BSD, IRIX, Solaris, Cygwin, native Windows */ /* How do we make the trampoline's code executable? */ #if HAVE_WORKING_MPROTECT /* Linux, Hurd, macOS, *BSD, IRIX, Solaris, Cygwin */ #if HAVE_MPROTECT_AFTER_MALLOC_CAN_EXEC > 0 /* Hurd, macOS, *BSD except HardenedBSD, IRIX, Solaris, Cygwin */ /* mprotect() [or equivalent] the malloc'ed area. */ #define EXECUTABLE_VIA_MALLOC_THEN_MPROTECT #elif HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC > 0 /* mprotect() [or equivalent] the mmap'ed area. */ #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT #elif HAVE_MMAP_SHARED_MACOS_CAN_EXEC /* macOS >= 10.4 */ #define EXECUTABLE_VIA_MMAP_SHARED_MACOS #elif HAVE_MMAP_SHARED_NETBSD_CAN_EXEC /* NetBSD >= 8.0 */ #define EXECUTABLE_VIA_MMAP_SHARED_NETBSD #elif HAVE_MMAP_SHARED_MEMFD_CAN_EXEC /* Linux >= 3.17, FreeBSD >= 13.0 */ #define EXECUTABLE_VIA_MMAP_SHARED_MEMFD #elif defined __ANDROID__ && HAVE_MPROTECT_AFTER_MMAP_CAN_EXEC < 0 /* Linux */ /* On Android, SELinux is controlling what is allowed, see . Using memfd_create() might violate the Android API level. Using malloc()/mmap() then mprotect PROT_WRITE|PROT_EXEC might be blocked by SELinux. Using a temporary file with separate memory mappings would depend on finding an appropriate writable directory. It's a dilemma. Let's hope that mmap() then mprotect works. */ #define EXECUTABLE_VIA_MMAP_THEN_MPROTECT #elif HAVE_MMAP_SHARED_POSIX_CAN_EXEC /* Linux, HardenedBSD */ #define EXECUTABLE_VIA_MMAP_SHARED_POSIX #else #error "Don't know how to make memory pages executable." #endif #else /* native Windows, very old Linux */ #if HAVE_MMAP_ANONYMOUS /* very old Linux */ /* Use an mmap'ed page. */ #define EXECUTABLE_VIA_MMAP #else #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */ #define EXECUTABLE_VIA_VIRTUALALLOC #else ?? #endif #endif #endif #endif #include /* declares fprintf() */ #include #include /* declares abort(), malloc(), free() */ #ifdef HAVE_UNISTD_H #include /* declares getpagesize() */ #endif /* Define intptr_t, uintptr_t. */ #include /* Declare getpagesize(). */ /* On HP-UX, getpagesize exists, but it is not declared in even if the compiler options -D_HPUX_SOURCE -D_XOPEN_SOURCE=600 are used. */ #ifdef __hpux extern #ifdef __cplusplus "C" #endif int getpagesize (void); #endif /* Declare mprotect(). */ #if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) #include #include #endif /* Declare mmap() and, if present, mremap() or memfd_create(). */ #if defined(EXECUTABLE_VIA_MMAP) || defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) #include #include #endif /* Declare mach_vm_remap. */ #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) #include /* Declaring it ourselves is easier than including . */ extern #ifdef __cplusplus "C" #endif kern_return_t mach_vm_remap (vm_map_t target_task, mach_vm_address_t *target_address, /* in/out */ mach_vm_size_t size, mach_vm_offset_t mask, int flags, vm_map_t src_task, mach_vm_address_t src_address, boolean_t copy, vm_prot_t *cur_protection, /* out */ vm_prot_t *max_protection, /* out */ vm_inherit_t inheritance); #endif #if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Declare open(). */ # include # include # include /* For finding an appropriate location for the temporary file. */ # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) # include # include # include # endif # if defined(__OpenBSD__) # include # include # endif # include #endif /* Declare VirtualAlloc(), GetSystemInfo. */ #ifdef EXECUTABLE_VIA_VIRTUALALLOC #define WIN32_LEAN_AND_MEAN #define WIN32_EXTRA_LEAN #include #endif /* Some old mmap() implementations require the flag MAP_VARIABLE whenever you pass an addr == NULL. */ #ifndef MAP_VARIABLE #define MAP_VARIABLE 0 #endif /* Support for instruction cache flush. */ #if defined _WIN32 && !defined __CYGWIN__ # define WIN32_LEAN_AND_MEAN # define WIN32_EXTRA_LEAN # include #elif defined __APPLE__ && defined __MACH__ # include #elif defined _AIX # include #elif defined __sgi # include #else #ifdef __i386__ #if defined(_WIN32) && ! defined(__CYGWIN__) /* native Windows */ #define WIN32_LEAN_AND_MEAN #define WIN32_EXTRA_LEAN #include #endif #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) || defined(__riscv32__) || defined(__riscv64__) #ifdef HAVE_SYS_CACHECTL_H /* IRIX, Linux */ #include #if defined(__riscv64__) && !defined(__GLIBC__) /* musl libc lacks a declaration of this function. */ extern int __riscv_flush_icache (void *start, void *end, unsigned long flags); #endif #else #ifdef __OpenBSD__ #include #endif #endif #endif /* Inline assembly function for instruction cache flush. */ #if defined(__sparc__) || defined(__sparc64__) extern void __TR_clear_cache_4 (char* first_addr, char* last_addr); #endif #if defined(__alpha__) extern void __TR_clear_cache (void); #endif #if defined(__hppaold__) || defined(__hppa64old__) extern void __TR_clear_cache (char* first_addr, char* last_addr); #endif #if defined(__powerpcsysv4__) || defined(__powerpc64_elfv2__) extern void __TR_clear_cache_3 (char* first_addr); #endif #endif /* Support for multithread-safe coding. */ #include "glthread/lock.h" #if defined(__APPLE__) && defined(__MACH__) /* only needed on macOS */ #define KEEP_TEMP_FILE_VISIBLE /* Support for temporary files that are cleaned up automatically. */ #include "clean-temp-simple.h" #endif /* Support for testing the protection of a memory range. */ #include "vma-prot.h" #if !defined(CODE_EXECUTABLE) && defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Opens a file descriptor and attempts to make it non-inheritable. */ static int open_noinherit (const char *filename, int flags, int mode) { # if O_CLOEXEC return open (filename, flags | O_CLOEXEC, mode); # else int fd = open (filename, flags, mode); # ifdef F_SETFD if (fd >= 0) { int flags = fcntl (fd, F_GETFD, 0); if (flags >= 0) fcntl (fd, F_SETFD, flags | FD_CLOEXEC); } # endif return fd; # endif } /* Finding an appropriate location for the temporary file. */ # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) static int is_usable_mount(const struct statfs *fsp, const char *dir) { unsigned int fs_type = fsp->f_type; if (fs_type == 0xef53 /* ext2, ext3, ext4 */ || fs_type == 0x58465342 /* xfs */ || fs_type == 0x3153464a /* IBM jfs */ || fs_type == 0x9123683e /* btrfs */ || fs_type == 0x4d44 /* vfat */ || fs_type == 0x2011bab0 /* exfat */ || fs_type == 0x00011954 || fs_type == 0x19540119 /* BSD ufs */ || fs_type == 0x858458f6 /* ramfs */ || fs_type == 0x01021994 /* tmpfs */) /* A local, possibly writable file system. */ /* Older Linux (glibc < 2.13) has no f_flags in 'struct statfs'. */ # if !(__GLIBC__ == 2 && __GLIBC_MINOR__ < 13) if ((fsp->f_flags & (ST_RDONLY | ST_NOEXEC)) == 0) # endif /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } static int is_usable_mntent(const struct mntent *me, const char *dir) { const char *me_type = me->mnt_type; if (strcmp (me_type, "ext2") == 0 /* ext2 */ || strcmp (me_type, "ext3") == 0 /* ext3 */ || strcmp (me_type, "ext4") == 0 /* ext4 */ || strcmp (me_type, "xfs") == 0 /* xfs */ || strcmp (me_type, "jfs") == 0 /* IBM jfs */ || strcmp (me_type, "btrfs") == 0 /* btrfs */ || strcmp (me_type, "vfat") == 0 /* vfat */ || strcmp (me_type, "exfat") == 0 /* exfat */ || strcmp (me_type, "ufs") == 0 /* BSD ufs */ || strcmp (me_type, "ramfs") == 0 /* ramfs */ || strcmp (me_type, "tmpfs") == 0 /* tmpfs */) //? /* A local, possibly writable file system. */ if (!hasmntopt (me, "ro") && !hasmntopt (me, "noexec")) /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } # endif # if defined(__OpenBSD__) static int is_usable_mount(const struct statfs *fsp, const char *dir) { const char *fs_type = fsp->f_fstypename; /* For the full list of file systems, look at /usr/share/man/man8/mount_*. */ if (strcmp (fs_type, "ffs") == 0 || strcmp (fs_type, "tmpfs") == 0 || strcmp (fs_type, "ext2fs") == 0 || strcmp (fs_type, "ntfs") == 0 || strcmp (fs_type, "msdos") == 0) /* This should imply (fsp->f_flags & MNT_LOCAL) != 0. */ /* A local, possibly writable file system. */ if ((fsp->f_flags & (MNT_RDONLY | MNT_NOEXEC)) == 0) /* It is writable and does not use the "noexec" mount option. */ if (access (dir, R_OK | W_OK | X_OK) == 0) /* This directory should work. */ return 1; return 0; } # endif # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) || defined(__OpenBSD__) /* Return the name of some directory, hopefully - with rwx permissions for the current user, - on a local (not network-backed) file system, - without mount options that prevent PROT_EXEC mappings. */ static const char * local_rwx_tmp_dir (void) { { /* Try /tmp first. */ const char *dir = "/tmp"; struct statfs fs; if (statfs (dir, &fs) == 0 && is_usable_mount (&fs, dir)) /* This directory should work. */ return dir; } # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) { FILE *fp = setmntent (MOUNTED, "r"); if (fp != NULL) { struct mntent mntent_buf; char buf[1000]; struct mntent *me; while ((me = getmntent_r (fp, &mntent_buf, buf, sizeof (buf))) != NULL) { const char *dir = me->mnt_dir; if (is_usable_mntent (me, dir)) { /* This directory should work. */ dir = strdup (dir); if (dir != NULL) { endmntent (fp); return dir; } } } endmntent (fp); } } # endif # if defined(__OpenBSD__) { struct statfs *fsp; int entries = getmntinfo (&fsp, MNT_NOWAIT); if (entries >= 0) for (; entries-- > 0; fsp++) { const char *dir = fsp->f_mntonname; if (is_usable_mount (fsp, dir)) { /* This directory should work. */ dir = strdup (dir); if (dir != NULL) return dir; } } } # endif { /* Try $TMPDIR last. */ const char *dir = getenv("TMPDIR"); if (dir != NULL && dir[0] == '/') { struct statfs fs; if (statfs (dir, &fs) == 0 && is_usable_mount (&fs, dir)) /* This directory should work. */ return dir; } } /* This will probably not work... */ return "/tmp"; } # endif #endif /* Length and alignment of trampoline */ #ifdef __i386__ #define TRAMP_LENGTH 15 #define TRAMP_ALIGN 16 /* 4 for a i386, 16 for a i486 */ #endif #ifdef __m68k__ #define TRAMP_LENGTH 18 #define TRAMP_ALIGN 16 #endif #if defined(__mipsold__) && !defined(__mipsn32__) #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 4 #endif #if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__) #define TRAMP_LENGTH 36 #define TRAMP_ALIGN 4 #endif #ifdef __mips64old__ #define TRAMP_LENGTH 84 #define TRAMP_ALIGN 4 #endif #ifdef __mips64__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #if defined(__sparc__) && !defined(__sparc64__) #define TRAMP_LENGTH 28 #define TRAMP_ALIGN 16 #endif #ifdef __sparc64__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 16 #endif #ifdef __alpha__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #ifdef __hppaold__ #define TRAMP_LENGTH 56 #define TRAMP_ALIGN 16 #endif #ifdef __hppanew__ #define TRAMP_LENGTH 20 #define TRAMP_ALIGN 16 #define TRAMP_BIAS 2 #endif #ifdef __hppa64old__ #define TRAMP_LENGTH 96 #define TRAMP_ALIGN 8 #define TRAMP_BIAS 64 #endif #ifdef __hppa64new__ #define TRAMP_LENGTH 56 #define TRAMP_ALIGN 8 #endif #if defined(__arm__) || defined(__armhf__) #define TRAMP_LENGTH 36 #define TRAMP_ALIGN 4 #endif #ifdef __arm64__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #ifdef __powerpcsysv4__ #define TRAMP_LENGTH 36 #define TRAMP_ALIGN 4 #endif #ifdef __powerpcaix__ #define TRAMP_LENGTH 24 #define TRAMP_ALIGN 4 #endif #ifdef __powerpc64_elfv2__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #ifdef __powerpc64aix__ #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #ifdef __ia64__ #define TRAMP_LENGTH 40 #define TRAMP_ALIGN 16 #endif #ifdef __x86_64__ #ifdef __x86_64_x32__ #define TRAMP_LENGTH 18 #define TRAMP_ALIGN 4 #else #define TRAMP_LENGTH 32 #define TRAMP_ALIGN 16 #endif #endif #if defined(__s390__) && !defined(__s390x__) #define TRAMP_LENGTH 40 #define TRAMP_ALIGN 4 #endif #if defined(__s390x__) #define TRAMP_LENGTH 64 #define TRAMP_ALIGN 8 #endif #if defined(__riscv32__) #define TRAMP_LENGTH 36 #define TRAMP_ALIGN 4 #endif #if defined(__riscv64__) #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #if defined(__loongarch64__) #define TRAMP_LENGTH 48 #define TRAMP_ALIGN 8 #endif #ifndef TRAMP_BIAS #define TRAMP_BIAS 0 #endif #if !defined(CODE_EXECUTABLE) static long pagesize = 0; #endif #if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX)) /* Variables needed for obtaining memory pages via mmap(). */ static int file_fd; static long file_length; /* Initialization of these variables. */ static void for_mmap_init (void) { #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) { char filename[100]; sprintf(filename, "trampdata-%d-%ld", getpid (), random ()); file_fd = memfd_create (filename, MFD_CLOEXEC); if (file_fd < 0) { fprintf(stderr,"trampoline: Cannot allocate RAM at %s!\n",filename); abort(); } } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) { # if defined(__linux__) || (defined(__ANDROID__) && HAVE_SETMNTENT) || defined(__OpenBSD__) const char *tmpdir = local_rwx_tmp_dir(); # else const char *tmpdir = "/tmp"; # endif int pid = getpid (); long int r = random (); /* The sprintf below may produce up to 11 bytes for %d and up to 21 bytes for %ld. */ char *filename = (char *) malloc (strlen(tmpdir)+1+10+11+1+21+1); if (filename == NULL) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } sprintf(filename, "%s/trampdata-%d-%ld", tmpdir, pid, r); #if defined(KEEP_TEMP_FILE_VISIBLE) if (register_temporary_file(filename) < 0) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } #endif file_fd = open_noinherit (filename, O_CREAT | O_RDWR | O_TRUNC, 0700); if (file_fd < 0) { #if defined(KEEP_TEMP_FILE_VISIBLE) unregister_temporary_file(filename); #endif fprintf(stderr,"trampoline: Cannot open %s!\n",filename); abort(); } #if !defined(KEEP_TEMP_FILE_VISIBLE) /* Remove the file from the file system as soon as possible, to make sure there is no leftover after this process terminates or crashes. On macOS 11.2, this does not work: It would make the mmap call below, with arguments PROT_READ|PROT_EXEC and MAP_SHARED, fail. */ unlink(filename); #endif } #endif file_length = 0; } /* Once-only initializer for these variables. */ gl_once_define(static, for_mmap_once) #endif #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) /* AIX doesn't support mprotect() in malloc'ed memory. Must get pages of * memory with execute permission via mmap(). Then keep a free list of * free trampolines. */ static char* freelist = NULL; /* Lock that protects the freelist from simultaneous access from multiple threads. */ gl_lock_define_initialized(static, freelist_lock) #endif trampoline_function_t alloc_trampoline (trampoline_function_t address, void** variable, void* data) { char* function; char* function_x; #if !defined(CODE_EXECUTABLE) /* First, get the page size once and for all. */ if (!pagesize) { #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Use a once-only initializer here, since simultaneous execution of for_mmap_init() in multiple threads must be avoided. */ gl_once (for_mmap_once, for_mmap_init); #endif /* Simultaneous execution of this initialization in multiple threads is OK. */ #if defined(EXECUTABLE_VIA_VIRTUALALLOC) /* GetSystemInfo */ SYSTEM_INFO info; GetSystemInfo(&info); pagesize = info.dwPageSize; #else pagesize = getpagesize(); #endif } #endif /* 1. Allocate room */ #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) gl_lock_lock(freelist_lock); if (freelist == NULL) { /* Get a new page. */ char* page; char* page_end; #ifdef EXECUTABLE_VIA_VIRTUALALLOC /* VirtualAlloc */ page = VirtualAlloc(NULL,pagesize,MEM_COMMIT,PAGE_EXECUTE_READWRITE); if (page == NULL) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_end = page + pagesize; #else #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) char* page_x; #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) /* Allocate one more page. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_PRIVATE|MAP_ANON,-1,0); if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } { vm_map_t self = mach_task_self (); mach_vm_address_t target_address = 0; vm_prot_t cur_prot; vm_prot_t max_prot; kern_return_t ret = mach_vm_remap (self, &target_address, pagesize, 0, VM_FLAGS_ANYWHERE, self, (mach_vm_address_t) (unsigned long) page, FALSE, &cur_prot, &max_prot, VM_INHERIT_NONE); if (ret != KERN_SUCCESS) { fprintf(stderr,"trampoline: mach_vm_remap failed!\n"); abort(); } page_x = (char *) (unsigned long) target_address; } if (mprotect(page_x,pagesize,PROT_READ|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: mprotect after mach_vm_remap failed!\n"); abort(); } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) /* Allocate one more page. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE|PROT_MPROTECT(PROT_READ|PROT_WRITE|PROT_EXEC),MAP_PRIVATE|MAP_ANON,-1,0); if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_x = (char*)mremap(page,pagesize,NULL,pagesize,MAP_REMAPDUP); if (page_x == (char*)(-1)) { fprintf(stderr,"trampoline: mremap failed!\n"); abort(); } if (mprotect(page_x,pagesize,PROT_READ|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: mprotect after mremap failed!\n"); abort(); } #endif #if defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Extend the file by one page. */ long new_file_length = file_length + pagesize; if (ftruncate(file_fd,new_file_length) < 0) { fprintf(stderr,"trampoline: Cannot extend backing file!\n"); abort(); } /* Create separate mappings for writing and for executing. */ page = (char*)mmap(NULL,pagesize,PROT_READ|PROT_WRITE,MAP_SHARED,file_fd,file_length); page_x = (char*)mmap(NULL,pagesize,PROT_READ|PROT_EXEC,MAP_SHARED,file_fd,file_length); if (page == (char*)(-1) || page_x == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } file_length = new_file_length; #endif page_end = page + pagesize; /* Link the two pages together. */ ((intptr_t*)page)[0] = page_x - page; page = (char*)(((uintptr_t)page + sizeof(intptr_t) + TRAMP_ALIGN-1) & -TRAMP_ALIGN); #else #ifdef EXECUTABLE_VIA_MMAP_THEN_MPROTECT /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */ page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #endif #ifdef EXECUTABLE_VIA_MMAP /* Use mmap with the MAP_ANONYMOUS or MAP_ANON flag. */ page = mmap(NULL, pagesize, PROT_READ | PROT_WRITE | PROT_EXEC, MAP_PRIVATE | MAP_ANONYMOUS | MAP_VARIABLE, -1, 0); #endif if (page == (char*)(-1)) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } page_end = page + pagesize; #endif #endif /* Fill it with free trampolines. */ { char** last = &freelist; while (page+TRAMP_LENGTH <= page_end) { *last = page; last = (char**)page; page = (char*)(((uintptr_t)page + TRAMP_LENGTH + TRAMP_ALIGN-1) & -TRAMP_ALIGN); } *last = NULL; } } function = freelist; freelist = *(char**)freelist; gl_lock_unlock(freelist_lock); #else { char* room = (char*) malloc(sizeof(void*) + TRAMP_LENGTH + TRAMP_ALIGN-1); if (!room) { fprintf(stderr,"trampoline: Out of virtual memory!\n"); abort(); } function = (char*)(((uintptr_t)room + sizeof(void*) + TRAMP_ALIGN-1) & -TRAMP_ALIGN); ((char**)function)[-1] = room; /* backpointer for free_trampoline() */ } #endif /* Set memory protection to "executable". */ #if !defined(CODE_EXECUTABLE) #if defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) || defined(EXECUTABLE_VIA_MMAP_THEN_MPROTECT) /* Call mprotect on the pages that contain the range. */ { uintptr_t start_addr = (uintptr_t) function; uintptr_t end_addr = (uintptr_t) (function + TRAMP_LENGTH); start_addr = start_addr & -pagesize; end_addr = (end_addr + pagesize-1) & -pagesize; {uintptr_t len = end_addr - start_addr; if (mprotect((void*)start_addr, len, PROT_READ|PROT_WRITE|PROT_EXEC) < 0) { fprintf(stderr,"trampoline: cannot make memory executable\n"); abort(); } }} #endif #endif #if !defined(CODE_EXECUTABLE) && (defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX)) /* Find the executable address corresponding to the writable address. */ { uintptr_t page = (uintptr_t) function & -(intptr_t)pagesize; function_x = function + ((intptr_t*)page)[0]; } #else function_x = function; #endif /* 2. Fill out the trampoline */ #ifdef __i386__ /* function: * movl $, C7 05 * jmp

E9
- * here: */ *(short *) (function + 0) = 0x05C7; *(long *) (function + 2) = (long) variable; *(long *) (function + 6) = (long) data; *(char *) (function +10) = 0xE9; *(long *) (function +11) = (long) address - (long) (function_x + 15); #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x05C7 && \ *(unsigned char *) (function +10) == 0xE9 #define tramp_address(function) \ *(long *) (function +11) + (long) (function + 15) #define tramp_variable(function) \ *(long *) (function + 2) #define tramp_data(function) \ *(long *) (function + 6) #endif #ifdef __m68k__ /* function: * movel #, 23 FC * jmp
4E F9
* nop 4E 71 */ *(short *) (function + 0) = 0x23FC; *(long *) (function + 2) = (long) data; *(long *) (function + 6) = (long) variable; *(short *) (function +10) = 0x4EF9; *(long *) (function +12) = (long) address; *(short *) (function +16) = 0x4E71; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x23FC && \ *(unsigned short *) (function +10) == 0x4EF9 && \ *(unsigned short *) (function +16) == 0x4E71 #define tramp_address(function) \ *(long *) (function +12) #define tramp_variable(function) \ *(long *) (function + 6) #define tramp_data(function) \ *(long *) (function + 2) #endif #if defined(__mipsold__) && !defined(__mipsn32__) /* function: * li $2,&0xffff0000 3C 02 hi16() * ori $2,$2,&0xffff 34 42 lo16() * sw $2, 3C 01 hi16() * AC 22 lo16() * li $25,
&0xffff0000 3C 19 hi16(
) * ori $25,$25,
&0xffff 37 39 lo16(
) * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 */ /* What about big endian / little endian ?? */ *(short *) (function + 0) = 0x3C02; *(short *) (function + 2) = (unsigned long) data >> 16; *(short *) (function + 4) = 0x3442; *(short *) (function + 6) = (unsigned long) data & 0xffff; *(short *) (function + 8) = 0x3C01; *(short *) (function +10) = (unsigned long) variable >> 16; *(short *) (function +12) = 0xAC22; *(short *) (function +14) = (unsigned long) variable & 0xffff; *(short *) (function +16) = 0x3C19; *(short *) (function +18) = (unsigned long) address >> 16; *(short *) (function +20) = 0x3739; *(short *) (function +22) = (unsigned long) address & 0xffff; *(long *) (function +24) = 0x03200009; *(long *) (function +28) = 0x00000000; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x3C02 && \ *(unsigned short *) (function + 4) == 0x3442 && \ *(unsigned short *) (function + 8) == 0x3C01 && \ *(unsigned short *) (function +12) == 0xAC22 && \ *(unsigned short *) (function +16) == 0x3C19 && \ *(unsigned short *) (function +20) == 0x3739 && \ *(unsigned long *) (function +24) == 0x03200009 && \ *(unsigned long *) (function +28) == 0x00000000 #define hilo(hiword,loword) \ (((unsigned long) (hiword) << 16) | (unsigned long) (loword)) #define tramp_address(function) \ hilo(*(unsigned short *) (function +18), *(unsigned short *) (function +22)) #define tramp_variable(function) \ hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14)) #define tramp_data(function) \ hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6)) #endif #if (defined(__mips__) || defined(__mipsn32__)) && !defined(__mips64__) /* function: * lw $2,24($25) 8F 22 00 18 * lw $3,28($25) 8F 23 00 1C * sw $3,0($2) AC 43 00 00 * lw $25,32($25) 8F 39 00 20 * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 * .word * .word * .word
*/ *(unsigned int *) (function + 0) = 0x8F220018; *(unsigned int *) (function + 4) = 0x8F23001C; *(unsigned int *) (function + 8) = 0xAC430000; *(unsigned int *) (function +12) = 0x8F390020; *(unsigned int *) (function +16) = 0x03200009; *(unsigned int *) (function +20) = 0x00000000; *(unsigned int *) (function +24) = (unsigned int) variable; *(unsigned int *) (function +28) = (unsigned int) data; *(unsigned int *) (function +32) = (unsigned int) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(int *) (function + 0) == 0x8F220018 && \ *(int *) (function + 4) == 0x8F23001C && \ *(int *) (function + 8) == 0xAC430000 && \ *(int *) (function +12) == 0x8F390020 && \ *(int *) (function +16) == 0x03200009 && \ *(int *) (function +20) == 0x00000000 #define tramp_address(function) \ *(unsigned int *) (function +32) #define tramp_variable(function) \ *(unsigned int *) (function +24) #define tramp_data(function) \ *(unsigned int *) (function +28) #endif #ifdef __mips64old__ /* function: * dli $2, 3C 02 hi16(hi32()) * 34 42 lo16(hi32()) * 00 02 14 38 * 34 42 hi16(lo32()) * 00 02 14 38 * 34 42 lo16(lo32()) * dli $3, 3C 03 hi16(hi32()) * 34 63 lo16(hi32()) * 00 03 1C 38 * 34 63 hi16(lo32()) * 00 03 1C 38 * 34 63 lo16(lo32()) * sd $3,0($2) FC 43 00 00 * dli $25,
3C 19 hi16(hi32(
)) * 37 39 lo16(hi32(
)) * 00 19 CC 38 * 37 39 hi16(lo32(
)) * 00 19 CC 38 * 37 39 lo16(lo32(
)) * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 */ /* What about big endian / little endian ?? */ *(short *) (function + 0) = 0x3C02; *(short *) (function + 2) = (unsigned long) variable >> 48; *(short *) (function + 4) = 0x3442; *(short *) (function + 6) = ((unsigned long) variable >> 32) & 0xffff; *(int *) (function + 8) = 0x00021438; *(short *) (function +12) = 0x3442; *(short *) (function +14) = ((unsigned long) variable >> 16) & 0xffff; *(int *) (function +16) = 0x00021438; *(short *) (function +20) = 0x3442; *(short *) (function +22) = (unsigned long) variable & 0xffff; *(short *) (function +24) = 0x3C03; *(short *) (function +26) = (unsigned long) data >> 48; *(short *) (function +28) = 0x3463; *(short *) (function +30) = ((unsigned long) data >> 32) & 0xffff; *(int *) (function +32) = 0x00031C38; *(short *) (function +36) = 0x3463; *(short *) (function +38) = ((unsigned long) data >> 16) & 0xffff; *(int *) (function +40) = 0x00031C38; *(short *) (function +44) = 0x3463; *(short *) (function +46) = (unsigned long) data & 0xffff; *(int *) (function +48) = 0xFC430000; *(short *) (function +52) = 0x3C19; *(short *) (function +54) = (unsigned long) address >> 48; *(short *) (function +56) = 0x3739; *(short *) (function +58) = ((unsigned long) address >> 32) & 0xffff; *(int *) (function +60) = 0x0019CC38; *(short *) (function +64) = 0x3739; *(short *) (function +66) = ((unsigned long) address >> 16) & 0xffff; *(int *) (function +68) = 0x0019CC38; *(short *) (function +72) = 0x3739; *(short *) (function +74) = (unsigned long) address & 0xffff; *(int *) (function +76) = 0x03200009; *(int *) (function +80) = 0x00000000; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x3C02 && \ *(unsigned short *) (function + 4) == 0x3442 && \ *(unsigned int *) (function + 8) == 0x00021438 && \ *(unsigned short *) (function +12) == 0x3442 && \ *(unsigned int *) (function +16) == 0x00021438 && \ *(unsigned short *) (function +20) == 0x3442 && \ *(unsigned short *) (function +24) == 0x3C03 && \ *(unsigned short *) (function +28) == 0x3463 && \ *(unsigned int *) (function +32) == 0x00031C38 && \ *(unsigned short *) (function +36) == 0x3463 && \ *(unsigned int *) (function +40) == 0x00031C38 && \ *(unsigned short *) (function +44) == 0x3463 && \ *(unsigned int *) (function +48) == 0xFC430000 && \ *(unsigned short *) (function +52) == 0x3C19 && \ *(unsigned short *) (function +56) == 0x3739 && \ *(unsigned int *) (function +60) == 0x0019CC38 && \ *(unsigned short *) (function +64) == 0x3739 && \ *(unsigned int *) (function +68) == 0x0019CC38 && \ *(unsigned short *) (function +72) == 0x3739 && \ *(unsigned int *) (function +76) == 0x03200009 && \ *(unsigned int *) (function +80) == 0x00000000 #define hilo(word3,word2,word1,word0) \ (((unsigned long) (word3) << 48) | ((unsigned long) (word2) << 32) | \ ((unsigned long) (word1) << 16) | (unsigned long) (word0)) #define tramp_address(function) \ hilo(*(unsigned short *) (function +54), \ *(unsigned short *) (function +58), \ *(unsigned short *) (function +66), \ *(unsigned short *) (function +74)) #define tramp_variable(function) \ hilo(*(unsigned short *) (function + 2), \ *(unsigned short *) (function + 6), \ *(unsigned short *) (function +14), \ *(unsigned short *) (function +22)) #define tramp_data(function) \ hilo(*(unsigned short *) (function +26), \ *(unsigned short *) (function +30), \ *(unsigned short *) (function +38), \ *(unsigned short *) (function +46)) #endif #ifdef __mips64__ /* function: * ld $2,24($25) DF 22 00 18 * ld $3,32($25) DF 23 00 20 * sd $3,0($2) FC 43 00 00 * ld $25,40($25) DF 39 00 28 * jal $0,$25 03 20 00 09 was: j $25 03 20 00 08 * nop 00 00 00 00 * .dword * .dword * .dword
*/ *(unsigned int *) (function + 0) = 0xDF220018; *(unsigned int *) (function + 4) = 0xDF230020; *(unsigned int *) (function + 8) = 0xFC430000; *(unsigned int *) (function +12) = 0xDF390028; *(unsigned int *) (function +16) = 0x03200009; *(unsigned int *) (function +20) = 0x00000000; *(unsigned long *) (function +24) = (unsigned long) variable; *(unsigned long *) (function +32) = (unsigned long) data; *(unsigned long *) (function +40) = (unsigned long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xDF220018 && \ *(unsigned int *) (function + 4) == 0xDF230020 && \ *(unsigned int *) (function + 8) == 0xFC430000 && \ *(unsigned int *) (function +12) == 0xDF390028 && \ *(unsigned int *) (function +16) == 0x03200009 && \ *(unsigned int *) (function +20) == 0x00000000 #define tramp_address(function) \ *(unsigned long *) (function +40) #define tramp_variable(function) \ *(unsigned long *) (function +24) #define tramp_data(function) \ *(unsigned long *) (function +32) #endif #if defined(__sparc__) && !defined(__sparc64__) /* function: * sethi %hi(),%g1 03000000 | ( >> 10) * sethi %hi(),%g2 05000000 | ( >> 10) * or %g2,%lo(),%g2 8410A000 | ( & 0x3ff) * st %g2,[%g1+%lo()] C4206000 | ( & 0x3ff) * sethi %hi(
),%g1 03000000 | (
>> 10) * jmp %g1+%lo(
) 81C06000 | (
& 0x3ff) * nop 01000000 */ #define hi(word) ((unsigned long) (word) >> 10) #define lo(word) ((unsigned long) (word) & 0x3ff) *(long *) (function + 0) = 0x03000000 | hi(variable); *(long *) (function + 4) = 0x05000000 | hi(data); *(long *) (function + 8) = 0x8410A000 | lo(data); *(long *) (function +12) = 0xC4206000 | lo(variable); *(long *) (function +16) = 0x03000000 | hi(address); *(long *) (function +20) = 0x81C06000 | lo(address); *(long *) (function +24) = 0x01000000; #define is_tramp(function) \ (*(long *) (function + 0) & 0xffc00000) == 0x03000000 && \ (*(long *) (function + 4) & 0xffc00000) == 0x05000000 && \ (*(long *) (function + 8) & 0xfffffc00) == 0x8410A000 && \ (*(long *) (function +12) & 0xfffffc00) == 0xC4206000 && \ (*(long *) (function +16) & 0xffc00000) == 0x03000000 && \ (*(long *) (function +20) & 0xfffffc00) == 0x81C06000 && \ *(long *) (function +24) == 0x01000000 #define hilo(hiword,loword) (((hiword) << 10) | ((loword) & 0x3ff)) #define tramp_address(function) \ hilo(*(long *) (function +16), *(long *) (function +20)) #define tramp_variable(function) \ hilo(*(long *) (function + 0), *(long *) (function +12)) #define tramp_data(function) \ hilo(*(long *) (function + 4), *(long *) (function + 8)) #endif #ifdef __sparc64__ /* function: * rd %pc,%g1 83414000 * ldx [%g1+24],%g2 C4586018 * ldx [%g1+32],%g3 C6586020 * ldx [%g1+40],%g1 C2586028 * jmp %g1 81C04000 * stx %g3,[%g2] C6708000 * .long high32() >> 32 * .long low32() & 0xffffffff * .long high32() >> 32 * .long low32() & 0xffffffff * .long high32(
)
>> 32 * .long low32(
)
& 0xffffffff */ *(int *) (function + 0) = 0x83414000; *(int *) (function + 4) = 0xC4586018; *(int *) (function + 8) = 0xC6586020; *(int *) (function +12) = 0xC2586028; *(int *) (function +16) = 0x81C04000; *(int *) (function +20) = 0xC6708000; *(long *) (function +24) = (long) variable; *(long *) (function +32) = (long) data; *(long *) (function +40) = (long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(int *) (function + 0) == 0x83414000 && \ *(int *) (function + 4) == 0xC4586018 && \ *(int *) (function + 8) == 0xC6586020 && \ *(int *) (function +12) == 0xC2586028 && \ *(int *) (function +16) == 0x81C04000 && \ *(int *) (function +20) == 0xC6708000 #define tramp_address(function) \ *(long *) (function +40) #define tramp_variable(function) \ *(long *) (function +24) #define tramp_data(function) \ *(long *) (function +32) #endif #ifdef __alpha__ /* function: * br $1,function..ng 00 00 20 C0 * function..ng: * ldq $2,20($1) 14 00 41 A4 * ldq $3,28($1) 1C 00 61 A4 * ldq $27,36($1) 24 00 61 A7 * stq $2,0($3) 00 00 43 B4 * jmp $31,($27),0 00 00 FB 6B * .quad * .quad * .quad
*/ { static int code [6] = { 0xC0200000, 0xA4410014, 0xA461001C, 0xA7610024, 0xB4430000, 0x6BFB0000 }; int i; for (i=0; i<6; i++) { ((int *) function)[i] = code[i]; } ((long *) function)[3] = (long) data; ((long *) function)[4] = (long) variable; ((long *) function)[5] = (long) address; } #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ ((int *) function)[0] == 0xC0200000 && \ ((int *) function)[1] == 0xA4410014 && \ ((int *) function)[2] == 0xA461001C && \ ((int *) function)[3] == 0xA7610024 && \ ((int *) function)[4] == 0xB4430000 && \ ((int *) function)[5] == 0x6BFB0000 #define tramp_address(function) \ ((long *) function)[5] #define tramp_variable(function) \ ((long *) function)[4] #define tramp_data(function) \ ((long *) function)[3] #endif #ifdef __hppaold__ /* function: * ldil L',%r20 22800000 | hi() * ldil L',%r19 22600000 | hi() * ldo R'(%r20),%r20 36940000 | lo() * stw %r20,R'(%r19) 6A740000 | lo() * ldil L'
,%r21 22A00000 | hi(
) * ldo R'
(%r21),%r21 36B50000 | lo(
) * bb,>=,n %r21,30,function2 C7D5C012 * depi 0,31,2,%r21 D6A01C1E * ldw 4(0,%r21),%r19 4AB30008 * ldw 0(0,%r21),%r21 4AB50000 * function2: * ldsid (0,%r21),%r1 02A010A1 * mtsp %r1,%sr0 00011820 * be,n 0(%sr0,%r21) E2A00002 * nop 08000240 */ /* When decoding a 21-bit argument in an instruction, the hppa performs * the following bit manipulation: * assemble21: x[20]...x[0] * --> x[0] x[11]...x[1] x[15]..x[14] x[20]...x[16] x[13]..x[12] * When encoding a 21-bit argument into an instruction, we need the * to perform the reverse permutation: * permute21: y[20]...y[0] * --> y[6]...y[2] y[8]..y[7] y[1]..y[0] y[19]...y[9] y[20] */ #define assemble21(x) \ ((((x) & 0x1) << 20) | (((x) & 0xFFE) << 8) | \ (((x) & 0xC000) >> 7) | (((x) & 0x1F0000) >> 14) | (((x) & 0x3000) >> 12)) #define permute21(y) \ ((((y) & 0x7C) << 14) | (((y) & 0x180) << 7) | (((y) & 0x3) << 12) | \ (((y) & 0xFFE00) >> 8) | (((y) & 0x100000) >> 20)) #define hi(word) permute21((unsigned long) (word) >> 11) #define lo(word) (((unsigned long) (word) & 0x7FF) << 1) *(long *) (function + 0) = 0x22800000 | hi(data); *(long *) (function + 4) = 0x22600000 | hi(variable); *(long *) (function + 8) = 0x36940000 | lo(data); *(long *) (function +12) = 0x6A740000 | lo(variable); *(long *) (function +16) = 0x22A00000 | hi(address); *(long *) (function +20) = 0x36B50000 | lo(address); *(long *) (function +24) = 0xC7D5C012; *(long *) (function +28) = 0xD6A01C1E; *(long *) (function +32) = 0x4AB30008; *(long *) (function +36) = 0x4AB50000; *(long *) (function +40) = 0x02A010A1; *(long *) (function +44) = 0x00011820; *(long *) (function +48) = 0xE2A00002; *(long *) (function +52) = 0x08000240; #define is_tramp(function) \ ((long) function & 3) == 0 && \ (*(long *) (function + 0) & 0xffe00000) == 0x22800000 && \ (*(long *) (function + 4) & 0xffe00000) == 0x22600000 && \ (*(long *) (function + 8) & 0xfffff000) == 0x36940000 && \ (*(long *) (function +12) & 0xfffff000) == 0x6A740000 && \ (*(long *) (function +16) & 0xffe00000) == 0x22A00000 && \ (*(long *) (function +20) & 0xfffff000) == 0x36B50000 && \ *(long *) (function +24) == 0xC7D5C012 && \ *(long *) (function +28) == 0xD6A01C1E && \ *(long *) (function +32) == 0x4AB30008 && \ *(long *) (function +36) == 0x4AB50000 && \ *(long *) (function +40) == 0x02A010A1 && \ *(long *) (function +44) == 0x00011820 && \ *(long *) (function +48) == 0xE2A00002 && \ *(long *) (function +52) == 0x08000240 #define hilo(hiword,loword) \ ((assemble21((unsigned long) (hiword)) << 11) | \ (((unsigned long) (loword) & 0xFFE) >> 1) \ ) #define tramp_address(function) \ hilo(*(long *) (function +16), *(long *) (function +20)) #define tramp_variable(function) \ hilo(*(long *) (function + 4), *(long *) (function +12)) #define tramp_data(function) \ hilo(*(long *) (function + 0), *(long *) (function + 8)) #endif #ifdef __hppanew__ /* function: * .long tramp * .long closure * closure: * .long * .long * .long
*/ { /* The 'volatile' below works around GCC bug . */ void* volatile tramp_address = &tramp; *(long *) (function + 0) = ((long *) ((char*)tramp_address-2))[0]; *(long *) (function + 4) = (long) (function + 8); *(long *) (function + 8) = (long) variable; *(long *) (function +12) = (long) data; *(long *) (function +16) = (long) address; } #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) ((char*)tramp_address-2))[0] #define tramp_address(function) \ ((long *) function)[4] #define tramp_variable(function) \ ((long *) function)[2] #define tramp_data(function) \ ((long *) function)[3] #endif #ifdef __hppa64old__ /* function: * mfia %r27 000014BB * ldd 40(%r27),%r31 537F0050 * ldd 48(%r27),%r1 53610060 * std %r1,0(%r31) 0FE112C0 * ldd 56(%r27),%r27 537B0070 * ldd 16(%r27),%r1 53610020 * ldd 24(%r27),%r27 537B0030 * bve (%r1) E820D000 * nop 08000240 * .align 8 * .dword * .dword * .dword
* function_pointer: * .dword 0 * .dword 0 * .dword function * .dword 0 */ *(int *) (function + 0) = 0x000014BB; *(int *) (function + 4) = 0x537F0050; *(int *) (function + 8) = 0x53610060; *(int *) (function +12) = 0x0FE112C0; *(int *) (function +16) = 0x537B0070; *(int *) (function +20) = 0x53610020; *(int *) (function +24) = 0x537B0030; *(int *) (function +28) = 0xE820D000; *(int *) (function +32) = 0x08000240; *(long *) (function +40) = (long)variable; *(long *) (function +48) = (long)data; *(long *) (function +56) = (long)address; *(long *) (function +64) = (long)0; *(long *) (function +72) = (long)0; *(long *) (function +80) = (long)function; *(long *) (function +88) = (long)0; #define TRAMP_CODE_LENGTH 36 #define is_tramp(function) \ *(int *) (function + 0) == 0x000014BB && \ *(int *) (function + 4) == 0x537F0050 && \ *(int *) (function + 8) == 0x53610060 && \ *(int *) (function +12) == 0x0FE112C0 && \ *(int *) (function +16) == 0x537B0070 && \ *(int *) (function +20) == 0x53610020 && \ *(int *) (function +24) == 0x537B0030 && \ *(int *) (function +28) == 0xE820D000 && \ *(int *) (function +32) == 0x08000240 #define tramp_address(function) \ (*(unsigned long *) (function +56)) #define tramp_variable(function) \ (*(unsigned long *) (function +40)) #define tramp_data(function) \ (*(unsigned long *) (function +48)) #endif #ifdef __hppa64new__ /* function: * .dword 0 * .dword 0 * .dword tramp * .dword closure * closure: * .dword * .dword * .dword
*/ *(long *) (function + 0) = 0; *(long *) (function + 8) = 0; *(long *) (function +16) = ((long *) (void*) &tramp)[2]; *(long *) (function +24) = (long) (function + 32); *(long *) (function +32) = (long) variable; *(long *) (function +40) = (long) data; *(long *) (function +48) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[2] == ((long *) (void*) &tramp)[2] && \ ((long *) function)[3] == (long) (function + 32) #define tramp_address(function) \ ((long *) function)[6] #define tramp_variable(function) \ ((long *) function)[4] #define tramp_data(function) \ ((long *) function)[5] #endif #if defined(__arm__) || defined(__armhf__) /* function: * stmfd sp!,{r0} E92D0001 * ldr r0,[pc,#16] E59F000C * ldr ip,[pc,#16] E59FC00C * str r0,[ip] E58C0000 * ldmfd sp!,{r0} E8BD0001 * ldr pc,[pc,#4] E59FF004 * _data: * .word * _variable: * .word * _address: * .word
*/ { ((long *) function)[0] = 0xE92D0001; ((long *) function)[1] = 0xE59F000C; ((long *) function)[2] = 0xE59FC00C; ((long *) function)[3] = 0xE58C0000; ((long *) function)[4] = 0xE8BD0001; ((long *) function)[5] = 0xE59FF004; ((long *) function)[6] = (long)data; ((long *) function)[7] = (long)variable; ((long *) function)[8] = (long)address; } #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ ((long *) function)[0] == 0xE92D0001 && \ ((long *) function)[1] == 0xE59F000C && \ ((long *) function)[2] == 0xE59FC00C && \ ((long *) function)[3] == 0xE58C0000 && \ ((long *) function)[4] == 0xE8BD0001 && \ ((long *) function)[5] == 0xE59FF004 #define tramp_address(function) \ ((long *) function)[8] #define tramp_variable(function) \ ((long *) function)[7] #define tramp_data(function) \ ((long *) function)[6] #endif #ifdef __arm64__ /* function: * ldr x9,.+24 580000C9 * ldr x10,.+28 580000EA * ldr x11,.+32 5800010B * str x9,[x10] F9000149 * br x11 D61F0160 * nop D503201F * .xword * .xword * .xword
*/ *(int *) (function + 0) = 0x580000C9; *(int *) (function + 4) = 0x580000EA; *(int *) (function + 8) = 0x5800010B; *(int *) (function +12) = 0xF9000149; *(int *) (function +16) = 0xD61F0160; *(int *) (function +20) = 0xD503201F; *(long *) (function +24) = (unsigned long) data; *(long *) (function +32) = (unsigned long) variable; *(long *) (function +40) = (unsigned long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x580000C9 && \ *(unsigned int *) (function + 4) == 0x580000EA && \ *(unsigned int *) (function + 8) == 0x5800010B && \ *(unsigned int *) (function +12) == 0xF9000149 && \ *(unsigned int *) (function +16) == 0xD61F0160 && \ *(unsigned int *) (function +20) == 0xD503201F #define tramp_address(function) \ (*(unsigned long *) (function +40)) #define tramp_variable(function) \ (*(unsigned long *) (function +32)) #define tramp_data(function) \ (*(unsigned long *) (function +24)) #endif #ifdef __powerpcsysv4__ /* function: * {liu|lis} 11,hi16() 3D 60 hi16() * {oril|ori} 11,11,lo16() 61 6B lo16() * {liu|lis} 12,hi16() 3D 80 hi16() * {oril|ori} 12,12,lo16() 61 8C lo16() * {st|stw} 12,0(11) 91 8B 00 00 * {liu|lis} 0,hi16(
) 3C 00 hi16(
) * {oril|ori} 0,0,lo16(
) 60 00 lo16(
) * mtctr 0 7C 09 03 A6 * bctr 4E 80 04 20 */ *(short *) (function + 0) = 0x3D60; *(short *) (function + 2) = (unsigned long) variable >> 16; *(short *) (function + 4) = 0x616B; *(short *) (function + 6) = (unsigned long) variable & 0xffff; *(short *) (function + 8) = 0x3D80; *(short *) (function +10) = (unsigned long) data >> 16; *(short *) (function +12) = 0x618C; *(short *) (function +14) = (unsigned long) data & 0xffff; *(long *) (function +16) = 0x918B0000; *(short *) (function +20) = 0x3C00; *(short *) (function +22) = (unsigned long) address >> 16; *(short *) (function +24) = 0x6000; *(short *) (function +26) = (unsigned long) address & 0xffff; *(long *) (function +28) = 0x7C0903A6; *(long *) (function +32) = 0x4E800420; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0x3D60 && \ *(unsigned short *) (function + 4) == 0x616B && \ *(unsigned short *) (function + 8) == 0x3D80 && \ *(unsigned short *) (function +12) == 0x618C && \ *(unsigned long *) (function +16) == 0x918B0000 && \ *(unsigned short *) (function +20) == 0x3C00 && \ *(unsigned short *) (function +24) == 0x6000 && \ *(unsigned long *) (function +28) == 0x7C0903A6 && \ *(unsigned long *) (function +32) == 0x4E800420 #define hilo(hiword,loword) \ (((unsigned long) (hiword) << 16) | (unsigned long) (loword)) #define tramp_address(function) \ hilo(*(unsigned short *) (function +22), *(unsigned short *) (function +26)) #define tramp_variable(function) \ hilo(*(unsigned short *) (function + 2), *(unsigned short *) (function + 6)) #define tramp_data(function) \ hilo(*(unsigned short *) (function +10), *(unsigned short *) (function +14)) #endif #ifdef __powerpcaix__ /* function: * .long .tramp * .long .mytoc * .long 0 * .mytoc: * .long * .long * .long
*/ *(long *) (function + 0) = ((long *) &tramp)[0]; *(long *) (function + 4) = (long) (function + 12); *(long *) (function + 8) = 0; *(long *) (function +12) = (long) variable; *(long *) (function +16) = (long) data; *(long *) (function +20) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) &tramp)[0] #define tramp_address(function) \ ((long *) function)[5] #define tramp_variable(function) \ ((long *) function)[3] #define tramp_data(function) \ ((long *) function)[4] #endif #ifdef __powerpc64_elfv2__ /* function: * ld 11,24(12) 18 00 6C E9 * ld 0,32(12) 20 00 0C E8 * std 0,0(11) 00 00 0B F8 * ld 12,40(12) 28 00 8C E9 * mtctr 12 A6 03 89 7D * bctr 20 04 80 4E * .quad * .quad * .quad
*/ *(int *) (function + 0) = 0xE96C0018; *(int *) (function + 4) = 0xE80C0020; *(int *) (function + 8) = 0xF80B0000; *(int *) (function +12) = 0xE98C0028; *(int *) (function +16) = 0x7D8903A6; *(int *) (function +20) = 0x4E800420; *(long *) (function +24) = (unsigned long) variable; *(long *) (function +32) = (unsigned long) data; *(long *) (function +40) = (unsigned long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xE96C0018 && \ *(unsigned int *) (function + 4) == 0xE80C0020 && \ *(unsigned int *) (function + 8) == 0xF80B0000 && \ *(unsigned int *) (function +12) == 0xE98C0028 && \ *(unsigned int *) (function +16) == 0x7D8903A6 && \ *(unsigned int *) (function +20) == 0x4E800420 #define tramp_address(function) \ (*(unsigned long *) (function +40)) #define tramp_variable(function) \ (*(unsigned long *) (function +24)) #define tramp_data(function) \ (*(unsigned long *) (function +32)) #endif #ifdef __powerpc64aix__ /* function: * .quad .tramp * .quad .mytoc * .quad 0 * .mytoc: * .quad * .quad * .quad
*/ *(long *) (function + 0) = ((long *) &tramp)[0]; *(long *) (function + 8) = (long) (function + 24); *(long *) (function +16) = 0; *(long *) (function +24) = (long) variable; *(long *) (function +32) = (long) data; *(long *) (function +40) = (long) address; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == ((long *) &tramp)[0] #define tramp_address(function) \ ((long *) function)[5] #define tramp_variable(function) \ ((long *) function)[3] #define tramp_data(function) \ ((long *) function)[4] #endif #ifdef __ia64__ /* function: * data8 tramp * data8 closure * closure: * data8
* data8 * data8 */ *(long *) (function + 0) = (long) &tramp; *(long *) (function + 8) = (long) (function + 16); *(long *) (function +16) = (long) address; *(long *) (function +24) = (long) variable; *(long *) (function +32) = (long) data; #define TRAMP_CODE_LENGTH 0 #define is_tramp(function) \ ((long *) function)[0] == (long) &tramp #define tramp_address(function) \ ((long *) function)[2] #define tramp_variable(function) \ ((long *) function)[3] #define tramp_data(function) \ ((long *) function)[4] #endif #ifdef __x86_64__ #ifdef __x86_64_x32__ /* function: * movl $, C7 04 25 * movl $
,%eax B8
* jmp *%rax FF E0 */ *(int *) (function + 0) = ((unsigned long) variable << 24) | 0x2504C7; *(int *) (function + 4) = ((unsigned long) data << 24) | ((unsigned long) variable >> 8); *(int *) (function + 8) = 0xB8000000 | ((unsigned long) data >> 8); *(int *) (function +12) = (unsigned long) address; *(short *) (function +16) = 0xE0FF; #define is_tramp(function) \ (*(unsigned long *) (function + 0) & 0x00FFFFFF) == 0x2504C7 && \ (*(unsigned long *) (function + 8) & 0xFF000000) == 0xB8000000 && \ *(unsigned short *) (function +16) == 0xE0FF #define tramp_address(function) \ (*(unsigned int *) (function +12)) #define tramp_variable(function) \ ((*(unsigned long *) (function + 0) >> 24) | \ (*(unsigned long *) (function + 4) << 8)) #define tramp_data(function) \ ((*(unsigned long *) (function + 4) >> 24) | \ (*(unsigned long *) (function + 8) << 8)) #else /* function: * movabsq $,%rax 48 B8 * movabsq %rax, 48 A3 * movabsq $
,%rax 48 B8
* jmp *%rax FF E0 */ *(short *) (function + 0) = 0xB848; *(short *) (function + 2) = (unsigned long long) data & 0xffff; *(int *) (function + 4) = ((unsigned long long) data >> 16) & 0xffffffff; *(short *) (function + 8) = ((unsigned long long) data >> 48) & 0xffff; *(short *) (function +10) = 0xA348; *(int *) (function +12) = (unsigned long long) variable & 0xffffffff; *(int *) (function +16) = ((unsigned long long) variable >> 32) & 0xffffffff; *(short *) (function +20) = 0xB848; *(short *) (function +22) = (unsigned long long) address & 0xffff; *(int *) (function +24) = ((unsigned long long) address >> 16) & 0xffffffff; *(short *) (function +28) = ((unsigned long long) address >> 48) & 0xffff; *(short *) (function +30) = 0xE0FF; #define is_tramp(function) \ *(unsigned short *) (function + 0) == 0xB848 && \ *(unsigned short *) (function +10) == 0xA348 && \ *(unsigned short *) (function +20) == 0xB848 && \ *(unsigned short *) (function +30) == 0xE0FF #define hilo(hiword,loword) \ (((unsigned long long) (hiword) << 32) | (unsigned long long) (loword)) #define himidlo(hishort,midword,loshort) \ (((unsigned long long) (hishort) << 48) | (unsigned long long) (midword) << 16 \ | (unsigned long long) (loshort)) #define tramp_address(function) \ himidlo(*(unsigned short *) (function +28), \ *(unsigned int *) (function +24), \ *(unsigned short *) (function +22)) #define tramp_variable(function) \ hilo(*(unsigned int *) (function +16), *(unsigned int *) (function +12)) #define tramp_data(function) \ himidlo(*(unsigned short *) (function + 8), \ *(unsigned int *) (function + 4), \ *(unsigned short *) (function + 2)) #endif #endif #if defined(__s390__) && !defined(__s390x__) /* function: * bras %r1,.L1 A7150002 * .L1: * l %r0,data-.L1(%r1) 58001018 * l %r1,variable-.L1(%r1) 5810101C * st %r0,0(%r1) 50001000 * bras %r1,.L2 A7150002 * .L2: * l %r1,function-.L2(%r1) 58101010 * br %r1 07F1 * nop 0707 * data: .long * variable: .long * address: .long
*/ *(int *) (function + 0) = 0xA7150002; *(int *) (function + 4) = 0x58001018; *(int *) (function + 8) = 0x5810101C; *(int *) (function +12) = 0x50001000; *(int *) (function +16) = 0xA7150002; *(int *) (function +20) = 0x58101010; *(int *) (function +24) = 0x07F10707; *(int *) (function +28) = (unsigned int) data; *(int *) (function +32) = (unsigned int) variable; *(int *) (function +36) = (unsigned int) address; #define TRAMP_CODE_LENGTH 28 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xA7150002 && \ *(unsigned int *) (function + 4) == 0x58001018 && \ *(unsigned int *) (function + 8) == 0x5810101C && \ *(unsigned int *) (function +12) == 0x50001000 && \ *(unsigned int *) (function +16) == 0xA7150002 && \ *(unsigned int *) (function +20) == 0x58101010 && \ *(unsigned int *) (function +24) == 0x07F10707 #define tramp_address(function) \ *(unsigned int *) (function +36) #define tramp_variable(function) \ *(unsigned int *) (function +32) #define tramp_data(function) \ *(unsigned int *) (function +28) #endif #ifdef __s390x__ /* function: * larl %r1,.L1 C01000000003 * .L1: * lg %r0,data-.L1(%r1) E30010220004 * lg %r1,variable-.L1(%r1) E310102A0004 * stg %r0,0(%r1) E30010000024 * larl %r1,.L2 C01000000003 * .L2: * lg %r1,function-.L2(%r1) E310101A0004 * br %r1 07F1 * nop 0707 * data: .quad * variable: .quad * address: .quad
*/ *(int *) (function + 0) = 0xC0100000; *(int *) (function + 4) = 0x0003E300; *(int *) (function + 8) = 0x10220004; *(int *) (function +12) = 0xE310102A; *(int *) (function +16) = 0x0004E300; *(int *) (function +20) = 0x10000024; *(int *) (function +24) = 0xC0100000; *(int *) (function +28) = 0x0003E310; *(int *) (function +32) = 0x101A0004; *(int *) (function +36) = 0x07F10707; *(long *) (function +40) = (unsigned long) data; *(long *) (function +48) = (unsigned long) variable; *(long *) (function +56) = (unsigned long) address; #define TRAMP_CODE_LENGTH 40 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0xC0100000 && \ *(unsigned int *) (function + 4) == 0x0003E300 && \ *(unsigned int *) (function + 8) == 0x10220004 && \ *(unsigned int *) (function +12) == 0xE310102A && \ *(unsigned int *) (function +16) == 0x0004E300 && \ *(unsigned int *) (function +20) == 0x10000024 && \ *(unsigned int *) (function +24) == 0xC0100000 && \ *(unsigned int *) (function +28) == 0x0003E310 && \ *(unsigned int *) (function +32) == 0x101A0004 && \ *(unsigned int *) (function +36) == 0x07F10707 #define tramp_address(function) \ (*(unsigned long *) (function +56)) #define tramp_variable(function) \ (*(unsigned long *) (function +48)) #define tramp_data(function) \ (*(unsigned long *) (function +40)) #endif #ifdef __riscv32__ /* function: * auipc t3,0 00000E17 * lw t0,24(t3) 018E2283 * lw t1,28(t3) 01CE2303 * lw t2,32(t3) 020E2383 * sw t0,(t1) 00532023 * jr t2 00038067 * data: .word * variable: .word * address: .word
*/ *(int *) (function + 0) = 0x00000E17; *(int *) (function + 4) = 0x018E2283; *(int *) (function + 8) = 0x01CE2303; *(int *) (function +12) = 0x020E2383; *(int *) (function +16) = 0x00532023; *(int *) (function +20) = 0x00038067; *(int *) (function +24) = (unsigned int) data; *(int *) (function +28) = (unsigned int) variable; *(int *) (function +32) = (unsigned int) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x00000E17 && \ *(unsigned int *) (function + 4) == 0x018E2283 && \ *(unsigned int *) (function + 8) == 0x01CE2303 && \ *(unsigned int *) (function +12) == 0x020E2383 && \ *(unsigned int *) (function +16) == 0x00532023 && \ *(unsigned int *) (function +20) == 0x00038067 #define tramp_address(function) \ (*(unsigned int *) (function +32)) #define tramp_variable(function) \ (*(unsigned int *) (function +28)) #define tramp_data(function) \ (*(unsigned int *) (function +24)) #endif #ifdef __riscv64__ /* function: * auipc t3,0 00000E17 * ld t0,24(t3) 018E3283 * ld t1,32(t3) 020E3303 * ld t2,40(t3) 028E3383 * sd t0,(t1) 00533023 * jr t2 00038067 * data: .quad * variable: .quad * address: .quad
*/ *(int *) (function + 0) = 0x00000E17; *(int *) (function + 4) = 0x018E3283; *(int *) (function + 8) = 0x020E3303; *(int *) (function +12) = 0x028E3383; *(int *) (function +16) = 0x00533023; *(int *) (function +20) = 0x00038067; *(long *) (function +24) = (unsigned long) data; *(long *) (function +32) = (unsigned long) variable; *(long *) (function +40) = (unsigned long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x00000E17 && \ *(unsigned int *) (function + 4) == 0x018E3283 && \ *(unsigned int *) (function + 8) == 0x020E3303 && \ *(unsigned int *) (function +12) == 0x028E3383 && \ *(unsigned int *) (function +16) == 0x00533023 && \ *(unsigned int *) (function +20) == 0x00038067 #define tramp_address(function) \ (*(unsigned long *) (function +40)) #define tramp_variable(function) \ (*(unsigned long *) (function +32)) #define tramp_data(function) \ (*(unsigned long *) (function +24)) #endif #ifdef __loongarch64__ /* function: * pcaddu12i $r12,0 1C00000C * ld.d $r13,$r12,24 28C0618D * ld.d $r14,$r12,32 28C0818E * st.d $r14,$r13,0 29C001AE * ld.d $r12,$r12,40 28C0A18C * jirl $r0,$r12,0 4C000180 * .dword * .dword * .dword
*/ *(unsigned int *) (function + 0) = 0x1C00000C; *(unsigned int *) (function + 4) = 0x28C0618D; *(unsigned int *) (function + 8) = 0x28C0818E; *(unsigned int *) (function +12) = 0x29C001AE; *(unsigned int *) (function +16) = 0x28C0A18C; *(unsigned int *) (function +20) = 0x4C000180; *(unsigned long *) (function +24) = (unsigned long) variable; *(unsigned long *) (function +32) = (unsigned long) data; *(unsigned long *) (function +40) = (unsigned long) address; #define TRAMP_CODE_LENGTH 24 #define is_tramp(function) \ *(unsigned int *) (function + 0) == 0x1C00000C && \ *(unsigned int *) (function + 4) == 0x28C0618D && \ *(unsigned int *) (function + 8) == 0x28C0818E && \ *(unsigned int *) (function +12) == 0x29C001AE && \ *(unsigned int *) (function +16) == 0x28C0A18C && \ *(unsigned int *) (function +20) == 0x4C000180 #define tramp_address(function) \ *(unsigned long *) (function +40) #define tramp_variable(function) \ *(unsigned long *) (function +24) #define tramp_data(function) \ *(unsigned long *) (function +32) #endif /* 3. Flush instruction cache */ /* We need this because some CPUs have separate data cache and instruction * cache. The freshly built trampoline is visible to the data cache, but not * maybe not to the instruction cache. This is hairy. */ /* TRAMP_CODE_LENGTH = length of the machine instructions. */ #ifndef TRAMP_CODE_LENGTH #define TRAMP_CODE_LENGTH TRAMP_LENGTH #endif #if !(defined(__hppanew__) || defined(__hppa64new__) || defined(__powerpcaix__) || defined(__powerpc64aix__) || defined(__ia64__)) /* Only needed if we really set up machine instructions. */ /* Use the operating system provided function, when available. */ #if defined _WIN32 && !defined __CYGWIN__ /* Native Windows. FlushInstructionCache */ HANDLE process = GetCurrentProcess (); while (!FlushInstructionCache (process, function_x, TRAMP_CODE_LENGTH)) ; #elif defined __APPLE__ && defined __MACH__ /* macOS */ sys_icache_invalidate (function_x, TRAMP_CODE_LENGTH); #elif defined _AIX /* AIX. */ _sync_cache_range (function_x, TRAMP_CODE_LENGTH); #elif defined __sgi /* IRIX. */ cacheflush (function_x, TRAMP_CODE_LENGTH, ICACHE); #elif defined __sun /* Solaris. */ extern void sync_instruction_memory (char *, size_t); sync_instruction_memory (function_x, TRAMP_CODE_LENGTH); #else /* No operating system provided function. Dispatch according to the CPU. */ #ifdef __i386__ #if defined(_WIN32) while (!FlushInstructionCache(GetCurrentProcess(),function_x,TRAMP_CODE_LENGTH)) continue; #endif #endif #ifdef __m68k__ #if defined(__NetBSD__) && defined(__GNUC__) { register uintptr_t _beg __asm__ ("%a1") = (uintptr_t) function_x; register uintptr_t _len __asm__ ("%d1") = TRAMP_CODE_LENGTH; __asm__ __volatile__ ( "move%.l %#0x80000004,%/d0\n\t" /* CC_EXTPURGE | C_IPURGE */ "trap #12" /* kernel call ‘cachectl’ */ : : "a" (_beg), "d" (_len) : "%a0", "%a1", "%d0", "%d1" /* call-used registers */ ); } #endif #if defined(__linux__) && defined(__GNUC__) { register uintptr_t _beg __asm__ ("%d1") = (uintptr_t) function_x; register uintptr_t _len __asm__ ("%d4") = TRAMP_CODE_LENGTH + 32; __asm__ __volatile__ ( "move%.l %#123,%/d0\n\t" "move%.l %#1,%/d2\n\t" "move%.l %#3,%/d3\n\t" "trap %#0" : : "d" (_beg), "d" (_len) : "%d0", "%d2", "%d3" ); } #endif #if defined(AUX) && defined(__GNUC__) /* sysm68k(105, addr, scope, cache, len) */ __asm__ __volatile__ ( "move%.l %1,%/sp@-\n\t" "move%.l %#3,%/sp@-\n\t" "move%.l %#1,%/sp@-\n\t" "move%.l %0,%/sp@-\n\t" "move%.l %#105,%/sp@-\n\t" "move%.l %#0,%/sp@-\n\t" "move%.l %#38,%/sp@-\n\t" "trap %#0\n\t" "add%.l %#24,%/sp" : : "r" (function_x), "g" ((int)TRAMP_CODE_LENGTH) : "%d0" ); #endif #endif #if defined(__mips__) || defined(__mipsn32__) || defined(__mips64__) cacheflush(function_x,TRAMP_CODE_LENGTH,ICACHE); /* gforth-0.3.0 uses BCACHE instead of ICACHE. Why?? */ #endif #if defined(__sparc__) || defined(__sparc64__) /* This assumes that the trampoline fits in at most four cache lines. */ __TR_clear_cache_4(function_x,function_x+TRAMP_CODE_LENGTH-1); #endif #ifdef __alpha__ __TR_clear_cache(); #endif #if defined(__hppa__) || defined(__hppa64__) /* This assumes that the trampoline fits in at most two cache lines. */ __TR_clear_cache(function_x,function_x+TRAMP_CODE_LENGTH-1); #endif #if defined(__arm__) || defined(__armhf__) || defined(__arm64__) /* On ARM, cache flushing can only be done through a system call. GCC implements it for Linux with EABI, through an "swi 0" with code 0xf0002. For other systems, it may be an "swi 0x9f0002", an "swi 0xf00000", or similar. */ /* On ARM64, cache flushing is done through special instructions, and the length of the cache lines must be determined at runtime. See gcc/libgcc/config/aarch64/sync-cache.c. */ #if defined(__GNUC__) /* Use the GCC built-in. */ __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH)); #else #error "Don't know how to implement clear_cache on this platform." #endif #endif #if defined(__powerpc__) || defined(__powerpc64__) __TR_clear_cache_3(function_x); #endif #if defined(__riscv32__) || defined(__riscv64__) #if defined(__linux__) /* Use the libc function. */ __riscv_flush_icache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH),0); #elif defined(__GNUC__) __asm__ __volatile__ ("fence.i"); #endif #endif #if defined(__loongarch64__) /* Use the GCC built-in. It expands to 'ibar 0'. */ __clear_cache((void*)function_x,(void*)(function_x+TRAMP_CODE_LENGTH)); #endif #endif #endif /* 4. Return. */ return (trampoline_function_t) (function_x + TRAMP_BIAS); } void free_trampoline (trampoline_function_t function) { #if TRAMP_BIAS function = (trampoline_function_t)((char*)function - TRAMP_BIAS); #endif #if !defined(CODE_EXECUTABLE) && !defined(EXECUTABLE_VIA_MALLOC_THEN_MPROTECT) #if defined(EXECUTABLE_VIA_MMAP_SHARED_MACOS) || defined(EXECUTABLE_VIA_MMAP_SHARED_NETBSD) || defined(EXECUTABLE_VIA_MMAP_SHARED_MEMFD) || defined(EXECUTABLE_VIA_MMAP_SHARED_POSIX) /* Find the writable address corresponding to the executable address. */ { uintptr_t page_x = (uintptr_t) function & -(intptr_t)pagesize; function -= ((intptr_t*)page_x)[0]; } #endif gl_lock_lock(freelist_lock); *(char**)function = freelist; freelist = (char*)function; gl_lock_unlock(freelist_lock); /* It is probably not worth calling munmap() for entirely freed pages. */ #else free(((char**)function)[-1]); #endif } int is_trampoline (void* function) { #ifdef is_tramp #ifdef __hppanew__ /* The 'volatile' below works around GCC bug . */ void* volatile tramp_address = &tramp; if (!(((uintptr_t)function & 3) == (TRAMP_BIAS & 3))) return 0; #endif #ifdef __OpenBSD__ /* OpenBSD mmaps code VMAs with protection PROT_EXEC, not PROT_READ|PROT_EXEC. Therefore is_tramp may crash if given the address of a normal function. Seen on OpenBSD 7.5/arm64. */ int prot = get_vma_prot (function, 1); if (prot != -1 && (prot & VMA_PROT_READ) == 0) /* Memory of the given function is not readable. Therefore it cannot be a trampoline. */ return 0; #endif return ((is_tramp(((char*)function - TRAMP_BIAS))) ? 1 : 0); #else abort(); #endif } trampoline_function_t trampoline_address (trampoline_function_t function) { #ifdef tramp_address return (trampoline_function_t)(tramp_address(((char*)function - TRAMP_BIAS))); #else abort(); #endif } void** trampoline_variable (trampoline_function_t function) { #ifdef tramp_variable return (void**)(tramp_variable(((char*)function - TRAMP_BIAS))); #else abort(); #endif } void* trampoline_data (trampoline_function_t function) { #ifdef tramp_data return (void*)(tramp_data(((char*)function - TRAMP_BIAS))); #else abort(); #endif } libffcall-2.5/trampoline/cache-alpha-macro.S0000664000000000000000000000066014662622071015722 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl __TR_clear_cache .ent __TR_clear_cache $__TR_clear_cache..ng: __TR_clear_cache: .frame $30,0,$26,0 .prologue 0 .set macro call_pal 0x86 .set nomacro ret $31,($26),1 .end __TR_clear_cache #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/cache-powerpc64.c0000664000000000000000000000260514664204167015414 00000000000000/* Instruction cache flushing for powerpc64, not the AIX ABI */ /* * Copyright 1997-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache_3 (char* first_addr) { /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */ /* The number of asm statements here depends on the value of TRAMP_LENGTH-3*8 for __powerpc64_elfv2__. */ asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20)); asm volatile ("sync; isync"); } libffcall-2.5/trampoline/cache-sparc64-macro.S0000664000000000000000000000062614662622071016121 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(__TR_clear_cache_4) DECLARE_FUNCTION(__TR_clear_cache_4) .proc 020 FUNBEGIN(__TR_clear_cache_4) iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24 jmp %o7+8 nop FUNEND(__TR_clear_cache_4) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/tramp-hppa-macro.S0000664000000000000000000000265713347755324015664 00000000000000; Trampoline for hppa CPU ; Copyright 1997-2017 Bruno Haible ; ; This program is free software: you can redistribute it and/or modify ; it under the terms of the GNU General Public License as published by ; the Free Software Foundation; either version 2 of the License, or ; (at your option) any later version. ; ; This program is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ; GNU General Public License for more details. ; ; You should have received a copy of the GNU General Public License ; along with this program. If not, see . ; Available registers: %r1, %r19, %r20, %r21, %r22, %r29, %r31. .code .IMPORT $global$,DATA .IMPORT $$dyncall,MILLICODE .code .align 4 .EXPORT tramp,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR .label tramp .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY ; The closure pointer is already in register %r19. ; Move into register %r20. ldw 0(0,%r19),%r20 ; Move into register %r22 ldw 4(0,%r19),%r22 ; Move
into register %r21. ldw 8(0,%r19),%r21 ; Store into . stw %r22,0(0,%r20) ; Jump to %r21. bb,>=,n %r21,30,tramp_2 depi 0,31,2,%r21 ldw 4(0,%r21),%r19 ldw 0(0,%r21),%r21 .label tramp_2 ldsid (0,%r21),%r1 mtsp %r1,%sr0 be,n 0(%sr0,%r21) nop .EXIT .PROCEND #include "noexecstack.h" libffcall-2.5/trampoline/tramp-hppa64-macro.S0000664000000000000000000000265713347755323016035 00000000000000; Trampoline for hppa64 CPU ; Copyright 2017 Bruno Haible ; ; This program is free software: you can redistribute it and/or modify ; it under the terms of the GNU General Public License as published by ; the Free Software Foundation; either version 2 of the License, or ; (at your option) any later version. ; ; This program is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ; GNU General Public License for more details. ; ; You should have received a copy of the GNU General Public License ; along with this program. If not, see . ; Available registers: %r1, %r27, %r31. ; %r27 has a fixed meaning at function calls: pic_base (a.k.a. gp or dp). ; %r31 has a fixed meaning as millicode return pointer (mrp). #include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(tramp) DECLARE_FUNCTION(tramp) DEF(tramp) .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY ; The closure pointer is already in register %r27. ; Move into . ldd 0(%r27),%r31 ; get ldd 8(%r27),%r1 ; get std %r1,0(%r31) ; store in ; Jump to . ldd 16(%r27),%r27 ; get ldd 16(%r27),%r1 ldd 24(%r27),%r27 bve (%r1) ; jump to nop .EXIT .PROCEND DEF(L(fe1)) FUNEND(tramp) #include "noexecstack.h" libffcall-2.5/trampoline/cache-powerpc64-elfv2-linux.s0000664000000000000000000000160314664204344017577 00000000000000 .file "cache-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl __TR_clear_cache_3 .type __TR_clear_cache_3, @function __TR_clear_cache_3: #APP # 25 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 #NO_APP addi 9,3,4 #APP # 26 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 9,3,8 #APP # 27 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 9,3,12 #APP # 28 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 9,3,16 #APP # 29 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 #NO_APP addi 3,3,20 #APP # 30 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 # 31 "cache-powerpc64.c" 1 sync; isync # 0 "" 2 #NO_APP blr .long 0 .byte 0,0,0,0,0,0,0,0 .size __TR_clear_cache_3,.-__TR_clear_cache_3 .ident "GCC: (GNU) 5.4.0" .section .note.GNU-stack,"",@progbits libffcall-2.5/trampoline/tramp-powerpc64-aix.S0000664000000000000000000000322413347755327016237 00000000000000/* Trampoline for powerpc64 CPU with AIX calling convention */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r0, r11, r12. */ /* However, r0 is special in that it cannot be used as a base register. */ .machine "ppc64" #ifdef _AIX .rename H.4.NO_SYMBOL{PR},"" .lglobl H.4.NO_SYMBOL{PR} .globl .tramp .csect H.4.NO_SYMBOL{PR},7 #else .globl tramp .globl .tramp tramp: .quad .tramp #endif .tramp: /* Move into */ ld 11,0(2) /* get */ ld 12,8(2) /* get */ std 12,0(11) /* Get */ ld 12,16(2) /* * gcc-2.6.3 source says: * A function pointer is a pointer to a data area whose first word contains * the actual address of the function, whose second word contains a pointer * to its TOC, and whose third word contains a value to place in the static * chain register (r11). */ ld 11,16(12) /* pass static chain in r11 */ ld 2,8(12) /* pass TOC in r2 */ ld 0,0(12) /* actual code address */ mtctr 0 bctr #include "noexecstack.h" libffcall-2.5/trampoline/cache-hppa-macro.S0000664000000000000000000000114214662622071015561 00000000000000#include "asm-hppa.h" .LEVEL 1.1 IMPORT_MILLICODE($$dyncall) TEXT1() TEXT2() .align 4 GLOBL(__TR_clear_cache) DECLARE_FUNCTION(__TR_clear_cache) DEF(__TR_clear_cache) .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r20 ldsid (0,%r26),%r26 mtsp %r26,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r20,%sr0 nop nop nop nop nop nop bv,n %r0(%r2) .EXIT .PROCEND DEF(L(fe1)) FUNEND(__TR_clear_cache) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/cache-powerpc-macos.s0000664000000000000000000000061714664204343016357 00000000000000.text .align 2 .globl ___TR_clear_cache_3 ___TR_clear_cache_3: icbi 0,r3; dcbf 0,r3 addi r0,r3,4 icbi 0,r0; dcbf 0,r0 addi r9,r3,8 icbi 0,r9; dcbf 0,r9 addi r0,r3,12 icbi 0,r0; dcbf 0,r0 addi r9,r3,16 icbi 0,r9; dcbf 0,r9 addi r0,r3,20 icbi 0,r0; dcbf 0,r0 addi r9,r3,24 icbi 0,r9; dcbf 0,r9 addi r0,r3,28 icbi 0,r0; dcbf 0,r0 addi r3,r3,32 icbi 0,r3; dcbf 0,r3 sync; isync blr libffcall-2.5/trampoline/Makefile.devel0000664000000000000000000002216314662622056015114 00000000000000# This is the developer's -*-Makefile-*-, not the user's makefile. # Do not use it unless you know exactly what you do! THISFILE = Makefile.devel RM = rm -f # ============ Rules that require cross-compilation tools ============ GCC = gcc GCCFLAGS = -O2 -fomit-frame-pointer -fPIC CPP = $(GCC) -E CROSS_TOOL = cross precompiled : \ cache-sparc-macro.S cache-sparc64-macro.S \ cache-alpha-macro.S \ cache-hppa-macro.S cache-hppa64-macro.S \ cache-powerpc-linux-macro.S cache-powerpc-macos.s \ cache-powerpc64-elfv2-macro.S cache-sparc-linux.s : cache-sparc.c $(THISFILE) $(CROSS_TOOL) sparc-linux gcc -V 3.1 $(GCCFLAGS) -D__sparc__ -S cache-sparc.c -o cache-sparc-linux.s cache-sparc-macro.S : cache-sparc-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < cache-sparc-linux.s ; cat ../common/noexecstack.h) > cache-sparc-macro.S cache-sparc64-linux.s : cache-sparc.c $(THISFILE) $(CROSS_TOOL) sparc64-linux gcc -V 4.0.2 $(GCCFLAGS) -D__sparc64__ -S cache-sparc.c -o cache-sparc64-linux.s cache-sparc64-macro.S : cache-sparc64-linux.s ../common/asm-sparc.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-sparc.h"' ; ../common/asm-sparc.sh < cache-sparc64-linux.s ; cat ../common/noexecstack.h) > cache-sparc64-macro.S cache-alpha-linux.s : cache-alpha.c $(THISFILE) $(CROSS_TOOL) alpha-linux gcc -V 4.0.2 $(GCCFLAGS) -D__alpha__ -S cache-alpha.c -o cache-alpha-linux.s cache-alpha-macro.S : cache-alpha-linux.s ../common/asm-alpha.sh ../common/noexecstack.h $(THISFILE) (../common/asm-alpha.sh < cache-alpha-linux.s ; cat ../common/noexecstack.h) > cache-alpha-macro.S cache-hppa-linux.s : cache-hppa.c $(THISFILE) $(CROSS_TOOL) hppa-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa__ -S cache-hppa.c -o cache-hppa-linux.s cache-hppa-macro.S : cache-hppa-linux.s ../common/asm-hppa.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa.h"' ; ../common/asm-hppa.sh < cache-hppa-linux.s ; cat ../common/noexecstack.h) > cache-hppa-macro.S cache-hppa64-linux.s : cache-hppa.c $(THISFILE) $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(GCCFLAGS) -D__hppa64__ -S cache-hppa.c -o cache-hppa64-linux.s cache-hppa64-macro.S : cache-hppa64-linux.s ../common/asm-hppa64.sh ../common/noexecstack.h $(THISFILE) (echo '#include "asm-hppa64.h"' ; ../common/asm-hppa64.sh < cache-hppa64-linux.s ; cat ../common/noexecstack.h) > cache-hppa64-macro.S cache-powerpc-linux.s : cache-powerpc.c $(THISFILE) $(CROSS_TOOL) powerpc-linux gcc -V 3.3.6 -mno-power -mno-power2 -mno-powerpc $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-linux.s cache-powerpc-linux-macro.S : cache-powerpc-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) (../common/asm-powerpc.sh < cache-powerpc-linux.s ; cat ../common/noexecstack.h) > cache-powerpc-linux-macro.S cache-powerpc-macos.s : cache-powerpc.c $(THISFILE) $(CROSS_TOOL) powerpc-darwin gcc -V 3.3.6 $(GCCFLAGS) -D__powerpc__ -S cache-powerpc.c -o cache-powerpc-macos.s cache-powerpc64-elfv2-linux.s : cache-powerpc64.c $(THISFILE) $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mlittle-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-le.s $(CROSS_TOOL) powerpc64le-linux gcc-5.4.0 -mabi=elfv2 -mcpu=power4 -mbig-endian $(GCCFLAGS) -D__powerpc64__ -S cache-powerpc64.c -o cache-powerpc64-elfv2-linux-be.s cmp cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux-be.s > /dev/null mv cache-powerpc64-elfv2-linux-le.s cache-powerpc64-elfv2-linux.s $(RM) cache-powerpc64-elfv2-linux-be.s cache-powerpc64-elfv2-macro.S : cache-powerpc64-elfv2-linux.s ../common/asm-powerpc.sh ../common/noexecstack.h $(THISFILE) (../common/asm-powerpc.sh < cache-powerpc64-elfv2-linux.s ; cat ../common/noexecstack.h) > cache-powerpc64-elfv2-macro.S # --------------- Older rules --------------- OLDGCCFLAGS = -O2 -fomit-frame-pointer ASPREFIX = /usr1/gnu/lib proto-precompiled : proto-i386.s proto-m68k.s proto-mips.s proto-mipsn32.s proto-mips64.s proto-sparc.s proto-sparc64.s proto-alpha.s proto-hppa.s proto-hppa64.s proto-arm.s proto-arm64.s proto-powerpc-aix.s proto-powerpc-sysv4.s proto-powerpc-macos.s proto-powerpc64-aix.s proto-powerpc64-elfv2.s proto-ia64.s proto-x86_64.s proto-x86_64-x32.s proto-s390.s proto-s390x.s proto-riscv32.s proto-riscv64.s proto-loongarch64.s proto-i386.s : proto.c $(GCC) -V 2.7.2 -b i486-linuxaout $(OLDGCCFLAGS) -D__i386__ -S proto.c -o $@ proto-m68k.s : proto.c $(GCC) -V egcs-2.91.57 -b m68k-sun $(OLDGCCFLAGS) -D__m68k__ -S proto.c -o $@ proto-mips.s : proto.c $(GCC) -V 2.95.2 -b mips-sgi $(OLDGCCFLAGS) -D__mips__ -S proto.c -o $@ -mabicalls proto-mipsn32.s : proto.c $(GCC) -V 2.95.2 -b mips-sgi-irix6 $(OLDGCCFLAGS) -D__mipsn32__ -S proto.c -o $@ -mabicalls proto-mips64.s : proto64.c $(GCC) -V 2.95.2 -b mips-sgi -mips3 -mlong64 $(OLDGCCFLAGS) -D__mips64__ -S proto64.c -o $@ -mabicalls proto-sparc.s : proto.c $(GCC) -V 2.95.2 -b sparc-sun $(OLDGCCFLAGS) -D__sparc__ -S proto.c -o $@ proto-sparc64.s : proto64.c sparc64-linux-gcc -V 2.95.2 -b sparc64-linux $(OLDGCCFLAGS) -D__sparc64__ -S proto64.c -o $@ proto-alpha.s : proto64.c $(GCC) -V 2.7.2 -b alpha-dec-osf $(OLDGCCFLAGS) -D__alpha__ -S proto64.c -o $@ proto-hppa.s : proto.c $(GCC) -V 2.6.3 -b hppa1.0-hpux $(OLDGCCFLAGS) -D__hppa__ -S proto.c -o $@ proto-hppa64.s : proto64.c $(CROSS_TOOL) hppa64-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__hppa64__ -S proto64.c -o $@ proto-arm.s : proto.c $(GCC) -V 2.6.3 -b arm-acorn-riscix $(OLDGCCFLAGS) -D__arm__ -S proto.c -o $@ proto-arm64.s : proto64.c $(CROSS_TOOL) aarch64-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__arm64__ -S proto64.c -o $@ proto-powerpc-aix.s : proto.c $(GCC) -V 2.95.2 -b rs6000 -mno-power -mno-power2 -mno-powerpc -mnew-mnemonics $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc-sysv4.s : proto.c $(GCC) -V 2.95.2 -b ppc-linux -mno-power -mno-power2 -mno-powerpc $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc-macos.s : proto.c $(GCC) -V 3.3.2 -b powerpc-darwin $(OLDGCCFLAGS) -D__powerpc__ -S proto.c -o $@ proto-powerpc64-aix.s : proto64.c $(CROSS_TOOL) powerpc64-linux gcc $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@ proto-powerpc64-elfv2.s : proto64.c $(CROSS_TOOL) powerpc64le-linux gcc -mabi=elfv2 $(OLDGCCFLAGS) -D__powerpc64__ -S proto64.c -o $@ proto-ia64.s : proto64.c $(GCC) -V 2.9-ia64-000216 -b ia64-hp-linux $(OLDGCCFLAGS) -D__ia64__ -S proto64.c -o $@ proto-x86_64.s : proto64.c $(GCC) -V 3.2.2 -b x86_64-suse-linux $(OLDGCCFLAGS) -D__x86_64__ -S proto64.c -o $@ proto-x86_64-x32.s : proto.c $(CROSS_TOOL) x86_64-linux gcc-5.4.0 -mx32 $(OLDGCCFLAGS) -fno-asynchronous-unwind-tables -D__x86_64__ -D__x86_64_x32__ -S proto.c -o $@ proto-s390.s : proto.c $(CROSS_TOOL) s390-linux gcc -V 3.1 $(OLDGCCFLAGS) -D__s390__ -S proto.c -o $@ proto-s390x.s : proto64.c $(CROSS_TOOL) s390x-linux gcc-5.4.0 $(OLDGCCFLAGS) -D__s390x__ -S proto64.c -o $@ proto-riscv32.s : proto.c $(CROSS_TOOL) riscv32-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv32__ -S proto.c -o $@ proto-riscv64.s : proto64.c $(CROSS_TOOL) riscv64-linux gcc-7.3.0 $(OLDGCCFLAGS) -D__riscv64__ -S proto64.c -o $@ proto-loongarch64.s : proto64.c $(CROSS_TOOL) loongarch64-linux gcc-12.1.0 $(OLDGCCFLAGS) -D__loongarch64__ -S proto64.c -o $@ tramp-i386.o : tramp-i386.s $(ASPREFIX)/i486-linux/bin/as tramp-i386.s -o $@ tramp-m68k.o : tramp-m68k.s $(ASPREFIX)/m68k-sun/bin/as tramp-m68k.s -o $@ tramp-mips.o : tramp-mips.s $(ASPREFIX)/mips-sgi/bin/as tramp-mips.s -o $@ tramp-mips64.o : tramp-mips64.s $(ASPREFIX)/mips-sgi/bin/as -mips3 -membedded-pic tramp-mips64.s -o $@ tramp-sparc.o : tramp-sparc.s $(ASPREFIX)/sparc-sun/bin/as tramp-sparc.s -o $@ tramp-sparc64.o : tramp-sparc64.s $(ASPREFIX)/sparc64-linux/bin/as tramp-sparc64.s -o $@ tramp-alpha.o : tramp-alpha.s $(ASPREFIX)/alpha-dec-osf/bin/as tramp-alpha.s -o $@ tramp-hppa.o : tramp-hppa.s $(ASPREFIX)/hppa1.0-hpux/bin/as tramp-hppa.s -o $@ tramp-hppa64.o : tramp-hppa64.s $(CROSS_TOOL) hppa64-linux as tramp-hppa64.s -o $@ tramp-arm.o : tramp-arm.s $(ASPREFIX)/arm-acorn-riscix/bin/as tramp-arm.s -o $@ tramp-arm64.o : tramp-arm64.s $(CROSS_TOOL) aarch64-linux as tramp-arm64.s -o $@ tramp-powerpc-old.o : tramp-powerpc-old.s $(ASPREFIX)/rs6000/bin/as tramp-powerpc-old.s -o $@ tramp-powerpc-sysv4.o : tramp-powerpc-sysv4.s $(ASPREFIX)/ppc-linux/bin/as tramp-powerpc-sysv4.s -o $@ tramp-powerpc64-elfv2.o : tramp-powerpc64-elfv2.s $(CROSS_TOOL) powerpc64le-linux as tramp-powerpc64-elfv2.s -o $@ tramp-ia64.o : tramp-ia64.s /nue/usr/ia64-hp-linux/bin/as tramp-ia64.s -o $@ tramp-x86_64.o : tramp-x86_64.s $(ASPREFIX)/x86_64-suse-linux/bin/as tramp-x86_64.s -o $@ tramp-x86_64-x32.o : tramp-x86_64-x32.s $(CROSS_TOOL) x86_64-linux as tramp-x86_64-x32.s -o $@ tramp-s390.o : tramp-s390.s $(CROSS_TOOL) s390-linux as tramp-s390.s -o $@ tramp-s390x.o : tramp-s390x.s $(CROSS_TOOL) s390x-linux as tramp-s390x.s -o $@ tramp-riscv32.o : tramp-riscv32.s $(CROSS_TOOL) riscv32-linux as tramp-riscv32.s -o $@ tramp-riscv64.o : tramp-riscv64.s $(CROSS_TOOL) riscv64-linux as tramp-riscv64.s -o $@ tramp-loongarch64.o : tramp-loongarch64.s $(CROSS_TOOL) loongarch64-linux as tramp-loongarch64.s -o $@ libffcall-2.5/trampoline/Makefile.in0000664000000000000000000002354514665326246014435 00000000000000# Makefile for trampoline #### Start of system configuration section. #### HOST = @host@ CPU = @HOST_CPU_C_ABI@ OS = @host_os@ # Directories used by "make": srcdir = @srcdir@ # Directories used by "make install": prefix = @prefix@ local_prefix = /usr/local exec_prefix = @exec_prefix@ libdir = @libdir@ includedir = @includedir@ mandir = @mandir@ datadir = @datadir@ datarootdir = @datarootdir@ htmldir = $(datadir)/html # Programs used by "make": # C compiler CC = @CC@ CFLAGS = @CFLAGS@ CPP = @CPP@ # C++ compiler CXX = @CXX@ CXXFLAGS = @CXXFLAGS@ # Both C and C++ compiler CPPFLAGS = @CPPFLAGS@ INCLUDES = -I. -I$(srcdir) -I.. INCLUDES_WITH_GNULIB = $(INCLUDES) -I../gnulib-lib -I$(srcdir)/../gnulib-lib ASPFLAGS = `if test @AS_UNDERSCORE@ = true; then echo '-DASM_UNDERSCORE'; fi` LDFLAGS = @LDFLAGS@ LIBTOOL = @LIBTOOL@ LIBTOOL_COMPILE = $(LIBTOOL) --mode=compile LIBTOOL_LINK = $(LIBTOOL) --mode=link LIBTOOL_INSTALL = $(LIBTOOL) --mode=install LIBTOOL_UNINSTALL = $(LIBTOOL) --mode=uninstall AR = @AR@ AR_FLAGS = rc RANLIB = @RANLIB@ RM = rm -f @SET_MAKE@ # Programs used by "make install": INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_DATA = @INSTALL_DATA@ # Libtool options for linking with the thread library. LTLIBTHREAD = @LTLIBTHREAD@ #### End of system configuration section. #### SHELL = /bin/sh # Needed by $(LIBTOOL). top_builddir = .. OBJECTS = trampoline.lo @CPU_OBJECTS@ # Limit the set of exported symbols, on those platforms where libtool supports it. # Currently this excludes the symbols from gnulib modules. LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX = 'trampoline' # Before making a release, change this according to the libtool documentation, # section "Library interface versions". LIBTRAMPOLINE_VERSION_INFO = 1:4:0 all : $(OBJECTS) libtrampoline.la $(srcdir)/trampoline.3 $(srcdir)/trampoline.html trampoline.lo : $(srcdir)/trampoline.c $(srcdir)/trampoline.h $(LIBTOOL_COMPILE) $(CC) $(INCLUDES_WITH_GNULIB) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/trampoline.c tramp-hppa.lo : tramp-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa.s tramp-hppa.s : $(srcdir)/tramp-hppa-macro.S $(srcdir)/../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa.s tramp-hppa64.lo : tramp-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-hppa64.s tramp-hppa64.s : $(srcdir)/tramp-hppa64-macro.S $(srcdir)/../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > tramp-hppa64.s tramp-powerpc.lo : tramp-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc.s tramp-powerpc.s : $(srcdir)/tramp-powerpc-aix.S $(CPP) $(srcdir)/tramp-powerpc-aix.S > tramp-powerpc.s tramp-powerpc64.lo : tramp-powerpc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-powerpc64.s tramp-powerpc64.s : $(srcdir)/tramp-powerpc64-aix.S $(srcdir)/../common/noexecstack.h $(CPP) -I$(srcdir)/../common $(srcdir)/tramp-powerpc64-aix.S > tramp-powerpc64.s tramp-ia64.lo : tramp-ia64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c tramp-ia64.s tramp-ia64.s : $(srcdir)/tramp-ia64-macro.S $(srcdir)/../common/noexecstack.h $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/tramp-ia64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > tramp-ia64.s cache-sparc.lo : cache-sparc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc.s cache-sparc.s : $(srcdir)/cache-sparc-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/cache-sparc-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc.s cache-sparc64.lo : cache-sparc64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-sparc64.s cache-sparc64.s : $(srcdir)/cache-sparc64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common - < $(srcdir)/cache-sparc64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,\. ,.,g' -e 's,//.*$$,,' -e 's,\$$,#,g' -e 's,# ,#,g' > cache-sparc64.s cache-alpha.lo : cache-alpha.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-alpha.s cache-alpha.s : $(srcdir)/cache-alpha-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/cache-alpha-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-alpha.s cache-hppa.lo : cache-hppa.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa.s cache-hppa.s : $(srcdir)/cache-hppa-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/cache-hppa-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa.s cache-hppa64.lo : cache-hppa64.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-hppa64.s cache-hppa64.s : $(srcdir)/cache-hppa64-macro.S $(CPP) $(ASPFLAGS) -I$(srcdir)/../common $(srcdir)/cache-hppa64-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e "s,!,',g" > cache-hppa64.s cache-powerpc.lo : cache-powerpc.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc.s cache-powerpc.s : $(srcdir)/cache-powerpc-linux-macro.S $(srcdir)/cache-powerpc-macos.s case "$(OS)" in \ macos* | darwin*) syntax=macos;; \ *) syntax=linux;; \ esac; \ case $${syntax} in \ macos) \ grep -v '\.machine' $(srcdir)/cache-powerpc-$${syntax}.s > cache-powerpc.s || exit 1 ;; \ linux) \ $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc-$${syntax}-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc.s || exit 1 ;; \ *) \ cp $(srcdir)/cache-powerpc-$${syntax}.s cache-powerpc.s || exit 1 ;; \ esac cache-powerpc64-elfv2.lo : cache-powerpc64-elfv2.s $(LIBTOOL_COMPILE) $(CC) @GCC_X_NONE@ -c cache-powerpc64-elfv2.s cache-powerpc64-elfv2.s : $(srcdir)/cache-powerpc64-elfv2-macro.S $(CPP) $(ASPFLAGS) $(srcdir)/cache-powerpc64-elfv2-macro.S | grep -v '^ *#line' | grep -v '^#' | sed -e 's,% ,%,g' -e 's,//.*$$,,' > cache-powerpc64-elfv2.s libtrampoline.la : $(OBJECTS) ../gnulib-lib/libgnu.la $(LIBTOOL_LINK) $(CC) -o libtrampoline.la -rpath $(libdir) -no-undefined -export-symbols-regex $(LIBTRAMPOLINE_EXPORTED_SYMBOLS_REGEX) -version-info $(LIBTRAMPOLINE_VERSION_INFO) $(OBJECTS) ../gnulib-lib/libgnu.la $(LDFLAGS) $(LTLIBTHREAD) install : all force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) $(LIBTOOL_INSTALL) $(INSTALL_DATA) libtrampoline.la $(DESTDIR)$(libdir)/libtrampoline.la mkdir -p $(DESTDIR)$(includedir) $(INSTALL_DATA) $(srcdir)/trampoline.h $(DESTDIR)$(includedir)/trampoline.h mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 $(INSTALL_DATA) $(srcdir)/trampoline.3 $(DESTDIR)$(mandir)/man3/trampoline.3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) $(INSTALL_DATA) $(srcdir)/trampoline.html $(DESTDIR)$(htmldir)/trampoline.html installdirs : force mkdir -p $(DESTDIR)$(prefix) mkdir -p $(DESTDIR)$(exec_prefix) mkdir -p $(DESTDIR)$(libdir) mkdir -p $(DESTDIR)$(includedir) mkdir -p $(DESTDIR)$(mandir) mkdir -p $(DESTDIR)$(mandir)/man3 mkdir -p $(DESTDIR)$(datadir) mkdir -p $(DESTDIR)$(htmldir) uninstall : force $(LIBTOOL_UNINSTALL) $(RM) $(DESTDIR)$(libdir)/libtrampoline.la $(RM) $(DESTDIR)$(includedir)/trampoline.h $(RM) $(DESTDIR)$(mandir)/man3/trampoline.3 $(RM) $(DESTDIR)$(htmldir)/trampoline.html test1.@OBJEXT@ : $(srcdir)/test1.c $(srcdir)/trampoline.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test1.c test1 : test1.@OBJEXT@ libtrampoline.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test1.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test1 test2.@OBJEXT@ : $(srcdir)/test2.c $(srcdir)/trampoline.h $(CC) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) -c $(srcdir)/test2.c test2 : test2.@OBJEXT@ libtrampoline.la $(LIBTOOL_LINK) $(CC) $(CFLAGS) @GCC_X_NONE@ test2.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2 test2-c++.@OBJEXT@ : $(srcdir)/test2-c++.cc $(srcdir)/test2.c $(srcdir)/trampoline.h $(CXX) $(INCLUDES) $(CPPFLAGS) $(CXXFLAGS) -c $(srcdir)/test2-c++.cc test2-c++ : test2-c++.@OBJEXT@ libtrampoline.la $(LIBTOOL_LINK) $(CXX) $(CXXFLAGS) @GCC_X_NONE@ test2-c++.@OBJEXT@ libtrampoline.la $(LDFLAGS) -o test2-c++ check1 : all test1 ./test1 check : all test1 test2 ./test1 ./test2 @IF_CXX@ ./test2-c++ touch tests.passed.$(HOST) @IF_CXX@check : test2-c++ extracheck : check mostlyclean : clean clean : force $(RM) $(OBJECTS) `echo $(OBJECTS) | sed -e 's/\.lo/.@OBJEXT@/g'` tramp-hppa.s tramp-hppa64.s tramp-powerpc.s tramp-powerpc64.s tramp-ia64.s cache-sparc.s cache-sparc64.s cache-alpha.s cache-hppa.s cache-hppa64.s cache-powerpc.s cache-powerpc64-elfv2.s libtrampoline.* core $(RM) -r .libs _libs $(RM) test1.@OBJEXT@ test1 test2.@OBJEXT@ test2 test2-c++.@OBJEXT@ test2-c++ distclean : clean $(RM) Makefile tests.passed.* maintainer-clean : distclean # List of source files (committed in version control or generated by Makefile.devel). SOURCE_FILES = \ COPYING \ PLATFORMS PORTING README trampoline.3 trampoline.html \ Makefile.devel \ Makefile.maint \ Makefile.in \ trampoline.h \ trampoline.c \ tramp-hppa-macro.S \ tramp-hppa64-macro.S \ tramp-powerpc-aix.S \ tramp-powerpc64-aix.S \ tramp-ia64-macro.S \ cache.c \ cache-alpha.c cache-alpha-linux.s cache-alpha-macro.S \ cache-hppa.c cache-hppa-linux.s cache-hppa-macro.S cache-hppa64-linux.s cache-hppa64-macro.S \ cache-powerpc.c cache-powerpc-linux.s cache-powerpc-linux-macro.S cache-powerpc-macos.s \ cache-powerpc64.c cache-powerpc64-elfv2-linux.s cache-powerpc64-elfv2-macro.S \ cache-sparc.c cache-sparc-linux.s cache-sparc-macro.S cache-sparc64-linux.s cache-sparc64-macro.S \ test1.c \ test2.c test2-c++.cc # List of distributed files generated by Makefile.maint. GENERATED_FILES = \ trampoline.man # List of distributed files. DISTFILES = $(SOURCE_FILES) $(GENERATED_FILES) distdir : $(DISTFILES) for file in $(DISTFILES); do \ if test -f $$file; then dir='.'; else dir='$(srcdir)'; fi; \ cp -p "$$dir/$$file" '$(distdir)'/$$file || exit 1; \ done force : libffcall-2.5/trampoline/cache-sparc64-linux.s0000664000000000000000000000050214662622071016210 00000000000000 .file "cache-sparc.c" .section ".text" .align 4 .global __TR_clear_cache_4 .type __TR_clear_cache_4, #function .proc 020 __TR_clear_cache_4: iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24 jmp %o7+8 nop .size __TR_clear_cache_4, .-__TR_clear_cache_4 .ident "GCC: (GNU) 4.0.2" .section ".note.GNU-stack" libffcall-2.5/trampoline/tramp-powerpc-aix.S0000664000000000000000000000311213347755327016061 00000000000000/* Trampoline for powerpc CPU with AIX calling convention */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r0, r11, r12. */ /* However, r0 is special in that it cannot be used as a base register. */ .globl tramp .globl .tramp .csect tramp[DS] tramp: .long .tramp, 0, 0 .csect .text[PR] .tramp: /* Move into */ lwz 11,0(2) /* get */ lwz 12,4(2) /* get */ stw 12,0(11) /* Get */ lwz 12,8(2) /* * gcc-2.6.3 source says: * A function pointer is a pointer to a data area whose first word contains * the actual address of the function, whose second word contains a pointer * to its TOC, and whose third word contains a value to place in the static * chain register (r11). */ lwz 11,8(12) /* pass static chain in r11 */ lwz 2,4(12) /* pass TOC in r2 */ lwz 0,0(12) /* actual code address */ mtctr 0 bctr _section_.text: .csect .data[RW] .long _section_.text libffcall-2.5/trampoline/cache-powerpc.c0000664000000000000000000000307214664204154015235 00000000000000/* Instruction cache flushing for powerpc, not on AIX */ /* * Copyright 1997-2024 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache_3 (char* first_addr) { /* Taken from egcs-1.1.2/gcc/config/rs6000/tramp.asm. */ /* The number of asm statements here depends on the value of TRAMP_LENGTH for __powerpcsysv4__. */ asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+4)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+8)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+12)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+16)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+20)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+24)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+28)); asm volatile ("icbi 0,%0; dcbf 0,%0" : : "r" (first_addr+32)); asm volatile ("sync; isync"); } libffcall-2.5/trampoline/trampoline.man0000664000000000000000000000570514665326517015236 00000000000000TRAMPOLINE(3) Library Functions Manual TRAMPOLINE(3) NAME trampoline - closures as first-class C functions SYNOPSIS #include  function = alloc_trampoline(address, variable, data); free_trampoline(function); is_trampoline(function) trampoline_address(function) trampoline_variable(function) trampoline_data(function) DESCRIPTION These functions implement closures as first-class C functions. A clo‐ sure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. function = alloc_trampoline(address, variable, data) allocates a closure. When function gets called, it stores data in the variable variable and calls the C function at address. The function at address is responsible for fetching data out of variable immediately, before execution of any other function call. This is much like gcc's local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while trampoline provides functions with indefinite extent: function is only deallocated when free_trampoline(function) is called. is_trampoline(function) checks whether the C function function was pro‐ duced by a call to alloc_trampoline. If this returns true, the argu‐ ments given to alloc_trampoline can be retrieved: trampoline_address(function) returns address, trampoline_variable(function) returns variable, trampoline_data(function) returns data. SEE ALSO gcc(1), stdarg(3), callback(3) BUGS Passing the data through a global variable is not reentrant. Don't call trampoline functions from within signal handlers. This is fixed in the callback(3) package. PORTING The way gcc builds local functions is described in the gcc source, file gcc-2.6.3/config/cpu/cpu.h. AUTHOR Bruno Haible ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. 1 January 2017 TRAMPOLINE(3) libffcall-2.5/trampoline/test1.c0000664000000000000000000000253414662613014013554 00000000000000/* Trampoline test */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include "trampoline.h" #define MAGIC1 0x9db9af42 #define MAGIC2 0x614a13c9 static int magic = MAGIC1; void* function_data; int f (int x) { return *(int*)function_data + x; } int main () { trampoline_function_t cf = alloc_trampoline((trampoline_function_t)&f, &function_data, &magic); /* calling cf shall set function_data = &magic and then call f(x), * thus returning magic + x. */ if (((*cf)(MAGIC2) == MAGIC1+MAGIC2) && (function_data == &magic)) { free_trampoline(cf); printf("Works, test1 passed.\n"); exit(0); } else { printf("Doesn't work!\n"); exit(1); } } libffcall-2.5/trampoline/cache-sparc-macro.S0000664000000000000000000000065514662622071015751 00000000000000#include "asm-sparc.h" .section ".text" .align 4 .global C(__TR_clear_cache_4) DECLARE_FUNCTION(__TR_clear_cache_4) .proc 020 FUNBEGIN(__TR_clear_cache_4) !$PROLOGUE$ 0 iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24 nop retl nop L(Lfe1): FUNEND(__TR_clear_cache_4) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/README0000664000000000000000000000441113347755322013234 00000000000000trampoline - closures as first-class C functions. This library implements closures as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. Typical uses of closures are nested functions in programming languages, and call-back functions passed to other libraries. Installation instructions: Configure the parent directory. Then: cd trampoline make make check make install Files in this package: Documentation: README this text COPYING free software license PLATFORMS list of supported platforms trampoline.3 manual page in Unix man format trampoline.html manual page in HTML format Source: trampoline.h include file trampoline.c implementation of the library functions tramp-hppa.s the trampoline for hppa, in assembly language tramp-powerpc.S the trampoline for powerpc, in assembly language cache.c how to flush the instruction cache, now unused test1.c test program test2.c test program Building: Makefile.in Makefile master Porting: PORTING porting instructions Makefile.devel developer's Makefile proto.c sample source containing assignment and jumping proto-*.s its translation to assembly language tramp-*.s the trampoline, in assembly language tramp-*.o the trampoline, in binary form Copyright notice: Copyright 1995-2017 Bruno Haible This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . libffcall-2.5/trampoline/test2.c0000664000000000000000000000321214664170120013545 00000000000000/* Trampoline accessor test */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include "trampoline.h" int f (int x) { return x; } void* variable; static int data; int main () { trampoline_function_t cf = alloc_trampoline((trampoline_function_t)&f, &variable, &data); if (is_trampoline((void*)&f)) { printf("is_trampoline(&f) returns true!\n"); exit(1); } #if !defined(__cplusplus) if (is_trampoline((void*)&main)) { printf("is_trampoline(&main) returns true!\n"); exit(1); } #endif if (!is_trampoline((void*)cf)) { printf("is_trampoline() returns false!\n"); exit(1); } if (trampoline_address(cf) != (trampoline_function_t)&f) { printf("trampoline_address() doesn't work!\n"); exit(1); } if (trampoline_variable(cf) != &variable) { printf("trampoline_variable() doesn't work!\n"); exit(1); } if (trampoline_data(cf) != &data) { printf("trampoline_data() doesn't work!\n"); exit(1); } printf("test2 passed.\n"); exit(0); } libffcall-2.5/trampoline/cache-hppa64-linux.s0000664000000000000000000000075414662622071016041 00000000000000 .LEVEL 2.0w .text .align 8 .globl __TR_clear_cache .type __TR_clear_cache,@function __TR_clear_cache: .PROC .CALLINFO FRAME=128,NO_CALLS .ENTRY ldo 128(%r30),%r30 #APP fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r31 ldsid (0,%r26),%r28 mtsp %r28,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r31,%sr0 nop nop nop nop nop nop #NO_APP bve (%r2) ldo -128(%r30),%r30 .EXIT .PROCEND .Lfe1: .size __TR_clear_cache,.Lfe1-__TR_clear_cache .ident "GCC: (GNU) 3.1" libffcall-2.5/trampoline/cache-powerpc-linux.s0000664000000000000000000000143414664204343016412 00000000000000 .file "cache-powerpc.c" .section ".text" .align 2 .globl __TR_clear_cache_3 .type __TR_clear_cache_3, @function __TR_clear_cache_3: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-32(1) #APP icbi 0,3; dcbf 0,3 #NO_APP addi 0,3,4 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 9,3,8 #APP icbi 0,9; dcbf 0,9 #NO_APP addi 0,3,12 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 9,3,16 #APP icbi 0,9; dcbf 0,9 #NO_APP addi 0,3,20 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 9,3,24 #APP icbi 0,9; dcbf 0,9 #NO_APP addi 0,3,28 #APP icbi 0,0; dcbf 0,0 #NO_APP addi 3,3,32 #APP icbi 0,3; dcbf 0,3 sync; isync #NO_APP addi 1,1,32 blr .size __TR_clear_cache_3, .-__TR_clear_cache_3 .section .note.GNU-stack,"",@progbits .ident "GCC: (GNU) 3.3.6" libffcall-2.5/trampoline/cache-hppa-linux.s0000664000000000000000000000070414662622071015662 00000000000000 .LEVEL 1.1 .text .align 4 .globl __TR_clear_cache .type __TR_clear_cache,@function __TR_clear_cache: .PROC .CALLINFO FRAME=0,NO_CALLS .ENTRY #APP fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r20 ldsid (0,%r26),%r26 mtsp %r26,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r20,%sr0 nop nop nop nop nop nop #NO_APP bv,n %r0(%r2) .EXIT .PROCEND .Lfe1: .size __TR_clear_cache,.Lfe1-__TR_clear_cache .ident "GCC: (GNU) 3.1" libffcall-2.5/trampoline/cache-sparc.c0000664000000000000000000000215414662613014014663 00000000000000/* Instruction cache flushing for sparc */ /* * Copyright 1996-1999 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* * This assumes that the range [first_addr..last_addr] lies in at most four * cache lines. */ void __TR_clear_cache_4 (char* first_addr, char* last_addr) { asm volatile ("iflush %0+0;" /* the +0 is needed by gas, says gforth-0.3.0 */ "iflush %0+8;" "iflush %0+16;" "iflush %0+24" : : "r" (first_addr)); } libffcall-2.5/trampoline/cache-alpha.c0000664000000000000000000000157214662613014014643 00000000000000/* Instruction cache flushing for alpha */ /* * Copyright 1997 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ void __TR_clear_cache (void) { /* Taken from gforth-0.3.0. */ asm volatile ("call_pal 0x86"); /* imb (instruction-memory barrier) */ } libffcall-2.5/trampoline/trampoline.h0000664000000000000000000000562614662613237014707 00000000000000/* * Copyright 1995-2023 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifndef _TRAMPOLINE_H #define _TRAMPOLINE_H #include "ffcall-version.h" #ifdef __cplusplus extern "C" { #endif /* This type denotes an opaque function pointer. You need to cast it to an actual function pointer type (with correct return type) before you can actually invoke it. */ #if defined __cplusplus || __STDC_VERSION__ >= 202300L typedef int (*trampoline_function_t) (...); #else typedef int (*trampoline_function_t) (); #endif /* Allocates a trampoline. It returns a function pointer that takes the same parameters and returns the same type as ADDRESS. When invoked, it first stores DATA at the location pointed to by VARIABLE, then invokes ADDRESS with the same arguments. It returns the value returned by ADDRESS. The trampoline has indefinite extent. It can be accessed until a call to free_trampoline(). */ extern trampoline_function_t alloc_trampoline (trampoline_function_t /* ADDRESS */, void** /* VARIABLE */, void* /* DATA */); /* Frees the memory used by a trampoline. FUNCTION must be the result of an alloc_trampoline() invocation. After this call, FUNCTION must not be used any more - neither invoked, not used as an argument to other functions. */ extern void free_trampoline (trampoline_function_t /* FUNCTION */); /* Tests whether a given pointer is a function pointer returned by alloc_trampoline(). Returns 1 for yes, 0 for no. If yes, it can be cast to trampoline_function_t. */ extern int is_trampoline (void* /* FUNCTION */); /* Returns the ADDRESS argument passed to the alloc_trampoline() invocation. FUNCTION must be the result of an alloc_trampoline() invocation. */ extern trampoline_function_t trampoline_address (trampoline_function_t /* FUNCTION */); /* Returns the VARIABLE argument passed to the alloc_trampoline() invocation. FUNCTION must be the result of an alloc_trampoline() invocation. */ extern void** trampoline_variable (trampoline_function_t /* FUNCTION */); /* Returns the DATA argument passed to the alloc_trampoline() invocation. FUNCTION must be the result of an alloc_trampoline() invocation. */ extern void* trampoline_data (trampoline_function_t /* FUNCTION */); #ifdef __cplusplus } #endif #endif /* _TRAMPOLINE_H */ libffcall-2.5/trampoline/cache-hppa64-macro.S0000664000000000000000000000115714662622071015741 00000000000000#include "asm-hppa64.h" .LEVEL 2.0w TEXT1() TEXT2() .align 8 GLOBL(__TR_clear_cache) DECLARE_FUNCTION(__TR_clear_cache) DEF(__TR_clear_cache) .PROC .CALLINFO FRAME=128,NO_CALLS .ENTRY ldo 128(%r30),%r30 fdc 0(0,%r26) fdc 0(0,%r25) sync mfsp %sr0,%r31 ldsid (0,%r26),%r28 mtsp %r28,%sr0 fic 0(%sr0,%r26) fic 0(%sr0,%r25) sync mtsp %r31,%sr0 nop nop nop nop nop nop bve (%r2) ldo -128(%r30),%r30 .EXIT .PROCEND DEF(L(fe1)) FUNEND(__TR_clear_cache) #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/PLATFORMS0000664000000000000000000000441214171044357013642 00000000000000Supported CPUs: (Put the GNU config.guess values here.) i386 i486-unknown-linux, i686-unknown-gnu0.9, i386-unknown-sysv4.0, i386-pc-solaris2.6, i386-pc-solaris2.10, i486-unknown-sco3.2v4.2, i386-pc-cygwin32, i386-w64-mingw32, i586-unknown-freebsd11.0, i386-unknown-dragonfly3.8, i386-unknown-netbsdelf7.0, i386-unknown-openbsd6.0, i586-pc-haiku, i386-pc-minix m68k m68k-next-bsd, m68k-next-nextstep3, m68k-sun-sunos4.0, m68k-unknown-linux mips mips-sgi-irix4.0.5, mips-sgi-irix5.2, mips-sgi-irix5.3, mips-sgi-irix6.2, mips-sgi-irix6.4, mips-sgi-irix6.5, mips-unknown-linux, mips64-unknown-linux sparc sparc-sun-sunos4.1.1, sparc-sun-solaris2.3, sparc-sun-solaris2.4, sparc-sun-solaris2.10, sparc64-sun-solaris2.10, sparc-unknown-linux, sparc64-unknown-linux, sparc-unknown-netbsdelf7.1, sparc64-unknown-netbsd8.0 alpha alpha-dec-osf3.0, alpha-dec-osf4.0, alphaev67-unknown-linux hppa hppa1.0-hp-hpux8.00, hppa1.1-hp-hpux9.05, hppa1.1-hp-hpux10.01, hppa2.0-hp-hpux10.20, hppa2.0w-hp-hpux11.31, hppa-unknown-linux hppa64 hppa64-hp-hpux11.31 arm armv5tejl-unknown-linux, armv6l-unknown-linux, armv7l-unknown-linux arm64 aarch64-unknown-linux, aarch64-apple-darwin20.4.0 powerpc powerpc-ibm-aix4.1.4.0, powerpc-ibm-aix7.1.3.0, powerpc-unknown-linux, powerpc-apple-darwin6.8, powerpc-apple-darwin9.8.0 powerpc64 powerpc-ibm-aix7.1.3.0 (gcc -maix64, xlc -q64; AR="ar -X 64"), powerpc64-unknown-linux (gcc -m64), powerpc64le-unknown-linux (gcc) ia64 ia64-unknown-linux x86_64 x86_64-suse-linux, x86_64-unknown-linux (gcc -mx32), x86_64-pc-solaris2.10, x86_64-pc-cygwin, x86_64-w64-mingw32, x86_64-unknown-freebsd11.0, x86_64-unknown-netbsd7.0, x86_64-unknown-openbsd6.0 s390 s390x-ibm-linux s390x s390x-ibm-linux riscv32 riscv32-unknown-linux riscv64 riscv64-unknown-linux loongarch64 loongarch64-unknown-linux libffcall-2.5/trampoline/test2-c++.cc0000664000000000000000000000132613347755322014274 00000000000000/* * Copyright 2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "test2.c" libffcall-2.5/trampoline/tramp-ia64-macro.S0000664000000000000000000000245713347755324015475 00000000000000/* Trampoline for ia64 CPU */ /* * Copyright 2001-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* Available registers: r14 ... r31, r9 ... r11, r2 ... r3. */ .text .align 16 .global tramp# .proc tramp# tramp: /* The closure pointer is already in register r1. */ ld8 r14 = [r1] /* Move
into register r14. */ adds r15 = 8, r1 adds r16 = 16, r1 ;; /* Jump to r14. */ ld8 r18 = [r14] ld8 r15 = [r15] /* Move into register r15. */ adds r17 = 8, r14 ;; ld8 r16 = [r16] /* Move into register r16. */ ld8 r1 = [r17] mov b6 = r18 ;; st8 [r15] = r16 /* Store into . */ br b6 ;; .endp tramp# #include "noexecstack.h" libffcall-2.5/trampoline/cache-alpha-linux.s0000664000000000000000000000054014662622071016015 00000000000000 .set noreorder .set volatile .set noat .set nomacro .text .align 2 .align 4 .globl __TR_clear_cache .ent __TR_clear_cache $__TR_clear_cache..ng: __TR_clear_cache: .frame $30,0,$26,0 .prologue 0 .set macro call_pal 0x86 .set nomacro ret $31,($26),1 .end __TR_clear_cache .ident "GCC: (GNU) 4.0.2" .section .note.GNU-stack,"",@progbits libffcall-2.5/trampoline/PORTING0000644000000000000000000000701013031471342013400 00000000000000The list of CPUs and platforms TRAMPOLINE has been ported to can be found at the top of file trampoline.c. To port TRAMPOLINE to a new platform, three issues may have to be resolved: A. a new CPU - how to build the trampoline? B. a new OS - how to make code in malloc'ed memory executable? C. a new CPU or OS - how to flush the instruction cache? A. a new CPU - how to build the trampoline? The trampoline is a short sequence of machine instructions which puts the constant into , then jumps to
. The only registers that are allowed to be modified are call-used registers. No stack manipulations are allowed since the trampoline has to pass its arguments along to the function at
. 1. To find out which instructions are available for "move"/"store" and "jump", compile proto.c for your CPU: make -f Makefile.devel proto-${CPU}.s or gcc -O2 -fomit-frame-pointer -S proto.c -o proto-${CPU}.s 2. Write down the instructions for the trampoline in a file tramp-${CPU}.s, using constants for , ,
. Assemble it: gcc -c tramp-${CPU}.s Verify that the jump actually goes to
. (Beware: Some CPUs have program-counter relative jumps.) gdb tramp-${CPU}.o disassemble tramp 3. Take a hex dump of tramp-${CPU}.o hexdump -e '"%06.6_ax " 16/1 " %02X" "\n"' < tramp-${CPU}.o or od -tx1 -Ax < tramp-${CPU}.o or od -x +x < tramp-${CPU}.o Look out for the magic numbers you used for , and
. 4. Write the code which builds up a trampoline in memory, in trampoline.c. 5. Try it: make make check1 6. Write the is_tramp() macro and the tramp_xxx() accessor macros in trampoline.c. 7. Try it: make make check B. a new OS - how to make code in malloc'ed memory executable? ‘configure’ will find out whether code stored in malloc'ed memory is executable, or whether virtual memory protections have to be set in order to allow this. (The test is pretty simple: it copies a small function to malloc'ed memory and tries to executed it. The test could also fail because the compiler produced non-position-independent code or because of alignment issues.) To set virtual memory protections on a page of memory, your system should provide the mprotect() and getpagesize() functions. If it does not, find a substitute. C. a new CPU or OS - how to flush the instruction cache? CPUs which have separate data and instruction caches need to flush (part of) the instruction cache when alloc_trampoline() is called. (There may have been an old trampoline at the same location, and the instruction cache is not updated when the new trampoline is built. The effect can be that when the new trampoline is called, the old one will still be executed.) To flush the instruction cache, some CPUs have special instruction which can be put into gcc "asm" statements. On some CPUs these instructions are privileged, you therefore need to call some system or library function. On other CPUs, the only way to flush the instruction cache is to execute a long sequence of "nop" or "jump" instructions. This is hairy. When you are done with porting to a new platform, or even if TRAMPOLINE passes the "make check" out of the box without modifications, please report your results to the author of TRAMPOLINE, for inclusion in the next release. libffcall-2.5/trampoline/cache-powerpc64-elfv2-macro.S0000664000000000000000000000160514664204344017503 00000000000000 .file "cache-powerpc64.c" .machine power4 .abiversion 2 .section ".toc","aw" .section ".text" .align 2 .p2align 4,,15 .globl __TR_clear_cache_3 .type __TR_clear_cache_3, @function __TR_clear_cache_3: # 25 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 addi 9,3,4 # 26 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 9,3,8 # 27 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 9,3,12 # 28 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 9,3,16 # 29 "cache-powerpc64.c" 1 icbi 0,9; dcbf 0,9 # 0 "" 2 addi 3,3,20 # 30 "cache-powerpc64.c" 1 icbi 0,3; dcbf 0,3 # 0 "" 2 # 31 "cache-powerpc64.c" 1 sync; isync # 0 "" 2 blr .long 0 .byte 0,0,0,0,0,0,0,0 .size __TR_clear_cache_3,.-__TR_clear_cache_3 #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/cache-sparc-linux.s0000664000000000000000000000047514662622071016047 00000000000000 .file "cache-sparc.c" .section ".text" .align 4 .global __TR_clear_cache_4 .type __TR_clear_cache_4,#function .proc 020 __TR_clear_cache_4: !#PROLOGUE# 0 iflush %o0+0;iflush %o0+8;iflush %o0+16;iflush %o0+24 nop retl nop .LLfe1: .size __TR_clear_cache_4,.LLfe1-__TR_clear_cache_4 .ident "GCC: (GNU) 3.1" libffcall-2.5/trampoline/trampoline.30000664000000000000000000000644613136760230014612 00000000000000.\" Copyright (C) 1995-2017 Bruno Haible .\" .\" This manual is free documentation. It is dually licensed under the .\" GNU FDL and the GNU GPL. This means that you can redistribute this .\" manual under either of these two licenses, at your choice. .\" .\" This manual is covered by the GNU FDL. Permission is granted to copy, .\" distribute and/or modify this document under the terms of the .\" GNU Free Documentation License (FDL), either version 1.2 of the .\" License, or (at your option) any later version published by the .\" Free Software Foundation (FSF); with no Invariant Sections, with no .\" Front-Cover Text, and with no Back-Cover Texts. .\" A copy of the license is at . .\" .\" This manual is covered by the GNU GPL. You can redistribute it and/or .\" modify it under the terms of the GNU General Public License (GPL), either .\" version 2 of the License, or (at your option) any later version published .\" by the Free Software Foundation (FSF). .\" A copy of the license is at . .\" .TH TRAMPOLINE 3 "1 January 2017" .SH NAME trampoline \- closures as first-class C functions .SH SYNOPSIS .B #include .LP .B function = alloc_trampoline(address, variable, data); .LP .B free_trampoline(function); .LP .nf .B is_trampoline(function) .B trampoline_address(function) .B trampoline_variable(function) .B trampoline_data(function) .fi .SH DESCRIPTION .LP These functions implement .I closures as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called. Closures as .I first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. .IB function " = alloc_trampoline(" address ", " variable ", " data ")" allocates a closure. When .I function gets called, it stores .I data in the variable .I variable and calls the C function at .IR address . The function at .I address is responsible for fetching .I data out of .I variable immediately, before execution of any other function call. This is much like .BR gcc "'s" local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while .I trampoline provides functions with indefinite extent: .I function is only deallocated when .BI free_trampoline( function ) is called. .BI "is_trampoline(" function ")" checks whether the C function .I function was produced by a call to .IR alloc_trampoline . If this returns true, the arguments given to .I alloc_trampoline can be retrieved: .RS 4 .LP .BI "trampoline_address(" function ")" returns .IR address , .LP .BI "trampoline_variable(" function ")" returns .IR variable , .LP .BI "trampoline_data(" function ")" returns .IR data . .RE .SH SEE ALSO .BR gcc (1), .BR stdarg (3), .BR callback (3) .SH BUGS Passing the data through a global variable is not reentrant. Don't call trampoline functions from within signal handlers. This is fixed in the .BR callback (3) package. .SH PORTING The way .B gcc builds local functions is described in the gcc source, file .RI gcc-2.6.3/config/ cpu / cpu .h. .SH AUTHOR Bruno Haible .SH ACKNOWLEDGEMENTS Many ideas were cribbed from the gcc source. libffcall-2.5/trampoline/trampoline.html0000664000000000000000000001122013136760230015376 00000000000000 TRAMPOLINE manual page

TRAMPOLINE manual page

Name

 trampoline - closures as first-class C functions

Synopsis

 
#include <trampoline.h>
function = alloc_trampoline(address, variable, data);
free_trampoline(function);
is_trampoline(function)
trampoline_address(function)
trampoline_variable(function)
trampoline_data(function)

Description

 These functions implement closures as first-class C functions. A closure consists of a regular C function and a piece of data which gets passed to the C function when the closure is called.

Closures as first-class C functions means that they fit into a function pointer and can be called exactly like any other C function. function = alloc_trampoline(address, variable, data) allocates a closure. When function gets called, it stores data in the variable variable and calls the C function at address. The function at address is responsible for fetching data out of variable immediately, before execution of any other function call.

This is much like gcc's local functions, except that the GNU C local functions have dynamic extent (i.e. are deallocated when the creating function returns), while trampoline provides functions with indefinite extent: function is only deallocated when free_trampoline(function) is called.

is_trampoline(function) checks whether the C function function was produced by a call to alloc_trampoline. If this returns true, the arguments given to alloc_trampoline can be retrieved:

  • trampoline_address(function) returns address,
  • trampoline_variable(function) returns variable,
  • trampoline_data(function) returns data.

See also

 gcc(1), stdarg(3), callback(3)

Bugs

 Passing the data through a global variable is not reentrant. Don't call trampoline functions from within signal handlers. This is fixed in the callback(3) package.

Porting

 The way gcc builds local functions is described in the gcc source, file gcc-2.6.3/config/cpu/cpu.h.

Author

 Bruno Haible <bruno@clisp.org>

Acknowledgements

 Many ideas were cribbed from the gcc source.

TRAMPOLINE manual page
Bruno Haible <bruno@clisp.org>

Last modified: 1 January 2017. libffcall-2.5/trampoline/Makefile.maint0000664000000000000000000000045013153072372015112 00000000000000# maintainer -*-Makefile-*- RM = rm -f # ==================== Easily regeneratable files ==================== ROFF_MAN = groff -Tutf8 -mandoc all : trampoline.man trampoline.man : trampoline.3 $(ROFF_MAN) trampoline.3 > trampoline.man totally-clean : force $(RM) trampoline.man force : libffcall-2.5/trampoline/cache.c0000664000000000000000000001057214664200105013553 00000000000000/* This file is derived from gcc-2.6.3/libgcc2.c, section L_clear_cache */ /* Copyright (C) 1989-2024 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ /* Clear part of an instruction cache. */ /* Our emphasis here is _not_ to clear as few cache lines as possible * or with as few machine instructions as possible, but to do it _right_. */ /* This code is apparently untested!! */ /* This is from Andreas Stolcke . */ #if defined(__mips__) || defined(__mips64__) #include #define CLEAR_INSN_CACHE(BEG, END) \ cacheflush (BEG, END - BEG, BCACHE) #endif void __TR_clear_cache (char *beg, char *end) { #ifdef CLEAR_INSN_CACHE CLEAR_INSN_CACHE (beg, end); #else #ifdef INSN_CACHE_SIZE /* This is actually dead code!! */ #define INSN_CACHE_PLANE_SIZE (INSN_CACHE_SIZE / INSN_CACHE_DEPTH) static char array[INSN_CACHE_SIZE + INSN_CACHE_PLANE_SIZE + INSN_CACHE_LINE_WIDTH]; static int initialized = 0; int offset; void *start_addr; void *end_addr; typedef (*function_ptr) (); #if (INSN_CACHE_SIZE / INSN_CACHE_LINE_WIDTH) < 16 /* It's cheaper to clear the whole cache. Put in a series of jump instructions so that calling the beginning of the cache will clear the whole thing. */ if (! initialized) { int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH); int end_ptr = ptr + INSN_CACHE_SIZE; while (ptr < end_ptr) { *(INSTRUCTION_TYPE *)ptr = JUMP_AHEAD_INSTRUCTION + INSN_CACHE_LINE_WIDTH; ptr += INSN_CACHE_LINE_WIDTH; } *(INSTRUCTION_TYPE *)(ptr - INSN_CACHE_LINE_WIDTH) = RETURN_INSTRUCTION; initialized = 1; } /* Call the beginning of the sequence. */ (((function_ptr) (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH)) ()); #else /* Cache is large. */ if (! initialized) { int ptr = (((int) array + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH); while (ptr < (int) array + sizeof array) { *(INSTRUCTION_TYPE *)ptr = RETURN_INSTRUCTION; ptr += INSN_CACHE_LINE_WIDTH; } initialized = 1; } /* Find the location in array that occupies the same cache line as BEG. */ offset = ((int) beg & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1); start_addr = (((int) (array + INSN_CACHE_PLANE_SIZE - 1) & -INSN_CACHE_PLANE_SIZE) + offset); /* Compute the cache alignment of the place to stop clearing. */ #if 0 /* This is not needed for gcc's purposes. */ /* If the block to clear is bigger than a cache plane, we clear the entire cache, and OFFSET is already correct. */ if (end < beg + INSN_CACHE_PLANE_SIZE) #endif offset = (((int) (end + INSN_CACHE_LINE_WIDTH - 1) & -INSN_CACHE_LINE_WIDTH) & (INSN_CACHE_PLANE_SIZE - 1)); #if INSN_CACHE_DEPTH > 1 end_addr = (start_addr & -INSN_CACHE_PLANE_SIZE) + offset; if (end_addr <= start_addr) end_addr += INSN_CACHE_PLANE_SIZE; for (plane = 0; plane < INSN_CACHE_DEPTH; plane++) { int addr = start_addr + plane * INSN_CACHE_PLANE_SIZE; int stop = end_addr + plane * INSN_CACHE_PLANE_SIZE; while (addr != stop) { /* Call the return instruction at ADDR. */ ((function_ptr) addr) (); addr += INSN_CACHE_LINE_WIDTH; } } #else /* just one plane */ do { /* Call the return instruction at START_ADDR. */ ((function_ptr) start_addr) (); start_addr += INSN_CACHE_LINE_WIDTH; } while ((start_addr % INSN_CACHE_SIZE) != offset); #endif /* just one plane */ #endif /* Cache is large */ #endif /* Cache exists */ #endif /* CLEAR_INSN_CACHE */ } libffcall-2.5/trampoline/cache-powerpc-linux-macro.S0000664000000000000000000000136714664204343017456 00000000000000 .file "cache-powerpc.c" .section ".text" .align 2 .globl __TR_clear_cache_3 .type __TR_clear_cache_3, @function __TR_clear_cache_3: .extern __mulh .extern __mull .extern __divss .extern __divus .extern __quoss .extern __quous stwu 1,-32(1) icbi 0,3; dcbf 0,3 addi 0,3,4 icbi 0,0; dcbf 0,0 addi 9,3,8 icbi 0,9; dcbf 0,9 addi 0,3,12 icbi 0,0; dcbf 0,0 addi 9,3,16 icbi 0,9; dcbf 0,9 addi 0,3,20 icbi 0,0; dcbf 0,0 addi 9,3,24 icbi 0,9; dcbf 0,9 addi 0,3,28 icbi 0,0; dcbf 0,0 addi 3,3,32 icbi 0,3; dcbf 0,3 sync; isync addi 1,1,32 blr .size __TR_clear_cache_3, .-__TR_clear_cache_3 #if defined __linux__ || defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __DragonFly__ .section .note.GNU-stack,"",@progbits #endif libffcall-2.5/trampoline/COPYING0000644000000000000000000004335713026317520013405 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/trampoline/cache-hppa.c0000664000000000000000000000414514662613014014505 00000000000000/* Instruction cache flushing for hppa */ /* * Copyright 1995-2017 Bruno Haible * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #ifdef __hppa64__ /* Tell GCC not to clobber the registers that are call-saved in the HP C calling convention. */ register long arg0 __asm__("r26"); register long arg1 __asm__("r25"); register long arg2 __asm__("r24"); register long arg3 __asm__("r23"); register long arg4 __asm__("r22"); register long arg5 __asm__("r21"); register long arg6 __asm__("r20"); register long arg7 __asm__("r19"); #endif /* * This assumes that the range [first_addr..last_addr] lies in at most two * cache lines. */ void __TR_clear_cache (char* first_addr, char* last_addr) { register int tmp1; register int tmp2; /* Flush the relevant data cache lines. (Yes, this is needed. I tried it.) */ asm volatile ("fdc 0(0,%0)" "\n\t" "fdc 0(0,%1)" "\n\t" "sync" : : "r" (first_addr), "r" (last_addr) ); /* Flush the relevant instruction cache lines. */ asm volatile ("mfsp %%sr0,%1" "\n\t" "ldsid (0,%4),%0" "\n\t" "mtsp %0,%%sr0" "\n\t" "fic 0(%%sr0,%2)" "\n\t" "fic 0(%%sr0,%3)" "\n\t" "sync" "\n\t" "mtsp %1,%%sr0" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" "\n\t" "nop" : "=r" (tmp1), "=r" (tmp2) : "r" (first_addr), "r" (last_addr), "r" (first_addr) ); } libffcall-2.5/COPYING0000644000000000000000000004335713026317516011240 00000000000000 GNU GENERAL PUBLIC LICENSE Version 2, June 1991 Copyright (C) 1989, 1991 Free Software Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. Preamble The licenses for most software are designed to take away your freedom to share and change it. By contrast, the GNU General Public License is intended to guarantee your freedom to share and change free software--to make sure the software is free for all its users. This General Public License applies to most of the Free Software Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by the GNU Library General Public License instead.) You can apply it to your programs, too. When we speak of free software, we are referring to freedom, not price. Our General Public Licenses are designed to make sure that you have the freedom to distribute copies of free software (and charge for this service if you wish), that you receive source code or can get it if you want it, that you can change the software or use pieces of it in new free programs; and that you know you can do these things. To protect your rights, we need to make restrictions that forbid anyone to deny you these rights or to ask you to surrender the rights. These restrictions translate to certain responsibilities for you if you distribute copies of the software, or if you modify it. For example, if you distribute copies of such a program, whether gratis or for a fee, you must give the recipients all the rights that you have. You must make sure that they, too, receive or can get the source code. And you must show them these terms so they know their rights. We protect your rights with two steps: (1) copyright the software, and (2) offer you this license which gives you legal permission to copy, distribute and/or modify the software. Also, for each author's protection and ours, we want to make certain that everyone understands that there is no warranty for this free software. If the software is modified by someone else and passed on, we want its recipients to know that what they have is not the original, so that any problems introduced by others will not reflect on the original authors' reputations. Finally, any free program is threatened constantly by software patents. We wish to avoid the danger that redistributors of a free program will individually obtain patent licenses, in effect making the program proprietary. To prevent this, we have made it clear that any patent must be licensed for everyone's free use or not licensed at all. The precise terms and conditions for copying, distribution and modification follow. GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION 0. This License applies to any program or other work which contains a notice placed by the copyright holder saying it may be distributed under the terms of this General Public License. The "Program", below, refers to any such program or work, and a "work based on the Program" means either the Program or any derivative work under copyright law: that is to say, a work containing the Program or a portion of it, either verbatim or with modifications and/or translated into another language. (Hereinafter, translation is included without limitation in the term "modification".) Each licensee is addressed as "you". Activities other than copying, distribution and modification are not covered by this License; they are outside its scope. The act of running the Program is not restricted, and the output from the Program is covered only if its contents constitute a work based on the Program (independent of having been made by running the Program). Whether that is true depends on what the Program does. 1. You may copy and distribute verbatim copies of the Program's source code as you receive it, in any medium, provided that you conspicuously and appropriately publish on each copy an appropriate copyright notice and disclaimer of warranty; keep intact all the notices that refer to this License and to the absence of any warranty; and give any other recipients of the Program a copy of this License along with the Program. You may charge a fee for the physical act of transferring a copy, and you may at your option offer warranty protection in exchange for a fee. 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. Thus, it is not the intent of this section to claim rights or contest your rights to work written entirely by you; rather, the intent is to exercise the right to control the distribution of derivative or collective works based on the Program. In addition, mere aggregation of another work not based on the Program with the Program (or with a work based on the Program) on a volume of a storage or distribution medium does not bring the other work under the scope of this License. 3. You may copy and distribute the Program (or a work based on it, under Section 2) in object code or executable form under the terms of Sections 1 and 2 above provided that you also do one of the following: a) Accompany it with the complete corresponding machine-readable source code, which must be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, b) Accompany it with a written offer, valid for at least three years, to give any third party, for a charge no more than your cost of physically performing source distribution, a complete machine-readable copy of the corresponding source code, to be distributed under the terms of Sections 1 and 2 above on a medium customarily used for software interchange; or, c) Accompany it with the information you received as to the offer to distribute corresponding source code. (This alternative is allowed only for noncommercial distribution and only if you received the program in object code or executable form with such an offer, in accord with Subsection b above.) The source code for a work means the preferred form of the work for making modifications to it. For an executable work, complete source code means all the source code for all modules it contains, plus any associated interface definition files, plus the scripts used to control compilation and installation of the executable. However, as a special exception, the source code distributed need not include anything that is normally distributed (in either source or binary form) with the major components (compiler, kernel, and so on) of the operating system on which the executable runs, unless that component itself accompanies the executable. If distribution of executable or object code is made by offering access to copy from a designated place, then offering equivalent access to copy the source code from the same place counts as distribution of the source code, even though third parties are not compelled to copy the source along with the object code. 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt otherwise to copy, modify, sublicense or distribute the Program is void, and will automatically terminate your rights under this License. However, parties who have received copies, or rights, from you under this License will not have their licenses terminated so long as such parties remain in full compliance. 5. You are not required to accept this License, since you have not signed it. However, nothing else grants you permission to modify or distribute the Program or its derivative works. These actions are prohibited by law if you do not accept this License. Therefore, by modifying or distributing the Program (or any work based on the Program), you indicate your acceptance of this License to do so, and all its terms and conditions for copying, distributing or modifying the Program or works based on it. 6. Each time you redistribute the Program (or any work based on the Program), the recipient automatically receives a license from the original licensor to copy, distribute or modify the Program subject to these terms and conditions. You may not impose any further restrictions on the recipients' exercise of the rights granted herein. You are not responsible for enforcing compliance by third parties to this License. 7. If, as a consequence of a court judgment or allegation of patent infringement or for any other reason (not limited to patent issues), conditions are imposed on you (whether by court order, agreement or otherwise) that contradict the conditions of this License, they do not excuse you from the conditions of this License. If you cannot distribute so as to satisfy simultaneously your obligations under this License and any other pertinent obligations, then as a consequence you may not distribute the Program at all. For example, if a patent license would not permit royalty-free redistribution of the Program by all those who receive copies directly or indirectly through you, then the only way you could satisfy both it and this License would be to refrain entirely from distribution of the Program. If any portion of this section is held invalid or unenforceable under any particular circumstance, the balance of the section is intended to apply and the section as a whole is intended to apply in other circumstances. It is not the purpose of this section to induce you to infringe any patents or other property right claims or to contest validity of any such claims; this section has the sole purpose of protecting the integrity of the free software distribution system, which is implemented by public license practices. Many people have made generous contributions to the wide range of software distributed through that system in reliance on consistent application of that system; it is up to the author/donor to decide if he or she is willing to distribute software through any other system and a licensee cannot impose that choice. This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the original copyright holder who places the Program under this License may add an explicit geographical distribution limitation excluding those countries, so that distribution is permitted only in or among countries not thus excluded. In such case, this License incorporates the limitation as if written in the body of this License. 9. The Free Software Foundation may publish revised and/or new versions of the General Public License from time to time. Such new versions will be similar in spirit to the present version, but may differ in detail to address new problems or concerns. Each version is given a distinguishing version number. If the Program specifies a version number of this License which applies to it and "any later version", you have the option of following the terms and conditions either of that version or of any later version published by the Free Software Foundation. If the Program does not specify a version number of this License, you may choose any version ever published by the Free Software Foundation. 10. If you wish to incorporate parts of the Program into other free programs whose distribution conditions are different, write to the author to ask for permission. For software which is copyrighted by the Free Software Foundation, write to the Free Software Foundation; we sometimes make exceptions for this. Our decision will be guided by the two goals of preserving the free status of all derivatives of our free software and of promoting the sharing and reuse of software generally. NO WARRANTY 11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION. 12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. END OF TERMS AND CONDITIONS Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest possible use to the public, the best way to achieve this is to make it free software which everyone can redistribute and change under these terms. To do so, attach the following notices to the program. It is safest to attach them to the start of each source file to most effectively convey the exclusion of warranty; and each file should have at least the "copyright" line and a pointer to where the full notice is found. Copyright (C) This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. Also add information on how to contact you by electronic and paper mail. If the program is interactive, make it output a short notice like this when it starts in an interactive mode: Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it under certain conditions; type `show c' for details. The hypothetical commands `show w' and `show c' should show the appropriate parts of the General Public License. Of course, the commands you use may be called something other than `show w' and `show c'; they could even be mouse-clicks or menu items--whatever suits your program. You should also get your employer (if you work as a programmer) or your school, if any, to sign a "copyright disclaimer" for the program, if necessary. Here is a sample; alter the names: Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision' (which makes passes at compilers) written by James Hacker. , 1 April 1989 Ty Coon, President of Vice This General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is what you want to do, use the GNU Library General Public License instead of this License. libffcall-2.5/DEPENDENCIES0000644000000000000000000000404414016707261011744 00000000000000The following packages should be installed before GNU libffcall is installed (runtime dependencies that are also build dependencies): None. The following packages should be installed when GNU libffcall is installed (runtime dependencies, but not build dependencies): None. The following should be installed when GNU libffcall is built, but are not needed later, once it is installed (build dependencies, but not runtime dependencies): * A C runtime, compiler, linker, etc. + Mandatory. Either the platform's native 'cc', or GCC 3.1 or newer. + GCC Homepage: https://gcc.gnu.org/ + Download: https://ftp.gnu.org/gnu/gcc/ * A 'make' utility. + Mandatory. Either the platform's native 'make' (for in-tree builds only), or GNU Make 3.79.1 or newer. + GNU Make Homepage: https://www.gnu.org/software/make/ + Download: https://ftp.gnu.org/gnu/make/ * A shell + Mandatory. Either the platform's native 'sh', or Bash. + Homepage: https://www.gnu.org/software/bash/ + Download: https://ftp.gnu.org/gnu/bash/ * Core POSIX utilities, including: [ basename cat chgrp chmod chown cp dd echo expand expr false hostname install kill ln ls md5sum mkdir mkfifo mknod mv printenv pwd rm rmdir sleep sort tee test touch true uname + Mandatory. Either the platform's native utilities, or GNU coreutils. + Homepage: https://www.gnu.org/software/coreutils/ + Download: https://ftp.gnu.org/gnu/coreutils/ * The comparison utilities 'cmp' and 'diff'. + Mandatory. Either the platform's native utilities, or GNU diffutils. + Homepage: https://www.gnu.org/software/diffutils/ + Download: https://ftp.gnu.org/gnu/diffutils/ * Grep. + Mandatory. Either the platform's native grep, or GNU grep. + Homepage: https://www.gnu.org/software/grep/ + Download: https://ftp.gnu.org/gnu/grep/ * Awk. + Mandatory. Either the platform's native awk, mawk, or nawk, or GNU awk. + Homepage: https://www.gnu.org/software/gawk/ + Download: https://ftp.gnu.org/gnu/gawk/